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

#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(17);
define__KLsimple_object_vectorGVKd(12);
define__KLsimple_object_vectorGVKd(0);

typedef struct {
  D wrapper;
  D library_major_version_;
  D library_minor_version_;
  D library_build_count_;
  D used_library_;
  D used_library_binding_;
} _KLused_libraryGVKe;

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

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    D wrapper; \
    D size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(5);
define__KLbyte_stringGVKd(8);

typedef struct {
  D wrapper;
  D reg_frame_;
  D reg_stack_;
  D reg_caller_stack_;
  D reg_environment_;
  D reg_function_;
  D reg_mlist_;
  D reg_result_;
  D reg_result_out_;
  D reg_float_result_;
  D reg_arg_count_;
  D reg_mv_count_;
  D reg_arg0_;
  D reg_arg1_;
  D reg_arg2_;
  D reg_arg3_;
  D reg_arg4_;
  D reg_arg5_;
  D reg_arg6_;
  D reg_arg7_;
  D reg_float_arg0_;
  D reg_float_arg1_;
  D reg_float_arg2_;
  D reg_float_arg3_;
  D reg_float_arg4_;
  D reg_float_arg5_;
  D reg_float_arg6_;
  D reg_float_arg7_;
  D reg_machine_arguments_;
  D reg_c_machine_arguments_;
  D reg_float_machine_arguments_;
  D reg_c_float_machine_arguments_;
  D reg_arg_masks_;
  D reg_arg_masks_out_;
  D reg_c_arg_masks_;
  D reg_c_arg_masks_out_;
  D reg_link_;
  D reg_tmp1_;
  D reg_tmp2_;
  D reg_tmp3_;
  D reg_tmp4_;
  D reg_tmp5_;
  D reg_ftmp1_;
  D reg_ftmp2_;
  D reg_c_result_;
  D reg_c_result2_;
  D reg_c_float_result_;
  D reg_c_stack_;
  D reg_c_frame_;
  D real_register_vector_;
  D preserved_register_vector_;
  D c_preserved_register_vector_;
  D savable_registers_;
  D arguments_passed_in_registers_;
  D c_arguments_passed_in_registers_;
  D float_arguments_passed_in_registers_;
  D c_float_arguments_passed_in_registers_;
  D all_allocatable_;
  D not_preserved_;
  D c_not_preserved_;
} _KLpentium_register_modelGVharp_x86;

typedef struct {
  D wrapper;
  D real_register_mask_;
  D real_register_number_;
  D real_register_pname_;
  D real_register_preserved_mask_;
  D real_register_c_preserved_mask_;
} _KLpentium_registerGVharp_x86;

typedef struct {
  D wrapper;
  D real_register_mask_;
  D real_register_number_;
  D real_register_pname_;
  D real_register_preserved_mask_;
  D real_register_c_preserved_mask_;
} _KLpentium_integer_registerGVharp_x86;

typedef struct {
  D wrapper;
  D real_register_mask_;
  D real_register_number_;
  D real_register_pname_;
  D real_register_preserved_mask_;
  D real_register_c_preserved_mask_;
} _KLpentium_float_registerGVharp_x86;

typedef struct {
  D wrapper;
  D real_register_mask_;
  D real_register_number_;
  D real_register_pname_;
  D real_register_preserved_mask_;
  D real_register_c_preserved_mask_;
} _KLpentium_segment_registerGVharp_x86;

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

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

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

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

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

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

