#include "opendylan/run-time.h"

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

/* Typedefs for referenced classes */

typedef struct {
  dylan_value wrapper;
  dylan_value element_type_;
  dylan_value table_vector_;
  dylan_value initial_entries_;
  dylan_value grow_size_function_;
  dylan_value weakQ_;
} _KLobject_tableGVKd;

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

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

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

typedef struct {
  dylan_value wrapper;
} _KLobjectGVKd;

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

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

typedef struct {
  dylan_value wrapper;
} _KLbooleanGVKd;

typedef struct {
  dylan_value wrapper;
} _KLunboundGVKe;

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

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

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    dylan_value wrapper; \
    dylan_value size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(24);
define__KLbyte_stringGVKd(20);
define__KLbyte_stringGVKd(66);
define__KLbyte_stringGVKd(44);
define__KLbyte_stringGVKd(43);
define__KLbyte_stringGVKd(19);
define__KLbyte_stringGVKd(76);
define__KLbyte_stringGVKd(101);
define__KLbyte_stringGVKd(86);
define__KLbyte_stringGVKd(74);
define__KLbyte_stringGVKd(40);
define__KLbyte_stringGVKd(0);

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

typedef struct {
  dylan_value wrapper;
} _KLsimple_vectorGVKd;

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

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

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

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

typedef struct {
  dylan_value wrapper;
} _KLsequenceGVKd;

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

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

typedef struct {
  dylan_value wrapper;
} _KLconditionGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value condition_format_string_;
  dylan_value condition_format_arguments_;
} _KLsimple_conditionGVKe;

typedef struct {
  dylan_value wrapper;
} _KLserious_conditionGVKd;

typedef struct {
  dylan_value wrapper;
} _KLerrorGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value condition_format_string_;
  dylan_value condition_format_arguments_;
} _KLsimple_errorGVKd;

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

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

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

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

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


/* Typedefs for defined classes */

typedef struct {
  dylan_value wrapper;
} _KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager;

typedef struct {
  dylan_value wrapper;
  dylan_value condition_format_string_;
  dylan_value condition_format_arguments_;
} _KLcommand_call_errorGYenvironment_command_callingVenvironment_manager;


/* Referenced object declarations */

