#include "run-time.h"

/* Typedefs for referenced classes */

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

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

#define  define__KLsimple_object_vectorGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    D vector_element_[nrepeated+1]; \
  } _KLsimple_object_vectorGVKd_##nrepeated;
define__KLsimple_object_vectorGVKd(6);
define__KLsimple_object_vectorGVKd(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 {
  D wrapper;
} _KLobjectGVKd;

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

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

typedef struct {
  D wrapper;
} _KLbooleanGVKd;

typedef struct {
  D wrapper;
} _KLunboundGVKe;

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 symbol_name_;
} _KLsymbolGVKd;

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D 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 {
  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;
} _KLsimple_vectorGVKd;

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

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

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

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

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

typedef struct {
  D wrapper;
} _KLconditionGVKd;

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

typedef struct {
  D wrapper;
} _KLserious_conditionGVKd;

typedef struct {
  D wrapper;
} _KLerrorGVKd;

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

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

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

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

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

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


/* Typedefs for defined classes */

typedef struct {
  D wrapper;
} _KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager;

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


/* Referenced object declarations */

D KPadd_classVKeI (D);
D KLobject_tableGZ32ZconstructorVKiMM0I (D, D, D, D, D, D);
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;
D KerrorVKdMM0I (D, D);
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLincremental_generic_functionGVKe Kcopy_sequenceVKd;
D KmemberQVKdMM3I (D, D, D, D);
extern _KLsimple_methodGVKe KEEVKd;
extern _KLincremental_generic_functionGVKe KelementVKd;
D Kapplicable_methodQVKdMM1I (D, D);
extern _KLsealed_generic_functionGVKe Kcoerce_for_command_callVenvironment_manager;
D Kobject_classVKdI (D);
D KapplyVKdI (D, D);
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;
D Kclass_instanceQ_initialVKiI (D, D);
extern _KLmoduleGVKe Kenvironment_command_calling_moduleYdylan_userVenvironment_manager;
extern _KLclassGVKd KLmoduleGVKe;
extern _KLmm_wrapperGVKi_0 KLmoduleGVKeW;
extern _KLkeyword_methodGVKe Kdefault_class_constructorVKi;
D Kclass_instanceQ_rcpl_single_smallVKiI (D, D);
extern _KLclassGVKd KLpairGVKd;
extern D TdebuggingQTVKi;
extern D Tdebug_partsTVKi;
extern D 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;
D Kregister_command_functionYenvironment_command_callingVenvironment_managerI (D, D);
static _KLsymbolGVKd KJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_;
static _KLbyte_stringGVKd_40 K9;
extern _KLsimple_methodGVKe Klookup_and_coerced_applyYenvironment_command_callingVenvironment_manager;
D Klookup_and_coerced_applyYenvironment_command_callingVenvironment_managerI (D, D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_lookup_and_coerced_applyF27;
static D Kanonymous_of_lookup_and_coerced_applyF27I ();
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_lookup_and_coerced_applyF24;
static D Kanonymous_of_lookup_and_coerced_applyF24I ();
D Klookup_command_functionYenvironment_command_callingVenvironment_managerI (D);
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;
D KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0I (D, D, D, D);
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 D IKJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_ = &KJreturningZ32ZvaluesZ32ZisZ32ZnotZ32ZimplementedZ32ZyetX_;
static D IKJenvironment_manager_ = &KJenvironment_manager_;

/* Variables */

D Lcommand_call_conditionGYenvironment_command_callingVenvironment_manager = &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager;
D Lcommand_call_errorGYenvironment_command_callingVenvironment_manager = &KLcommand_call_errorGYenvironment_command_callingVenvironment_manager;
D Denvironment_command_functionsVenvironment_manager = &KPunboundVKi;
D register_command_functionYenvironment_command_callingVenvironment_manager = &Kregister_command_functionYenvironment_command_callingVenvironment_manager;
D lookup_command_functionYenvironment_command_callingVenvironment_manager = &Klookup_command_functionYenvironment_command_callingVenvironment_manager;
D 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,
  (D) 1,
  &Kenvironment_command_calling_moduleYdylan_userVenvironment_manager
};

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

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

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

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

static _KLbyte_stringGVKd_40 K9 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 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,
  (D) 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,
  (D) 1
};

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

static _KLbyte_stringGVKd_86 K18 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 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 */,
  (D) 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 */,
  (D) 305,
  "lookup-and-coerced-apply: no applicable method after coercion for %= with %="
};

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

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

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

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

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

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

static _KLsimple_object_vectorGVKd_2 K30 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 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 */,
  (D) 33555461,
  &K33,
  &KDsignature_LfunctionG_typesVKi
};

static _KLsimple_object_vectorGVKd_1 K33 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 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 */,
  (D) 41943049,
  &K36
};

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

static _KLimplementation_classGVKe K37 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (D) 477102089,
  &KLcommand_call_errorGYenvironment_command_callingVenvironment_manager,
  &KLcommand_call_errorGYenvironment_command_callingVenvironment_managerW,
  &KPfalseVKi,
  &K38,
  (D) -3,
  &KLcommand_call_errorGZ32ZconstructorVenvironment_managerMM0,
  &K41,
  &K42,
  (D) 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 */,
  (D) 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 */,
  (D) 9,
  &KLsimple_errorGVKd,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager
};

static _KLsimple_object_vectorGVKd_8 K42 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 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 */,
  (D) 35390469,
  &KDsignature_LclassG_typesVKi,
  &K45,
  &KDsignature_LobjectG_typesVKi,
  &K46
};

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

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

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

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

static _KLimplementation_classGVKe K48 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (D) 410255361,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_manager,
  &KLcommand_call_conditionGYenvironment_command_callingVenvironment_managerW,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) -3,
  &Kdefault_class_constructorVKi,
  &K49,
  &K50,
  (D) 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 */,
  (D) 5,
  &KLconditionGVKd
};

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

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

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

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

/* Code */

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

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

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

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

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

  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  // /Users/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);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  T1 = primitive_copy_vector(&T0);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  T2_0 = T1;
  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:106
  MV_SET_COUNT(1);
  return(T2_0);
}

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

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

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

  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:59
  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:63
  command_pair_ = CALL4(&KelementVKd, Denvironment_command_functionsVenvironment_manager, name_, &KJdefault_, &KPfalseVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:64
  if (command_pair_ != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:65
    T3_0 = CALL1(&KheadVKd, command_pair_);
    // /Users/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 {
    // /Users/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_;
    // /Users/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);
    // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:67
    T7_0 = KerrorVKdMM0I(T4, &KPempty_vectorVKi);
    T5_0 = T7_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:64
  // /Users/bruce/Development/dylan/opendylan/sources/environment/manager/command-call.dylan:59
  MV_SET_COUNT(1);
  return(T5_0);
}

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

  // /Users/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;
  // /Users/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 D KPresolve_symbolVKiI(D);
  {
    D T0;

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

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

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

{
  D T0;

  // /Users/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 () {
{
  D T0;
  D T1;
  D T2_0;

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

  return;
}


/* eof */
