#include "opendylan/run-time.h"

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

/* Typedefs for referenced classes */

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

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 xep_;
  dylan_value function_signature_;
  dylan_value Pgf_cache_;
  dylan_value debug_name_;
  dylan_value generic_function_methods_;
  dylan_value discriminator_;
} _KLsealed_generic_functionGVKe;

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

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

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

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

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

typedef struct {
  dylan_value wrapper;
} _KLintegerGVKd;

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;

typedef struct {
  dylan_value wrapper;
} _KLabstract_integerGVKe;

typedef struct {
  dylan_value wrapper;
  DWORD Pmachine_word_data_;
} _KLmachine_wordGVKe;

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_;
} _KLvalue_classGVKi;


/* 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 _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_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 _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_16 KDsignature_Lmachine_wordG_typesVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLclassGVKd KLintegerGVKd;
extern _KLmm_wrapperGVKi_0 KLintegerGVKdW;
extern _KLclassGVKd KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
dylan_value Kinvalid_shift_quantityYcommon_dylan_internalsVcommon_dylanI (dylan_value);
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLclassGVKd KLabstract_integerGVKe;
extern _KLmm_wrapperGVKi_0 KLabstract_integerGVKeW;
extern _KLvalue_classGVKi KLmachine_wordGVKe;
extern _KLclassGVKd KLvalue_classGVKi;
extern _KLmm_wrapperGVKi_0 KLvalue_classGVKiW;
extern _KLmm_wrapperGVKi_1 KLmachine_wordGVKeW;

/* Defined object declarations */

extern _KLsealed_generic_functionGVKe KPshift_rightYmachine_wordsVcommon_dylan;
extern _KLsimple_methodGVKe KPshift_rightYmachine_wordsVcommon_dylanMM0;
dylan_value KPshift_rightYmachine_wordsVcommon_dylanMM0I (dylan_value x_, dylan_value count_);
extern _KLsimple_methodGVKe KPshift_rightYmachine_wordsVcommon_dylanMM1;
dylan_value KPshift_rightYmachine_wordsVcommon_dylanMM1I (dylan_value x_, dylan_value count_);
static _KLpairGVKd K5;
static _KLpairGVKd K6;
static _KLsignatureAvaluesGVKi K7;
static _KLbyte_stringGVKd_12 K8;
static _KLsimple_object_vectorGVKd_2 K9;
static _KLsignatureAvaluesGVKi K10;
static _KLsimple_object_vectorGVKd_2 K11;
static _KLsignatureAvaluesGVKi K12;
static _KLsimple_object_vectorGVKd_2 K13;
extern _KLsealed_generic_functionGVKe KPshift_leftYmachine_wordsVcommon_dylan;
extern _KLsimple_methodGVKe KPshift_leftYmachine_wordsVcommon_dylanMM0;
dylan_value KPshift_leftYmachine_wordsVcommon_dylanMM0I (dylan_value x_, dylan_value count_);
extern _KLsimple_methodGVKe KPshift_leftYmachine_wordsVcommon_dylanMM1;
dylan_value KPshift_leftYmachine_wordsVcommon_dylanMM1I (dylan_value x_, dylan_value count_);
static _KLpairGVKd K19;
static _KLpairGVKd K20;
static _KLsignatureAvaluesGVKi K21;
static _KLbyte_stringGVKd_11 K22;
static _KLsimple_object_vectorGVKd_3 K23;
static _KLsignatureAvaluesGVKi K24;
static _KLsignatureAvaluesGVKi K25;

/* Indirection variables */


/* Variables */

dylan_value Pshift_leftYmachine_wordsVcommon_dylan = &KPshift_leftYmachine_wordsVcommon_dylan;
dylan_value Pshift_rightYmachine_wordsVcommon_dylan = &KPshift_rightYmachine_wordsVcommon_dylan;

/* Objects */

_KLsealed_generic_functionGVKe KPshift_rightYmachine_wordsVcommon_dylan = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K7,
  &KPfalseVKi,
  &K8,
  &K5,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsimple_methodGVKe KPshift_rightYmachine_wordsVcommon_dylanMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K12,
  &KPshift_rightYmachine_wordsVcommon_dylanMM0I
};

_KLsimple_methodGVKe KPshift_rightYmachine_wordsVcommon_dylanMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K10,
  &KPshift_rightYmachine_wordsVcommon_dylanMM1I
};