dylan_value KPadd_classVKeI (dylan_value);
dylan_value KLobject_tableGZ32ZconstructorVKiMM0I (dylan_value, dylan_value, dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLclassGVKd KLobject_tableGVKd;
extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLmm_wrapperGVKi_0 KLobject_tableGVKdW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLclassGVKd KLobjectGVKd;
extern _KLmm_wrapperGVKi_0 KLobjectGVKdW;
extern _KLsimple_methodGVKe Kdefault_grow_sizeVKe;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLbooleanGVKd KPfalseVKi;
extern _KLclassGVKd KLbooleanGVKd;
extern _KLmm_wrapperGVKi_0 KLbooleanGVKdW;
extern _KLunboundGVKe KPunboundVKi;
extern _KLclassGVKd KLunboundGVKe;
extern _KLmm_wrapperGVKi_0 KLunboundGVKeW;
extern _KLbooleanGVKd KPtrueVKi;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLincremental_generic_functionGVKe Kelement_setterVKd;
extern _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLsealed_generic_functionGVKe Kfunction_argumentsVKd;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
extern _KLsealed_generic_functionGVKe Kfunction_specializersVKd;
extern _KLincremental_generic_functionGVKe KsizeVKd;
extern _KLincremental_generic_functionGVKe KLVKd;
extern _KLincremental_generic_functionGVKe KasVKd;
extern _KLclassGVKd KLsimple_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_vectorGVKdW;
extern _KLsymbolGVKd KJformat_string_;
extern _KLsymbolGVKd KJformat_arguments_;
extern _KLincremental_generic_functionGVKe KmakeVKd;
dylan_value KerrorVKdMM0I (dylan_value, dylan_value);
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLincremental_generic_functionGVKe Kcopy_sequenceVKd;
dylan_value KmemberQVKdMM4I (dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLsimple_methodGVKe KEEVKd;
extern _KLincremental_generic_functionGVKe KelementVKd;
dylan_value Kapplicable_methodQVKdMM1I (dylan_value, dylan_value);
extern _KLsealed_generic_functionGVKe Kcoerce_for_command_callVenvironment_manager;
dylan_value Kobject_classVKdI (dylan_value);
dylan_value KapplyVKdI (dylan_value, dylan_value);
extern _KLsealed_generic_functionGVKe Kapplicable_methodQVKd;
extern _KLsymbolGVKd KJdefault_;
extern _KLsealed_generic_functionGVKe KheadVKd;
extern _KLclassGVKd KLfunctionGVKd;
extern _KLmm_wrapperGVKi_0 KLfunctionGVKdW;
extern _KLfunction_classGVKi KLsimple_closure_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLsimple_closure_methodGVKiW;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLclassGVKd KLsequenceGVKd;
extern _KLmm_wrapperGVKi_0 KLsequenceGVKdW;
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LfunctionG_typesVKi;
extern _KLclassGVKd KLimplementation_classGVKe;
extern _KLmm_wrapperGVKi_0 KLimplementation_classGVKeW;
extern _KLclassGVKd KLconditionGVKd;
extern _KLmm_wrapperGVKi_0 KLconditionGVKdW;
extern _KLclassGVKd KLsimple_conditionGVKe;
extern _KLmm_wrapperGVKi_0 KLsimple_conditionGVKeW;
extern _KLclassGVKd KLserious_conditionGVKd;
extern _KLmm_wrapperGVKi_0 KLserious_conditionGVKdW;
extern _KLclassGVKd KLerrorGVKd;
extern _KLmm_wrapperGVKi_0 KLerrorGVKdW;
extern _KLclassGVKd KLsimple_errorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_errorGVKdW;
extern _KLincremental_generic_functionGVKe KinitializeVKd;
extern _KLfunction_classGVKi KLkeyword_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_methodGVKeW;
extern _KLbyte_stringGVKd_0 KPempty_stringVKi;
extern _KLclassGVKd KLkeyword_signatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLkeyword_signatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LclassG_typesVKi;
extern _KLsimple_object_vectorGVKd_256 KDsignature_LobjectG_typesVKi;
extern _KLinstance_slot_descriptorGVKe Kcondition_format_stringVKdHLsimple_conditionG;
extern _KLclassGVKd KLinstance_slot_descriptorGVKe;
extern _KLmm_wrapperGVKi_0 KLinstance_slot_descriptorGVKeW;
extern _KLinstance_slot_descriptorGVKe Kcondition_format_argumentsVKdHLsimple_conditionG;
dylan_value Kclass_instanceQ_initialVKiI (dylan_value, dylan_value);
extern _KLmoduleGVKe Kenvironment_command_calling_moduleYdylan_userVenvironment_manager;
extern _KLclassGVKd KLmoduleGVKe;
extern _KLmm_wrapperGVKi_0 KLmoduleGVKeW;
extern _KLkeyword_methodGVKe Kdefault_class_constructorVKi;
dylan_value Kclass_instanceQ_rcpl_single_smallVKiI (dylan_value, dylan_value);
extern _KLclassGVKd KLpairGVKd;
extern dylan_value TdebuggingQTVKi;
extern dylan_value Tdebug_partsTVKi;
extern dylan_value Tdebug_out_functionTVKi;

/* Defined object declarations */

extern _KLclassGVKd KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager;
extern _KLmm_wrapperGVKi_0 KLcommand_call_conditionGYenvironment_command_callingVenvironment_managerW;
extern _KLclassGVKd KLcommand_call_errorGYenvironment_command_callingVenvironment_manager;
extern _KLmm_wrapperGVKi_0 KLcommand_call_errorGYenvironment_command_callingVenvironment_managerW;
dylan_value Kregister_command_functionYenvironment_command_callingVenvironment_managerI (dylan_value, dylan_value);
static _KLsymbolGVKd KJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_;
static _KLbyte_stringGVKd_40 K9;
extern _KLsimple_methodGVKe Klookup_and_coerced_applyYenvironment_command_callingVenvironment_manager;
dylan_value Klookup_and_coerced_applyYenvironment_command_callingVenvironment_managerI (dylan_value, dylan_value);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_lookup_and_coerced_applyF27;
static dylan_value Kanonymous_of_lookup_and_coerced_applyF27I ();
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_lookup_and_coerced_applyF24;
static dylan_value Kanonymous_of_lookup_and_coerced_applyF24I ();
dylan_value Klookup_command_functionYenvironment_command_callingVenvironment_managerI (dylan_value);
static _KLbyte_stringGVKd_74 K17;
static _KLbyte_stringGVKd_86 K18;
static _KLsymbolGVKd KJenvironment_manager_;
static _KLbyte_stringGVKd_101 K20;
static _KLbyte_stringGVKd_76 K21;
static _KLbyte_stringGVKd_19 K22;
static _KLbyte_stringGVKd_43 K23;
static _KLbyte_stringGVKd_44 K25;
static _KLsignatureGVKe K26;
static _KLbyte_stringGVKd_66 K28;
static _KLsignatureGVKe K29;
static _KLsimple_object_vectorGVKd_2 K30;
extern _KLsimple_methodGVKe Klookup_command_functionYenvironment_command_callingVenvironment_manager;
static _KLsignatureAvaluesGVKi K32;
static _KLsimple_object_vectorGVKd_1 K33;
extern _KLsimple_methodGVKe Kregister_command_functionYenvironment_command_callingVenvironment_manager;
static _KLsignatureGVKe K35;
static _KLsimple_object_vectorGVKd_2 K36;
static _KLimplementation_classGVKe K37;
static _KLsimple_object_vectorGVKd_2 K38;
extern _KLkeyword_methodGVKe KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0;
dylan_value KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0I (dylan_value, dylan_value, dylan_value, dylan_value);
static _KLsimple_object_vectorGVKd_2 K41;
static _KLsimple_object_vectorGVKd_8 K42;
static _KLkeyword_signatureAvaluesGVKi K43;
static _KLsimple_object_vectorGVKd_4 K44;
static _KLsimple_object_vectorGVKd_2 K45;
static _KLsimple_object_vectorGVKd_1 K46;
static _KLbyte_stringGVKd_20 K47;
static _KLimplementation_classGVKe K48;
static _KLsimple_object_vectorGVKd_1 K49;
static _KLsimple_object_vectorGVKd_6 K50;
static _KLsimple_object_vectorGVKd_4 K51;
static _KLbyte_stringGVKd_24 K52;
static _KLpairGVKd K53;

/* Indirection variables */

static dylan_value IKJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_ = &KJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_;
static dylan_value IKJenvironment_manager_ = &KJenvironment_manager_;

/* Variables */

dylan_value Lcommand_call_conditionGYenvironment_command_callingVenvironment_manager = &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager;
dylan_value Lcommand_call_errorGYenvironment_command_callingVenvironment_manager = &KLcommand_call_errorGYenvironment_command_callingVenvironment_manager;
dylan_value Denvironment_command_functionsVenvironment_manager = &KPunboundVKi;
dylan_value register_command_functionYenvironment_command_callingVenvironment_manager = &Kregister_command_functionYenvironment_command_callingVenvironment_manager;
dylan_value lookup_command_functionYenvironment_command_callingVenvironment_manager = &Klookup_command_functionYenvironment_command_callingVenvironment_manager;
dylan_value lookup_and_coerced_applyYenvironment_command_callingVenvironment_manager = &Klookup_and_coerced_applyYenvironment_command_callingVenvironment_manager;

/* Objects */

_KLclassGVKd KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager = {
  &KLclassGVKdW /* wrapper */,
  &Kclass_instanceQ_rcpl_single_smallVKiI,
  &K52,
  &K48,
  (dylan_value) 1,
  &Kenvironment_command_calling_moduleYdylan_userVenvironment_manager
};

_KLmm_wrapperGVKi_0 KLcommand_call_conditionGYenvironment_command_callingVenvironment_managerW = {
  &KLmm_wrapperGVKiW /* wrapper */,
  &K48,
  (dylan_value) 1,
  1,
  33554439,
  (dylan_value) 1
};

_KLclassGVKd KLcommand_call_errorGYenvironment_command_callingVenvironment_manager = {
  &KLclassGVKdW /* wrapper */,
  &Kclass_instanceQ_initialVKiI,
  &K47,
  &K37,
  (dylan_value) 1,
  &Kenvironment_command_calling_moduleYdylan_userVenvironment_manager
};

_KLmm_wrapperGVKi_0 KLcommand_call_errorGYenvironment_command_callingVenvironment_managerW = {
  &KLmm_wrapperGVKiW /* wrapper */,
  &K37,
  (dylan_value) 2049,
  9,
  33554439,
  (dylan_value) 1
};

static _KLsymbolGVKd KJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K9
};

static _KLbyte_stringGVKd_40 K9 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 161,
  "returning values is not implemented yet!"
};

