#include "run-time.h"

/* Typedefs for referenced classes */

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

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

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

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

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

typedef struct {
  D wrapper;
} _KLbooleanGVKd;

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

typedef struct {
  D wrapper;
} _KLunboundGVKe;

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

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

#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(16);
define__KLsimple_object_vectorGVKd(8);
define__KLsimple_object_vectorGVKd(18);
define__KLsimple_object_vectorGVKd(9);
define__KLsimple_object_vectorGVKd(256);
define__KLsimple_object_vectorGVKd(1);
define__KLsimple_object_vectorGVKd(6);
define__KLsimple_object_vectorGVKd(4);
define__KLsimple_object_vectorGVKd(3);
define__KLsimple_object_vectorGVKd(2);
define__KLsimple_object_vectorGVKd(0);

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

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

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

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

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(52);
define__KLbyte_stringGVKd(35);
define__KLbyte_stringGVKd(23);
define__KLbyte_stringGVKd(29);
define__KLbyte_stringGVKd(60);
define__KLbyte_stringGVKd(24);
define__KLbyte_stringGVKd(41);
define__KLbyte_stringGVKd(7);
define__KLbyte_stringGVKd(46);
define__KLbyte_stringGVKd(53);
define__KLbyte_stringGVKd(22);
define__KLbyte_stringGVKd(12);
define__KLbyte_stringGVKd(5);
define__KLbyte_stringGVKd(4);
define__KLbyte_stringGVKd(11);
define__KLbyte_stringGVKd(34);
define__KLbyte_stringGVKd(15);
define__KLbyte_stringGVKd(3);
define__KLbyte_stringGVKd(9);
define__KLbyte_stringGVKd(6);
define__KLbyte_stringGVKd(8);
define__KLbyte_stringGVKd(17);
define__KLbyte_stringGVKd(20);
define__KLbyte_stringGVKd(10);
define__KLbyte_stringGVKd(27);
define__KLbyte_stringGVKd(33);
define__KLbyte_stringGVKd(31);
define__KLbyte_stringGVKd(0);

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

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

typedef struct {
  D wrapper;
  D xep_;
  D method_slot_descriptor_;
} _KLsetter_methodGVKi;

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

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

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_fragments_;
} _KLsequence_fragmentGVdfmc_reader;

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

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

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_macro_;
  D fragment_list_fragment_;
} _KLlocal_declaration_fragmentGVdfmc_reader;

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

#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 private_shadowable_form_init_method_;
  D private_shadowable_form_system_init_method_;
  D shadowable_form_properties_flags_;
  D form_compilation_record_;
  D private_form_source_location_;
  D private_form_parent_form_;
  D form_sequence_number_;
  D private_form_dependencies_;
  D private_form_referenced_variables_;
  D private_form_body_;
} _KLtop_level_init_formGVdfmc_common;

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

typedef struct {
  D wrapper;
} _KLvectorGVKd;

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

typedef struct {
  D wrapper;
  D private_shadowable_form_init_method_;
  D private_shadowable_form_system_init_method_;
  D shadowable_form_properties_flags_;
  D form_compilation_record_;
  D private_form_source_location_;
  D private_form_parent_form_;
  D form_sequence_number_;
  D private_form_dependencies_;
  D private_form_referenced_variables_;
  D private_form_adjectives_;
  D private_form_variable_name_or_names_;
  D form_properties_;
  D form_macro_object_;
  D form_expander_;
  D private_form_macro_word_;
  D private_form_macro_word_class_;
} _KLexpander_defining_formGVdfmc_definitions;

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
} _KLmacro_call_fragmentGVdfmc_reader;

typedef struct {
  D wrapper;
  D private_shadowable_form_init_method_;
  D private_shadowable_form_system_init_method_;
  D shadowable_form_properties_flags_;
  D form_compilation_record_;
  D private_form_source_location_;
  D private_form_parent_form_;
  D form_sequence_number_;
  D private_form_dependencies_;
  D private_form_referenced_variables_;
  D booted_form_boot_id_;
  D private_form_adjectives_;
  D private_form_variable_name_or_names_;
  D form_properties_;
  D form_macro_object_;
  D form_expander_;
  D private_form_macro_word_;
  D private_form_macro_word_class_;
} _KLBconverter_definitionGVdfmc_definitions;

typedef struct {
  D wrapper;
  D private_shadowable_form_init_method_;
  D private_shadowable_form_system_init_method_;
  D shadowable_form_properties_flags_;
  D form_compilation_record_;
  D private_form_source_location_;
  D private_form_parent_form_;
  D form_sequence_number_;
  D private_form_dependencies_;
  D private_form_referenced_variables_;
  D booted_form_boot_id_;
  D private_form_adjectives_;
  D private_form_variable_name_or_names_;
  D form_properties_;
  D form_macro_object_;
  D form_expander_;
  D private_form_macro_word_;
  D private_form_macro_word_class_;
} _KLBdefinition_definitionGVdfmc_definitions;

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

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_constituents_;
} _KLbody_fragmentGVdfmc_reader;

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
} _KLfragmentGVdfmc_reader;

typedef struct {
  D wrapper;
  D template_fragments_;
} _KLtemplateGVdfmc_reader;

typedef struct {
  D wrapper;
} _KLppmlGVppml;

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 instanceQ_iep_;
  D subclass_class_;
} _KLsubclassGVKe;

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;
  D slot_descriptor_properties_;
  D init_data_slot_;
  D slot_owner_;
  D init_keyword_;
  D init_arg_type_;
} _KLinit_arg_descriptorGVKe;

typedef struct {
  D wrapper;
} _KLconditionGVKd;

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

typedef struct {
  D wrapper;
  D condition_format_string_;
  D condition_format_arguments_;
  D condition_source_location_;
  D condition_program_note_creator_;
  D condition_compilation_stage_;
} _KLprogram_conditionGVdfmc_conditions;

typedef struct {
  D wrapper;
} _KLwarningGVKd;

typedef struct {
  D wrapper;
  D condition_format_string_;
  D condition_format_arguments_;
  D condition_source_location_;
  D condition_program_note_creator_;
  D condition_compilation_stage_;
  D condition_context_id_;
  D subnotes_;
} _KLprogram_noteGVdfmc_conditions;

typedef struct {
  D wrapper;
  D condition_format_string_;
  D condition_format_arguments_;
  D condition_source_location_;
  D condition_program_note_creator_;
  D condition_compilation_stage_;
  D condition_context_id_;
  D subnotes_;
} _KLprogram_warningGVdfmc_conditions;

typedef struct {
  D wrapper;
  D condition_format_string_;
  D condition_format_arguments_;
  D condition_source_location_;
  D condition_program_note_creator_;
  D condition_compilation_stage_;
  D condition_context_id_;
  D subnotes_;
} _KLserious_program_warningGVdfmc_conditions;

#define  define__KLkeyword_closure_methodGVKe(nrepeated) \
  typedef struct { \
    D wrapper; \
    D xep_; \
    D function_signature_; \
    D mep_; \
    D iep_; \
    D keyword_specifiers_; \
    D environment_size_; \
    D environment_element_[nrepeated+1]; \
  } _KLkeyword_closure_methodGVKe_##nrepeated;
define__KLkeyword_closure_methodGVKe(0);

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

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

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_function_;
  D fragment_arguments_;
} _KLfunction_call_fragmentGVdfmc_reader;

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_name_;
} _KLvariable_name_fragmentGVdfmc_reader;

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


/* Typedefs for defined classes */

typedef struct {
  D wrapper;
  D condition_format_string_;
  D condition_format_arguments_;
  D condition_source_location_;
  D condition_program_note_creator_;
  D condition_compilation_stage_;
  D condition_context_id_;
  D subnotes_;
  D condition_macro_name_;
} _KLskipping_formGVdfmc_definitions;

typedef struct {
  D wrapper;
  D condition_format_string_;
  D condition_format_arguments_;
  D condition_source_location_;
  D condition_program_note_creator_;
  D condition_compilation_stage_;
  D condition_context_id_;
  D subnotes_;
  D condition_macro_name_;
  D condition_library_name_;
} _KLinteractive_tight_mode_definitionGVdfmc_definitions;


/* Referenced object declarations */

D KPadd_classVKeI (D);
D KPadd_a_methodVKnI (D, D, D, D, D, D);
extern _KLincremental_generic_functionGVKe KmakeVKd;
extern _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLlibraryGVKe Kdfmc_definitions_libraryYdylan_userVdfmc_definitions;
extern _KLclassGVKd KLlibraryGVKe;
extern _KLmm_wrapperGVKi_0 KLlibraryGVKeW;
extern _KLbooleanGVKd KPfalseVKi;
extern _KLclassGVKd KLbooleanGVKd;
extern _KLmm_wrapperGVKi_0 KLbooleanGVKdW;
extern _KLsealed_generic_functionGVKe Kconvert_condition_slots_to_ppmlVdfmc_conditions;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
extern _KLclassGVKd KLobjectGVKd;
extern _KLmm_wrapperGVKi_0 KLobjectGVKdW;
extern _KLunboundGVKe KPunboundVKi;
extern _KLclassGVKd KLunboundGVKe;
extern _KLmm_wrapperGVKi_0 KLunboundGVKeW;
extern _KLbooleanGVKd KPtrueVKi;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLclassGVKd KLtop_level_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLtop_level_formGVdfmc_commonW;
extern _KLsimple_methodGVKe Kinstall_top_level_form_bindingsVdfmc_definitionsMM1;
extern _KLsimple_methodGVKe Kinstall_top_level_form_bindingsVdfmc_definitionsMM2;
extern _KLsimple_methodGVKe Kinstall_top_level_form_bindingsVdfmc_definitionsMM3;
extern _KLsimple_methodGVKe Kinstall_top_level_form_bindingsVdfmc_definitionsMM4;
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_1VKi;
extern _KLclassGVKd KLobject_signatureGVKe;
extern _KLmm_wrapperGVKi_0 KLobject_signatureGVKeW;
extern _KLabsent_engine_nodeGVKg RSINGULAR_Labsent_engine_nodeG;
extern _KLclassGVKd KLabsent_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLabsent_engine_nodeGVKgW;
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLclassGVKd KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLclassGVKd KLvariable_defining_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLvariable_defining_formGVdfmc_commonW;
extern _KLsealed_generic_functionGVKe Kform_variable_namesVdfmc_common;
extern _KLincremental_generic_functionGVKe Kforward_iteration_protocolVKd;
D Kadd_definitionVdfmc_namespaceMM0I (D, D);
extern _KLsimple_methodGVKe Kuninstall_top_level_form_bindingsVdfmc_definitionsMM1;
extern _KLsimple_methodGVKe Kuninstall_top_level_form_bindingsVdfmc_definitionsMM2;
extern _KLsimple_methodGVKe Kuninstall_top_level_form_bindingsVdfmc_definitionsMM3;
extern _KLsimple_methodGVKe Kuninstall_top_level_form_bindingsVdfmc_definitionsMM4;
D Kremove_definitionVdfmc_namespaceMM0I (D, D);
extern _KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM2;
extern _KLclassGVKd KLsetter_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLsetter_methodGVKiW;
extern _KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM3;
extern _KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM4;
extern _KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM5;
extern _KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM6;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_2VKi;
extern _KLclassGVKd KLinstance_slot_descriptorGVKe;
extern _KLmm_wrapperGVKi_0 KLinstance_slot_descriptorGVKeW;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM2;
extern _KLclassGVKd KLgetter_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLgetter_methodGVKiW;
extern _KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM3;
extern _KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM4;
extern _KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM5;
extern _KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM6;
extern _KLsealed_generic_functionGVKe Kform_compilation_recordVdfmc_common;
extern _KLsealed_generic_functionGVKe Kadd_derived_top_level_formsVdfmc_common;
extern _KLsealed_generic_functionGVKe Kinstall_top_level_formsVdfmc_common;
extern _KLsealed_generic_functionGVKe Kas_fragment_tokensVdfmc_macro_expander;
D Kmatch_name_constraintVdfmc_macro_expanderI (D);
D Kdylan_variable_nameVdfmc_readerI (D);
D Kmacro_main_rule_match_errorVdfmc_macro_expanderI (D, D);
extern _KLsealed_generic_functionGVKe Kexport_fragment_tokensVdfmc_macro_expander;
D KLsequence_fragmentGZ32ZconstructorVdfmc_readerMM0I (D, D, D, D, D);
extern _KLclassGVKd KLsequence_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLsequence_fragmentGVdfmc_readerW;
D KLobject_tableGZ32ZconstructorVKiMM0I (D, D, D, D, D, D);
extern _KLclassGVKd KLobject_tableGVKd;
extern _KLmm_wrapperGVKi_0 KLobject_tableGVKdW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLsimple_methodGVKe Kdefault_grow_sizeVKe;
extern _KLincremental_generic_functionGVKe Kremove_all_keysXVKe;
extern _KLclassGVKd KLsequenceGVKd;
extern _KLmm_wrapperGVKi_0 KLsequenceGVKdW;
D Kmake_name_fragmentVdfmc_macro_expanderI (D);
D Kmake_templateVdfmc_macro_expanderI (D);
extern _KLsimple_methodGVKe Klookup_bindingVdfmc_namespaceMM0;
D Kdylan_bindingVdfmc_namespaceMM0I (D);
D KEEVKdI (D, D);
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LsequenceG_typesVKi;
extern _KLclassGVKd KLlocal_declaration_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLlocal_declaration_fragmentGVdfmc_readerW;
extern _KLsealed_generic_functionGVKe Kfragment_macroVdfmc_reader;
D Kmacro_definitionVdfmc_namespaceMM0I (D);
extern _KLkeyword_methodGVKe Kdo_handling_parse_errorsVdfmc_macro_expanderMM0;
extern _KLfunction_classGVKi KLkeyword_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_methodGVKeW;
extern _KLsealed_generic_functionGVKe KsignalVKd;
D Kfragment_source_locationVdfmc_readerMM0I (D);
extern _KLincremental_generic_functionGVKe KnoteVdfmc_conditions;
extern _KLfunction_classGVKi KLsimple_closure_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLsimple_closure_methodGVKiW;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_3VKi;
extern _KLsealed_generic_functionGVKe Kform_expanderVdfmc_definitions;
D Kcompiling_for_macroexpansionQVdfmc_macro_expanderMM0I ();
D KLtop_level_init_formGZ32ZconstructorVdfmc_commonMM0I (D, D, D, D, D);
extern _KLclassGVKd KLtop_level_init_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLtop_level_init_formGVdfmc_commonW;
D KlistVKdI (D);
D Kmacro_definition_wordVdfmc_definitionsMM0I (D form_);
D KLmacro_call_formGZ32ZconstructorVdfmc_commonMM0I (D, D, D, D, D);
extern _KLclassGVKd KLmacro_call_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLmacro_call_formGVdfmc_commonW;
extern _KLincremental_generic_functionGVKe KasVKd;
extern _KLclassGVKd KLvectorGVKd;
extern _KLmm_wrapperGVKi_0 KLvectorGVKdW;
extern _KLsimple_methodGVKe Kform_derived_forms_setterVdfmc_commonMM0;
extern _KLclassGVKd KLfunctionGVKd;
extern _KLmm_wrapperGVKi_0 KLfunctionGVKdW;
extern _KLclassGVKd KLexpander_defining_formGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLexpander_defining_formGVdfmc_definitionsW;
extern _KLclassGVKd KLmacro_call_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLmacro_call_fragmentGVdfmc_readerW;
extern _KLsealed_generic_functionGVKe Kfragment_argumentVdfmc_reader;
D Kmatch_bounded_body_constraintVdfmc_macro_expanderI (D, D);
extern _KLclassGVKd KLBconverter_definitionGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLBconverter_definitionGVdfmc_definitionsW;
extern _KLsealed_generic_functionGVKe Kcurrent_library_descriptionVdfmc_common;
extern _KLsealed_generic_functionGVKe Klibrary_forms_dynamicQVdfmc_namespace;
extern _KLsimple_methodGVKe Klibrary_description_emit_nameVdfmc_namespaceMM0;
extern _KLsealed_generic_functionGVKe Kform_parent_formVdfmc_common;
extern _KLsimple_methodGVKe Kform_parent_form_setterVdfmc_commonMM0;
extern _KLclassGVKd KLBdefinition_definitionGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLBdefinition_definitionGVdfmc_definitionsW;
extern _KLclassGVKd KLsimple_typechecked_cache_header_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLsimple_typechecked_cache_header_engine_nodeGVKgW;
extern _KLincremental_generic_functionGVKe KreduceVKd;
extern _KLsealed_generic_functionGVKe KconcatenateVKd;
extern _KLclassGVKd KLbody_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLbody_fragmentGVdfmc_readerW;
extern _KLsealed_generic_functionGVKe Kfragment_source_locationVdfmc_reader;
extern _KLclassGVKd KLfragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLfragmentGVdfmc_readerW;
extern _KLsimple_methodGVKe Kinstall_top_level_formVdfmc_definitionsMM2;
extern _KLsimple_methodGVKe Kinstall_top_level_formVdfmc_definitionsMM3;
D Kcompilation_record_ofVdfmc_commonMM1I (D);
extern _KLsimple_methodGVKe Kcompilation_record_downloadedQVdfmc_common;
D Kdebug_assertion_failureVKiI (D, D);
extern _KLsealed_generic_functionGVKe Kcompilation_record_libraryVdfmc_common;
extern _KLsealed_generic_functionGVKe Kcurrent_library_descriptionQVdfmc_common;
extern _KLsealed_generic_functionGVKe Kform_ignoredQVdfmc_namespace;
extern _KLincremental_generic_functionGVKe KmemberQVKd;
D Kformat_outYformat_outVioMM0I (D, D);
D Kform_top_level_installedQ_setterVdfmc_commonMM0I (D, D);
D Kmatch_bounded_body_constraint_no_backtrackingVdfmc_macro_expanderI (D, D);
extern _KLsimple_methodGVKe Kparse_template_fragments_asVdfmc_macro_expanderMM0;
D KerrorVKdMM1I (D, D);
extern _KLclassGVKd KLtemplateGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLtemplateGVdfmc_readerW;
extern _KLsimple_methodGVKe Kuninstall_top_level_formVdfmc_definitionsMM1;
extern _KLsimple_methodGVKe Kuninstall_top_level_formVdfmc_definitionsMM2;
extern _KLclassGVKd KLppmlGVppml;
extern _KLmm_wrapperGVKi_0 KLppmlGVppmlW;
D KmemberQVKdMM2I (D, D, D, D);
extern _KLsymbolGVKd KJformat_arguments_;
extern _KLsimple_methodGVKe KEEVKd;
extern _KLclassGVKd KLkeyword_signatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLkeyword_signatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_256 KDsignature_LobjectG_typesVKi;
extern _KLclassGVKd KLsubclassGVKe;
extern _KLmm_wrapperGVKi_0 KLsubclassGVKeW;
D Ksubclass_instanceQVKiI (D, D);
extern _KLclassGVKd KLimplementation_classGVKe;
extern _KLmm_wrapperGVKi_0 KLimplementation_classGVKeW;
extern _KLclassGVKd KLinit_arg_descriptorGVKe;
extern _KLmm_wrapperGVKi_0 KLinit_arg_descriptorGVKeW;
extern _KLsymbolGVKd KJformat_string_;
extern _KLclassGVKd KLconditionGVKd;
extern _KLmm_wrapperGVKi_0 KLconditionGVKdW;
extern _KLclassGVKd KLsimple_conditionGVKe;
extern _KLmm_wrapperGVKi_0 KLsimple_conditionGVKeW;
extern _KLclassGVKd KLprogram_conditionGVdfmc_conditions;
extern _KLmm_wrapperGVKi_0 KLprogram_conditionGVdfmc_conditionsW;
extern _KLclassGVKd KLwarningGVKd;
extern _KLmm_wrapperGVKi_0 KLwarningGVKdW;
extern _KLclassGVKd KLprogram_noteGVdfmc_conditions;
extern _KLmm_wrapperGVKi_0 KLprogram_noteGVdfmc_conditionsW;
extern _KLclassGVKd KLprogram_warningGVdfmc_conditions;
extern _KLmm_wrapperGVKi_0 KLprogram_warningGVdfmc_conditionsW;
extern _KLclassGVKd KLserious_program_warningGVdfmc_conditions;
extern _KLmm_wrapperGVKi_0 KLserious_program_warningGVdfmc_conditionsW;
D Kdefaulted_initialization_argumentsVKiI (D);
D Kconcatenate_2VKeMM1I (D, D);
extern _KLincremental_generic_functionGVKe KinitializeVKd;
extern _KLfunction_classGVKi KLkeyword_closure_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_closure_methodGVKeW;
extern _KLbyte_stringGVKd_0 KPempty_stringVKi;
extern _KLclassGVKd KLkeyword_signatureGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_signatureGVKeW;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LclassG_typesVKi;
extern _KLinstance_slot_descriptorGVKe Kcondition_format_stringVKdHLsimple_conditionG;
extern _KLinstance_slot_descriptorGVKe Kcondition_format_argumentsVKdHLsimple_conditionG;
extern _KLinstance_slot_descriptorGVKe Kcondition_source_locationVdfmc_conditionsHLprogram_conditionG;
extern _KLinstance_slot_descriptorGVKe Kcondition_program_note_creatorVdfmc_conditionsHLprogram_conditionG;
extern _KLinstance_slot_descriptorGVKe Kcondition_compilation_stageVdfmc_conditionsHLprogram_conditionG;
extern _KLinstance_slot_descriptorGVKe Kcondition_context_idVdfmc_conditionsHLprogram_noteG;
extern _KLinstance_slot_descriptorGVKe KsubnotesVdfmc_conditionsHLprogram_noteG;
D Kclass_instanceQ_initialVKiI (D, D);
extern _KLmoduleGVKe Kdfmc_definitions_moduleYdylan_userVdfmc_definitions;
extern _KLclassGVKd KLmoduleGVKe;
extern _KLmm_wrapperGVKi_0 KLmoduleGVKeW;
D Kbooted_definition_sequenceVdfmc_definitionsMM0I ();
D Kbooted_source_sequenceVdfmc_definitionsMM0I ();
D Kdylan_implementation_moduleVdfmc_namespaceI ();
extern _KLincremental_generic_functionGVKe KconcatenateXYcommon_extensionsVcommon_dylan;
extern _KLclassGVKd KLfunction_call_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLfunction_call_fragmentGVdfmc_readerW;
extern _KLclassGVKd KLvariable_name_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLvariable_name_fragmentGVdfmc_readerW;
D KEVKdMM27I (D, D);
extern _KLclassGVKd KLcompilation_recordGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLcompilation_recordGVdfmc_commonW;
extern D Texpansion_source_locationTVdfmc_macro_expander;
extern D Texpansion_fragment_cacheTVdfmc_macro_expander;
extern D Dshared_expansion_fragment_cacheVdfmc_macro_expander;
extern D Tinteractive_compilation_layerTVdfmc_common;
extern D Tcurrent_stageTVdfmc_common;
extern D Tcurrent_dependentTVdfmc_common;
extern D TdebuggingQTVKi;
extern D Tdebug_outTVdfmc_common;
extern D Dstart_body_constraintVdfmc_reader;
extern D Tfragment_contextTVdfmc_reader;

