#include "run-time.h"

/* Typedefs for referenced classes */

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

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

typedef struct {
  D wrapper;
} _KLobjectGVKd;

typedef struct {
  D wrapper;
} _KLunboundGVKe;

typedef struct {
  D wrapper;
} _KLbooleanGVKd;

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

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

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

typedef struct {
  D wrapper;
  D Pprimitive_name_;
} _KLenvironment_objectGVenvironment_protocols;

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D compiler_object_proxy_;
} _KLcompiler_objectGVenvironment_protocols;

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D application_object_proxy_;
} _KLapplication_objectGVenvironment_protocols;

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D compiler_object_proxy_;
  D application_object_proxy_;
} _KLapplication_and_compiler_objectGVenvironment_protocols;

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

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

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

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

typedef struct {
  D wrapper;
} _KLstringGVKd;

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

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(10);
define__KLbyte_stringGVKd(11);
define__KLbyte_stringGVKd(14);
define__KLbyte_stringGVKd(17);
define__KLbyte_stringGVKd(15);
define__KLbyte_stringGVKd(4);
define__KLbyte_stringGVKd(9);
define__KLbyte_stringGVKd(16);
define__KLbyte_stringGVKd(22);
define__KLbyte_stringGVKd(13);
define__KLbyte_stringGVKd(24);
define__KLbyte_stringGVKd(21);
define__KLbyte_stringGVKd(23);

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

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

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

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

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

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

typedef struct {
  D wrapper;
} _KLserverGVenvironment_protocols;

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D Pid_;
  D application_object_proxy_;
} _KLuser_objectGVenvironment_protocols;

typedef struct {
  D wrapper;
  D id_name_;
  D id_module_;
} _KLdefinition_idGVenvironment_protocols;

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D server_project_;
  D application_object_table_;
  D application_client_;
  D application_machine_;
  D application_filename_;
  D application_arguments_;
  D application_state_;
  D application_temporary_stopQ_;
} _KLapplicationGVenvironment_protocols;

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D project_proxy_;
  D project_application_;
  D project_compiler_database_;
  D project_next_numeric_id_;
  D project_object_table_;
  D project_query_database_;
  D project_server_path_;
  D environment_object_breakpoints_;
  D source_location_breakpoints_;
  D project_properties_;
  D project_profile_state_;
} _KLproject_objectGVenvironment_protocols;

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

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

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D application_object_proxy_;
} _KLfunction_objectGVenvironment_protocols;

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D Pid_;
  D compiler_object_proxy_;
  D application_object_proxy_;
} _KLclass_objectGVenvironment_protocols;


/* Typedefs for defined classes */

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D compiler_object_proxy_;
  D application_object_proxy_;
} _KLslot_objectGVenvironment_protocols;


/* 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 _KLclassGVKd KLenvironment_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLenvironment_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLcompiler_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLcompiler_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLapplication_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLapplication_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLapplication_and_compiler_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLapplication_and_compiler_objectGVenvironment_protocolsW;
D KerrorVKdMM1I (D, D);
extern _KLkeyword_methodGVKe KinitializeVKdMenvironment_protocolsM0;
extern _KLfunction_classGVKi KLkeyword_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLkeyword_methodGVKeW;
extern _KLclassGVKd KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLkeyword_methodGVKe KinitializeVKdMM1;
extern _KLclassGVKd KLunionGVKe;
extern _KLmm_wrapperGVKi_0 KLunionGVKeW;
D Kunion_instanceQVKiI (D, D);
extern _KLclassGVKd KLstringGVKd;
extern _KLmm_wrapperGVKi_0 KLstringGVKdW;
extern _KLclassGVKd KLsingletonGVKd;
extern _KLmm_wrapperGVKi_0 KLsingletonGVKdW;
D Ksingleton_pointer_idQ_instanceQVKiI (D, D);
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLsymbolGVKd KJname_;
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 _KLinstance_slot_descriptorGVKe KPprimitive_nameVenvironment_protocolsHLenvironment_objectG;
extern _KLclassGVKd KLinstance_slot_descriptorGVKe;
extern _KLmm_wrapperGVKi_0 KLinstance_slot_descriptorGVKeW;
extern _KLinstance_slot_descriptorGVKe Kcompiler_object_proxyVenvironment_protocolsHLcompiler_objectG;
extern _KLinstance_slot_descriptorGVKe Kapplication_object_proxyVenvironment_protocolsHLapplication_objectG;
D Kclass_instanceQ_initialVKiI (D, D);
extern _KLmoduleGVKe Kenvironment_protocols_moduleYdylan_userVenvironment_protocols;
extern _KLclassGVKd KLmoduleGVKe;
extern _KLmm_wrapperGVKi_0 KLmoduleGVKeW;
extern _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLabsent_engine_nodeGVKg RSINGULAR_Labsent_engine_nodeG;
extern _KLclassGVKd KLabsent_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLabsent_engine_nodeGVKgW;
extern _KLclassGVKd KLserverGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLserverGVenvironment_protocolsW;
extern _KLclassGVKd KLuser_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLuser_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLdefinition_idGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLdefinition_idGVenvironment_protocolsW;
extern _KLclassGVKd KLapplicationGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLapplicationGVenvironment_protocolsW;
extern _KLclassGVKd KLproject_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLproject_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
D Kchoose_serverVenvironment_protocolsMM2I (D, D, D, D, D);
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LstringG_typesVKi;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LsequenceG_typesVKi;
extern _KLclassGVKd KLfunction_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLfunction_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLclass_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLclass_objectGVenvironment_protocolsW;

/* Defined object declarations */

