/*===========================================================================*/
/*   (SawMsil/compile.scm)                                                   */
/*   Bigloo (2.6b)                                                           */
/*   Inria -- Sophia Antipolis (c)       Mon Dec 15 12:14:36 CET 2003        */
/*===========================================================================*/
/* COMPILATION: (/users/serrano/prgm/project/bigloo/bin/bigloo -q -afile .afile -fsharing -fno-reflection -cc gcc-2.95 -lib-dir /users/serrano/prgm/project/bigloo/lib/2.6b -unsafev -no-hello -O2 -rm -unsafe -s -indent SawMsil/compile.scm)*/
/* GC selection */
#define THE_GC BOEHM_GC

#include <bigloo.h>


/* Object type definitions */
typedef struct BgL_ccompz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_producerz00;
   obj_t BgL_consumerz00;
   obj_t BgL_finaliza7erza7;
} *BgL_ccompz00_bglt;

typedef struct BgL_typez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   obj_t BgL_siza7eza7;
   obj_t BgL_classz00;
   obj_t BgL_coercezd2tozd2;
   obj_t BgL_parentsz00;
   bool_t BgL_initzf3zf3;
   bool_t BgL_magiczf3zf3;
   obj_t BgL_z42z42;
   obj_t BgL_aliasz00;
   obj_t BgL_pointedzd2tozd2byz00;
   obj_t BgL_tvectorz00;
   obj_t BgL_locationz00;
   obj_t BgL_importzd2locationzd2;
} *BgL_typez00_bglt;

typedef struct BgL_nodez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_nodez00_bglt;

typedef struct BgL_nodezf2effectzf2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
} *BgL_nodezf2effectzf2_bglt;

typedef struct BgL_atomz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_valuez00;
} *BgL_atomz00_bglt;

typedef struct BgL_varz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_variablez00_bgl * BgL_variablez00;
} *BgL_varz00_bglt;

typedef struct BgL_closurez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_variablez00_bgl * BgL_variablez00;
} *BgL_closurez00_bglt;

typedef struct BgL_kwotez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_valuez00;
} *BgL_kwotez00_bglt;

typedef struct BgL_sequencez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_nodesz00;
} *BgL_sequencez00_bglt;

typedef struct BgL_appz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_varz00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
} *BgL_appz00_bglt;

typedef struct BgL_appzd2lyzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_funz00;
   struct BgL_nodez00_bgl * BgL_argz00;
} *BgL_appzd2lyzd2_bglt;

typedef struct BgL_funcallz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
   obj_t BgL_strengthz00;
} *BgL_funcallz00_bglt;

typedef struct BgL_externz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
} *BgL_externz00_bglt;

typedef struct BgL_pragmaz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_formatz00;
} *BgL_pragmaz00_bglt;

typedef struct BgL_getfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_fnamez00;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
} *BgL_getfieldz00_bglt;

typedef struct BgL_setfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_fnamez00;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
} *BgL_setfieldz00_bglt;

typedef struct BgL_newz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
} *BgL_newz00_bglt;

typedef struct BgL_vallocz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2heapzd2formatz00;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
} *BgL_vallocz00_bglt;

typedef struct BgL_vrefz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2formatzd2;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_vrefz00_bglt;

typedef struct BgL_vsetz12z12_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2formatzd2;
   struct BgL_typez00_bgl * BgL_ftypez00;
   struct BgL_typez00_bgl * BgL_otypez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_vsetz12z12_bglt;

typedef struct BgL_vlengthz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   obj_t BgL_czd2formatzd2;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_vlengthz00_bglt;

typedef struct BgL_isaz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_exprza2za2;
   obj_t BgL_effectz00;
   struct BgL_typez00_bgl * BgL_classz00;
} *BgL_isaz00_bglt;

typedef struct BgL_castz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_argz00;
} *BgL_castz00_bglt;

typedef struct BgL_setqz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_varz00_bgl * BgL_varz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_setqz00_bglt;

typedef struct BgL_conditionalz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_nodez00_bgl * BgL_testz00;
   struct BgL_nodez00_bgl * BgL_truez00;
   struct BgL_nodez00_bgl * BgL_falsez00;
} *BgL_conditionalz00_bglt;

typedef struct BgL_failz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_procz00;
   struct BgL_nodez00_bgl * BgL_msgz00;
   struct BgL_nodez00_bgl * BgL_objz00;
} *BgL_failz00_bglt;

typedef struct BgL_selectz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_nodez00_bgl * BgL_testz00;
   obj_t BgL_clausesz00;
   struct BgL_typez00_bgl * BgL_itemzd2typezd2;
} *BgL_selectz00_bglt;

typedef struct BgL_letzd2funzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_localsz00;
   struct BgL_nodez00_bgl * BgL_bodyz00;
} *BgL_letzd2funzd2_bglt;

typedef struct BgL_letzd2varzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   obj_t BgL_bindingsz00;
   struct BgL_nodez00_bgl * BgL_bodyz00;
   bool_t BgL_removablezf3zf3;
} *BgL_letzd2varzd2_bglt;

typedef struct BgL_setzd2exzd2itz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_varz00_bgl * BgL_varz00;
   struct BgL_nodez00_bgl * BgL_bodyz00;
} *BgL_setzd2exzd2itz00_bglt;

typedef struct BgL_jumpzd2exzd2itz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_nodez00_bgl * BgL_exitz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_jumpzd2exzd2itz00_bglt;

typedef struct BgL_makezd2boxzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_makezd2boxzd2_bglt;

typedef struct BgL_boxzd2refzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_keyz00;
   struct BgL_varz00_bgl * BgL_varz00;
} *BgL_boxzd2refzd2_bglt;

typedef struct BgL_boxzd2setz12zc0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_varz00_bgl * BgL_varz00;
   struct BgL_nodez00_bgl * BgL_valuez00;
} *BgL_boxzd2setz12zc0_bglt;

typedef struct BgL_valuez00_bgl {
   header_t header;
   obj_t widening;
} *BgL_valuez00_bglt;

typedef struct BgL_variablez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
} *BgL_variablez00_bglt;

typedef struct BgL_globalz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
   obj_t BgL_modulez00;
   obj_t BgL_importz00;
   bool_t BgL_evaluablezf3zf3;
   bool_t BgL_libraryzf3zf3;
   bool_t BgL_userzf3zf3;
   obj_t BgL_pragmaz00;
   obj_t BgL_srcz00;
   obj_t BgL_jvmzd2typezd2namez00;
} *BgL_globalz00_bglt;

typedef struct BgL_localz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
   bool_t BgL_userzf3zf3;
   long BgL_keyz00;
} *BgL_localz00_bglt;

typedef struct BgL_funz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
} *BgL_funz00_bglt;

typedef struct BgL_sfunz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
   obj_t BgL_propertyz00;
   obj_t BgL_argsz00;
   obj_t BgL_bodyz00;
   obj_t BgL_classz00;
   obj_t BgL_dssslzd2keywordszd2;
   obj_t BgL_locz00;
} *BgL_sfunz00_bglt;

typedef struct BgL_cfunz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
   obj_t BgL_argszd2typezd2;
   bool_t BgL_macrozf3zf3;
   bool_t BgL_infixzf3zf3;
   obj_t BgL_methodz00;
} *BgL_cfunz00_bglt;

typedef struct BgL_svarz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
} *BgL_svarz00_bglt;

typedef struct BgL_scnstz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_nodez00;
   obj_t BgL_classz00;
   obj_t BgL_locz00;
} *BgL_scnstz00_bglt;

typedef struct BgL_cvarz00_bgl {
   header_t header;
   obj_t widening;
   bool_t BgL_macrozf3zf3;
} *BgL_cvarz00_bglt;

typedef struct BgL_sexitz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_handlerz00;
   bool_t BgL_detachedzf3zf3;
} *BgL_sexitz00_bglt;

typedef struct BgL_feffectz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_readz00;
   obj_t BgL_writez00;
} *BgL_feffectz00_bglt;

typedef struct BgL_tclassz00_bgl {
   obj_t BgL_itszd2superzd2;
   obj_t BgL_slotsz00;
   struct BgL_globalz00_bgl * BgL_holderz00;
   obj_t BgL_wideningz00;
   long BgL_depthz00;
   bool_t BgL_finalzf3zf3;
   obj_t BgL_constructorz00;
   obj_t BgL_virtualzd2slotszd2numberz00;
   bool_t BgL_abstractzf3zf3;
   obj_t BgL_widezd2typezd2;
} *BgL_tclassz00_bglt;

typedef struct BgL_jclassz00_bgl {
   obj_t BgL_itszd2superzd2;
   obj_t BgL_slotsz00;
   obj_t BgL_packagez00;
} *BgL_jclassz00_bglt;

typedef struct BgL_wclassz00_bgl {
   obj_t BgL_itszd2classzd2;
} *BgL_wclassz00_bglt;

typedef struct BgL_slotz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   obj_t BgL_srcz00;
   obj_t BgL_classzd2ownerzd2;
   obj_t BgL_typez00;
   bool_t BgL_readzd2onlyzf3z21;
   obj_t BgL_defaultzd2valuezd2;
   obj_t BgL_virtualzd2numzd2;
   obj_t BgL_getterz00;
   obj_t BgL_setterz00;
   obj_t BgL_indexedz00;
   obj_t BgL_userzd2infozd2;
} *BgL_slotz00_bglt;

