#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 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 head_;
  D tail_;
} _KLempty_listGVKd;

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

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

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

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(9);
define__KLbyte_stringGVKd(12);
define__KLbyte_stringGVKd(8);
define__KLbyte_stringGVKd(6);
define__KLbyte_stringGVKd(7);
define__KLbyte_stringGVKd(27);

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

typedef struct {
  D wrapper;
  D mangler_;
  D cg_variables_;
  D registers_;
  D variables_;
} _KLharp_back_endGYbase_harpVharp;

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

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

typedef struct {
  D wrapper;
} _KLintegerGVKd;

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

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLi_constant_referenceGYharp_constant_referencesVharp;

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

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

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLinteractor_constant_referenceGYharp_constant_referencesVharp;

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLsf_constant_referenceGYharp_constant_referencesVharp;

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLsf_indirect_constant_referenceGYharp_constant_referencesVharp;

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLdf_constant_referenceGYharp_constant_referencesVharp;

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLdf_indirect_constant_referenceGYharp_constant_referencesVharp;

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

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLconstant_referenceGYharp_constant_referencesVharp;

typedef struct {
  D wrapper;
  D cr_refers_to_object_;
  D cr_const_offset_;
} _KLindirect_constant_referenceGYharp_constant_referencesVharp;

typedef struct {
  D wrapper;
} _KLabstract_integerGVKe;


/* 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 _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLabsent_engine_nodeGVKg RSINGULAR_Labsent_engine_nodeG;
extern _KLclassGVKd KLabsent_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLabsent_engine_nodeGVKgW;
extern _KLmoduleGVKe Kbase_harp_moduleYdylan_userVharp;
extern _KLclassGVKd KLmoduleGVKe;
extern _KLmm_wrapperGVKi_0 KLmoduleGVKeW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_16 KDsignature_LintegerG_typesVKi;
extern _KLclassGVKd KLharp_back_endGYbase_harpVharp;
extern _KLmm_wrapperGVKi_0 KLharp_back_endGYbase_harpVharpW;
extern _KLclassGVKd KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLclassGVKd KLintegerGVKd;
extern _KLmm_wrapperGVKi_0 KLintegerGVKdW;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
D KmakeVKdMharpM2I (D, D, D, D, D, D);
extern _KLclassGVKd KLi_constant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLi_constant_referenceGYharp_constant_referencesVharpW;
extern _KLfunction_classGVKi KLkeyword_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_methodGVKeW;
extern _KLsymbolGVKd KJmode_;
extern _KLclassGVKd KLkeyword_signatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLkeyword_signatureAvaluesGVKiW;
D KmakeVKdMharpM1I (D, D, D, D);
extern _KLclassGVKd KLinteractor_constant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLinteractor_constant_referenceGYharp_constant_referencesVharpW;
D KmakeVKdMharpM3I (D, D, D, D, D, D);
extern _KLclassGVKd KLsf_constant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLsf_constant_referenceGYharp_constant_referencesVharpW;
extern _KLclassGVKd KLsf_indirect_constant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLsf_indirect_constant_referenceGYharp_constant_referencesVharpW;
D KmakeVKdMharpM4I (D, D, D, D, D, D);
extern _KLclassGVKd KLdf_constant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLdf_constant_referenceGYharp_constant_referencesVharpW;
extern _KLclassGVKd KLdf_indirect_constant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLdf_indirect_constant_referenceGYharp_constant_referencesVharpW;
D Kadd_newXVKdMM3I (D, D, D, D);
extern _KLsimple_methodGVKe KEEVKd;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLclassGVKd KLconstant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLconstant_referenceGYharp_constant_referencesVharpW;
D KsizeVKdMM30I (D);
extern _KLincremental_generic_functionGVKe KTVKd;
extern _KLincremental_generic_functionGVKe KmakeVKd;
extern _KLclassGVKd KLindirect_constant_referenceGYharp_constant_referencesVharp;
extern _KLmm_wrapperGVKi_0 KLindirect_constant_referenceGYharp_constant_referencesVharpW;
extern _KLclassGVKd KLabstract_integerGVKe;
extern _KLmm_wrapperGVKi_0 KLabstract_integerGVKeW;

/* Defined object declarations */