_KLsimple_methodGVKe Klookup_and_coerced_applyYenvironment_command_callingVenvironment_manager = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K29,
  &Klookup_and_coerced_applyYenvironment_command_callingVenvironment_managerI
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_lookup_and_coerced_applyF27 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_0,
  &K26,
  &Kanonymous_of_lookup_and_coerced_applyF27I,
  (dylan_value) 1
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_lookup_and_coerced_applyF24 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_0,
  &K26,
  &Kanonymous_of_lookup_and_coerced_applyF24I,
  (dylan_value) 1
};

static _KLbyte_stringGVKd_74 K17 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 297,
  "lookup-and-coerced-apply: too few args for command %=\n(got %=, need %=)\n%="
};

static _KLbyte_stringGVKd_86 K18 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 345,
  "lookup-and-coerced-apply: too many args for command %=\n(got %=, need %=, rest = %=)\n%="
};

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

static _KLbyte_stringGVKd_101 K20 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 405,
  "lookup-and-coerced-apply: could not coerce argument %d for command %= (%=)\n  from class %= to type %="
};

static _KLbyte_stringGVKd_76 K21 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 305,
  "lookup-and-coerced-apply: no applicable method after coercion for %= with %="
};

static _KLbyte_stringGVKd_19 K22 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 77,
  "environment-manager"
};