extern _KLsimple_methodGVKe Kenvironment_object_type_nameVenvironment_protocolsMM36;
D Kenvironment_object_type_nameVenvironment_protocolsMM36I (D);
extern _KLsimple_methodGVKe Kenvironment_object_typeVenvironment_protocolsMM3;
D Kenvironment_object_typeVenvironment_protocolsMM3I (D, D);
extern _KLincremental_generic_functionGVKe Kuser_object_slot_valueVenvironment_protocols;
extern _KLclassGVKd KLslot_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLslot_objectGVenvironment_protocolsW;
static _KLimplementation_classGVKe K7;
static _KLsimple_object_vectorGVKd_3 K8;
extern _KLkeyword_methodGVKe KLslot_objectGZ32ZconstructorVenvironment_protocolsMM0;
D KLslot_objectGZ32ZconstructorVenvironment_protocolsMM0I (D, D, D, D, D);
static _KLsimple_object_vectorGVKd_1 K11;
static _KLsimple_object_vectorGVKd_6 K12;
static _KLsymbolGVKd KJcompiler_object_proxy_;
static _KLbyte_stringGVKd_23 K14;
static _KLunionGVKe K15;
static _KLpairGVKd K16;
static _KLsingletonGVKd K17;
static _KLbyte_stringGVKd_21 K18;
static _KLkeyword_signatureAvaluesGVKi K19;
static _KLsimple_object_vectorGVKd_6 K20;
static _KLsymbolGVKd KJapplication_object_proxy_;
static _KLbyte_stringGVKd_24 K22;
static _KLsimple_object_vectorGVKd_3 K23;
static _KLsimple_object_vectorGVKd_1 K24;
static _KLbyte_stringGVKd_13 K25;
extern _KLkeyword_methodGVKe Kuser_object_slot_valueVenvironment_protocolsMM0;
D Kuser_object_slot_valueVenvironment_protocolsMM0I (D, D, D, D, D);
extern _KLkeyword_methodGVKe Kuser_object_slot_valueVenvironment_protocolsMM1;
D Kuser_object_slot_valueVenvironment_protocolsMM1I (D, D, D, D, D);
static _KLpairGVKd K30;
static _KLpairGVKd K31;
static _KLkeyword_signatureAvaluesGVKi K32;
static _KLbyte_stringGVKd_22 K33;
static _KLsimple_object_vectorGVKd_3 K34;
static _KLsimple_object_vectorGVKd_1 K35;
static _KLsimple_object_vectorGVKd_1 K36;
static _KLunionGVKe K37;
static _KLsymbolGVKd KJrepeated_element_;
static _KLbyte_stringGVKd_16 K39;
static _KLunionGVKe K40;
static _KLkeyword_signatureAvaluesGVKi K41;
static _KLsimple_object_vectorGVKd_2 K42;
static _KLsimple_object_vectorGVKd_3 K43;
static _KLkeyword_signatureAvaluesGVKi K44;
static _KLsimple_object_vectorGVKd_3 K45;
extern _KLincremental_generic_functionGVKe Kslot_typeVenvironment_protocols;
extern _KLsimple_methodGVKe Kslot_typeVenvironment_protocolsMM0;
D Kslot_typeVenvironment_protocolsMM0I (D, D);
static _KLpairGVKd K49;
static _KLsignatureAvaluesGVKi K50;
static _KLbyte_stringGVKd_9 K51;
static _KLsimple_object_vectorGVKd_2 K52;
static _KLsimple_object_vectorGVKd_1 K53;
static _KLsignatureAvaluesGVKi K54;
static _KLsimple_object_vectorGVKd_2 K55;
static _KLsignatureAvaluesGVKi K56;
static _KLbyte_stringGVKd_4 K57;
static _KLsignatureAvaluesGVKi K58;
extern _KLincremental_generic_functionGVKe Kslot_allocationVenvironment_protocols;
extern _KLsimple_methodGVKe Kslot_allocationVenvironment_protocolsMM0;
D Kslot_allocationVenvironment_protocolsMM0I (D, D);
static _KLpairGVKd K62;
static _KLsignatureAvaluesGVKi K63;
static _KLbyte_stringGVKd_15 K64;
static _KLsignatureAvaluesGVKi K65;
extern _KLincremental_generic_functionGVKe Kslot_init_keywordVenvironment_protocols;
extern _KLsimple_methodGVKe Kslot_init_keywordVenvironment_protocolsMM0;
D Kslot_init_keywordVenvironment_protocolsMM0I (D, D);
static _KLpairGVKd K69;
static _KLsignatureAvaluesGVKi K70;
static _KLbyte_stringGVKd_17 K71;
static _KLsimple_object_vectorGVKd_2 K72;
static _KLunionGVKe K73;
static _KLsignatureAvaluesGVKi K74;
extern _KLincremental_generic_functionGVKe Kslot_init_kindVenvironment_protocols;
extern _KLsimple_methodGVKe Kslot_init_kindVenvironment_protocolsMM0;
D Kslot_init_kindVenvironment_protocolsMM0I (D, D);
static _KLpairGVKd K78;
static _KLsignatureAvaluesGVKi K79;
static _KLbyte_stringGVKd_14 K80;
static _KLsimple_object_vectorGVKd_1 K81;
static _KLsignatureAvaluesGVKi K82;
extern _KLincremental_generic_functionGVKe Kslot_setterVenvironment_protocols;
extern _KLsimple_methodGVKe Kslot_setterVenvironment_protocolsMM0;
D Kslot_setterVenvironment_protocolsMM0I (D, D);
static _KLpairGVKd K86;
static _KLsignatureAvaluesGVKi K87;
static _KLbyte_stringGVKd_11 K88;
static _KLsimple_object_vectorGVKd_1 K89;
static _KLunionGVKe K90;
static _KLsignatureAvaluesGVKi K91;
extern _KLincremental_generic_functionGVKe Kslot_getterVenvironment_protocols;
extern _KLsimple_methodGVKe Kslot_getterVenvironment_protocolsMM0;
D Kslot_getterVenvironment_protocolsMM0I (D, D);
static _KLpairGVKd K95;
static _KLbyte_stringGVKd_11 K96;
extern _KLincremental_generic_functionGVKe Kslot_classVenvironment_protocols;
extern _KLsimple_methodGVKe Kslot_classVenvironment_protocolsMM0;
D Kslot_classVenvironment_protocolsMM0I (D, D);
static _KLpairGVKd K100;
static _KLsignatureAvaluesGVKi K101;
static _KLbyte_stringGVKd_10 K102;
static _KLsimple_object_vectorGVKd_1 K103;
static _KLsignatureAvaluesGVKi K104;