extern _KLincremental_generic_functionGVKe Klabelled_constant_incrementYbase_harpVharp;
extern _KLsimple_methodGVKe Klabelled_constant_incrementYbase_harpVharpMM0;
D Klabelled_constant_incrementYbase_harpVharpMM0I (D);
static _KLpairGVKd K3;
static _KLsignatureAvaluesGVKi K4;
static _KLbyte_stringGVKd_27 K5;
static _KLsimple_object_vectorGVKd_1 K6;
extern _KLkeyword_methodGVKe Kins__constant_refYbase_harpVharpMM0;
D Kins__constant_refYbase_harpVharpMM0I (D, D, D, D, D, D);
static _KLkeyword_signatureAvaluesGVKi K9;
static _KLsimple_object_vectorGVKd_6 K10;
static _KLsymbolGVKd KJoffset_;
static _KLsymbolGVKd KJaddress_;
static _KLsymbolGVKd KJimportQ_;
static _KLbyte_stringGVKd_7 K14;
static _KLbyte_stringGVKd_7 K15;
static _KLbyte_stringGVKd_6 K16;
static _KLsimple_object_vectorGVKd_2 K17;
static _KLsimple_object_vectorGVKd_3 K18;
static _KLsimple_object_vectorGVKd_3 K19;
static _KLsimple_object_vectorGVKd_1 K20;
extern _KLkeyword_methodGVKe Kins__indirect_constant_refYbase_harpVharpMM0;
D Kins__indirect_constant_refYbase_harpVharpMM0I (D, D, D, D, D);
static _KLsymbolGVKd KJindirect_;
static _KLbyte_stringGVKd_8 K24;
static _KLkeyword_signatureAvaluesGVKi K25;
static _KLsimple_object_vectorGVKd_4 K26;
static _KLsimple_object_vectorGVKd_2 K27;
static _KLsimple_object_vectorGVKd_2 K28;
extern _KLsimple_methodGVKe Kins__interactor_constant_refYbase_harpVharpMM0;
D Kins__interactor_constant_refYbase_harpVharpMM0I (D, D);
static _KLsignatureAvaluesGVKi K31;
extern _KLkeyword_methodGVKe Kins__sf_constant_refYbase_harpVharpMM0;
D Kins__sf_constant_refYbase_harpVharpMM0I (D, D, D, D, D, D);
static _KLkeyword_signatureAvaluesGVKi K34;
static _KLsimple_object_vectorGVKd_1 K35;
extern _KLkeyword_methodGVKe Kins__sf_indirect_constant_refYbase_harpVharpMM0;
D Kins__sf_indirect_constant_refYbase_harpVharpMM0I (D, D, D, D, D);
static _KLkeyword_signatureAvaluesGVKi K38;
static _KLsimple_object_vectorGVKd_1 K39;
extern _KLkeyword_methodGVKe Kins__df_constant_refYbase_harpVharpMM0;
D Kins__df_constant_refYbase_harpVharpMM0I (D, D, D, D, D, D);
static _KLkeyword_signatureAvaluesGVKi K42;
static _KLsimple_object_vectorGVKd_1 K43;
extern _KLkeyword_methodGVKe Kins__df_indirect_constant_refYbase_harpVharpMM0;
D Kins__df_indirect_constant_refYbase_harpVharpMM0I (D, D, D, D, D);
static _KLkeyword_signatureAvaluesGVKi K46;
static _KLsimple_object_vectorGVKd_1 K47;
extern _KLsimple_methodGVKe Kins__register_externalYbase_harpVharpMM0;
D Kins__register_externalYbase_harpVharpMM0I (D, D);
static _KLsignatureGVKe K50;
static _KLsimple_object_vectorGVKd_2 K51;
extern _KLsimple_methodGVKe Kins__reference_dataYbase_harpVharpMM0;
D Kins__reference_dataYbase_harpVharpMM0I (D, D);
D Kadd_referenced_dataYbase_harpVharpMM0I (D, D, D);
static _KLsymbolGVKd KJconst_offset_;
static _KLsymbolGVKd KJrefers_to_;
static _KLsymbolGVKd KJaddress_mode_;
static _KLbyte_stringGVKd_12 K58;
static _KLbyte_stringGVKd_9 K59;
static _KLbyte_stringGVKd_12 K60;
static _KLsignatureAvaluesGVKi K61;
static _KLsimple_object_vectorGVKd_2 K62;
static _KLsimple_object_vectorGVKd_1 K63;
extern _KLsimple_methodGVKe Kins__reference_sf_dataYbase_harpVharpMM0;
D Kins__reference_sf_dataYbase_harpVharpMM0I (D, D);
extern _KLsimple_methodGVKe Kins__reference_df_dataYbase_harpVharpMM0;
D Kins__reference_df_dataYbase_harpVharpMM0I (D, D, D);
D Kadd_referenced_double_dataYbase_harpVharpMM0I (D, D, D, D);
static _KLsignatureAvaluesGVKi K69;
static _KLsimple_object_vectorGVKd_3 K70;

