#include "run-time.h"

/* Typedefs for referenced classes */

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 instanceQ_iep_;
  D debug_name_;
  D class_implementation_class_;
  D class_subtype_bit_;
  D class_module_;
} _KLfunction_classGVKi;

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;
  D namespace_name_;
  D library_major_version_;
  D library_minor_version_;
  D library_build_count_;
  D used_libraries_;
  D all_used_libraries_;
  D runtime_module_;
  D library_defined_generics_;
  D library_number_static_dispatches_;
  D library_number_dynamic_dispatches_;
} _KLlibraryGVKe;

typedef struct {
  D wrapper;
} _KLbooleanGVKd;

#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(7);
define__KLsimple_object_vectorGVKd(2);
define__KLsimple_object_vectorGVKd(1);
define__KLsimple_object_vectorGVKd(256);
define__KLsimple_object_vectorGVKd(3);
define__KLsimple_object_vectorGVKd(0);
define__KLsimple_object_vectorGVKd(4);

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

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

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

typedef struct {
  D wrapper;
} _KLobjectGVKd;

typedef struct {
  D wrapper;
} _KLunboundGVKe;

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

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

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

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

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

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

typedef struct {
  D wrapper;
  D Pprimitive_name_;
  D server_project_;
  D compiler_object_table_;
  D dfmc_database_proxy_;
  D module_name_proxies_;
} _KLdfmc_databaseGVdfmc_environment_database;

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

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

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

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

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

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

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

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

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

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

typedef struct {
  D wrapper;
  D private_shadowable_form_init_method_;
  D private_shadowable_form_system_init_method_;
  D shadowable_form_properties_flags_;
  D private_shadowable_form_model_;
  D form_compilation_record_;
  D private_form_source_location_;
  D private_form_parent_form_;
  D form_sequence_number_;
  D private_form_dependencies_;
  D private_form_referenced_variables_;
  D private_form_adjectives_;
  D private_form_variable_name_or_names_;
  D form_properties_;
  D private_form_signature_;
  D private_form_body_;
  D private_form_class_;
  D private_form_signature_and_body_fragment_;
} _KLmethod_definitionGVdfmc_definitions;

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

typedef struct {
  D wrapper;
} _KLsequenceGVKd;

typedef struct {
  D wrapper;
} _KLvariable_nameGVdfmc_common;

typedef struct {
  D wrapper;
  D private_shadowable_form_init_method_;
  D private_shadowable_form_system_init_method_;
  D shadowable_form_properties_flags_;
  D form_compilation_record_;
  D private_form_source_location_;
  D private_form_parent_form_;
  D form_sequence_number_;
  D private_form_dependencies_;
  D private_form_referenced_variables_;
  D private_form_adjectives_;
  D private_form_variable_name_or_names_;
  D form_properties_;
  D private_form_superclass_expressions_;
  D private_form_slot_specs_;
  D private_form_inherited_slot_specs_;
  D private_form_keyword_specs_;
  D private_form_metaclass_spec_;
} _KLclass_definitionGVdfmc_definitions;

typedef struct {
  D wrapper;
  D properties_;
  D engine_node_callback_;
  D engine_node_entry_point_;
  D cache_header_engine_node_next_;
  D cache_header_engine_node_parent_;
} _KLsimple_typechecked_cache_header_engine_nodeGVKg;

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

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

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

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(6);
define__KLbyte_stringGVKd(10);

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

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

typedef struct {
  D wrapper;
  D stretchy_representation_;
} _KLstretchy_object_vectorGVKe;


/* Typedefs for defined classes */


/* Referenced object declarations */