typedef struct {
  D wrapper;
  D harp_move_;
  D harp_add_;
  D harp_sub_;
  D harp_beq_;
  D harp_bge_;
  D harp_bgt_;
  D harp_ble_;
  D harp_blt_;
  D harp_bne_;
  D harp_bra_;
  D harp_rem_;
  D harp_load_stack_arg_n_;
  D harp_scl_;
  D harp_strong_scl_;
  D harp_allocate_local_area_;
  D harp_allocate_raw_area_;
  D harp_preserve_registers_entry_;
  D harp_preserve_registers_exit_;
  D harp_st_;
  D harp_sth_;
  D harp_stb_;
  D harp_fill_words_;
  D harp_copy_words_up_;
  D harp_copy_words_down_;
  D harp_fill_words_w_;
  D harp_copy_words_down_w_;
  D harp_copy_words_up_w_;
  D harp_copy_bytes_down_;
  D harp_copy_bytes_up_;
  D harp_fill_bytes_;
  D harp_push_;
  D harp_set_teb_;
  D harp_set_seh_;
  D harp_get_teb_;
  D harp_get_seh_;
  D harp_force_u_;
  D harp_force_d_;
  D harp_taddv_;
  D harp_addv_;
  D harp_divv_;
  D harp_mulv_;
  D harp_subv_;
  D harp_tsubv_;
  D harp_conditional_move_;
  D harp_not_;
  D harp_ld_teb_;
  D harp_ld_teb_address_;
  D harp_st_teb_;
  D harp_add_into_stack_pointer_;
  D harp_store_stack_arg_n_;
  D harp_and_;
  D harp_asl_;
  D harp_asr_;
  D harp_divs_;
  D harp_divu_;
  D harp_eor_;
  D harp_ld_;
  D harp_ldh_;
  D harp_ldh_signed_;
  D harp_ldb_;
  D harp_ldb_signed_;
  D harp_lsr_;
  D harp_muls_;
  D harp_and_not_;
  D harp_mulu_;
  D harp_or_;
  D harp_mods_;
  D harp_modu_;
  D harp_set_bit_;
  D harp_unset_bit_;
  D harp_pop_;
  D harp_bmvunset_;
  D harp_bmvset_;
  D harp_control_flow_link_;
  D harp_bhi_;
  D harp_bhs_;
  D harp_blo_;
  D harp_bls_;
  D harp_band_;
  D harp_bnand_;
  D harp_dynamic_bit_;
  D harp_dynamic_nbit_;
  D harp_beq_byte_;
  D harp_bne_byte_;
  D harp_bge_byte_;
  D harp_bgt_byte_;
  D harp_ble_byte_;
  D harp_blt_byte_;
  D harp_bit_;
  D harp_nbit_;
  D harp_bne_mem_;
  D harp_beq_mem_;
  D harp_bne_words_;
  D harp_bne_bytes_;
  D harp_ldbits_;
  D harp_extract_bits_;
  D harp_set_bits_;
  D harp_stbits_;
  D harp_t_pop_;
  D harp_t_push_;
  D harp_remove_optionals_;
  D harp_rts_and_drop_;
  D harp_adjust_stack_;
  D harp_load_count_adjusting_stack_;
  D harp_rts_;
  D harp_end_cleanup_;
  D harp_pea_;
  D harp_lea_;
  D harp_load_nlx_address_;
  D harp_call_;
  D harp_call_alien_;
  D harp_call_indirect_;
  D harp_jmp_;
  D harp_jmp_alien_;
  D harp_jmp_indirect_;
  D harp_load_stack_arg_half_signed_;
  D harp_load_stack_arg_half_unsigned_;
  D harp_load_stack_arg_byte_signed_;
  D harp_load_stack_arg_byte_unsigned_;
  D harp_load_address_of_stack_arg_n_;
  D harp_load_address_of_stack_arg_;
  D harp_load_frame_offset_;
  D harp_store_frame_offset_;
  D harp_pop_mem_;
  D harp_push_mem_;
  D harp_and2_mem_;
  D harp_or2_mem_;
  D harp_add2_mem_;
  D harp_sub2_mem_;
  D harp_add2_mem_locked_;
  D harp_sub2_mem_locked_;
  D harp_eor2_mem_;
  D harp_xadd_mem_locked_;
  D harp_move_return_address_;
  D harp_ror_;
  D harp_rol_;
  D harp_add_trap_;
  D harp_sub_trap_;
  D harp_muls_trap_;
  D harp_asl_trap_;
  D harp_addc_;
  D harp_subc_;
  D harp_addcx_;
  D harp_subcx_;
  D harp_mulx_;
  D harp_mulux_;
  D harp_divx_;
  D harp_divux_;
  D harp_aslx_;
  D harp_lslx_;
  D harp_truncatex_;
  D harp_mulxv_;
  D harp_aslxv_;
  D harp_divxx_;
  D harp_divuxx_;
  D harp_lslxx_;
  D harp_lsrxx_;
  D harp_truncatexx_;
  D harp_reset_values_;
  D harp_set_values_;
  D harp_halt_;
  D harp_f10tox_;
  D harp_f2tox_;
  D harp_fabs_;
  D harp_facos_;
  D harp_fasin_;
  D harp_fatan_;
  D harp_fatanh_;
  D harp_fcos_;
  D harp_fcosh_;
  D harp_fetox_;
  D harp_fetoxm1_;
  D harp_fgetexp_;
  D harp_fgetman_;
  D harp_fint_;
  D harp_flog10_;
  D harp_flog2_;
  D harp_floge_;
  D harp_flogep1_;
  D harp_fmove_;
  D harp_fneg_;
  D harp_fsin_;
  D harp_fsinh_;
  D harp_fsqrt_;
  D harp_ftan_;
  D harp_ftanh_;
  D harp_d10tox_;
  D harp_d2tox_;
  D harp_dabs_;
  D harp_dacos_;
  D harp_dasin_;
  D harp_datan_;
  D harp_datanh_;
  D harp_dcos_;
  D harp_dcosh_;
  D harp_detox_;
  D harp_detoxm1_;
  D harp_dgetexp_;
  D harp_dgetman_;
  D harp_dint_;
  D harp_dlog10_;
  D harp_dlog2_;
  D harp_dloge_;
  D harp_dlogep1_;
  D harp_dmove_;
  D harp_dneg_;
  D harp_dsin_;
  D harp_dsinh_;
  D harp_dsqrt_;
  D harp_dtan_;
  D harp_dtanh_;
  D harp_fadd_;
  D harp_fdiv_;
  D harp_fld_;
  D harp_fmul_;
  D harp_fsub_;
  D harp_ld_double_;
  D harp_dmul_;
  D harp_ddiv_;
  D harp_dadd_;
  D harp_dsub_;
  D harp_dld_;
  D harp_fbeq_;
  D harp_fbge_;
  D harp_fbgt_;
  D harp_fble_;
  D harp_fblt_;
  D harp_fbne_;
  D harp_fbnge_;
  D harp_dble_;
  D harp_dbge_;
  D harp_dbne_;
  D harp_dblt_;
  D harp_dbeq_;
  D harp_fbngt_;
  D harp_fbnle_;
  D harp_fbnlt_;
  D harp_fst_;
  D harp_dst_;
  D harp_st_double_;
  D harp_move_to_sfreg_;
  D harp_move_from_sfreg_;
  D harp_convert_to_single_float_;
  D harp_convert_to_double_float_;
  D harp_double_to_single_float_;
  D harp_single_to_double_float_;
  D harp_convert_from_single_float_;
  D harp_convert_from_double_float_;
  D harp_convert_from_single_float_x_;
  D harp_convert_from_double_float_x_;
  D harp_move_from_dfreg_;
  D harp_convert_to_single_float_x_;
  D harp_convert_to_double_float_x_;
  D harp_move_to_dfreg_;
  D harp_set_rounding_mode_;
  D harp_restore_frame_;
  D harp_init_fpu_;
  D harp_init_control_word_;
  D harp_clear_float_exceptions_;
  D harp_classify_float_;
  D harp_st_index_;
  D harp_fst_index_;
  D harp_dst_index_;
  D harp_stb_index_;
  D harp_sth_index_;
  D harp_bits_mem_;
  D harp_bitc_mem_;
  D harp_and2_byte_mem_;
  D harp_or2_byte_mem_;
  D harp_st_index_scaled_;
  D harp_sth_index_scaled_;
  D harp_fst_index_scaled_;
  D harp_dst_index_scaled_;
  D harp_dst_index_scale_2_;
  D harp_bne_byte_mem_;
  D harp_beq_byte_mem_;
  D harp_bz_bytes_;
  D harp_bnz_bytes_;
  D harp_ld_index_;
  D harp_fld_index_;
  D harp_dld_index_;
  D harp_ldb_index_;
  D harp_ldh_index_;
  D harp_ldb_index_signed_;
  D harp_ldh_index_signed_;
  D harp_ld_index_scaled_;
  D harp_ldh_index_scaled_;
  D harp_ldh_index_scaled_signed_;
  D harp_fld_index_scaled_;
  D harp_dld_index_scaled_;
  D harp_dld_index_scale_2_;
  D harp_move_lower_byte_;
  D harp_asr_unsafe_;
  D harp_move_arg_count_byte_;
  D harp_load_stack_index_;
  D harp_get_stack_bottom_;
  D harp_offset_to_tag_;
  D harp_clear_direction_flag_;
  D harp_push_last_arg_;
} _KLpentium_instruction_setGVharp_x86;