/* Indirection variables */

static D IKJoffset_ = &KJoffset_;
static D IKJaddress_ = &KJaddress_;
static D IKJimportQ_ = &KJimportQ_;
static D IKJindirect_ = &KJindirect_;
static D IKJconst_offset_ = &KJconst_offset_;
static D IKJrefers_to_ = &KJrefers_to_;
static D IKJaddress_mode_ = &KJaddress_mode_;

/* Variables */

D ins__reference_df_dataYbase_harpVharp = &Kins__reference_df_dataYbase_harpVharpMM0;
D ins__reference_sf_dataYbase_harpVharp = &Kins__reference_sf_dataYbase_harpVharpMM0;
D ins__reference_dataYbase_harpVharp = &Kins__reference_dataYbase_harpVharpMM0;
D ins__register_externalYbase_harpVharp = &Kins__register_externalYbase_harpVharpMM0;
D ins__df_indirect_constant_refYbase_harpVharp = &Kins__df_indirect_constant_refYbase_harpVharpMM0;
D ins__df_constant_refYbase_harpVharp = &Kins__df_constant_refYbase_harpVharpMM0;
D ins__sf_indirect_constant_refYbase_harpVharp = &Kins__sf_indirect_constant_refYbase_harpVharpMM0;
D ins__sf_constant_refYbase_harpVharp = &Kins__sf_constant_refYbase_harpVharpMM0;
D ins__interactor_constant_refYbase_harpVharp = &Kins__interactor_constant_refYbase_harpVharpMM0;
D ins__indirect_constant_refYbase_harpVharp = &Kins__indirect_constant_refYbase_harpVharpMM0;
D ins__constant_refYbase_harpVharp = &Kins__constant_refYbase_harpVharpMM0;
D labelled_constant_incrementYbase_harpVharp = &Klabelled_constant_incrementYbase_harpVharp;

/* Objects */

_KLincremental_generic_functionGVKe Klabelled_constant_incrementYbase_harpVharp = {
  &KLincremental_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &K4,
  (D) 1,
  &K5,
  &K3,
  &RSINGULAR_Labsent_engine_nodeG,
  &Kbase_harp_moduleYdylan_userVharp,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 25
};

_KLsimple_methodGVKe Klabelled_constant_incrementYbase_harpVharpMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K4,
  &Klabelled_constant_incrementYbase_harpVharpMM0I
};

static _KLpairGVKd K3 = {
  &KLpairGVKdW /* wrapper */,
  &Klabelled_constant_incrementYbase_harpVharpMM0,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K4 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555461,
  &K6,
  &KDsignature_LintegerG_typesVKi
};

static _KLbyte_stringGVKd_27 K5 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 109,
  "labelled-constant-increment"
};

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

_KLkeyword_methodGVKe Kins__constant_refYbase_harpVharpMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_6,
  &K9,
  &key_mep_6,
  &Kins__constant_refYbase_harpVharpMM0I,
  &K10
};

static _KLkeyword_signatureAvaluesGVKi K9 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817609,
  &K17,
  &K18,
  &K19,
  &K20
};

static _KLsimple_object_vectorGVKd_6 K10 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 25,
  &KJoffset_,
  (D) 1,
  &KJmode_,
  &KJaddress_,
  &KJimportQ_,
  &KPfalseVKi
};

static _KLsymbolGVKd KJoffset_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K16
};

static _KLsymbolGVKd KJaddress_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K15
};

static _KLsymbolGVKd KJimportQ_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K14
};

static _KLbyte_stringGVKd_7 K14 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 29,
  "import?"
};

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

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

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

