#include "run-time.h"

/* Typedefs for referenced classes */

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

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

typedef struct {
  D wrapper;
} _KLobjectGVKd;

typedef struct {
  D wrapper;
} _KLunboundGVKe;

typedef struct {
  D wrapper;
} _KLbooleanGVKd;

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

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

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

typedef struct {
  D wrapper;
  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(13);
define__KLbyte_stringGVKd(22);
define__KLbyte_stringGVKd(20);
define__KLbyte_stringGVKd(4);
define__KLbyte_stringGVKd(28);
define__KLbyte_stringGVKd(26);
define__KLbyte_stringGVKd(24);

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

typedef struct {
  D wrapper;
  D element_source_location_;
} _KLmaybe_empty_substitutionGVdfmc_macro_expander;

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

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

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

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

typedef struct {
  D wrapper;
  D element_source_location_;
} _KLsubstitutionGVdfmc_macro_expander;

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_left_delimiter_;
  D fragment_nested_fragments_;
  D fragment_right_delimiter_;
} _KLbraces_fragmentGVdfmc_reader;

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_left_delimiter_;
  D fragment_nested_fragments_;
  D fragment_right_delimiter_;
} _KLbrackets_fragmentGVdfmc_reader;

typedef struct {
  D wrapper;
  D fragment_record_;
  D fragment_source_position_;
  D fragment_left_delimiter_;
  D fragment_nested_fragments_;
  D fragment_right_delimiter_;
} _KLparens_fragmentGVdfmc_reader;

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

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

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

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


/* Typedefs for defined classes */


/* Referenced object declarations */

extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLclassGVKd KLobjectGVKd;
extern _KLmm_wrapperGVKi_0 KLobjectGVKdW;
extern _KLunboundGVKe KPunboundVKi;
extern _KLclassGVKd KLunboundGVKe;
extern _KLmm_wrapperGVKi_0 KLunboundGVKeW;
extern _KLbooleanGVKd KPtrueVKi;
extern _KLclassGVKd KLbooleanGVKd;
extern _KLmm_wrapperGVKi_0 KLbooleanGVKdW;
extern _KLbooleanGVKd KPfalseVKi;
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
D Kmake_templateVdfmc_macro_expanderI (D);
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_2VKi;
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 KLmaybe_empty_substitutionGVdfmc_macro_expander;
extern _KLmm_wrapperGVKi_0 KLmaybe_empty_substitutionGVdfmc_macro_expanderW;
D Kmake_name_fragmentVdfmc_macro_expanderI (D);
extern _KLsealed_generic_functionGVKe Kimport_to_templateVdfmc_macro_expander;
D Kmake_comma_fragmentVdfmc_macro_expanderI ();
extern _KLsealed_generic_functionGVKe Kmaybe_substitute_separatorVdfmc_macro_expander;
D KlistVKdI (D);
D Kmake_parens_fragmentVdfmc_macro_expanderI (D);
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLsimple_object_vectorGVKd_16 KDsignature_LlistG_typesVKi;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_1VKi;
extern _KLsealed_generic_functionGVKe Kgenerate_substitutionVdfmc_macro_expander;
extern _KLclassGVKd KLsubstitutionGVdfmc_macro_expander;
extern _KLmm_wrapperGVKi_0 KLsubstitutionGVdfmc_macro_expanderW;
extern _KLclassGVKd KLbraces_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLbraces_fragmentGVdfmc_readerW;
extern _KLclassGVKd KLbrackets_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLbrackets_fragmentGVdfmc_readerW;
extern _KLclassGVKd KLparens_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLparens_fragmentGVdfmc_readerW;
extern _KLclassGVKd KLfragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLfragmentGVdfmc_readerW;
extern _KLsealed_generic_functionGVKe Kgenerate_constructorVdfmc_macro_expander;
extern _KLclassGVKd KLseparator_fragmentGVdfmc_reader;
extern _KLmm_wrapperGVKi_0 KLseparator_fragmentGVdfmc_readerW;
extern _KLclassGVKd KLlistGVKd;
extern _KLmm_wrapperGVKi_0 KLlistGVKdW;
extern _KLclassGVKd KLunionGVKe;
extern _KLmm_wrapperGVKi_0 KLunionGVKeW;
D Kunion_instanceQVKiI (D, D);