static _KLbyte_stringGVKd_43 K23 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 173,
  "lookup-command-function: Unknown command %="
};

static _KLbyte_stringGVKd_44 K25 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 177,
  "lookup-and-coerced-apply: coerced args to %="
};

static _KLsignatureGVKe K26 = {
  &KLsignatureGVKeW /* wrapper */,
  (dylan_value) 44040193,
  &KPempty_vectorVKi
};

static _KLbyte_stringGVKd_66 K28 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 265,
  "lookup-and-coerced-apply: calling %=\n  requiring %=\n  with args %="
};

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

static _KLsimple_object_vectorGVKd_2 K30 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLsymbolGVKd,
  &KLsequenceGVKd
};

_KLsimple_methodGVKe Klookup_command_functionYenvironment_command_callingVenvironment_manager = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K32,
  &Klookup_command_functionYenvironment_command_callingVenvironment_managerI
};

static _KLsignatureAvaluesGVKi K32 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555461,
  &K33,
  &KDsignature_LfunctionG_typesVKi
};

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

_KLsimple_methodGVKe Kregister_command_functionYenvironment_command_callingVenvironment_manager = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K35,
  &Kregister_command_functionYenvironment_command_callingVenvironment_managerI
};

static _KLsignatureGVKe K35 = {
  &KLsignatureGVKeW /* wrapper */,
  (dylan_value) 41943049,
  &K36
};

static _KLsimple_object_vectorGVKd_2 K36 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLsymbolGVKd,
  &KLfunctionGVKd
};

static _KLimplementation_classGVKe K37 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (dylan_value) 477102089,
  &KLcommand_call_errorGYenvironment_command_callingVenvironment_manager,
  &KLcommand_call_errorGYenvironment_command_callingVenvironment_managerW,
  &KPfalseVKi,
  &K38,
  (dylan_value) -3,
  &KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0,
  &K41,
  &K42,
  (dylan_value) 29,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &K38,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_2 K38 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &Kcondition_format_stringVKdHLsimple_conditionG,
  &Kcondition_format_argumentsVKdHLsimple_conditionG
};

_KLkeyword_methodGVKe KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_4,
  &K43,
  &key_mep_2,
  &KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0I,
  &K44
};

static _KLsimple_object_vectorGVKd_2 K41 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLsimple_errorGVKd,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager
};

static _KLsimple_object_vectorGVKd_8 K42 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 33,
  &KLobjectGVKd,
  &KLconditionGVKd,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager,
  &KLsimple_conditionGVKe,
  &KLserious_conditionGVKd,
  &KLerrorGVKd,
  &KLsimple_errorGVKd,
  &KLcommand_call_errorGYenvironment_command_callingVenvironment_manager
};

static _KLkeyword_signatureAvaluesGVKi K43 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 35390469,
  &KDsignature_LclassG_typesVKi,
  &K45,
  &KDsignature_LobjectG_typesVKi,
  &K46
};

static _KLsimple_object_vectorGVKd_4 K44 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 17,
  &KJformat_string_,
  &KPempty_stringVKi,
  &KJformat_arguments_,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_2 K45 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KJformat_string_,
  &KJformat_arguments_
};

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

static _KLbyte_stringGVKd_20 K47 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 81,
  "<command-call-error>"
};