static _KLsimple_object_vectorGVKd_3 K18 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KJoffset_,
  &KJmode_,
  &KJimportQ_
};

static _KLsimple_object_vectorGVKd_3 K19 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLintegerGVKd,
  &KLsymbolGVKd,
  &KLbooleanGVKd
};

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

_KLkeyword_methodGVKe Kins__indirect_constant_refYbase_harpVharpMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K25,
  &key_mep_5,
  &Kins__indirect_constant_refYbase_harpVharpMM0I,
  &K26
};

static _KLsymbolGVKd KJindirect_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K24
};

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

static _KLkeyword_signatureAvaluesGVKi K25 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817609,
  &K17,
  &K27,
  &K28,
  &K20
};

static _KLsimple_object_vectorGVKd_4 K26 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 17,
  &KJoffset_,
  (D) 1,
  &KJimportQ_,
  &KPfalseVKi
};

static _KLsimple_object_vectorGVKd_2 K27 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KJoffset_,
  &KJimportQ_
};

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

_KLsimple_methodGVKe Kins__interactor_constant_refYbase_harpVharpMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K31,
  &Kins__interactor_constant_refYbase_harpVharpMM0I
};

static _KLsignatureAvaluesGVKi K31 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K17,
  &K20
};

_KLkeyword_methodGVKe Kins__sf_constant_refYbase_harpVharpMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_6,
  &K34,
  &key_mep_6,
  &Kins__sf_constant_refYbase_harpVharpMM0I,
  &K10
};

static _KLkeyword_signatureAvaluesGVKi K34 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817609,
  &K17,
  &K18,
  &K19,
  &K35
};

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

_KLkeyword_methodGVKe Kins__sf_indirect_constant_refYbase_harpVharpMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K38,
  &key_mep_5,
  &Kins__sf_indirect_constant_refYbase_harpVharpMM0I,
  &K26
};

static _KLkeyword_signatureAvaluesGVKi K38 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817609,
  &K17,
  &K27,
  &K28,
  &K39
};

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

_KLkeyword_methodGVKe Kins__df_constant_refYbase_harpVharpMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_6,
  &K42,
  &key_mep_6,
  &Kins__df_constant_refYbase_harpVharpMM0I,
  &K10
};

static _KLkeyword_signatureAvaluesGVKi K42 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817609,
  &K17,
  &K18,
  &K19,
  &K43
};

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

_KLkeyword_methodGVKe Kins__df_indirect_constant_refYbase_harpVharpMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K46,
  &key_mep_5,
  &Kins__df_indirect_constant_refYbase_harpVharpMM0I,
  &K26
};

static _KLkeyword_signatureAvaluesGVKi K46 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (D) 33817609,
  &K17,
  &K27,
  &K28,
  &K47
};

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

_KLsimple_methodGVKe Kins__register_externalYbase_harpVharpMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K50,
  &Kins__register_externalYbase_harpVharpMM0I
};

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

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

_KLsimple_methodGVKe Kins__reference_dataYbase_harpVharpMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K61,
  &Kins__reference_dataYbase_harpVharpMM0I
};

static _KLsymbolGVKd KJconst_offset_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K60
};

static _KLsymbolGVKd KJrefers_to_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K59
};

static _KLsymbolGVKd KJaddress_mode_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K58
};

static _KLbyte_stringGVKd_12 K58 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 49,
  "address-mode"
};

static _KLbyte_stringGVKd_9 K59 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 37,
  "refers-to"
};

static _KLbyte_stringGVKd_12 K60 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 49,
  "const-offset"
};

static _KLsignatureAvaluesGVKi K61 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555465,
  &K62,
  &K63
};

static _KLsimple_object_vectorGVKd_2 K62 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 9,
  &KLharp_back_endGYbase_harpVharp,
  &KLabstract_integerGVKe
};

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

_KLsimple_methodGVKe Kins__reference_sf_dataYbase_harpVharpMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K61,
  &Kins__reference_sf_dataYbase_harpVharpMM0I
};

_KLsimple_methodGVKe Kins__reference_df_dataYbase_harpVharpMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_3,
  &K69,
  &Kins__reference_df_dataYbase_harpVharpMM0I
};

static _KLsignatureAvaluesGVKi K69 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (D) 33555469,
  &K70,
  &K63
};