D KPadd_a_methodVKnI (D, D, D, D, D, D);
extern _KLincremental_generic_functionGVKe Kdo_direct_subclassesVenvironment_protocols;
extern _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLlibraryGVKe Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database;
extern _KLclassGVKd KLlibraryGVKe;
extern _KLmm_wrapperGVKi_0 KLlibraryGVKeW;
extern _KLbooleanGVKd KPfalseVKi;
extern _KLclassGVKd KLbooleanGVKd;
extern _KLmm_wrapperGVKi_0 KLbooleanGVKdW;
extern _KLbooleanGVKd KPtrueVKi;
extern _KLincremental_generic_functionGVKe Kdo_direct_superclassesVenvironment_protocols;
extern _KLincremental_generic_functionGVKe Kdo_direct_methodsVenvironment_protocols;
extern _KLincremental_generic_functionGVKe Kdo_all_methodsVenvironment_protocols;
extern _KLincremental_generic_functionGVKe Kdo_direct_slotsVenvironment_protocols;
extern _KLincremental_generic_functionGVKe Kdo_all_superclassesVenvironment_protocols;
extern _KLincremental_generic_functionGVKe Kdo_all_slotsVenvironment_protocols;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLsymbolGVKd KJname_;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
D KmakeVKdMenvironment_protocolsM0I (D, D);
extern _KLclassGVKd KLdefinition_idGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLdefinition_idGVenvironment_protocolsW;
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLincremental_generic_functionGVKe Kdo_init_keywordsVenvironment_protocols;
extern _KLincremental_generic_functionGVKe Kapplication_object_classVenvironment_protocols;
extern _KLincremental_generic_functionGVKe Kdo_macro_call_source_formsVenvironment_protocols;
extern _KLclassGVKd KLobjectGVKd;
extern _KLmm_wrapperGVKi_0 KLobjectGVKdW;
extern _KLunboundGVKe KPunboundVKi;
extern _KLclassGVKd KLunboundGVKe;
extern _KLmm_wrapperGVKi_0 KLunboundGVKeW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
D Kslot_getterVenvironment_protocolsMdfmc_environment_databaseM0I (D server_, D slot_);
D Kslot_setterVenvironment_protocolsMdfmc_environment_databaseM0I (D server_, D slot_);
extern _KLclassGVKd KLfunction_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLfunction_objectGVenvironment_protocolsW;
extern _KLfunction_classGVKi KLsimple_closure_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLsimple_closure_methodGVKiW;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLclassGVKd KLslot_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLslot_objectGVenvironment_protocolsW;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLclassGVKd KLfunctionGVKd;
extern _KLmm_wrapperGVKi_0 KLfunctionGVKdW;
extern _KLclassGVKd KLdfmc_databaseGVdfmc_environment_database;
extern _KLmm_wrapperGVKi_0 KLdfmc_databaseGVdfmc_environment_databaseW;
extern _KLclassGVKd KLclass_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLclass_objectGVenvironment_protocolsW;
extern _KLincremental_generic_functionGVKe Kfind_environment_objectVenvironment_protocols;
extern _KLclassGVKd KLunionGVKe;
extern _KLmm_wrapperGVKi_0 KLunionGVKeW;
D Kunion_instanceQVKiI (D, D);
extern _KLclassGVKd KLsingletonGVKd;
extern _KLmm_wrapperGVKi_0 KLsingletonGVKdW;
D Ksingleton_pointer_idQ_instanceQVKiI (D, D);
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
extern _KLclassGVKd KLgeneric_function_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLgeneric_function_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLmethod_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLmethod_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLapplication_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLapplication_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLenvironment_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLenvironment_objectGVenvironment_protocolsW;
extern _KLclassGVKd KLtop_level_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLtop_level_formGVdfmc_commonW;
D Ksource_form_variableVdfmc_environment_databaseMM0I (D);
D Kbrowsing_contextVdfmc_environment_databaseMM0I (D, D);
D Kcollect_from_all_client_contextsVdfmc_environment_databaseMM0I (D, D, D, D, D);
extern _KLsimple_methodGVKe Kvariable_active_method_definitionsYdfmc_derived_informationVdfmc_browser_support;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_1VKi;
extern _KLclassGVKd KLobject_signatureGVKe;
extern _KLmm_wrapperGVKi_0 KLobject_signatureGVKeW;
extern _KLsimple_methodGVKe Kclass_definition_init_keywordsYdfmc_derived_informationVdfmc_browser_support;
extern _KLsimple_methodGVKe Kform_slot_specsVdfmc_definitionsMM0;
extern _KLincremental_generic_functionGVKe Kforward_iteration_protocolVKd;
extern _KLsimple_methodGVKe Kslot_definition_keywordYdfmc_derived_informationVdfmc_browser_support;
extern _KLsimple_methodGVKe Kslot_definition_typeYdfmc_derived_informationVdfmc_browser_support;
extern _KLclassGVKd KLmethod_definitionGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLmethod_definitionGVdfmc_definitionsW;
D Kfunctional_parameter_typesYdfmc_derived_informationVdfmc_browser_supportI (D);
extern _KLincremental_generic_functionGVKe KemptyQVKd;
extern _KLincremental_generic_functionGVKe KelementVKd;
D Kfunctional_keysYdfmc_derived_informationVdfmc_browser_supportI (D);
extern _KLsealed_generic_functionGVKe KmapVKd;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
D Kmake_environment_objectVenvironment_protocolsMM2I (D, D, D, D, D, D, D);
extern _KLclassGVKd KLsequenceGVKd;
extern _KLmm_wrapperGVKi_0 KLsequenceGVKdW;
extern _KLclassGVKd KLvariable_nameGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLvariable_nameGVdfmc_commonW;
extern _KLsimple_methodGVKe Kvariable_active_definitionYdfmc_derived_informationVdfmc_browser_support;
extern _KLsimple_object_vectorGVKd_256 KDsignature_LobjectG_typesVKi;
extern _KLclassGVKd KLclass_definitionGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLclass_definitionGVdfmc_definitionsW;
extern _KLsealed_generic_functionGVKe Kmake_environment_object_for_source_formVdfmc_environment_database;
extern _KLsimple_methodGVKe Kmake_environment_object_for_type_expressionVdfmc_environment_database;
extern _KLclassGVKd KLsimple_typechecked_cache_header_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLsimple_typechecked_cache_header_engine_nodeGVKgW;
extern _KLabsent_engine_nodeGVKg RSINGULAR_Labsent_engine_nodeG;
extern _KLclassGVKd KLabsent_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLabsent_engine_nodeGVKgW;
extern _KLclassGVKd KLdefinition_objectGVenvironment_protocols;
extern _KLmm_wrapperGVKi_0 KLdefinition_objectGVenvironment_protocolsW;
extern _KLfunction_classGVKi KLkeyword_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_methodGVKeW;
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLclassGVKd KLkeyword_signatureGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_signatureGVKeW;
extern _KLclassGVKd KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLkeyword_methodGVKe KmakeVKdMM48;
extern _KLsealed_generic_functionGVKe Kclass_all_slot_definitionsYdfmc_derived_informationVdfmc_browser_support;
extern _KLsealed_generic_functionGVKe KdoVKd;
extern _KLobject_signatureGVKe KDsignature_LobjectG_no_rest_value_1VKi;
D KLstretchy_object_vectorGZ32ZconstructorVKiMM0I (D, D);
extern _KLclassGVKd KLstretchy_object_vectorGVKe;
extern _KLmm_wrapperGVKi_0 KLstretchy_object_vectorGVKeW;
extern _KLincremental_generic_functionGVKe Kremove_duplicatesVKd;
D KaddXVKdMM3I (D, D);
extern _KLsealed_generic_functionGVKe Kclass_direct_method_definitionsYdfmc_derived_informationVdfmc_browser_support;
D Kclass_definition_superclass_typesYdfmc_derived_informationVdfmc_browser_supportI (D);
extern _KLsealed_generic_functionGVKe Kclass_direct_subclass_definitionsYdfmc_derived_informationVdfmc_browser_support;
extern D Ddylan_module_idVenvironment_protocols;
extern D DLgeneric_functionG_idVenvironment_protocols;
extern D DLmethodG_idVenvironment_protocols;
extern D DLclassG_idVenvironment_protocols;
extern D DLobjectG_idVenvironment_protocols;

/* Defined object declarations */

extern _KLkeyword_methodGVKe Kdo_direct_subclassesVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_direct_subclassesVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D);
extern _KLkeyword_methodGVKe Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D);
extern _KLkeyword_methodGVKe Kdo_direct_methodsVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_direct_methodsVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D);
extern _KLkeyword_methodGVKe Kdo_all_methodsVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_all_methodsVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D);
extern _KLkeyword_methodGVKe Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D);
extern _KLkeyword_methodGVKe Kdo_all_superclassesVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_all_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D);
extern _KLkeyword_methodGVKe Kdo_all_slotsVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_all_slotsVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D);
static _KLbyte_stringGVKd_10 K22;
static _KLsymbolGVKd KJmodule_;
static _KLpairGVKd K24;
extern _KLkeyword_methodGVKe Kdo_init_keywordsVenvironment_protocolsMdfmc_environment_databaseM0;
D Kdo_init_keywordsVenvironment_protocolsMdfmc_environment_databaseM0I (D, D, D, D, D, D);
extern _KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM0;
D Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM0I (D, D);
extern _KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM1;
D Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM1I (D, D);
extern _KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM2;
D Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM2I (D, D);
extern _KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM3;
D Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM3I (D, D);
extern _KLsimple_methodGVKe Kdo_macro_call_source_formsVenvironment_protocolsMdfmc_environment_databaseM2;
D Kdo_macro_call_source_formsVenvironment_protocolsMdfmc_environment_databaseM2I (D, D, D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_macro_call_source_formsF45;
static D Kanonymous_of_do_macro_call_source_formsF45I (D);
static _KLsignatureGVKe K46;
static _KLsimple_object_vectorGVKd_1 K47;
static _KLsignatureGVKe K48;
static _KLsimple_object_vectorGVKd_3 K49;
static _KLunionGVKe K50;
static _KLsingletonGVKd K51;
static _KLsignatureAvaluesGVKi K52;
static _KLsimple_object_vectorGVKd_2 K53;
static _KLsimple_object_vectorGVKd_1 K54;
static _KLsignatureAvaluesGVKi K55;
static _KLsimple_object_vectorGVKd_2 K56;
static _KLsignatureAvaluesGVKi K57;
static _KLsimple_object_vectorGVKd_2 K58;
static _KLsignatureAvaluesGVKi K59;
static _KLsimple_object_vectorGVKd_2 K60;
static _KLsimple_closure_methodGVKi_0 Kdo_keywordF88;
static D Kdo_keywordF88I (D, D, D, D, D, D, D);
static _KLsimple_closure_methodGVKi_0 Kdo_class_keywordsF75;
static D Kdo_class_keywordsF75I (D);
D Kall_initialize_methodsVdfmc_environment_databaseMM0I (D);
D Kdo_class_and_superclassesVdfmc_environment_databaseMM0I (D, D, D, D, D, D);
static _KLsimple_closure_methodGVKi_0 Kdo_classF69;
static D Kdo_classF69I (D);
static _KLsignatureGVKe K70;
static _KLsimple_object_vectorGVKd_1 K71;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_all_initialize_methodsF74;
static D Kanonymous_of_all_initialize_methodsF74I (D);
extern _KLsimple_methodGVKe Kinitialize_keywords_for_classVdfmc_environment_databaseMM0;
D Kinitialize_keywords_for_classVdfmc_environment_databaseMM0I (D, D, D);
static _KLsimple_closure_methodGVKi_0 Ktype_definitionF81;
static D Ktype_definitionF81I (D);
static _KLunionGVKe K80;
static _KLsignatureGVKe K82;
static _KLsignatureAvaluesGVKi K83;
static _KLsimple_object_vectorGVKd_3 K84;
static _KLsimple_object_vectorGVKd_3 K85;
static _KLsignatureGVKe K86;
static _KLsimple_object_vectorGVKd_1 K87;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K89;
static _KLsignatureGVKe K90;
static _KLsimple_object_vectorGVKd_7 K91;
static _KLunionGVKe K92;
static _KLkeyword_signatureGVKe K93;
static _KLsimple_object_vectorGVKd_4 K94;
static _KLsymbolGVKd KJclient_;
static _KLsymbolGVKd KJinheritedQ_;
static _KLbyte_stringGVKd_10 K97;
static _KLbyte_stringGVKd_6 K98;
static _KLsimple_object_vectorGVKd_2 K99;
static _KLsimple_object_vectorGVKd_2 K100;
static _KLbyte_stringGVKd_6 K101;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_all_slotsF107;
static D Kanonymous_of_do_all_slotsF107I (D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_all_slotsF106;
static D Kanonymous_of_do_all_slotsF106I (D);
static _KLkeyword_signatureGVKe K108;
static _KLsimple_object_vectorGVKd_2 K109;
static _KLsimple_object_vectorGVKd_1 K110;
D Kclass_all_superclassesVdfmc_environment_databaseI (D, D);
static _KLsimple_closure_methodGVKi_0 Kdo_superclassesF114;
static D Kdo_superclassesF114I (D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_slotsF117;
static D Kanonymous_of_do_direct_slotsF117I (D);
static _KLsimple_closure_methodGVKi_0 Kdo_methodsF120;
static D Kdo_methodsF120I (D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_all_methodsF123;
static D Kanonymous_of_do_all_methodsF123I (D);
static _KLsignatureGVKe K124;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_methodsF127;
static D Kanonymous_of_do_direct_methodsF127I (D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_superclassesF130;
static D Kanonymous_of_do_direct_superclassesF130I (D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_subclassesF134;
static D Kanonymous_of_do_direct_subclassesF134I (D);
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K133;

/* Indirection variables */

static D IKJmodule_ = &KJmodule_;
static D IKJclient_ = &KJclient_;
static D IKJinheritedQ_ = &KJinheritedQ_;

/* Variables */

D Dinitialize_idVdfmc_environment_database = &KPunboundVKi;

/* Objects */

_KLkeyword_methodGVKe Kdo_direct_subclassesVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kdo_direct_subclassesVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K109
};

_KLkeyword_methodGVKe Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K109
};

_KLkeyword_methodGVKe Kdo_direct_methodsVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kdo_direct_methodsVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K109
};

_KLkeyword_methodGVKe Kdo_all_methodsVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kdo_all_methodsVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K109
};

_KLkeyword_methodGVKe Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K109
};

_KLkeyword_methodGVKe Kdo_all_superclassesVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kdo_all_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K109
};