/* Indirection variables */

static D IKJcompiler_object_proxy_ = &KJcompiler_object_proxy_;
static D IKJapplication_object_proxy_ = &KJapplication_object_proxy_;
static D IKJrepeated_element_ = &KJrepeated_element_;

/* Variables */

D Lslot_objectGVenvironment_protocols = &KLslot_objectGVenvironment_protocols;
D slot_classVenvironment_protocols = &Kslot_classVenvironment_protocols;
D slot_getterVenvironment_protocols = &Kslot_getterVenvironment_protocols;
D slot_setterVenvironment_protocols = &Kslot_setterVenvironment_protocols;
D slot_typeVenvironment_protocols = &Kslot_typeVenvironment_protocols;
D user_object_slot_valueVenvironment_protocols = &Kuser_object_slot_valueVenvironment_protocols;
D slot_init_kindVenvironment_protocols = &Kslot_init_kindVenvironment_protocols;
D slot_init_keywordVenvironment_protocols = &Kslot_init_keywordVenvironment_protocols;
D slot_allocationVenvironment_protocols = &Kslot_allocationVenvironment_protocols;

/* Objects */

_KLsimple_methodGVKe Kenvironment_object_type_nameVenvironment_protocolsMM36 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K58,
  &Kenvironment_object_type_nameVenvironment_protocolsMM36I
};