/* Defined object declarations */

D Kcompile_template_elementsVdfmc_macro_expanderMM0I (D);
extern _KLsealed_generic_functionGVKe Kcompile_template_elementVdfmc_macro_expander;
extern _KLsimple_methodGVKe Kcompile_template_elementVdfmc_macro_expanderMM0;
D Kcompile_template_elementVdfmc_macro_expanderMM0I (D, D);
extern _KLsimple_methodGVKe Kcompile_template_elementVdfmc_macro_expanderMM1;
D Kcompile_template_elementVdfmc_macro_expanderMM1I (D, D);
static _KLpairGVKd K6;
static _KLpairGVKd K7;
static _KLbyte_stringGVKd_24 K8;
D Kcompile_one_template_elementVdfmc_macro_expanderMM0I (D);
extern _KLsealed_generic_functionGVKe Kcompile_one_template_elementVdfmc_macro_expander;
extern _KLsimple_methodGVKe Kcompile_template_elementsVdfmc_macro_expanderMM0;
static _KLsymbolGVKd KJmaybe_substitute_separator_;
static _KLbyte_stringGVKd_26 K13;
static _KLsignatureGVKe K14;
extern _KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM0;
extern _KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM1;
D Kcompile_one_template_elementVdfmc_macro_expanderMM1I (D);
extern _KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM2;
D Kcompile_one_template_elementVdfmc_macro_expanderMM2I (D);
extern _KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM3;
D Kcompile_one_template_elementVdfmc_macro_expanderMM3I (D);
extern _KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM4;
D Kcompile_one_template_elementVdfmc_macro_expanderMM4I (D);
static _KLpairGVKd K24;
static _KLpairGVKd K25;
static _KLpairGVKd K26;
static _KLpairGVKd K27;
static _KLpairGVKd K28;
static _KLbyte_stringGVKd_28 K29;
static _KLsignatureGVKe K30;
static _KLsimple_object_vectorGVKd_1 K31;
static _KLsymbolGVKd KJmake_braces_fragment_;
static _KLsymbolGVKd KJlist_;
static _KLbyte_stringGVKd_4 K34;
static _KLbyte_stringGVKd_20 K35;
static _KLsignatureGVKe K36;
static _KLsimple_object_vectorGVKd_1 K37;
static _KLsymbolGVKd KJmake_brackets_fragment_;
static _KLbyte_stringGVKd_22 K39;
static _KLsignatureGVKe K40;
static _KLsimple_object_vectorGVKd_1 K41;
static _KLsymbolGVKd KJmake_parens_fragment_;
static _KLbyte_stringGVKd_20 K43;
static _KLsignatureGVKe K44;
static _KLsimple_object_vectorGVKd_1 K45;
static _KLsignatureGVKe K46;
static _KLsimple_object_vectorGVKd_1 K47;
static _KLsignatureGVKe K48;
static _KLsimple_object_vectorGVKd_2 K49;
static _KLsignatureGVKe K50;
static _KLsimple_object_vectorGVKd_2 K51;
static _KLunionGVKe K52;
extern _KLsimple_methodGVKe Kcompile_macro_template_to_codeVdfmc_macro_expanderMM0;
D Kcompile_macro_template_to_codeVdfmc_macro_expanderMM0I (D);
static _KLsymbolGVKd KJmake_template_;
static _KLbyte_stringGVKd_13 K56;

/* Indirection variables */

static D IKJmaybe_substitute_separator_ = &KJmaybe_substitute_separator_;
static D IKJmake_braces_fragment_ = &KJmake_braces_fragment_;
static D IKJlist_ = &KJlist_;
static D IKJmake_brackets_fragment_ = &KJmake_brackets_fragment_;
static D IKJmake_parens_fragment_ = &KJmake_parens_fragment_;
static D IKJmake_template_ = &KJmake_template_;