static _KLpairGVKd K5 = {
  &KLpairGVKdW /* wrapper */,
  &KPshift_rightYmachine_wordsVcommon_dylanMM0,
  &K6
};

static _KLpairGVKd K6 = {
  &KLpairGVKdW /* wrapper */,
  &KPshift_rightYmachine_wordsVcommon_dylanMM1,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K7 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555465,
  &K9,
  &KDsignature_Lmachine_wordG_typesVKi
};

static _KLbyte_stringGVKd_12 K8 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 49,
  "%shift-right"
};

static _KLsimple_object_vectorGVKd_2 K9 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLobjectGVKd,
  &KLintegerGVKd
};

static _KLsignatureAvaluesGVKi K10 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555465,
  &K11,
  &KDsignature_Lmachine_wordG_typesVKi
};

static _KLsimple_object_vectorGVKd_2 K11 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLabstract_integerGVKe,
  &KLintegerGVKd
};

static _KLsignatureAvaluesGVKi K12 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555465,
  &K13,
  &KDsignature_Lmachine_wordG_typesVKi
};

static _KLsimple_object_vectorGVKd_2 K13 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLmachine_wordGVKe,
  &KLintegerGVKd
};

_KLsealed_generic_functionGVKe KPshift_leftYmachine_wordsVcommon_dylan = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_2,
  &K21,
  &KPfalseVKi,
  &K22,
  &K19,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLsimple_methodGVKe KPshift_leftYmachine_wordsVcommon_dylanMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K25,
  &KPshift_leftYmachine_wordsVcommon_dylanMM0I
};

_KLsimple_methodGVKe KPshift_leftYmachine_wordsVcommon_dylanMM1 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K24,
  &KPshift_leftYmachine_wordsVcommon_dylanMM1I
};

static _KLpairGVKd K19 = {
  &KLpairGVKdW /* wrapper */,
  &KPshift_leftYmachine_wordsVcommon_dylanMM0,
  &K20
};

static _KLpairGVKd K20 = {
  &KLpairGVKdW /* wrapper */,
  &KPshift_leftYmachine_wordsVcommon_dylanMM1,
  &KPempty_listVKi
};

static _KLsignatureAvaluesGVKi K21 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33557513,
  &K9,
  &K23
};

static _KLbyte_stringGVKd_11 K22 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 45,
  "%shift-left"
};

static _KLsimple_object_vectorGVKd_3 K23 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 13,
  &KLmachine_wordGVKe,
  &KLmachine_wordGVKe,
  &KLbooleanGVKd
};

static _KLsignatureAvaluesGVKi K24 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33557513,
  &K11,
  &K23
};

static _KLsignatureAvaluesGVKi K25 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33557513,
  &K13,
  &K23
};

/* Code */