typedef struct {
  D wrapper;
  D test_function_;
  D test_start_line_;
  D test_end_line_;
  D test_invoker_args_;
} _KLcomplex_testGYharp_x86_testVharp_x86;

typedef struct {
  D wrapper;
  D source_record_name_;
} _KLdummy_source_recordGYharp_x86_testVharp_x86;

typedef struct {
  D wrapper;
  D locator_start_line_;
} _KLdummy_source_locatorGYharp_x86_testVharp_x86;

typedef struct {
  D wrapper;
  D locator_start_line_;
  D locator_source_record_;
  D locator_end_line_;
} _KLdummy_absolute_source_locatorGYharp_x86_testVharp_x86;

typedef struct {
  D wrapper;
  D locator_start_line_;
} _KLdummy_relative_source_locatorGYharp_x86_testVharp_x86;


/* Typedefs for defined classes */


/* Referenced object declarations */

D Kinitialize_class_dispatch_keys_vectoredVKgI (D);
D KPlibrary_version_checkVKeI (D, D);
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 _KLclassGVKd KLlibraryGVKe;
extern _KLmm_wrapperGVKi_0 KLlibraryGVKeW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLclassGVKd KLused_libraryGVKe;
extern _KLmm_wrapperGVKi_0 KLused_libraryGVKeW;
extern _KLlibraryGVKe Kdylan_libraryYdylan_userVdylan;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLlibraryGVKe Kcommon_dylan_libraryYdylan_userVcommon_dylan;
extern _KLlibraryGVKe Kgeneric_arithmetic_libraryYdylan_userVgeneric_arithmetic;
extern _KLlibraryGVKe Kbig_integers_libraryYdylan_userVbig_integers;
extern _KLlibraryGVKe Kio_libraryYdylan_userVio;
extern _KLlibraryGVKe Ksystem_libraryYdylan_userVsystem;
extern _KLlibraryGVKe Kharp_libraryYdylan_userVharp;
extern _KLlibraryGVKe Kdfmc_back_end_protocol_libraryYdylan_userVdfmc_back_end_protocol;
extern _KLlibraryGVKe Kharp_native_libraryYdylan_userVharp_native;
extern _KLlibraryGVKe Kharp_coff_libraryYdylan_userVharp_coff;
extern _KLlibraryGVKe Kgnu_as_outputter_libraryYdylan_userVgnu_as_outputter;
extern _KLlibraryGVKe Ksource_records_libraryYdylan_userVsource_records;
extern _KLclassGVKd KLpentium_register_modelGVharp_x86;
extern _KLclassGVKd KLpentium_registerGVharp_x86;
extern _KLclassGVKd KLpentium_integer_registerGVharp_x86;
extern _KLclassGVKd KLpentium_float_registerGVharp_x86;
extern _KLclassGVKd KLpentium_segment_registerGVharp_x86;
extern _KLclassGVKd KLharp_x86_back_endGVharp_x86;
extern _KLclassGVKd KLharp_x86_windows_back_endGVharp_x86;
extern _KLclassGVKd KLharp_x86_unix_back_endGVharp_x86;
extern _KLclassGVKd KLharp_x86_linux_back_endGVharp_x86;
extern _KLclassGVKd KLharp_x86_freebsd_back_endGVharp_x86;
extern _KLclassGVKd KLharp_x86_darwin_back_endGVharp_x86;
extern _KLclassGVKd KLpentium_instruction_setGVharp_x86;
extern _KLclassGVKd KLcomplex_testGYharp_x86_testVharp_x86;
extern _KLclassGVKd KLdummy_source_recordGYharp_x86_testVharp_x86;
extern _KLclassGVKd KLdummy_source_locatorGYharp_x86_testVharp_x86;
extern _KLclassGVKd KLdummy_absolute_source_locatorGYharp_x86_testVharp_x86;
extern _KLclassGVKd KLdummy_relative_source_locatorGYharp_x86_testVharp_x86;