/* Variables */

D compile_macro_template_to_codeVdfmc_macro_expander = &Kcompile_macro_template_to_codeVdfmc_macro_expanderMM0;

/* Objects */

_KLsealed_generic_functionGVKe Kcompile_template_elementVdfmc_macro_expander = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &KDsignature_LobjectG_object_rest_value_2VKi,
  (D) 9,
  &K8,
  &K6,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsimple_methodGVKe Kcompile_template_elementVdfmc_macro_expanderMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K50,
  &Kcompile_template_elementVdfmc_macro_expanderMM0I
};

_KLsimple_methodGVKe Kcompile_template_elementVdfmc_macro_expanderMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K48,
  &Kcompile_template_elementVdfmc_macro_expanderMM1I
};

static _KLpairGVKd K6 = {
  &KLpairGVKdW /* wrapper */,
  &Kcompile_template_elementVdfmc_macro_expanderMM0,
  &K7
};

static _KLpairGVKd K7 = {
  &KLpairGVKdW /* wrapper */,
  &Kcompile_template_elementVdfmc_macro_expanderMM1,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_24 K8 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 97,
  "compile-template-element"
};

_KLsealed_generic_functionGVKe Kcompile_one_template_elementVdfmc_macro_expander = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  (D) 1,
  &K29,
  &K24,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsimple_methodGVKe Kcompile_template_elementsVdfmc_macro_expanderMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K14,
  &Kcompile_template_elementsVdfmc_macro_expanderMM0I
};

static _KLsymbolGVKd KJmaybe_substitute_separator_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K13
};

static _KLbyte_stringGVKd_26 K13 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 105,
  "maybe-substitute-separator"
};

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

_KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K46,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM0I
};

_KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K44,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM1I
};

_KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM2 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K40,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM2I
};

_KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM3 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K36,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM3I
};

_KLsimple_methodGVKe Kcompile_one_template_elementVdfmc_macro_expanderMM4 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K30,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM4I
};

static _KLpairGVKd K24 = {
  &KLpairGVKdW /* wrapper */,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM0,
  &K25
};

static _KLpairGVKd K25 = {
  &KLpairGVKdW /* wrapper */,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM1,
  &K26
};

static _KLpairGVKd K26 = {
  &KLpairGVKdW /* wrapper */,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM2,
  &K27
};

static _KLpairGVKd K27 = {
  &KLpairGVKdW /* wrapper */,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM3,
  &K28
};

static _KLpairGVKd K28 = {
  &KLpairGVKdW /* wrapper */,
  &Kcompile_one_template_elementVdfmc_macro_expanderMM4,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_28 K29 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 113,
  "compile-one-template-element"
};

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

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

static _KLsymbolGVKd KJmake_braces_fragment_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K35
};

static _KLsymbolGVKd KJlist_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K34
};

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

static _KLbyte_stringGVKd_20 K35 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 81,
  "make-braces-fragment"
};

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

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

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

static _KLbyte_stringGVKd_22 K39 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 89,
  "make-brackets-fragment"
};

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

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

static _KLsymbolGVKd KJmake_parens_fragment_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K43
};

static _KLbyte_stringGVKd_20 K43 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 81,
  "make-parens-fragment"
};

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

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

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

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

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

static _KLsimple_object_vectorGVKd_2 K49 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLseparator_fragmentGVdfmc_reader,
  &KLlistGVKd
};

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

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

static _KLunionGVKe K52 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &KLfragmentGVdfmc_reader,
  &KLsubstitutionGVdfmc_macro_expander
};

_KLsimple_methodGVKe Kcompile_macro_template_to_codeVdfmc_macro_expanderMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kcompile_macro_template_to_codeVdfmc_macro_expanderMM0I
};

static _KLsymbolGVKd KJmake_template_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K56
};