_KLkeyword_methodGVKe Kdo_all_slotsVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kdo_all_slotsVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K109
};

static _KLbyte_stringGVKd_10 K22 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 41,
  "initialize"
};

static _KLsymbolGVKd KJmodule_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K101
};

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

_KLkeyword_methodGVKe Kdo_init_keywordsVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_6,
  &K93,
  &key_mep_6,
  &Kdo_init_keywordsVenvironment_protocolsMdfmc_environment_databaseM0I,
  &K94
};

_KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K59,
  &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM0I
};

_KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K57,
  &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM1I
};

_KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM2 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K55,
  &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM2I
};

_KLsimple_methodGVKe Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM3 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K52,
  &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM3I
};

_KLsimple_methodGVKe Kdo_macro_call_source_formsVenvironment_protocolsMdfmc_environment_databaseM2 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_3,
  &K48,
  &Kdo_macro_call_source_formsVenvironment_protocolsMdfmc_environment_databaseM2I
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_macro_call_source_formsF45 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &K46,
  &Kanonymous_of_do_macro_call_source_formsF45I,
  (D) 1
};

static _KLsignatureGVKe K46 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040197,
  &K47
};

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

static _KLsignatureGVKe K48 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 41943053,
  &K49
};

static _KLsimple_object_vectorGVKd_3 K49 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLfunctionGVKd,
  &KLdfmc_databaseGVdfmc_environment_database,
  &KLclass_objectGVenvironment_protocols
};

static _KLunionGVKe K50 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K51,
  &KLclass_objectGVenvironment_protocols
};

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

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

static _KLsimple_object_vectorGVKd_2 K53 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLdfmc_databaseGVdfmc_environment_database,
  &KLgeneric_function_objectGVenvironment_protocols
};

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

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

static _KLsimple_object_vectorGVKd_2 K56 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLdfmc_databaseGVdfmc_environment_database,
  &KLmethod_objectGVenvironment_protocols
};

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

static _KLsimple_object_vectorGVKd_2 K58 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLdfmc_databaseGVdfmc_environment_database,
  &KLclass_objectGVenvironment_protocols
};

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

static _KLsimple_object_vectorGVKd_2 K60 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLdfmc_databaseGVdfmc_environment_database,
  &KLapplication_objectGVenvironment_protocols
};

static _KLsimple_closure_methodGVKi_0 Kdo_keywordF88 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_7,
  &K90,
  &Kdo_keywordF88I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kdo_class_keywordsF75 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &K86,
  &Kdo_class_keywordsF75I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kdo_classF69 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &K70,
  &Kdo_classF69I,
  (D) 1
};

static _KLsignatureGVKe K70 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040197,
  &K71
};

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

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_all_initialize_methodsF74 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kanonymous_of_all_initialize_methodsF74I,
  (D) 1
};

_KLsimple_methodGVKe Kinitialize_keywords_for_classVdfmc_environment_databaseMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_3,
  &K83,
  &Kinitialize_keywords_for_classVdfmc_environment_databaseMM0I
};

static _KLsimple_closure_methodGVKi_0 Ktype_definitionF81 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &K82,
  &Ktype_definitionF81I,
  (D) 1
};

static _KLunionGVKe K80 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K51,
  &KLmethod_objectGVenvironment_protocols
};

static _KLsignatureGVKe K82 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 41944069,
  &KDsignature_LobjectG_typesVKi
};

static _KLsignatureAvaluesGVKi K83 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33557517,
  &K84,
  &K85
};

static _KLsimple_object_vectorGVKd_3 K84 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLdfmc_databaseGVdfmc_environment_database,
  &KLclass_definitionGVdfmc_definitions,
  &KLsequenceGVKd
};

static _KLsimple_object_vectorGVKd_3 K85 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &K80,
  &KLsequenceGVKd,
  &KLsequenceGVKd
};

static _KLsignatureGVKe K86 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040197,
  &K87
};

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

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K89 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kmake_environment_object_for_source_formVdfmc_environment_database
};

static _KLsignatureGVKe K90 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040221,
  &K91
};

static _KLsimple_object_vectorGVKd_7 K91 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 29,
  &KLobjectGVKd,
  &KLobjectGVKd,
  &K92,
  &KLsymbolGVKd,
  &KLobjectGVKd,
  &KLbooleanGVKd,
  &KLbooleanGVKd
};

static _KLunionGVKe K92 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K51,
  &KLdefinition_objectGVenvironment_protocols
};

static _KLkeyword_signatureGVKe K93 = {
  &KLkeyword_signatureGVKeW /* wrapper */,
  (D) 42205197,
  &K49,
  &K99,
  &K100
};