typedef struct BgL_tvecz00_bgl {
   struct BgL_typez00_bgl * BgL_itemzd2typezd2;
} *BgL_tvecz00_bglt;

typedef struct BgL_backendz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_backendz00_bglt;

typedef struct BgL_cvmz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_cvmz00_bglt;

typedef struct BgL_sawcz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_sawcz00_bglt;

typedef struct BgL_cgenz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_cgenz00_bglt;

typedef struct BgL_jvmz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
   obj_t BgL_qnamez00;
   obj_t BgL_classesz00;
   obj_t BgL_currentzd2classzd2;
   obj_t BgL_declarationsz00;
   obj_t BgL_fieldsz00;
   obj_t BgL_methodsz00;
   obj_t BgL_currentzd2methodzd2;
   obj_t BgL_codez00;
} *BgL_jvmz00_bglt;

typedef struct BgL_dotnetz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
   obj_t BgL_outz00;
   obj_t BgL_qnamez00;
} *BgL_dotnetz00_bglt;

typedef struct BgL_rtl_regz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_varz00;
} *BgL_rtl_regz00_bglt;

typedef struct BgL_rtl_funz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_funz00_bglt;

typedef struct BgL_rtl_lastz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_lastz00_bglt;

typedef struct BgL_rtl_returnz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_returnz00_bglt;

typedef struct BgL_rtl_jumpexitz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_jumpexitz00_bglt;

typedef struct BgL_rtl_failz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_failz00_bglt;

typedef struct BgL_rtl_notseqz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_notseqz00_bglt;

typedef struct BgL_rtl_ifz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_ifz00_bglt;

typedef struct BgL_rtl_selectz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_patternsz00;
} *BgL_rtl_selectz00_bglt;

typedef struct BgL_rtl_switchz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_patternsz00;
   obj_t BgL_labelsz00;
} *BgL_rtl_switchz00_bglt;

typedef struct BgL_rtl_ifeqz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_blockz00_bgl * BgL_thenz00;
} *BgL_rtl_ifeqz00_bglt;

typedef struct BgL_rtl_ifnez00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_blockz00_bgl * BgL_thenz00;
} *BgL_rtl_ifnez00_bglt;

typedef struct BgL_rtl_goz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_blockz00_bgl * BgL_toz00;
} *BgL_rtl_goz00_bglt;

typedef struct BgL_rtl_purez00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_purez00_bglt;

typedef struct BgL_rtl_nopz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_nopz00_bglt;

typedef struct BgL_rtl_movz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_movz00_bglt;

typedef struct BgL_rtl_loadiz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_atomz00_bgl * BgL_constantz00;
} *BgL_rtl_loadiz00_bglt;

typedef struct BgL_rtl_loadgz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_loadgz00_bglt;

typedef struct BgL_rtl_loadfunz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_loadfunz00_bglt;

typedef struct BgL_rtl_globalrefz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_globalrefz00_bglt;

typedef struct BgL_rtl_getfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_objtypez00;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_getfieldz00_bglt;

typedef struct BgL_rtl_vallocz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_rtl_vallocz00_bglt;

typedef struct BgL_rtl_vrefz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_rtl_vrefz00_bglt;

typedef struct BgL_rtl_vlengthz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_vlengthz00_bglt;

typedef struct BgL_rtl_isaz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_isaz00_bglt;

typedef struct BgL_rtl_makeboxz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_makeboxz00_bglt;

typedef struct BgL_rtl_boxrefz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_boxrefz00_bglt;

typedef struct BgL_rtl_effectz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_effectz00_bglt;

typedef struct BgL_rtl_storegz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_storegz00_bglt;

typedef struct BgL_rtl_setfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_objtypez00;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_setfieldz00_bglt;

typedef struct BgL_rtl_vsetz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_rtl_vsetz00_bglt;

typedef struct BgL_rtl_boxsetz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_boxsetz00_bglt;

typedef struct BgL_rtl_newz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_newz00_bglt;

typedef struct BgL_rtl_callz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_callz00_bglt;

typedef struct BgL_rtl_applyz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_applyz00_bglt;

typedef struct BgL_rtl_lightfuncallz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_lightfuncallz00_bglt;

typedef struct BgL_rtl_funcallz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_funcallz00_bglt;

typedef struct BgL_rtl_pragmaz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_formatz00;
} *BgL_rtl_pragmaz00_bglt;

typedef struct BgL_rtl_castz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_castz00_bglt;

typedef struct BgL_rtl_protectz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_protectz00_bglt;

typedef struct BgL_rtl_protectedz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_protectedz00_bglt;

typedef struct BgL_stl_loadrz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_rtl_regz00_bgl * BgL_regz00;
} *BgL_stl_loadrz00_bglt;

typedef struct BgL_stl_storerz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_rtl_regz00_bgl * BgL_regz00;
} *BgL_stl_storerz00_bglt;

typedef struct BgL_stl_popz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_stl_popz00_bglt;

typedef struct BgL_rtl_insz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   obj_t BgL_destz00;
   struct BgL_rtl_funz00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
} *BgL_rtl_insz00_bglt;

typedef struct BgL_blockz00_bgl {
   header_t header;
   obj_t widening;
   int BgL_labelz00;
   obj_t BgL_predsz00;
   obj_t BgL_succsz00;
   obj_t BgL_firstz00;
} *BgL_blockz00_bglt;

typedef struct BgL_indexedz00_bgl {
   int BgL_indexz00;
} *BgL_indexedz00_bglt;


static obj_t BGl_modulezd2initzd2cnstz00zzmsil_compilez00(BgL_dotnetz00_bglt, obj_t, BgL_valuez00_bglt);
static obj_t BGl_modulezd2mainzd2zzmsil_compilez00(BgL_dotnetz00_bglt);
static obj_t BGl_methodzd2initzd2zzmsil_compilez00();
extern obj_t BGl_openzd2tryzd2zzmsil_outz00(BgL_dotnetz00_bglt);
BGL_IMPORT obj_t open_input_string(obj_t);
extern obj_t BGl_dupz00zzmsil_outz00(BgL_dotnetz00_bglt);
extern obj_t BGl_declarezd2fieldzd2zzmsil_outz00(BgL_dotnetz00_bglt, BgL_slotz00_bglt);
extern int BGl_maxstackz00zzmsil_maxstackz00(obj_t);
extern obj_t BGl_modulezd2codezd2zzmsil_codez00(BgL_dotnetz00_bglt, obj_t, obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
extern obj_t BGl_pushzd2stringzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t);
BGL_IMPORT obj_t BGl_makezd2listzd2zz__r4_pairs_and_lists_6_3z00(int, obj_t);
extern obj_t BGl_forzd2eachzd2typez12z12zztype_envz00(obj_t);
extern obj_t BGl_storezd2globalzd2zzmsil_outz00(BgL_dotnetz00_bglt, BgL_globalz00_bglt);
extern obj_t BGl_za2moduleza2z00zzmodule_modulez00;
extern obj_t BGl_getzd2declaredzd2globalzd2variableszd2zzbackend_cplibz00(obj_t);
extern BgL_rtl_regz00_bglt BGl_localzd2ze3regz31zzsaw_node2rtlz00(BgL_localz00_bglt);
extern obj_t BGl_globalz00zzast_varz00;
extern obj_t BGl_getzd2globalzd2variableszd2tozd2bezd2initializa7edz75zzbackend_cplibz00(obj_t);
extern obj_t BGl_getzd2cnstzd2offsetz00zzcnst_allocz00();
extern obj_t BGl_pushzd2numzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t, obj_t);
extern obj_t BGl_loadzd2parzd2zzmsil_outz00(BgL_dotnetz00_bglt, int);
extern obj_t BGl_modulezd2funcallzf2applyz20zzmsil_funcallz00(BgL_dotnetz00_bglt);
static obj_t BGl_constructorz00zzmsil_compilez00(BgL_dotnetz00_bglt, long, obj_t);
extern obj_t BGl_openzd2catchzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t, obj_t);
extern obj_t BGl_declarezd2maxstackzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t);
extern obj_t BGl_openzd2globalzd2methodz00zzmsil_outz00(BgL_dotnetz00_bglt, BgL_globalz00_bglt);
static obj_t BGl_cnstzd2initzd2zzmsil_compilez00();
extern BgL_tclassz00_bglt BGl_getzd2itszd2superz00zzbackend_cplibz00(BgL_typez00_bglt);
BGL_IMPORT obj_t c_substring(obj_t, int, int);
extern obj_t BGl_libcallz00zzmsil_outz00(BgL_dotnetz00_bglt, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzmsil_compilez00();
extern obj_t BGl_getzd2declaredzd2classesz00zzbackend_cplibz00();
extern obj_t BGl_openzd2namespacezd2zzmsil_outz00(BgL_dotnetz00_bglt);
static obj_t BGl_unclassz00zzmsil_compilez00(obj_t);
extern obj_t BGl_closezd2methodzd2zzmsil_outz00(BgL_dotnetz00_bglt);
extern obj_t BGl_openzd2methodzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_toplevelzd2initzd2zzmsil_compilez00();
static bool_t BGl_modulezd2functionszd2zzmsil_compilez00(BgL_dotnetz00_bglt);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzmsil_compilez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmodule_modulez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_cachez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_classz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_slotsz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcnst_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcnst_allocz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztvector_tvectorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzread_jvmz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_backendz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_dotnetz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_libz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_cplibz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzsaw_extratypez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzsaw_defsz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzsaw_node2rtlz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzsaw_woodcutterz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzsaw_exprz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmsil_namesz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmsil_outz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmsil_funcallz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmsil_maxstackz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmsil_codez00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
static obj_t BGl_compilezd2modulezd2zzmsil_compilez00(BgL_dotnetz00_bglt);
extern obj_t BGl_findzd2globalzd2zzast_envz00(obj_t, obj_t);
extern obj_t BGl_closezd2classzd2zzmsil_outz00(BgL_dotnetz00_bglt);
extern obj_t BGl_declarezd2entrypointzd2zzmsil_outz00(BgL_dotnetz00_bglt);
extern obj_t BGl_callzd2globalzd2zzmsil_outz00(BgL_dotnetz00_bglt, BgL_globalz00_bglt);
extern obj_t BGl_closezd2tryzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t);
extern obj_t BGl_openzd2methodzd2classzd2constructorzd2zzmsil_outz00(BgL_dotnetz00_bglt);
extern obj_t BGl_getzd2declaredzd2fieldsz00zzbackend_cplibz00(BgL_typez00_bglt);
extern obj_t BGl_buildzd2treezd2zzsaw_exprz00(BgL_backendz00_bglt, obj_t, obj_t);
static obj_t BGl__msilzd2compile5030zd2zzmsil_compilez00(obj_t, obj_t, obj_t);
extern obj_t BGl_forzd2eachzd2globalz12z12zzast_envz00(obj_t);
extern obj_t BGl_za2mainza2z00zzmodule_modulez00;
BGL_EXPORTED_DECL obj_t BGl_msilzd2compilezd2zzmsil_compilez00(BgL_dotnetz00_bglt, obj_t);
extern obj_t BGl_getzd2cnstzd2tablez00zzcnst_allocz00();
extern obj_t BGl_closezd2namespacezd2zzmsil_outz00(BgL_dotnetz00_bglt);
static obj_t BGl_compilezd2classzd2zzmsil_compilez00(BgL_dotnetz00_bglt, obj_t);
extern obj_t BGl_globalzd2ze3blocksz31zzsaw_woodcutterz00(BgL_backendz00_bglt, BgL_globalz00_bglt);
extern obj_t BGl_newobjz00zzmsil_outz00(BgL_dotnetz00_bglt, obj_t, obj_t);
extern obj_t BGl_internalzd2errorzd2zztools_errorz00(obj_t, obj_t, obj_t);
extern obj_t BGl_openzd2classzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t, obj_t, obj_t);
extern obj_t BGl_pushzd2intzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t);
extern obj_t BGl_declarezd2globalzd2zzmsil_outz00(BgL_dotnetz00_bglt, BgL_globalz00_bglt);
extern obj_t BGl_newarrayz00zzmsil_outz00(BgL_dotnetz00_bglt, obj_t);
extern obj_t BGl_openzd2methodzd2constructorz00zzmsil_outz00(BgL_dotnetz00_bglt, obj_t);
static obj_t BGl_modulezd2initzd2zzmsil_compilez00(BgL_dotnetz00_bglt);
extern obj_t BGl_getzd2nodezd2atomzd2valuezd2zzcnst_nodez00(BgL_nodez00_bglt);
extern obj_t BGl_returnz00zzmsil_outz00(BgL_dotnetz00_bglt);
static obj_t BGl_requirezd2initializa7ationz75zzmsil_compilez00 = BUNSPEC;
extern obj_t BGl_callzd2superzd2constructorz00zzmsil_outz00(BgL_dotnetz00_bglt, obj_t, obj_t);
static obj_t BGl_modulezd2functionzd2zzmsil_compilez00(BgL_dotnetz00_bglt, obj_t);
BGL_IMPORT bool_t BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(obj_t, obj_t);
extern obj_t BGl_popz00zzmsil_outz00(BgL_dotnetz00_bglt);
static obj_t BGl_libraryzd2moduleszd2initz00zzmsil_compilez00();
extern obj_t BGl_storezd2vectorzd2zzmsil_outz00(BgL_dotnetz00_bglt, obj_t);
static obj_t __cnst[ 24 ] ;