_KLsimple_methodGVKe Kenvironment_object_typeVenvironment_protocolsMM3 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K56,
  &Kenvironment_object_typeVenvironment_protocolsMM3I
};

_KLincremental_generic_functionGVKe Kuser_object_slot_valueVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_optional_xep_3,
  &K32,
  (D) 1,
  &K33,
  &K30,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLclassGVKd KLslot_objectGVenvironment_protocols = {
  &KLclassGVKdW /* wrapper */,
  &Kclass_instanceQ_initialVKiI,
  &K25,
  &K7,
  (D) 1,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols
};

_KLmm_wrapperGVKi_0 KLslot_objectGVenvironment_protocolsW = {
  &KLmm_wrapperGVKiW /* wrapper */,
  &K7,
  (D) 1,
  13,
  33554439,
  (D) 1
};

static _KLimplementation_classGVKe K7 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (D) 477102093,
  &KLslot_objectGVenvironment_protocols,
  &KLslot_objectGVenvironment_protocolsW,
  &KPfalseVKi,
  &K8,
  (D) -3,
  &KLslot_objectGZ32ZconstructorVenvironment_protocolsMM0,
  &K11,
  &K12,
  (D) 21,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &K8,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_3 K8 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KPprimitive_nameVenvironment_protocolsHLenvironment_objectG,
  &Kcompiler_object_proxyVenvironment_protocolsHLcompiler_objectG,
  &Kapplication_object_proxyVenvironment_protocolsHLapplication_objectG
};

_KLkeyword_methodGVKe KLslot_objectGZ32ZconstructorVenvironment_protocolsMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K19,
  &key_mep_2,
  &KLslot_objectGZ32ZconstructorVenvironment_protocolsMM0I,
  &K20
};

static _KLsimple_object_vectorGVKd_1 K11 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &KLapplication_and_compiler_objectGVenvironment_protocols
};

static _KLsimple_object_vectorGVKd_6 K12 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 25,
  &KLobjectGVKd,
  &KLenvironment_objectGVenvironment_protocols,
  &KLcompiler_objectGVenvironment_protocols,
  &KLapplication_objectGVenvironment_protocols,
  &KLapplication_and_compiler_objectGVenvironment_protocols,
  &KLslot_objectGVenvironment_protocols
};

static _KLsymbolGVKd KJcompiler_object_proxy_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K18
};

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

static _KLunionGVKe K15 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K17,
  &KLstringGVKd
};

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

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

static _KLbyte_stringGVKd_21 K18 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 85,
  "compiler-object-proxy"
};

static _KLkeyword_signatureAvaluesGVKi K19 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 35390469,
  &KDsignature_LclassG_typesVKi,
  &K23,
  &KDsignature_LobjectG_typesVKi,
  &K24
};

static _KLsimple_object_vectorGVKd_6 K20 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 25,
  &KJname_,
  &KPfalseVKi,
  &KJcompiler_object_proxy_,
  &KPunboundVKi,
  &KJapplication_object_proxy_,
  &KPfalseVKi
};

static _KLsymbolGVKd KJapplication_object_proxy_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K22
};

static _KLbyte_stringGVKd_24 K22 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 97,
  "application-object-proxy"
};

static _KLsimple_object_vectorGVKd_3 K23 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KJname_,
  &KJcompiler_object_proxy_,
  &KJapplication_object_proxy_
};