/* Defined object declarations */

extern _KLclassGVKd KLskipping_formGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLskipping_formGVdfmc_definitionsW;
extern _KLkeyword_methodGVKe KmakeVKdMdfmc_definitionsM0;
D KmakeVKdMdfmc_definitionsM0I (D, D, D);
extern _KLsimple_methodGVKe Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM0;
D Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM0I (D);
extern _KLclassGVKd KLinteractive_tight_mode_definitionGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLinteractive_tight_mode_definitionGVdfmc_definitionsW;
extern _KLkeyword_methodGVKe KmakeVKdMdfmc_definitionsM1;
D KmakeVKdMdfmc_definitionsM1I (D, D, D, D);
extern _KLsimple_methodGVKe Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM1;
D Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM1I (D);
extern _KLsealed_generic_functionGVKe Kuninstall_top_level_formVdfmc_definitions;
extern _KLsealed_generic_functionGVKe Kas_bodyVdfmc_definitions;
extern _KLsealed_generic_functionGVKe Kinstall_top_level_formVdfmc_definitions;
extern _KLsealed_generic_functionGVKe Ktop_level_convertVdfmc_definitions;
D Kas_nameVdfmc_definitionsMM0I (D);
D Kadd_derived_top_level_fragmentVdfmc_definitionsMM0I (D, D);
extern _KLsealed_generic_functionGVKe Kcondition_macro_nameVdfmc_definitions;
extern _KLsealed_generic_functionGVKe Kcondition_macro_name_setterVdfmc_definitions;
D Kuninstall_top_level_form_bindingsVdfmc_definitionsMM0I (D);
extern _KLsealed_generic_functionGVKe Kuninstall_top_level_form_bindingsVdfmc_definitions;
D Kinstall_top_level_form_bindingsVdfmc_definitionsMM0I (D);
extern _KLsealed_generic_functionGVKe Kinstall_top_level_form_bindingsVdfmc_definitions;
extern _KLsimple_methodGVKe Kadd_derived_top_level_fragmentVdfmc_definitionsMM0;
static _KLsignatureGVKe K31;
static _KLsimple_object_vectorGVKd_2 K32;
extern _KLsimple_methodGVKe Kinstall_top_level_form_bindingsVdfmc_definitionsMM0;
static _KLpairGVKd K34;
static _KLpairGVKd K35;
static _KLpairGVKd K36;
static _KLpairGVKd K37;
static _KLpairGVKd K38;
static _KLbyte_stringGVKd_31 K39;
static _KLsignatureGVKe K40;
static _KLsimple_object_vectorGVKd_1 K41;
extern _KLsimple_methodGVKe Kuninstall_top_level_form_bindingsVdfmc_definitionsMM0;
static _KLpairGVKd K43;
static _KLpairGVKd K44;
static _KLpairGVKd K45;
static _KLpairGVKd K46;
static _KLpairGVKd K47;
static _KLbyte_stringGVKd_33 K48;
extern _KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM0;
extern _KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM1;
static _KLpairGVKd K51;
static _KLpairGVKd K52;
static _KLpairGVKd K53;
static _KLpairGVKd K54;
static _KLpairGVKd K55;
static _KLpairGVKd K56;
static _KLpairGVKd K57;
static _KLbyte_stringGVKd_27 K58;
extern _KLinstance_slot_descriptorGVKe Kcondition_macro_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG;
static _KLsymbolGVKd KJmacro_name_;
static _KLbyte_stringGVKd_10 K61;
extern _KLinstance_slot_descriptorGVKe Kcondition_macro_nameVdfmc_definitionsHLskipping_formG;
extern _KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM0;
extern _KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM1;
static _KLpairGVKd K65;
static _KLpairGVKd K66;
static _KLpairGVKd K67;
static _KLpairGVKd K68;
static _KLpairGVKd K69;
static _KLpairGVKd K70;
static _KLpairGVKd K71;
static _KLbyte_stringGVKd_20 K72;
static _KLsymbolGVKd KJmacro_case_;
static _KLbyte_stringGVKd_10 K74;
extern _KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM0;
D Ktop_level_convertVdfmc_definitionsMM0I (D, D);
extern _KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM1;
D Ktop_level_convertVdfmc_definitionsMM1I (D, D);
extern _KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM2;
D Ktop_level_convertVdfmc_definitionsMM2I (D, D);
extern _KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM3;
D Ktop_level_convertVdfmc_definitionsMM3I (D, D);
extern _KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM4;
D Ktop_level_convertVdfmc_definitionsMM4I (D, D);
static _KLpairGVKd K85;
static _KLpairGVKd K86;
static _KLpairGVKd K87;
static _KLpairGVKd K88;
static _KLpairGVKd K89;
static _KLbyte_stringGVKd_17 K90;
D Klet_fragmentQVdfmc_definitionsI (D);
static _KLsymbolGVKd KJfragments_;
static D Kanonymous_of_top_level_convertF94I (D, D);
static _KLsymbolGVKd KJdefine_;
static _KLsymbolGVKd KJvariable_;
static _KLbyte_stringGVKd_8 K97;
static _KLbyte_stringGVKd_6 K98;
static _KLbyte_stringGVKd_9 K99;
static _KLsymbolGVKd KJlet_;
static _KLbyte_stringGVKd_3 K101;
static _KLsignatureAvaluesGVKi K102;
static _KLsimple_object_vectorGVKd_2 K103;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_top_level_convertF111;
static D Kanonymous_of_top_level_convertF111I ();
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_top_level_convertF108;
static D Kanonymous_of_top_level_convertF108I (D);
static _KLsymbolGVKd KJsource_location_;
static _KLbyte_stringGVKd_15 K110;
static _KLsimple_typechecked_cache_header_engine_nodeGVKg K112;
extern _KLsealed_generic_functionGVKe Ktop_level_convert_using_definitionVdfmc_definitions;
extern _KLsimple_methodGVKe Ktop_level_convert_using_definitionVdfmc_definitionsMM0;
D Ktop_level_convert_using_definitionVdfmc_definitionsMM0I (D, D, D);
extern _KLsimple_methodGVKe Ktop_level_convert_using_definitionVdfmc_definitionsMM1;
D Ktop_level_convert_using_definitionVdfmc_definitionsMM1I (D, D, D);
extern _KLsimple_methodGVKe Ktop_level_convert_using_definitionVdfmc_definitionsMM2;
D Ktop_level_convert_using_definitionVdfmc_definitionsMM2I (D, D, D);
static _KLpairGVKd K120;
static _KLpairGVKd K121;
static _KLpairGVKd K122;
static _KLbyte_stringGVKd_34 K123;
static D Kanonymous_of_top_level_convert_using_definitionF131I (D, D);
static _KLsymbolGVKd KJparent_form_;
static _KLsymbolGVKd KJbody_;
static _KLsymbolGVKd KJdefine_word_;
static _KLbyte_stringGVKd_11 K128;
static _KLbyte_stringGVKd_4 K129;
static _KLbyte_stringGVKd_11 K130;
static _KLsignatureGVKe K132;
static _KLsimple_object_vectorGVKd_3 K133;
static _KLsymbolGVKd KJbegin_;
static _KLbyte_stringGVKd_5 K135;
static _KLsignatureGVKe K136;
static _KLsimple_object_vectorGVKd_3 K137;
static _KLsymbolGVKd KJlibrary_name_;
static D Kanonymous_of_top_level_convert_using_definitionF140I (D, D);
static _KLbyte_stringGVKd_12 K141;
static _KLsignatureGVKe K142;
static _KLsimple_object_vectorGVKd_3 K143;
static _KLsignatureGVKe K144;
static _KLsignatureGVKe K145;
static _KLsimple_object_vectorGVKd_2 K146;
extern _KLsimple_methodGVKe Ktop_level_convertTVdfmc_definitionsMM0;
D Ktop_level_convertTVdfmc_definitionsMM0I (D, D);
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_top_level_convertTF151;
static D Kanonymous_of_top_level_convertTF151I (D, D);
static _KLsignatureGVKe K152;
static _KLsimple_object_vectorGVKd_2 K153;
static _KLsignatureGVKe K154;
static _KLsimple_object_vectorGVKd_2 K155;
static _KLsignatureGVKe K156;
static _KLsimple_object_vectorGVKd_2 K157;
extern _KLsimple_methodGVKe Kinstall_top_level_formVdfmc_definitionsMM0;
D Kinstall_top_level_formVdfmc_definitionsMM0I (D);
extern _KLsimple_methodGVKe Kinstall_top_level_formVdfmc_definitionsMM1;
D Kinstall_top_level_formVdfmc_definitionsMM1I (D);
static _KLpairGVKd K162;
static _KLpairGVKd K163;
static _KLpairGVKd K164;
static _KLpairGVKd K165;
static _KLbyte_stringGVKd_22 K166;
static D Kanonymous_of_install_top_level_formF170I (D);
static _KLbyte_stringGVKd_53 K168;
static _KLbyte_stringGVKd_46 K169;
static _KLsymbolGVKd KJgsb_;
static _KLsymbolGVKd KJtesting_;
static _KLsymbolGVKd KJno_dependent_;
static _KLbyte_stringGVKd_27 K174;
static _KLbyte_stringGVKd_12 K175;
static _KLbyte_stringGVKd_7 K176;
static _KLbyte_stringGVKd_3 K177;
static _KLsignatureGVKe K178;
static _KLsimple_object_vectorGVKd_1 K179;
extern _KLsimple_methodGVKe Kas_bodyVdfmc_definitionsMM0;
D Kas_bodyVdfmc_definitionsMM0I (D);
extern _KLsimple_methodGVKe Kas_bodyVdfmc_definitionsMM1;
D Kas_bodyVdfmc_definitionsMM1I (D);
extern _KLsimple_methodGVKe Kas_bodyVdfmc_definitionsMM2;
D Kas_bodyVdfmc_definitionsMM2I (D);
static _KLpairGVKd K186;
static _KLpairGVKd K187;
static _KLpairGVKd K188;
static _KLbyte_stringGVKd_7 K189;
static _KLsignatureGVKe K190;
static _KLsimple_object_vectorGVKd_1 K191;
static _KLbyte_stringGVKd_41 K192;
static _KLsignatureGVKe K193;
static _KLsimple_object_vectorGVKd_1 K194;
extern _KLsimple_methodGVKe Kuninstall_top_level_formVdfmc_definitionsMM0;
D Kuninstall_top_level_formVdfmc_definitionsMM0I (D);
static _KLpairGVKd K197;
static _KLpairGVKd K198;
static _KLpairGVKd K199;
static _KLbyte_stringGVKd_24 K200;
static _KLbyte_stringGVKd_15 K201;
static _KLsignatureGVKe K202;
static _KLsimple_object_vectorGVKd_1 K203;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_makeF206;
static D Kanonymous_of_makeF206I (D);
static _KLsignatureGVKe K207;
static _KLkeyword_signatureAvaluesGVKi K208;
static _KLsimple_object_vectorGVKd_4 K209;
static _KLsimple_object_vectorGVKd_1 K210;
static _KLsimple_object_vectorGVKd_2 K211;
static _KLsubclassGVKe K212;
static _KLimplementation_classGVKe K213;
static _KLsimple_object_vectorGVKd_9 K214;
extern _KLkeyword_methodGVKe KLinteractive_tight_mode_definitionGZ32ZconstructorVdfmc_definitionsMM0;
D KLinteractive_tight_mode_definitionGZ32ZconstructorVdfmc_definitionsMM0I (D, D);
static _KLsimple_object_vectorGVKd_1 K217;
static _KLsimple_object_vectorGVKd_9 K218;
static _KLsimple_object_vectorGVKd_2 K219;
static _KLsimple_object_vectorGVKd_1 K220;
static _KLinit_arg_descriptorGVKe Kformat_stringHLinteractive_tight_mode_definitionGVdfmc_definitions;
static _KLbyte_stringGVKd_60 K222;
extern _KLinstance_slot_descriptorGVKe Kcondition_library_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG;
extern _KLsealed_generic_functionGVKe Kcondition_library_nameVdfmc_definitions;
extern _KLsealed_generic_functionGVKe Kcondition_library_name_setterVdfmc_definitions;
extern _KLsetter_methodGVKi Kcondition_library_name_setterVdfmc_definitionsMM0;
static _KLpairGVKd K227;
static _KLbyte_stringGVKd_29 K228;
extern _KLgetter_methodGVKi Kcondition_library_nameVdfmc_definitionsMM0;
static _KLpairGVKd K230;
static _KLbyte_stringGVKd_22 K231;
static _KLkeyword_closure_methodGVKe_0 Kdefaulted_initializeF234;
static D Kdefaulted_initializeF234I (D object_, D init_args_, D Uunique_condition_format_string_, D Uunique_condition_format_arguments_, D Uunique_condition_source_location_, D Uunique_condition_program_note_creator_, D Uunique_condition_compilation_stage_, D Uunique_condition_context_id_, D Uunique_subnotes_, D Uunique_condition_macro_name_, D Uunique_condition_library_name_);
static _KLbyte_stringGVKd_23 K235;
static _KLkeyword_signatureGVKe K236;
static _KLsimple_object_vectorGVKd_18 K237;
static _KLsymbolGVKd KJprogram_note_creator_;
static _KLsymbolGVKd KJcompilation_stage_;
static _KLsymbolGVKd KJcontext_id_;
static _KLsymbolGVKd KJsubnotes_;
static _KLbyte_stringGVKd_8 K242;
static _KLbyte_stringGVKd_10 K243;
static _KLbyte_stringGVKd_17 K244;
static _KLbyte_stringGVKd_20 K245;
static _KLsimple_object_vectorGVKd_9 K246;
static _KLkeyword_signatureAvaluesGVKi K247;
static _KLbyte_stringGVKd_35 K248;
static _KLsignatureGVKe K249;
static _KLsimple_object_vectorGVKd_1 K250;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_makeF253;
static D Kanonymous_of_makeF253I (D);
static _KLkeyword_signatureAvaluesGVKi K254;
static _KLsimple_object_vectorGVKd_2 K255;
static _KLsimple_object_vectorGVKd_1 K256;
static _KLsimple_object_vectorGVKd_1 K257;
static _KLsubclassGVKe K258;
static _KLimplementation_classGVKe K259;
static _KLsimple_object_vectorGVKd_8 K260;
extern _KLkeyword_methodGVKe KLskipping_formGZ32ZconstructorVdfmc_definitionsMM0;
D KLskipping_formGZ32ZconstructorVdfmc_definitionsMM0I (D, D);
static _KLsimple_object_vectorGVKd_9 K263;
static _KLsimple_object_vectorGVKd_1 K264;
static _KLsimple_object_vectorGVKd_1 K265;
static _KLinit_arg_descriptorGVKe Kformat_stringHLskipping_formGVdfmc_definitions;
static _KLbyte_stringGVKd_52 K267;
static _KLkeyword_closure_methodGVKe_0 Kdefaulted_initializeF270;
static D Kdefaulted_initializeF270I (D object_, D init_args_, D Uunique_condition_format_string_, D Uunique_condition_format_arguments_, D Uunique_condition_source_location_, D Uunique_condition_program_note_creator_, D Uunique_condition_compilation_stage_, D Uunique_condition_context_id_, D Uunique_subnotes_, D Uunique_condition_macro_name_);
static _KLkeyword_signatureGVKe K271;
static _KLsimple_object_vectorGVKd_16 K272;
static _KLsimple_object_vectorGVKd_8 K273;
static _KLkeyword_signatureAvaluesGVKi K274;
static _KLbyte_stringGVKd_15 K275;
extern _KLsimple_methodGVKe Kas_nameVdfmc_definitionsMM0;
extern _KLsimple_methodGVKe Ktop_level_convert_formsVdfmc_definitionsMM0;
D Ktop_level_convert_formsVdfmc_definitionsMM0I (D, D);
D Kboot_definitions_formQVdfmc_definitionsMM0I (D);
static _KLbyte_stringGVKd_22 K280;
static _KLsignatureGVKe K281;
static _KLsimple_object_vectorGVKd_2 K282;