dylan_value KPshift_rightYmachine_wordsVcommon_dylanMM0I (dylan_value x_, dylan_value count_) {
  DWORD T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  DWORD raw_x_;
  DWORD T8;
  DWORD T9;
  dylan_value T10;
  dylan_value T11_0;

  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:34
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
  T3 = primitive_cast_integer_as_raw(count_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
  T4 = primitive_machine_word_less_thanQ(T3,1);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
  if (T4 != &KPfalseVKi) {
    T6 = &KPfalseVKi;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
    T5 = primitive_machine_word_less_thanQ(T3,257);
    T6 = T5;
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
  if (T6 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
    Kinvalid_shift_quantityYcommon_dylan_internalsVcommon_dylanI(count_);
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:36
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:37
  raw_x_ = primitive_unwrap_machine_word(x_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:37
  T8 = primitive_machine_word_shift_right(T3,2);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:37
  T9 = primitive_machine_word_shift_right(raw_x_,T8);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:37
  T10 = primitive_wrap_machine_word(T9);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:37
  T11_0 = T10;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:34
  MV_SET_COUNT(1);
  return(T11_0);
}

dylan_value KPshift_rightYmachine_wordsVcommon_dylanMM1I (dylan_value x_, dylan_value count_) {
  DWORD T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  DWORD T7;
  DWORD T8;
  DWORD T9;
  dylan_value T10;
  dylan_value T11_0;

  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:40
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
  T3 = primitive_cast_integer_as_raw(count_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
  T4 = primitive_machine_word_less_thanQ(T3,1);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
  if (T4 != &KPfalseVKi) {
    T6 = &KPfalseVKi;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
    T5 = primitive_machine_word_less_thanQ(T3,257);
    T6 = T5;
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
  if (T6 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
    Kinvalid_shift_quantityYcommon_dylan_internalsVcommon_dylanI(count_);
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:42
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:43
  T7 = primitive_unwrap_abstract_integer(x_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:43
  T8 = primitive_machine_word_shift_right(T3,2);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:43
  T9 = primitive_machine_word_shift_right(T7,T8);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:43
  T10 = primitive_wrap_machine_word(T9);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:43
  T11_0 = T10;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:40
  MV_SET_COUNT(1);
  return(T11_0);
}

dylan_value KPshift_leftYmachine_wordsVcommon_dylanMM0I (dylan_value x_, dylan_value count_) {
  DWORD T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  DWORD raw_x_;
  DWORD T8;
  DWORD T9_0;
  DWORD T9_1;
  dylan_value T9_2;
  DWORD low_;
  DWORD high_;
  dylan_value overflowQ_;
  dylan_value T13;
  dylan_value T14;
  dylan_value T15_0;
  dylan_value T15_1;
  dylan_value T15_2;

  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:14
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
  T3 = primitive_cast_integer_as_raw(count_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
  T4 = primitive_machine_word_less_thanQ(T3,1);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
  if (T4 != &KPfalseVKi) {
    T6 = &KPfalseVKi;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
    T5 = primitive_machine_word_less_thanQ(T3,257);
    T6 = T5;
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
  if (T6 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
    Kinvalid_shift_quantityYcommon_dylan_internalsVcommon_dylanI(count_);
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:16
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  raw_x_ = primitive_unwrap_machine_word(x_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  T8 = primitive_machine_word_shift_right(T3,2);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  T9_0 = primitive_machine_word_shift_left_with_overflow_byref(raw_x_,T8,(DWORD*)&T9_1,(dylan_value*)&T9_2);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  low_ = T9_0;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  high_ = T9_1;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  overflowQ_ = T9_2;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  T13 = primitive_wrap_machine_word(low_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  T14 = primitive_wrap_machine_word(high_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:17
  T15_0 = T13;
  T15_1 = T14;
  T15_2 = overflowQ_;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:14
  MV_SET_ELT(1, T15_1);
  MV_SET_ELT(2, T15_2);
  MV_SET_COUNT(3);
  return(T15_0);
}

dylan_value KPshift_leftYmachine_wordsVcommon_dylanMM1I (dylan_value x_, dylan_value count_) {
  DWORD T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  DWORD T7;
  DWORD T8;
  DWORD T9_0;
  DWORD T9_1;
  dylan_value T9_2;
  DWORD low_;
  DWORD high_;
  dylan_value overflowQ_;
  dylan_value T13;
  dylan_value T14;
  dylan_value T15_0;
  dylan_value T15_1;
  dylan_value T15_2;

  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:20
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
  T3 = primitive_cast_integer_as_raw(count_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
  T4 = primitive_machine_word_less_thanQ(T3,1);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
  if (T4 != &KPfalseVKi) {
    T6 = &KPfalseVKi;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
    T5 = primitive_machine_word_less_thanQ(T3,257);
    T6 = T5;
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
  if (T6 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
    Kinvalid_shift_quantityYcommon_dylan_internalsVcommon_dylanI(count_);
  }
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:22
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:24
  T7 = primitive_unwrap_abstract_integer(x_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  T8 = primitive_machine_word_shift_right(T3,2);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  T9_0 = primitive_machine_word_shift_left_with_overflow_byref(T7,T8,(DWORD*)&T9_1,(dylan_value*)&T9_2);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  low_ = T9_0;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  high_ = T9_1;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  overflowQ_ = T9_2;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  T13 = primitive_wrap_machine_word(low_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  T14 = primitive_wrap_machine_word(high_);
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:23
  T15_0 = T13;
  T15_1 = T14;
  T15_2 = overflowQ_;
  // /home/bruce/Development/dylan/opendylan/sources/common-dylan/machine-words/shift.dylan:20
  MV_SET_ELT(1, T15_1);
  MV_SET_ELT(2, T15_2);
  MV_SET_COUNT(3);
  return(T15_0);
}


/* SYSTEM INIT CODE */

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

/* USER INIT CODE */

void _Init_common_dylan__X_18Eshift_for_user () {
  return;
}


/* eof */