static _KLsimple_object_vectorGVKd_1 K24 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &KLslot_objectGVenvironment_protocols
};

static _KLbyte_stringGVKd_13 K25 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 53,
  "<slot-object>"
};

_KLkeyword_methodGVKe Kuser_object_slot_valueVenvironment_protocolsMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K44,
  &key_mep_5,
  &Kuser_object_slot_valueVenvironment_protocolsMM0I,
  &K42
};

_KLkeyword_methodGVKe Kuser_object_slot_valueVenvironment_protocolsMM1 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K41,
  &key_mep_5,
  &Kuser_object_slot_valueVenvironment_protocolsMM1I,
  &K42
};

static _KLpairGVKd K30 = {
  &KLpairGVKdW /* wrapper */,
  &Kuser_object_slot_valueVenvironment_protocolsMM0,
  &K31
};

static _KLpairGVKd K31 = {
  &KLpairGVKdW /* wrapper */,
  &Kuser_object_slot_valueVenvironment_protocolsMM1,
  &KPempty_listVKi
};

static _KLkeyword_signatureAvaluesGVKi K32 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817613,
  &K34,
  &K35,
  &KDsignature_LobjectG_typesVKi,
  &K36
};

static _KLbyte_stringGVKd_22 K33 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 89,
  "user-object-slot-value"
};

static _KLsimple_object_vectorGVKd_3 K34 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLserverGVenvironment_protocols,
  &KLuser_objectGVenvironment_protocols,
  &K40
};

static _KLsimple_object_vectorGVKd_1 K35 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &KJrepeated_element_
};

static _KLsimple_object_vectorGVKd_1 K36 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &K37
};

static _KLunionGVKe K37 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K17,
  &KLenvironment_objectGVenvironment_protocols
};

static _KLsymbolGVKd KJrepeated_element_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K39
};

static _KLbyte_stringGVKd_16 K39 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 65,
  "repeated-element"
};

static _KLunionGVKe K40 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &KLdefinition_idGVenvironment_protocols,
  &KLslot_objectGVenvironment_protocols
};

static _KLkeyword_signatureAvaluesGVKi K41 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817613,
  &K43,
  &K35,
  &KDsignature_LobjectG_typesVKi,
  &K36
};

static _KLsimple_object_vectorGVKd_2 K42 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KJrepeated_element_,
  (D) 1
};

static _KLsimple_object_vectorGVKd_3 K43 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLproject_objectGVenvironment_protocols,
  &KLuser_objectGVenvironment_protocols,
  &KLdefinition_idGVenvironment_protocols
};

static _KLkeyword_signatureAvaluesGVKi K44 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817613,
  &K45,
  &K35,
  &KDsignature_LobjectG_typesVKi,
  &K36
};

static _KLsimple_object_vectorGVKd_3 K45 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLproject_objectGVenvironment_protocols,
  &KLuser_objectGVenvironment_protocols,
  &KLslot_objectGVenvironment_protocols
};

_KLincremental_generic_functionGVKe Kslot_typeVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K50,
  (D) 1,
  &K51,
  &K49,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Kslot_typeVenvironment_protocolsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K54,
  &Kslot_typeVenvironment_protocolsMM0I
};

static _KLpairGVKd K49 = {
  &KLpairGVKdW /* wrapper */,
  &Kslot_typeVenvironment_protocolsMM0,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K50 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K52,
  &K53
};

static _KLbyte_stringGVKd_9 K51 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 37,
  "slot-type"
};

static _KLsimple_object_vectorGVKd_2 K52 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLserverGVenvironment_protocols,
  &KLslot_objectGVenvironment_protocols
};

static _KLsimple_object_vectorGVKd_1 K53 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &KLenvironment_objectGVenvironment_protocols
};

static _KLsignatureAvaluesGVKi K54 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K55,
  &K53
};

static _KLsimple_object_vectorGVKd_2 K55 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLproject_objectGVenvironment_protocols,
  &KLslot_objectGVenvironment_protocols
};

static _KLsignatureAvaluesGVKi K56 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K52,
  &K36
};

static _KLbyte_stringGVKd_4 K57 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 17,
  "Slot"
};

static _KLsignatureAvaluesGVKi K58 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555461,
  &K24,
  &KDsignature_LstringG_typesVKi
};