/* Defined object declarations */

extern _KLlibraryGVKe Kharp_x86_libraryYdylan_userVharp_x86;
static _KLbyte_stringGVKd_8 K4;
static _KLsimple_object_vectorGVKd_12 K5;
static _KLused_libraryGVKe K6;
static _KLused_libraryGVKe K7;
static _KLused_libraryGVKe K8;
static _KLused_libraryGVKe K9;
static _KLused_libraryGVKe K10;
static _KLused_libraryGVKe K11;
static _KLused_libraryGVKe K12;
static _KLused_libraryGVKe K13;
static _KLused_libraryGVKe K14;
static _KLused_libraryGVKe K15;
static _KLused_libraryGVKe K16;
static _KLused_libraryGVKe K17;
static _KLsymbolGVKd KJtight_;
static _KLbyte_stringGVKd_5 K19;
static _KLsimple_object_vectorGVKd_17 K20;

/* Indirection variables */

static D IKJtight_ = &KJtight_;

/* Variables */

D harp_x86_libraryYdylan_userVharp_x86 = &Kharp_x86_libraryYdylan_userVharp_x86;

/* Objects */

_KLlibraryGVKe Kharp_x86_libraryYdylan_userVharp_x86 = {
  &KLlibraryGVKeW /* wrapper */,
  &K4,
  (D) 1,
  (D) 1,
  (D) 129608245,
  &K5,
  &KPempty_vectorVKi,
  &KPfalseVKi,
  &KPempty_vectorVKi,
  (D) 16817,
  (D) 3977
};