DEFINE_STRING( BGl_string5126z00zzmsil_compilez00, BgL_bgl_string5126za700za7za7msil_compileza7005154z00, "stvector (int int int) sgfun (int int) sfun (double) double sreal (fstring) getbytes bstring sstring int (exception) internalerror bigloo_main listargv bigloo.foreign obj init bigloo.realcallback (fstrings) void (public static) ", 228 );
DEFINE_STRING( BGl_string5125z00zzmsil_compilez00, BgL_bgl_string5125za700za7za7msil_compileza7005155z00, "Unknown cnst class", 18 );
DEFINE_STRING( BGl_string5124z00zzmsil_compilez00, BgL_bgl_string5124za700za7za7msil_compileza7005156z00, "emit-cnst", 9 );
DEFINE_STRING( BGl_string5123z00zzmsil_compilez00, BgL_bgl_string5123za700za7za7msil_compileza7005157z00, "bigloo.real", 11 );
DEFINE_STRING( BGl_string5122z00zzmsil_compilez00, BgL_bgl_string5122za700za7za7msil_compileza7005158z00, "_return", 7 );
DEFINE_STRING( BGl_string5121z00zzmsil_compilez00, BgL_bgl_string5121za700za7za7msil_compileza7005159z00, "System.Exception", 16 );
DEFINE_STRING( BGl_string5120z00zzmsil_compilez00, BgL_bgl_string5120za700za7za7msil_compileza7005160z00, "Main", 4 );
DEFINE_STRING( BGl_string5119z00zzmsil_compilez00, BgL_bgl_string5119za700za7za7msil_compileza7005161z00, "bigloo.procedure", 16 );
extern obj_t BGl_msilzd2setzd2globalzd2namesz12zd2envz12zzmsil_namesz00;
extern obj_t BGl_msilzd2setzd2typezd2namesz12zd2envz12zzmsil_namesz00;
DEFINE_EXPORT_PROCEDURE( BGl_msilzd2compilezd2envz00zzmsil_compilez00, BgL_bgl__msilza7d2compile5030za7d2za7za7msil_compileza7005162za7, BGl__msilzd2compile5030zd2zzmsil_compilez00, 0L, 2 );
extern obj_t BGl_resetzd2globalz12zd2envz12zzbackend_cplibz00;



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzmsil_compilez00(long BgL_checksumz00_1990, char * BgL_fromz00_1991)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzmsil_compilez00))
{ 
BGl_requirezd2initializa7ationz75zzmsil_compilez00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzmsil_compilez00(); 
BGl_cnstzd2initzd2zzmsil_compilez00(); 
BGl_importedzd2moduleszd2initz00zzmsil_compilez00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzmsil_compilez00()
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 1 */
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "msil_compile"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "msil_compile"); 
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "msil_compile"); 
BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(((long)0), "msil_compile"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzmsil_compilez00()
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 1 */
{ /* ./SawMsil/compile.scm 1 */
obj_t BgL_cportz00_1983;
BgL_cportz00_1983 = 
open_input_string(BGl_string5126z00zzmsil_compilez00); 
{ 
long BgL_iz00_1984;
BgL_iz00_1984 = ((long)23); 
BgL_loopz00_1985:
{ /* ./SawMsil/compile.scm 1 */
bool_t BgL_test5128z00_1986;
BgL_test5128z00_1986 = 
(BgL_iz00_1984==((long)-1)); 
if(BgL_test5128z00_1986)
{ /* ./SawMsil/compile.scm 1 */
return BUNSPEC;}  else 
{ /* ./SawMsil/compile.scm 1 */
{ /* ./SawMsil/compile.scm 1 */
obj_t BgL_arg5130z00_1987;
{ /* ./SawMsil/compile.scm 1 */
obj_t BgL_list5133z00_1988;
BgL_list5133z00_1988 = 
MAKE_PAIR(BgL_cportz00_1983, BNIL); 
BgL_arg5130z00_1987 = 
BGl_readz00zz__readerz00(BgL_list5133z00_1988); } 
{ /* ./SawMsil/compile.scm 1 */
int BgL_auxz00_2007;
BgL_auxz00_2007 = 
(int)(BgL_iz00_1984); 
CNST_TABLE_SET(BgL_auxz00_2007, BgL_arg5130z00_1987); } } 
{ /* ./SawMsil/compile.scm 1 */
int BgL_auxz00_1989;
{ /* ./SawMsil/compile.scm 1 */
long BgL_auxz00_2010;
BgL_auxz00_2010 = 
(BgL_iz00_1984-((long)1)); 
BgL_auxz00_1989 = 
(int)(BgL_auxz00_2010); } 
{ 
long BgL_iz00_2013;
BgL_iz00_2013 = 
(long)(BgL_auxz00_1989); 
BgL_iz00_1984 = BgL_iz00_2013; 
goto BgL_loopz00_1985;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzmsil_compilez00()
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 1 */
return BUNSPEC;} 
}



/* msil-compile */
BGL_EXPORTED_DEF obj_t BGl_msilzd2compilezd2zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_11, obj_t BgL_outz00_12)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 36 */
{ /* ./SawMsil/compile.scm 37 */
BgL_dotnetz00_bglt BgL_obj3344z00_1886;obj_t BgL_val3343z00_1887;
BgL_obj3344z00_1886 = BgL_mez00_11; 
BgL_val3343z00_1887 = BgL_outz00_12; 
((((BgL_dotnetz00_bglt)CREF(BgL_obj3344z00_1886))->BgL_outz00) = ((obj_t)BgL_val3343z00_1887), BUNSPEC); } 
BGl_forzd2eachzd2globalz12z12zzast_envz00(BGl_resetzd2globalz12zd2envz12zzbackend_cplibz00); 
BGl_forzd2eachzd2typez12z12zztype_envz00(BGl_msilzd2setzd2typezd2namesz12zd2envz12zzmsil_namesz00); 
BGl_forzd2eachzd2globalz12z12zzast_envz00(BGl_msilzd2setzd2globalzd2namesz12zd2envz12zzmsil_namesz00); 
BGl_openzd2namespacezd2zzmsil_outz00(BgL_mez00_11); 
BGl_compilezd2modulezd2zzmsil_compilez00(BgL_mez00_11); 
{ 
obj_t BgL_l3918z00_1164;
{ /* ./SawMsil/compile.scm 44 */
obj_t BgL_arg3972z00_1166;
BgL_arg3972z00_1166 = 
BGl_getzd2declaredzd2classesz00zzbackend_cplibz00(); 
BgL_l3918z00_1164 = BgL_arg3972z00_1166; 
BgL_forzd2each3919zd2_1165:
{ /* ./SawMsil/compile.scm 44 */
bool_t BgL_test3975z00_1167;
BgL_test3975z00_1167 = 
PAIRP(BgL_l3918z00_1164); 
if(BgL_test3975z00_1167)
{ /* ./SawMsil/compile.scm 44 */
{ /* ./SawMsil/compile.scm 44 */
obj_t BgL_cz00_1168;
BgL_cz00_1168 = 
CAR(BgL_l3918z00_1164); 
BGl_compilezd2classzd2zzmsil_compilez00(BgL_mez00_11, BgL_cz00_1168); } 
{ /* ./SawMsil/compile.scm 44 */
obj_t BgL_arg3979z00_1169;
BgL_arg3979z00_1169 = 
CDR(BgL_l3918z00_1164); 
{ 
obj_t BgL_l3918z00_2027;
BgL_l3918z00_2027 = BgL_arg3979z00_1169; 
BgL_l3918z00_1164 = BgL_l3918z00_2027; 
goto BgL_forzd2each3919zd2_1165;} } }  else 
{ /* ./SawMsil/compile.scm 44 */((bool_t)1); } } } } 
return 
BGl_closezd2namespacezd2zzmsil_outz00(BgL_mez00_11);} 
}



/* _msil-compile5030 */
obj_t BGl__msilzd2compile5030zd2zzmsil_compilez00(obj_t BgL_envz00_1973, obj_t BgL_mez00_1974, obj_t BgL_outz00_1975)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 36 */
return 
BGl_msilzd2compilezd2zzmsil_compilez00(
(BgL_dotnetz00_bglt)(BgL_mez00_1974), BgL_outz00_1975);} 
}