static _KLsimple_object_vectorGVKd_3 K70 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 13,
  &KLharp_back_endGYbase_harpVharp,
  &KLabstract_integerGVKe,
  &KLabstract_integerGVKe
};

/* Code */

D Klabelled_constant_incrementYbase_harpVharpMM0I (D backend_) {
  D T2_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:92
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:94
  T2_0 = (D) 17;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:92
  MV_SET_COUNT(1);
  return(T2_0);
}

D Kins__constant_refYbase_harpVharpMM0I (D backend_, D reference_, D Urest_, D offset_, D mode_, D importQ_) {
  D offsetF7;
  D modeF8;
  D importQF9;
  D T10_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:15
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:15
  primitive_type_check(offset_, &KLintegerGVKd);
  offsetF7 = offset_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:15
  primitive_type_check(mode_, &KLsymbolGVKd);
  modeF8 = mode_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:15
  primitive_type_check(importQ_, &KLbooleanGVKd);
  importQF9 = importQ_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:21
  T10_0 = KmakeVKdMharpM2I(&KLi_constant_referenceGYharp_constant_referencesVharp, &KPempty_vectorVKi, modeF8, importQF9, offsetF7, reference_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:15
  MV_SET_COUNT(1);
  return(T10_0);
}

D Kins__indirect_constant_refYbase_harpVharpMM0I (D backend_, D reference_, D Urest_, D offset_, D importQ_) {
  D offsetF6;
  D importQF7;
  D T8_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:26
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:26
  primitive_type_check(offset_, &KLintegerGVKd);
  offsetF6 = offset_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:26
  primitive_type_check(importQ_, &KLbooleanGVKd);
  importQF7 = importQ_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:31
  T8_0 = KmakeVKdMharpM2I(&KLi_constant_referenceGYharp_constant_referencesVharp, &KPempty_vectorVKi, IKJindirect_, importQF7, offsetF6, reference_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:26
  MV_SET_COUNT(1);
  return(T8_0);
}

D Kins__interactor_constant_refYbase_harpVharpMM0I (D backend_, D reference_) {
  D T3_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:36
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:39
  T3_0 = KmakeVKdMharpM1I(&KLinteractor_constant_referenceGYharp_constant_referencesVharp, &KPempty_vectorVKi, (D) 1, reference_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:36
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kins__sf_constant_refYbase_harpVharpMM0I (D backend_, D reference_, D Urest_, D offset_, D mode_, D importQ_) {
  D offsetF7;
  D modeF8;
  D importQF9;
  D T10_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:44
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:44
  primitive_type_check(offset_, &KLintegerGVKd);
  offsetF7 = offset_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:44
  primitive_type_check(mode_, &KLsymbolGVKd);
  modeF8 = mode_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:44
  primitive_type_check(importQ_, &KLbooleanGVKd);
  importQF9 = importQ_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:50
  T10_0 = KmakeVKdMharpM3I(&KLsf_constant_referenceGYharp_constant_referencesVharp, &KPempty_vectorVKi, modeF8, importQF9, offsetF7, reference_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:44
  MV_SET_COUNT(1);
  return(T10_0);
}

D Kins__sf_indirect_constant_refYbase_harpVharpMM0I (D backend_, D reference_, D Urest_, D offset_, D importQ_) {
  D offsetF6;
  D importQF7;
  D T8_0;
  D T9_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:55
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:55
  primitive_type_check(offset_, &KLintegerGVKd);
  offsetF6 = offset_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:55
  primitive_type_check(importQ_, &KLbooleanGVKd);
  importQF7 = importQ_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:60
  T9_0 = KmakeVKdMharpM3I(&KLsf_constant_referenceGYharp_constant_referencesVharp, &KPempty_vectorVKi, IKJindirect_, importQF7, offsetF6, reference_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:55
  T8_0 = T9_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T9_0);
    primitive_type_check(T8_0, &KLsf_indirect_constant_referenceGYharp_constant_referencesVharp);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:55
  MV_SET_COUNT(1);
  return(T8_0);
}

D Kins__df_constant_refYbase_harpVharpMM0I (D backend_, D reference_, D Urest_, D offset_, D mode_, D importQ_) {
  D offsetF7;
  D modeF8;
  D T9_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:66
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:66
  primitive_type_check(offset_, &KLintegerGVKd);
  offsetF7 = offset_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:66
  primitive_type_check(mode_, &KLsymbolGVKd);
  modeF8 = mode_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:66
  primitive_type_check(importQ_, &KLbooleanGVKd);
  importQ_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:72
  T9_0 = KmakeVKdMharpM4I(&KLdf_constant_referenceGYharp_constant_referencesVharp, &KPempty_vectorVKi, modeF8, &KPfalseVKi, offsetF7, reference_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:66
  MV_SET_COUNT(1);
  return(T9_0);
}

D Kins__df_indirect_constant_refYbase_harpVharpMM0I (D backend_, D reference_, D Urest_, D offset_, D importQ_) {
  D offsetF6;
  D importQF7;
  D T8_0;
  D T9_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:77
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:77
  primitive_type_check(offset_, &KLintegerGVKd);
  offsetF6 = offset_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:77
  primitive_type_check(importQ_, &KLbooleanGVKd);
  importQF7 = importQ_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:82
  T9_0 = KmakeVKdMharpM4I(&KLdf_constant_referenceGYharp_constant_referencesVharp, &KPempty_vectorVKi, IKJindirect_, importQF7, offsetF6, reference_);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:77
  T8_0 = T9_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T9_0);
    primitive_type_check(T8_0, &KLdf_indirect_constant_referenceGYharp_constant_referencesVharp);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:77
  MV_SET_COUNT(1);
  return(T8_0);
}

D Kins__register_externalYbase_harpVharpMM0I (D backend_, D reference_) {
  D T3;
  D T4;
  D T5;
  D T6;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:99
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:101
  T4 = SLOT_VALUE(backend_, 3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:102
  T5 = SLOT_VALUE_INITD(T4, 32);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:102
  T6 = Kadd_newXVKdMM3I(T5, reference_, &KPempty_vectorVKi, &KEEVKd);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:102
  SLOT_VALUE_SETTER(T6, T4, 32);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:102
  T3 = &KPfalseVKi;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:99
  MV_SET_COUNT(0);
  return(T3);
}

D Kins__reference_dataYbase_harpVharpMM0I (D backend_, D data_) {
  D T3_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:148
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:151
  T3_0 = Kadd_referenced_dataYbase_harpVharpMM0I(backend_, data_, &KLi_constant_referenceGYharp_constant_referencesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:148
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kadd_referenced_dataYbase_harpVharpMM0I (D backend_, D data_, D ref_class_) {
  D offset_;
  D T5_0;
  D T6_0;
  D T7;
  D T8;
  D T9;
  D T10;
  D T11;
  _KLsimple_object_vectorGVKd_6 T12 = {&KLsimple_object_vectorGVKdW, (D) 25};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:114
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:117
  T7 = SLOT_VALUE(backend_, 3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:118
  T8 = SLOT_VALUE_INITD(T7, 33);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:118
  T9 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:118
  SLOT_VALUE_SETTER(data_, T9, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:118
  SLOT_VALUE_SETTER(T8, T9, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:119
  T10 = KsizeVKdMM30I(T9);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:119
  CONGRUENT_CALL_PROLOG(&KTVKd, 2);
  offset_ = CONGRUENT_CALL2(T10, (D) -15);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:120
  SLOT_VALUE_SETTER(T9, T7, 33);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:123
  T11 = SLOT_VALUE_INITD(T7, 26);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:121
  T12.vector_element_[0] = IKJconst_offset_;
  T12.vector_element_[1] = offset_;
  T12.vector_element_[2] = IKJrefers_to_;
  T12.vector_element_[3] = T11;
  T12.vector_element_[4] = IKJaddress_mode_;
  T12.vector_element_[5] = IKJindirect_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:121
  CONGRUENT_CALL_PROLOG(&KmakeVKd, 2);
  T5_0 = CONGRUENT_CALL2(ref_class_, &T12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:114
  T6_0 = T5_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T5_0);
    primitive_type_check(T6_0, &KLindirect_constant_referenceGYharp_constant_referencesVharp);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:114
  MV_SET_COUNT(1);
  return(T6_0);
}

D Kins__reference_sf_dataYbase_harpVharpMM0I (D backend_, D data_) {
  D T3_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:155
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:158
  T3_0 = Kadd_referenced_dataYbase_harpVharpMM0I(backend_, data_, &KLsf_constant_referenceGYharp_constant_referencesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:155
  MV_SET_COUNT(1);
  return(T3_0);
}

D Kins__reference_df_dataYbase_harpVharpMM0I (D backend_, D low_, D high_) {
  D T4_0;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:162
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:165
  T4_0 = Kadd_referenced_double_dataYbase_harpVharpMM0I(backend_, low_, high_, &KLdf_constant_referenceGYharp_constant_referencesVharp);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:162
  MV_SET_COUNT(1);
  return(T4_0);
}

D Kadd_referenced_double_dataYbase_harpVharpMM0I (D backend_, D low_, D high_, D ref_class_) {
  D offset_;
  D T6_0;
  D T7_0;
  D T8;
  D T9;
  D T10;
  D T11;
  D T12;
  D T13;
  D T14;
  _KLsimple_object_vectorGVKd_6 T15 = {&KLsimple_object_vectorGVKdW, (D) 25};

  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:131
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:136
  T8 = SLOT_VALUE(backend_, 3);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:137
  T9 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:137
  SLOT_VALUE_SETTER(low_, T9, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:137
  SLOT_VALUE_SETTER(high_, T9, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:137
  T10 = SLOT_VALUE_INITD(T8, 33);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:137
  T11 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:137
  SLOT_VALUE_SETTER(T9, T11, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:137
  SLOT_VALUE_SETTER(T10, T11, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:138
  T12 = primitive_object_allocate_filled(3,&KLpairGVKdW,2,&KPunboundVKi,0,0,&KPunboundVKi);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:138
  SLOT_VALUE_SETTER(&KPfalseVKi, T12, 0);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:138
  SLOT_VALUE_SETTER(T11, T12, 1);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:139
  T13 = KsizeVKdMM30I(T12);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:139
  CONGRUENT_CALL_PROLOG(&KTVKd, 2);
  offset_ = CONGRUENT_CALL2(T13, (D) -15);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:140
  SLOT_VALUE_SETTER(T12, T8, 33);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:143
  T14 = SLOT_VALUE_INITD(T8, 26);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:141
  T15.vector_element_[0] = IKJconst_offset_;
  T15.vector_element_[1] = offset_;
  T15.vector_element_[2] = IKJrefers_to_;
  T15.vector_element_[3] = T14;
  T15.vector_element_[4] = IKJaddress_mode_;
  T15.vector_element_[5] = IKJindirect_;
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:141
  CONGRUENT_CALL_PROLOG(&KmakeVKd, 2);
  T6_0 = CONGRUENT_CALL2(ref_class_, &T15);
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:131
  T7_0 = T6_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T6_0);
    primitive_type_check(T7_0, &KLindirect_constant_referenceGYharp_constant_referencesVharp);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /Users/bruce/Development/dylan/opendylan/sources/harp/core-harp/constant-ref-support.dylan:131
  MV_SET_COUNT(1);
  return(T7_0);
}


/* SYSTEM INIT CODE */

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

    T0 = KPresolve_symbolVKiI(&KJoffset_);
    if (T0 != &KJoffset_) {
      primitive_repeated_slot_value_setter(T0, &K27, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K26, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K18, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K10, 1, 0);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJaddress_);
    if (T0 != &KJaddress_) {
      primitive_repeated_slot_value_setter(T0, &K10, 1, 3);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJimportQ_);
    if (T0 != &KJimportQ_) {
      primitive_repeated_slot_value_setter(T0, &K27, 1, 1);
      primitive_repeated_slot_value_setter(T0, &K26, 1, 2);
      primitive_repeated_slot_value_setter(T0, &K18, 1, 2);
      primitive_repeated_slot_value_setter(T0, &K10, 1, 4);
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJindirect_);
    if (T0 != &KJindirect_) {
      IKJindirect_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJconst_offset_);
    if (T0 != &KJconst_offset_) {
      IKJconst_offset_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJrefers_to_);
    if (T0 != &KJrefers_to_) {
      IKJrefers_to_ = T0;
    }
  }
  {
    D T0;

    T0 = KPresolve_symbolVKiI(&KJaddress_mode_);
    if (T0 != &KJaddress_mode_) {
      IKJaddress_mode_ = T0;
    }
  }
  return;
}

/* USER INIT CODE */

void _Init_harp__X_constant_ref_support_for_user () {
  return;
}


/* eof */