static _KLsimple_object_vectorGVKd_4 K94 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 17,
  &KJclient_,
  &KPfalseVKi,
  &KJinheritedQ_,
  &KPtrueVKi
};

static _KLsymbolGVKd KJclient_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K98
};

static _KLsymbolGVKd KJinheritedQ_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K97
};

static _KLbyte_stringGVKd_10 K97 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 41,
  "inherited?"
};

static _KLbyte_stringGVKd_6 K98 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 25,
  "client"
};

static _KLsimple_object_vectorGVKd_2 K99 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KJclient_,
  &KJinheritedQ_
};

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

static _KLbyte_stringGVKd_6 K101 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 25,
  "module"
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_all_slotsF107 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_no_rest_value_1VKi,
  &Kanonymous_of_do_all_slotsF107I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_all_slotsF106 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &K86,
  &Kanonymous_of_do_all_slotsF106I,
  (D) 1
};

static _KLkeyword_signatureGVKe K108 = {
  &KLkeyword_signatureGVKeW /* wrapper */,
  (D) 42205197,
  &K49,
  &K110,
  &KDsignature_LobjectG_typesVKi
};

static _KLsimple_object_vectorGVKd_2 K109 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KJclient_,
  &KPfalseVKi
};

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

static _KLsimple_closure_methodGVKi_0 Kdo_superclassesF114 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &K70,
  &Kdo_superclassesF114I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_slotsF117 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_no_rest_value_1VKi,
  &Kanonymous_of_do_direct_slotsF117I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kdo_methodsF120 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &K124,
  &Kdo_methodsF120I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_all_methodsF123 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kanonymous_of_do_all_methodsF123I,
  (D) 1
};

static _KLsignatureGVKe K124 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 41943045,
  &K87
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_methodsF127 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kanonymous_of_do_direct_methodsF127I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_superclassesF130 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_no_rest_value_1VKi,
  &Kanonymous_of_do_direct_superclassesF130I,
  (D) 1
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_do_direct_subclassesF134 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kanonymous_of_do_direct_subclassesF134I,
  (D) 1
};

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K133 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 65593,
  &KPfalseVKi,
  &cache_header_engine_2,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kmake_environment_object_for_source_formVdfmc_environment_database
};

/* Code */