/* compile-class */
obj_t BGl_compilezd2classzd2zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_13, obj_t BgL_cz00_14)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 51 */
{ /* ./SawMsil/compile.scm 55 */
obj_t BgL_cnamez00_1171;obj_t BgL_snamez00_1172;
BgL_cnamez00_1171 = 
BGl_unclassz00zzmsil_compilez00(BgL_cz00_14); 
{ /* ./SawMsil/compile.scm 55 */
BgL_tclassz00_bglt BgL_arg4001z00_1179;
BgL_arg4001z00_1179 = 
BGl_getzd2itszd2superz00zzbackend_cplibz00(
(BgL_typez00_bglt)(BgL_cz00_14)); 
BgL_snamez00_1172 = 
BGl_unclassz00zzmsil_compilez00(
(obj_t)(BgL_arg4001z00_1179)); } 
BGl_openzd2classzd2zzmsil_outz00(BgL_mez00_13, BgL_cnamez00_1171, BgL_snamez00_1172, BTRUE); 
{ 
obj_t BgL_l3920z00_1173;
{ /* ./SawMsil/compile.scm 58 */
obj_t BgL_arg3986z00_1175;
BgL_arg3986z00_1175 = 
BGl_getzd2declaredzd2fieldsz00zzbackend_cplibz00(
(BgL_typez00_bglt)(BgL_cz00_14)); 
BgL_l3920z00_1173 = BgL_arg3986z00_1175; 
BgL_forzd2each3921zd2_1174:
{ /* ./SawMsil/compile.scm 58 */
bool_t BgL_test3989z00_1176;
BgL_test3989z00_1176 = 
PAIRP(BgL_l3920z00_1173); 
if(BgL_test3989z00_1176)
{ /* ./SawMsil/compile.scm 58 */
{ /* ./SawMsil/compile.scm 58 */
obj_t BgL_fz00_1177;
BgL_fz00_1177 = 
CAR(BgL_l3920z00_1173); 
BGl_declarezd2fieldzd2zzmsil_outz00(BgL_mez00_13, 
(BgL_slotz00_bglt)(BgL_fz00_1177)); } 
{ /* ./SawMsil/compile.scm 58 */
obj_t BgL_arg3993z00_1178;
BgL_arg3993z00_1178 = 
CDR(BgL_l3920z00_1173); 
{ 
obj_t BgL_l3920z00_2045;
BgL_l3920z00_2045 = BgL_arg3993z00_1178; 
BgL_l3920z00_1173 = BgL_l3920z00_2045; 
goto BgL_forzd2each3921zd2_1174;} } }  else 
{ /* ./SawMsil/compile.scm 58 */((bool_t)1); } } } } 
BGl_constructorz00zzmsil_compilez00(BgL_mez00_13, ((long)0), BgL_snamez00_1172); 
return 
BGl_closezd2classzd2zzmsil_outz00(BgL_mez00_13);} } 
}



/* unclass */
obj_t BGl_unclassz00zzmsil_compilez00(obj_t BgL_cz00_1180)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 54 */
{ /* ./SawMsil/compile.scm 53 */
obj_t BgL_namez00_1182;
{ /* ./SawMsil/compile.scm 53 */
BgL_typez00_bglt BgL_obj1024z00_1894;
BgL_obj1024z00_1894 = 
(BgL_typez00_bglt)(BgL_cz00_1180); 
BgL_namez00_1182 = 
(((BgL_typez00_bglt)CREF(BgL_obj1024z00_1894))->BgL_namez00); } 
{ /* ./SawMsil/compile.scm 54 */
int BgL_arg4007z00_1184;
BgL_arg4007z00_1184 = 
STRING_LENGTH(BgL_namez00_1182); 
{ /* ./SawMsil/compile.scm 54 */
int BgL_startz00_1897;
BgL_startz00_1897 = 
(int)(((long)6)); 
return 
c_substring(BgL_namez00_1182, BgL_startz00_1897, BgL_arg4007z00_1184);} } } } 
}



/* compile-module */
obj_t BGl_compilezd2modulezd2zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_15)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 65 */
{ /* ./SawMsil/compile.scm 67 */
obj_t BgL_arg4012z00_1187;
BgL_arg4012z00_1187 = 
(((BgL_dotnetz00_bglt)CREF(BgL_mez00_15))->BgL_qnamez00); 
BGl_openzd2classzd2zzmsil_outz00(BgL_mez00_15, BgL_arg4012z00_1187, BGl_string5119z00zzmsil_compilez00, BTRUE); } 
{ 
obj_t BgL_l3922z00_1188;
{ /* ./SawMsil/compile.scm 69 */
obj_t BgL_arg4016z00_1190;
BgL_arg4016z00_1190 = 
BGl_getzd2declaredzd2globalzd2variableszd2zzbackend_cplibz00(BGl_za2moduleza2z00zzmodule_modulez00); 
BgL_l3922z00_1188 = BgL_arg4016z00_1190; 
BgL_forzd2each3923zd2_1189:
{ /* ./SawMsil/compile.scm 68 */
bool_t BgL_test4019z00_1191;
BgL_test4019z00_1191 = 
PAIRP(BgL_l3922z00_1188); 
if(BgL_test4019z00_1191)
{ /* ./SawMsil/compile.scm 68 */
{ /* ./SawMsil/compile.scm 68 */
obj_t BgL_vz00_1192;
BgL_vz00_1192 = 
CAR(BgL_l3922z00_1188); 
BGl_declarezd2globalzd2zzmsil_outz00(BgL_mez00_15, 
(BgL_globalz00_bglt)(BgL_vz00_1192)); } 
{ /* ./SawMsil/compile.scm 68 */
obj_t BgL_arg4023z00_1193;
BgL_arg4023z00_1193 = 
CDR(BgL_l3922z00_1188); 
{ 
obj_t BgL_l3922z00_2062;
BgL_l3922z00_2062 = BgL_arg4023z00_1193; 
BgL_l3922z00_1188 = BgL_l3922z00_2062; 
goto BgL_forzd2each3923zd2_1189;} } }  else 
{ /* ./SawMsil/compile.scm 68 */((bool_t)1); } } } } 
{ /* ./SawMsil/compile.scm 70 */
bool_t BgL_test4027z00_1194;
{ /* ./SawMsil/compile.scm 70 */
obj_t BgL_arg4033z00_1196;
BgL_arg4033z00_1196 = 
BGl_getzd2cnstzd2offsetz00zzcnst_allocz00(); 
{ /* ./SawMsil/compile.scm 70 */
long BgL_auxz00_2064;
BgL_auxz00_2064 = 
(long)CINT(BgL_arg4033z00_1196); 
BgL_test4027z00_1194 = 
(BgL_auxz00_2064>((long)0)); } } 
if(BgL_test4027z00_1194)
{ /* ./SawMsil/compile.scm 70 */
{ /* ./SawMsil/compile.scm 70 */
obj_t BgL_arg4029z00_1195;
BgL_arg4029z00_1195 = 
BGl_getzd2cnstzd2tablez00zzcnst_allocz00(); 
BGl_declarezd2globalzd2zzmsil_outz00(BgL_mez00_15, 
(BgL_globalz00_bglt)(BgL_arg4029z00_1195)); } }  else 
{ /* ./SawMsil/compile.scm 70 */BUNSPEC; } } 
{ /* ./SawMsil/compile.scm 71 */
bool_t BgL_test4037z00_1198;
{ /* ./SawMsil/compile.scm 71 */
obj_t BgL_obj2361z00_1905;
BgL_obj2361z00_1905 = BGl_za2mainza2z00zzmodule_modulez00; 
BgL_test4037z00_1198 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2361z00_1905, BGl_globalz00zzast_varz00); } 
if(BgL_test4037z00_1198)
{ /* ./SawMsil/compile.scm 71 */
BGl_modulezd2mainzd2zzmsil_compilez00(BgL_mez00_15); }  else 
{ /* ./SawMsil/compile.scm 71 */BFALSE; } } 
BGl_constructorz00zzmsil_compilez00(BgL_mez00_15, ((long)0), BGl_string5119z00zzmsil_compilez00); 
BGl_constructorz00zzmsil_compilez00(BgL_mez00_15, ((long)2), BGl_string5119z00zzmsil_compilez00); 
BGl_constructorz00zzmsil_compilez00(BgL_mez00_15, ((long)3), BGl_string5119z00zzmsil_compilez00); 
BGl_modulezd2funcallzf2applyz20zzmsil_funcallz00(BgL_mez00_15); 
BGl_modulezd2initzd2zzmsil_compilez00(BgL_mez00_15); 
BGl_modulezd2functionszd2zzmsil_compilez00(BgL_mez00_15); 
return 
BGl_closezd2classzd2zzmsil_outz00(BgL_mez00_15);} 
}