/* Indirection variables */

static D IKJmacro_name_ = &KJmacro_name_;
static D IKJmacro_case_ = &KJmacro_case_;
static D IKJfragments_ = &KJfragments_;
static D IKJdefine_ = &KJdefine_;
static D IKJvariable_ = &KJvariable_;
static D IKJlet_ = &KJlet_;
static D IKJsource_location_ = &KJsource_location_;
static D IKJparent_form_ = &KJparent_form_;
static D IKJbody_ = &KJbody_;
static D IKJdefine_word_ = &KJdefine_word_;
static D IKJbegin_ = &KJbegin_;
static D IKJlibrary_name_ = &KJlibrary_name_;
static D IKJgsb_ = &KJgsb_;
static D IKJtesting_ = &KJtesting_;
static D IKJno_dependent_ = &KJno_dependent_;
static D IKJprogram_note_creator_ = &KJprogram_note_creator_;
static D IKJcompilation_stage_ = &KJcompilation_stage_;
static D IKJcontext_id_ = &KJcontext_id_;
static D IKJsubnotes_ = &KJsubnotes_;

/* Variables */

D uninstall_top_level_form_bindingsVdfmc_definitions = &Kuninstall_top_level_form_bindingsVdfmc_definitions;
D install_top_level_form_bindingsVdfmc_definitions = &Kinstall_top_level_form_bindingsVdfmc_definitions;
D uninstall_top_level_formVdfmc_definitions = &Kuninstall_top_level_formVdfmc_definitions;
D install_top_level_formVdfmc_definitions = &Kinstall_top_level_formVdfmc_definitions;
D add_derived_top_level_fragmentVdfmc_definitions = &Kadd_derived_top_level_fragmentVdfmc_definitionsMM0;
D top_level_convert_formsVdfmc_definitions = &Ktop_level_convert_formsVdfmc_definitionsMM0;
D condition_macro_nameVdfmc_definitions = &Kcondition_macro_nameVdfmc_definitions;
D condition_macro_name_setterVdfmc_definitions = &Kcondition_macro_name_setterVdfmc_definitions;
D top_level_convertVdfmc_definitions = &Ktop_level_convertVdfmc_definitions;
D as_nameVdfmc_definitions = &Kas_nameVdfmc_definitionsMM0;
D as_bodyVdfmc_definitions = &Kas_bodyVdfmc_definitions;
D Lskipping_formGVdfmc_definitions = &KLskipping_formGVdfmc_definitions;
D Linteractive_tight_mode_definitionGVdfmc_definitions = &KLinteractive_tight_mode_definitionGVdfmc_definitions;

/* Objects */

_KLclassGVKd KLskipping_formGVdfmc_definitions = {
  &KLclassGVKdW /* wrapper */,
  &Kclass_instanceQ_initialVKiI,
  &K275,
  &K259,
  (D) 1,
  &Kdfmc_definitions_moduleYdylan_userVdfmc_definitions
};

_KLmm_wrapperGVKi_0 KLskipping_formGVdfmc_definitionsW = {
  &KLmm_wrapperGVKiW /* wrapper */,
  &K259,
  (D) 1,
  33,
  33554439,
  (D) 1
};

_KLkeyword_methodGVKe KmakeVKdMdfmc_definitionsM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_3,
  &K254,
  &key_mep_3,
  &KmakeVKdMdfmc_definitionsM0I,
  &K255
};

_KLsimple_methodGVKe Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K249,
  &Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM0I
};

_KLclassGVKd KLinteractive_tight_mode_definitionGVdfmc_definitions = {
  &KLclassGVKdW /* wrapper */,
  &Kclass_instanceQ_initialVKiI,
  &K248,
  &K213,
  (D) 1,
  &Kdfmc_definitions_moduleYdylan_userVdfmc_definitions
};

_KLmm_wrapperGVKi_0 KLinteractive_tight_mode_definitionGVdfmc_definitionsW = {
  &KLmm_wrapperGVKiW /* wrapper */,
  &K213,
  (D) 1,
  37,
  33554439,
  (D) 1
};

_KLkeyword_methodGVKe KmakeVKdMdfmc_definitionsM1 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_4,
  &K208,
  &key_mep_4,
  &KmakeVKdMdfmc_definitionsM1I,
  &K209
};

_KLsimple_methodGVKe Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K202,
  &Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM1I
};

_KLsealed_generic_functionGVKe Kuninstall_top_level_formVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  (D) 1,
  &K200,
  &K197,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Kas_bodyVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  (D) 1,
  &K189,
  &K186,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Kinstall_top_level_formVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  (D) 1,
  &K166,
  &K162,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Ktop_level_convertVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &KDsignature_LobjectG_object_rest_value_2VKi,
  (D) 1,
  &K90,
  &K85,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Kcondition_macro_nameVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &KPfalseVKi,
  &K72,
  &K65,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Kcondition_macro_name_setterVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &KDsignature_LobjectG_object_rest_value_2VKi,
  &KPfalseVKi,
  &K58,
  &K51,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Kuninstall_top_level_form_bindingsVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  (D) 1,
  &K48,
  &K43,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Kinstall_top_level_form_bindingsVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  (D) 1,
  &K39,
  &K34,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsimple_methodGVKe Kadd_derived_top_level_fragmentVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K31,
  &Kadd_derived_top_level_fragmentVdfmc_definitionsMM0I
};

static _KLsignatureGVKe K31 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 41943049,
  &K32
};

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

_KLsimple_methodGVKe Kinstall_top_level_form_bindingsVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K40,
  &Kinstall_top_level_form_bindingsVdfmc_definitionsMM0I
};

static _KLpairGVKd K34 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_form_bindingsVdfmc_definitionsMM0,
  &K35
};

static _KLpairGVKd K35 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_form_bindingsVdfmc_definitionsMM1,
  &K36
};

static _KLpairGVKd K36 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_form_bindingsVdfmc_definitionsMM2,
  &K37
};

static _KLpairGVKd K37 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_form_bindingsVdfmc_definitionsMM3,
  &K38
};

static _KLpairGVKd K38 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_form_bindingsVdfmc_definitionsMM4,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_31 K39 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 125,
  "install-top-level-form-bindings"
};

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

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

_KLsimple_methodGVKe Kuninstall_top_level_form_bindingsVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K40,
  &Kuninstall_top_level_form_bindingsVdfmc_definitionsMM0I
};

static _KLpairGVKd K43 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_form_bindingsVdfmc_definitionsMM0,
  &K44
};

static _KLpairGVKd K44 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_form_bindingsVdfmc_definitionsMM1,
  &K45
};

static _KLpairGVKd K45 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_form_bindingsVdfmc_definitionsMM2,
  &K46
};

static _KLpairGVKd K46 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_form_bindingsVdfmc_definitionsMM3,
  &K47
};

static _KLpairGVKd K47 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_form_bindingsVdfmc_definitionsMM4,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_33 K48 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 133,
  "uninstall-top-level-form-bindings"
};

_KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM0 = {
  &KLsetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_setter_xep,
  &Kcondition_macro_nameVdfmc_definitionsHLskipping_formG
};

_KLsetter_methodGVKi Kcondition_macro_name_setterVdfmc_definitionsMM1 = {
  &KLsetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_setter_xep,
  &Kcondition_macro_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG
};

static _KLpairGVKd K51 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_name_setterVdfmc_definitionsMM0,
  &K52
};

static _KLpairGVKd K52 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_name_setterVdfmc_definitionsMM1,
  &K53
};

static _KLpairGVKd K53 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_name_setterVdfmc_definitionsMM2,
  &K54
};

static _KLpairGVKd K54 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_name_setterVdfmc_definitionsMM3,
  &K55
};

static _KLpairGVKd K55 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_name_setterVdfmc_definitionsMM4,
  &K56
};

static _KLpairGVKd K56 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_name_setterVdfmc_definitionsMM5,
  &K57
};

static _KLpairGVKd K57 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_name_setterVdfmc_definitionsMM6,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_27 K58 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 109,
  "condition-macro-name-setter"
};

_KLinstance_slot_descriptorGVKe Kcondition_macro_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG = {
  &KLinstance_slot_descriptorGVKeW /* wrapper */,
  (D) 193,
  &KPfalseVKi,
  &KLinteractive_tight_mode_definitionGVdfmc_definitions,
  &KJmacro_name_,
  &Kcondition_macro_nameVdfmc_definitions,
  &Kcondition_macro_name_setterVdfmc_definitions,
  &KLobjectGVKd
};

static _KLsymbolGVKd KJmacro_name_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K61
};

static _KLbyte_stringGVKd_10 K61 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 41,
  "macro-name"
};

_KLinstance_slot_descriptorGVKe Kcondition_macro_nameVdfmc_definitionsHLskipping_formG = {
  &KLinstance_slot_descriptorGVKeW /* wrapper */,
  (D) 193,
  &KPfalseVKi,
  &KLskipping_formGVdfmc_definitions,
  &KJmacro_name_,
  &Kcondition_macro_nameVdfmc_definitions,
  &Kcondition_macro_name_setterVdfmc_definitions,
  &KLobjectGVKd
};

_KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM0 = {
  &KLgetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_getter_xep,
  &Kcondition_macro_nameVdfmc_definitionsHLskipping_formG
};

_KLgetter_methodGVKi Kcondition_macro_nameVdfmc_definitionsMM1 = {
  &KLgetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_getter_xep,
  &Kcondition_macro_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG
};

static _KLpairGVKd K65 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_nameVdfmc_definitionsMM0,
  &K66
};

static _KLpairGVKd K66 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_nameVdfmc_definitionsMM1,
  &K67
};

static _KLpairGVKd K67 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_nameVdfmc_definitionsMM2,
  &K68
};

static _KLpairGVKd K68 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_nameVdfmc_definitionsMM3,
  &K69
};

static _KLpairGVKd K69 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_nameVdfmc_definitionsMM4,
  &K70
};

static _KLpairGVKd K70 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_nameVdfmc_definitionsMM5,
  &K71
};

static _KLpairGVKd K71 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_macro_nameVdfmc_definitionsMM6,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_20 K72 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 81,
  "condition-macro-name"
};

static _KLsymbolGVKd KJmacro_case_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K74
};

static _KLbyte_stringGVKd_10 K74 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 41,
  "macro-case"
};

_KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K156,
  &Ktop_level_convertVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &KDsignature_LobjectG_object_rest_value_2VKi,
  &Ktop_level_convertVdfmc_definitionsMM1I
};

_KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM2 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K154,
  &Ktop_level_convertVdfmc_definitionsMM2I
};

_KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM3 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K145,
  &Ktop_level_convertVdfmc_definitionsMM3I
};

_KLsimple_methodGVKe Ktop_level_convertVdfmc_definitionsMM4 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K102,
  &Ktop_level_convertVdfmc_definitionsMM4I
};

static _KLpairGVKd K85 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convertVdfmc_definitionsMM0,
  &K86
};

static _KLpairGVKd K86 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convertVdfmc_definitionsMM1,
  &K87
};

static _KLpairGVKd K87 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convertVdfmc_definitionsMM2,
  &K88
};

static _KLpairGVKd K88 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convertVdfmc_definitionsMM3,
  &K89
};

static _KLpairGVKd K89 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convertVdfmc_definitionsMM4,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_17 K90 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 69,
  "top-level-convert"
};

static _KLsymbolGVKd KJfragments_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K99
};

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

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

static _KLbyte_stringGVKd_8 K97 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 33,
  "variable"
};

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

static _KLbyte_stringGVKd_9 K99 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 37,
  "fragments"
};

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

static _KLbyte_stringGVKd_3 K101 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 13,
  "let"
};

static _KLsignatureAvaluesGVKi K102 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 37749769,
  &K103,
  &KDsignature_LsequenceG_typesVKi
};

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

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_top_level_convertF111 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_0,
  &K144,
  &Kanonymous_of_top_level_convertF111I,
  (D) 1
};

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

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

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

static _KLsimple_typechecked_cache_header_engine_nodeGVKg K112 = {
  &KLsimple_typechecked_cache_header_engine_nodeGVKgW /* wrapper */,
  (D) 262201,
  &KPfalseVKi,
  &cache_header_engine_3,
  &RSINGULAR_Labsent_engine_nodeG,
  &Ktop_level_convert_using_definitionVdfmc_definitions
};

_KLsealed_generic_functionGVKe Ktop_level_convert_using_definitionVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_3,
  &KDsignature_LobjectG_object_rest_value_3VKi,
  (D) 17,
  &K123,
  &K120,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsimple_methodGVKe Ktop_level_convert_using_definitionVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_3,
  &K142,
  &Ktop_level_convert_using_definitionVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Ktop_level_convert_using_definitionVdfmc_definitionsMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_3,
  &K136,
  &Ktop_level_convert_using_definitionVdfmc_definitionsMM1I
};

_KLsimple_methodGVKe Ktop_level_convert_using_definitionVdfmc_definitionsMM2 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_3,
  &K132,
  &Ktop_level_convert_using_definitionVdfmc_definitionsMM2I
};

static _KLpairGVKd K120 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convert_using_definitionVdfmc_definitionsMM0,
  &K121
};

static _KLpairGVKd K121 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convert_using_definitionVdfmc_definitionsMM1,
  &K122
};

static _KLpairGVKd K122 = {
  &KLpairGVKdW /* wrapper */,
  &Ktop_level_convert_using_definitionVdfmc_definitionsMM2,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_34 K123 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 137,
  "top-level-convert-using-definition"
};

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

static _KLsymbolGVKd KJbody_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K129
};

static _KLsymbolGVKd KJdefine_word_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K128
};

static _KLbyte_stringGVKd_11 K128 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 45,
  "define-word"
};

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

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

static _KLsignatureGVKe K132 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040205,
  &K133
};

static _KLsimple_object_vectorGVKd_3 K133 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLobjectGVKd,
  &KLexpander_defining_formGVdfmc_definitions,
  &KLmacro_call_fragmentGVdfmc_reader
};

static _KLsymbolGVKd KJbegin_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K135
};

static _KLbyte_stringGVKd_5 K135 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 21,
  "begin"
};

static _KLsignatureGVKe K136 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040205,
  &K137
};

static _KLsimple_object_vectorGVKd_3 K137 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLobjectGVKd,
  &KLBconverter_definitionGVdfmc_definitions,
  &KLmacro_call_fragmentGVdfmc_reader
};

static _KLsymbolGVKd KJlibrary_name_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K141
};

static _KLbyte_stringGVKd_12 K141 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 49,
  "library-name"
};

static _KLsignatureGVKe K142 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 44040205,
  &K143
};