static _KLimplementation_classGVKe K48 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (dylan_value) 410255361,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_managerW,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (dylan_value) -3,
  &Kdefault_class_constructorVKi,
  &K49,
  &K50,
  (dylan_value) 9,
  &KPempty_vectorVKi,
  &K51,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &K53,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi
};

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

static _KLsimple_object_vectorGVKd_6 K50 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 25,
  &KLobjectGVKd,
  &KLconditionGVKd,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager,
  &KPfalseVKi,
  &KPfalseVKi,
  &KPfalseVKi
};

static _KLsimple_object_vectorGVKd_4 K51 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 17,
  &KLsimple_conditionGVKe,
  &KLserious_conditionGVKd,
  &KLerrorGVKd,
  &KLsimple_errorGVKd
};

static _KLbyte_stringGVKd_24 K52 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 97,
  "<command-call-condition>"
};

static _KLpairGVKd K53 = {
  &KLpairGVKdW /* wrapper */,
  &KLcommand_call_errorGYenvironment_command_callingVenvironment_manager,
  &KPempty_listVKi
};

/* Code */

dylan_value Kregister_command_functionYenvironment_command_callingVenvironment_managerI (dylan_value name_, dylan_value func_) {
  dylan_value T2;
  dylan_value T3;

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:45
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:49
  T3 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:49
  SLOT_VALUE_SETTER(func_, T3, 0);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:49
  SLOT_VALUE_SETTER(IKJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_, T3, 1);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:48
  CALL3(&Kelement_setterVKd, T3, Denvironment_command_functionsVenvironment_manager, name_);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:48
  T2 = &KPfalseVKi;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:45
  MV_SET_COUNT(0);
  return(T2);
}