/* module-main */
obj_t BGl_modulezd2mainzd2zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_16)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 81 */
BGl_openzd2methodzd2zzmsil_outz00(BgL_mez00_16, 
CNST_TABLE_REF(((long)0)), 
CNST_TABLE_REF(((long)1)), BGl_string5120z00zzmsil_compilez00, 
CNST_TABLE_REF(((long)2))); 
BGl_declarezd2entrypointzd2zzmsil_outz00(BgL_mez00_16); 
BGl_declarezd2maxstackzd2zzmsil_outz00(BgL_mez00_16, 
BINT(((long)1))); 
BGl_libcallz00zzmsil_outz00(BgL_mez00_16, 
CNST_TABLE_REF(((long)1)), 
CNST_TABLE_REF(((long)3)), 
CNST_TABLE_REF(((long)4)), BNIL); 
BGl_openzd2tryzd2zzmsil_outz00(BgL_mez00_16); 
BGl_loadzd2parzd2zzmsil_outz00(BgL_mez00_16, 
(int)(((long)0))); 
BGl_libcallz00zzmsil_outz00(BgL_mez00_16, 
CNST_TABLE_REF(((long)5)), 
CNST_TABLE_REF(((long)6)), 
CNST_TABLE_REF(((long)7)), 
CNST_TABLE_REF(((long)2))); 
{ /* ./SawMsil/compile.scm 90 */
obj_t BgL_arg4055z00_1200;
{ /* ./SawMsil/compile.scm 90 */
obj_t BgL_list4058z00_1201;
BgL_list4058z00_1201 = 
MAKE_PAIR(BGl_za2moduleza2z00zzmodule_modulez00, BNIL); 
BgL_arg4055z00_1200 = 
BGl_findzd2globalzd2zzast_envz00(
CNST_TABLE_REF(((long)8)), BgL_list4058z00_1201); } 
BGl_callzd2globalzd2zzmsil_outz00(BgL_mez00_16, 
(BgL_globalz00_bglt)(BgL_arg4055z00_1200)); } 
BGl_popz00zzmsil_outz00(BgL_mez00_16); 
BGl_openzd2catchzd2zzmsil_outz00(BgL_mez00_16, BGl_string5121z00zzmsil_compilez00, BGl_string5122z00zzmsil_compilez00); 
BGl_libcallz00zzmsil_outz00(BgL_mez00_16, 
CNST_TABLE_REF(((long)1)), 
CNST_TABLE_REF(((long)6)), 
CNST_TABLE_REF(((long)9)), 
CNST_TABLE_REF(((long)10))); 
BGl_closezd2tryzd2zzmsil_outz00(BgL_mez00_16, BGl_string5122z00zzmsil_compilez00); 
BGl_returnz00zzmsil_outz00(BgL_mez00_16); 
return 
BGl_closezd2methodzd2zzmsil_outz00(BgL_mez00_16);} 
}



/* constructor */
obj_t BGl_constructorz00zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_17, long BgL_nz00_18, obj_t BgL_superz00_19)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 99 */
{ /* ./SawMsil/compile.scm 100 */
obj_t BgL_lz00_1202;
{ /* ./SawMsil/compile.scm 100 */
obj_t BgL_list4083z00_1208;
{ /* ./SawMsil/compile.scm 100 */
obj_t BgL_auxz00_2115;
BgL_auxz00_2115 = 
CNST_TABLE_REF(((long)11)); 
BgL_list4083z00_1208 = 
MAKE_PAIR(BgL_auxz00_2115, BNIL); } 
BgL_lz00_1202 = 
BGl_makezd2listzd2zz__r4_pairs_and_lists_6_3z00(
(int)(BgL_nz00_18), BgL_list4083z00_1208); } 
BGl_openzd2methodzd2constructorz00zzmsil_outz00(BgL_mez00_17, BgL_lz00_1202); 
{ /* ./SawMsil/compile.scm 102 */
long BgL_arg4068z00_1203;
BgL_arg4068z00_1203 = 
(BgL_nz00_18+((long)1)); 
BGl_declarezd2maxstackzd2zzmsil_outz00(BgL_mez00_17, 
BINT(BgL_arg4068z00_1203)); } 
{ 
long BgL_iz00_1204;
BgL_iz00_1204 = ((long)0); 
BgL_pushz00_1205:
BGl_loadzd2parzd2zzmsil_outz00(BgL_mez00_17, 
(int)(BgL_iz00_1204)); 
{ /* ./SawMsil/compile.scm 105 */
bool_t BgL_test4073z00_1206;
BgL_test4073z00_1206 = 
(BgL_iz00_1204==BgL_nz00_18); 
if(BgL_test4073z00_1206)
{ /* ./SawMsil/compile.scm 105 */BUNSPEC; }  else 
{ /* ./SawMsil/compile.scm 105 */
{ /* ./SawMsil/compile.scm 105 */
long BgL_arg4075z00_1207;
BgL_arg4075z00_1207 = 
(BgL_iz00_1204+((long)1)); 
{ 
long BgL_iz00_2129;
BgL_iz00_2129 = BgL_arg4075z00_1207; 
BgL_iz00_1204 = BgL_iz00_2129; 
goto BgL_pushz00_1205;} } } } } 
BGl_callzd2superzd2constructorz00zzmsil_outz00(BgL_mez00_17, BgL_superz00_19, BgL_lz00_1202); 
BGl_returnz00zzmsil_outz00(BgL_mez00_17); 
return 
BGl_closezd2methodzd2zzmsil_outz00(BgL_mez00_17);} } 
}