D Kdo_direct_subclassesVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D class_, D Urest_, D client_) {
  D class_definition_;
  D T7;
  D direct_subclasses_;
  D T9;
  D T10;
  D context_;
  D T12;
  DWORD T13T, T13;
  D T14;
  DWORD T15;
  D T16;
  D T17;
  D environment_subclass_;
  DWORD T19;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:11
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:15
  T9 = SLOT_VALUE_INITD(server_, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:16
  T10 = SLOT_VALUE_INITD(class_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:16
  primitive_type_check(T10, &KLclass_definitionGVdfmc_definitions);
  class_definition_ = T10;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:17
  context_ = Kbrowsing_contextVdfmc_environment_databaseMM0I(server_, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:20
  T7 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_direct_subclassesF134, 1, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:19
  direct_subclasses_ = Kcollect_from_all_client_contextsVdfmc_environment_databaseMM0I(T7, server_, context_, &KPempty_vectorVKi, &KPtrueVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
  T14 = SLOT_VALUE_INITD(direct_subclasses_, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
  T15 = primitive_cast_integer_as_raw(T14);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
  T13T = 1;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
    T13 = T13T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
    T16 = primitive_machine_word_equalQ(T13,T15);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
    if (T16 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
      T17 = REPEATED_D_SLOT_VALUE_TAGGED(direct_subclasses_, 1, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:26
      ENGINE_NODE_CALL_PROLOG(&Kmake_environment_object_for_source_formVdfmc_environment_database, &K133, 2);
      environment_subclass_ = ENGINE_NODE_CALL2(&K133, T9, T17);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:27
      CALL1(function_, environment_subclass_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
      T19 = primitive_machine_word_add_signal_overflow(T13,4);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
      T13T = T19;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:24
  T12 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:11
  MV_SET_COUNT(0);
  return(T12);
}

D Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D class_, D Urest_, D client_) {
  D class_definition_;
  D direct_superclasses_;
  D T8;
  D T9;
  D T10;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:32
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:37
  T10 = SLOT_VALUE_INITD(class_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:37
  primitive_type_check(T10, &KLclass_definitionGVdfmc_definitions);
  class_definition_ = T10;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:38
  Kbrowsing_contextVdfmc_environment_databaseMM0I(server_, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:39
  direct_superclasses_ = Kclass_definition_superclass_typesYdfmc_derived_informationVdfmc_browser_supportI(class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:40
  T8 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_direct_superclassesF130, 2, server_, function_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:40
  T9 = CALL2(&KdoVKd, T8, direct_superclasses_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:32
  MV_SET_COUNT(0);
  return(T9);
}

D Kdo_direct_methodsVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D class_, D Urest_, D client_) {
  D class_definition_;
  D T7;
  D direct_methods_;
  D T9;
  D T10;
  D context_;
  D T12;
  DWORD T13T, T13;
  D T14;
  DWORD T15;
  D T16;
  D T17;
  D environment_method_;
  DWORD T19;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:47
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:51
  T9 = SLOT_VALUE_INITD(server_, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:52
  T10 = SLOT_VALUE_INITD(class_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:52
  primitive_type_check(T10, &KLclass_definitionGVdfmc_definitions);
  class_definition_ = T10;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:53
  context_ = Kbrowsing_contextVdfmc_environment_databaseMM0I(server_, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:56
  T7 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_direct_methodsF127, 1, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:55
  direct_methods_ = Kcollect_from_all_client_contextsVdfmc_environment_databaseMM0I(T7, server_, context_, &KPempty_vectorVKi, &KPtrueVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
  T14 = SLOT_VALUE_INITD(direct_methods_, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
  T15 = primitive_cast_integer_as_raw(T14);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
  T13T = 1;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
    T13 = T13T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
    T16 = primitive_machine_word_equalQ(T13,T15);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
    if (T16 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
      T17 = REPEATED_D_SLOT_VALUE_TAGGED(direct_methods_, 1, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:62
      environment_method_ = Kmake_environment_objectVenvironment_protocolsMM2I(&KLmethod_objectGVenvironment_protocols, &KPempty_vectorVKi, T9, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi, T17);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:65
      CALL1(function_, environment_method_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
      T19 = primitive_machine_word_add_signal_overflow(T13,4);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
      T13T = T19;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:60
  T12 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:47
  MV_SET_COUNT(0);
  return(T12);
}

D Kdo_all_methodsVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D class_, D Urest_, D client_) {
  D T6;
  D object_;
  D T8;
  D T9;
  D T10;
  D T11;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:87
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:91
  T10 = SLOT_VALUE_INITD(server_, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:92
  T6 = MAKE_CLOSURE_INITD(&Kdo_methodsF120, 3, T10, server_, function_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:112
  object_ = CALL2(&Kfind_environment_objectVenvironment_protocols, server_, DLobjectG_idVenvironment_protocols);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:118
  T11 = primitive_idQ(class_,object_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:118
  if (T11 != &KPfalseVKi) {
    T8 = &KPfalseVKi;
  } else {
    T8 = object_;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:118
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:115
  T9 = Kdo_class_and_superclassesVdfmc_environment_databaseMM0I(T6, server_, class_, &KPempty_vectorVKi, &KPfalseVKi, T8);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:87
  MV_SET_COUNT(0);
  return(T9);
}

D Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D class_, D Urest_, D client_) {
  D direct_slots_;
  D T7;
  D T8;
  D T9;
  D T10;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:123
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:127
  T9 = SLOT_VALUE_INITD(server_, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:128
  T10 = SLOT_VALUE_INITD(class_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:129
  direct_slots_ = CALL1(&Kform_slot_specsVdfmc_definitionsMM0, T10);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:130
  T7 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_direct_slotsF117, 2, T9, function_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:130
  T8 = CALL2(&KdoVKd, T7, direct_slots_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:123
  MV_SET_COUNT(0);
  return(T8);
}

D Kdo_all_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D class_, D Urest_, D client_) {
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14T, T14;
  D T15;
  D T16;
  D T17;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:158
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T6 = Kclass_all_superclassesVdfmc_environment_databaseI(server_, class_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  CONGRUENT_CALL_PROLOG(&Kforward_iteration_protocolVKd, 1);
  T8 = CONGRUENT_CALL1(T6);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T9 = T8;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T10 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T11 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T12 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T13 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T14T = T9;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
    T14 = T14T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
    T15 = CALL3(T12, T6, T14, T10);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
    if (T15 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
      T16 = CALL2(T13, T6, T14);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
      CALL1(function_, T16);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
      T17 = CALL2(T11, T6, T14);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
      T14T = T17;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
  T7 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:158
  MV_SET_COUNT(0);
  return(T7);
}

D Kdo_all_slotsVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D class_, D Urest_, D client_) {
  D class_definition_;
  D all_slots_;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D context_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:166
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:170
  T13 = SLOT_VALUE_INITD(server_, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:171
  T14 = SLOT_VALUE_INITD(class_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:171
  primitive_type_check(T14, &KLclass_definitionGVdfmc_definitions);
  class_definition_ = T14;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:172
  context_ = Kbrowsing_contextVdfmc_environment_databaseMM0I(server_, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:173
  CONGRUENT_CALL_PROLOG(&Kclass_all_slot_definitionsYdfmc_derived_informationVdfmc_browser_support, 2);
  all_slots_ = CONGRUENT_CALL2(context_, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:179
  if (all_slots_ != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:186
    T10 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_all_slotsF107, 2, T13, function_);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:186
    T11 = CALL2(&KdoVKd, T10, all_slots_);
    T12 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:181
    T8 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_all_slotsF106, 3, client_, server_, function_);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:180
    T9 = Kdo_class_and_superclassesVdfmc_environment_databaseMM0I(T8, server_, class_, &KPempty_vectorVKi, &KPfalseVKi, &KPfalseVKi);
    T12 = T9;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:179
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:166
  MV_SET_COUNT(0);
  return(T12);
}

D Kdo_init_keywordsVenvironment_protocolsMdfmc_environment_databaseM0I (D function_, D server_, D main_class_, D Urest_, D client_, D inheritedQ_) {
  D inheritedQF7;
  D initialize_methods_;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:252
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:252
  primitive_type_check(inheritedQ_, &KLbooleanGVKd);
  inheritedQF7 = inheritedQ_;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:258
  initialize_methods_ = Kall_initialize_methodsVdfmc_environment_databaseMM0I(server_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  T9 = &Kdo_keywordF88;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  T10 = MAKE_CLOSURE(&Kdo_class_keywordsF75, 5);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  INIT_CLOSURE(T10, 5, T9, initialize_methods_, main_class_, server_, function_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:302
  if (inheritedQF7 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:303
    T11 = Kdo_class_and_superclassesVdfmc_environment_databaseMM0I(T10, server_, main_class_, &KPempty_vectorVKi, &KPfalseVKi, &KPfalseVKi);
    T13 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:305
    get_teb()->function = T10;
    T12 = Kdo_class_keywordsF75I(main_class_);
    T13 = T12;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:302
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:252
  MV_SET_COUNT(0);
  return(T13);
}

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

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:309
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:312
  T3_0 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:309
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM1I (D server_, D object_) {
  D T3_0;
  D T4_0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:315
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:318
  T3_0 = CALL2(&Kfind_environment_objectVenvironment_protocols, server_, DLclassG_idVenvironment_protocols);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:315
  T4_0 = T3_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T3_0);
    primitive_type_check(T4_0, &K50);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:315
  MV_SET_COUNT(1);
  return(T4_0);
}

D Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM2I (D server_, D object_) {
  D T3_0;
  D T4_0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:321
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:324
  T3_0 = CALL2(&Kfind_environment_objectVenvironment_protocols, server_, DLmethodG_idVenvironment_protocols);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:321
  T4_0 = T3_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T3_0);
    primitive_type_check(T4_0, &K50);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:321
  MV_SET_COUNT(1);
  return(T4_0);
}

D Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM3I (D server_, D object_) {
  D T3_0;
  D T4_0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:327
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:330
  T3_0 = CALL2(&Kfind_environment_objectVenvironment_protocols, server_, DLgeneric_functionG_idVenvironment_protocols);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:327
  T4_0 = T3_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T3_0);
    primitive_type_check(T4_0, &K50);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:327
  MV_SET_COUNT(1);
  return(T4_0);
}

D Kdo_macro_call_source_formsVenvironment_protocolsMdfmc_environment_databaseM2I (D function_, D server_, D class_) {
  D T4;
  D T5;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:337
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:342
  T4 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_macro_call_source_formsF45, 2, server_, function_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:341
  T5 = Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0I(T4, server_, class_, &KPempty_vectorVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:337
  MV_SET_COUNT(0);
  return(T5);
}

static D Kanonymous_of_do_macro_call_source_formsF45I (D slot_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D getter_;
  D setter_;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:342
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:343
  getter_ = Kslot_getterVenvironment_protocolsMdfmc_environment_databaseM0I(CREF(0), slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:344
  setter_ = Kslot_setterVenvironment_protocolsMdfmc_environment_databaseM0I(CREF(0), slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:345
  if (getter_ != &KPfalseVKi) {
    T5 = getter_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:345
    CALL1(CREF(1), T5);
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:345
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:346
  if (setter_ != &KPfalseVKi) {
    T6 = setter_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:346
    T2 = CALL1(CREF(1), T6);
    T4 = T2;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:346
    T3 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T4 = T3;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:346
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:342
  return(T4);
}

static D Kdo_keywordF88I (D server_, D function_, D definition_, D keyword_, D type_, D requiredQ_, D inheritedQ_) {
  D definitionF7;
  D T8;
  D T9;
  D typeF10;
  D T11;
  D T12;
  D T13;
  D T14;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  definitionF7 = definition_;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:263
  if (type_ != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:266
    T13 = primitive_instanceQ(type_,&KLtop_level_formGVdfmc_common);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:263
    if (T13 != &KPfalseVKi) {
      T12 = type_;
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:267
      ENGINE_NODE_CALL_PROLOG(&Kmake_environment_object_for_source_formVdfmc_environment_database, &K89, 2);
      T14 = ENGINE_NODE_CALL2(&K89, server_, T12);
      T9 = T14;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:269
      T8 = CALL2(&Kmake_environment_object_for_type_expressionVdfmc_environment_database, server_, type_);
      T9 = T8;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:263
    typeF10 = T9;
  } else {
    typeF10 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:263
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:271
  T11 = CALL5(function_, definitionF7, keyword_, typeF10, requiredQ_, inheritedQ_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  return(T11);
}

static D Kdo_class_keywordsF75I (D class_) {
  D init_keywords_;
  D direct_slots_;
  D T4_0;
  D T4_1;
  D T4_2;
  D environment_method_;
  D method_keywords_;
  D method_keyword_types_;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14T, T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  D T20;
  D T21;
  D T22;
  D T23;
  D T24T, T24;
  D T25;
  D T26;
  D T27_0;
  D T27_1;
  D keyword_;
  D requiredQ_;
  D type_;
  D T31;
  D T32;
  D T33;
  D T34;
  D T35;
  D T36;
  D T37;
  D T38;
  D T39;
  D T40;
  D T41;
  D T42;
  D T43;
  D T44T, T44;
  D T45T, T45;
  D T46;
  D T47;
  D T48;
  D T49;
  D T50;
  D T51;
  D T52;
  D T53;
  D T54;
  D T55;
  D T56;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:279
  T54 = SLOT_VALUE_INITD(class_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:280
  init_keywords_ = CALL1(&Kclass_definition_init_keywordsYdfmc_derived_informationVdfmc_browser_support, T54);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:281
  direct_slots_ = CALL1(&Kform_slot_specsVdfmc_definitionsMM0, T54);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:283
  T4_0 = CALL3(&Kinitialize_keywords_for_classVdfmc_environment_databaseMM0, CREF(3), T54, CREF(1));
  T4_1 = MV_GET_ELT(1);
  T4_2 = MV_GET_ELT(2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:282
  environment_method_ = T4_0;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:282
  method_keywords_ = T4_1;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:282
  method_keyword_types_ = T4_2;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:285
  T56 = primitive_idQ(class_,CREF(2));
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:285
  T55 = primitive_not(T56);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  T8 = CALL1(&Kforward_iteration_protocolVKd, init_keywords_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  T9 = T8;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  T10 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  T11 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  T12 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  T13 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  T14T = T9;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
    T14 = T14T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
    T15 = CALL3(T12, init_keywords_, T14, T10);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
    if (T15 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
      T16 = CALL2(T13, init_keywords_, T14);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:287
      CALL7(CREF(0), CREF(3), CREF(4), class_, T16, &KPfalseVKi, &KPfalseVKi, T55);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
      T17 = CALL2(T11, init_keywords_, T14);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
      T14T = T17;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:286
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  T18 = CALL1(&Kforward_iteration_protocolVKd, direct_slots_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  T19 = T18;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  T20 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  T21 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  T22 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  T23 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  T24T = T19;
L1: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
    T24 = T24T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
    T25 = CALL3(T22, direct_slots_, T24, T20);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
    if (T25 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
      T26 = CALL2(T23, direct_slots_, T24);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:290
      T27_0 = CALL1(&Kslot_definition_keywordYdfmc_derived_informationVdfmc_browser_support, T26);
      T27_1 = MV_GET_ELT(1);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:290
      keyword_ = T27_0;
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:290
      requiredQ_ = T27_1;
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:291
      if (keyword_ != &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:292
        type_ = CALL1(&Kslot_definition_typeYdfmc_derived_informationVdfmc_browser_support, T26);
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:293
        CALL7(CREF(0), CREF(3), CREF(4), class_, keyword_, type_, requiredQ_, T55);
      }
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:291
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
      T31 = CALL2(T21, direct_slots_, T24);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
      T24T = T31;
      goto L1;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:289
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  CONGRUENT_CALL_PROLOG(&Kforward_iteration_protocolVKd, 1);
  T32 = CONGRUENT_CALL1(method_keywords_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T33 = T32;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T34 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T35 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T36 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T37 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  CONGRUENT_CALL_PROLOG(&Kforward_iteration_protocolVKd, 1);
  T38 = CONGRUENT_CALL1(method_keyword_types_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T39 = T38;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T40 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T41 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T42 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T43 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  T44T = T33;
  T45T = T39;
L2: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    T44 = T44T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    T45 = T45T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    T46 = CALL3(T36, method_keywords_, T44, T34);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    if (T46 != &KPfalseVKi) {
      T48 = &KPtrueVKi;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
      T47 = CALL3(T42, method_keyword_types_, T45, T40);
      T48 = T47;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    if (T48 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
      T49 = CALL2(T37, method_keywords_, T44);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
      T50 = CALL2(T43, method_keyword_types_, T45);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:298
      CALL7(CREF(0), CREF(3), CREF(4), environment_method_, T49, T50, &KPfalseVKi, T55);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
      T51 = CALL2(T35, method_keywords_, T44);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
      T52 = CALL2(T41, method_keyword_types_, T45);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
      T44T = T51;
      T45T = T52;
      goto L2;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
    T53 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:296
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:259
  return(T53);
}

D Kall_initialize_methodsVdfmc_environment_databaseMM0I (D server_) {
  D initialize_function_;
  D definition_;
  D variable_;
  D T5;
  D T6;
  D T7;
  D Utmp_;
  D T9_0;
  D T10_0;
  D T11_0;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:202
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:205
  T14 = SLOT_VALUE_INITD(server_, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:205
  initialize_function_ = CALL2(&Kfind_environment_objectVenvironment_protocols, T14, Dinitialize_idVdfmc_environment_database);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:206
  T15 = primitive_instanceQ(initialize_function_,&KLgeneric_function_objectGVenvironment_protocols);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:206
  if (T15 != &KPfalseVKi) {
    T12 = initialize_function_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:207
    T16 = SLOT_VALUE_INITD(T12, 2);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:207
    primitive_type_check(T16, &KLtop_level_formGVdfmc_common);
    definition_ = T16;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:208
    variable_ = Ksource_form_variableVdfmc_environment_databaseMM0I(definition_);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:209
    if (variable_ != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:211
      T5 = MAKE_CLOSURE_INITD(&Kanonymous_of_all_initialize_methodsF74, 1, variable_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:214
      T17 = Kbrowsing_contextVdfmc_environment_databaseMM0I(server_, definition_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:210
      T6 = Kcollect_from_all_client_contextsVdfmc_environment_databaseMM0I(T5, server_, T17, &KPempty_vectorVKi, &KPtrueVKi);
      T7 = T6;
    } else {
      T7 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:209
    Utmp_ = T7;
  } else {
    Utmp_ = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:206
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:206
  if (Utmp_ != &KPfalseVKi) {
    T13 = Utmp_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:206
    T9_0 = T13;
    T11_0 = T9_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:217
    T10_0 = &KPempty_vectorVKi;
    T11_0 = T10_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:206
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:202
  MV_SET_COUNT(1);
  return(T11_0);
}

D Kdo_class_and_superclassesVdfmc_environment_databaseMM0I (D function_, D server_, D class_, D Urest_, D non_classesQ_, D ignore_) {
  D T7;
  D T8;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:70
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:75
  T7 = MAKE_CLOSURE_INITD(&Kdo_classF69, 3, ignore_, non_classesQ_, function_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:83
  get_teb()->function = T7;
  Kdo_classF69I(class_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:84
  T8 = Kdo_all_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I(T7, server_, class_, &KPempty_vectorVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:70
  MV_SET_COUNT(0);
  return(T8);
}

static D Kdo_classF69I (D class_) {
  D T1;
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:75
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:77
  T6 = primitive_idQ(class_,CREF(0));
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:77
  if (T6 != &KPfalseVKi) {
    T2 = &KPfalseVKi;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:78
    if (CREF(1) != &KPfalseVKi) {
      T1 = CREF(1);
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:79
      T7 = primitive_instanceQ(class_,&KLclass_objectGVenvironment_protocols);
      T1 = T7;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:78
    T2 = T1;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:77
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:77
  if (T2 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:80
    T3 = CALL1(CREF(2), class_);
    T5 = T3;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:77
    T4 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T5 = T4;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:77
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:75
  return(T5);
}

static D Kanonymous_of_all_initialize_methodsF74I (D context_) {
  D T1;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:211
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:212
  T1 = CALL2(&Kvariable_active_method_definitionsYdfmc_derived_informationVdfmc_browser_support, context_, CREF(0));
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:211
  return(T1);
}

D Kinitialize_keywords_for_classVdfmc_environment_databaseMM0I (D server_, D class_, D methods_) {
  D returnPexit_10_;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12T, T12;
  D T13;
  D method_definition_;
  D T15;
  D T16;
  D T17_0;
  D T17_1;
  D T17_2;
  D T17_3;
  D req_types_;
  D key_types_;
  D T20;
  D T21;
  D type_;
  D first_argument_;
  D keywords_;
  D types_;
  D T26;
  D T27_0;
  D T27_1;
  D T27_2;
  D T28_0;
  D T28_1;
  D T28_2;
  D context_;
  D T30;
  D T31;
  D environment_method_;
  _KLsimple_object_vectorGVKd_3 T33 = {&KLsimple_object_vectorGVKdW, (D) 13};
  D T34;
  D T35;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:220
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:225
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  CONGRUENT_CALL_PROLOG(&Kforward_iteration_protocolVKd, 1);
  T6 = CONGRUENT_CALL1(methods_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  T7 = T6;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  T8 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  T9 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  T10 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  T11 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  T12T = T7;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
    T12 = T12T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
    T13 = CALL3(T10, methods_, T12, T8);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
    if (T13 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
      T15 = CALL2(T11, methods_, T12);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
      primitive_type_check(T15, &KLmethod_definitionGVdfmc_definitions);
      method_definition_ = T15;
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:227
      context_ = Kbrowsing_contextVdfmc_environment_databaseMM0I(server_, method_definition_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:228
      T16 = MAKE_CLOSURE_INITD(&Ktype_definitionF81, 1, context_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:233
      T17_0 = Kfunctional_parameter_typesYdfmc_derived_informationVdfmc_browser_supportI(method_definition_);
      T17_1 = MV_GET_ELT(1);
      T17_2 = MV_GET_ELT(2);
      T17_3 = MV_GET_ELT(3);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:232
      req_types_ = T17_0;
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:232
      key_types_ = T17_3;
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:235
      CONGRUENT_CALL_PROLOG(&KemptyQVKd, 1);
      T20 = CONGRUENT_CALL1(req_types_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:235
      if (T20 != &KPfalseVKi) {
        type_ = &KPfalseVKi;
      } else {
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:235
        T21 = CALL2(&KelementVKd, req_types_, (D) 1);
        type_ = T21;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:235
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:236
      get_teb()->function = T16;
      first_argument_ = Ktype_definitionF81I(type_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:237
      T30 = primitive_idQ(first_argument_,class_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:237
      if (T30 != &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:238
        keywords_ = Kfunctional_keysYdfmc_derived_informationVdfmc_browser_supportI(method_definition_);
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:240
        types_ = CALL2(&KmapVKd, T16, key_types_);
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:243
        T31 = SLOT_VALUE_INITD(server_, 1);
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:242
        environment_method_ = Kmake_environment_objectVenvironment_protocolsMM2I(&KLmethod_objectGVenvironment_protocols, &KPempty_vectorVKi, T31, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi, method_definition_);
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:245
        T33.vector_element_[0] = environment_method_;
        T33.vector_element_[1] = keywords_;
        T33.vector_element_[2] = types_;
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:225
        T34 = MV_SET_REST_AT(&T33, 0);
        // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:225
        T27_0 = T34;
        T27_1 = MV_GET_ELT(1);
        T27_2 = MV_GET_ELT(2);
        goto L1;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:237
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
      T26 = CALL2(T9, methods_, T12);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
      T12T = T26;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:226
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:248
  T35 = &KPfalseVKi;
  MV_SET_ELT(0, &KPfalseVKi);
  MV_SET_ELT(1, &KPempty_listVKi);
  MV_SET_ELT(2, &KPempty_listVKi);
  MV_SET_COUNT(3);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:225
  T27_0 = T35;
  T27_1 = MV_GET_ELT(1);
  T27_2 = MV_GET_ELT(2);
  L1: ;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:225
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:220
  T28_0 = T27_0;
  T28_1 = T27_1;
  T28_2 = T27_2;
  {
    MV_CHECK_TYPE_PROLOGUE(T27_0);
    primitive_type_check(T28_0, &K80);
    primitive_type_check(T28_1, &KLsequenceGVKd);
    primitive_type_check(T28_2, &KLsequenceGVKd);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:220
  MV_SET_ELT(1, T28_1);
  MV_SET_ELT(2, T28_2);
  MV_SET_COUNT(3);
  return(T28_0);
}

static D Ktype_definitionF81I (D type_) {
  D T1_0;
  D T2_0;
  D T3_0;
  D T4_0;
  D T5;
  D T6;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:228
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:229
  T6 = primitive_instanceQ(type_,&KLvariable_nameGVdfmc_common);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:229
  if (T6 != &KPfalseVKi) {
    T5 = type_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:230
    T1_0 = CALL2(&Kvariable_active_definitionYdfmc_derived_informationVdfmc_browser_support, CREF(0), T5);
    T3_0 = T1_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:229
    T2_0 = &KPfalseVKi;
    T3_0 = T2_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:229
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:228
  T4_0 = T3_0;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:228
  MV_SET_COUNT(1);
  return(T4_0);
}

static D Kanonymous_of_do_all_slotsF107I (D slot_definition_) {
  D environment_slot_;
  D T3;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:186
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:188
  environment_slot_ = Kmake_environment_objectVenvironment_protocolsMM2I(&KLslot_objectGVenvironment_protocols, &KPempty_vectorVKi, CREF(0), &KPfalseVKi, &KPfalseVKi, &KPfalseVKi, slot_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:191
  CALL1(CREF(1), environment_slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:186
  T3 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:186
  MV_SET_COUNT(0);
  return(T3);
}

static D Kanonymous_of_do_all_slotsF106I (D class_) {
  D T1;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:181
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:182
  T1 = Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0I(CREF(2), CREF(1), class_, &KPempty_vectorVKi, CREF(0));
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:181
  return(T1);
}

D Kclass_all_superclassesVdfmc_environment_databaseI (D server_, D class_) {
  D T3;
  D T4_0;
  D T5_0;
  D classes_;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:140
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:146
  T5_0 = KLstretchy_object_vectorGZ32ZconstructorVKiMM0I(&KLstretchy_object_vectorGVKe, &KPempty_vectorVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:146
  classes_ = T5_0;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:147
  T3 = MAKE_CLOSURE(&Kdo_superclassesF114, 3);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:147
  INIT_CLOSURE(T3, 3, classes_, T3, server_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:154
  Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I(T3, server_, class_, &KPempty_vectorVKi, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:155
  CONGRUENT_CALL_PROLOG(&Kremove_duplicatesVKd, 2);
  T4_0 = CONGRUENT_CALL2(classes_, &KPempty_vectorVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:140
  MV_SET_COUNT(1);
  return(T4_0);
}

static D Kdo_superclassesF114I (D superclass_) {
  D T1;
  D T2;
  D T3;
  D T4;
  D T5;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:147
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:149
  KaddXVKdMM3I(CREF(0), superclass_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:150
  T4 = primitive_instanceQ(superclass_,&KLclass_objectGVenvironment_protocols);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:150
  if (T4 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:163
    T3 = superclass_;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:151
    T5 = Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0I(CREF(1), CREF(2), T3, &KPempty_vectorVKi, &KPfalseVKi);
    T2 = T5;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:150
    T1 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T2 = T1;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:150
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:147
  return(T2);
}

static D Kanonymous_of_do_direct_slotsF117I (D slot_definition_) {
  D environment_slot_;
  D T3;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:130
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:132
  environment_slot_ = Kmake_environment_objectVenvironment_protocolsMM2I(&KLslot_objectGVenvironment_protocols, &KPempty_vectorVKi, CREF(0), &KPfalseVKi, &KPfalseVKi, &KPfalseVKi, slot_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:135
  CALL1(CREF(1), environment_slot_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:130
  T3 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:130
  MV_SET_COUNT(0);
  return(T3);
}

static D Kdo_methodsF120I (D class_) {
  D class_definition_;
  D T2;
  D direct_methods_;
  D T4;
  D context_;
  D T6;
  DWORD T7T, T7;
  D T8;
  DWORD T9;
  D T10;
  D T11;
  D environment_method_;
  DWORD T13;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:92
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:94
  T4 = SLOT_VALUE_INITD(class_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:94
  primitive_type_check(T4, &KLclass_definitionGVdfmc_definitions);
  class_definition_ = T4;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:95
  context_ = Kbrowsing_contextVdfmc_environment_databaseMM0I(CREF(1), class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:98
  T2 = MAKE_CLOSURE_INITD(&Kanonymous_of_do_all_methodsF123, 1, class_definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:97
  direct_methods_ = Kcollect_from_all_client_contextsVdfmc_environment_databaseMM0I(T2, CREF(1), context_, &KPempty_vectorVKi, &KPtrueVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
  T8 = SLOT_VALUE_INITD(direct_methods_, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
  T9 = primitive_cast_integer_as_raw(T8);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
  T7T = 1;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
    T7 = T7T;
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
    T10 = primitive_machine_word_equalQ(T7,T9);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
    if (T10 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
      T11 = REPEATED_D_SLOT_VALUE_TAGGED(direct_methods_, 1, T7);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:104
      environment_method_ = Kmake_environment_objectVenvironment_protocolsMM2I(&KLmethod_objectGVenvironment_protocols, &KPempty_vectorVKi, CREF(0), &KPfalseVKi, &KPfalseVKi, &KPfalseVKi, T11);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:108
      CALL2(CREF(2), class_, environment_method_);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
      T13 = primitive_machine_word_add_signal_overflow(T7,4);
      // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
      T7T = T13;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
    // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:102
  T6 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:92
  MV_SET_COUNT(0);
  return(T6);
}

static D Kanonymous_of_do_all_methodsF123I (D context_) {
  D T1;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:98
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:99
  CONGRUENT_CALL_PROLOG(&Kclass_direct_method_definitionsYdfmc_derived_informationVdfmc_browser_support, 2);
  T1 = CONGRUENT_CALL2(context_, CREF(0));
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:98
  return(T1);
}

static D Kanonymous_of_do_direct_methodsF127I (D context_) {
  D T1;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:56
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:57
  CONGRUENT_CALL_PROLOG(&Kclass_direct_method_definitionsYdfmc_derived_informationVdfmc_browser_support, 2);
  T1 = CONGRUENT_CALL2(context_, CREF(0));
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:56
  return(T1);
}

static D Kanonymous_of_do_direct_superclassesF130I (D superclass_type_) {
  D type_object_;
  D T3;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:40
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:41
  type_object_ = CALL2(&Kmake_environment_object_for_type_expressionVdfmc_environment_database, CREF(0), superclass_type_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:42
  CALL1(CREF(1), type_object_);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:40
  T3 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:40
  MV_SET_COUNT(0);
  return(T3);
}

static D Kanonymous_of_do_direct_subclassesF134I (D context_) {
  D T1;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:20
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:21
  CONGRUENT_CALL_PROLOG(&Kclass_direct_subclass_definitionsYdfmc_derived_informationVdfmc_browser_support, 2);
  T1 = CONGRUENT_CALL2(context_, CREF(0));
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:20
  return(T1);
}


/* SYSTEM INIT CODE */

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

    T0 = KPresolve_symbolVKiI(&KJmodule_);
    if (T0 != &KJmodule_) {
      IKJmodule_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJclient_);
    if (T0 != &KJclient_) {
      primitive_repeated_slot_value_setter(T0, &K110, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K109, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K99, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K94, 1, 0);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJinheritedQ_);
    if (T0 != &KJinheritedQ_) {
      primitive_repeated_slot_value_setter(T0, &K99, 1, 1);
      primitive_repeated_slot_value_setter(T0, &K94, 1, 2);
    }
  }
  return;
}

/* USER INIT CODE */

void _Init_dfmc_environment_database__X_class_objects_for_user () {
{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:11
  T0 = KPadd_a_methodVKnI(&Kdo_direct_subclassesVenvironment_protocols, &Kdo_direct_subclassesVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I2;
}
I2:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:32
  T0 = KPadd_a_methodVKnI(&Kdo_direct_superclassesVenvironment_protocols, &Kdo_direct_superclassesVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I5;
}
I5:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:47
  T0 = KPadd_a_methodVKnI(&Kdo_direct_methodsVenvironment_protocols, &Kdo_direct_methodsVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I8;
}
I8:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:87
  T0 = KPadd_a_methodVKnI(&Kdo_all_methodsVenvironment_protocols, &Kdo_all_methodsVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I11;
}
I11:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:123
  T0 = KPadd_a_methodVKnI(&Kdo_direct_slotsVenvironment_protocols, &Kdo_direct_slotsVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I14;
}
I14:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:158
  T0 = KPadd_a_methodVKnI(&Kdo_all_superclassesVenvironment_protocols, &Kdo_all_superclassesVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I17;
}
I17:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:166
  T0 = KPadd_a_methodVKnI(&Kdo_all_slotsVenvironment_protocols, &Kdo_all_slotsVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I20;
}
I20:

{
  D T0;
  _KLsimple_object_vectorGVKd_4 T1 = {&KLsimple_object_vectorGVKdW, (D) 17};
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:198
  T1.vector_element_[0] = &KJname_;
  T1.vector_element_[1] = &K22;
  T1.vector_element_[2] = IKJmodule_;
  T1.vector_element_[3] = Ddylan_module_idVenvironment_protocols;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:198
  MIEP_CALL_PROLOG(&K24);
  T2 = KmakeVKdMenvironment_protocolsM0I(&KLdefinition_idGVenvironment_protocols, &T1);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:197
  Dinitialize_idVdfmc_environment_database = T2;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:197
  T0 = &KPfalseVKi;
  goto I21;
}
I21:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:252
  T0 = KPadd_a_methodVKnI(&Kdo_init_keywordsVenvironment_protocols, &Kdo_init_keywordsVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I27;
}
I27:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:309
  T0 = KPadd_a_methodVKnI(&Kapplication_object_classVenvironment_protocols, &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM0, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I30;
}
I30:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:315
  T0 = KPadd_a_methodVKnI(&Kapplication_object_classVenvironment_protocols, &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM1, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I33;
}
I33:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:321
  T0 = KPadd_a_methodVKnI(&Kapplication_object_classVenvironment_protocols, &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM2, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I36;
}
I36:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:327
  T0 = KPadd_a_methodVKnI(&Kapplication_object_classVenvironment_protocols, &Kapplication_object_classVenvironment_protocolsMdfmc_environment_databaseM3, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I39;
}
I39:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/environment/dfmc/database/class-objects.dylan:337
  T0 = KPadd_a_methodVKnI(&Kdo_macro_call_source_formsVenvironment_protocols, &Kdo_macro_call_source_formsVenvironment_protocolsMdfmc_environment_databaseM2, &Kdfmc_environment_database_libraryYdylan_userVdfmc_environment_database, &KPfalseVKi, &KPfalseVKi, &KPtrueVKi);
  goto I42;
}
I42:

  return;
}


/* eof */