static _KLsimple_object_vectorGVKd_3 K143 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLobjectGVKd,
  &KLBdefinition_definitionGVdfmc_definitions,
  &KLmacro_call_fragmentGVdfmc_reader
};

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

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

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

_KLsimple_methodGVKe Ktop_level_convertTVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K152,
  &Ktop_level_convertTVdfmc_definitionsMM0I
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_top_level_convertTF151 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_2,
  &KDsignature_LobjectG_object_rest_value_2VKi,
  &Kanonymous_of_top_level_convertTF151I,
  (D) 1
};

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

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

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

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

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

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

_KLsimple_methodGVKe Kinstall_top_level_formVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K178,
  &Kinstall_top_level_formVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Kinstall_top_level_formVdfmc_definitionsMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K40,
  &Kinstall_top_level_formVdfmc_definitionsMM1I
};

static _KLpairGVKd K162 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_formVdfmc_definitionsMM0,
  &K163
};

static _KLpairGVKd K163 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_formVdfmc_definitionsMM1,
  &K164
};

static _KLpairGVKd K164 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_formVdfmc_definitionsMM2,
  &K165
};

static _KLpairGVKd K165 = {
  &KLpairGVKdW /* wrapper */,
  &Kinstall_top_level_formVdfmc_definitionsMM3,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_22 K166 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 89,
  "install-top-level-form"
};

static _KLbyte_stringGVKd_53 K168 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 213,
  "Changing interactive context to downloaded dependent?"
};

static _KLbyte_stringGVKd_46 K169 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 185,
  "New dependent %s is not in current context %s!"
};

static _KLsymbolGVKd KJgsb_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K177
};

static _KLsymbolGVKd KJtesting_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K176
};

static _KLsymbolGVKd KJno_dependent_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K175
};

static _KLbyte_stringGVKd_27 K174 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 109,
  "ignoring top level form %=\n"
};

static _KLbyte_stringGVKd_12 K175 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 49,
  "no-dependent"
};

static _KLbyte_stringGVKd_7 K176 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 29,
  "testing"
};

static _KLbyte_stringGVKd_3 K177 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 13,
  "gsb"
};

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

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

_KLsimple_methodGVKe Kas_bodyVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K193,
  &Kas_bodyVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Kas_bodyVdfmc_definitionsMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K190,
  &Kas_bodyVdfmc_definitionsMM1I
};

_KLsimple_methodGVKe Kas_bodyVdfmc_definitionsMM2 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kas_bodyVdfmc_definitionsMM2I
};

static _KLpairGVKd K186 = {
  &KLpairGVKdW /* wrapper */,
  &Kas_bodyVdfmc_definitionsMM0,
  &K187
};

static _KLpairGVKd K187 = {
  &KLpairGVKdW /* wrapper */,
  &Kas_bodyVdfmc_definitionsMM1,
  &K188
};

static _KLpairGVKd K188 = {
  &KLpairGVKdW /* wrapper */,
  &Kas_bodyVdfmc_definitionsMM2,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_7 K189 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 29,
  "as-body"
};

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

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

static _KLbyte_stringGVKd_41 K192 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 165,
  "Template %= wouldn\'t parse as a body: %s."
};

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

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

_KLsimple_methodGVKe Kuninstall_top_level_formVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K40,
  &Kuninstall_top_level_formVdfmc_definitionsMM0I
};

static _KLpairGVKd K197 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_formVdfmc_definitionsMM0,
  &K198
};

static _KLpairGVKd K198 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_formVdfmc_definitionsMM1,
  &K199
};

static _KLpairGVKd K199 = {
  &KLpairGVKdW /* wrapper */,
  &Kuninstall_top_level_formVdfmc_definitionsMM2,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_24 K200 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 97,
  "uninstall-top-level-form"
};

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

static _KLsignatureGVKe K202 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 46137349,
  &K203
};

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

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_makeF206 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &rest_xep_0,
  &K207,
  &Kanonymous_of_makeF206I,
  (D) 1
};

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

static _KLkeyword_signatureAvaluesGVKi K208 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 39060485,
  &K210,
  &K211,
  &KDsignature_LobjectG_typesVKi,
  &K203
};

static _KLsimple_object_vectorGVKd_4 K209 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 17,
  &KJmacro_name_,
  &KPfalseVKi,
  &KJlibrary_name_,
  &KPfalseVKi
};

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

static _KLsimple_object_vectorGVKd_2 K211 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KJmacro_name_,
  &KJlibrary_name_
};

static _KLsubclassGVKe K212 = {
  &KLsubclassGVKeW /* wrapper */,
  &Ksubclass_instanceQVKiI,
  &KLinteractive_tight_mode_definitionGVdfmc_definitions
};

static _KLimplementation_classGVKe K213 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (D) 527433765,
  &KLinteractive_tight_mode_definitionGVdfmc_definitions,
  &KLinteractive_tight_mode_definitionGVdfmc_definitionsW,
  &KPfalseVKi,
  &K214,
  (D) -3,
  &KLinteractive_tight_mode_definitionGZ32ZconstructorVdfmc_definitionsMM0,
  &K217,
  &K218,
  (D) 33,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_vectorVKi,
  &K219,
  &K214,
  &KPempty_vectorVKi,
  &K220,
  &KPempty_vectorVKi,
  (D) -7,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_9 K214 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 37,
  &Kcondition_format_stringVKdHLsimple_conditionG,
  &Kcondition_format_argumentsVKdHLsimple_conditionG,
  &Kcondition_source_locationVdfmc_conditionsHLprogram_conditionG,
  &Kcondition_program_note_creatorVdfmc_conditionsHLprogram_conditionG,
  &Kcondition_compilation_stageVdfmc_conditionsHLprogram_conditionG,
  &Kcondition_context_idVdfmc_conditionsHLprogram_noteG,
  &KsubnotesVdfmc_conditionsHLprogram_noteG,
  &Kcondition_macro_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG,
  &Kcondition_library_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG
};

_KLkeyword_methodGVKe KLinteractive_tight_mode_definitionGZ32ZconstructorVdfmc_definitionsMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_2,
  &K247,
  &key_mep_2,
  &KLinteractive_tight_mode_definitionGZ32ZconstructorVdfmc_definitionsMM0I,
  &KPempty_vectorVKi
};

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

static _KLsimple_object_vectorGVKd_9 K218 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 37,
  &KLobjectGVKd,
  &KLconditionGVKd,
  &KLsimple_conditionGVKe,
  &KLprogram_conditionGVdfmc_conditions,
  &KLwarningGVKd,
  &KLprogram_noteGVdfmc_conditions,
  &KLprogram_warningGVdfmc_conditions,
  &KLserious_program_warningGVdfmc_conditions,
  &KLinteractive_tight_mode_definitionGVdfmc_definitions
};

static _KLsimple_object_vectorGVKd_2 K219 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &Kcondition_macro_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG,
  &Kcondition_library_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG
};

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

static _KLinit_arg_descriptorGVKe Kformat_stringHLinteractive_tight_mode_definitionGVdfmc_definitions = {
  &KLinit_arg_descriptorGVKeW /* wrapper */,
  (D) 29,
  &K222,
  &KLinteractive_tight_mode_definitionGVdfmc_definitions,
  &KJformat_string_,
  &KLobjectGVKd
};

static _KLbyte_stringGVKd_60 K222 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 241,
  "Skipping interactive definition %s in tight mode library %s."
};

_KLinstance_slot_descriptorGVKe Kcondition_library_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG = {
  &KLinstance_slot_descriptorGVKeW /* wrapper */,
  (D) 193,
  &KPfalseVKi,
  &KLinteractive_tight_mode_definitionGVdfmc_definitions,
  &KJlibrary_name_,
  &Kcondition_library_nameVdfmc_definitions,
  &Kcondition_library_name_setterVdfmc_definitions,
  &KLobjectGVKd
};

_KLsealed_generic_functionGVKe Kcondition_library_nameVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &KPfalseVKi,
  &K231,
  &K230,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsealed_generic_functionGVKe Kcondition_library_name_setterVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &KDsignature_LobjectG_object_rest_value_2VKi,
  &KPfalseVKi,
  &K228,
  &K227,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsetter_methodGVKi Kcondition_library_name_setterVdfmc_definitionsMM0 = {
  &KLsetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_setter_xep,
  &Kcondition_library_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG
};

static _KLpairGVKd K227 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_library_name_setterVdfmc_definitionsMM0,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_29 K228 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 117,
  "condition-library-name-setter"
};

_KLgetter_methodGVKi Kcondition_library_nameVdfmc_definitionsMM0 = {
  &KLgetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_getter_xep,
  &Kcondition_library_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG
};

static _KLpairGVKd K230 = {
  &KLpairGVKdW /* wrapper */,
  &Kcondition_library_nameVdfmc_definitionsMM0,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_22 K231 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 89,
  "condition-library-name"
};

static _KLkeyword_closure_methodGVKe_0 Kdefaulted_initializeF234 = {
  &KLkeyword_closure_methodGVKeW /* wrapper */,
  &rest_key_xep,
  &K236,
  &key_mep,
  &Kdefaulted_initializeF234I,
  &K237,
  (D) 1
};

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

static _KLkeyword_signatureGVKe K236 = {
  &KLkeyword_signatureGVKeW /* wrapper */,
  (D) 45875205,
  &K203,
  &K246,
  &KDsignature_LobjectG_typesVKi
};

static _KLsimple_object_vectorGVKd_18 K237 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 73,
  &KJformat_string_,
  &KPempty_stringVKi,
  &KJformat_arguments_,
  &KPempty_vectorVKi,
  &KJsource_location_,
  &KPfalseVKi,
  &KJprogram_note_creator_,
  &KPunboundVKi,
  &KJcompilation_stage_,
  &KPunboundVKi,
  &KJcontext_id_,
  &KPfalseVKi,
  &KJsubnotes_,
  &KPempty_vectorVKi,
  &KJmacro_name_,
  &KPunboundVKi,
  &KJlibrary_name_,
  &KPunboundVKi
};

static _KLsymbolGVKd KJprogram_note_creator_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K245
};

static _KLsymbolGVKd KJcompilation_stage_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K244
};

static _KLsymbolGVKd KJcontext_id_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K243
};

static _KLsymbolGVKd KJsubnotes_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K242
};

static _KLbyte_stringGVKd_8 K242 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 33,
  "subnotes"
};

static _KLbyte_stringGVKd_10 K243 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 41,
  "context-id"
};

static _KLbyte_stringGVKd_17 K244 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 69,
  "compilation-stage"
};

static _KLbyte_stringGVKd_20 K245 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 81,
  "program-note-creator"
};

static _KLsimple_object_vectorGVKd_9 K246 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 37,
  &KJformat_string_,
  &KJformat_arguments_,
  &KJsource_location_,
  &KJprogram_note_creator_,
  &KJcompilation_stage_,
  &KJcontext_id_,
  &KJsubnotes_,
  &KJmacro_name_,
  &KJlibrary_name_
};

static _KLkeyword_signatureAvaluesGVKi K247 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 35390469,
  &KDsignature_LclassG_typesVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &K203
};

static _KLbyte_stringGVKd_35 K248 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 141,
  "<interactive-tight-mode-definition>"
};

static _KLsignatureGVKe K249 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 46137349,
  &K250
};

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

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_makeF253 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &rest_xep_0,
  &K207,
  &Kanonymous_of_makeF253I,
  (D) 1
};

static _KLkeyword_signatureAvaluesGVKi K254 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 39060485,
  &K256,
  &K257,
  &KDsignature_LobjectG_typesVKi,
  &K250
};

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

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

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

static _KLsubclassGVKe K258 = {
  &KLsubclassGVKeW /* wrapper */,
  &Ksubclass_instanceQVKiI,
  &KLskipping_formGVdfmc_definitions
};

static _KLimplementation_classGVKe K259 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (D) 527433761,
  &KLskipping_formGVdfmc_definitions,
  &KLskipping_formGVdfmc_definitionsW,
  &KPfalseVKi,
  &K260,
  (D) -3,
  &KLskipping_formGZ32ZconstructorVdfmc_definitionsMM0,
  &K217,
  &K263,
  (D) 33,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_vectorVKi,
  &K264,
  &K260,
  &KPempty_vectorVKi,
  &K265,
  &KPempty_vectorVKi,
  (D) -7,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_8 K260 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 33,
  &Kcondition_format_stringVKdHLsimple_conditionG,
  &Kcondition_format_argumentsVKdHLsimple_conditionG,
  &Kcondition_source_locationVdfmc_conditionsHLprogram_conditionG,
  &Kcondition_program_note_creatorVdfmc_conditionsHLprogram_conditionG,
  &Kcondition_compilation_stageVdfmc_conditionsHLprogram_conditionG,
  &Kcondition_context_idVdfmc_conditionsHLprogram_noteG,
  &KsubnotesVdfmc_conditionsHLprogram_noteG,
  &Kcondition_macro_nameVdfmc_definitionsHLskipping_formG
};

_KLkeyword_methodGVKe KLskipping_formGZ32ZconstructorVdfmc_definitionsMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_2,
  &K274,
  &key_mep_2,
  &KLskipping_formGZ32ZconstructorVdfmc_definitionsMM0I,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_9 K263 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 37,
  &KLobjectGVKd,
  &KLconditionGVKd,
  &KLsimple_conditionGVKe,
  &KLprogram_conditionGVdfmc_conditions,
  &KLwarningGVKd,
  &KLprogram_noteGVdfmc_conditions,
  &KLprogram_warningGVdfmc_conditions,
  &KLserious_program_warningGVdfmc_conditions,
  &KLskipping_formGVdfmc_definitions
};

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

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

static _KLinit_arg_descriptorGVKe Kformat_stringHLskipping_formGVdfmc_definitions = {
  &KLinit_arg_descriptorGVKeW /* wrapper */,
  (D) 29,
  &K267,
  &KLskipping_formGVdfmc_definitions,
  &KJformat_string_,
  &KLobjectGVKd
};

static _KLbyte_stringGVKd_52 K267 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 209,
  "Skipping %s macro call due to previous syntax error."
};

static _KLkeyword_closure_methodGVKe_0 Kdefaulted_initializeF270 = {
  &KLkeyword_closure_methodGVKeW /* wrapper */,
  &rest_key_xep,
  &K271,
  &key_mep,
  &Kdefaulted_initializeF270I,
  &K272,
  (D) 1
};

static _KLkeyword_signatureGVKe K271 = {
  &KLkeyword_signatureGVKeW /* wrapper */,
  (D) 45875205,
  &K250,
  &K273,
  &KDsignature_LobjectG_typesVKi
};

static _KLsimple_object_vectorGVKd_16 K272 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 65,
  &KJformat_string_,
  &KPempty_stringVKi,
  &KJformat_arguments_,
  &KPempty_vectorVKi,
  &KJsource_location_,
  &KPfalseVKi,
  &KJprogram_note_creator_,
  &KPunboundVKi,
  &KJcompilation_stage_,
  &KPunboundVKi,
  &KJcontext_id_,
  &KPfalseVKi,
  &KJsubnotes_,
  &KPempty_vectorVKi,
  &KJmacro_name_,
  &KPunboundVKi
};

static _KLsimple_object_vectorGVKd_8 K273 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 33,
  &KJformat_string_,
  &KJformat_arguments_,
  &KJsource_location_,
  &KJprogram_note_creator_,
  &KJcompilation_stage_,
  &KJcontext_id_,
  &KJsubnotes_,
  &KJmacro_name_
};

static _KLkeyword_signatureAvaluesGVKi K274 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 35390469,
  &KDsignature_LclassG_typesVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &K250
};

static _KLbyte_stringGVKd_15 K275 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 61,
  "<skipping-form>"
};

_KLsimple_methodGVKe Kas_nameVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kas_nameVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Ktop_level_convert_formsVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K281,
  &Ktop_level_convert_formsVdfmc_definitionsMM0I
};

static _KLbyte_stringGVKd_22 K280 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 89,
  "boot-dylan-definitions"
};

static _KLsignatureGVKe K281 = {
  &KLsignatureGVKeW /* wrapper */,
  (D) 41944073,
  &K282
};

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

/* Code */