/* module-init */
obj_t BGl_modulezd2initzd2zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_20)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 111 */
BGl_openzd2methodzd2classzd2constructorzd2zzmsil_outz00(BgL_mez00_20); 
BGl_declarezd2maxstackzd2zzmsil_outz00(BgL_mez00_20, 
BINT(((long)4))); 
{ /* ./SawMsil/compile.scm 115 */
obj_t BgL_siza7eza7_1209;
BgL_siza7eza7_1209 = 
BGl_getzd2cnstzd2offsetz00zzcnst_allocz00(); 
{ /* ./SawMsil/compile.scm 116 */
bool_t BgL_test4087z00_1210;
{ /* ./SawMsil/compile.scm 116 */
long BgL_auxz00_2137;
BgL_auxz00_2137 = 
(long)CINT(BgL_siza7eza7_1209); 
BgL_test4087z00_1210 = 
(BgL_auxz00_2137>((long)0)); } 
if(BgL_test4087z00_1210)
{ /* ./SawMsil/compile.scm 116 */
BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_20, BgL_siza7eza7_1209); 
BGl_newarrayz00zzmsil_outz00(BgL_mez00_20, 
CNST_TABLE_REF(((long)5))); 
{ /* ./SawMsil/compile.scm 119 */
obj_t BgL_arg4091z00_1211;
BgL_arg4091z00_1211 = 
BGl_getzd2cnstzd2tablez00zzcnst_allocz00(); 
BGl_storezd2globalzd2zzmsil_outz00(BgL_mez00_20, 
(BgL_globalz00_bglt)(BgL_arg4091z00_1211)); } }  else 
{ /* ./SawMsil/compile.scm 116 */BUNSPEC; } } } 
{ 
obj_t BgL_l3924z00_1212;
{ /* ./SawMsil/compile.scm 126 */
obj_t BgL_arg4097z00_1214;
BgL_arg4097z00_1214 = 
BGl_getzd2globalzd2variableszd2tozd2bezd2initializa7edz75zzbackend_cplibz00(BGl_za2moduleza2z00zzmodule_modulez00); 
BgL_l3924z00_1212 = BgL_arg4097z00_1214; 
BgL_forzd2each3925zd2_1213:
{ /* ./SawMsil/compile.scm 125 */
bool_t BgL_test4100z00_1215;
BgL_test4100z00_1215 = 
PAIRP(BgL_l3924z00_1212); 
if(BgL_test4100z00_1215)
{ /* ./SawMsil/compile.scm 125 */
{ /* ./SawMsil/compile.scm 125 */
obj_t BgL_vz00_1216;
BgL_vz00_1216 = 
CAR(BgL_l3924z00_1212); 
{ /* ./SawMsil/compile.scm 125 */
BgL_valuez00_bglt BgL_arg4102z00_1217;
{ /* ./SawMsil/compile.scm 125 */
BgL_variablez00_bglt BgL_obj2221z00_1916;
BgL_obj2221z00_1916 = 
(BgL_variablez00_bglt)(BgL_vz00_1216); 
BgL_arg4102z00_1217 = 
(((BgL_variablez00_bglt)CREF(BgL_obj2221z00_1916))->BgL_valuez00); } 
BGl_modulezd2initzd2cnstz00zzmsil_compilez00(BgL_mez00_20, BgL_vz00_1216, BgL_arg4102z00_1217); } } 
{ /* ./SawMsil/compile.scm 125 */
obj_t BgL_arg4107z00_1218;
BgL_arg4107z00_1218 = 
CDR(BgL_l3924z00_1212); 
{ 
obj_t BgL_l3924z00_2155;
BgL_l3924z00_2155 = BgL_arg4107z00_1218; 
BgL_l3924z00_1212 = BgL_l3924z00_2155; 
goto BgL_forzd2each3925zd2_1213;} } }  else 
{ /* ./SawMsil/compile.scm 125 */((bool_t)1); } } } } 
BGl_returnz00zzmsil_outz00(BgL_mez00_20); 
return 
BGl_closezd2methodzd2zzmsil_outz00(BgL_mez00_20);} 
}