static _KLbyte_stringGVKd_8 K4 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (D) 33,
  "harp-x86"
};

static _KLsimple_object_vectorGVKd_12 K5 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 49,
  &K6,
  &K7,
  &K8,
  &K9,
  &K10,
  &K11,
  &K12,
  &K13,
  &K14,
  &K15,
  &K16,
  &K17
};

static _KLused_libraryGVKe K6 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 1,
  (D) 1,
  (D) 128240373,
  &Ksource_records_libraryYdylan_userVsource_records,
  &KJtight_
};

static _KLused_libraryGVKe K7 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 1,
  (D) 1,
  (D) 129526709,
  &Kgnu_as_outputter_libraryYdylan_userVgnu_as_outputter,
  &KJtight_
};

static _KLused_libraryGVKe K8 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 1,
  (D) 1,
  (D) 129513621,
  &Kharp_coff_libraryYdylan_userVharp_coff,
  &KJtight_
};

static _KLused_libraryGVKe K9 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 1,
  (D) 1,
  (D) 129700821,
  &Kharp_native_libraryYdylan_userVharp_native,
  &KJtight_
};

static _KLused_libraryGVKe K10 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 1,
  (D) 1,
  (D) 128990837,
  &Kdfmc_back_end_protocol_libraryYdylan_userVdfmc_back_end_protocol,
  &KJtight_
};

static _KLused_libraryGVKe K11 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 1,
  (D) 1,
  (D) 129635797,
  &Kharp_libraryYdylan_userVharp,
  &KJtight_
};