D KmakeVKdMdfmc_definitionsM0I (D class_, D initargs_, D macro_name_) {
  D T4;
  D T5_0;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10_0;
  _KLsimple_object_vectorGVKd_1 T11 = {&KLsimple_object_vectorGVKdW, (D) 5};
  D T12_0;
  D T13_0;
  D T14_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T8 = primitive_copy_vector(initargs_);
  T6 = primitive_next_methods_parameter();
  T7 = MAKE_CLOSURE_INITD(&Kanonymous_of_makeF253, 3, T8, T6, class_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T9 = KmemberQVKdMM2I(&KJformat_arguments_, T8, &KPempty_vectorVKi, &KEEVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  if (T9 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T10_0 = APPLY2(T7, class_, T8);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T13_0 = T10_0;
    {
      MV_CHECK_TYPE_PROLOGUE(T10_0);
      primitive_type_check(T13_0, &KLskipping_formGVdfmc_definitions);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T5_0 = T13_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T11.vector_element_[0] = macro_name_;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T4 = KlistVKdI(&T11);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T12_0 = APPLY4(T7, class_, &KJformat_arguments_, T4, T8);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T14_0 = T12_0;
    {
      MV_CHECK_TYPE_PROLOGUE(T12_0);
      primitive_type_check(T14_0, &KLskipping_formGVdfmc_definitions);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T5_0 = T14_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  MV_SET_COUNT(1);
  return(T5_0);
}

D Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM0I (D Pc_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T3 = primitive_next_methods_parameter();
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T4 = SLOT_VALUE_INITD(Pc_, 7);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  CONGRUENT_CALL_PROLOG(&KasVKd, 2);
  T2 = CONGRUENT_CALL2(&KLppmlGVppml, T4);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  SLOT_VALUE_SETTER(T2, Pc_, 7);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T5 = primitive_idQ(T3,&KPempty_listVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  if (T5 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    KerrorVKdMM1I(&K201, &KPempty_vectorVKi);
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T6 = SLOT_VALUE_INITD(T3, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    T7 = SLOT_VALUE_INITD(T3, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
    MEP_CALL_PROLOG(T6, T7, 1);
    MEP_CALL1(T6, Pc_);
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T8 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  MV_SET_COUNT(0);
  return(T8);
}

D KmakeVKdMdfmc_definitionsM1I (D class_, D initargs_, D macro_name_, D library_name_) {
  D T5;
  D T6_0;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11_0;
  _KLsimple_object_vectorGVKd_2 T12 = {&KLsimple_object_vectorGVKdW, (D) 9};
  D T13_0;
  D T14_0;
  D T15_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T9 = primitive_copy_vector(initargs_);
  T7 = primitive_next_methods_parameter();
  T8 = MAKE_CLOSURE_INITD(&Kanonymous_of_makeF206, 3, T9, T7, class_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T10 = KmemberQVKdMM2I(&KJformat_arguments_, T9, &KPempty_vectorVKi, &KEEVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  if (T10 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T11_0 = APPLY2(T8, class_, T9);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T14_0 = T11_0;
    {
      MV_CHECK_TYPE_PROLOGUE(T11_0);
      primitive_type_check(T14_0, &KLinteractive_tight_mode_definitionGVdfmc_definitions);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T6_0 = T14_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T12.vector_element_[0] = macro_name_;
    T12.vector_element_[1] = library_name_;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T5 = KlistVKdI(&T12);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T13_0 = APPLY4(T8, class_, &KJformat_arguments_, T5, T9);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T15_0 = T13_0;
    {
      MV_CHECK_TYPE_PROLOGUE(T13_0);
      primitive_type_check(T15_0, &KLinteractive_tight_mode_definitionGVdfmc_definitions);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T6_0 = T15_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  MV_SET_COUNT(1);
  return(T6_0);
}

D Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM1I (D Pc_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T4 = primitive_next_methods_parameter();
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T5 = SLOT_VALUE_INITD(Pc_, 7);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  CONGRUENT_CALL_PROLOG(&KasVKd, 2);
  T2 = CONGRUENT_CALL2(&KLppmlGVppml, T5);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  SLOT_VALUE_SETTER(T2, Pc_, 7);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T6 = SLOT_VALUE_INITD(Pc_, 8);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  CONGRUENT_CALL_PROLOG(&KasVKd, 2);
  T3 = CONGRUENT_CALL2(&KLppmlGVppml, T6);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  SLOT_VALUE_SETTER(T3, Pc_, 8);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T7 = primitive_idQ(T4,&KPempty_listVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  if (T7 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    KerrorVKdMM1I(&K201, &KPempty_vectorVKi);
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T8 = SLOT_VALUE_INITD(T4, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    T9 = SLOT_VALUE_INITD(T4, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
    MEP_CALL_PROLOG(T8, T9, 1);
    MEP_CALL1(T8, Pc_);
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T10 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  MV_SET_COUNT(0);
  return(T10);
}

D Kas_nameVdfmc_definitionsMM0I (D form_) {
  D T2;
  D T3_0;
  D T3_1;
  D T3_2;
  D failureF4;
  D UfTU_;
  D nameF6;
  D T7_0;
  D T7_1;
  D T8_0;
  D T8_1;
  D T9_0;
  D T9_1;
  D T10_0;
  D T10_1;
  D failureF11;
  D nameF12;
  D nameF13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19_0;
  D T19_1;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:28
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  CONGRUENT_CALL_PROLOG(&Kas_fragment_tokensVdfmc_macro_expander, 1);
  T2 = CONGRUENT_CALL1(form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  T3_0 = Kmatch_name_constraintVdfmc_macro_expanderI(T2);
  T3_1 = MV_GET_ELT(1);
  T3_2 = MV_GET_ELT(2);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  failureF4 = T3_0;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  UfTU_ = T3_1;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  nameF6 = T3_2;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  if (failureF4 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    T7_0 = failureF4;
    T7_1 = &KPfalseVKi;
    T10_0 = T7_0;
    T10_1 = T7_1;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    T18 = primitive_idQ(UfTU_,&KPempty_listVKi);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    if (T18 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
      T19_0 = &KPfalseVKi;
      T19_1 = nameF6;
      T9_0 = T19_0;
      T9_1 = T19_1;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
      T8_0 = &KPtrueVKi;
      T8_1 = &KPfalseVKi;
      T9_0 = T8_0;
      T9_1 = T8_1;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    T10_0 = T9_0;
    T10_1 = T9_1;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  failureF11 = T10_0;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  nameF12 = T10_1;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  if (failureF11 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    T15 = Kdylan_variable_nameVdfmc_readerI(IKJmacro_case_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    T16 = Kmacro_main_rule_match_errorVdfmc_macro_expanderI(T2, T15);
    T17 = T16;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    CONGRUENT_CALL_PROLOG(&Kexport_fragment_tokensVdfmc_macro_expander, 1);
    nameF13 = CONGRUENT_CALL1(nameF12);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
    T14 = nameF13;
    MV_SET_ELT(0, nameF13);
    MV_SET_COUNT(1);
    T17 = T14;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:29
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:28
  return(T17);
}

D Kadd_derived_top_level_fragmentVdfmc_definitionsMM0I (D form_, D fragment_) {
  D fragment_forms_;
  D T4;
  D T5;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:252
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:255
  CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
  fragment_forms_ = CONGRUENT_CALL2(form_, fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:256
  CONGRUENT_CALL_PROLOG(&Kform_compilation_recordVdfmc_common, 1);
  T4 = CONGRUENT_CALL1(form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:256
  CALL2(&Kadd_derived_top_level_formsVdfmc_common, T4, fragment_forms_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:257
  T5 = CALL1(&Kinstall_top_level_formsVdfmc_common, fragment_forms_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:252
  MV_SET_COUNT(0);
  return(T5);
}

D Kuninstall_top_level_form_bindingsVdfmc_definitionsMM0I (D form_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9T, T9;
  D T10;
  D T11;
  D T12;
  D T13;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:292
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  CONGRUENT_CALL_PROLOG(&Kform_variable_namesVdfmc_common, 1);
  T2 = CONGRUENT_CALL1(form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  CONGRUENT_CALL_PROLOG(&Kforward_iteration_protocolVKd, 1);
  T3 = CONGRUENT_CALL1(T2);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  T4 = T3;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  T5 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  T6 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  T7 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  T8 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  T9T = T4;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
    T9 = T9T;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
    T10 = CALL3(T7, T2, T9, T5);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
    if (T10 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
      T11 = CALL2(T8, T2, T9);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:294
      Kremove_definitionVdfmc_namespaceMM0I(T11, form_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
      T12 = CALL2(T6, T2, T9);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
      T9T = T12;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
    T13 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:293
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:292
  return(T13);
}

D Kinstall_top_level_form_bindingsVdfmc_definitionsMM0I (D form_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9T, T9;
  D T10;
  D T11;
  D T12;
  D T13;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:282
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  CONGRUENT_CALL_PROLOG(&Kform_variable_namesVdfmc_common, 1);
  T2 = CONGRUENT_CALL1(form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  CONGRUENT_CALL_PROLOG(&Kforward_iteration_protocolVKd, 1);
  T3 = CONGRUENT_CALL1(T2);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  T4 = T3;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  T5 = MV_GET_ELT(1);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  T6 = MV_GET_ELT(2);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  T7 = MV_GET_ELT(3);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  T8 = MV_GET_ELT(5);
;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  T9T = T4;
L0: ;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
    T9 = T9T;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
    T10 = CALL3(T7, T2, T9, T5);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
    if (T10 == &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
      T11 = CALL2(T8, T2, T9);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:288
      Kadd_definitionVdfmc_namespaceMM0I(T11, form_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
      T12 = CALL2(T6, T2, T9);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
      T9T = T12;
      goto L0;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
    T13 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:287
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:282
  return(T13);
}

D Ktop_level_convertVdfmc_definitionsMM0I (D parent_, D fragment_) {
  D T3;
  D T4;
  D T5;
  D T6_0;
  _KLsimple_object_vectorGVKd_6 T7 = {&KLsimple_object_vectorGVKdW, (D) 25};
  _KLsimple_object_vectorGVKd_1 T8 = {&KLsimple_object_vectorGVKdW, (D) 5};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:55
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:58
  CONGRUENT_CALL_PROLOG(&Kfragment_source_locationVdfmc_reader, 1);
  T3 = CONGRUENT_CALL1(fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:56
  T7.vector_element_[0] = IKJparent_form_;
  T7.vector_element_[1] = parent_;
  T7.vector_element_[2] = IKJsource_location_;
  T7.vector_element_[3] = T3;
  T7.vector_element_[4] = IKJbody_;
  T7.vector_element_[5] = fragment_;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:56
  T6_0 = KLtop_level_init_formGZ32ZconstructorVdfmc_commonMM0I(&KLtop_level_init_formGVdfmc_common, &T7, T3, parent_, fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:56
  T5 = T6_0;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:56
  T8.vector_element_[0] = T5;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:56
  T4 = KlistVKdI(&T8);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:55
  return(T4);
}

D Ktop_level_convertVdfmc_definitionsMM1I (D parent_, D fragment_) {
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:62
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:63
  CONGRUENT_CALL_PROLOG(&Kas_bodyVdfmc_definitions, 1);
  T3 = CONGRUENT_CALL1(fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:63
  CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
  T4 = CONGRUENT_CALL2(parent_, T3);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:62
  return(T4);
}

D Ktop_level_convertVdfmc_definitionsMM2I (D parent_, D fragment_) {
  D T3;
  D forms_;
  D T5;
  D T6;
  D T7;
  D T8;
  D parentF9;
  D T10_0;
  _KLsimple_object_vectorGVKd_6 T11 = {&KLsimple_object_vectorGVKdW, (D) 25};
  D T12;
  D T13_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:68
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:69
  T7 = SLOT_VALUE_INITD(fragment_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:70
  if (parent_ != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:71
    T3 = CALL2(&Ktop_level_convertTVdfmc_definitionsMM0, parent_, T7);
    T6 = T3;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:77
    T8 = Kfragment_source_locationVdfmc_readerMM0I(fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:74
    T11.vector_element_[0] = IKJdefine_word_;
    T11.vector_element_[1] = &KPfalseVKi;
    T11.vector_element_[2] = IKJparent_form_;
    T11.vector_element_[3] = &KPfalseVKi;
    T11.vector_element_[4] = IKJsource_location_;
    T11.vector_element_[5] = T8;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:74
    T10_0 = KLmacro_call_formGZ32ZconstructorVdfmc_commonMM0I(&KLmacro_call_formGVdfmc_common, &T11, T8, &KPfalseVKi, &KPfalseVKi);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:74
    parentF9 = T10_0;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:78
    forms_ = CALL2(&Ktop_level_convertTVdfmc_definitionsMM0, parentF9, T7);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:79
    CONGRUENT_CALL_PROLOG(&KasVKd, 2);
    T5 = CONGRUENT_CALL2(&KLvectorGVKd, forms_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:79
    CALL2(&Kform_derived_forms_setterVdfmc_commonMM0, T5, parentF9);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:80
    T12 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:80
    SLOT_VALUE_SETTER(parentF9, T12, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:80
    SLOT_VALUE_SETTER(forms_, T12, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:80
    T13_0 = T12;
    T6 = T13_0;
    MV_SET_COUNT(1);
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:70
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:68
  return(T6);
}

D Ktop_level_convertVdfmc_definitionsMM3I (D parent_, D fragment_) {
  D macro_variable_;
  D definition_;
  D T5;
  D T6;
  D T7;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:90
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:91
  CONGRUENT_CALL_PROLOG(&Kfragment_macroVdfmc_reader, 1);
  macro_variable_ = CONGRUENT_CALL1(fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:92
  definition_ = Kmacro_definitionVdfmc_namespaceMM0I(macro_variable_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:95
  T5 = MAKE_CLOSURE_INITD(&Kanonymous_of_top_level_convertF111, 3, definition_, fragment_, parent_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:95
  T6 = MAKE_CLOSURE_INITD(&Kanonymous_of_top_level_convertF108, 2, macro_variable_, fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:95
  T7 = CALL2(&Kdo_handling_parse_errorsVdfmc_macro_expanderMM0, T5, T6);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:90
  return(T7);
}

D Ktop_level_convertVdfmc_definitionsMM4I (D parent_, D fragment_) {
  volatile D T3;
  volatile D T4_0;
  volatile D T5;
  volatile D bindings_inits_;
  volatile D T7_0;
  volatile _KLsimple_object_vectorGVKd_2 T8 = {&KLsimple_object_vectorGVKdW, (D) 9};
  volatile D T9;
  volatile D T10;
  volatile D Pold_valuePF11;
  volatile D T12;
  volatile D T13;
  volatile D T14;
  volatile D Pold_valuePF15;
  volatile D T16;
  volatile D T17_0;
  volatile D T18;
  volatile D T19;
  volatile D Pold_valuePF20;
  volatile D T21;
  volatile D T22;
  volatile D T23;
  volatile D T24;
  volatile D T25;
  volatile D T26_0;
  volatile D T27;
  volatile D T28_0;
  volatile D T29_0;
  volatile D T30_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:115
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:118
  T3 = Klet_fragmentQVdfmc_definitionsI(fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:118
  if (T3 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:120
    T5 = SLOT_VALUE_INITD(fragment_, 3);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:120
    T8.vector_element_[0] = IKJfragments_;
    T8.vector_element_[1] = T5;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:120
    T7_0 = KLsequence_fragmentGZ32ZconstructorVdfmc_readerMM0I(&KLsequence_fragmentGVdfmc_reader, &T8, &KPfalseVKi, &KPfalseVKi, T5);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:120
    bindings_inits_ = T7_0;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:122
    T9 = SLOT_VALUE_INITD(fragment_, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:122
    T10 = SLOT_VALUE_INITD(fragment_, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
    Pold_valuePF11 = primitive_read_thread_variable(Texpansion_source_locationTVdfmc_macro_expander);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
    ENTER_UNWIND_FRAME(T12);
    if (!nlx_setjmp(FRAME_DEST(T12))) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      T13 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      SLOT_VALUE_SETTER(T9, T13, 0);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      SLOT_VALUE_SETTER(T10, T13, 1);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      primitive_write_thread_variable(Texpansion_source_locationTVdfmc_macro_expander, T13);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      T14 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      if (T14 != &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        Pold_valuePF15 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        ENTER_UNWIND_FRAME(T16);
        if (!nlx_setjmp(FRAME_DEST(T16))) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          T17_0 = KLobject_tableGZ32ZconstructorVKiMM0I(&KLobject_tableGVKd, &KPempty_vectorVKi, &KLobjectGVKd, (D) 41, &Kdefault_grow_sizeVKe, &KPfalseVKi);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          T18 = T17_0;
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, T18);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          T19 = Kanonymous_of_top_level_convertF94I(bindings_inits_, parent_);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          FALL_THROUGH_UNWIND(T19);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Pold_valuePF15);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        CONTINUE_UNWIND();
        T25 = T19;
      } else {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        Pold_valuePF20 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        ENTER_UNWIND_FRAME(T21);
        if (!nlx_setjmp(FRAME_DEST(T21))) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Dshared_expansion_fragment_cacheVdfmc_macro_expander);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          ENTER_UNWIND_FRAME(T22);
          if (!nlx_setjmp(FRAME_DEST(T22))) {
            // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
            T23 = Kanonymous_of_top_level_convertF94I(bindings_inits_, parent_);
            // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
            FALL_THROUGH_UNWIND(T23);
          }
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          T24 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          CALL1(&Kremove_all_keysXVKe, T24);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          CONTINUE_UNWIND();
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
          FALL_THROUGH_UNWIND(T23);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Pold_valuePF20);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
        CONTINUE_UNWIND();
        T25 = T23;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
      FALL_THROUGH_UNWIND(T25);
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
    primitive_write_thread_variable(Texpansion_source_locationTVdfmc_macro_expander, Pold_valuePF11);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
    CONTINUE_UNWIND();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
    T26_0 = T25;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
    T29_0 = T26_0;
    {
      MV_CHECK_TYPE_PROLOGUE(T26_0);
      primitive_type_check(T29_0, &KLsequenceGVKd);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T4_0 = T29_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:126
    T27 = Ktop_level_convertVdfmc_definitionsMM3I(parent_, fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:126
    T28_0 = T27;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:126
    T30_0 = T28_0;
    {
      MV_CHECK_TYPE_PROLOGUE(T28_0);
      primitive_type_check(T30_0, &KLsequenceGVKd);
      MV_CHECK_TYPE_EPILOGUE();
    }
    T4_0 = T30_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:118
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:115
  MV_SET_COUNT(1);
  return(T4_0);
}

D Klet_fragmentQVdfmc_definitionsI (D fragment_) {
  D T1;
  D T2_0;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:110
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:112
  T3 = SLOT_VALUE_INITD(fragment_, 2);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:112
  T1 = CALL1(&Klookup_bindingVdfmc_namespaceMM0, T3);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:112
  T4 = Kdylan_bindingVdfmc_namespaceMM0I(IKJlet_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:112
  T2_0 = KEEVKdI(T1, T4);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:110
  MV_SET_COUNT(1);
  return(T2_0);
}

static D Kanonymous_of_top_level_convertF94I (D bindings_inits_, D parent_) {
  D T2;
  D T3;
  D T4;
  D T5;
  _KLsimple_object_vectorGVKd_3 T6 = {&KLsimple_object_vectorGVKdW, (D) 13};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:123
  T2 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJdefine_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:123
  T3 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJvariable_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:123
  T6.vector_element_[0] = T2;
  T6.vector_element_[1] = T3;
  T6.vector_element_[2] = bindings_inits_;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:123
  T4 = Kmake_templateVdfmc_macro_expanderI(&T6);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:123
  CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
  T5 = CONGRUENT_CALL2(parent_, T4);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:121
  return(T5);
}

static D Kanonymous_of_top_level_convertF111I () {
  D T0;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:95
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:96
  ENGINE_NODE_CALL_PROLOG(&Ktop_level_convert_using_definitionVdfmc_definitions, &K112, 3);
  T0 = ENGINE_NODE_CALL3(&K112, CREF(2), CREF(0), CREF(1));
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:95
  return(T0);
}

static D Kanonymous_of_top_level_convertF108I (D condition_) {
  D T1;
  D T2;
  _KLsimple_object_vectorGVKd_4 T3 = {&KLsimple_object_vectorGVKdW, (D) 17};
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:95
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:99
  CONGRUENT_CALL_PROLOG(&KsignalVKd, 2);
  CONGRUENT_CALL2(condition_, &KPempty_vectorVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:102
  T2 = Kfragment_source_locationVdfmc_readerMM0I(CREF(1));
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:101
  T3.vector_element_[0] = IKJsource_location_;
  T3.vector_element_[1] = T2;
  T3.vector_element_[2] = IKJmacro_name_;
  T3.vector_element_[3] = CREF(0);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:101
  CONGRUENT_CALL_PROLOG(&KnoteVdfmc_conditions, 2);
  CONGRUENT_CALL2(&KLskipping_formGVdfmc_definitions, &T3);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:105
  T1 = &KPempty_listVKi;
  MV_SET_ELT(0, &KPempty_listVKi);
  MV_SET_COUNT(1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:95
  return(T1);
}

D Ktop_level_convert_using_definitionVdfmc_definitionsMM0I (D parent_, D definition_, D fragment_) {
  volatile D T4;
  volatile D T5;
  volatile D T6;
  volatile D T7;
  volatile D T8;
  volatile D T9;
  volatile D T10;
  volatile D T11;
  volatile D T12;
  volatile D T13;
  volatile D T14;
  volatile D T15;
  volatile D T16;
  volatile D T17;
  volatile D T18T, T18;
  volatile D T19;
  volatile D T20;
  volatile D T21;
  volatile D T22;
  volatile D T23;
  volatile D T24;
  volatile D T25;
  volatile D T26;
  volatile _KLsimple_object_vectorGVKd_6 T27 = {&KLsimple_object_vectorGVKdW, (D) 25};
  volatile D T28;
  volatile D T29;
  volatile D Pold_valuePF30;
  volatile D T31;
  volatile D T32;
  volatile D T33;
  volatile D Pold_valuePF34;
  volatile D T35;
  volatile D T36_0;
  volatile D T37;
  volatile D T38;
  volatile D Pold_valuePF39;
  volatile D T40;
  volatile D T41;
  volatile D T42;
  volatile D T43;
  volatile D T44;
  volatile D forms_;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:141
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:146
  T4 = primitive_read_thread_variable(Tinteractive_compilation_layerTVdfmc_common);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:146
  if (T4 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:147
    CONGRUENT_CALL_PROLOG(&Kcurrent_library_descriptionVdfmc_common, 0);
    T5 = CONGRUENT_CALL0();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:147
    T6 = CALL1(&Klibrary_forms_dynamicQVdfmc_namespace, T5);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:147
    T25 = primitive_not(T6);
    T7 = T25;
  } else {
    T7 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:146
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:146
  if (T7 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:149
    T26 = Kfragment_source_locationVdfmc_readerMM0I(fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:150
    CONGRUENT_CALL_PROLOG(&Kfragment_macroVdfmc_reader, 1);
    T8 = CONGRUENT_CALL1(fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:152
    CONGRUENT_CALL_PROLOG(&Kcurrent_library_descriptionVdfmc_common, 0);
    T9 = CONGRUENT_CALL0();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:151
    T10 = CALL1(&Klibrary_description_emit_nameVdfmc_namespaceMM0, T9);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:148
    T27.vector_element_[0] = IKJsource_location_;
    T27.vector_element_[1] = T26;
    T27.vector_element_[2] = IKJmacro_name_;
    T27.vector_element_[3] = T8;
    T27.vector_element_[4] = IKJlibrary_name_;
    T27.vector_element_[5] = T10;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:148
    CONGRUENT_CALL_PROLOG(&KnoteVdfmc_conditions, 2);
    CONGRUENT_CALL2(&KLinteractive_tight_mode_definitionGVdfmc_definitions, &T27);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:154
    T11 = &KPempty_listVKi;
    MV_SET_ELT(0, &KPempty_listVKi);
    MV_SET_COUNT(1);
    T24 = T11;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:158
    T28 = SLOT_VALUE_INITD(fragment_, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:158
    T29 = SLOT_VALUE_INITD(fragment_, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
    Pold_valuePF30 = primitive_read_thread_variable(Texpansion_source_locationTVdfmc_macro_expander);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
    ENTER_UNWIND_FRAME(T31);
    if (!nlx_setjmp(FRAME_DEST(T31))) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      T32 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      SLOT_VALUE_SETTER(T28, T32, 0);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      SLOT_VALUE_SETTER(T29, T32, 1);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      primitive_write_thread_variable(Texpansion_source_locationTVdfmc_macro_expander, T32);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      T33 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      if (T33 != &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        Pold_valuePF34 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        ENTER_UNWIND_FRAME(T35);
        if (!nlx_setjmp(FRAME_DEST(T35))) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          T36_0 = KLobject_tableGZ32ZconstructorVKiMM0I(&KLobject_tableGVKd, &KPempty_vectorVKi, &KLobjectGVKd, (D) 41, &Kdefault_grow_sizeVKe, &KPfalseVKi);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          T37 = T36_0;
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, T37);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          T38 = Kanonymous_of_top_level_convert_using_definitionF140I(fragment_, definition_);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          FALL_THROUGH_UNWIND(T38);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Pold_valuePF34);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        CONTINUE_UNWIND();
        T44 = T38;
      } else {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        Pold_valuePF39 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        ENTER_UNWIND_FRAME(T40);
        if (!nlx_setjmp(FRAME_DEST(T40))) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Dshared_expansion_fragment_cacheVdfmc_macro_expander);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          ENTER_UNWIND_FRAME(T41);
          if (!nlx_setjmp(FRAME_DEST(T41))) {
            // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
            T42 = Kanonymous_of_top_level_convert_using_definitionF140I(fragment_, definition_);
            // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
            FALL_THROUGH_UNWIND(T42);
          }
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          T43 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          CALL1(&Kremove_all_keysXVKe, T43);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          CONTINUE_UNWIND();
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
          FALL_THROUGH_UNWIND(T42);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Pold_valuePF39);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
        CONTINUE_UNWIND();
        T44 = T42;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
      FALL_THROUGH_UNWIND(T44);
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
    primitive_write_thread_variable(Texpansion_source_locationTVdfmc_macro_expander, Pold_valuePF30);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
    CONTINUE_UNWIND();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
    forms_ = T44;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    T12 = CALL1(&Kforward_iteration_protocolVKd, forms_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    T13 = T12;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    T14 = MV_GET_ELT(1);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    T15 = MV_GET_ELT(2);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    T16 = MV_GET_ELT(3);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    T17 = MV_GET_ELT(5);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    T18T = T13;
  L0: ;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
      T18 = T18T;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
      T19 = CALL3(T16, forms_, T18, T14);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
      if (T19 == &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
        T20 = CALL2(T17, forms_, T18);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:162
        T21 = CALL1(&Kform_parent_formVdfmc_common, T20);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:162
        if (T21 == &KPfalseVKi) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:163
          CALL2(&Kform_parent_form_setterVdfmc_commonMM0, parent_, T20);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:162
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
        T22 = CALL2(T15, forms_, T18);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
        T18T = T22;
        goto L0;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:161
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:166
    T23 = forms_;
    MV_SET_ELT(0, forms_);
    MV_SET_COUNT(1);
    T24 = T23;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:146
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:141
  return(T24);
}

D Ktop_level_convert_using_definitionVdfmc_definitionsMM1I (D parent_, D definition_, D fragment_) {
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9_0;
  D T9_1;
  D T9_2;
  D failureF10;
  D UfTU_;
  D bodyF12;
  D T13_0;
  D T13_1;
  D T14_0;
  D T14_1;
  D T15_0;
  D T15_1;
  D T16_0;
  D T16_1;
  D failureF17;
  D bodyF18;
  D bodyF19;
  D T20;
  D T21;
  D T22;
  D T23;
  D T24;
  D T25;
  D T26;
  D T27;
  D T28_0;
  D T28_1;
  D T29;
  D T30;
  D T31_0;
  _KLsimple_object_vectorGVKd_6 T32 = {&KLsimple_object_vectorGVKdW, (D) 25};
  _KLsimple_object_vectorGVKd_1 T33 = {&KLsimple_object_vectorGVKdW, (D) 5};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:170
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:175
  CONGRUENT_CALL_PROLOG(&Kfragment_macroVdfmc_reader, 1);
  T4 = CONGRUENT_CALL1(fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:175
  T5 = CALL1(&Klookup_bindingVdfmc_namespaceMM0, T4);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:175
  T26 = Kdylan_bindingVdfmc_namespaceMM0I(IKJbegin_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:175
  T6 = KEEVKdI(T5, T26);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:175
  if (T6 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    CONGRUENT_CALL_PROLOG(&Kfragment_argumentVdfmc_reader, 1);
    T7 = CONGRUENT_CALL1(fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    CONGRUENT_CALL_PROLOG(&Kas_fragment_tokensVdfmc_macro_expander, 1);
    T8 = CONGRUENT_CALL1(T7);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    T9_0 = Kmatch_bounded_body_constraintVdfmc_macro_expanderI(T8, &KPempty_listVKi);
    T9_1 = MV_GET_ELT(1);
    T9_2 = MV_GET_ELT(2);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    failureF10 = T9_0;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    UfTU_ = T9_1;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    bodyF12 = T9_2;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    if (failureF10 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
      T13_0 = failureF10;
      T13_1 = &KPfalseVKi;
      T16_0 = T13_0;
      T16_1 = T13_1;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
      T27 = primitive_idQ(UfTU_,&KPempty_listVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
      if (T27 != &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
        T28_0 = &KPfalseVKi;
        T28_1 = bodyF12;
        T15_0 = T28_0;
        T15_1 = T28_1;
      } else {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
        T14_0 = &KPtrueVKi;
        T14_1 = &KPfalseVKi;
        T15_0 = T14_0;
        T15_1 = T14_1;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
      T16_0 = T15_0;
      T16_1 = T15_1;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    failureF17 = T16_0;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    bodyF18 = T16_1;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    if (failureF17 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
      T21 = Kdylan_variable_nameVdfmc_readerI(IKJmacro_case_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
      T22 = Kmacro_main_rule_match_errorVdfmc_macro_expanderI(T8, T21);
      T23 = T22;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
      CONGRUENT_CALL_PROLOG(&Kexport_fragment_tokensVdfmc_macro_expander, 1);
      bodyF19 = CONGRUENT_CALL1(bodyF18);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:179
      CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
      T20 = CONGRUENT_CALL2(parent_, bodyF19);
      T23 = T20;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:177
    T25 = T23;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:185
    T29 = Kfragment_source_locationVdfmc_readerMM0I(fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:183
    T32.vector_element_[0] = IKJparent_form_;
    T32.vector_element_[1] = parent_;
    T32.vector_element_[2] = IKJsource_location_;
    T32.vector_element_[3] = T29;
    T32.vector_element_[4] = IKJbody_;
    T32.vector_element_[5] = fragment_;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:183
    T31_0 = KLtop_level_init_formGZ32ZconstructorVdfmc_commonMM0I(&KLtop_level_init_formGVdfmc_common, &T32, T29, parent_, fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:183
    T30 = T31_0;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:183
    T33.vector_element_[0] = T30;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:183
    T24 = KlistVKdI(&T33);
    T25 = T24;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:175
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:170
  return(T25);
}

D Ktop_level_convert_using_definitionVdfmc_definitionsMM2I (D parent_, D definition_, D fragment_) {
  volatile D expander_;
  volatile D T5;
  volatile D T6;
  volatile D T7;
  volatile D T8_0;
  volatile D T8_1;
  volatile D word_;
  volatile D kind_;
  volatile D T11;
  volatile D forms_;
  volatile D T13;
  volatile D T14;
  volatile D T15;
  volatile D T16;
  volatile D T17;
  volatile D Pold_valuePF18;
  volatile D T19;
  volatile D T20;
  volatile D T21;
  volatile D Pold_valuePF22;
  volatile D T23;
  volatile D T24_0;
  volatile D T25;
  volatile D T26;
  volatile D Pold_valuePF27;
  volatile D T28;
  volatile D T29;
  volatile D T30;
  volatile D T31;
  volatile D T32;
  volatile D expansion_;
  volatile D T34;
  volatile D T35;
  volatile D T36_0;
  volatile _KLsimple_object_vectorGVKd_6 T37 = {&KLsimple_object_vectorGVKdW, (D) 25};
  volatile _KLsimple_object_vectorGVKd_1 T38 = {&KLsimple_object_vectorGVKdW, (D) 5};
  volatile D T39;
  volatile D T40;
  volatile D parentF41;
  volatile D T42_0;
  volatile _KLsimple_object_vectorGVKd_6 T43 = {&KLsimple_object_vectorGVKdW, (D) 25};
  volatile D T44;
  volatile D T45_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:191
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:195
  CONGRUENT_CALL_PROLOG(&Kform_expanderVdfmc_definitions, 1);
  expander_ = CONGRUENT_CALL1(definition_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:198
  T16 = SLOT_VALUE_INITD(fragment_, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:198
  T17 = SLOT_VALUE_INITD(fragment_, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
  Pold_valuePF18 = primitive_read_thread_variable(Texpansion_source_locationTVdfmc_macro_expander);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
  ENTER_UNWIND_FRAME(T19);
  if (!nlx_setjmp(FRAME_DEST(T19))) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    T20 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    SLOT_VALUE_SETTER(T16, T20, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    SLOT_VALUE_SETTER(T17, T20, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    primitive_write_thread_variable(Texpansion_source_locationTVdfmc_macro_expander, T20);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    T21 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    if (T21 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      Pold_valuePF22 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      ENTER_UNWIND_FRAME(T23);
      if (!nlx_setjmp(FRAME_DEST(T23))) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        T24_0 = KLobject_tableGZ32ZconstructorVKiMM0I(&KLobject_tableGVKd, &KPempty_vectorVKi, &KLobjectGVKd, (D) 41, &Kdefault_grow_sizeVKe, &KPfalseVKi);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        T25 = T24_0;
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, T25);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        T26 = Kanonymous_of_top_level_convert_using_definitionF131I(expander_, fragment_);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        FALL_THROUGH_UNWIND(T26);
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Pold_valuePF22);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      CONTINUE_UNWIND();
      T32 = T26;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      Pold_valuePF27 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      ENTER_UNWIND_FRAME(T28);
      if (!nlx_setjmp(FRAME_DEST(T28))) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Dshared_expansion_fragment_cacheVdfmc_macro_expander);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        ENTER_UNWIND_FRAME(T29);
        if (!nlx_setjmp(FRAME_DEST(T29))) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
          T30 = Kanonymous_of_top_level_convert_using_definitionF131I(expander_, fragment_);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
          FALL_THROUGH_UNWIND(T30);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        T31 = primitive_read_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        CALL1(&Kremove_all_keysXVKe, T31);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        CONTINUE_UNWIND();
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
        FALL_THROUGH_UNWIND(T30);
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      primitive_write_thread_variable(Texpansion_fragment_cacheTVdfmc_macro_expander, Pold_valuePF27);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
      CONTINUE_UNWIND();
      T32 = T30;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
    FALL_THROUGH_UNWIND(T32);
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
  primitive_write_thread_variable(Texpansion_source_locationTVdfmc_macro_expander, Pold_valuePF18);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
  CONTINUE_UNWIND();
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
  expansion_ = T32;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:201
  T5 = Kcompiling_for_macroexpansionQVdfmc_macro_expanderMM0I();
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:201
  if (T5 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:205
    T34 = Kfragment_source_locationVdfmc_readerMM0I(fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:203
    T37.vector_element_[0] = IKJparent_form_;
    T37.vector_element_[1] = parent_;
    T37.vector_element_[2] = IKJsource_location_;
    T37.vector_element_[3] = T34;
    T37.vector_element_[4] = IKJbody_;
    T37.vector_element_[5] = fragment_;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:203
    T36_0 = KLtop_level_init_formGZ32ZconstructorVdfmc_commonMM0I(&KLtop_level_init_formGVdfmc_common, &T37, T34, parent_, fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:203
    T35 = T36_0;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:203
    T38.vector_element_[0] = T35;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:203
    T6 = KlistVKdI(&T38);
    T15 = T6;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:201
    if (parent_ != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:208
      CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
      T7 = CONGRUENT_CALL2(parent_, expansion_);
      T14 = T7;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:210
      T8_0 = Kmacro_definition_wordVdfmc_definitionsMM0I(definition_);
      T8_1 = MV_GET_ELT(1);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:210
      word_ = T8_0;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:210
      kind_ = T8_1;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:212
      T39 = primitive_idQ(kind_,IKJdefine_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:212
      if (T39 != &KPfalseVKi) {
        T11 = word_;
      } else {
        T11 = &KPfalseVKi;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:212
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:214
      T40 = Kfragment_source_locationVdfmc_readerMM0I(fragment_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:211
      T43.vector_element_[0] = IKJdefine_word_;
      T43.vector_element_[1] = T11;
      T43.vector_element_[2] = IKJparent_form_;
      T43.vector_element_[3] = &KPfalseVKi;
      T43.vector_element_[4] = IKJsource_location_;
      T43.vector_element_[5] = T40;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:211
      T42_0 = KLmacro_call_formGZ32ZconstructorVdfmc_commonMM0I(&KLmacro_call_formGVdfmc_common, &T43, T40, &KPfalseVKi, T11);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:211
      parentF41 = T42_0;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:215
      CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
      forms_ = CONGRUENT_CALL2(parentF41, expansion_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:216
      CONGRUENT_CALL_PROLOG(&KasVKd, 2);
      T13 = CONGRUENT_CALL2(&KLvectorGVKd, forms_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:216
      CALL2(&Kform_derived_forms_setterVdfmc_commonMM0, T13, parentF41);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:217
      T44 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:217
      SLOT_VALUE_SETTER(parentF41, T44, 0);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:217
      SLOT_VALUE_SETTER(forms_, T44, 1);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:217
      T45_0 = T44;
      T14 = T45_0;
      MV_SET_COUNT(1);
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:201
    T15 = T14;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:201
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:191
  return(T15);
}

static D Kanonymous_of_top_level_convert_using_definitionF131I (D expander_, D fragment_) {
  D T2;
  D T3;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:199
  primitive_type_check(expander_, &KLfunctionGVKd);
  T2 = expander_;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:199
  T3 = CALL2(T2, &KPfalseVKi, fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:197
  return(T3);
}

static D Kanonymous_of_top_level_convert_using_definitionF140I (D fragment_, D definition_) {
  D T2;
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:159
  T4 = SLOT_VALUE_INITD(definition_, 14);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:159
  primitive_type_check(T4, &KLfunctionGVKd);
  T2 = T4;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:159
  T3 = CALL2(T2, &KPfalseVKi, fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:157
  return(T3);
}

D Ktop_level_convertTVdfmc_definitionsMM0I (D parent_, D fragments_) {
  D T3;
  D T4;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:47
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:48
  T3 = MAKE_CLOSURE_INITD(&Kanonymous_of_top_level_convertTF151, 1, parent_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:48
  CONGRUENT_CALL_PROLOG(&KreduceVKd, 3);
  T4 = CONGRUENT_CALL3(T3, &KPempty_listVKi, fragments_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:47
  return(T4);
}

static D Kanonymous_of_top_level_convertTF151I (D forms_, D fragment_) {
  D T2;
  D T3;
  CAPTURE_ENVIRONMENT

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:48
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:49
  CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
  T2 = CONGRUENT_CALL2(CREF(0), fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:49
  T3 = CALL2(&KconcatenateVKd, forms_, T2);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:48
  return(T3);
}

D Kinstall_top_level_formVdfmc_definitionsMM0I (D form_) {
  D T2_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:262
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:262
  T2_0 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:262
  MV_SET_COUNT(1);
  return(T2_0);
}

D Kinstall_top_level_formVdfmc_definitionsMM1I (D form_) {
  volatile D T2;
  volatile D T3;
  volatile D T4;
  volatile D T5;
  volatile D T6;
  volatile D T7;
  volatile D T8;
  volatile D T9;
  volatile D T10;
  volatile D T11;
  volatile D T12;
  volatile D T13;
  volatile D T14;
  volatile D T15;
  volatile D T16;
  volatile D T17;
  volatile D T18;
  volatile D T19;
  volatile _KLsimple_object_vectorGVKd_2 T20 = {&KLsimple_object_vectorGVKdW, (D) 9};
  volatile D Pold_valuePF21;
  volatile D T22;
  volatile D Pold_valuePF23;
  volatile D T24;
  volatile D T25;
  volatile D T26;
  volatile D T27;
  volatile D T28;
  volatile D T29;
  volatile D T30;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:266
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  T2 = primitive_read_thread_variable(Tcurrent_stageTVdfmc_common);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  T27 = primitive_idQ(T2,(D) 1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  if (T27 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    T3 = primitive_read_thread_variable(Tcurrent_dependentTVdfmc_common);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    T28 = primitive_idQ(T3,form_);
    T4 = T28;
  } else {
    T4 = &KPfalseVKi;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  if (T4 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    T5 = Kanonymous_of_install_top_level_formF170I(form_);
    T26 = T5;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    T6 = TdebuggingQTVKi;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    if (T6 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      T7 = primitive_read_thread_variable(Tinteractive_compilation_layerTVdfmc_common);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      T8 = primitive_not(T7);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      if (T7 != &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
        T29 = Kcompilation_record_ofVdfmc_commonMM1I(form_);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
        T9 = CALL1(&Kcompilation_record_downloadedQVdfmc_common, T29);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
        T10 = primitive_not(T9);
        T11 = T10;
      } else {
        T11 = T8;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      T12 = primitive_not(T11);
      T13 = T12;
    } else {
      T13 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    if (T13 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      Kdebug_assertion_failureVKiI(&K168, &KPempty_vectorVKi);
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    T14 = TdebuggingQTVKi;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    if (T14 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      T30 = Kcompilation_record_ofVdfmc_commonMM1I(form_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      T15 = CALL1(&Kcompilation_record_libraryVdfmc_common, T30);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      CONGRUENT_CALL_PROLOG(&Kcurrent_library_descriptionQVdfmc_common, 1);
      T16 = CONGRUENT_CALL1(T15);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      T17 = primitive_not(T16);
      T18 = T17;
    } else {
      T18 = &KPfalseVKi;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    if (T18 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      CONGRUENT_CALL_PROLOG(&Kcurrent_library_descriptionVdfmc_common, 0);
      T19 = CONGRUENT_CALL0();
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      T20.vector_element_[0] = form_;
      T20.vector_element_[1] = T19;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      Kdebug_assertion_failureVKiI(&K169, &T20);
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    Pold_valuePF21 = primitive_read_thread_variable(Tcurrent_stageTVdfmc_common);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    ENTER_UNWIND_FRAME(T22);
    if (!nlx_setjmp(FRAME_DEST(T22))) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      primitive_write_thread_variable(Tcurrent_stageTVdfmc_common, (D) 1);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      Pold_valuePF23 = primitive_read_thread_variable(Tcurrent_dependentTVdfmc_common);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      ENTER_UNWIND_FRAME(T24);
      if (!nlx_setjmp(FRAME_DEST(T24))) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
        primitive_write_thread_variable(Tcurrent_dependentTVdfmc_common, form_);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
        T25 = Kanonymous_of_install_top_level_formF170I(form_);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
        FALL_THROUGH_UNWIND(T25);
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      primitive_write_thread_variable(Tcurrent_dependentTVdfmc_common, Pold_valuePF23);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      CONTINUE_UNWIND();
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
      FALL_THROUGH_UNWIND(T25);
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    primitive_write_thread_variable(Tcurrent_stageTVdfmc_common, Pold_valuePF21);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
    CONTINUE_UNWIND();
    T26 = T25;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:266
  return(T26);
}

static D Kanonymous_of_install_top_level_formF170I (D form_) {
  volatile D T1;
  volatile D T2;
  volatile D T3;
  volatile D Pold_valuePF4;
  volatile D T5;
  volatile D Pold_valuePF6;
  volatile D T7;
  volatile D T8;
  volatile _KLsimple_object_vectorGVKd_1 T9 = {&KLsimple_object_vectorGVKdW, (D) 5};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:268
  CONGRUENT_CALL_PROLOG(&Kform_ignoredQVdfmc_namespace, 1);
  T1 = CONGRUENT_CALL1(form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:268
  if (T1 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
    T2 = Tdebug_outTVdfmc_common;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
    T3 = CALL2(&KmemberQVKd, IKJgsb_, T2);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
    if (T3 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
      Pold_valuePF4 = primitive_read_thread_variable(Tcurrent_stageTVdfmc_common);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
      ENTER_UNWIND_FRAME(T5);
      if (!nlx_setjmp(FRAME_DEST(T5))) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
        primitive_write_thread_variable(Tcurrent_stageTVdfmc_common, IKJtesting_);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
        Pold_valuePF6 = primitive_read_thread_variable(Tcurrent_dependentTVdfmc_common);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
        ENTER_UNWIND_FRAME(T7);
        if (!nlx_setjmp(FRAME_DEST(T7))) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
          primitive_write_thread_variable(Tcurrent_dependentTVdfmc_common, IKJno_dependent_);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
          T9.vector_element_[0] = form_;
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
          Kformat_outYformat_outVioMM0I(&K174, &T9);
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
          FALL_THROUGH_UNWIND(&KPfalseVKi);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
        primitive_write_thread_variable(Tcurrent_dependentTVdfmc_common, Pold_valuePF6);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
        CONTINUE_UNWIND();
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
        FALL_THROUGH_UNWIND(&KPfalseVKi);
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
      primitive_write_thread_variable(Tcurrent_stageTVdfmc_common, Pold_valuePF4);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
      CONTINUE_UNWIND();
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:269
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:271
    CONGRUENT_CALL_PROLOG(&Kinstall_top_level_form_bindingsVdfmc_definitions, 1);
    CONGRUENT_CALL1(form_);
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:268
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:273
  Kform_top_level_installedQ_setterVdfmc_commonMM0I(&KPtrueVKi, form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:273
  T8 = &KPtrueVKi;
  MV_SET_ELT(0, &KPtrueVKi);
  MV_SET_COUNT(1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:267
  return(T8);
}

D Kas_bodyVdfmc_definitionsMM0I (D t_) {
  D T2_0;
  D T2_1;
  D failure_;
  D parsed_f_;
  D T5;
  D T6;
  _KLsimple_object_vectorGVKd_2 T7 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:9
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:12
  T6 = SLOT_VALUE_INITD(t_, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:11
  T2_0 = CALL2(&Kparse_template_fragments_asVdfmc_macro_expanderMM0, Dstart_body_constraintVdfmc_reader, T6);
  T2_1 = MV_GET_ELT(1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:10
  failure_ = T2_0;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:10
  parsed_f_ = T2_1;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:13
  if (failure_ != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:14
    T7.vector_element_[0] = t_;
    T7.vector_element_[1] = failure_;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:14
    KerrorVKdMM1I(&K192, &T7);
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:13
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:17
  T5 = parsed_f_;
  MV_SET_ELT(0, parsed_f_);
  MV_SET_COUNT(1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:9
  return(T5);
}

D Kas_bodyVdfmc_definitionsMM1I (D f_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:20
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:21
  T2 = f_;
  MV_SET_ELT(0, f_);
  MV_SET_COUNT(1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:20
  return(T2);
}

D Kas_bodyVdfmc_definitionsMM2I (D form_) {
  D T2;
  D T3_0;
  D T3_1;
  D T3_2;
  D failureF4;
  D UfTU_;
  D bodyXF6;
  D T7_0;
  D T7_1;
  D T8_0;
  D T8_1;
  D T9_0;
  D T9_1;
  D T10_0;
  D T10_1;
  D failureF11;
  D bodyXF12;
  D bodyXF13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19_0;
  D T19_1;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:24
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  CONGRUENT_CALL_PROLOG(&Kas_fragment_tokensVdfmc_macro_expander, 1);
  T2 = CONGRUENT_CALL1(form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  T3_0 = Kmatch_bounded_body_constraint_no_backtrackingVdfmc_macro_expanderI(T2, &KPempty_listVKi);
  T3_1 = MV_GET_ELT(1);
  T3_2 = MV_GET_ELT(2);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  failureF4 = T3_0;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  UfTU_ = T3_1;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  bodyXF6 = T3_2;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  if (failureF4 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    T7_0 = failureF4;
    T7_1 = &KPfalseVKi;
    T10_0 = T7_0;
    T10_1 = T7_1;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    T18 = primitive_idQ(UfTU_,&KPempty_listVKi);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    if (T18 != &KPfalseVKi) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
      T19_0 = &KPfalseVKi;
      T19_1 = bodyXF6;
      T9_0 = T19_0;
      T9_1 = T19_1;
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
      T8_0 = &KPtrueVKi;
      T8_1 = &KPfalseVKi;
      T9_0 = T8_0;
      T9_1 = T8_1;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    T10_0 = T9_0;
    T10_1 = T9_1;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  failureF11 = T10_0;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  bodyXF12 = T10_1;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  if (failureF11 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    T15 = Kdylan_variable_nameVdfmc_readerI(IKJmacro_case_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    T16 = Kmacro_main_rule_match_errorVdfmc_macro_expanderI(T2, T15);
    T17 = T16;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    CONGRUENT_CALL_PROLOG(&Kexport_fragment_tokensVdfmc_macro_expander, 1);
    bodyXF13 = CONGRUENT_CALL1(bodyXF12);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
    T14 = bodyXF13;
    MV_SET_ELT(0, bodyXF13);
    MV_SET_COUNT(1);
    T17 = T14;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:25
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:24
  return(T17);
}

D Kuninstall_top_level_formVdfmc_definitionsMM0I (D form_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:277
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:278
  CONGRUENT_CALL_PROLOG(&Kuninstall_top_level_form_bindingsVdfmc_definitions, 1);
  CONGRUENT_CALL1(form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:279
  Kform_top_level_installedQ_setterVdfmc_commonMM0I(&KPfalseVKi, form_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:279
  T2 = &KPfalseVKi;
  MV_SET_ELT(0, &KPfalseVKi);
  MV_SET_COUNT(1);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:277
  return(T2);
}

static D Kanonymous_of_makeF206I (D Unext_method_argsU_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  DWORD T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  CAPTURE_ENVIRONMENT

  T6 = primitive_idQ(CREF(1),&KPempty_listVKi);
  if (T6 != &KPfalseVKi) {
    T14 = KerrorVKdMM1I(&K201, &KPempty_vectorVKi);
    T5 = T14;
  } else {
    T7 = SLOT_VALUE_INITD(Unext_method_argsU_, 0);
    T8 = primitive_cast_integer_as_raw(T7);
    T9 = primitive_machine_word_equalQ(T8,1);
    if (T9 != &KPfalseVKi) {
      T10 = SLOT_VALUE_INITD(CREF(1), 0);
      T11 = SLOT_VALUE_INITD(CREF(1), 1);
      MEP_CALL_PROLOG(T10, T11, 2);
      T2 = MEP_CALL2(T10, CREF(2), CREF(0));
      T4 = T2;
    } else {
      T12 = SLOT_VALUE_INITD(CREF(1), 0);
      T13 = SLOT_VALUE_INITD(CREF(1), 1);
      T3 = MEP_APPLY1(T12, T13, Unext_method_argsU_);
      T4 = T3;
    }
    T5 = T4;
  }
  return(T5);
}

D KLinteractive_tight_mode_definitionGZ32ZconstructorVdfmc_definitionsMM0I (D class_, D init_args_) {
  D T3;
  D T4;
  D T5_0;
  D T6;
  D init_argsF7;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T6 = primitive_copy_vector(init_args_);
  T3 = Kdefaulted_initialization_argumentsVKiI(&KLinteractive_tight_mode_definitionGVdfmc_definitions);
  init_argsF7 = Kconcatenate_2VKeMM1I(T6, T3);
  T4 = primitive_object_allocate_filled(10,&KLinteractive_tight_mode_definitionGVdfmc_definitionsW,9,&KPunboundVKi,0,0,&KPunboundVKi);
  APPLY2(&Kdefaulted_initializeF234, T4, init_argsF7);
  T5_0 = T4;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  MV_SET_COUNT(1);
  return(T5_0);
}

static D Kdefaulted_initializeF234I (D object_, D init_args_, D Uunique_condition_format_string_, D Uunique_condition_format_arguments_, D Uunique_condition_source_location_, D Uunique_condition_program_note_creator_, D Uunique_condition_compilation_stage_, D Uunique_condition_context_id_, D Uunique_subnotes_, D Uunique_condition_macro_name_, D Uunique_condition_library_name_) {
  D T12;
  D Uunique_condition_program_note_creatorF13;
  D T14;
  D Uunique_condition_compilation_stageF15;
  D T16;
  D Uunique_condition_macro_nameF17;
  D T18;
  D Uunique_condition_library_nameF19;
  D Uunique_subnotesF20;
  D T21;
  D init_valueF22;
  D T23;
  D init_valueF24;
  D T25;
  _KLsimple_object_vectorGVKd_1 T26 = {&KLsimple_object_vectorGVKdW, (D) 5};
  D T27;
  D T28;
  _KLsimple_object_vectorGVKd_1 T29 = {&KLsimple_object_vectorGVKdW, (D) 5};
  D T30;
  D T31;

  T21 = primitive_idQ(Uunique_condition_program_note_creator_,&KPunboundVKi);
  if (T21 != &KPfalseVKi) {
    init_valueF22 = primitive_read_thread_variable(Tcurrent_dependentTVdfmc_common);
    T12 = init_valueF22;
    Uunique_condition_program_note_creatorF13 = T12;
  } else {
    Uunique_condition_program_note_creatorF13 = Uunique_condition_program_note_creator_;
  }
  T23 = primitive_idQ(Uunique_condition_compilation_stage_,&KPunboundVKi);
  if (T23 != &KPfalseVKi) {
    init_valueF24 = primitive_read_thread_variable(Tcurrent_stageTVdfmc_common);
    T14 = init_valueF24;
    Uunique_condition_compilation_stageF15 = T14;
  } else {
    Uunique_condition_compilation_stageF15 = Uunique_condition_compilation_stage_;
  }
  T25 = primitive_idQ(Uunique_condition_macro_name_,&KPunboundVKi);
  if (T25 != &KPfalseVKi) {
    T26.vector_element_[0] = IKJmacro_name_;
    T27 = KerrorVKdMM1I(&K235, &T26);
    T16 = T27;
    Uunique_condition_macro_nameF17 = T16;
  } else {
    Uunique_condition_macro_nameF17 = Uunique_condition_macro_name_;
  }
  T28 = primitive_idQ(Uunique_condition_library_name_,&KPunboundVKi);
  if (T28 != &KPfalseVKi) {
    T29.vector_element_[0] = IKJlibrary_name_;
    T30 = KerrorVKdMM1I(&K235, &T29);
    T18 = T30;
    Uunique_condition_library_nameF19 = T18;
  } else {
    Uunique_condition_library_nameF19 = Uunique_condition_library_name_;
  }
  SLOT_VALUE_SETTER(Uunique_condition_format_string_, object_, 0);
  SLOT_VALUE_SETTER(Uunique_condition_format_arguments_, object_, 1);
  SLOT_VALUE_SETTER(Uunique_condition_source_location_, object_, 2);
  SLOT_VALUE_SETTER(Uunique_condition_program_note_creatorF13, object_, 3);
  SLOT_VALUE_SETTER(Uunique_condition_compilation_stageF15, object_, 4);
  SLOT_VALUE_SETTER(Uunique_condition_context_id_, object_, 5);
  primitive_type_check(Uunique_subnotes_, &KLsequenceGVKd);
  Uunique_subnotesF20 = Uunique_subnotes_;
  SLOT_VALUE_SETTER(Uunique_subnotesF20, object_, 6);
  SLOT_VALUE_SETTER(Uunique_condition_macro_nameF17, object_, 7);
  SLOT_VALUE_SETTER(Uunique_condition_library_nameF19, object_, 8);
  T31 = APPLY2(&KinitializeVKd, object_, init_args_);
  return(T31);
}

static D Kanonymous_of_makeF253I (D Unext_method_argsU_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  DWORD T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  CAPTURE_ENVIRONMENT

  T6 = primitive_idQ(CREF(1),&KPempty_listVKi);
  if (T6 != &KPfalseVKi) {
    T14 = KerrorVKdMM1I(&K201, &KPempty_vectorVKi);
    T5 = T14;
  } else {
    T7 = SLOT_VALUE_INITD(Unext_method_argsU_, 0);
    T8 = primitive_cast_integer_as_raw(T7);
    T9 = primitive_machine_word_equalQ(T8,1);
    if (T9 != &KPfalseVKi) {
      T10 = SLOT_VALUE_INITD(CREF(1), 0);
      T11 = SLOT_VALUE_INITD(CREF(1), 1);
      MEP_CALL_PROLOG(T10, T11, 2);
      T2 = MEP_CALL2(T10, CREF(2), CREF(0));
      T4 = T2;
    } else {
      T12 = SLOT_VALUE_INITD(CREF(1), 0);
      T13 = SLOT_VALUE_INITD(CREF(1), 1);
      T3 = MEP_APPLY1(T12, T13, Unext_method_argsU_);
      T4 = T3;
    }
    T5 = T4;
  }
  return(T5);
}

D KLskipping_formGZ32ZconstructorVdfmc_definitionsMM0I (D class_, D init_args_) {
  D T3;
  D T4;
  D T5_0;
  D T6;
  D init_argsF7;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T6 = primitive_copy_vector(init_args_);
  T3 = Kdefaulted_initialization_argumentsVKiI(&KLskipping_formGVdfmc_definitions);
  init_argsF7 = Kconcatenate_2VKeMM1I(T6, T3);
  T4 = primitive_object_allocate_filled(9,&KLskipping_formGVdfmc_definitionsW,8,&KPunboundVKi,0,0,&KPunboundVKi);
  APPLY2(&Kdefaulted_initializeF270, T4, init_argsF7);
  T5_0 = T4;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  MV_SET_COUNT(1);
  return(T5_0);
}

static D Kdefaulted_initializeF270I (D object_, D init_args_, D Uunique_condition_format_string_, D Uunique_condition_format_arguments_, D Uunique_condition_source_location_, D Uunique_condition_program_note_creator_, D Uunique_condition_compilation_stage_, D Uunique_condition_context_id_, D Uunique_subnotes_, D Uunique_condition_macro_name_) {
  D T11;
  D Uunique_condition_program_note_creatorF12;
  D T13;
  D Uunique_condition_compilation_stageF14;
  D T15;
  D Uunique_condition_macro_nameF16;
  D Uunique_subnotesF17;
  D T18;
  D init_valueF19;
  D T20;
  D init_valueF21;
  D T22;
  _KLsimple_object_vectorGVKd_1 T23 = {&KLsimple_object_vectorGVKdW, (D) 5};
  D T24;
  D T25;

  T18 = primitive_idQ(Uunique_condition_program_note_creator_,&KPunboundVKi);
  if (T18 != &KPfalseVKi) {
    init_valueF19 = primitive_read_thread_variable(Tcurrent_dependentTVdfmc_common);
    T11 = init_valueF19;
    Uunique_condition_program_note_creatorF12 = T11;
  } else {
    Uunique_condition_program_note_creatorF12 = Uunique_condition_program_note_creator_;
  }
  T20 = primitive_idQ(Uunique_condition_compilation_stage_,&KPunboundVKi);
  if (T20 != &KPfalseVKi) {
    init_valueF21 = primitive_read_thread_variable(Tcurrent_stageTVdfmc_common);
    T13 = init_valueF21;
    Uunique_condition_compilation_stageF14 = T13;
  } else {
    Uunique_condition_compilation_stageF14 = Uunique_condition_compilation_stage_;
  }
  T22 = primitive_idQ(Uunique_condition_macro_name_,&KPunboundVKi);
  if (T22 != &KPfalseVKi) {
    T23.vector_element_[0] = IKJmacro_name_;
    T24 = KerrorVKdMM1I(&K235, &T23);
    T15 = T24;
    Uunique_condition_macro_nameF16 = T15;
  } else {
    Uunique_condition_macro_nameF16 = Uunique_condition_macro_name_;
  }
  SLOT_VALUE_SETTER(Uunique_condition_format_string_, object_, 0);
  SLOT_VALUE_SETTER(Uunique_condition_format_arguments_, object_, 1);
  SLOT_VALUE_SETTER(Uunique_condition_source_location_, object_, 2);
  SLOT_VALUE_SETTER(Uunique_condition_program_note_creatorF12, object_, 3);
  SLOT_VALUE_SETTER(Uunique_condition_compilation_stageF14, object_, 4);
  SLOT_VALUE_SETTER(Uunique_condition_context_id_, object_, 5);
  primitive_type_check(Uunique_subnotes_, &KLsequenceGVKd);
  Uunique_subnotesF17 = Uunique_subnotes_;
  SLOT_VALUE_SETTER(Uunique_subnotesF17, object_, 6);
  SLOT_VALUE_SETTER(Uunique_condition_macro_nameF16, object_, 7);
  T25 = APPLY2(&KinitializeVKd, object_, init_args_);
  return(T25);
}

D Ktop_level_convert_formsVdfmc_definitionsMM0I (D cr_, D fragment_) {
  D T3;
  D T4;
  D formsF5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12T, T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D sources_;
  D Pold_valueP_;
  D T19;
  D T20;
  D source_forms_;
  D T22;
  D T23;
  D T24_0;
  D T25_0;
  D formsF26;
  D T27;
  D T28;
  D T29;
  D T30;
  D T31;
  D T32;
  D T33;
  D parent_;
  D T35_0;
  _KLsimple_object_vectorGVKd_6 T36 = {&KLsimple_object_vectorGVKdW, (D) 25};
  D T37;
  D T38_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:223
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:228
  T3 = Kboot_definitions_formQVdfmc_definitionsMM0I(fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:228
  if (T3 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:230
    CONGRUENT_CALL_PROLOG(&Kfragment_source_locationVdfmc_reader, 1);
    T4 = CONGRUENT_CALL1(fragment_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:229
    T36.vector_element_[0] = IKJsource_location_;
    T36.vector_element_[1] = T4;
    T36.vector_element_[2] = IKJdefine_word_;
    T36.vector_element_[3] = &KPfalseVKi;
    T36.vector_element_[4] = IKJparent_form_;
    T36.vector_element_[5] = &KPfalseVKi;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:229
    T35_0 = KLmacro_call_formGZ32ZconstructorVdfmc_commonMM0I(&KLmacro_call_formGVdfmc_common, &T36, T4, &KPfalseVKi, &KPfalseVKi);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:229
    parent_ = T35_0;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:233
    formsF5 = Kbooted_definition_sequenceVdfmc_definitionsMM0I();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:233
    formsF26 = formsF5;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T33 = formsF26;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T6 = CALL1(&Kforward_iteration_protocolVKd, T33);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T7 = T6;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T8 = MV_GET_ELT(1);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T9 = MV_GET_ELT(2);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T10 = MV_GET_ELT(3);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T11 = MV_GET_ELT(5);
;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    T12T = T7;
  L0: ;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
      T12 = T12T;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
      T32 = formsF26;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
      T13 = CALL3(T10, T32, T12, T8);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
      if (T13 == &KPfalseVKi) {
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
        T31 = formsF26;
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
        T14 = CALL2(T11, T31, T12);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:235
        T15 = CALL1(&Kform_parent_formVdfmc_common, T14);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:235
        if (T15 == &KPfalseVKi) {
          // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:235
          CALL2(&Kform_parent_form_setterVdfmc_commonMM0, parent_, T14);
        }
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:235
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
        T30 = formsF26;
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
        T16 = CALL2(T9, T30, T12);
        // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
        T12T = T16;
        goto L0;
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:234
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:240
    sources_ = Kbooted_source_sequenceVdfmc_definitionsMM0I();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:241
    Pold_valueP_ = primitive_read_thread_variable(Tfragment_contextTVdfmc_reader);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:241
    ENTER_UNWIND_FRAME(T19);
    if (!nlx_setjmp(FRAME_DEST(T19))) {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:241
      T20 = Kdylan_implementation_moduleVdfmc_namespaceI();
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:241
      primitive_write_thread_variable(Tfragment_contextTVdfmc_reader, T20);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:242
      source_forms_ = CALL2(&Ktop_level_convertTVdfmc_definitionsMM0, parent_, sources_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:243
      T29 = formsF26;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:243
      T22 = CALL2(&KconcatenateXYcommon_extensionsVcommon_dylan, T29, source_forms_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:243
      formsF26 = T22;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:244
      T28 = formsF26;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:244
      CONGRUENT_CALL_PROLOG(&KasVKd, 2);
      T23 = CONGRUENT_CALL2(&KLvectorGVKd, T28);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:244
      CALL2(&Kform_derived_forms_setterVdfmc_commonMM0, T23, parent_);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:241
      FALL_THROUGH_UNWIND(&KPfalseVKi);
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:241
    primitive_write_thread_variable(Tfragment_contextTVdfmc_reader, Pold_valueP_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:241
    CONTINUE_UNWIND();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:246
    T27 = formsF26;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:246
    T37 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:246
    SLOT_VALUE_SETTER(parent_, T37, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:246
    SLOT_VALUE_SETTER(T27, T37, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:246
    T38_0 = T37;
    T25_0 = T38_0;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:248
    CONGRUENT_CALL_PROLOG(&Ktop_level_convertVdfmc_definitions, 2);
    T24_0 = CONGRUENT_CALL2(&KPfalseVKi, fragment_);
    T25_0 = T24_0;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:228
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:223
  MV_SET_COUNT(1);
  return(T25_0);
}

D Kboot_definitions_formQVdfmc_definitionsMM0I (D form_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13_0;
  D T14_0;
  D T15;
  D T16_0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:36
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:37
  T8 = primitive_instanceQ(form_,&KLfunction_call_fragmentGVdfmc_reader);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:37
  if (T8 != &KPfalseVKi) {
    T6 = form_;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:39
    T9 = SLOT_VALUE_INITD(T6, 2);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:40
    T10 = primitive_instanceQ(T9,&KLvariable_name_fragmentGVdfmc_reader);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:40
    if (T10 != &KPfalseVKi) {
      T7 = T9;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:41
      T11 = SLOT_VALUE(T7, 2);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:41
      T12 = SLOT_VALUE_INITD(T11, 0);
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:41
      T13_0 = T12;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:41
      T14_0 = T13_0;
      {
        MV_CHECK_TYPE_PROLOGUE(T13_0);
        primitive_type_check(T14_0, &KLbyte_stringGVKd);
        MV_CHECK_TYPE_EPILOGUE();
      }
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:41
      T15 = T14_0;
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:41
      T16_0 = KEVKdMM27I(T15, &K280);
      T3 = T16_0;
      MV_SET_COUNT(1);
    } else {
      // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:40
      T2 = &KPfalseVKi;
      MV_SET_ELT(0, &KPfalseVKi);
      MV_SET_COUNT(1);
      T3 = T2;
    }
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:40
    T5 = T3;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:37
    T4 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T5 = T4;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:37
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:36
  return(T5);
}


/* SYSTEM INIT CODE */

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

    T0 = KPresolve_symbolVKiI(&KJmacro_name_);
    if (T0 != &KJmacro_name_) {
      primitive_repeated_slot_value_setter(T0, &K273, 1, 7);
      primitive_repeated_slot_value_setter(T0, &K272, 1, 14);
      IKJmacro_name_ = T0;
      primitive_repeated_slot_value_setter(T0, &K257, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K255, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K246, 1, 7);
      primitive_repeated_slot_value_setter(T0, &K237, 1, 14);
      primitive_repeated_slot_value_setter(T0, &K211, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K209, 1, 0);
      primitive_slot_value_setter(T0, &Kcondition_macro_nameVdfmc_definitionsHLskipping_formG, 3);
      primitive_slot_value_setter(T0, &Kcondition_macro_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG, 3);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJmacro_case_);
    if (T0 != &KJmacro_case_) {
      IKJmacro_case_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJfragments_);
    if (T0 != &KJfragments_) {
      IKJfragments_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJdefine_);
    if (T0 != &KJdefine_) {
      IKJdefine_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJvariable_);
    if (T0 != &KJvariable_) {
      IKJvariable_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJlet_);
    if (T0 != &KJlet_) {
      IKJlet_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJsource_location_);
    if (T0 != &KJsource_location_) {
      IKJsource_location_ = T0;
      primitive_repeated_slot_value_setter(T0, &K273, 1, 2);
      primitive_repeated_slot_value_setter(T0, &K272, 1, 4);
      primitive_repeated_slot_value_setter(T0, &K246, 1, 2);
      primitive_repeated_slot_value_setter(T0, &K237, 1, 4);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJparent_form_);
    if (T0 != &KJparent_form_) {
      IKJparent_form_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJbody_);
    if (T0 != &KJbody_) {
      IKJbody_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJdefine_word_);
    if (T0 != &KJdefine_word_) {
      IKJdefine_word_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJbegin_);
    if (T0 != &KJbegin_) {
      IKJbegin_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJlibrary_name_);
    if (T0 != &KJlibrary_name_) {
      primitive_repeated_slot_value_setter(T0, &K246, 1, 8);
      primitive_repeated_slot_value_setter(T0, &K237, 1, 16);
      IKJlibrary_name_ = T0;
      primitive_slot_value_setter(T0, &Kcondition_library_nameVdfmc_definitionsHLinteractive_tight_mode_definitionG, 3);
      primitive_repeated_slot_value_setter(T0, &K211, 1, 1);
      primitive_repeated_slot_value_setter(T0, &K209, 1, 2);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJgsb_);
    if (T0 != &KJgsb_) {
      IKJgsb_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJtesting_);
    if (T0 != &KJtesting_) {
      IKJtesting_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJno_dependent_);
    if (T0 != &KJno_dependent_) {
      IKJno_dependent_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJprogram_note_creator_);
    if (T0 != &KJprogram_note_creator_) {
      primitive_repeated_slot_value_setter(T0, &K273, 1, 3);
      primitive_repeated_slot_value_setter(T0, &K272, 1, 6);
      primitive_repeated_slot_value_setter(T0, &K246, 1, 3);
      primitive_repeated_slot_value_setter(T0, &K237, 1, 6);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJcompilation_stage_);
    if (T0 != &KJcompilation_stage_) {
      primitive_repeated_slot_value_setter(T0, &K273, 1, 4);
      primitive_repeated_slot_value_setter(T0, &K272, 1, 8);
      primitive_repeated_slot_value_setter(T0, &K246, 1, 4);
      primitive_repeated_slot_value_setter(T0, &K237, 1, 8);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJcontext_id_);
    if (T0 != &KJcontext_id_) {
      primitive_repeated_slot_value_setter(T0, &K273, 1, 5);
      primitive_repeated_slot_value_setter(T0, &K272, 1, 10);
      primitive_repeated_slot_value_setter(T0, &K246, 1, 5);
      primitive_repeated_slot_value_setter(T0, &K237, 1, 10);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJsubnotes_);
    if (T0 != &KJsubnotes_) {
      primitive_repeated_slot_value_setter(T0, &K273, 1, 6);
      primitive_repeated_slot_value_setter(T0, &K272, 1, 12);
      primitive_repeated_slot_value_setter(T0, &K246, 1, 6);
      primitive_repeated_slot_value_setter(T0, &K237, 1, 12);
    }
  }
{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T0 = KPadd_classVKeI(&KLskipping_formGVdfmc_definitions);
  goto I0;
}
I0:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T0 = KPadd_classVKeI(&KLinteractive_tight_mode_definitionGVdfmc_definitions);
  goto I9;
}
I9:

  return;
}

/* USER INIT CODE */

void _Init_dfmc_definitions__X_top_level_convert_for_user () {
{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T0 = KPadd_a_methodVKnI(&KmakeVKd, &KmakeVKdMdfmc_definitionsM0, &Kdfmc_definitions_libraryYdylan_userVdfmc_definitions, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi);
  goto I5;
}
I5:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:84
  T0 = KPadd_a_methodVKnI(&Kconvert_condition_slots_to_ppmlVdfmc_conditions, &Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM0, &Kdfmc_definitions_libraryYdylan_userVdfmc_definitions, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi);
  goto I8;
}
I8:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T0 = KPadd_a_methodVKnI(&KmakeVKd, &KmakeVKdMdfmc_definitionsM1, &Kdfmc_definitions_libraryYdylan_userVdfmc_definitions, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi);
  goto I14;
}
I14:

{
  D T0;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/definitions/top-level-convert.dylan:130
  T0 = KPadd_a_methodVKnI(&Kconvert_condition_slots_to_ppmlVdfmc_conditions, &Kconvert_condition_slots_to_ppmlVdfmc_conditionsMdfmc_definitionsM1, &Kdfmc_definitions_libraryYdylan_userVdfmc_definitions, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi);
  goto I17;
}
I17:

  return;
}


/* eof */