/* module-init-cnst */
obj_t BGl_modulezd2initzd2cnstz00zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_21, obj_t BgL_varz00_22, BgL_valuez00_bglt BgL_valz00_23)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 130 */
{ /* ./SawMsil/compile.scm 132 */
obj_t BgL_casezd2valuezd2_1220;
{ /* ./SawMsil/compile.scm 132 */
BgL_scnstz00_bglt BgL_obj2621z00_1918;
BgL_obj2621z00_1918 = 
(BgL_scnstz00_bglt)(BgL_valz00_23); 
BgL_casezd2valuezd2_1220 = 
(((BgL_scnstz00_bglt)CREF(BgL_obj2621z00_1918))->BgL_classz00); } 
{ /* ./SawMsil/compile.scm 132 */
bool_t BgL_test4113z00_1221;
BgL_test4113z00_1221 = 
BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(BgL_casezd2valuezd2_1220, 
CNST_TABLE_REF(((long)12))); 
if(BgL_test4113z00_1221)
{ /* ./SawMsil/compile.scm 132 */
{ /* ./SawMsil/compile.scm 134 */
obj_t BgL_arg4115z00_1222;
{ /* ./SawMsil/compile.scm 134 */
BgL_scnstz00_bglt BgL_obj2620z00_1919;
BgL_obj2620z00_1919 = 
(BgL_scnstz00_bglt)(BgL_valz00_23); 
BgL_arg4115z00_1222 = 
(((BgL_scnstz00_bglt)CREF(BgL_obj2620z00_1919))->BgL_nodez00); } 
BGl_pushzd2stringzd2zzmsil_outz00(BgL_mez00_21, BgL_arg4115z00_1222); } 
BGl_libcallz00zzmsil_outz00(BgL_mez00_21, 
CNST_TABLE_REF(((long)13)), 
CNST_TABLE_REF(((long)6)), 
CNST_TABLE_REF(((long)14)), 
CNST_TABLE_REF(((long)15))); }  else 
{ /* ./SawMsil/compile.scm 132 */
bool_t BgL_test4119z00_1223;
BgL_test4119z00_1223 = 
BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(BgL_casezd2valuezd2_1220, 
CNST_TABLE_REF(((long)16))); 
if(BgL_test4119z00_1223)
{ /* ./SawMsil/compile.scm 132 */
{ /* ./SawMsil/compile.scm 137 */
obj_t BgL_arg4121z00_1224;obj_t BgL_arg4122z00_1225;
{ /* ./SawMsil/compile.scm 137 */
BgL_scnstz00_bglt BgL_obj2620z00_1920;
BgL_obj2620z00_1920 = 
(BgL_scnstz00_bglt)(BgL_valz00_23); 
BgL_arg4121z00_1224 = 
(((BgL_scnstz00_bglt)CREF(BgL_obj2620z00_1920))->BgL_nodez00); } 
BgL_arg4122z00_1225 = 
CNST_TABLE_REF(((long)17)); 
BGl_pushzd2numzd2zzmsil_outz00(BgL_mez00_21, BgL_arg4121z00_1224, BgL_arg4122z00_1225); } 
BGl_newobjz00zzmsil_outz00(BgL_mez00_21, BGl_string5123z00zzmsil_compilez00, 
CNST_TABLE_REF(((long)18))); }  else 
{ /* ./SawMsil/compile.scm 132 */
bool_t BgL_test4126z00_1226;
BgL_test4126z00_1226 = 
BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(BgL_casezd2valuezd2_1220, 
CNST_TABLE_REF(((long)19))); 
if(BgL_test4126z00_1226)
{ /* ./SawMsil/compile.scm 140 */
obj_t BgL_actualsz00_1227;
{ /* ./SawMsil/compile.scm 140 */
BgL_appz00_bglt BgL_obj1271z00_1922;
{ /* ./SawMsil/compile.scm 140 */
obj_t BgL_auxz00_2183;
{ /* ./SawMsil/compile.scm 140 */
BgL_scnstz00_bglt BgL_obj2620z00_1921;
BgL_obj2620z00_1921 = 
(BgL_scnstz00_bglt)(BgL_valz00_23); 
BgL_auxz00_2183 = 
(((BgL_scnstz00_bglt)CREF(BgL_obj2620z00_1921))->BgL_nodez00); } 
BgL_obj1271z00_1922 = 
(BgL_appz00_bglt)(BgL_auxz00_2183); } 
BgL_actualsz00_1227 = 
(((BgL_appz00_bglt)CREF(BgL_obj1271z00_1922))->BgL_argsz00); } 
{ /* ./SawMsil/compile.scm 140 */
obj_t BgL_arityz00_1228;
{ /* ./SawMsil/compile.scm 141 */
obj_t BgL_arg4136z00_1232;
{ /* ./SawMsil/compile.scm 141 */
obj_t BgL_auxz00_2188;
BgL_auxz00_2188 = 
CDR(BgL_actualsz00_1227); 
BgL_arg4136z00_1232 = 
CAR(BgL_auxz00_2188); } 
BgL_arityz00_1228 = 
BGl_getzd2nodezd2atomzd2valuezd2zzcnst_nodez00(
(BgL_nodez00_bglt)(BgL_arg4136z00_1232)); } 
{ /* ./SawMsil/compile.scm 141 */
int BgL_indexz00_1229;
{ /* ./SawMsil/compile.scm 142 */
BgL_indexedz00_bglt BgL_obj3868z00_1927;
BgL_obj3868z00_1927 = 
(BgL_indexedz00_bglt)(BgL_varz00_22); 
{ 
obj_t BgL_auxz00_2194;
{ /* ./SawMsil/compile.scm 142 */
BgL_objectz00_bglt BgL_auxz00_2195;
BgL_auxz00_2195 = 
(BgL_objectz00_bglt)(BgL_obj3868z00_1927); 
BgL_auxz00_2194 = 
BGL_OBJECT_WIDENING(BgL_auxz00_2195); } 
BgL_indexz00_1229 = 
(((BgL_indexedz00_bglt)CREF(BgL_auxz00_2194))->BgL_indexz00); } } 
{ /* ./SawMsil/compile.scm 142 */

BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_21, 
BINT(BgL_indexz00_1229)); 
BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_21, BgL_arityz00_1228); 
{ /* ./SawMsil/compile.scm 145 */
obj_t BgL_arg4130z00_1230;obj_t BgL_arg4131z00_1231;
{ /* ./SawMsil/compile.scm 145 */
BgL_backendz00_bglt BgL_obj3057z00_1928;
BgL_obj3057z00_1928 = 
(BgL_backendz00_bglt)(BgL_mez00_21); 
BgL_arg4130z00_1230 = 
(((BgL_backendz00_bglt)CREF(BgL_obj3057z00_1928))->BgL_namez00); } 
BgL_arg4131z00_1231 = 
CNST_TABLE_REF(((long)20)); 
BGl_newobjz00zzmsil_outz00(BgL_mez00_21, BgL_arg4130z00_1230, BgL_arg4131z00_1231); } } } } }  else 
{ /* ./SawMsil/compile.scm 132 */
bool_t BgL_test4143z00_1234;
BgL_test4143z00_1234 = 
BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(BgL_casezd2valuezd2_1220, 
CNST_TABLE_REF(((long)21))); 
if(BgL_test4143z00_1234)
{ /* ./SawMsil/compile.scm 147 */
obj_t BgL_actualsz00_1235;
{ /* ./SawMsil/compile.scm 147 */
BgL_appz00_bglt BgL_obj1271z00_1930;
{ /* ./SawMsil/compile.scm 147 */
obj_t BgL_auxz00_2209;
{ /* ./SawMsil/compile.scm 147 */
BgL_scnstz00_bglt BgL_obj2620z00_1929;
BgL_obj2620z00_1929 = 
(BgL_scnstz00_bglt)(BgL_valz00_23); 
BgL_auxz00_2209 = 
(((BgL_scnstz00_bglt)CREF(BgL_obj2620z00_1929))->BgL_nodez00); } 
BgL_obj1271z00_1930 = 
(BgL_appz00_bglt)(BgL_auxz00_2209); } 
BgL_actualsz00_1235 = 
(((BgL_appz00_bglt)CREF(BgL_obj1271z00_1930))->BgL_argsz00); } 
{ /* ./SawMsil/compile.scm 147 */
obj_t BgL_arityz00_1236;
{ /* ./SawMsil/compile.scm 148 */
obj_t BgL_arg4154z00_1240;
{ /* ./SawMsil/compile.scm 148 */
obj_t BgL_auxz00_2214;
BgL_auxz00_2214 = 
CDR(BgL_actualsz00_1235); 
BgL_arg4154z00_1240 = 
CAR(BgL_auxz00_2214); } 
BgL_arityz00_1236 = 
BGl_getzd2nodezd2atomzd2valuezd2zzcnst_nodez00(
(BgL_nodez00_bglt)(BgL_arg4154z00_1240)); } 
{ /* ./SawMsil/compile.scm 148 */
int BgL_indexz00_1237;
{ /* ./SawMsil/compile.scm 149 */
BgL_indexedz00_bglt BgL_obj3868z00_1935;
BgL_obj3868z00_1935 = 
(BgL_indexedz00_bglt)(BgL_varz00_22); 
{ 
obj_t BgL_auxz00_2220;
{ /* ./SawMsil/compile.scm 149 */
BgL_objectz00_bglt BgL_auxz00_2221;
BgL_auxz00_2221 = 
(BgL_objectz00_bglt)(BgL_obj3868z00_1935); 
BgL_auxz00_2220 = 
BGL_OBJECT_WIDENING(BgL_auxz00_2221); } 
BgL_indexz00_1237 = 
(((BgL_indexedz00_bglt)CREF(BgL_auxz00_2220))->BgL_indexz00); } } 
{ /* ./SawMsil/compile.scm 149 */

BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_21, 
BINT(BgL_indexz00_1237)); 
BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_21, BgL_arityz00_1236); 
BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_21, 
BINT(((long)3))); 
{ /* ./SawMsil/compile.scm 153 */
obj_t BgL_arg4148z00_1238;obj_t BgL_arg4149z00_1239;
{ /* ./SawMsil/compile.scm 153 */
BgL_backendz00_bglt BgL_obj3057z00_1936;
BgL_obj3057z00_1936 = 
(BgL_backendz00_bglt)(BgL_mez00_21); 
BgL_arg4148z00_1238 = 
(((BgL_backendz00_bglt)CREF(BgL_obj3057z00_1936))->BgL_namez00); } 
BgL_arg4149z00_1239 = 
CNST_TABLE_REF(((long)22)); 
BGl_newobjz00zzmsil_outz00(BgL_mez00_21, BgL_arg4148z00_1238, BgL_arg4149z00_1239); } } } } }  else 
{ /* ./SawMsil/compile.scm 132 */
bool_t BgL_test4161z00_1242;
BgL_test4161z00_1242 = 
BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(BgL_casezd2valuezd2_1220, 
CNST_TABLE_REF(((long)23))); 
if(BgL_test4161z00_1242)
{ /* ./SawMsil/compile.scm 155 */
obj_t BgL_vecz00_1243;
{ /* ./SawMsil/compile.scm 155 */
int BgL_auxz00_2240;obj_t BgL_auxz00_2237;
BgL_auxz00_2240 = 
(int)(((long)1)); 
{ /* ./SawMsil/compile.scm 155 */
BgL_scnstz00_bglt BgL_obj2620z00_1937;
BgL_obj2620z00_1937 = 
(BgL_scnstz00_bglt)(BgL_valz00_23); 
BgL_auxz00_2237 = 
(((BgL_scnstz00_bglt)CREF(BgL_obj2620z00_1937))->BgL_nodez00); } 
BgL_vecz00_1243 = 
STRUCT_REF(BgL_auxz00_2237, BgL_auxz00_2240); } 
{ /* ./SawMsil/compile.scm 155 */
BgL_typez00_bglt BgL_typez00_1244;
{ /* ./SawMsil/compile.scm 156 */
BgL_tvecz00_bglt BgL_obj3010z00_1945;
{ /* ./SawMsil/compile.scm 156 */
obj_t BgL_auxz00_2243;
{ /* ./SawMsil/compile.scm 156 */
int BgL_auxz00_2247;obj_t BgL_auxz00_2244;
BgL_auxz00_2247 = 
(int)(((long)0)); 
{ /* ./SawMsil/compile.scm 156 */
BgL_scnstz00_bglt BgL_obj2620z00_1941;
BgL_obj2620z00_1941 = 
(BgL_scnstz00_bglt)(BgL_valz00_23); 
BgL_auxz00_2244 = 
(((BgL_scnstz00_bglt)CREF(BgL_obj2620z00_1941))->BgL_nodez00); } 
BgL_auxz00_2243 = 
STRUCT_REF(BgL_auxz00_2244, BgL_auxz00_2247); } 
BgL_obj3010z00_1945 = 
(BgL_tvecz00_bglt)(BgL_auxz00_2243); } 
{ 
obj_t BgL_auxz00_2251;
{ /* ./SawMsil/compile.scm 156 */
BgL_objectz00_bglt BgL_auxz00_2252;
BgL_auxz00_2252 = 
(BgL_objectz00_bglt)(BgL_obj3010z00_1945); 
BgL_auxz00_2251 = 
BGL_OBJECT_WIDENING(BgL_auxz00_2252); } 
BgL_typez00_1244 = 
(((BgL_tvecz00_bglt)CREF(BgL_auxz00_2251))->BgL_itemzd2typezd2); } } 
{ /* ./SawMsil/compile.scm 156 */
obj_t BgL_idz00_1245;
BgL_idz00_1245 = 
(((BgL_typez00_bglt)CREF(BgL_typez00_1244))->BgL_idz00); 
{ /* ./SawMsil/compile.scm 157 */
int BgL_nz00_1246;
BgL_nz00_1246 = 
VECTOR_LENGTH(BgL_vecz00_1243); 
{ /* ./SawMsil/compile.scm 158 */

BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_21, 
BINT(BgL_nz00_1246)); 
BGl_newarrayz00zzmsil_outz00(BgL_mez00_21, 
(obj_t)(BgL_typez00_1244)); 
{ 
long BgL_iz00_1247;
{ /* ./SawMsil/compile.scm 161 */
bool_t BgL_auxz00_2262;
BgL_iz00_1247 = ((long)0); 
BgL_initz00_1248:
{ /* ./SawMsil/compile.scm 162 */
bool_t BgL_test4165z00_1249;
{ /* ./SawMsil/compile.scm 162 */
long BgL_auxz00_2263;
BgL_auxz00_2263 = 
(long)(BgL_nz00_1246); 
BgL_test4165z00_1249 = 
(BgL_iz00_1247==BgL_auxz00_2263); } 
if(BgL_test4165z00_1249)
{ /* ./SawMsil/compile.scm 162 */
BgL_auxz00_2262 = ((bool_t)0)
; }  else 
{ /* ./SawMsil/compile.scm 162 */
BGl_dupz00zzmsil_outz00(BgL_mez00_21); 
BGl_pushzd2intzd2zzmsil_outz00(BgL_mez00_21, 
BINT(BgL_iz00_1247)); 
{ /* ./SawMsil/compile.scm 166 */
obj_t BgL_arg4169z00_1250;
{ /* ./SawMsil/compile.scm 166 */
int BgL_kz00_1951;
BgL_kz00_1951 = 
(int)(BgL_iz00_1247); 
BgL_arg4169z00_1250 = 
VECTOR_REF(BgL_vecz00_1243,BgL_kz00_1951); } 
BGl_pushzd2numzd2zzmsil_outz00(BgL_mez00_21, BgL_arg4169z00_1250, BgL_idz00_1245); } 
BGl_storezd2vectorzd2zzmsil_outz00(BgL_mez00_21, 
(obj_t)(BgL_typez00_1244)); 
{ /* ./SawMsil/compile.scm 168 */
long BgL_arg4174z00_1251;
BgL_arg4174z00_1251 = 
(BgL_iz00_1247+((long)1)); 
{ 
long BgL_iz00_2276;
BgL_iz00_2276 = BgL_arg4174z00_1251; 
BgL_iz00_1247 = BgL_iz00_2276; 
goto BgL_initz00_1248;} } } } 
BBOOL(BgL_auxz00_2262); } } } } } } }  else 
{ /* ./SawMsil/compile.scm 132 */
BGl_internalzd2errorzd2zztools_errorz00(BGl_string5124z00zzmsil_compilez00, BGl_string5125z00zzmsil_compilez00, BgL_casezd2valuezd2_1220); } } } } } } } 
return 
BGl_storezd2globalzd2zzmsil_outz00(BgL_mez00_21, 
(BgL_globalz00_bglt)(BgL_varz00_22));} 
}