static _KLused_libraryGVKe K12 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 9,
  (D) 5,
  (D) 128323797,
  &Ksystem_libraryYdylan_userVsystem,
  &KJtight_
};

static _KLused_libraryGVKe K13 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 9,
  (D) 5,
  (D) 128021525,
  &Kio_libraryYdylan_userVio,
  &KJtight_
};

static _KLused_libraryGVKe K14 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 9,
  (D) 5,
  (D) 128648757,
  &Kbig_integers_libraryYdylan_userVbig_integers,
  &KJtight_
};

static _KLused_libraryGVKe K15 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 9,
  (D) 5,
  (D) 128706421,
  &Kgeneric_arithmetic_libraryYdylan_userVgeneric_arithmetic,
  &KJtight_
};

static _KLused_libraryGVKe K16 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 1,
  (D) 1,
  (D) 128002773,
  &Kcommon_dylan_libraryYdylan_userVcommon_dylan,
  &KJtight_
};

static _KLused_libraryGVKe K17 = {
  &KLused_libraryGVKeW /* wrapper */,
  (D) 9,
  (D) 5,
  (D) 128132821,
  &Kdylan_libraryYdylan_userVdylan,
  &KJtight_
};

static _KLsymbolGVKd KJtight_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K19
};

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

static _KLsimple_object_vectorGVKd_17 K20 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (D) 69,
  &KLpentium_register_modelGVharp_x86,
  &KLpentium_registerGVharp_x86,
  &KLpentium_integer_registerGVharp_x86,
  &KLpentium_float_registerGVharp_x86,
  &KLpentium_segment_registerGVharp_x86,
  &KLharp_x86_back_endGVharp_x86,
  &KLharp_x86_windows_back_endGVharp_x86,
  &KLharp_x86_unix_back_endGVharp_x86,
  &KLharp_x86_linux_back_endGVharp_x86,
  &KLharp_x86_freebsd_back_endGVharp_x86,
  &KLharp_x86_darwin_back_endGVharp_x86,
  &KLpentium_instruction_setGVharp_x86,
  &KLcomplex_testGYharp_x86_testVharp_x86,
  &KLdummy_source_recordGYharp_x86_testVharp_x86,
  &KLdummy_source_locatorGYharp_x86_testVharp_x86,
  &KLdummy_absolute_source_locatorGYharp_x86_testVharp_x86,
  &KLdummy_relative_source_locatorGYharp_x86_testVharp_x86
};

/* Code */


/* SYSTEM INIT CODE */

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

    T0 = KPresolve_symbolVKiI(&KJtight_);
    if (T0 != &KJtight_) {
      primitive_slot_value_setter(T0, &K6, 4);
      primitive_slot_value_setter(T0, &K7, 4);
      primitive_slot_value_setter(T0, &K8, 4);
      primitive_slot_value_setter(T0, &K9, 4);
      primitive_slot_value_setter(T0, &K10, 4);
      primitive_slot_value_setter(T0, &K11, 4);
      primitive_slot_value_setter(T0, &K12, 4);
      primitive_slot_value_setter(T0, &K13, 4);
      primitive_slot_value_setter(T0, &K14, 4);
      primitive_slot_value_setter(T0, &K15, 4);
      primitive_slot_value_setter(T0, &K16, 4);
      primitive_slot_value_setter(T0, &K17, 4);
    }
  }
  return;
}

/* USER INIT CODE */

void _Init_harp_x86__X_library_for_user () {
{
  D T0;

  T0 = Kinitialize_class_dispatch_keys_vectoredVKgI(&K20);
  goto I0;
}
I0:

{
  D T0;

  T0 = &KPfalseVKi;
  goto I1;
}
I1:

{
  D T0;
  D T1;

  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/library.dylan:10
  T0 = primitive_runtime_module_handle();
  // /Users/bruce/Development/dylan/opendylan/sources/harp/x86/library.dylan:10
  T1 = KPlibrary_version_checkVKeI(&Kharp_x86_libraryYdylan_userVharp_x86, T0);
  goto I2;
}
I2:

  return;
}


/* eof */