dylan_value Klookup_and_coerced_applyYenvironment_command_callingVenvironment_managerI (dylan_value fun_name_, dylan_value args_) {
  dylan_value func_;
  dylan_value T4_0;
  dylan_value T4_1;
  dylan_value req_number_;
  dylan_value restQ_;
  dylan_value types_;
  dylan_value args_size_;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11;
  dylan_value T12;
  dylan_value T13;
  dylan_value T14;
  dylan_value coerced_args_;
  dylan_value T16;
  dylan_value returnPexit_0_;
  DWORD i_T, i_;
  dylan_value T19;
  dylan_value T20;
  dylan_value T21;
  dylan_value T22;
  dylan_value T23;
  dylan_value T24;
  dylan_value T25;
  dylan_value T26;
  dylan_value T27;
  dylan_value T28;
  dylan_value T29;
  dylan_value T30;
  dylan_value T31;
  dylan_value T32;
  dylan_value T33;
  dylan_value T34;
  _KLsimple_object_vectorGVKd_4 T35 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  dylan_value T36;
  _KLsimple_object_vectorGVKd_4 T37 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  dylan_value T38_0;
  dylan_value T39;
  dylan_value T40;
  _KLsimple_object_vectorGVKd_5 T41 = {&KLsimple_object_vectorGVKdW, (dylan_value) 21};
  dylan_value T42;
  _KLsimple_object_vectorGVKd_4 T43 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  dylan_value T44;
  dylan_value T45;
  dylan_value T46;
  dylan_value T47;
  dylan_value T48;
  dylan_value T49;
  dylan_value T50_0;
  dylan_value T51;
  dylan_value T52;
  dylan_value T53;
  _KLsimple_object_vectorGVKd_2 T54 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  dylan_value T55;
  _KLsimple_object_vectorGVKd_5 T56 = {&KLsimple_object_vectorGVKdW, (dylan_value) 21};
  dylan_value T57;
  _KLsimple_object_vectorGVKd_4 T58 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  DWORD T59;
  dylan_value T60;
  dylan_value T61;
  dylan_value T62;
  dylan_value T63;
  dylan_value T64;
  dylan_value T65;
  dylan_value T66;
  dylan_value T67_0;
  dylan_value T68;
  dylan_value T69;
  dylan_value T70;
  _KLsimple_object_vectorGVKd_2 T71 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  _KLsimple_object_vectorGVKd_1 T72 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};
  _KLsimple_object_vectorGVKd_2 T73 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  dylan_value T74;
  _KLsimple_object_vectorGVKd_4 T75 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  dylan_value T76;

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:78
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:81
  func_ = Klookup_command_functionYenvironment_command_callingVenvironment_managerI(fun_name_);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:82
  CONGRUENT_CALL_PROLOG(&Kfunction_argumentsVKd, 1);
  T4_0 = CONGRUENT_CALL1(func_);
  T4_1 = MV_GET_ELT(1);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:82
  req_number_ = T4_0;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:82
  restQ_ = T4_1;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:83
  CONGRUENT_CALL_PROLOG(&Kfunction_specializersVKd, 1);
  types_ = CONGRUENT_CALL1(func_);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:84
  CONGRUENT_CALL_PROLOG(&KsizeVKd, 1);
  args_size_ = CONGRUENT_CALL1(args_);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:86
  CONGRUENT_CALL_PROLOG(&KLVKd, 2);
  T9 = CONGRUENT_CALL2(args_size_, req_number_);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:86
  if (T9 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:92
    CONGRUENT_CALL_PROLOG(&KasVKd, 2);
    T10 = CONGRUENT_CALL2(&KLsimple_vectorGVKd, args_);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:92
    T35.vector_element_[0] = fun_name_;
    T35.vector_element_[1] = args_size_;
    T35.vector_element_[2] = req_number_;
    T35.vector_element_[3] = T10;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:92
    T36 = primitive_copy_vector(&T35);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:87
    T37.vector_element_[0] = &KJformat_string_;
    T37.vector_element_[1] = &K17;
    T37.vector_element_[2] = &KJformat_arguments_;
    T37.vector_element_[3] = T36;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:87
    CONGRUENT_CALL_PROLOG(&KmakeVKd, 2);
    T11 = CONGRUENT_CALL2(&KLcommand_call_errorGYenvironment_command_callingVenvironment_manager, &T37);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:87
    KerrorVKdMM0I(T11, &KPempty_vectorVKi);
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:86
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:94
  CONGRUENT_CALL_PROLOG(&KLVKd, 2);
  T38_0 = CONGRUENT_CALL2(req_number_, args_size_);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:94
  T39 = T38_0;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:94
  if (T39 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:94
    T40 = primitive_not(restQ_);
    T12 = T40;
  } else {
    T12 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:94
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:94
  if (T12 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:101
    CONGRUENT_CALL_PROLOG(&KasVKd, 2);
    T13 = CONGRUENT_CALL2(&KLsimple_vectorGVKd, args_);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:100
    T41.vector_element_[0] = fun_name_;
    T41.vector_element_[1] = args_size_;
    T41.vector_element_[2] = req_number_;
    T41.vector_element_[3] = restQ_;
    T41.vector_element_[4] = T13;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:100
    T42 = primitive_copy_vector(&T41);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:95
    T43.vector_element_[0] = &KJformat_string_;
    T43.vector_element_[1] = &K18;
    T43.vector_element_[2] = &KJformat_arguments_;
    T43.vector_element_[3] = T42;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:95
    CONGRUENT_CALL_PROLOG(&KmakeVKd, 2);
    T14 = CONGRUENT_CALL2(&KLcommand_call_errorGYenvironment_command_callingVenvironment_manager, &T43);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:95
    KerrorVKdMM0I(T14, &KPempty_vectorVKi);
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:94
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:104
  CONGRUENT_CALL_PROLOG(&Kcopy_sequenceVKd, 2);
  coerced_args_ = CONGRUENT_CALL2(args_, &KPempty_vectorVKi);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  T44 = TdebuggingQTVKi;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  if (T44 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T45 = Tdebug_partsTVKi;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T46 = primitive_idQ(T45,&KPempty_listVKi);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T47 = primitive_not(T46);
    T48 = T47;
  } else {
    T48 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  if (T48 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T49 = Tdebug_partsTVKi;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T50_0 = KmemberQVKdMM4I(IKJenvironment_manager_, T49, &KPempty_vectorVKi, &KEEVKd);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T51 = T50_0;
    T52 = T51;
  } else {
    T52 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  if (T52 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T53 = Tdebug_out_functionTVKi;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    T16 = MAKE_CLOSURE_INITD(&Kanonymous_of_lookup_and_coerced_applyF27, 3, coerced_args_, types_, func_);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
    CALL1(T53, T16);
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
  i_T = 1;
L0: ;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
    i_ = i_T;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
    T60 = primitive_cast_raw_as_integer(i_);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
    CONGRUENT_CALL_PROLOG(&KLVKd, 2);
    T19 = CONGRUENT_CALL2(T60, req_number_);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
    if (T19 != &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:115
      T20 = CALL2(&KelementVKd, types_, T60);
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:115
      CONGRUENT_CALL_PROLOG(&KelementVKd, 3);
      T21 = CONGRUENT_CALL3(coerced_args_, T60, &KPempty_vectorVKi);
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:114
      T54.vector_element_[0] = T20;
      T54.vector_element_[1] = T21;
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:114
      T55 = Kapplicable_methodQVKdMM1I(&Kcoerce_for_command_callVenvironment_manager, &T54);
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:114
      if (T55 != &KPfalseVKi) {
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:116
        T22 = CALL2(&KelementVKd, types_, T60);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:116
        CONGRUENT_CALL_PROLOG(&KelementVKd, 3);
        T23 = CONGRUENT_CALL3(coerced_args_, T60, &KPempty_vectorVKi);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:116
        T24 = CALL2(&Kcoerce_for_command_callVenvironment_manager, T22, T23);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:116
        CALL3(&Kelement_setterVKd, T24, coerced_args_, T60);
      } else {
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:124
        CONGRUENT_CALL_PROLOG(&KelementVKd, 3);
        T25 = CONGRUENT_CALL3(coerced_args_, T60, &KPempty_vectorVKi);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:124
        CONGRUENT_CALL_PROLOG(&KelementVKd, 3);
        T26 = CONGRUENT_CALL3(coerced_args_, T60, &KPempty_vectorVKi);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:124
        T27 = Kobject_classVKdI(T26);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:125
        T28 = CALL2(&KelementVKd, types_, T60);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:123
        T56.vector_element_[0] = T60;
        T56.vector_element_[1] = fun_name_;
        T56.vector_element_[2] = T25;
        T56.vector_element_[3] = T27;
        T56.vector_element_[4] = T28;
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:123
        T57 = primitive_copy_vector(&T56);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:118
        T58.vector_element_[0] = &KJformat_string_;
        T58.vector_element_[1] = &K20;
        T58.vector_element_[2] = &KJformat_arguments_;
        T58.vector_element_[3] = T57;
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:118
        CONGRUENT_CALL_PROLOG(&KmakeVKd, 2);
        T29 = CONGRUENT_CALL2(&KLcommand_call_errorGYenvironment_command_callingVenvironment_manager, &T58);
        // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:118
        KerrorVKdMM0I(T29, &KPempty_vectorVKi);
      }
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:114
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
      T59 = primitive_machine_word_add_signal_overflow(i_,4);
      // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
      i_T = T59;
      goto L0;
    }
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:113
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  T61 = TdebuggingQTVKi;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  if (T61 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T62 = Tdebug_partsTVKi;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T63 = primitive_idQ(T62,&KPempty_listVKi);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T64 = primitive_not(T63);
    T65 = T64;
  } else {
    T65 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  if (T65 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T66 = Tdebug_partsTVKi;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T67_0 = KmemberQVKdMM4I(IKJenvironment_manager_, T66, &KPempty_vectorVKi, &KEEVKd);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T68 = T67_0;
    T69 = T68;
  } else {
    T69 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  if (T69 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T70 = Tdebug_out_functionTVKi;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    T30 = MAKE_CLOSURE_INITD(&Kanonymous_of_lookup_and_coerced_applyF24, 1, coerced_args_);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
    CALL1(T70, T30);
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:131
  T71.vector_element_[0] = func_;
  T71.vector_element_[1] = coerced_args_;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:131
  T31 = KapplyVKdI(&Kapplicable_methodQVKd, &T71);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:131
  if (T31 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:135
    T72.vector_element_[0] = coerced_args_;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:135
    T32 = KapplyVKdI(func_, &T72);
    T34 = T32;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:142
    T73.vector_element_[0] = func_;
    T73.vector_element_[1] = coerced_args_;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:142
    T74 = primitive_copy_vector(&T73);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:137
    T75.vector_element_[0] = &KJformat_string_;
    T75.vector_element_[1] = &K21;
    T75.vector_element_[2] = &KJformat_arguments_;
    T75.vector_element_[3] = T74;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:137
    CONGRUENT_CALL_PROLOG(&KmakeVKd, 2);
    T33 = CONGRUENT_CALL2(&KLcommand_call_errorGYenvironment_command_callingVenvironment_manager, &T75);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:137
    T76 = KerrorVKdMM0I(T33, &KPempty_vectorVKi);
    T34 = T76;
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:131
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:78
  return(T34);
}

static dylan_value Kanonymous_of_lookup_and_coerced_applyF27I () {
  _KLsimple_object_vectorGVKd_4 T0 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  dylan_value T1;
  dylan_value T2_0;
  CAPTURE_ENVIRONMENT

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  T0.vector_element_[0] = &K28;
  T0.vector_element_[1] = CREF(2);
  T0.vector_element_[2] = CREF(1);
  T0.vector_element_[3] = CREF(0);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  T1 = primitive_copy_vector(&T0);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  T2_0 = T1;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  MV_SET_COUNT(1);
  return(T2_0);
}

static dylan_value Kanonymous_of_lookup_and_coerced_applyF24I () {
  _KLsimple_object_vectorGVKd_2 T0 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  dylan_value T1;
  dylan_value T2_0;
  CAPTURE_ENVIRONMENT

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  T0.vector_element_[0] = &K25;
  T0.vector_element_[1] = CREF(0);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  T1 = primitive_copy_vector(&T0);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  T2_0 = T1;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:128
  MV_SET_COUNT(1);
  return(T2_0);
}

dylan_value Klookup_command_functionYenvironment_command_callingVenvironment_managerI (dylan_value name_) {
  dylan_value command_pair_;
  dylan_value T3_0;
  dylan_value T4;
  dylan_value T5_0;
  _KLsimple_object_vectorGVKd_4 T6 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  dylan_value T7_0;
  dylan_value T8_0;

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:59
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:63
  command_pair_ = CALL4(&KelementVKd, Denvironment_command_functionsVenvironment_manager, name_, &KJdefault_, &KPfalseVKi);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:64
  if (command_pair_ != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:65
    T3_0 = CALL1(&KheadVKd, command_pair_);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:65
    T8_0 = T3_0;
    {
      MV_CHECK_TYPE_PROLOGUE(T3_0);
      primitive_type_check(T8_0, &KLfunctionGVKd);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T5_0 = T8_0;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:67
    T6.vector_element_[0] = &KJformat_string_;
    T6.vector_element_[1] = &K23;
    T6.vector_element_[2] = &KJformat_arguments_;
    T6.vector_element_[3] = name_;
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:67
    CONGRUENT_CALL_PROLOG(&KmakeVKd, 2);
    T4 = CONGRUENT_CALL2(&KLcommand_call_errorGYenvironment_command_callingVenvironment_manager, &T6);
    // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:67
    T7_0 = KerrorVKdMM0I(T4, &KPempty_vectorVKi);
    T5_0 = T7_0;
  }
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:64
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:59
  MV_SET_COUNT(1);
  return(T5_0);
}

dylan_value KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0I (dylan_value class_, dylan_value init_args_, dylan_value Uunique_condition_format_string_, dylan_value Uunique_condition_format_arguments_) {
  dylan_value T5;
  dylan_value T6_0;

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:27
  T5 = primitive_object_allocate_filled(3,&KLcommand_call_errorGYenvironment_command_callingVenvironment_managerW,2,&KPunboundVKi,0,0,&KPunboundVKi);
  SLOT_VALUE_SETTER(Uunique_condition_format_string_, T5, 0);
  SLOT_VALUE_SETTER(Uunique_condition_format_arguments_, T5, 1);
  APPLY2(&KinitializeVKd, T5, init_args_);
  T6_0 = T5;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:27
  MV_SET_COUNT(1);
  return(T6_0);
}


/* SYSTEM INIT CODE */

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

    T0 = KPresolve_symbolVKiI(&KJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_);
    if (T0 != &KJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_) {
      IKJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJenvironment_manager_);
    if (T0 != &KJenvironment_manager_) {
      IKJenvironment_manager_ = T0;
    }
  }
{
  dylan_value T0;

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:12
  T0 = KPadd_classVKeI(&KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager);
  goto I0;
}
I0:

{
  dylan_value T0;

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:27
  T0 = KPadd_classVKeI(&KLcommand_call_errorGYenvironment_command_callingVenvironment_manager);
  goto I3;
}
I3:

  return;
}

/* USER INIT CODE */

void _Init_environment_manager__X_command_call_for_user () {
{
  dylan_value T0;
  dylan_value T1;
  dylan_value T2_0;

  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:38
  T2_0 = KLobject_tableGZ32ZconstructorVKiMM0I(&KLobject_tableGVKd, &KPempty_vectorVKi, &KLobjectGVKd, (dylan_value) 41, &Kdefault_grow_sizeVKe, &KPfalseVKi);
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:38
  T1 = T2_0;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:38
  Denvironment_command_functionsVenvironment_manager = T1;
  // /home/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:38
  T0 = &KPfalseVKi;
  goto I6;
}
I6:

  return;
}


/* eof */