/* module-functions */
bool_t BGl_modulezd2functionszd2zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_24)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 176 */
{ 
obj_t BgL_l3928z00_1258;
{ /* ./SawMsil/compile.scm 177 */
obj_t BgL_arg4205z00_1260;
{ /* ./SawMsil/compile.scm 177 */
BgL_backendz00_bglt BgL_obj3073z00_1955;
BgL_obj3073z00_1955 = 
(BgL_backendz00_bglt)(BgL_mez00_24); 
BgL_arg4205z00_1260 = 
(((BgL_backendz00_bglt)CREF(BgL_obj3073z00_1955))->BgL_functionsz00); } 
BgL_l3928z00_1258 = BgL_arg4205z00_1260; 
BgL_forzd2each3929zd2_1259:
{ /* ./SawMsil/compile.scm 177 */
bool_t BgL_test4208z00_1261;
BgL_test4208z00_1261 = 
PAIRP(BgL_l3928z00_1258); 
if(BgL_test4208z00_1261)
{ /* ./SawMsil/compile.scm 177 */
{ /* ./SawMsil/compile.scm 177 */
obj_t BgL_vz00_1262;
BgL_vz00_1262 = 
CAR(BgL_l3928z00_1258); 
BGl_modulezd2functionzd2zzmsil_compilez00(BgL_mez00_24, BgL_vz00_1262); } 
{ /* ./SawMsil/compile.scm 177 */
obj_t BgL_arg4212z00_1263;
BgL_arg4212z00_1263 = 
CDR(BgL_l3928z00_1258); 
{ 
obj_t BgL_l3928z00_2288;
BgL_l3928z00_2288 = BgL_arg4212z00_1263; 
BgL_l3928z00_1258 = BgL_l3928z00_2288; 
goto BgL_forzd2each3929zd2_1259;} } }  else 
{ /* ./SawMsil/compile.scm 177 */
return ((bool_t)1);} } } } } 
}



/* module-function */
obj_t BGl_modulezd2functionzd2zzmsil_compilez00(BgL_dotnetz00_bglt BgL_mez00_25, obj_t BgL_vz00_26)
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 179 */
BGl_openzd2globalzd2methodz00zzmsil_outz00(BgL_mez00_25, 
(BgL_globalz00_bglt)(BgL_vz00_26)); 
{ /* ./SawMsil/compile.scm 181 */
obj_t BgL_codez00_1264;obj_t BgL_argsz00_1265;
BgL_codez00_1264 = 
BGl_globalzd2ze3blocksz31zzsaw_woodcutterz00(
(BgL_backendz00_bglt)(BgL_mez00_25), 
(BgL_globalz00_bglt)(BgL_vz00_26)); 
{ /* ./SawMsil/compile.scm 181 */
BgL_sfunz00_bglt BgL_obj2488z00_1960;
{ /* ./SawMsil/compile.scm 181 */
BgL_valuez00_bglt BgL_auxz00_2294;
{ /* ./SawMsil/compile.scm 181 */
BgL_variablez00_bglt BgL_obj2221z00_1959;
BgL_obj2221z00_1959 = 
(BgL_variablez00_bglt)(BgL_vz00_26); 
BgL_auxz00_2294 = 
(((BgL_variablez00_bglt)CREF(BgL_obj2221z00_1959))->BgL_valuez00); } 
BgL_obj2488z00_1960 = 
(BgL_sfunz00_bglt)(BgL_auxz00_2294); } 
BgL_argsz00_1265 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj2488z00_1960))->BgL_argsz00); } 
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_paramsz00_1266;
{ /* ./SawMsil/compile.scm 182 */
bool_t BgL_test4223z00_1269;
BgL_test4223z00_1269 = 
NULLP(BgL_argsz00_1265); 
if(BgL_test4223z00_1269)
{ /* ./SawMsil/compile.scm 182 */
BgL_paramsz00_1266 = BNIL; }  else 
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_head3932z00_1270;
{ /* ./SawMsil/compile.scm 182 */
BgL_rtl_regz00_bglt BgL_arg4244z00_1281;
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_arg4248z00_1283;
BgL_arg4248z00_1283 = 
CAR(BgL_argsz00_1265); 
BgL_arg4244z00_1281 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_arg4248z00_1283)); } 
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_obj1z00_1963;
BgL_obj1z00_1963 = 
(obj_t)(BgL_arg4244z00_1281); 
BgL_head3932z00_1270 = 
MAKE_PAIR(BgL_obj1z00_1963, BNIL); } } 
{ 
obj_t BgL_l3930z00_1271;obj_t BgL_tail3933z00_1272;
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_arg4225z00_1274;
BgL_arg4225z00_1274 = 
CDR(BgL_argsz00_1265); 
BgL_l3930z00_1271 = BgL_arg4225z00_1274; 
BgL_tail3933z00_1272 = BgL_head3932z00_1270; 
BgL_map3931z00_1273:
{ /* ./SawMsil/compile.scm 182 */
bool_t BgL_test4228z00_1275;
BgL_test4228z00_1275 = 
NULLP(BgL_l3930z00_1271); 
if(BgL_test4228z00_1275)
{ /* ./SawMsil/compile.scm 182 */
BgL_paramsz00_1266 = BgL_head3932z00_1270; }  else 
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_newtail3934z00_1276;
{ /* ./SawMsil/compile.scm 182 */
BgL_rtl_regz00_bglt BgL_arg4235z00_1278;
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_arg4239z00_1280;
BgL_arg4239z00_1280 = 
CAR(BgL_l3930z00_1271); 
BgL_arg4235z00_1278 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_arg4239z00_1280)); } 
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_obj1z00_1968;
BgL_obj1z00_1968 = 
(obj_t)(BgL_arg4235z00_1278); 
BgL_newtail3934z00_1276 = 
MAKE_PAIR(BgL_obj1z00_1968, BNIL); } } 
SET_CDR(BgL_tail3933z00_1272, BgL_newtail3934z00_1276); 
{ /* ./SawMsil/compile.scm 182 */
obj_t BgL_arg4231z00_1277;
BgL_arg4231z00_1277 = 
CDR(BgL_l3930z00_1271); 
{ 
obj_t BgL_tail3933z00_2317;obj_t BgL_l3930z00_2316;
BgL_l3930z00_2316 = BgL_arg4231z00_1277; 
BgL_tail3933z00_2317 = BgL_newtail3934z00_1276; 
BgL_tail3933z00_1272 = BgL_tail3933z00_2317; 
BgL_l3930z00_1271 = BgL_l3930z00_2316; 
goto BgL_map3931z00_1273;} } } } } } } } 
BGl_buildzd2treezd2zzsaw_exprz00(
(BgL_backendz00_bglt)(BgL_mez00_25), BgL_paramsz00_1266, BgL_codez00_1264); 
{ /* ./SawMsil/compile.scm 184 */
int BgL_arg4219z00_1267;
BgL_arg4219z00_1267 = 
BGl_maxstackz00zzmsil_maxstackz00(BgL_codez00_1264); 
BGl_declarezd2maxstackzd2zzmsil_outz00(BgL_mez00_25, 
BINT(BgL_arg4219z00_1267)); } 
BGl_modulezd2codezd2zzmsil_codez00(BgL_mez00_25, BgL_paramsz00_1266, BgL_codez00_1264); } } 
return 
BGl_closezd2methodzd2zzmsil_outz00(BgL_mez00_25);} 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzmsil_compilez00()
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 1 */
return BUNSPEC;} 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzmsil_compilez00()
{ AN_OBJECT;
{ /* ./SawMsil/compile.scm 1 */
BGl_modulezd2initializa7ationz75zzmodule_modulez00(((long)8699), "msil_compile"); 
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "msil_compile"); 
BGl_modulezd2initializa7ationz75zztype_cachez00(((long)25848), "msil_compile"); 
BGl_modulezd2initializa7ationz75zztype_envz00(((long)25186), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzast_envz00(((long)62031), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzobject_classz00(((long)30791), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzobject_slotsz00(((long)44183), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzcnst_nodez00(((long)44711), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzcnst_allocz00(((long)26410), "msil_compile"); 
BGl_modulezd2initializa7ationz75zztvector_tvectorz00(((long)32501), "msil_compile"); 
BGl_modulezd2initializa7ationz75zztools_errorz00(((long)25566), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzread_jvmz00(((long)16338), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzbackend_backendz00(((long)3428), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzbackend_dotnetz00(((long)46127), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzbackend_libz00(((long)20030), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzbackend_cplibz00(((long)26792), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzsaw_extratypez00(((long)61397), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzsaw_defsz00(((long)12736), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzsaw_node2rtlz00(((long)27814), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzsaw_woodcutterz00(((long)44417), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzsaw_exprz00(((long)3970), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzmsil_namesz00(((long)44644), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzmsil_outz00(((long)57040), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzmsil_funcallz00(((long)60450), "msil_compile"); 
BGl_modulezd2initializa7ationz75zzmsil_maxstackz00(((long)12113), "msil_compile"); 
return 
BGl_modulezd2initializa7ationz75zzmsil_codez00(((long)22951), "msil_compile");} 
}