_KLincremental_generic_functionGVKe Kslot_allocationVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K63,
  &KPfalseVKi,
  &K64,
  &K62,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Kslot_allocationVenvironment_protocolsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K65,
  &Kslot_allocationVenvironment_protocolsMM0I
};

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

static _KLsignatureAvaluesGVKi K63 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K52,
  &KDsignature_LsequenceG_typesVKi
};

static _KLbyte_stringGVKd_15 K64 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 61,
  "slot-allocation"
};

static _KLsignatureAvaluesGVKi K65 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K55,
  &KDsignature_LsequenceG_typesVKi
};

_KLincremental_generic_functionGVKe Kslot_init_keywordVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K70,
  &KPfalseVKi,
  &K71,
  &K69,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Kslot_init_keywordVenvironment_protocolsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K74,
  &Kslot_init_keywordVenvironment_protocolsMM0I
};

static _KLpairGVKd K69 = {
  &KLpairGVKdW /* wrapper */,
  &Kslot_init_keywordVenvironment_protocolsMM0,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K70 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33556489,
  &K52,
  &K72
};

static _KLbyte_stringGVKd_17 K71 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 69,
  "slot-init-keyword"
};

static _KLsimple_object_vectorGVKd_2 K72 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &K73,
  &KLbooleanGVKd
};

static _KLunionGVKe K73 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K17,
  &KLsymbolGVKd
};

static _KLsignatureAvaluesGVKi K74 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33556489,
  &K55,
  &K72
};

_KLincremental_generic_functionGVKe Kslot_init_kindVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K79,
  &KPfalseVKi,
  &K80,
  &K78,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Kslot_init_kindVenvironment_protocolsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K82,
  &Kslot_init_kindVenvironment_protocolsMM0I
};

static _KLpairGVKd K78 = {
  &KLpairGVKdW /* wrapper */,
  &Kslot_init_kindVenvironment_protocolsMM0,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K79 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K52,
  &K81
};

static _KLbyte_stringGVKd_14 K80 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 57,
  "slot-init-kind"
};

static _KLsimple_object_vectorGVKd_1 K81 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &K73
};

static _KLsignatureAvaluesGVKi K82 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K55,
  &K81
};

_KLincremental_generic_functionGVKe Kslot_setterVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K87,
  &KPfalseVKi,
  &K88,
  &K86,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Kslot_setterVenvironment_protocolsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K91,
  &Kslot_setterVenvironment_protocolsMM0I
};

static _KLpairGVKd K86 = {
  &KLpairGVKdW /* wrapper */,
  &Kslot_setterVenvironment_protocolsMM0,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K87 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K52,
  &K89
};

static _KLbyte_stringGVKd_11 K88 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 45,
  "slot-setter"
};

static _KLsimple_object_vectorGVKd_1 K89 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &K90
};

static _KLunionGVKe K90 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K17,
  &KLfunction_objectGVenvironment_protocols
};

static _KLsignatureAvaluesGVKi K91 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K55,
  &K89
};

_KLincremental_generic_functionGVKe Kslot_getterVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K87,
  &KPfalseVKi,
  &K96,
  &K95,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Kslot_getterVenvironment_protocolsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K91,
  &Kslot_getterVenvironment_protocolsMM0I
};

static _KLpairGVKd K95 = {
  &KLpairGVKdW /* wrapper */,
  &Kslot_getterVenvironment_protocolsMM0,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_11 K96 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 45,
  "slot-getter"
};

_KLincremental_generic_functionGVKe Kslot_classVenvironment_protocols = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K101,
  &KPfalseVKi,
  &K102,
  &K100,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kenvironment_protocols_moduleYdylan_userVenvironment_protocols,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Kslot_classVenvironment_protocolsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K104,
  &Kslot_classVenvironment_protocolsMM0I
};

static _KLpairGVKd K100 = {
  &KLpairGVKdW /* wrapper */,
  &Kslot_classVenvironment_protocolsMM0,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K101 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K52,
  &K103
};

static _KLbyte_stringGVKd_10 K102 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 41,
  "slot-class"
};

static _KLsimple_object_vectorGVKd_1 K103 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 5,
  &KLclass_objectGVenvironment_protocols
};

