#include "opendylan/run-time.h"

/* Generated by Open Dylan 2014.1 for x86_64-linux */

/* Typedefs for referenced classes */

#define  define__KLsimple_object_vectorGVKd(nrepeated) \
  typedef struct { \
    dylan_value wrapper; \
    dylan_value size_; \
    dylan_value vector_element_[nrepeated+1]; \
  } _KLsimple_object_vectorGVKd_##nrepeated;
define__KLsimple_object_vectorGVKd(2);
define__KLsimple_object_vectorGVKd(0);

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

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

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

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

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

typedef struct {
  dylan_value wrapper;
} _KLobjectGVKd;

typedef struct {
  dylan_value wrapper;
} _KLunboundGVKe;

typedef struct {
  dylan_value wrapper;
} _KLbooleanGVKd;

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

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

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


/* Typedefs for defined classes */


/* Referenced object declarations */

extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
dylan_value Kconcatenate_asVKdMM3I (dylan_value, dylan_value, dylan_value);
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
dylan_value KmakeVKdMM56I (dylan_value, dylan_value, dylan_value);
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
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 KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLsimple_methodGVKe Kconcatenate_asVKdMM0;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLsimple_methodGVKe Kconcatenate_asVKdMM1;

/* Defined object declarations */

static _KLbyte_stringGVKd_1 K1;
static _KLbyte_stringGVKd_5 K2;
static _KLbyte_stringGVKd_6 K3;
static _KLpairGVKd K4;
static _KLpairGVKd K5;

/* Indirection variables */


/* Variables */

dylan_value Dplatform_nameYoperating_systemVsystem = &KPunboundVKi;

/* Objects */

static _KLbyte_stringGVKd_1 K1 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 5,
  "-"
};

static _KLbyte_stringGVKd_5 K2 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 21,
  "linux"
};

static _KLbyte_stringGVKd_6 K3 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 25,
  "x86_64"
};

static _KLpairGVKd K4 = {
  &KLpairGVKdW /* wrapper */,
  &Kconcatenate_asVKdMM1,
  &K5
};

static _KLpairGVKd K5 = {
  &KLpairGVKdW /* wrapper */,
  &Kconcatenate_asVKdMM0,
  &KPempty_listVKi
};

/* Code */


/* SYSTEM INIT CODE */

void _Init_system__X_operating_system_for_system () {
  extern dylan_value KPresolve_symbolVKiI(dylan_value);
  return;
}

/* USER INIT CODE */

void _Init_system__X_operating_system_for_user () {
{
  dylan_value T0;
  dylan_value T1;
  _KLsimple_object_vectorGVKd_2 T2 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  dylan_value T3_0;
  dylan_value T4_0;
  dylan_value T5;

  // /home/bruce/Development/dylan/opendylan/sources/system/operating-system.dylan:11
  T2.vector_element_[0] = &K1;
  T2.vector_element_[1] = &K2;
  // /home/bruce/Development/dylan/opendylan/sources/system/operating-system.dylan:11
  MIEP_CALL_PROLOG(&K4);
  T3_0 = Kconcatenate_asVKdMM3I(&KLbyte_stringGVKd, &K3, &T2);
  // /home/bruce/Development/dylan/opendylan/sources/system/operating-system.dylan:11
  T1 = T3_0;
  // /home/bruce/Development/dylan/opendylan/sources/system/operating-system.dylan:10
  T4_0 = KmakeVKdMM56I(&KLsymbolGVKd, &KPempty_vectorVKi, T1);
  // /home/bruce/Development/dylan/opendylan/sources/system/operating-system.dylan:10
  T5 = T4_0;
  // /home/bruce/Development/dylan/opendylan/sources/system/operating-system.dylan:9
  Dplatform_nameYoperating_systemVsystem = T5;
  // /home/bruce/Development/dylan/opendylan/sources/system/operating-system.dylan:9
  T0 = &KPfalseVKi;
  goto I0;
}
I0:

  return;
}


/* eof */