static _KLbyte_stringGVKd_13 K56 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 53,
  "make-template"
};

/* Code */

D Kcompile_template_elementsVdfmc_macro_expanderMM0I (D elements_) {
  D T2;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:14
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:15
  T5 = primitive_idQ(elements_,&KPempty_listVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:15
  if (T5 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:16
    T2 = Kmake_templateVdfmc_macro_expanderI(&KPempty_vectorVKi);
    T4 = T2;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:18
    T6 = SLOT_VALUE_INITD(elements_, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:18
    T7 = SLOT_VALUE_INITD(elements_, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:18
    CONGRUENT_CALL_PROLOG(&Kcompile_template_elementVdfmc_macro_expander, 2);
    T3 = CONGRUENT_CALL2(T6, T7);
    T4 = T3;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:15
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:14
  return(T4);
}

D Kcompile_template_elementVdfmc_macro_expanderMM0I (D element_, D rest_) {
  D this_;
  D restF4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9;
  _KLsimple_object_vectorGVKd_2 T10 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:22
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:24
  CONGRUENT_CALL_PROLOG(&Kcompile_one_template_elementVdfmc_macro_expander, 1);
  this_ = CONGRUENT_CALL1(element_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:25
  restF4 = Kcompile_template_elementsVdfmc_macro_expanderMM0I(rest_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:26
  CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
  T5 = CONGRUENT_CALL1(this_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:26
  T6 = Kmake_comma_fragmentVdfmc_macro_expanderI();
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:26
  CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
  T7 = CONGRUENT_CALL1(restF4);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:26
  CONGRUENT_CALL_PROLOG(&Kmaybe_substitute_separatorVdfmc_macro_expander, 2);
  T8 = CONGRUENT_CALL2(T6, T7);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:26
  T10.vector_element_[0] = T5;
  T10.vector_element_[1] = T8;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:26
  T9 = Kmake_templateVdfmc_macro_expanderI(&T10);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:22
  return(T9);
}

D Kcompile_template_elementVdfmc_macro_expanderMM1I (D element_, D rest_) {
  D T3;
  D subst_;
  D restF5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  D T15;
  D T16;
  D T17;
  D T18;
  D T19;
  D T20;
  D T21;
  D T22;
  D sep_;
  D T24;
  D T25;
  _KLsimple_object_vectorGVKd_2 T26 = {&KLsimple_object_vectorGVKdW, (D) 9};
  _KLsimple_object_vectorGVKd_3 T27 = {&KLsimple_object_vectorGVKdW, (D) 13};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:29
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
  T18 = primitive_idQ(rest_,&KPempty_listVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
  if (T18 != &KPfalseVKi) {
    T3 = T18;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
    T19 = SLOT_VALUE_INITD(rest_, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
    T20 = primitive_instanceQ(T19,&KLmaybe_empty_substitutionGVdfmc_macro_expander);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
    T21 = primitive_not(T20);
    T3 = T21;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
  if (T3 != &KPfalseVKi) {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:32
    T22 = Kcompile_template_elementVdfmc_macro_expanderMM0I(element_, rest_);
    T17 = T22;
  } else {
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:34
    sep_ = Kcompile_one_template_elementVdfmc_macro_expanderMM0I(element_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:35
    T24 = SLOT_VALUE_INITD(rest_, 0);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:35
    CONGRUENT_CALL_PROLOG(&Kcompile_one_template_elementVdfmc_macro_expander, 1);
    subst_ = CONGRUENT_CALL1(T24);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:36
    T25 = SLOT_VALUE_INITD(rest_, 1);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:36
    restF5 = CALL1(&Kcompile_template_elementsVdfmc_macro_expanderMM0, T25);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T6 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJmaybe_substitute_separator_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
    T7 = CONGRUENT_CALL1(sep_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T8 = Kmake_comma_fragmentVdfmc_macro_expanderI();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
    T9 = CONGRUENT_CALL1(subst_);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    CONGRUENT_CALL_PROLOG(&Kmaybe_substitute_separatorVdfmc_macro_expander, 2);
    T10 = CONGRUENT_CALL2(T8, T9);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T26.vector_element_[0] = T7;
    T26.vector_element_[1] = T10;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T11 = KlistVKdI(&T26);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T12 = Kmake_parens_fragmentVdfmc_macro_expanderI(T11);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T13 = Kmake_comma_fragmentVdfmc_macro_expanderI();
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
    T14 = CONGRUENT_CALL1(restF5);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    CONGRUENT_CALL_PROLOG(&Kmaybe_substitute_separatorVdfmc_macro_expander, 2);
    T15 = CONGRUENT_CALL2(T13, T14);
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T27.vector_element_[0] = T6;
    T27.vector_element_[1] = T12;
    T27.vector_element_[2] = T15;
    // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:37
    T16 = Kmake_templateVdfmc_macro_expanderI(&T27);
    T17 = T16;
  }
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:31
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:29
  return(T17);
}

D Kcompile_one_template_elementVdfmc_macro_expanderMM0I (D element_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:41
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:42
  CONGRUENT_CALL_PROLOG(&Kgenerate_constructorVdfmc_macro_expander, 1);
  T2 = CONGRUENT_CALL1(element_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:41
  return(T2);
}

D Kcompile_one_template_elementVdfmc_macro_expanderMM1I (D element_) {
  D nested_;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  _KLsimple_object_vectorGVKd_1 T12 = {&KLsimple_object_vectorGVKdW, (D) 5};
  _KLsimple_object_vectorGVKd_2 T13 = {&KLsimple_object_vectorGVKdW, (D) 9};
  _KLsimple_object_vectorGVKd_2 T14 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:45
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:46
  T11 = SLOT_VALUE_INITD(element_, 3);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:46
  nested_ = CALL1(&Kcompile_template_elementsVdfmc_macro_expanderMM0, T11);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T3 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJmake_parens_fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T4 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJlist_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
  T5 = CONGRUENT_CALL1(nested_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T12.vector_element_[0] = T5;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T6 = KlistVKdI(&T12);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T7 = Kmake_parens_fragmentVdfmc_macro_expanderI(T6);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T13.vector_element_[0] = T4;
  T13.vector_element_[1] = T7;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T8 = KlistVKdI(&T13);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T9 = Kmake_parens_fragmentVdfmc_macro_expanderI(T8);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T14.vector_element_[0] = T3;
  T14.vector_element_[1] = T9;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:47
  T10 = Kmake_templateVdfmc_macro_expanderI(&T14);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:45
  return(T10);
}

D Kcompile_one_template_elementVdfmc_macro_expanderMM2I (D element_) {
  D nested_;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  _KLsimple_object_vectorGVKd_1 T12 = {&KLsimple_object_vectorGVKdW, (D) 5};
  _KLsimple_object_vectorGVKd_2 T13 = {&KLsimple_object_vectorGVKdW, (D) 9};
  _KLsimple_object_vectorGVKd_2 T14 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:50
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:51
  T11 = SLOT_VALUE_INITD(element_, 3);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:51
  nested_ = CALL1(&Kcompile_template_elementsVdfmc_macro_expanderMM0, T11);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T3 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJmake_brackets_fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T4 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJlist_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
  T5 = CONGRUENT_CALL1(nested_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T12.vector_element_[0] = T5;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T6 = KlistVKdI(&T12);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T7 = Kmake_parens_fragmentVdfmc_macro_expanderI(T6);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T13.vector_element_[0] = T4;
  T13.vector_element_[1] = T7;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T8 = KlistVKdI(&T13);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T9 = Kmake_parens_fragmentVdfmc_macro_expanderI(T8);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T14.vector_element_[0] = T3;
  T14.vector_element_[1] = T9;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:52
  T10 = Kmake_templateVdfmc_macro_expanderI(&T14);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:50
  return(T10);
}

D Kcompile_one_template_elementVdfmc_macro_expanderMM3I (D element_) {
  D nested_;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  _KLsimple_object_vectorGVKd_1 T12 = {&KLsimple_object_vectorGVKdW, (D) 5};
  _KLsimple_object_vectorGVKd_2 T13 = {&KLsimple_object_vectorGVKdW, (D) 9};
  _KLsimple_object_vectorGVKd_2 T14 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:55
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:56
  T11 = SLOT_VALUE_INITD(element_, 3);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:56
  nested_ = CALL1(&Kcompile_template_elementsVdfmc_macro_expanderMM0, T11);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T3 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJmake_braces_fragment_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T4 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJlist_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
  T5 = CONGRUENT_CALL1(nested_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T12.vector_element_[0] = T5;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T6 = KlistVKdI(&T12);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T7 = Kmake_parens_fragmentVdfmc_macro_expanderI(T6);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T13.vector_element_[0] = T4;
  T13.vector_element_[1] = T7;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T8 = KlistVKdI(&T13);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T9 = Kmake_parens_fragmentVdfmc_macro_expanderI(T8);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T14.vector_element_[0] = T3;
  T14.vector_element_[1] = T9;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:57
  T10 = Kmake_templateVdfmc_macro_expanderI(&T14);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:55
  return(T10);
}

D Kcompile_one_template_elementVdfmc_macro_expanderMM4I (D element_) {
  D T2;

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:60
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:61
  CONGRUENT_CALL_PROLOG(&Kgenerate_substitutionVdfmc_macro_expander, 1);
  T2 = CONGRUENT_CALL1(element_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:60
  return(T2);
}

D Kcompile_macro_template_to_codeVdfmc_macro_expanderMM0I (D contents_) {
  D constructor_code_;
  D T3;
  D T4;
  D T5;
  D T6;
  D T7;
  _KLsimple_object_vectorGVKd_1 T8 = {&KLsimple_object_vectorGVKdW, (D) 5};
  _KLsimple_object_vectorGVKd_2 T9 = {&KLsimple_object_vectorGVKdW, (D) 9};

  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:9
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:10
  constructor_code_ = CALL1(&Kcompile_template_elementsVdfmc_macro_expanderMM0, contents_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:11
  T3 = Kmake_name_fragmentVdfmc_macro_expanderI(IKJmake_template_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:11
  CONGRUENT_CALL_PROLOG(&Kimport_to_templateVdfmc_macro_expander, 1);
  T4 = CONGRUENT_CALL1(constructor_code_);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:11
  T8.vector_element_[0] = T4;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:11
  T5 = KlistVKdI(&T8);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:11
  T6 = Kmake_parens_fragmentVdfmc_macro_expanderI(T5);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:11
  T9.vector_element_[0] = T3;
  T9.vector_element_[1] = T6;
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:11
  T7 = Kmake_templateVdfmc_macro_expanderI(&T9);
  // /Users/bruce/Development/dylan/opendylan/sources/dfmc/macro-expander/template-compilation.dylan:9
  return(T7);
}


/* SYSTEM INIT CODE */

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

    T0 = KPresolve_symbolVKiI(&KJmaybe_substitute_separator_);
    if (T0 != &KJmaybe_substitute_separator_) {
      IKJmaybe_substitute_separator_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJmake_braces_fragment_);
    if (T0 != &KJmake_braces_fragment_) {
      IKJmake_braces_fragment_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJlist_);
    if (T0 != &KJlist_) {
      IKJlist_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJmake_brackets_fragment_);
    if (T0 != &KJmake_brackets_fragment_) {
      IKJmake_brackets_fragment_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJmake_parens_fragment_);
    if (T0 != &KJmake_parens_fragment_) {
      IKJmake_parens_fragment_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJmake_template_);
    if (T0 != &KJmake_template_) {
      IKJmake_template_ = T0;
    }
  }
  return;
}

/* USER INIT CODE */

void _Init_dfmc_macro_expander__X_template_compilation_for_user () {
  return;
}


/* eof */