static _KLsignatureAvaluesGVKi K104 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K55,
  &K103
};

/* Code */

D Kenvironment_object_type_nameVenvironment_protocolsMM36I (D object_) {
  D T2_0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:140
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:142
  T2_0 = &K57;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:140
  MV_SET_COUNT(1);
  return(T2_0);
}

D Kenvironment_object_typeVenvironment_protocolsMM3I (D server_, D object_) {
  D T3_0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:134
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:137
  CONGRUENT_CALL_PROLOG(&Kslot_typeVenvironment_protocols, 2);
  T3_0 = CONGRUENT_CALL2(server_, object_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:134
  MV_SET_COUNT(1);
  return(T3_0);
}

D KLslot_objectGZ32ZconstructorVenvironment_protocolsMM0I (D class_, D init_args_, D Uunique_Pprimitive_name_, D Uunique_compiler_object_proxy_, D Uunique_application_object_proxy_) {
  D T6;
  D Uunique_compiler_object_proxyF7;
  D T8;
  D Uunique_Pprimitive_nameF9;
  D T10_0;
  D T11;
  _KLsimple_object_vectorGVKd_1 T12 = {&KLsimple_object_vectorGVKdW, (D) 5};
  D T13;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:11
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:11
  T11 = primitive_idQ(Uunique_compiler_object_proxy_,&KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:11
  if (T11 != &KPfalseVKi) {
    T12.vector_element_[0] = IKJcompiler_object_proxy_;
    T13 = KerrorVKdMM1I(&K14, &T12);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:11
    T6 = T13;
    Uunique_compiler_object_proxyF7 = T6;
  } else {
    Uunique_compiler_object_proxyF7 = Uunique_compiler_object_proxy_;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:11
  T8 = primitive_object_allocate_filled(4,&KLslot_objectGVenvironment_protocolsW,3,&KPunboundVKi,0,0,&KPunboundVKi);
  primitive_type_check(Uunique_Pprimitive_name_, &K15);
  Uunique_Pprimitive_nameF9 = Uunique_Pprimitive_name_;
  SLOT_VALUE_SETTER(Uunique_Pprimitive_nameF9, T8, 0);
  SLOT_VALUE_SETTER(Uunique_compiler_object_proxyF7, T8, 1);
  SLOT_VALUE_SETTER(Uunique_application_object_proxy_, T8, 2);
  MEP_APPLY2(&KinitializeVKdMenvironment_protocolsM0, &K16, T8, init_args_);
  T10_0 = T8;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:11
  MV_SET_COUNT(1);
  return(T10_0);
}

D Kuser_object_slot_valueVenvironment_protocolsMM0I (D server_, D object_, D slot_, D Urest_, D repeated_element_) {
  D T6_0;
  D T7_0;
  D T8_0;
  D T9;
  D T10;
  _KLsimple_object_vectorGVKd_2 T11 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:145
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:150
  T10 = SLOT_VALUE_INITD(server_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:151
  if (T10 != &KPfalseVKi) {
    T9 = T10;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:152
    T11.vector_element_[0] = IKJrepeated_element_;
    T11.vector_element_[1] = repeated_element_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:152
    CONGRUENT_CALL_PROLOG(&Kuser_object_slot_valueVenvironment_protocols, 4);
    T6_0 = CONGRUENT_CALL4(T9, object_, slot_, &T11);
    T8_0 = T6_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:151
    T7_0 = &KPfalseVKi;
    T8_0 = T7_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:151
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:145
  MV_SET_COUNT(1);
  return(T8_0);
}

D Kuser_object_slot_valueVenvironment_protocolsMM1I (D server_, D object_, D slot_, D Urest_, D repeated_element_) {
  D T6_0;
  D T7_0;
  D T8_0;
  D T9;
  D T10;
  _KLsimple_object_vectorGVKd_2 T11 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:156
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:161
  T10 = SLOT_VALUE_INITD(server_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:162
  if (T10 != &KPfalseVKi) {
    T9 = T10;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:163
    T11.vector_element_[0] = IKJrepeated_element_;
    T11.vector_element_[1] = repeated_element_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:163
    CONGRUENT_CALL_PROLOG(&Kuser_object_slot_valueVenvironment_protocols, 4);
    T6_0 = CONGRUENT_CALL4(T9, object_, slot_, &T11);
    T8_0 = T6_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:162
    T7_0 = &KPfalseVKi;
    T8_0 = T7_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:162
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:156
  MV_SET_COUNT(1);
  return(T8_0);
}

D Kslot_typeVenvironment_protocolsMM0I (D project_, D slot_) {
  D T3_0;
  D server_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:85
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:88
  server_ = Kchoose_serverVenvironment_protocolsMM2I(project_, slot_, &KPempty_vectorVKi, &KPtrueVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:89
  T3_0 = CALL2(&Kslot_typeVenvironment_protocols, server_, slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:85
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kslot_allocationVenvironment_protocolsMM0I (D project_, D slot_) {
  D T3_0;
  D server_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:124
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:127
  server_ = Kchoose_serverVenvironment_protocolsMM2I(project_, slot_, &KPempty_vectorVKi, &KPtrueVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:128
  T3_0 = CALL2(&Kslot_allocationVenvironment_protocols, server_, slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:124
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kslot_init_keywordVenvironment_protocolsMM0I (D project_, D slot_) {
  D T3_0;
  D T3_1;
  D server_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:117
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:120
  server_ = Kchoose_serverVenvironment_protocolsMM2I(project_, slot_, &KPempty_vectorVKi, &KPtrueVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:121
  T3_0 = CALL2(&Kslot_init_keywordVenvironment_protocols, server_, slot_);
  T3_1 = MV_GET_ELT(1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:117
  MV_SET_ELT(1, T3_1);
  MV_SET_COUNT(2);
  return(T3_0);
}

D Kslot_init_kindVenvironment_protocolsMM0I (D project_, D slot_) {
  D T3_0;
  D server_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:110
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:113
  server_ = Kchoose_serverVenvironment_protocolsMM2I(project_, slot_, &KPempty_vectorVKi, &KPtrueVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:114
  T3_0 = CALL2(&Kslot_init_kindVenvironment_protocols, server_, slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:110
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kslot_setterVenvironment_protocolsMM0I (D project_, D slot_) {
  D T3_0;
  D server_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:78
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:81
  server_ = Kchoose_serverVenvironment_protocolsMM2I(project_, slot_, &KPempty_vectorVKi, &KPtrueVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:82
  T3_0 = CALL2(&Kslot_setterVenvironment_protocols, server_, slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:78
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kslot_getterVenvironment_protocolsMM0I (D project_, D slot_) {
  D T3_0;
  D server_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:71
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:74
  server_ = Kchoose_serverVenvironment_protocolsMM2I(project_, slot_, &KPempty_vectorVKi, &KPtrueVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:75
  T3_0 = CALL2(&Kslot_getterVenvironment_protocols, server_, slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:71
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kslot_classVenvironment_protocolsMM0I (D project_, D slot_) {
  D T3_0;
  D server_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:64
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:67
  server_ = Kchoose_serverVenvironment_protocolsMM2I(project_, slot_, &KPempty_vectorVKi, &KPtrueVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:68
  T3_0 = CALL2(&Kslot_classVenvironment_protocols, server_, slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/protocols/slot-objects.dylan:64
  MV_SET_COUNT(1);
  return(T3_0);
}


/* SYSTEM INIT CODE */

void _Init_environment_protocols__X_slot_objects_for_system () {
  extern D KPresolve_symbolVKiI(D);
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJcompiler_object_proxy_);
    if (T0 != &KJcompiler_object_proxy_) {
      primitive_repeated_slot_value_setter(T0, &K23, 1, 1);
      primitive_repeated_slot_value_setter(T0, &K20, 1, 2);
      IKJcompiler_object_proxy_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJapplication_object_proxy_);
    if (T0 != &KJapplication_object_proxy_) {
      primitive_repeated_slot_value_setter(T0, &K23, 1, 2);
      primitive_repeated_slot_value_setter(T0, &K20, 1, 4);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJrepeated_element_);
    if (T0 != &KJrepeated_element_) {
      IKJrepeated_element_ = T0;
      primitive_repeated_slot_value_setter(T0, &K42, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K35, 1, 0);
    }
  }
  return;
}

/* USER INIT CODE */

void _Init_environment_protocols__X_slot_objects_for_user () {
  return;
}


/* eof */
