/*===========================================================================*/
/*   (DotNet/compress.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 DotNet/compress.scm)*/
/* GC selection */
#define THE_GC BOEHM_GC

#include <bigloo.h>


/* Object type definitions */
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_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_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_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_envz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_declarationsz00;
   obj_t BgL_declaredtypez00;
   obj_t BgL_declaredclassz00;
   obj_t BgL_declaredmodulez00;
   obj_t BgL_currentzd2modulezd2;
   obj_t BgL_declaredfieldsz00;
   obj_t BgL_declaredglobalz00;
   obj_t BgL_libdeclaredz00;
   obj_t BgL_proceduresz00;
   obj_t BgL_clinitzd2codezd2;
   obj_t BgL_currentzd2methodzd2;
   obj_t BgL_vcountz00;
   obj_t BgL_localsz00;
   obj_t BgL_freelocalsz00;
   obj_t BgL_maplocalsz00;
   obj_t BgL_stackz00;
   obj_t BgL_codez00;
} *BgL_envz00_bglt;


extern obj_t BGl_vrefz00zzast_nodez00;
static obj_t BGl_methodzd2initzd2zzdotnet_compressz00();
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl_compilezd2compresszd2letzd2var3119zd2zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2sequence3123z00zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl__compilezd2compresszd2default3112z00zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_letzd2funzd2zzast_nodez00;
static obj_t BGl_compilezd2compresszd2appzd2ly3135zd2zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2conditional3125z00zzdotnet_compressz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
extern obj_t BGl_za2verboseza2z00zzengine_paramz00;
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_addzd2genericz12zc0zz__objectz00(obj_t, obj_t);
static obj_t BGl_getz00zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2boxzd2setz123153zc0zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2setq3121z00zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_letzd2varzd2zzast_nodez00;
static obj_t BGl_za2safezd2functionsza2zd2zzdotnet_compressz00 = BUNSPEC;
static BgL_nodez00_bglt BGl_compilezd2compresszd2default3112z00zzdotnet_compressz00(BgL_nodez00_bglt);
extern obj_t BGl_globalz00zzast_varz00;
BGL_EXPORTED_DECL BgL_nodez00_bglt BGl_compilezd2compresszd2zzdotnet_compressz00(BgL_nodez00_bglt);
static obj_t BGl_compilezd2compresszd2app3132z00zzdotnet_compressz00(obj_t, obj_t);
static bool_t BGl_compressza2za2zzdotnet_compressz00(obj_t);
BGL_IMPORT obj_t BGl_assqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_hashtablezd2putz12zc0zz__hashz00(obj_t, obj_t, obj_t);
extern obj_t BGl_castz00zzast_nodez00;
extern obj_t BGl_boxzd2refzd2zzast_nodez00;
extern obj_t BGl_varz00zzast_nodez00;
static obj_t BGl_cnstzd2initzd2zzdotnet_compressz00();
extern obj_t BGl_atomz00zzast_nodez00;
extern obj_t BGl_failz00zzast_nodez00;
extern obj_t BGl_funcallz00zzast_nodez00;
static obj_t BGl_importedzd2moduleszd2initz00zzdotnet_compressz00();
BGL_IMPORT obj_t BGl_makezd2hashtablezd2zz__hashz00(obj_t);
extern obj_t BGl_makezd2boxzd2zzast_nodez00;
static obj_t BGl_compilezd2compresszd2select3127z00zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_getfieldz00zzast_nodez00;
static obj_t BGl_compilezd2compresszd2cast3141z00zzdotnet_compressz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl__varzf3zf3zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_vmemqzf3zf3zzdotnet_vmemqz00(obj_t, BgL_nodez00_bglt);
static obj_t BGl_compilezd2compresszd2boxzd2ref3151zd2zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_selectz00zzast_nodez00;
static obj_t BGl_toplevelzd2initzd2zzdotnet_compressz00();
extern obj_t BGl_appzd2lyzd2zzast_nodez00;
static obj_t BGl__compilezd2compress4457zd2zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_boxzd2setz12zc0zzast_nodez00;
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzdotnet_compressz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_classz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzdotnet_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzdotnet_vmemqz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzeffect_effectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__errorz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__hashz00(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_pairs_and_lists_6_3z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5z00(long, char *);
extern bool_t BGl_sidezd2effectzf3z21zzeffect_effectz00(BgL_nodez00_bglt);
BGL_IMPORT long bgl_list_length(obj_t);
BGL_IMPORT obj_t BGl_hashtablezd2getzd2zz__hashz00(obj_t, obj_t);
BGL_IMPORT bool_t BGl_2ze3zd3z30zz__r4_numbers_6_5z00(obj_t, obj_t);
extern obj_t BGl_setzd2exzd2itz00zzast_nodez00;
extern obj_t BGl_shapez00zztools_shapez00(obj_t);
static obj_t BGl_filterz00zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2makezd2box3149zd2zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_jumpzd2exzd2itz00zzast_nodez00;
static bool_t BGl_simpleza2zf3z51zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2fail3147z00zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_externz00zzast_nodez00;
static obj_t BGl_compilezd2compresszd2var3117z00zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_conditionalz00zzast_nodez00;
extern obj_t BGl_sequencez00zzast_nodez00;
static obj_t BGl_simplezf3zf3zzdotnet_compressz00(obj_t);
extern obj_t BGl_appz00zzast_nodez00;
BGL_IMPORT obj_t BGl_warningz00zz__errorz00(obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzdotnet_compressz00 = BUNSPEC;
static obj_t BGl_libraryzd2moduleszd2initz00zzdotnet_compressz00();
static obj_t BGl_compilezd2compresszd2letzd2fun3130zd2zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2extern3139z00zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2jumpzd2exzd2it3145z00zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2atom3115z00zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2funcall3137z00zzdotnet_compressz00(obj_t, obj_t);
static obj_t BGl_compilezd2compresszd2setzd2exzd2it3143z00zzdotnet_compressz00(obj_t, obj_t);
extern obj_t BGl_setqz00zzast_nodez00;
static obj_t __cnst[ 3 ] ;


DEFINE_STATIC_PROCEDURE( BGl_compilezd2compresszd2default3112zd2envzd2zzdotnet_compressz00, BgL_bgl__compileza7d2compressza7d2default3112za700za7za7dotnet_compressza7004980z00, BGl__compilezd2compresszd2default3112z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STRING( BGl_string4947z00zzdotnet_compressz00, BgL_bgl_string4947za700za7za7dotnet_compressza7004981z00, "compile-compress-default3112 let read ", 38 );
DEFINE_STRING( BGl_string4946z00zzdotnet_compressz00, BgL_bgl_string4946za700za7za7dotnet_compressza7004982z00, "No method for this object", 25 );
DEFINE_STRING( BGl_string4945z00zzdotnet_compressz00, BgL_bgl_string4945za700za7za7dotnet_compressza7004983z00, "Jvm", 3 );
DEFINE_STRING( BGl_string4944z00zzdotnet_compressz00, BgL_bgl_string4944za700za7za7dotnet_compressza7004984z00, "Re-phrase this expression (beta-reduce) for better performance -- ", 66 );
DEFINE_STRING( BGl_string4924z00zzdotnet_compressz00, BgL_bgl_string4924za700za7za7dotnet_compressza7004985z00, "LONG_TO_INT", 11 );
DEFINE_STATIC_PROCEDURE( BGl_varzf3zd2envz21zzdotnet_compressz00, BgL_bgl__varza7f3za7f3za7za7dotnet_compressza7004986za7, BGl__varzf3zf3zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4925z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2atom3115za700za7za7dotnet_compressza7004987z00, BGl_compilezd2compresszd2atom3115z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4926z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2var3117za700za7za7dotnet_compressza7004988z00, BGl_compilezd2compresszd2var3117z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4927z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2letza7d2var3119za7d2za7za7dotnet_compressza7004989za7, BGl_compilezd2compresszd2letzd2var3119zd2zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4928z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2setq3121za700za7za7dotnet_compressza7004990z00, BGl_compilezd2compresszd2setq3121z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4930z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2conditional3125za700za7za7dotnet_compressza7004991z00, BGl_compilezd2compresszd2conditional3125z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4929z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2sequence3123za700za7za7dotnet_compressza7004992z00, BGl_compilezd2compresszd2sequence3123z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4931z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2select3127za700za7za7dotnet_compressza7004993z00, BGl_compilezd2compresszd2select3127z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4932z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2letza7d2fun3130za7d2za7za7dotnet_compressza7004994za7, BGl_compilezd2compresszd2letzd2fun3130zd2zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4933z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2app3132za700za7za7dotnet_compressza7004995z00, BGl_compilezd2compresszd2app3132z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4934z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2appza7d2ly3135za7d2za7za7dotnet_compressza7004996za7, BGl_compilezd2compresszd2appzd2ly3135zd2zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4935z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2funcall3137za700za7za7dotnet_compressza7004997z00, BGl_compilezd2compresszd2funcall3137z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4936z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2extern3139za700za7za7dotnet_compressza7004998z00, BGl_compilezd2compresszd2extern3139z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4937z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2cast3141za700za7za7dotnet_compressza7004999z00, BGl_compilezd2compresszd2cast3141z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4938z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2setza7d2exza7d2it3143za700za7za7dotnet_compressza7005000z00, BGl_compilezd2compresszd2setzd2exzd2it3143z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4940z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2fail3147za700za7za7dotnet_compressza7005001z00, BGl_compilezd2compresszd2fail3147z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4939z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2jumpza7d2exza7d2it3145za700za7za7dotnet_compressza7005002z00, BGl_compilezd2compresszd2jumpzd2exzd2it3145z00zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4941z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2makeza7d2box3149za7d2za7za7dotnet_compressza7005003za7, BGl_compilezd2compresszd2makezd2box3149zd2zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4942z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2boxza7d2ref3151za7d2za7za7dotnet_compressza7005004za7, BGl_compilezd2compresszd2boxzd2ref3151zd2zzdotnet_compressz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4943z00zzdotnet_compressz00, BgL_bgl_compileza7d2compressza7d2boxza7d2setza7123153za7c0za7za7dotnet_compressza7005005z00, BGl_compilezd2compresszd2boxzd2setz123153zc0zzdotnet_compressz00, 0L, 1 );
DEFINE_EXPORT_GENERIC( BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_bgl__compileza7d2compress4457za7d2za7za7dotnet_compressza7005006za7, BGl__compilezd2compress4457zd2zzdotnet_compressz00, 0L, 1 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzdotnet_compressz00(long BgL_checksumz00_2722, char * BgL_fromz00_2723)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzdotnet_compressz00))
{ 
BGl_requirezd2initializa7ationz75zzdotnet_compressz00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzdotnet_compressz00(); 
BGl_cnstzd2initzd2zzdotnet_compressz00(); 
BGl_importedzd2moduleszd2initz00zzdotnet_compressz00(); 
BGl_methodzd2initzd2zzdotnet_compressz00(); 
BGl_toplevelzd2initzd2zzdotnet_compressz00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzdotnet_compressz00()
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 1 */
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zz__hashz00(((long)0), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5z00(((long)0), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zz__errorz00(((long)0), "dotnet_compress"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzdotnet_compressz00()
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 1 */
{ /* ./DotNet/compress.scm 1 */
obj_t BgL_cportz00_2708;
BgL_cportz00_2708 = 
open_input_string(BGl_string4947z00zzdotnet_compressz00); 
{ 
long BgL_iz00_2709;
BgL_iz00_2709 = ((long)2); 
BgL_loopz00_2710:
{ /* ./DotNet/compress.scm 1 */
bool_t BgL_test4949z00_2711;
BgL_test4949z00_2711 = 
(BgL_iz00_2709==((long)-1)); 
if(BgL_test4949z00_2711)
{ /* ./DotNet/compress.scm 1 */
return BUNSPEC;}  else 
{ /* ./DotNet/compress.scm 1 */
{ /* ./DotNet/compress.scm 1 */
obj_t BgL_arg4951z00_2712;
{ /* ./DotNet/compress.scm 1 */
obj_t BgL_list4954z00_2713;
BgL_list4954z00_2713 = 
MAKE_PAIR(BgL_cportz00_2708, BNIL); 
BgL_arg4951z00_2712 = 
BGl_readz00zz__readerz00(BgL_list4954z00_2713); } 
{ /* ./DotNet/compress.scm 1 */
int BgL_auxz00_2743;
BgL_auxz00_2743 = 
(int)(BgL_iz00_2709); 
CNST_TABLE_SET(BgL_auxz00_2743, BgL_arg4951z00_2712); } } 
{ /* ./DotNet/compress.scm 1 */
int BgL_auxz00_2714;
{ /* ./DotNet/compress.scm 1 */
long BgL_auxz00_2746;
BgL_auxz00_2746 = 
(BgL_iz00_2709-((long)1)); 
BgL_auxz00_2714 = 
(int)(BgL_auxz00_2746); } 
{ 
long BgL_iz00_2749;
BgL_iz00_2749 = 
(long)(BgL_auxz00_2714); 
BgL_iz00_2709 = BgL_iz00_2749; 
goto BgL_loopz00_2710;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzdotnet_compressz00()
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 1 */
BGl_za2safezd2functionsza2zd2zzdotnet_compressz00 = 
BGl_makezd2hashtablezd2zz__hashz00(BNIL); 
BGl_hashtablezd2putz12zc0zz__hashz00(BGl_za2safezd2functionsza2zd2zzdotnet_compressz00, BGl_string4924z00zzdotnet_compressz00, BTRUE); 
return BUNSPEC;} 
}



/* compress* */
bool_t BGl_compressza2za2zzdotnet_compressz00(obj_t BgL_lz00_3)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 13 */
BGl_compressza2za2zzdotnet_compressz00:
{ /* ./DotNet/compress.scm 14 */
bool_t BgL_test3157z00_801;
BgL_test3157z00_801 = 
NULLP(BgL_lz00_3); 
if(BgL_test3157z00_801)
{ /* ./DotNet/compress.scm 14 */
return ((bool_t)0);}  else 
{ /* ./DotNet/compress.scm 14 */
{ /* ./DotNet/compress.scm 15 */
BgL_nodez00_bglt BgL_arg3159z00_802;
{ /* ./DotNet/compress.scm 15 */
obj_t BgL_arg3162z00_803;
BgL_arg3162z00_803 = 
CAR(BgL_lz00_3); 
{ /* ./DotNet/compress.scm 15 */
BgL_nodez00_bglt BgL_res4383z00_1679;
{ /* ./DotNet/compress.scm 15 */
BgL_nodez00_bglt BgL_ez00_1653;
BgL_ez00_1653 = 
(BgL_nodez00_bglt)(BgL_arg3162z00_803); 
{ /* ./DotNet/compress.scm 15 */
obj_t BgL_method3113z00_1654;
{ /* ./DotNet/compress.scm 15 */
BgL_objectz00_bglt BgL_objz00_1655;
BgL_objz00_1655 = 
(BgL_objectz00_bglt)(BgL_ez00_1653); 
{ /* ./DotNet/compress.scm 15 */
long BgL_objzd2classzd2numz00_1656;
BgL_objzd2classzd2numz00_1656 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1655); 
{ /* ./DotNet/compress.scm 15 */
obj_t BgL_arg2017z00_1657;
{ /* ./DotNet/compress.scm 15 */
int BgL_auxz00_2759;
BgL_auxz00_2759 = 
(int)(((long)1)); 
BgL_arg2017z00_1657 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2759); } 
{ /* ./DotNet/compress.scm 15 */
int BgL_offsetz00_1660;
BgL_offsetz00_1660 = 
(int)(BgL_objzd2classzd2numz00_1656); 
{ /* ./DotNet/compress.scm 15 */
long BgL_offsetz00_1661;
{ /* ./DotNet/compress.scm 15 */
long BgL_auxz00_2763;
BgL_auxz00_2763 = 
(long)(BgL_offsetz00_1660); 
BgL_offsetz00_1661 = 
(BgL_auxz00_2763-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 15 */
long BgL_modz00_1662;
{ /* ./DotNet/compress.scm 15 */
int BgL_arg2028z00_1663;
BgL_arg2028z00_1663 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 15 */
long BgL_n2z00_1671;
BgL_n2z00_1671 = 
(long)(BgL_arg2028z00_1663); 
BgL_modz00_1662 = 
(BgL_offsetz00_1661/BgL_n2z00_1671); } } 
{ /* ./DotNet/compress.scm 15 */
long BgL_restz00_1664;
{ /* ./DotNet/compress.scm 15 */
int BgL_arg2024z00_1665;
BgL_arg2024z00_1665 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 15 */
long BgL_n2z00_1674;
BgL_n2z00_1674 = 
(long)(BgL_arg2024z00_1665); 
BgL_restz00_1664 = 
(BgL_offsetz00_1661%BgL_n2z00_1674); } } 
{ /* ./DotNet/compress.scm 15 */

{ /* ./DotNet/compress.scm 15 */
obj_t BgL_bucketz00_1666;
{ /* ./DotNet/compress.scm 15 */
int BgL_kz00_1676;
BgL_kz00_1676 = 
(int)(BgL_modz00_1662); 
BgL_bucketz00_1666 = 
VECTOR_REF(BgL_arg2017z00_1657,BgL_kz00_1676); } 
{ /* ./DotNet/compress.scm 15 */
int BgL_kz00_1678;
BgL_kz00_1678 = 
(int)(BgL_restz00_1664); 
BgL_method3113z00_1654 = 
VECTOR_REF(BgL_bucketz00_1666,BgL_kz00_1678); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 15 */
obj_t BgL_auxz00_2776;
BgL_auxz00_2776 = 
PROCEDURE_ENTRY(BgL_method3113z00_1654)(BgL_method3113z00_1654, 
(obj_t)(BgL_ez00_1653), BEOA); 
BgL_res4383z00_1679 = 
(BgL_nodez00_bglt)(BgL_auxz00_2776); } } } 
BgL_arg3159z00_802 = BgL_res4383z00_1679; } } 
{ /* ./DotNet/compress.scm 15 */
obj_t BgL_objz00_1681;
BgL_objz00_1681 = 
(obj_t)(BgL_arg3159z00_802); 
SET_CAR(BgL_lz00_3, BgL_objz00_1681); } } 
{ /* ./DotNet/compress.scm 16 */
obj_t BgL_arg3166z00_804;
BgL_arg3166z00_804 = 
CDR(BgL_lz00_3); 
{ 
obj_t BgL_lz00_2784;
BgL_lz00_2784 = BgL_arg3166z00_804; 
BgL_lz00_3 = BgL_lz00_2784; 
goto BGl_compressza2za2zzdotnet_compressz00;} } } } } 
}



/* _var? */
obj_t BGl__varzf3zf3zzdotnet_compressz00(obj_t BgL_envz00_2647, obj_t BgL_obj1640z00_2648)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
bool_t BgL_auxz00_2785;
BgL_auxz00_2785 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1640z00_2648, BGl_varz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_2785);} } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzdotnet_compressz00()
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 1 */
BGl_addzd2genericz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_compilezd2compresszd2default3112zd2envzd2zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_atomz00zzast_nodez00, BGl_proc4925z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_varz00zzast_nodez00, BGl_proc4926z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc4927z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_setqz00zzast_nodez00, BGl_proc4928z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_sequencez00zzast_nodez00, BGl_proc4929z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_conditionalz00zzast_nodez00, BGl_proc4930z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_selectz00zzast_nodez00, BGl_proc4931z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc4932z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_appz00zzast_nodez00, BGl_proc4933z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc4934z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_funcallz00zzast_nodez00, BGl_proc4935z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_externz00zzast_nodez00, BGl_proc4936z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_castz00zzast_nodez00, BGl_proc4937z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc4938z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc4939z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_failz00zzast_nodez00, BGl_proc4940z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_makezd2boxzd2zzast_nodez00, BGl_proc4941z00zzdotnet_compressz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_boxzd2refzd2zzast_nodez00, BGl_proc4942z00zzdotnet_compressz00); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc4943z00zzdotnet_compressz00);} 
}



/* compile-compress-box-set!3153 */
obj_t BGl_compilezd2compresszd2boxzd2setz123153zc0zzdotnet_compressz00(obj_t BgL_envz00_2668, obj_t BgL_ez00_2669)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 202 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_ez00_1642;
{ /* ./DotNet/compress.scm 203 */
BgL_boxzd2setz12zc0_bglt BgL_auxz00_2808;
BgL_ez00_1642 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_ez00_2669); 
{ /* ./DotNet/compress.scm 204 */
BgL_nodez00_bglt BgL_arg4358z00_1646;
{ /* ./DotNet/compress.scm 204 */
BgL_nodez00_bglt BgL_arg4361z00_1647;
BgL_arg4361z00_1647 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_ez00_1642))->BgL_valuez00); 
{ /* ./DotNet/compress.scm 204 */
BgL_nodez00_bglt BgL_res4454z00_2614;
{ /* ./DotNet/compress.scm 204 */
obj_t BgL_method3113z00_2589;
{ /* ./DotNet/compress.scm 204 */
BgL_objectz00_bglt BgL_objz00_2590;
BgL_objz00_2590 = 
(BgL_objectz00_bglt)(BgL_arg4361z00_1647); 
{ /* ./DotNet/compress.scm 204 */
long BgL_objzd2classzd2numz00_2591;
BgL_objzd2classzd2numz00_2591 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2590); 
{ /* ./DotNet/compress.scm 204 */
obj_t BgL_arg2017z00_2592;
{ /* ./DotNet/compress.scm 204 */
int BgL_auxz00_2812;
BgL_auxz00_2812 = 
(int)(((long)1)); 
BgL_arg2017z00_2592 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2812); } 
{ /* ./DotNet/compress.scm 204 */
int BgL_offsetz00_2595;
BgL_offsetz00_2595 = 
(int)(BgL_objzd2classzd2numz00_2591); 
{ /* ./DotNet/compress.scm 204 */
long BgL_offsetz00_2596;
{ /* ./DotNet/compress.scm 204 */
long BgL_auxz00_2816;
BgL_auxz00_2816 = 
(long)(BgL_offsetz00_2595); 
BgL_offsetz00_2596 = 
(BgL_auxz00_2816-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 204 */
long BgL_modz00_2597;
{ /* ./DotNet/compress.scm 204 */
int BgL_arg2028z00_2598;
BgL_arg2028z00_2598 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 204 */
long BgL_n2z00_2606;
BgL_n2z00_2606 = 
(long)(BgL_arg2028z00_2598); 
BgL_modz00_2597 = 
(BgL_offsetz00_2596/BgL_n2z00_2606); } } 
{ /* ./DotNet/compress.scm 204 */
long BgL_restz00_2599;
{ /* ./DotNet/compress.scm 204 */
int BgL_arg2024z00_2600;
BgL_arg2024z00_2600 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 204 */
long BgL_n2z00_2609;
BgL_n2z00_2609 = 
(long)(BgL_arg2024z00_2600); 
BgL_restz00_2599 = 
(BgL_offsetz00_2596%BgL_n2z00_2609); } } 
{ /* ./DotNet/compress.scm 204 */

{ /* ./DotNet/compress.scm 204 */
obj_t BgL_bucketz00_2601;
{ /* ./DotNet/compress.scm 204 */
int BgL_kz00_2611;
BgL_kz00_2611 = 
(int)(BgL_modz00_2597); 
BgL_bucketz00_2601 = 
VECTOR_REF(BgL_arg2017z00_2592,BgL_kz00_2611); } 
{ /* ./DotNet/compress.scm 204 */
int BgL_kz00_2613;
BgL_kz00_2613 = 
(int)(BgL_restz00_2599); 
BgL_method3113z00_2589 = 
VECTOR_REF(BgL_bucketz00_2601,BgL_kz00_2613); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 204 */
obj_t BgL_auxz00_2829;
BgL_auxz00_2829 = 
PROCEDURE_ENTRY(BgL_method3113z00_2589)(BgL_method3113z00_2589, 
(obj_t)(BgL_arg4361z00_1647), BEOA); 
BgL_res4454z00_2614 = 
(BgL_nodez00_bglt)(BgL_auxz00_2829); } } 
BgL_arg4358z00_1646 = BgL_res4454z00_2614; } } 
{ /* ./DotNet/compress.scm 204 */
BgL_boxzd2setz12zc0_bglt BgL_obj2645z00_2615;BgL_nodez00_bglt BgL_val2644z00_2616;
BgL_obj2645z00_2615 = BgL_ez00_1642; 
BgL_val2644z00_2616 = BgL_arg4358z00_1646; 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_obj2645z00_2615))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_val2644z00_2616), BUNSPEC); } } 
BgL_auxz00_2808 = BgL_ez00_1642; 
return 
(obj_t)(BgL_auxz00_2808);} } } 
}



/* compile-compress-box-ref3151 */
obj_t BGl_compilezd2compresszd2boxzd2ref3151zd2zzdotnet_compressz00(obj_t BgL_envz00_2670, obj_t BgL_ez00_2671)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 199 */
{ /* ./DotNet/compress.scm 200 */
BgL_boxzd2refzd2_bglt BgL_auxz00_2837;
BgL_auxz00_2837 = 
(BgL_boxzd2refzd2_bglt)(BgL_ez00_2671); 
return 
(obj_t)(BgL_auxz00_2837);} } 
}



/* compile-compress-make-box3149 */
obj_t BGl_compilezd2compresszd2makezd2box3149zd2zzdotnet_compressz00(obj_t BgL_envz00_2672, obj_t BgL_ez00_2673)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 194 */
{ 
BgL_makezd2boxzd2_bglt BgL_ez00_1629;
{ /* ./DotNet/compress.scm 195 */
BgL_makezd2boxzd2_bglt BgL_auxz00_2840;
BgL_ez00_1629 = 
(BgL_makezd2boxzd2_bglt)(BgL_ez00_2673); 
{ /* ./DotNet/compress.scm 196 */
BgL_nodez00_bglt BgL_arg4339z00_1633;
{ /* ./DotNet/compress.scm 196 */
BgL_nodez00_bglt BgL_arg4342z00_1634;
BgL_arg4342z00_1634 = 
(((BgL_makezd2boxzd2_bglt)CREF(BgL_ez00_1629))->BgL_valuez00); 
{ /* ./DotNet/compress.scm 196 */
BgL_nodez00_bglt BgL_res4451z00_2584;
{ /* ./DotNet/compress.scm 196 */
obj_t BgL_method3113z00_2559;
{ /* ./DotNet/compress.scm 196 */
BgL_objectz00_bglt BgL_objz00_2560;
BgL_objz00_2560 = 
(BgL_objectz00_bglt)(BgL_arg4342z00_1634); 
{ /* ./DotNet/compress.scm 196 */
long BgL_objzd2classzd2numz00_2561;
BgL_objzd2classzd2numz00_2561 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2560); 
{ /* ./DotNet/compress.scm 196 */
obj_t BgL_arg2017z00_2562;
{ /* ./DotNet/compress.scm 196 */
int BgL_auxz00_2844;
BgL_auxz00_2844 = 
(int)(((long)1)); 
BgL_arg2017z00_2562 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2844); } 
{ /* ./DotNet/compress.scm 196 */
int BgL_offsetz00_2565;
BgL_offsetz00_2565 = 
(int)(BgL_objzd2classzd2numz00_2561); 
{ /* ./DotNet/compress.scm 196 */
long BgL_offsetz00_2566;
{ /* ./DotNet/compress.scm 196 */
long BgL_auxz00_2848;
BgL_auxz00_2848 = 
(long)(BgL_offsetz00_2565); 
BgL_offsetz00_2566 = 
(BgL_auxz00_2848-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 196 */
long BgL_modz00_2567;
{ /* ./DotNet/compress.scm 196 */
int BgL_arg2028z00_2568;
BgL_arg2028z00_2568 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 196 */
long BgL_n2z00_2576;
BgL_n2z00_2576 = 
(long)(BgL_arg2028z00_2568); 
BgL_modz00_2567 = 
(BgL_offsetz00_2566/BgL_n2z00_2576); } } 
{ /* ./DotNet/compress.scm 196 */
long BgL_restz00_2569;
{ /* ./DotNet/compress.scm 196 */
int BgL_arg2024z00_2570;
BgL_arg2024z00_2570 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 196 */
long BgL_n2z00_2579;
BgL_n2z00_2579 = 
(long)(BgL_arg2024z00_2570); 
BgL_restz00_2569 = 
(BgL_offsetz00_2566%BgL_n2z00_2579); } } 
{ /* ./DotNet/compress.scm 196 */

{ /* ./DotNet/compress.scm 196 */
obj_t BgL_bucketz00_2571;
{ /* ./DotNet/compress.scm 196 */
int BgL_kz00_2581;
BgL_kz00_2581 = 
(int)(BgL_modz00_2567); 
BgL_bucketz00_2571 = 
VECTOR_REF(BgL_arg2017z00_2562,BgL_kz00_2581); } 
{ /* ./DotNet/compress.scm 196 */
int BgL_kz00_2583;
BgL_kz00_2583 = 
(int)(BgL_restz00_2569); 
BgL_method3113z00_2559 = 
VECTOR_REF(BgL_bucketz00_2571,BgL_kz00_2583); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 196 */
obj_t BgL_auxz00_2861;
BgL_auxz00_2861 = 
PROCEDURE_ENTRY(BgL_method3113z00_2559)(BgL_method3113z00_2559, 
(obj_t)(BgL_arg4342z00_1634), BEOA); 
BgL_res4451z00_2584 = 
(BgL_nodez00_bglt)(BgL_auxz00_2861); } } 
BgL_arg4339z00_1633 = BgL_res4451z00_2584; } } 
{ /* ./DotNet/compress.scm 196 */
BgL_makezd2boxzd2_bglt BgL_obj2584z00_2585;BgL_nodez00_bglt BgL_val2583z00_2586;
BgL_obj2584z00_2585 = BgL_ez00_1629; 
BgL_val2583z00_2586 = BgL_arg4339z00_1633; 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_obj2584z00_2585))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_val2583z00_2586), BUNSPEC); } } 
BgL_auxz00_2840 = BgL_ez00_1629; 
return 
(obj_t)(BgL_auxz00_2840);} } } 
}



/* compile-compress-fail3147 */
obj_t BGl_compilezd2compresszd2fail3147z00zzdotnet_compressz00(obj_t BgL_envz00_2674, obj_t BgL_ez00_2675)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 187 */
{ 
BgL_failz00_bglt BgL_ez00_1617;
{ /* ./DotNet/compress.scm 188 */
BgL_failz00_bglt BgL_auxz00_2869;
BgL_ez00_1617 = 
(BgL_failz00_bglt)(BgL_ez00_2675); 
{ /* ./DotNet/compress.scm 189 */
BgL_nodez00_bglt BgL_arg4312z00_1621;
{ /* ./DotNet/compress.scm 189 */
BgL_nodez00_bglt BgL_arg4315z00_1622;
BgL_arg4315z00_1622 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_1617))->BgL_procz00); 
{ /* ./DotNet/compress.scm 189 */
BgL_nodez00_bglt BgL_res4442z00_2494;
{ /* ./DotNet/compress.scm 189 */
obj_t BgL_method3113z00_2469;
{ /* ./DotNet/compress.scm 189 */
BgL_objectz00_bglt BgL_objz00_2470;
BgL_objz00_2470 = 
(BgL_objectz00_bglt)(BgL_arg4315z00_1622); 
{ /* ./DotNet/compress.scm 189 */
long BgL_objzd2classzd2numz00_2471;
BgL_objzd2classzd2numz00_2471 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2470); 
{ /* ./DotNet/compress.scm 189 */
obj_t BgL_arg2017z00_2472;
{ /* ./DotNet/compress.scm 189 */
int BgL_auxz00_2873;
BgL_auxz00_2873 = 
(int)(((long)1)); 
BgL_arg2017z00_2472 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2873); } 
{ /* ./DotNet/compress.scm 189 */
int BgL_offsetz00_2475;
BgL_offsetz00_2475 = 
(int)(BgL_objzd2classzd2numz00_2471); 
{ /* ./DotNet/compress.scm 189 */
long BgL_offsetz00_2476;
{ /* ./DotNet/compress.scm 189 */
long BgL_auxz00_2877;
BgL_auxz00_2877 = 
(long)(BgL_offsetz00_2475); 
BgL_offsetz00_2476 = 
(BgL_auxz00_2877-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 189 */
long BgL_modz00_2477;
{ /* ./DotNet/compress.scm 189 */
int BgL_arg2028z00_2478;
BgL_arg2028z00_2478 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 189 */
long BgL_n2z00_2486;
BgL_n2z00_2486 = 
(long)(BgL_arg2028z00_2478); 
BgL_modz00_2477 = 
(BgL_offsetz00_2476/BgL_n2z00_2486); } } 
{ /* ./DotNet/compress.scm 189 */
long BgL_restz00_2479;
{ /* ./DotNet/compress.scm 189 */
int BgL_arg2024z00_2480;
BgL_arg2024z00_2480 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 189 */
long BgL_n2z00_2489;
BgL_n2z00_2489 = 
(long)(BgL_arg2024z00_2480); 
BgL_restz00_2479 = 
(BgL_offsetz00_2476%BgL_n2z00_2489); } } 
{ /* ./DotNet/compress.scm 189 */

{ /* ./DotNet/compress.scm 189 */
obj_t BgL_bucketz00_2481;
{ /* ./DotNet/compress.scm 189 */
int BgL_kz00_2491;
BgL_kz00_2491 = 
(int)(BgL_modz00_2477); 
BgL_bucketz00_2481 = 
VECTOR_REF(BgL_arg2017z00_2472,BgL_kz00_2491); } 
{ /* ./DotNet/compress.scm 189 */
int BgL_kz00_2493;
BgL_kz00_2493 = 
(int)(BgL_restz00_2479); 
BgL_method3113z00_2469 = 
VECTOR_REF(BgL_bucketz00_2481,BgL_kz00_2493); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 189 */
obj_t BgL_auxz00_2890;
BgL_auxz00_2890 = 
PROCEDURE_ENTRY(BgL_method3113z00_2469)(BgL_method3113z00_2469, 
(obj_t)(BgL_arg4315z00_1622), BEOA); 
BgL_res4442z00_2494 = 
(BgL_nodez00_bglt)(BgL_auxz00_2890); } } 
BgL_arg4312z00_1621 = BgL_res4442z00_2494; } } 
{ /* ./DotNet/compress.scm 189 */
BgL_failz00_bglt BgL_obj2372z00_2495;BgL_nodez00_bglt BgL_val2371z00_2496;
BgL_obj2372z00_2495 = BgL_ez00_1617; 
BgL_val2371z00_2496 = BgL_arg4312z00_1621; 
((((BgL_failz00_bglt)CREF(BgL_obj2372z00_2495))->BgL_procz00) = ((BgL_nodez00_bglt)BgL_val2371z00_2496), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 190 */
BgL_nodez00_bglt BgL_arg4319z00_1623;
{ /* ./DotNet/compress.scm 190 */
BgL_nodez00_bglt BgL_arg4322z00_1624;
BgL_arg4322z00_1624 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_1617))->BgL_msgz00); 
{ /* ./DotNet/compress.scm 190 */
BgL_nodez00_bglt BgL_res4445z00_2524;
{ /* ./DotNet/compress.scm 190 */
obj_t BgL_method3113z00_2499;
{ /* ./DotNet/compress.scm 190 */
BgL_objectz00_bglt BgL_objz00_2500;
BgL_objz00_2500 = 
(BgL_objectz00_bglt)(BgL_arg4322z00_1624); 
{ /* ./DotNet/compress.scm 190 */
long BgL_objzd2classzd2numz00_2501;
BgL_objzd2classzd2numz00_2501 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2500); 
{ /* ./DotNet/compress.scm 190 */
obj_t BgL_arg2017z00_2502;
{ /* ./DotNet/compress.scm 190 */
int BgL_auxz00_2899;
BgL_auxz00_2899 = 
(int)(((long)1)); 
BgL_arg2017z00_2502 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2899); } 
{ /* ./DotNet/compress.scm 190 */
int BgL_offsetz00_2505;
BgL_offsetz00_2505 = 
(int)(BgL_objzd2classzd2numz00_2501); 
{ /* ./DotNet/compress.scm 190 */
long BgL_offsetz00_2506;
{ /* ./DotNet/compress.scm 190 */
long BgL_auxz00_2903;
BgL_auxz00_2903 = 
(long)(BgL_offsetz00_2505); 
BgL_offsetz00_2506 = 
(BgL_auxz00_2903-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 190 */
long BgL_modz00_2507;
{ /* ./DotNet/compress.scm 190 */
int BgL_arg2028z00_2508;
BgL_arg2028z00_2508 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 190 */
long BgL_n2z00_2516;
BgL_n2z00_2516 = 
(long)(BgL_arg2028z00_2508); 
BgL_modz00_2507 = 
(BgL_offsetz00_2506/BgL_n2z00_2516); } } 
{ /* ./DotNet/compress.scm 190 */
long BgL_restz00_2509;
{ /* ./DotNet/compress.scm 190 */
int BgL_arg2024z00_2510;
BgL_arg2024z00_2510 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 190 */
long BgL_n2z00_2519;
BgL_n2z00_2519 = 
(long)(BgL_arg2024z00_2510); 
BgL_restz00_2509 = 
(BgL_offsetz00_2506%BgL_n2z00_2519); } } 
{ /* ./DotNet/compress.scm 190 */

{ /* ./DotNet/compress.scm 190 */
obj_t BgL_bucketz00_2511;
{ /* ./DotNet/compress.scm 190 */
int BgL_kz00_2521;
BgL_kz00_2521 = 
(int)(BgL_modz00_2507); 
BgL_bucketz00_2511 = 
VECTOR_REF(BgL_arg2017z00_2502,BgL_kz00_2521); } 
{ /* ./DotNet/compress.scm 190 */
int BgL_kz00_2523;
BgL_kz00_2523 = 
(int)(BgL_restz00_2509); 
BgL_method3113z00_2499 = 
VECTOR_REF(BgL_bucketz00_2511,BgL_kz00_2523); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 190 */
obj_t BgL_auxz00_2916;
BgL_auxz00_2916 = 
PROCEDURE_ENTRY(BgL_method3113z00_2499)(BgL_method3113z00_2499, 
(obj_t)(BgL_arg4322z00_1624), BEOA); 
BgL_res4445z00_2524 = 
(BgL_nodez00_bglt)(BgL_auxz00_2916); } } 
BgL_arg4319z00_1623 = BgL_res4445z00_2524; } } 
{ /* ./DotNet/compress.scm 190 */
BgL_failz00_bglt BgL_obj2375z00_2525;BgL_nodez00_bglt BgL_val2374z00_2526;
BgL_obj2375z00_2525 = BgL_ez00_1617; 
BgL_val2374z00_2526 = BgL_arg4319z00_1623; 
((((BgL_failz00_bglt)CREF(BgL_obj2375z00_2525))->BgL_msgz00) = ((BgL_nodez00_bglt)BgL_val2374z00_2526), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 191 */
BgL_nodez00_bglt BgL_arg4326z00_1625;
{ /* ./DotNet/compress.scm 191 */
BgL_nodez00_bglt BgL_arg4329z00_1626;
BgL_arg4329z00_1626 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_1617))->BgL_objz00); 
{ /* ./DotNet/compress.scm 191 */
BgL_nodez00_bglt BgL_res4448z00_2554;
{ /* ./DotNet/compress.scm 191 */
obj_t BgL_method3113z00_2529;
{ /* ./DotNet/compress.scm 191 */
BgL_objectz00_bglt BgL_objz00_2530;
BgL_objz00_2530 = 
(BgL_objectz00_bglt)(BgL_arg4329z00_1626); 
{ /* ./DotNet/compress.scm 191 */
long BgL_objzd2classzd2numz00_2531;
BgL_objzd2classzd2numz00_2531 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2530); 
{ /* ./DotNet/compress.scm 191 */
obj_t BgL_arg2017z00_2532;
{ /* ./DotNet/compress.scm 191 */
int BgL_auxz00_2925;
BgL_auxz00_2925 = 
(int)(((long)1)); 
BgL_arg2017z00_2532 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2925); } 
{ /* ./DotNet/compress.scm 191 */
int BgL_offsetz00_2535;
BgL_offsetz00_2535 = 
(int)(BgL_objzd2classzd2numz00_2531); 
{ /* ./DotNet/compress.scm 191 */
long BgL_offsetz00_2536;
{ /* ./DotNet/compress.scm 191 */
long BgL_auxz00_2929;
BgL_auxz00_2929 = 
(long)(BgL_offsetz00_2535); 
BgL_offsetz00_2536 = 
(BgL_auxz00_2929-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 191 */
long BgL_modz00_2537;
{ /* ./DotNet/compress.scm 191 */
int BgL_arg2028z00_2538;
BgL_arg2028z00_2538 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 191 */
long BgL_n2z00_2546;
BgL_n2z00_2546 = 
(long)(BgL_arg2028z00_2538); 
BgL_modz00_2537 = 
(BgL_offsetz00_2536/BgL_n2z00_2546); } } 
{ /* ./DotNet/compress.scm 191 */
long BgL_restz00_2539;
{ /* ./DotNet/compress.scm 191 */
int BgL_arg2024z00_2540;
BgL_arg2024z00_2540 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 191 */
long BgL_n2z00_2549;
BgL_n2z00_2549 = 
(long)(BgL_arg2024z00_2540); 
BgL_restz00_2539 = 
(BgL_offsetz00_2536%BgL_n2z00_2549); } } 
{ /* ./DotNet/compress.scm 191 */

{ /* ./DotNet/compress.scm 191 */
obj_t BgL_bucketz00_2541;
{ /* ./DotNet/compress.scm 191 */
int BgL_kz00_2551;
BgL_kz00_2551 = 
(int)(BgL_modz00_2537); 
BgL_bucketz00_2541 = 
VECTOR_REF(BgL_arg2017z00_2532,BgL_kz00_2551); } 
{ /* ./DotNet/compress.scm 191 */
int BgL_kz00_2553;
BgL_kz00_2553 = 
(int)(BgL_restz00_2539); 
BgL_method3113z00_2529 = 
VECTOR_REF(BgL_bucketz00_2541,BgL_kz00_2553); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 191 */
obj_t BgL_auxz00_2942;
BgL_auxz00_2942 = 
PROCEDURE_ENTRY(BgL_method3113z00_2529)(BgL_method3113z00_2529, 
(obj_t)(BgL_arg4329z00_1626), BEOA); 
BgL_res4448z00_2554 = 
(BgL_nodez00_bglt)(BgL_auxz00_2942); } } 
BgL_arg4326z00_1625 = BgL_res4448z00_2554; } } 
{ /* ./DotNet/compress.scm 191 */
BgL_failz00_bglt BgL_obj2378z00_2555;BgL_nodez00_bglt BgL_val2377z00_2556;
BgL_obj2378z00_2555 = BgL_ez00_1617; 
BgL_val2377z00_2556 = BgL_arg4326z00_1625; 
((((BgL_failz00_bglt)CREF(BgL_obj2378z00_2555))->BgL_objz00) = ((BgL_nodez00_bglt)BgL_val2377z00_2556), BUNSPEC); } } 
BgL_auxz00_2869 = BgL_ez00_1617; 
return 
(obj_t)(BgL_auxz00_2869);} } } 
}



/* compile-compress-jump-ex-it3145 */
obj_t BGl_compilezd2compresszd2jumpzd2exzd2it3145z00zzdotnet_compressz00(obj_t BgL_envz00_2676, obj_t BgL_ez00_2677)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 181 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_ez00_1607;
{ /* ./DotNet/compress.scm 182 */
BgL_jumpzd2exzd2itz00_bglt BgL_auxz00_2950;
BgL_ez00_1607 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_ez00_2677); 
{ /* ./DotNet/compress.scm 183 */
BgL_nodez00_bglt BgL_arg4292z00_1611;
{ /* ./DotNet/compress.scm 183 */
BgL_nodez00_bglt BgL_arg4295z00_1612;
BgL_arg4295z00_1612 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_ez00_1607))->BgL_exitz00); 
{ /* ./DotNet/compress.scm 183 */
BgL_nodez00_bglt BgL_res4436z00_2434;
{ /* ./DotNet/compress.scm 183 */
obj_t BgL_method3113z00_2409;
{ /* ./DotNet/compress.scm 183 */
BgL_objectz00_bglt BgL_objz00_2410;
BgL_objz00_2410 = 
(BgL_objectz00_bglt)(BgL_arg4295z00_1612); 
{ /* ./DotNet/compress.scm 183 */
long BgL_objzd2classzd2numz00_2411;
BgL_objzd2classzd2numz00_2411 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2410); 
{ /* ./DotNet/compress.scm 183 */
obj_t BgL_arg2017z00_2412;
{ /* ./DotNet/compress.scm 183 */
int BgL_auxz00_2954;
BgL_auxz00_2954 = 
(int)(((long)1)); 
BgL_arg2017z00_2412 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2954); } 
{ /* ./DotNet/compress.scm 183 */
int BgL_offsetz00_2415;
BgL_offsetz00_2415 = 
(int)(BgL_objzd2classzd2numz00_2411); 
{ /* ./DotNet/compress.scm 183 */
long BgL_offsetz00_2416;
{ /* ./DotNet/compress.scm 183 */
long BgL_auxz00_2958;
BgL_auxz00_2958 = 
(long)(BgL_offsetz00_2415); 
BgL_offsetz00_2416 = 
(BgL_auxz00_2958-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 183 */
long BgL_modz00_2417;
{ /* ./DotNet/compress.scm 183 */
int BgL_arg2028z00_2418;
BgL_arg2028z00_2418 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 183 */
long BgL_n2z00_2426;
BgL_n2z00_2426 = 
(long)(BgL_arg2028z00_2418); 
BgL_modz00_2417 = 
(BgL_offsetz00_2416/BgL_n2z00_2426); } } 
{ /* ./DotNet/compress.scm 183 */
long BgL_restz00_2419;
{ /* ./DotNet/compress.scm 183 */
int BgL_arg2024z00_2420;
BgL_arg2024z00_2420 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 183 */
long BgL_n2z00_2429;
BgL_n2z00_2429 = 
(long)(BgL_arg2024z00_2420); 
BgL_restz00_2419 = 
(BgL_offsetz00_2416%BgL_n2z00_2429); } } 
{ /* ./DotNet/compress.scm 183 */

{ /* ./DotNet/compress.scm 183 */
obj_t BgL_bucketz00_2421;
{ /* ./DotNet/compress.scm 183 */
int BgL_kz00_2431;
BgL_kz00_2431 = 
(int)(BgL_modz00_2417); 
BgL_bucketz00_2421 = 
VECTOR_REF(BgL_arg2017z00_2412,BgL_kz00_2431); } 
{ /* ./DotNet/compress.scm 183 */
int BgL_kz00_2433;
BgL_kz00_2433 = 
(int)(BgL_restz00_2419); 
BgL_method3113z00_2409 = 
VECTOR_REF(BgL_bucketz00_2421,BgL_kz00_2433); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 183 */
obj_t BgL_auxz00_2971;
BgL_auxz00_2971 = 
PROCEDURE_ENTRY(BgL_method3113z00_2409)(BgL_method3113z00_2409, 
(obj_t)(BgL_arg4295z00_1612), BEOA); 
BgL_res4436z00_2434 = 
(BgL_nodez00_bglt)(BgL_auxz00_2971); } } 
BgL_arg4292z00_1611 = BgL_res4436z00_2434; } } 
{ /* ./DotNet/compress.scm 183 */
BgL_jumpzd2exzd2itz00_bglt BgL_obj2552z00_2435;BgL_nodez00_bglt BgL_val2551z00_2436;
BgL_obj2552z00_2435 = BgL_ez00_1607; 
BgL_val2551z00_2436 = BgL_arg4292z00_1611; 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_obj2552z00_2435))->BgL_exitz00) = ((BgL_nodez00_bglt)BgL_val2551z00_2436), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 184 */
BgL_nodez00_bglt BgL_arg4299z00_1613;
{ /* ./DotNet/compress.scm 184 */
BgL_nodez00_bglt BgL_arg4302z00_1614;
BgL_arg4302z00_1614 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_ez00_1607))->BgL_valuez00); 
{ /* ./DotNet/compress.scm 184 */
BgL_nodez00_bglt BgL_res4439z00_2464;
{ /* ./DotNet/compress.scm 184 */
obj_t BgL_method3113z00_2439;
{ /* ./DotNet/compress.scm 184 */
BgL_objectz00_bglt BgL_objz00_2440;
BgL_objz00_2440 = 
(BgL_objectz00_bglt)(BgL_arg4302z00_1614); 
{ /* ./DotNet/compress.scm 184 */
long BgL_objzd2classzd2numz00_2441;
BgL_objzd2classzd2numz00_2441 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2440); 
{ /* ./DotNet/compress.scm 184 */
obj_t BgL_arg2017z00_2442;
{ /* ./DotNet/compress.scm 184 */
int BgL_auxz00_2980;
BgL_auxz00_2980 = 
(int)(((long)1)); 
BgL_arg2017z00_2442 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_2980); } 
{ /* ./DotNet/compress.scm 184 */
int BgL_offsetz00_2445;
BgL_offsetz00_2445 = 
(int)(BgL_objzd2classzd2numz00_2441); 
{ /* ./DotNet/compress.scm 184 */
long BgL_offsetz00_2446;
{ /* ./DotNet/compress.scm 184 */
long BgL_auxz00_2984;
BgL_auxz00_2984 = 
(long)(BgL_offsetz00_2445); 
BgL_offsetz00_2446 = 
(BgL_auxz00_2984-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 184 */
long BgL_modz00_2447;
{ /* ./DotNet/compress.scm 184 */
int BgL_arg2028z00_2448;
BgL_arg2028z00_2448 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 184 */
long BgL_n2z00_2456;
BgL_n2z00_2456 = 
(long)(BgL_arg2028z00_2448); 
BgL_modz00_2447 = 
(BgL_offsetz00_2446/BgL_n2z00_2456); } } 
{ /* ./DotNet/compress.scm 184 */
long BgL_restz00_2449;
{ /* ./DotNet/compress.scm 184 */
int BgL_arg2024z00_2450;
BgL_arg2024z00_2450 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 184 */
long BgL_n2z00_2459;
BgL_n2z00_2459 = 
(long)(BgL_arg2024z00_2450); 
BgL_restz00_2449 = 
(BgL_offsetz00_2446%BgL_n2z00_2459); } } 
{ /* ./DotNet/compress.scm 184 */

{ /* ./DotNet/compress.scm 184 */
obj_t BgL_bucketz00_2451;
{ /* ./DotNet/compress.scm 184 */
int BgL_kz00_2461;
BgL_kz00_2461 = 
(int)(BgL_modz00_2447); 
BgL_bucketz00_2451 = 
VECTOR_REF(BgL_arg2017z00_2442,BgL_kz00_2461); } 
{ /* ./DotNet/compress.scm 184 */
int BgL_kz00_2463;
BgL_kz00_2463 = 
(int)(BgL_restz00_2449); 
BgL_method3113z00_2439 = 
VECTOR_REF(BgL_bucketz00_2451,BgL_kz00_2463); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 184 */
obj_t BgL_auxz00_2997;
BgL_auxz00_2997 = 
PROCEDURE_ENTRY(BgL_method3113z00_2439)(BgL_method3113z00_2439, 
(obj_t)(BgL_arg4302z00_1614), BEOA); 
BgL_res4439z00_2464 = 
(BgL_nodez00_bglt)(BgL_auxz00_2997); } } 
BgL_arg4299z00_1613 = BgL_res4439z00_2464; } } 
{ /* ./DotNet/compress.scm 184 */
BgL_jumpzd2exzd2itz00_bglt BgL_obj2555z00_2465;BgL_nodez00_bglt BgL_val2554z00_2466;
BgL_obj2555z00_2465 = BgL_ez00_1607; 
BgL_val2554z00_2466 = BgL_arg4299z00_1613; 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_obj2555z00_2465))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_val2554z00_2466), BUNSPEC); } } 
BgL_auxz00_2950 = BgL_ez00_1607; 
return 
(obj_t)(BgL_auxz00_2950);} } } 
}



/* compile-compress-set-ex-it3143 */
obj_t BGl_compilezd2compresszd2setzd2exzd2it3143z00zzdotnet_compressz00(obj_t BgL_envz00_2678, obj_t BgL_ez00_2679)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 176 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_ez00_1599;
{ /* ./DotNet/compress.scm 177 */
BgL_setzd2exzd2itz00_bglt BgL_auxz00_3005;
BgL_ez00_1599 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_ez00_2679); 
{ /* ./DotNet/compress.scm 178 */
BgL_nodez00_bglt BgL_arg4279z00_1603;
{ /* ./DotNet/compress.scm 178 */
BgL_nodez00_bglt BgL_arg4282z00_1604;
BgL_arg4282z00_1604 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_ez00_1599))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 178 */
BgL_nodez00_bglt BgL_res4433z00_2404;
{ /* ./DotNet/compress.scm 178 */
obj_t BgL_method3113z00_2379;
{ /* ./DotNet/compress.scm 178 */
BgL_objectz00_bglt BgL_objz00_2380;
BgL_objz00_2380 = 
(BgL_objectz00_bglt)(BgL_arg4282z00_1604); 
{ /* ./DotNet/compress.scm 178 */
long BgL_objzd2classzd2numz00_2381;
BgL_objzd2classzd2numz00_2381 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2380); 
{ /* ./DotNet/compress.scm 178 */
obj_t BgL_arg2017z00_2382;
{ /* ./DotNet/compress.scm 178 */
int BgL_auxz00_3009;
BgL_auxz00_3009 = 
(int)(((long)1)); 
BgL_arg2017z00_2382 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3009); } 
{ /* ./DotNet/compress.scm 178 */
int BgL_offsetz00_2385;
BgL_offsetz00_2385 = 
(int)(BgL_objzd2classzd2numz00_2381); 
{ /* ./DotNet/compress.scm 178 */
long BgL_offsetz00_2386;
{ /* ./DotNet/compress.scm 178 */
long BgL_auxz00_3013;
BgL_auxz00_3013 = 
(long)(BgL_offsetz00_2385); 
BgL_offsetz00_2386 = 
(BgL_auxz00_3013-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 178 */
long BgL_modz00_2387;
{ /* ./DotNet/compress.scm 178 */
int BgL_arg2028z00_2388;
BgL_arg2028z00_2388 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 178 */
long BgL_n2z00_2396;
BgL_n2z00_2396 = 
(long)(BgL_arg2028z00_2388); 
BgL_modz00_2387 = 
(BgL_offsetz00_2386/BgL_n2z00_2396); } } 
{ /* ./DotNet/compress.scm 178 */
long BgL_restz00_2389;
{ /* ./DotNet/compress.scm 178 */
int BgL_arg2024z00_2390;
BgL_arg2024z00_2390 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 178 */
long BgL_n2z00_2399;
BgL_n2z00_2399 = 
(long)(BgL_arg2024z00_2390); 
BgL_restz00_2389 = 
(BgL_offsetz00_2386%BgL_n2z00_2399); } } 
{ /* ./DotNet/compress.scm 178 */

{ /* ./DotNet/compress.scm 178 */
obj_t BgL_bucketz00_2391;
{ /* ./DotNet/compress.scm 178 */
int BgL_kz00_2401;
BgL_kz00_2401 = 
(int)(BgL_modz00_2387); 
BgL_bucketz00_2391 = 
VECTOR_REF(BgL_arg2017z00_2382,BgL_kz00_2401); } 
{ /* ./DotNet/compress.scm 178 */
int BgL_kz00_2403;
BgL_kz00_2403 = 
(int)(BgL_restz00_2389); 
BgL_method3113z00_2379 = 
VECTOR_REF(BgL_bucketz00_2391,BgL_kz00_2403); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 178 */
obj_t BgL_auxz00_3026;
BgL_auxz00_3026 = 
PROCEDURE_ENTRY(BgL_method3113z00_2379)(BgL_method3113z00_2379, 
(obj_t)(BgL_arg4282z00_1604), BEOA); 
BgL_res4433z00_2404 = 
(BgL_nodez00_bglt)(BgL_auxz00_3026); } } 
BgL_arg4279z00_1603 = BgL_res4433z00_2404; } } 
{ /* ./DotNet/compress.scm 178 */
BgL_setzd2exzd2itz00_bglt BgL_obj2529z00_2405;BgL_nodez00_bglt BgL_val2528z00_2406;
BgL_obj2529z00_2405 = BgL_ez00_1599; 
BgL_val2528z00_2406 = BgL_arg4279z00_1603; 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_obj2529z00_2405))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_val2528z00_2406), BUNSPEC); } } 
BgL_auxz00_3005 = BgL_ez00_1599; 
return 
(obj_t)(BgL_auxz00_3005);} } } 
}



/* compile-compress-cast3141 */
obj_t BGl_compilezd2compresszd2cast3141z00zzdotnet_compressz00(obj_t BgL_envz00_2680, obj_t BgL_ez00_2681)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 171 */
{ 
BgL_castz00_bglt BgL_ez00_1591;
{ /* ./DotNet/compress.scm 172 */
BgL_castz00_bglt BgL_auxz00_3034;
BgL_ez00_1591 = 
(BgL_castz00_bglt)(BgL_ez00_2681); 
{ /* ./DotNet/compress.scm 173 */
BgL_nodez00_bglt BgL_arg4266z00_1595;
{ /* ./DotNet/compress.scm 173 */
BgL_nodez00_bglt BgL_arg4269z00_1596;
BgL_arg4269z00_1596 = 
(((BgL_castz00_bglt)CREF(BgL_ez00_1591))->BgL_argz00); 
{ /* ./DotNet/compress.scm 173 */
BgL_nodez00_bglt BgL_res4430z00_2374;
{ /* ./DotNet/compress.scm 173 */
obj_t BgL_method3113z00_2349;
{ /* ./DotNet/compress.scm 173 */
BgL_objectz00_bglt BgL_objz00_2350;
BgL_objz00_2350 = 
(BgL_objectz00_bglt)(BgL_arg4269z00_1596); 
{ /* ./DotNet/compress.scm 173 */
long BgL_objzd2classzd2numz00_2351;
BgL_objzd2classzd2numz00_2351 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2350); 
{ /* ./DotNet/compress.scm 173 */
obj_t BgL_arg2017z00_2352;
{ /* ./DotNet/compress.scm 173 */
int BgL_auxz00_3038;
BgL_auxz00_3038 = 
(int)(((long)1)); 
BgL_arg2017z00_2352 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3038); } 
{ /* ./DotNet/compress.scm 173 */
int BgL_offsetz00_2355;
BgL_offsetz00_2355 = 
(int)(BgL_objzd2classzd2numz00_2351); 
{ /* ./DotNet/compress.scm 173 */
long BgL_offsetz00_2356;
{ /* ./DotNet/compress.scm 173 */
long BgL_auxz00_3042;
BgL_auxz00_3042 = 
(long)(BgL_offsetz00_2355); 
BgL_offsetz00_2356 = 
(BgL_auxz00_3042-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 173 */
long BgL_modz00_2357;
{ /* ./DotNet/compress.scm 173 */
int BgL_arg2028z00_2358;
BgL_arg2028z00_2358 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 173 */
long BgL_n2z00_2366;
BgL_n2z00_2366 = 
(long)(BgL_arg2028z00_2358); 
BgL_modz00_2357 = 
(BgL_offsetz00_2356/BgL_n2z00_2366); } } 
{ /* ./DotNet/compress.scm 173 */
long BgL_restz00_2359;
{ /* ./DotNet/compress.scm 173 */
int BgL_arg2024z00_2360;
BgL_arg2024z00_2360 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 173 */
long BgL_n2z00_2369;
BgL_n2z00_2369 = 
(long)(BgL_arg2024z00_2360); 
BgL_restz00_2359 = 
(BgL_offsetz00_2356%BgL_n2z00_2369); } } 
{ /* ./DotNet/compress.scm 173 */

{ /* ./DotNet/compress.scm 173 */
obj_t BgL_bucketz00_2361;
{ /* ./DotNet/compress.scm 173 */
int BgL_kz00_2371;
BgL_kz00_2371 = 
(int)(BgL_modz00_2357); 
BgL_bucketz00_2361 = 
VECTOR_REF(BgL_arg2017z00_2352,BgL_kz00_2371); } 
{ /* ./DotNet/compress.scm 173 */
int BgL_kz00_2373;
BgL_kz00_2373 = 
(int)(BgL_restz00_2359); 
BgL_method3113z00_2349 = 
VECTOR_REF(BgL_bucketz00_2361,BgL_kz00_2373); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 173 */
obj_t BgL_auxz00_3055;
BgL_auxz00_3055 = 
PROCEDURE_ENTRY(BgL_method3113z00_2349)(BgL_method3113z00_2349, 
(obj_t)(BgL_arg4269z00_1596), BEOA); 
BgL_res4430z00_2374 = 
(BgL_nodez00_bglt)(BgL_auxz00_3055); } } 
BgL_arg4266z00_1595 = BgL_res4430z00_2374; } } 
{ /* ./DotNet/compress.scm 173 */
BgL_castz00_bglt BgL_obj2282z00_2375;BgL_nodez00_bglt BgL_val2281z00_2376;
BgL_obj2282z00_2375 = BgL_ez00_1591; 
BgL_val2281z00_2376 = BgL_arg4266z00_1595; 
((((BgL_castz00_bglt)CREF(BgL_obj2282z00_2375))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_val2281z00_2376), BUNSPEC); } } 
BgL_auxz00_3034 = BgL_ez00_1591; 
return 
(obj_t)(BgL_auxz00_3034);} } } 
}



/* compile-compress-extern3139 */
obj_t BGl_compilezd2compresszd2extern3139z00zzdotnet_compressz00(obj_t BgL_envz00_2682, obj_t BgL_ez00_2683)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 166 */
{ 
BgL_externz00_bglt BgL_ez00_1584;
{ /* ./DotNet/compress.scm 167 */
BgL_externz00_bglt BgL_auxz00_3063;
BgL_ez00_1584 = 
(BgL_externz00_bglt)(BgL_ez00_2683); 
{ /* ./DotNet/compress.scm 167 */
obj_t BgL_arg4256z00_2345;
BgL_arg4256z00_2345 = 
(((BgL_externz00_bglt)CREF(BgL_ez00_1584))->BgL_exprza2za2); 
BGl_compressza2za2zzdotnet_compressz00(BgL_arg4256z00_2345); } 
BgL_auxz00_3063 = BgL_ez00_1584; 
return 
(obj_t)(BgL_auxz00_3063);} } } 
}



/* compile-compress-funcall3137 */
obj_t BGl_compilezd2compresszd2funcall3137z00zzdotnet_compressz00(obj_t BgL_envz00_2684, obj_t BgL_ez00_2685)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 160 */
{ 
BgL_funcallz00_bglt BgL_ez00_1575;
{ /* ./DotNet/compress.scm 161 */
BgL_funcallz00_bglt BgL_auxz00_3068;
BgL_ez00_1575 = 
(BgL_funcallz00_bglt)(BgL_ez00_2685); 
{ /* ./DotNet/compress.scm 162 */
BgL_nodez00_bglt BgL_arg4239z00_1579;
{ /* ./DotNet/compress.scm 162 */
BgL_nodez00_bglt BgL_arg4242z00_1580;
BgL_arg4242z00_1580 = 
(((BgL_funcallz00_bglt)CREF(BgL_ez00_1575))->BgL_funz00); 
{ /* ./DotNet/compress.scm 162 */
BgL_nodez00_bglt BgL_res4427z00_2340;
{ /* ./DotNet/compress.scm 162 */
obj_t BgL_method3113z00_2315;
{ /* ./DotNet/compress.scm 162 */
BgL_objectz00_bglt BgL_objz00_2316;
BgL_objz00_2316 = 
(BgL_objectz00_bglt)(BgL_arg4242z00_1580); 
{ /* ./DotNet/compress.scm 162 */
long BgL_objzd2classzd2numz00_2317;
BgL_objzd2classzd2numz00_2317 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2316); 
{ /* ./DotNet/compress.scm 162 */
obj_t BgL_arg2017z00_2318;
{ /* ./DotNet/compress.scm 162 */
int BgL_auxz00_3072;
BgL_auxz00_3072 = 
(int)(((long)1)); 
BgL_arg2017z00_2318 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3072); } 
{ /* ./DotNet/compress.scm 162 */
int BgL_offsetz00_2321;
BgL_offsetz00_2321 = 
(int)(BgL_objzd2classzd2numz00_2317); 
{ /* ./DotNet/compress.scm 162 */
long BgL_offsetz00_2322;
{ /* ./DotNet/compress.scm 162 */
long BgL_auxz00_3076;
BgL_auxz00_3076 = 
(long)(BgL_offsetz00_2321); 
BgL_offsetz00_2322 = 
(BgL_auxz00_3076-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 162 */
long BgL_modz00_2323;
{ /* ./DotNet/compress.scm 162 */
int BgL_arg2028z00_2324;
BgL_arg2028z00_2324 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 162 */
long BgL_n2z00_2332;
BgL_n2z00_2332 = 
(long)(BgL_arg2028z00_2324); 
BgL_modz00_2323 = 
(BgL_offsetz00_2322/BgL_n2z00_2332); } } 
{ /* ./DotNet/compress.scm 162 */
long BgL_restz00_2325;
{ /* ./DotNet/compress.scm 162 */
int BgL_arg2024z00_2326;
BgL_arg2024z00_2326 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 162 */
long BgL_n2z00_2335;
BgL_n2z00_2335 = 
(long)(BgL_arg2024z00_2326); 
BgL_restz00_2325 = 
(BgL_offsetz00_2322%BgL_n2z00_2335); } } 
{ /* ./DotNet/compress.scm 162 */

{ /* ./DotNet/compress.scm 162 */
obj_t BgL_bucketz00_2327;
{ /* ./DotNet/compress.scm 162 */
int BgL_kz00_2337;
BgL_kz00_2337 = 
(int)(BgL_modz00_2323); 
BgL_bucketz00_2327 = 
VECTOR_REF(BgL_arg2017z00_2318,BgL_kz00_2337); } 
{ /* ./DotNet/compress.scm 162 */
int BgL_kz00_2339;
BgL_kz00_2339 = 
(int)(BgL_restz00_2325); 
BgL_method3113z00_2315 = 
VECTOR_REF(BgL_bucketz00_2327,BgL_kz00_2339); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 162 */
obj_t BgL_auxz00_3089;
BgL_auxz00_3089 = 
PROCEDURE_ENTRY(BgL_method3113z00_2315)(BgL_method3113z00_2315, 
(obj_t)(BgL_arg4242z00_1580), BEOA); 
BgL_res4427z00_2340 = 
(BgL_nodez00_bglt)(BgL_auxz00_3089); } } 
BgL_arg4239z00_1579 = BgL_res4427z00_2340; } } 
{ /* ./DotNet/compress.scm 162 */
BgL_funcallz00_bglt BgL_obj1781z00_2341;BgL_nodez00_bglt BgL_val1780z00_2342;
BgL_obj1781z00_2341 = BgL_ez00_1575; 
BgL_val1780z00_2342 = BgL_arg4239z00_1579; 
((((BgL_funcallz00_bglt)CREF(BgL_obj1781z00_2341))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_val1780z00_2342), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 163 */
obj_t BgL_arg4246z00_1581;
BgL_arg4246z00_1581 = 
(((BgL_funcallz00_bglt)CREF(BgL_ez00_1575))->BgL_argsz00); 
BGl_compressza2za2zzdotnet_compressz00(BgL_arg4246z00_1581); } 
BgL_auxz00_3068 = BgL_ez00_1575; 
return 
(obj_t)(BgL_auxz00_3068);} } } 
}



/* compile-compress-app-ly3135 */
obj_t BGl_compilezd2compresszd2appzd2ly3135zd2zzdotnet_compressz00(obj_t BgL_envz00_2686, obj_t BgL_ez00_2687)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 154 */
{ 
BgL_appzd2lyzd2_bglt BgL_ez00_1565;
{ /* ./DotNet/compress.scm 155 */
BgL_appzd2lyzd2_bglt BgL_auxz00_3099;
BgL_ez00_1565 = 
(BgL_appzd2lyzd2_bglt)(BgL_ez00_2687); 
{ /* ./DotNet/compress.scm 156 */
BgL_nodez00_bglt BgL_arg4219z00_1569;
{ /* ./DotNet/compress.scm 156 */
BgL_nodez00_bglt BgL_arg4222z00_1570;
BgL_arg4222z00_1570 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_ez00_1565))->BgL_funz00); 
{ /* ./DotNet/compress.scm 156 */
BgL_nodez00_bglt BgL_res4421z00_2280;
{ /* ./DotNet/compress.scm 156 */
obj_t BgL_method3113z00_2255;
{ /* ./DotNet/compress.scm 156 */
BgL_objectz00_bglt BgL_objz00_2256;
BgL_objz00_2256 = 
(BgL_objectz00_bglt)(BgL_arg4222z00_1570); 
{ /* ./DotNet/compress.scm 156 */
long BgL_objzd2classzd2numz00_2257;
BgL_objzd2classzd2numz00_2257 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2256); 
{ /* ./DotNet/compress.scm 156 */
obj_t BgL_arg2017z00_2258;
{ /* ./DotNet/compress.scm 156 */
int BgL_auxz00_3103;
BgL_auxz00_3103 = 
(int)(((long)1)); 
BgL_arg2017z00_2258 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3103); } 
{ /* ./DotNet/compress.scm 156 */
int BgL_offsetz00_2261;
BgL_offsetz00_2261 = 
(int)(BgL_objzd2classzd2numz00_2257); 
{ /* ./DotNet/compress.scm 156 */
long BgL_offsetz00_2262;
{ /* ./DotNet/compress.scm 156 */
long BgL_auxz00_3107;
BgL_auxz00_3107 = 
(long)(BgL_offsetz00_2261); 
BgL_offsetz00_2262 = 
(BgL_auxz00_3107-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 156 */
long BgL_modz00_2263;
{ /* ./DotNet/compress.scm 156 */
int BgL_arg2028z00_2264;
BgL_arg2028z00_2264 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 156 */
long BgL_n2z00_2272;
BgL_n2z00_2272 = 
(long)(BgL_arg2028z00_2264); 
BgL_modz00_2263 = 
(BgL_offsetz00_2262/BgL_n2z00_2272); } } 
{ /* ./DotNet/compress.scm 156 */
long BgL_restz00_2265;
{ /* ./DotNet/compress.scm 156 */
int BgL_arg2024z00_2266;
BgL_arg2024z00_2266 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 156 */
long BgL_n2z00_2275;
BgL_n2z00_2275 = 
(long)(BgL_arg2024z00_2266); 
BgL_restz00_2265 = 
(BgL_offsetz00_2262%BgL_n2z00_2275); } } 
{ /* ./DotNet/compress.scm 156 */

{ /* ./DotNet/compress.scm 156 */
obj_t BgL_bucketz00_2267;
{ /* ./DotNet/compress.scm 156 */
int BgL_kz00_2277;
BgL_kz00_2277 = 
(int)(BgL_modz00_2263); 
BgL_bucketz00_2267 = 
VECTOR_REF(BgL_arg2017z00_2258,BgL_kz00_2277); } 
{ /* ./DotNet/compress.scm 156 */
int BgL_kz00_2279;
BgL_kz00_2279 = 
(int)(BgL_restz00_2265); 
BgL_method3113z00_2255 = 
VECTOR_REF(BgL_bucketz00_2267,BgL_kz00_2279); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 156 */
obj_t BgL_auxz00_3120;
BgL_auxz00_3120 = 
PROCEDURE_ENTRY(BgL_method3113z00_2255)(BgL_method3113z00_2255, 
(obj_t)(BgL_arg4222z00_1570), BEOA); 
BgL_res4421z00_2280 = 
(BgL_nodez00_bglt)(BgL_auxz00_3120); } } 
BgL_arg4219z00_1569 = BgL_res4421z00_2280; } } 
{ /* ./DotNet/compress.scm 156 */
BgL_appzd2lyzd2_bglt BgL_obj1753z00_2281;BgL_nodez00_bglt BgL_val1752z00_2282;
BgL_obj1753z00_2281 = BgL_ez00_1565; 
BgL_val1752z00_2282 = BgL_arg4219z00_1569; 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_obj1753z00_2281))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_val1752z00_2282), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 157 */
BgL_nodez00_bglt BgL_arg4226z00_1571;
{ /* ./DotNet/compress.scm 157 */
BgL_nodez00_bglt BgL_arg4229z00_1572;
BgL_arg4229z00_1572 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_ez00_1565))->BgL_argz00); 
{ /* ./DotNet/compress.scm 157 */
BgL_nodez00_bglt BgL_res4424z00_2310;
{ /* ./DotNet/compress.scm 157 */
obj_t BgL_method3113z00_2285;
{ /* ./DotNet/compress.scm 157 */
BgL_objectz00_bglt BgL_objz00_2286;
BgL_objz00_2286 = 
(BgL_objectz00_bglt)(BgL_arg4229z00_1572); 
{ /* ./DotNet/compress.scm 157 */
long BgL_objzd2classzd2numz00_2287;
BgL_objzd2classzd2numz00_2287 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2286); 
{ /* ./DotNet/compress.scm 157 */
obj_t BgL_arg2017z00_2288;
{ /* ./DotNet/compress.scm 157 */
int BgL_auxz00_3129;
BgL_auxz00_3129 = 
(int)(((long)1)); 
BgL_arg2017z00_2288 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3129); } 
{ /* ./DotNet/compress.scm 157 */
int BgL_offsetz00_2291;
BgL_offsetz00_2291 = 
(int)(BgL_objzd2classzd2numz00_2287); 
{ /* ./DotNet/compress.scm 157 */
long BgL_offsetz00_2292;
{ /* ./DotNet/compress.scm 157 */
long BgL_auxz00_3133;
BgL_auxz00_3133 = 
(long)(BgL_offsetz00_2291); 
BgL_offsetz00_2292 = 
(BgL_auxz00_3133-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 157 */
long BgL_modz00_2293;
{ /* ./DotNet/compress.scm 157 */
int BgL_arg2028z00_2294;
BgL_arg2028z00_2294 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 157 */
long BgL_n2z00_2302;
BgL_n2z00_2302 = 
(long)(BgL_arg2028z00_2294); 
BgL_modz00_2293 = 
(BgL_offsetz00_2292/BgL_n2z00_2302); } } 
{ /* ./DotNet/compress.scm 157 */
long BgL_restz00_2295;
{ /* ./DotNet/compress.scm 157 */
int BgL_arg2024z00_2296;
BgL_arg2024z00_2296 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 157 */
long BgL_n2z00_2305;
BgL_n2z00_2305 = 
(long)(BgL_arg2024z00_2296); 
BgL_restz00_2295 = 
(BgL_offsetz00_2292%BgL_n2z00_2305); } } 
{ /* ./DotNet/compress.scm 157 */

{ /* ./DotNet/compress.scm 157 */
obj_t BgL_bucketz00_2297;
{ /* ./DotNet/compress.scm 157 */
int BgL_kz00_2307;
BgL_kz00_2307 = 
(int)(BgL_modz00_2293); 
BgL_bucketz00_2297 = 
VECTOR_REF(BgL_arg2017z00_2288,BgL_kz00_2307); } 
{ /* ./DotNet/compress.scm 157 */
int BgL_kz00_2309;
BgL_kz00_2309 = 
(int)(BgL_restz00_2295); 
BgL_method3113z00_2285 = 
VECTOR_REF(BgL_bucketz00_2297,BgL_kz00_2309); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 157 */
obj_t BgL_auxz00_3146;
BgL_auxz00_3146 = 
PROCEDURE_ENTRY(BgL_method3113z00_2285)(BgL_method3113z00_2285, 
(obj_t)(BgL_arg4229z00_1572), BEOA); 
BgL_res4424z00_2310 = 
(BgL_nodez00_bglt)(BgL_auxz00_3146); } } 
BgL_arg4226z00_1571 = BgL_res4424z00_2310; } } 
{ /* ./DotNet/compress.scm 157 */
BgL_appzd2lyzd2_bglt BgL_obj1756z00_2311;BgL_nodez00_bglt BgL_val1755z00_2312;
BgL_obj1756z00_2311 = BgL_ez00_1565; 
BgL_val1755z00_2312 = BgL_arg4226z00_1571; 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_obj1756z00_2311))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_val1755z00_2312), BUNSPEC); } } 
BgL_auxz00_3099 = BgL_ez00_1565; 
return 
(obj_t)(BgL_auxz00_3099);} } } 
}



/* compile-compress-app3132 */
obj_t BGl_compilezd2compresszd2app3132z00zzdotnet_compressz00(obj_t BgL_envz00_2688, obj_t BgL_ez00_2689)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 149 */
{ 
BgL_appz00_bglt BgL_ez00_1558;
{ /* ./DotNet/compress.scm 150 */
BgL_appz00_bglt BgL_auxz00_3154;
BgL_ez00_1558 = 
(BgL_appz00_bglt)(BgL_ez00_2689); 
{ /* ./DotNet/compress.scm 150 */
obj_t BgL_arg4209z00_2251;
BgL_arg4209z00_2251 = 
(((BgL_appz00_bglt)CREF(BgL_ez00_1558))->BgL_argsz00); 
BGl_compressza2za2zzdotnet_compressz00(BgL_arg4209z00_2251); } 
BgL_auxz00_3154 = BgL_ez00_1558; 
return 
(obj_t)(BgL_auxz00_3154);} } } 
}



/* compile-compress-let-fun3130 */
obj_t BGl_compilezd2compresszd2letzd2fun3130zd2zzdotnet_compressz00(obj_t BgL_envz00_2690, obj_t BgL_ez00_2691)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 139 */
{ 
BgL_letzd2funzd2_bglt BgL_ez00_1540;
{ /* ./DotNet/compress.scm 140 */
BgL_letzd2funzd2_bglt BgL_auxz00_3159;
BgL_ez00_1540 = 
(BgL_letzd2funzd2_bglt)(BgL_ez00_2691); 
{ 
obj_t BgL_l3086z00_1544;
{ /* ./DotNet/compress.scm 141 */
obj_t BgL_arg4177z00_1546;
BgL_arg4177z00_1546 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_ez00_1540))->BgL_localsz00); 
BgL_l3086z00_1544 = BgL_arg4177z00_1546; 
BgL_forzd2each3087zd2_1545:
{ /* ./DotNet/compress.scm 141 */
bool_t BgL_test4180z00_1547;
BgL_test4180z00_1547 = 
PAIRP(BgL_l3086z00_1544); 
if(BgL_test4180z00_1547)
{ /* ./DotNet/compress.scm 141 */
{ /* ./DotNet/compress.scm 142 */
obj_t BgL_vz00_1548;
BgL_vz00_1548 = 
CAR(BgL_l3086z00_1544); 
{ /* ./DotNet/compress.scm 143 */
BgL_valuez00_bglt BgL_instance3090z00_1550;
{ /* ./DotNet/compress.scm 144 */
BgL_variablez00_bglt BgL_obj1100z00_2188;
BgL_obj1100z00_2188 = 
(BgL_variablez00_bglt)(BgL_vz00_1548); 
BgL_instance3090z00_1550 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1100z00_2188))->BgL_valuez00); } 
{ /* ./DotNet/compress.scm 144 */
BgL_nodez00_bglt BgL_arg4182z00_1551;
{ /* ./DotNet/compress.scm 144 */
obj_t BgL_arg4185z00_1552;
{ /* ./DotNet/compress.scm 144 */
BgL_sfunz00_bglt BgL_obj1370z00_2189;
BgL_obj1370z00_2189 = 
(BgL_sfunz00_bglt)(BgL_instance3090z00_1550); 
BgL_arg4185z00_1552 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1370z00_2189))->BgL_bodyz00); } 
{ /* ./DotNet/compress.scm 144 */
BgL_nodez00_bglt BgL_res4415z00_2216;
{ /* ./DotNet/compress.scm 144 */
BgL_nodez00_bglt BgL_ez00_2190;
BgL_ez00_2190 = 
(BgL_nodez00_bglt)(BgL_arg4185z00_1552); 
{ /* ./DotNet/compress.scm 144 */
obj_t BgL_method3113z00_2191;
{ /* ./DotNet/compress.scm 144 */
BgL_objectz00_bglt BgL_objz00_2192;
BgL_objz00_2192 = 
(BgL_objectz00_bglt)(BgL_ez00_2190); 
{ /* ./DotNet/compress.scm 144 */
long BgL_objzd2classzd2numz00_2193;
BgL_objzd2classzd2numz00_2193 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2192); 
{ /* ./DotNet/compress.scm 144 */
obj_t BgL_arg2017z00_2194;
{ /* ./DotNet/compress.scm 144 */
int BgL_auxz00_3171;
BgL_auxz00_3171 = 
(int)(((long)1)); 
BgL_arg2017z00_2194 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3171); } 
{ /* ./DotNet/compress.scm 144 */
int BgL_offsetz00_2197;
BgL_offsetz00_2197 = 
(int)(BgL_objzd2classzd2numz00_2193); 
{ /* ./DotNet/compress.scm 144 */
long BgL_offsetz00_2198;
{ /* ./DotNet/compress.scm 144 */
long BgL_auxz00_3175;
BgL_auxz00_3175 = 
(long)(BgL_offsetz00_2197); 
BgL_offsetz00_2198 = 
(BgL_auxz00_3175-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 144 */
long BgL_modz00_2199;
{ /* ./DotNet/compress.scm 144 */
int BgL_arg2028z00_2200;
BgL_arg2028z00_2200 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 144 */
long BgL_n2z00_2208;
BgL_n2z00_2208 = 
(long)(BgL_arg2028z00_2200); 
BgL_modz00_2199 = 
(BgL_offsetz00_2198/BgL_n2z00_2208); } } 
{ /* ./DotNet/compress.scm 144 */
long BgL_restz00_2201;
{ /* ./DotNet/compress.scm 144 */
int BgL_arg2024z00_2202;
BgL_arg2024z00_2202 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 144 */
long BgL_n2z00_2211;
BgL_n2z00_2211 = 
(long)(BgL_arg2024z00_2202); 
BgL_restz00_2201 = 
(BgL_offsetz00_2198%BgL_n2z00_2211); } } 
{ /* ./DotNet/compress.scm 144 */

{ /* ./DotNet/compress.scm 144 */
obj_t BgL_bucketz00_2203;
{ /* ./DotNet/compress.scm 144 */
int BgL_kz00_2213;
BgL_kz00_2213 = 
(int)(BgL_modz00_2199); 
BgL_bucketz00_2203 = 
VECTOR_REF(BgL_arg2017z00_2194,BgL_kz00_2213); } 
{ /* ./DotNet/compress.scm 144 */
int BgL_kz00_2215;
BgL_kz00_2215 = 
(int)(BgL_restz00_2201); 
BgL_method3113z00_2191 = 
VECTOR_REF(BgL_bucketz00_2203,BgL_kz00_2215); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 144 */
obj_t BgL_auxz00_3188;
BgL_auxz00_3188 = 
PROCEDURE_ENTRY(BgL_method3113z00_2191)(BgL_method3113z00_2191, 
(obj_t)(BgL_ez00_2190), BEOA); 
BgL_res4415z00_2216 = 
(BgL_nodez00_bglt)(BgL_auxz00_3188); } } } 
BgL_arg4182z00_1551 = BgL_res4415z00_2216; } } 
{ /* ./DotNet/compress.scm 144 */
BgL_sfunz00_bglt BgL_obj1373z00_2217;obj_t BgL_val1371z00_2218;
BgL_obj1373z00_2217 = 
(BgL_sfunz00_bglt)(BgL_instance3090z00_1550); 
BgL_val1371z00_2218 = 
(obj_t)(BgL_arg4182z00_1551); 
((((BgL_sfunz00_bglt)CREF(BgL_obj1373z00_2217))->BgL_bodyz00) = ((obj_t)BgL_val1371z00_2218), BUNSPEC); } } } } 
{ /* ./DotNet/compress.scm 141 */
obj_t BgL_arg4191z00_1553;
BgL_arg4191z00_1553 = 
CDR(BgL_l3086z00_1544); 
{ 
obj_t BgL_l3086z00_3197;
BgL_l3086z00_3197 = BgL_arg4191z00_1553; 
BgL_l3086z00_1544 = BgL_l3086z00_3197; 
goto BgL_forzd2each3087zd2_1545;} } }  else 
{ /* ./DotNet/compress.scm 141 */((bool_t)1); } } } } 
{ /* ./DotNet/compress.scm 146 */
BgL_nodez00_bglt BgL_arg4196z00_1554;
{ /* ./DotNet/compress.scm 146 */
BgL_nodez00_bglt BgL_arg4199z00_1555;
BgL_arg4199z00_1555 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_ez00_1540))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 146 */
BgL_nodez00_bglt BgL_res4418z00_2247;
{ /* ./DotNet/compress.scm 146 */
obj_t BgL_method3113z00_2222;
{ /* ./DotNet/compress.scm 146 */
BgL_objectz00_bglt BgL_objz00_2223;
BgL_objz00_2223 = 
(BgL_objectz00_bglt)(BgL_arg4199z00_1555); 
{ /* ./DotNet/compress.scm 146 */
long BgL_objzd2classzd2numz00_2224;
BgL_objzd2classzd2numz00_2224 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2223); 
{ /* ./DotNet/compress.scm 146 */
obj_t BgL_arg2017z00_2225;
{ /* ./DotNet/compress.scm 146 */
int BgL_auxz00_3201;
BgL_auxz00_3201 = 
(int)(((long)1)); 
BgL_arg2017z00_2225 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3201); } 
{ /* ./DotNet/compress.scm 146 */
int BgL_offsetz00_2228;
BgL_offsetz00_2228 = 
(int)(BgL_objzd2classzd2numz00_2224); 
{ /* ./DotNet/compress.scm 146 */
long BgL_offsetz00_2229;
{ /* ./DotNet/compress.scm 146 */
long BgL_auxz00_3205;
BgL_auxz00_3205 = 
(long)(BgL_offsetz00_2228); 
BgL_offsetz00_2229 = 
(BgL_auxz00_3205-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 146 */
long BgL_modz00_2230;
{ /* ./DotNet/compress.scm 146 */
int BgL_arg2028z00_2231;
BgL_arg2028z00_2231 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 146 */
long BgL_n2z00_2239;
BgL_n2z00_2239 = 
(long)(BgL_arg2028z00_2231); 
BgL_modz00_2230 = 
(BgL_offsetz00_2229/BgL_n2z00_2239); } } 
{ /* ./DotNet/compress.scm 146 */
long BgL_restz00_2232;
{ /* ./DotNet/compress.scm 146 */
int BgL_arg2024z00_2233;
BgL_arg2024z00_2233 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 146 */
long BgL_n2z00_2242;
BgL_n2z00_2242 = 
(long)(BgL_arg2024z00_2233); 
BgL_restz00_2232 = 
(BgL_offsetz00_2229%BgL_n2z00_2242); } } 
{ /* ./DotNet/compress.scm 146 */

{ /* ./DotNet/compress.scm 146 */
obj_t BgL_bucketz00_2234;
{ /* ./DotNet/compress.scm 146 */
int BgL_kz00_2244;
BgL_kz00_2244 = 
(int)(BgL_modz00_2230); 
BgL_bucketz00_2234 = 
VECTOR_REF(BgL_arg2017z00_2225,BgL_kz00_2244); } 
{ /* ./DotNet/compress.scm 146 */
int BgL_kz00_2246;
BgL_kz00_2246 = 
(int)(BgL_restz00_2232); 
BgL_method3113z00_2222 = 
VECTOR_REF(BgL_bucketz00_2234,BgL_kz00_2246); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 146 */
obj_t BgL_auxz00_3218;
BgL_auxz00_3218 = 
PROCEDURE_ENTRY(BgL_method3113z00_2222)(BgL_method3113z00_2222, 
(obj_t)(BgL_arg4199z00_1555), BEOA); 
BgL_res4418z00_2247 = 
(BgL_nodez00_bglt)(BgL_auxz00_3218); } } 
BgL_arg4196z00_1554 = BgL_res4418z00_2247; } } 
{ /* ./DotNet/compress.scm 146 */
BgL_letzd2funzd2_bglt BgL_obj2453z00_2248;BgL_nodez00_bglt BgL_val2452z00_2249;
BgL_obj2453z00_2248 = BgL_ez00_1540; 
BgL_val2452z00_2249 = BgL_arg4196z00_1554; 
((((BgL_letzd2funzd2_bglt)CREF(BgL_obj2453z00_2248))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_val2452z00_2249), BUNSPEC); } } 
BgL_auxz00_3159 = BgL_ez00_1540; 
return 
(obj_t)(BgL_auxz00_3159);} } } 
}



/* compile-compress-select3127 */
obj_t BGl_compilezd2compresszd2select3127z00zzdotnet_compressz00(obj_t BgL_envz00_2692, obj_t BgL_ez00_2693)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 133 */
{ 
BgL_selectz00_bglt BgL_ez00_1524;
{ /* ./DotNet/compress.scm 134 */
BgL_selectz00_bglt BgL_auxz00_3226;
BgL_ez00_1524 = 
(BgL_selectz00_bglt)(BgL_ez00_2693); 
{ /* ./DotNet/compress.scm 135 */
BgL_nodez00_bglt BgL_arg4146z00_1528;
{ /* ./DotNet/compress.scm 135 */
BgL_nodez00_bglt BgL_arg4149z00_1529;
BgL_arg4149z00_1529 = 
(((BgL_selectz00_bglt)CREF(BgL_ez00_1524))->BgL_testz00); 
{ /* ./DotNet/compress.scm 135 */
BgL_nodez00_bglt BgL_res4409z00_2148;
{ /* ./DotNet/compress.scm 135 */
obj_t BgL_method3113z00_2123;
{ /* ./DotNet/compress.scm 135 */
BgL_objectz00_bglt BgL_objz00_2124;
BgL_objz00_2124 = 
(BgL_objectz00_bglt)(BgL_arg4149z00_1529); 
{ /* ./DotNet/compress.scm 135 */
long BgL_objzd2classzd2numz00_2125;
BgL_objzd2classzd2numz00_2125 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2124); 
{ /* ./DotNet/compress.scm 135 */
obj_t BgL_arg2017z00_2126;
{ /* ./DotNet/compress.scm 135 */
int BgL_auxz00_3230;
BgL_auxz00_3230 = 
(int)(((long)1)); 
BgL_arg2017z00_2126 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3230); } 
{ /* ./DotNet/compress.scm 135 */
int BgL_offsetz00_2129;
BgL_offsetz00_2129 = 
(int)(BgL_objzd2classzd2numz00_2125); 
{ /* ./DotNet/compress.scm 135 */
long BgL_offsetz00_2130;
{ /* ./DotNet/compress.scm 135 */
long BgL_auxz00_3234;
BgL_auxz00_3234 = 
(long)(BgL_offsetz00_2129); 
BgL_offsetz00_2130 = 
(BgL_auxz00_3234-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 135 */
long BgL_modz00_2131;
{ /* ./DotNet/compress.scm 135 */
int BgL_arg2028z00_2132;
BgL_arg2028z00_2132 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 135 */
long BgL_n2z00_2140;
BgL_n2z00_2140 = 
(long)(BgL_arg2028z00_2132); 
BgL_modz00_2131 = 
(BgL_offsetz00_2130/BgL_n2z00_2140); } } 
{ /* ./DotNet/compress.scm 135 */
long BgL_restz00_2133;
{ /* ./DotNet/compress.scm 135 */
int BgL_arg2024z00_2134;
BgL_arg2024z00_2134 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 135 */
long BgL_n2z00_2143;
BgL_n2z00_2143 = 
(long)(BgL_arg2024z00_2134); 
BgL_restz00_2133 = 
(BgL_offsetz00_2130%BgL_n2z00_2143); } } 
{ /* ./DotNet/compress.scm 135 */

{ /* ./DotNet/compress.scm 135 */
obj_t BgL_bucketz00_2135;
{ /* ./DotNet/compress.scm 135 */
int BgL_kz00_2145;
BgL_kz00_2145 = 
(int)(BgL_modz00_2131); 
BgL_bucketz00_2135 = 
VECTOR_REF(BgL_arg2017z00_2126,BgL_kz00_2145); } 
{ /* ./DotNet/compress.scm 135 */
int BgL_kz00_2147;
BgL_kz00_2147 = 
(int)(BgL_restz00_2133); 
BgL_method3113z00_2123 = 
VECTOR_REF(BgL_bucketz00_2135,BgL_kz00_2147); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 135 */
obj_t BgL_auxz00_3247;
BgL_auxz00_3247 = 
PROCEDURE_ENTRY(BgL_method3113z00_2123)(BgL_method3113z00_2123, 
(obj_t)(BgL_arg4149z00_1529), BEOA); 
BgL_res4409z00_2148 = 
(BgL_nodez00_bglt)(BgL_auxz00_3247); } } 
BgL_arg4146z00_1528 = BgL_res4409z00_2148; } } 
{ /* ./DotNet/compress.scm 135 */
BgL_selectz00_bglt BgL_obj2410z00_2149;BgL_nodez00_bglt BgL_val2409z00_2150;
BgL_obj2410z00_2149 = BgL_ez00_1524; 
BgL_val2409z00_2150 = BgL_arg4146z00_1528; 
((((BgL_selectz00_bglt)CREF(BgL_obj2410z00_2149))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_val2409z00_2150), BUNSPEC); } } 
{ 
obj_t BgL_l3082z00_1530;
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_arg4153z00_1532;
BgL_arg4153z00_1532 = 
(((BgL_selectz00_bglt)CREF(BgL_ez00_1524))->BgL_clausesz00); 
BgL_l3082z00_1530 = BgL_arg4153z00_1532; 
BgL_forzd2each3083zd2_1531:
{ /* ./DotNet/compress.scm 136 */
bool_t BgL_test4156z00_1533;
BgL_test4156z00_1533 = 
PAIRP(BgL_l3082z00_1530); 
if(BgL_test4156z00_1533)
{ /* ./DotNet/compress.scm 136 */
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_cz00_1534;
BgL_cz00_1534 = 
CAR(BgL_l3082z00_1530); 
{ /* ./DotNet/compress.scm 136 */
BgL_nodez00_bglt BgL_arg4158z00_1535;
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_arg4161z00_1536;
BgL_arg4161z00_1536 = 
CDR(BgL_cz00_1534); 
{ /* ./DotNet/compress.scm 136 */
BgL_nodez00_bglt BgL_res4412z00_2181;
{ /* ./DotNet/compress.scm 136 */
BgL_nodez00_bglt BgL_ez00_2155;
BgL_ez00_2155 = 
(BgL_nodez00_bglt)(BgL_arg4161z00_1536); 
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_method3113z00_2156;
{ /* ./DotNet/compress.scm 136 */
BgL_objectz00_bglt BgL_objz00_2157;
BgL_objz00_2157 = 
(BgL_objectz00_bglt)(BgL_ez00_2155); 
{ /* ./DotNet/compress.scm 136 */
long BgL_objzd2classzd2numz00_2158;
BgL_objzd2classzd2numz00_2158 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2157); 
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_arg2017z00_2159;
{ /* ./DotNet/compress.scm 136 */
int BgL_auxz00_3261;
BgL_auxz00_3261 = 
(int)(((long)1)); 
BgL_arg2017z00_2159 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3261); } 
{ /* ./DotNet/compress.scm 136 */
int BgL_offsetz00_2162;
BgL_offsetz00_2162 = 
(int)(BgL_objzd2classzd2numz00_2158); 
{ /* ./DotNet/compress.scm 136 */
long BgL_offsetz00_2163;
{ /* ./DotNet/compress.scm 136 */
long BgL_auxz00_3265;
BgL_auxz00_3265 = 
(long)(BgL_offsetz00_2162); 
BgL_offsetz00_2163 = 
(BgL_auxz00_3265-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 136 */
long BgL_modz00_2164;
{ /* ./DotNet/compress.scm 136 */
int BgL_arg2028z00_2165;
BgL_arg2028z00_2165 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 136 */
long BgL_n2z00_2173;
BgL_n2z00_2173 = 
(long)(BgL_arg2028z00_2165); 
BgL_modz00_2164 = 
(BgL_offsetz00_2163/BgL_n2z00_2173); } } 
{ /* ./DotNet/compress.scm 136 */
long BgL_restz00_2166;
{ /* ./DotNet/compress.scm 136 */
int BgL_arg2024z00_2167;
BgL_arg2024z00_2167 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 136 */
long BgL_n2z00_2176;
BgL_n2z00_2176 = 
(long)(BgL_arg2024z00_2167); 
BgL_restz00_2166 = 
(BgL_offsetz00_2163%BgL_n2z00_2176); } } 
{ /* ./DotNet/compress.scm 136 */

{ /* ./DotNet/compress.scm 136 */
obj_t BgL_bucketz00_2168;
{ /* ./DotNet/compress.scm 136 */
int BgL_kz00_2178;
BgL_kz00_2178 = 
(int)(BgL_modz00_2164); 
BgL_bucketz00_2168 = 
VECTOR_REF(BgL_arg2017z00_2159,BgL_kz00_2178); } 
{ /* ./DotNet/compress.scm 136 */
int BgL_kz00_2180;
BgL_kz00_2180 = 
(int)(BgL_restz00_2166); 
BgL_method3113z00_2156 = 
VECTOR_REF(BgL_bucketz00_2168,BgL_kz00_2180); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_auxz00_3278;
BgL_auxz00_3278 = 
PROCEDURE_ENTRY(BgL_method3113z00_2156)(BgL_method3113z00_2156, 
(obj_t)(BgL_ez00_2155), BEOA); 
BgL_res4412z00_2181 = 
(BgL_nodez00_bglt)(BgL_auxz00_3278); } } } 
BgL_arg4158z00_1535 = BgL_res4412z00_2181; } } 
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_objz00_2183;
BgL_objz00_2183 = 
(obj_t)(BgL_arg4158z00_1535); 
SET_CDR(BgL_cz00_1534, BgL_objz00_2183); } } } 
{ /* ./DotNet/compress.scm 136 */
obj_t BgL_arg4166z00_1537;
BgL_arg4166z00_1537 = 
CDR(BgL_l3082z00_1530); 
{ 
obj_t BgL_l3082z00_3286;
BgL_l3082z00_3286 = BgL_arg4166z00_1537; 
BgL_l3082z00_1530 = BgL_l3082z00_3286; 
goto BgL_forzd2each3083zd2_1531;} } }  else 
{ /* ./DotNet/compress.scm 136 */((bool_t)1); } } } } 
BgL_auxz00_3226 = BgL_ez00_1524; 
return 
(obj_t)(BgL_auxz00_3226);} } } 
}



/* compile-compress-conditional3125 */
obj_t BGl_compilezd2compresszd2conditional3125z00zzdotnet_compressz00(obj_t BgL_envz00_2694, obj_t BgL_ez00_2695)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 126 */
{ 
BgL_conditionalz00_bglt BgL_ez00_1512;
{ /* ./DotNet/compress.scm 127 */
BgL_conditionalz00_bglt BgL_auxz00_3289;
BgL_ez00_1512 = 
(BgL_conditionalz00_bglt)(BgL_ez00_2695); 
{ /* ./DotNet/compress.scm 128 */
BgL_nodez00_bglt BgL_arg4119z00_1516;
{ /* ./DotNet/compress.scm 128 */
BgL_nodez00_bglt BgL_arg4122z00_1517;
BgL_arg4122z00_1517 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_1512))->BgL_testz00); 
{ /* ./DotNet/compress.scm 128 */
BgL_nodez00_bglt BgL_res4400z00_2058;
{ /* ./DotNet/compress.scm 128 */
obj_t BgL_method3113z00_2033;
{ /* ./DotNet/compress.scm 128 */
BgL_objectz00_bglt BgL_objz00_2034;
BgL_objz00_2034 = 
(BgL_objectz00_bglt)(BgL_arg4122z00_1517); 
{ /* ./DotNet/compress.scm 128 */
long BgL_objzd2classzd2numz00_2035;
BgL_objzd2classzd2numz00_2035 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2034); 
{ /* ./DotNet/compress.scm 128 */
obj_t BgL_arg2017z00_2036;
{ /* ./DotNet/compress.scm 128 */
int BgL_auxz00_3293;
BgL_auxz00_3293 = 
(int)(((long)1)); 
BgL_arg2017z00_2036 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3293); } 
{ /* ./DotNet/compress.scm 128 */
int BgL_offsetz00_2039;
BgL_offsetz00_2039 = 
(int)(BgL_objzd2classzd2numz00_2035); 
{ /* ./DotNet/compress.scm 128 */
long BgL_offsetz00_2040;
{ /* ./DotNet/compress.scm 128 */
long BgL_auxz00_3297;
BgL_auxz00_3297 = 
(long)(BgL_offsetz00_2039); 
BgL_offsetz00_2040 = 
(BgL_auxz00_3297-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 128 */
long BgL_modz00_2041;
{ /* ./DotNet/compress.scm 128 */
int BgL_arg2028z00_2042;
BgL_arg2028z00_2042 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 128 */
long BgL_n2z00_2050;
BgL_n2z00_2050 = 
(long)(BgL_arg2028z00_2042); 
BgL_modz00_2041 = 
(BgL_offsetz00_2040/BgL_n2z00_2050); } } 
{ /* ./DotNet/compress.scm 128 */
long BgL_restz00_2043;
{ /* ./DotNet/compress.scm 128 */
int BgL_arg2024z00_2044;
BgL_arg2024z00_2044 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 128 */
long BgL_n2z00_2053;
BgL_n2z00_2053 = 
(long)(BgL_arg2024z00_2044); 
BgL_restz00_2043 = 
(BgL_offsetz00_2040%BgL_n2z00_2053); } } 
{ /* ./DotNet/compress.scm 128 */

{ /* ./DotNet/compress.scm 128 */
obj_t BgL_bucketz00_2045;
{ /* ./DotNet/compress.scm 128 */
int BgL_kz00_2055;
BgL_kz00_2055 = 
(int)(BgL_modz00_2041); 
BgL_bucketz00_2045 = 
VECTOR_REF(BgL_arg2017z00_2036,BgL_kz00_2055); } 
{ /* ./DotNet/compress.scm 128 */
int BgL_kz00_2057;
BgL_kz00_2057 = 
(int)(BgL_restz00_2043); 
BgL_method3113z00_2033 = 
VECTOR_REF(BgL_bucketz00_2045,BgL_kz00_2057); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 128 */
obj_t BgL_auxz00_3310;
BgL_auxz00_3310 = 
PROCEDURE_ENTRY(BgL_method3113z00_2033)(BgL_method3113z00_2033, 
(obj_t)(BgL_arg4122z00_1517), BEOA); 
BgL_res4400z00_2058 = 
(BgL_nodez00_bglt)(BgL_auxz00_3310); } } 
BgL_arg4119z00_1516 = BgL_res4400z00_2058; } } 
{ /* ./DotNet/compress.scm 128 */
BgL_conditionalz00_bglt BgL_obj2334z00_2059;BgL_nodez00_bglt BgL_val2333z00_2060;
BgL_obj2334z00_2059 = BgL_ez00_1512; 
BgL_val2333z00_2060 = BgL_arg4119z00_1516; 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2334z00_2059))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_val2333z00_2060), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 129 */
BgL_nodez00_bglt BgL_arg4126z00_1518;
{ /* ./DotNet/compress.scm 129 */
BgL_nodez00_bglt BgL_arg4129z00_1519;
BgL_arg4129z00_1519 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_1512))->BgL_truez00); 
{ /* ./DotNet/compress.scm 129 */
BgL_nodez00_bglt BgL_res4403z00_2088;
{ /* ./DotNet/compress.scm 129 */
obj_t BgL_method3113z00_2063;
{ /* ./DotNet/compress.scm 129 */
BgL_objectz00_bglt BgL_objz00_2064;
BgL_objz00_2064 = 
(BgL_objectz00_bglt)(BgL_arg4129z00_1519); 
{ /* ./DotNet/compress.scm 129 */
long BgL_objzd2classzd2numz00_2065;
BgL_objzd2classzd2numz00_2065 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2064); 
{ /* ./DotNet/compress.scm 129 */
obj_t BgL_arg2017z00_2066;
{ /* ./DotNet/compress.scm 129 */
int BgL_auxz00_3319;
BgL_auxz00_3319 = 
(int)(((long)1)); 
BgL_arg2017z00_2066 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3319); } 
{ /* ./DotNet/compress.scm 129 */
int BgL_offsetz00_2069;
BgL_offsetz00_2069 = 
(int)(BgL_objzd2classzd2numz00_2065); 
{ /* ./DotNet/compress.scm 129 */
long BgL_offsetz00_2070;
{ /* ./DotNet/compress.scm 129 */
long BgL_auxz00_3323;
BgL_auxz00_3323 = 
(long)(BgL_offsetz00_2069); 
BgL_offsetz00_2070 = 
(BgL_auxz00_3323-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 129 */
long BgL_modz00_2071;
{ /* ./DotNet/compress.scm 129 */
int BgL_arg2028z00_2072;
BgL_arg2028z00_2072 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 129 */
long BgL_n2z00_2080;
BgL_n2z00_2080 = 
(long)(BgL_arg2028z00_2072); 
BgL_modz00_2071 = 
(BgL_offsetz00_2070/BgL_n2z00_2080); } } 
{ /* ./DotNet/compress.scm 129 */
long BgL_restz00_2073;
{ /* ./DotNet/compress.scm 129 */
int BgL_arg2024z00_2074;
BgL_arg2024z00_2074 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 129 */
long BgL_n2z00_2083;
BgL_n2z00_2083 = 
(long)(BgL_arg2024z00_2074); 
BgL_restz00_2073 = 
(BgL_offsetz00_2070%BgL_n2z00_2083); } } 
{ /* ./DotNet/compress.scm 129 */

{ /* ./DotNet/compress.scm 129 */
obj_t BgL_bucketz00_2075;
{ /* ./DotNet/compress.scm 129 */
int BgL_kz00_2085;
BgL_kz00_2085 = 
(int)(BgL_modz00_2071); 
BgL_bucketz00_2075 = 
VECTOR_REF(BgL_arg2017z00_2066,BgL_kz00_2085); } 
{ /* ./DotNet/compress.scm 129 */
int BgL_kz00_2087;
BgL_kz00_2087 = 
(int)(BgL_restz00_2073); 
BgL_method3113z00_2063 = 
VECTOR_REF(BgL_bucketz00_2075,BgL_kz00_2087); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 129 */
obj_t BgL_auxz00_3336;
BgL_auxz00_3336 = 
PROCEDURE_ENTRY(BgL_method3113z00_2063)(BgL_method3113z00_2063, 
(obj_t)(BgL_arg4129z00_1519), BEOA); 
BgL_res4403z00_2088 = 
(BgL_nodez00_bglt)(BgL_auxz00_3336); } } 
BgL_arg4126z00_1518 = BgL_res4403z00_2088; } } 
{ /* ./DotNet/compress.scm 129 */
BgL_conditionalz00_bglt BgL_obj2337z00_2089;BgL_nodez00_bglt BgL_val2336z00_2090;
BgL_obj2337z00_2089 = BgL_ez00_1512; 
BgL_val2336z00_2090 = BgL_arg4126z00_1518; 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2337z00_2089))->BgL_truez00) = ((BgL_nodez00_bglt)BgL_val2336z00_2090), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 130 */
BgL_nodez00_bglt BgL_arg4133z00_1520;
{ /* ./DotNet/compress.scm 130 */
BgL_nodez00_bglt BgL_arg4136z00_1521;
BgL_arg4136z00_1521 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_1512))->BgL_falsez00); 
{ /* ./DotNet/compress.scm 130 */
BgL_nodez00_bglt BgL_res4406z00_2118;
{ /* ./DotNet/compress.scm 130 */
obj_t BgL_method3113z00_2093;
{ /* ./DotNet/compress.scm 130 */
BgL_objectz00_bglt BgL_objz00_2094;
BgL_objz00_2094 = 
(BgL_objectz00_bglt)(BgL_arg4136z00_1521); 
{ /* ./DotNet/compress.scm 130 */
long BgL_objzd2classzd2numz00_2095;
BgL_objzd2classzd2numz00_2095 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2094); 
{ /* ./DotNet/compress.scm 130 */
obj_t BgL_arg2017z00_2096;
{ /* ./DotNet/compress.scm 130 */
int BgL_auxz00_3345;
BgL_auxz00_3345 = 
(int)(((long)1)); 
BgL_arg2017z00_2096 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3345); } 
{ /* ./DotNet/compress.scm 130 */
int BgL_offsetz00_2099;
BgL_offsetz00_2099 = 
(int)(BgL_objzd2classzd2numz00_2095); 
{ /* ./DotNet/compress.scm 130 */
long BgL_offsetz00_2100;
{ /* ./DotNet/compress.scm 130 */
long BgL_auxz00_3349;
BgL_auxz00_3349 = 
(long)(BgL_offsetz00_2099); 
BgL_offsetz00_2100 = 
(BgL_auxz00_3349-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 130 */
long BgL_modz00_2101;
{ /* ./DotNet/compress.scm 130 */
int BgL_arg2028z00_2102;
BgL_arg2028z00_2102 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 130 */
long BgL_n2z00_2110;
BgL_n2z00_2110 = 
(long)(BgL_arg2028z00_2102); 
BgL_modz00_2101 = 
(BgL_offsetz00_2100/BgL_n2z00_2110); } } 
{ /* ./DotNet/compress.scm 130 */
long BgL_restz00_2103;
{ /* ./DotNet/compress.scm 130 */
int BgL_arg2024z00_2104;
BgL_arg2024z00_2104 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 130 */
long BgL_n2z00_2113;
BgL_n2z00_2113 = 
(long)(BgL_arg2024z00_2104); 
BgL_restz00_2103 = 
(BgL_offsetz00_2100%BgL_n2z00_2113); } } 
{ /* ./DotNet/compress.scm 130 */

{ /* ./DotNet/compress.scm 130 */
obj_t BgL_bucketz00_2105;
{ /* ./DotNet/compress.scm 130 */
int BgL_kz00_2115;
BgL_kz00_2115 = 
(int)(BgL_modz00_2101); 
BgL_bucketz00_2105 = 
VECTOR_REF(BgL_arg2017z00_2096,BgL_kz00_2115); } 
{ /* ./DotNet/compress.scm 130 */
int BgL_kz00_2117;
BgL_kz00_2117 = 
(int)(BgL_restz00_2103); 
BgL_method3113z00_2093 = 
VECTOR_REF(BgL_bucketz00_2105,BgL_kz00_2117); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 130 */
obj_t BgL_auxz00_3362;
BgL_auxz00_3362 = 
PROCEDURE_ENTRY(BgL_method3113z00_2093)(BgL_method3113z00_2093, 
(obj_t)(BgL_arg4136z00_1521), BEOA); 
BgL_res4406z00_2118 = 
(BgL_nodez00_bglt)(BgL_auxz00_3362); } } 
BgL_arg4133z00_1520 = BgL_res4406z00_2118; } } 
{ /* ./DotNet/compress.scm 130 */
BgL_conditionalz00_bglt BgL_obj2340z00_2119;BgL_nodez00_bglt BgL_val2339z00_2120;
BgL_obj2340z00_2119 = BgL_ez00_1512; 
BgL_val2339z00_2120 = BgL_arg4133z00_1520; 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2340z00_2119))->BgL_falsez00) = ((BgL_nodez00_bglt)BgL_val2339z00_2120), BUNSPEC); } } 
BgL_auxz00_3289 = BgL_ez00_1512; 
return 
(obj_t)(BgL_auxz00_3289);} } } 
}



/* compile-compress-sequence3123 */
obj_t BGl_compilezd2compresszd2sequence3123z00zzdotnet_compressz00(obj_t BgL_envz00_2696, obj_t BgL_ez00_2697)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 118 */
{ 
BgL_sequencez00_bglt BgL_ez00_1498;
BgL_ez00_1498 = 
(BgL_sequencez00_bglt)(BgL_ez00_2697); 
{ /* ./DotNet/compress.scm 120 */
bool_t BgL_test4088z00_1502;
{ /* ./DotNet/compress.scm 120 */
bool_t BgL_testz00_3370;
{ /* ./DotNet/compress.scm 120 */
obj_t BgL_auxz00_3371;
BgL_auxz00_3371 = 
(((BgL_sequencez00_bglt)CREF(BgL_ez00_1498))->BgL_nodesz00); 
BgL_testz00_3370 = 
PAIRP(BgL_auxz00_3371); } 
if(BgL_testz00_3370)
{ /* ./DotNet/compress.scm 120 */
obj_t BgL_auxz00_3374;
{ /* ./DotNet/compress.scm 120 */
obj_t BgL_auxz00_3375;
BgL_auxz00_3375 = 
(((BgL_sequencez00_bglt)CREF(BgL_ez00_1498))->BgL_nodesz00); 
BgL_auxz00_3374 = 
CDR(BgL_auxz00_3375); } 
BgL_test4088z00_1502 = 
NULLP(BgL_auxz00_3374); }  else 
{ /* ./DotNet/compress.scm 120 */
BgL_test4088z00_1502 = ((bool_t)0); } } 
if(BgL_test4088z00_1502)
{ /* ./DotNet/compress.scm 121 */
obj_t BgL_arg4090z00_1503;
{ /* ./DotNet/compress.scm 121 */
obj_t BgL_auxz00_3380;
BgL_auxz00_3380 = 
(((BgL_sequencez00_bglt)CREF(BgL_ez00_1498))->BgL_nodesz00); 
BgL_arg4090z00_1503 = 
CAR(BgL_auxz00_3380); } 
{ /* ./DotNet/compress.scm 121 */
BgL_nodez00_bglt BgL_res4397z00_2029;
{ /* ./DotNet/compress.scm 121 */
BgL_nodez00_bglt BgL_ez00_2003;
BgL_ez00_2003 = 
(BgL_nodez00_bglt)(BgL_arg4090z00_1503); 
{ /* ./DotNet/compress.scm 121 */
obj_t BgL_method3113z00_2004;
{ /* ./DotNet/compress.scm 121 */
BgL_objectz00_bglt BgL_objz00_2005;
BgL_objz00_2005 = 
(BgL_objectz00_bglt)(BgL_ez00_2003); 
{ /* ./DotNet/compress.scm 121 */
long BgL_objzd2classzd2numz00_2006;
BgL_objzd2classzd2numz00_2006 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2005); 
{ /* ./DotNet/compress.scm 121 */
obj_t BgL_arg2017z00_2007;
{ /* ./DotNet/compress.scm 121 */
int BgL_auxz00_3386;
BgL_auxz00_3386 = 
(int)(((long)1)); 
BgL_arg2017z00_2007 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3386); } 
{ /* ./DotNet/compress.scm 121 */
int BgL_offsetz00_2010;
BgL_offsetz00_2010 = 
(int)(BgL_objzd2classzd2numz00_2006); 
{ /* ./DotNet/compress.scm 121 */
long BgL_offsetz00_2011;
{ /* ./DotNet/compress.scm 121 */
long BgL_auxz00_3390;
BgL_auxz00_3390 = 
(long)(BgL_offsetz00_2010); 
BgL_offsetz00_2011 = 
(BgL_auxz00_3390-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 121 */
long BgL_modz00_2012;
{ /* ./DotNet/compress.scm 121 */
int BgL_arg2028z00_2013;
BgL_arg2028z00_2013 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 121 */
long BgL_n2z00_2021;
BgL_n2z00_2021 = 
(long)(BgL_arg2028z00_2013); 
BgL_modz00_2012 = 
(BgL_offsetz00_2011/BgL_n2z00_2021); } } 
{ /* ./DotNet/compress.scm 121 */
long BgL_restz00_2014;
{ /* ./DotNet/compress.scm 121 */
int BgL_arg2024z00_2015;
BgL_arg2024z00_2015 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 121 */
long BgL_n2z00_2024;
BgL_n2z00_2024 = 
(long)(BgL_arg2024z00_2015); 
BgL_restz00_2014 = 
(BgL_offsetz00_2011%BgL_n2z00_2024); } } 
{ /* ./DotNet/compress.scm 121 */

{ /* ./DotNet/compress.scm 121 */
obj_t BgL_bucketz00_2016;
{ /* ./DotNet/compress.scm 121 */
int BgL_kz00_2026;
BgL_kz00_2026 = 
(int)(BgL_modz00_2012); 
BgL_bucketz00_2016 = 
VECTOR_REF(BgL_arg2017z00_2007,BgL_kz00_2026); } 
{ /* ./DotNet/compress.scm 121 */
int BgL_kz00_2028;
BgL_kz00_2028 = 
(int)(BgL_restz00_2014); 
BgL_method3113z00_2004 = 
VECTOR_REF(BgL_bucketz00_2016,BgL_kz00_2028); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 121 */
obj_t BgL_auxz00_3403;
BgL_auxz00_3403 = 
PROCEDURE_ENTRY(BgL_method3113z00_2004)(BgL_method3113z00_2004, 
(obj_t)(BgL_ez00_2003), BEOA); 
BgL_res4397z00_2029 = 
(BgL_nodez00_bglt)(BgL_auxz00_3403); } } } 
return 
(obj_t)(BgL_res4397z00_2029);} }  else 
{ /* ./DotNet/compress.scm 120 */
{ /* ./DotNet/compress.scm 123 */
obj_t BgL_arg4097z00_1505;
BgL_arg4097z00_1505 = 
(((BgL_sequencez00_bglt)CREF(BgL_ez00_1498))->BgL_nodesz00); 
BGl_compressza2za2zzdotnet_compressz00(BgL_arg4097z00_1505); } 
return 
(obj_t)(BgL_ez00_1498);} } } } 
}



/* compile-compress-setq3121 */
obj_t BGl_compilezd2compresszd2setq3121z00zzdotnet_compressz00(obj_t BgL_envz00_2698, obj_t BgL_ez00_2699)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 113 */
{ 
BgL_setqz00_bglt BgL_ez00_1490;
{ /* ./DotNet/compress.scm 114 */
BgL_setqz00_bglt BgL_auxz00_3413;
BgL_ez00_1490 = 
(BgL_setqz00_bglt)(BgL_ez00_2699); 
{ /* ./DotNet/compress.scm 115 */
BgL_nodez00_bglt BgL_arg4076z00_1494;
{ /* ./DotNet/compress.scm 115 */
BgL_nodez00_bglt BgL_arg4079z00_1495;
BgL_arg4079z00_1495 = 
(((BgL_setqz00_bglt)CREF(BgL_ez00_1490))->BgL_valuez00); 
{ /* ./DotNet/compress.scm 115 */
BgL_nodez00_bglt BgL_res4394z00_1993;
{ /* ./DotNet/compress.scm 115 */
obj_t BgL_method3113z00_1968;
{ /* ./DotNet/compress.scm 115 */
BgL_objectz00_bglt BgL_objz00_1969;
BgL_objz00_1969 = 
(BgL_objectz00_bglt)(BgL_arg4079z00_1495); 
{ /* ./DotNet/compress.scm 115 */
long BgL_objzd2classzd2numz00_1970;
BgL_objzd2classzd2numz00_1970 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1969); 
{ /* ./DotNet/compress.scm 115 */
obj_t BgL_arg2017z00_1971;
{ /* ./DotNet/compress.scm 115 */
int BgL_auxz00_3417;
BgL_auxz00_3417 = 
(int)(((long)1)); 
BgL_arg2017z00_1971 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3417); } 
{ /* ./DotNet/compress.scm 115 */
int BgL_offsetz00_1974;
BgL_offsetz00_1974 = 
(int)(BgL_objzd2classzd2numz00_1970); 
{ /* ./DotNet/compress.scm 115 */
long BgL_offsetz00_1975;
{ /* ./DotNet/compress.scm 115 */
long BgL_auxz00_3421;
BgL_auxz00_3421 = 
(long)(BgL_offsetz00_1974); 
BgL_offsetz00_1975 = 
(BgL_auxz00_3421-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 115 */
long BgL_modz00_1976;
{ /* ./DotNet/compress.scm 115 */
int BgL_arg2028z00_1977;
BgL_arg2028z00_1977 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 115 */
long BgL_n2z00_1985;
BgL_n2z00_1985 = 
(long)(BgL_arg2028z00_1977); 
BgL_modz00_1976 = 
(BgL_offsetz00_1975/BgL_n2z00_1985); } } 
{ /* ./DotNet/compress.scm 115 */
long BgL_restz00_1978;
{ /* ./DotNet/compress.scm 115 */
int BgL_arg2024z00_1979;
BgL_arg2024z00_1979 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 115 */
long BgL_n2z00_1988;
BgL_n2z00_1988 = 
(long)(BgL_arg2024z00_1979); 
BgL_restz00_1978 = 
(BgL_offsetz00_1975%BgL_n2z00_1988); } } 
{ /* ./DotNet/compress.scm 115 */

{ /* ./DotNet/compress.scm 115 */
obj_t BgL_bucketz00_1980;
{ /* ./DotNet/compress.scm 115 */
int BgL_kz00_1990;
BgL_kz00_1990 = 
(int)(BgL_modz00_1976); 
BgL_bucketz00_1980 = 
VECTOR_REF(BgL_arg2017z00_1971,BgL_kz00_1990); } 
{ /* ./DotNet/compress.scm 115 */
int BgL_kz00_1992;
BgL_kz00_1992 = 
(int)(BgL_restz00_1978); 
BgL_method3113z00_1968 = 
VECTOR_REF(BgL_bucketz00_1980,BgL_kz00_1992); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 115 */
obj_t BgL_auxz00_3434;
BgL_auxz00_3434 = 
PROCEDURE_ENTRY(BgL_method3113z00_1968)(BgL_method3113z00_1968, 
(obj_t)(BgL_arg4079z00_1495), BEOA); 
BgL_res4394z00_1993 = 
(BgL_nodez00_bglt)(BgL_auxz00_3434); } } 
BgL_arg4076z00_1494 = BgL_res4394z00_1993; } } 
{ /* ./DotNet/compress.scm 115 */
BgL_setqz00_bglt BgL_obj2305z00_1994;BgL_nodez00_bglt BgL_val2304z00_1995;
BgL_obj2305z00_1994 = BgL_ez00_1490; 
BgL_val2304z00_1995 = BgL_arg4076z00_1494; 
((((BgL_setqz00_bglt)CREF(BgL_obj2305z00_1994))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_val2304z00_1995), BUNSPEC); } } 
BgL_auxz00_3413 = BgL_ez00_1490; 
return 
(obj_t)(BgL_auxz00_3413);} } } 
}



/* compile-compress-let-var3119 */
obj_t BGl_compilezd2compresszd2letzd2var3119zd2zzdotnet_compressz00(obj_t BgL_envz00_2700, obj_t BgL_ez00_2701)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 28 */
{ 
BgL_letzd2varzd2_bglt BgL_ez00_1212;
BgL_ez00_1212 = 
(BgL_letzd2varzd2_bglt)(BgL_ez00_2701); 
{ /* ./DotNet/compress.scm 62 */
BgL_nodez00_bglt BgL_arg3552z00_1223;
{ /* ./DotNet/compress.scm 62 */
BgL_nodez00_bglt BgL_arg3556z00_1224;
BgL_arg3556z00_1224 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 62 */
BgL_nodez00_bglt BgL_res4386z00_1710;
{ /* ./DotNet/compress.scm 62 */
obj_t BgL_method3113z00_1685;
{ /* ./DotNet/compress.scm 62 */
BgL_objectz00_bglt BgL_objz00_1686;
BgL_objz00_1686 = 
(BgL_objectz00_bglt)(BgL_arg3556z00_1224); 
{ /* ./DotNet/compress.scm 62 */
long BgL_objzd2classzd2numz00_1687;
BgL_objzd2classzd2numz00_1687 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1686); 
{ /* ./DotNet/compress.scm 62 */
obj_t BgL_arg2017z00_1688;
{ /* ./DotNet/compress.scm 62 */
int BgL_auxz00_3445;
BgL_auxz00_3445 = 
(int)(((long)1)); 
BgL_arg2017z00_1688 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3445); } 
{ /* ./DotNet/compress.scm 62 */
int BgL_offsetz00_1691;
BgL_offsetz00_1691 = 
(int)(BgL_objzd2classzd2numz00_1687); 
{ /* ./DotNet/compress.scm 62 */
long BgL_offsetz00_1692;
{ /* ./DotNet/compress.scm 62 */
long BgL_auxz00_3449;
BgL_auxz00_3449 = 
(long)(BgL_offsetz00_1691); 
BgL_offsetz00_1692 = 
(BgL_auxz00_3449-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 62 */
long BgL_modz00_1693;
{ /* ./DotNet/compress.scm 62 */
int BgL_arg2028z00_1694;
BgL_arg2028z00_1694 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 62 */
long BgL_n2z00_1702;
BgL_n2z00_1702 = 
(long)(BgL_arg2028z00_1694); 
BgL_modz00_1693 = 
(BgL_offsetz00_1692/BgL_n2z00_1702); } } 
{ /* ./DotNet/compress.scm 62 */
long BgL_restz00_1695;
{ /* ./DotNet/compress.scm 62 */
int BgL_arg2024z00_1696;
BgL_arg2024z00_1696 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 62 */
long BgL_n2z00_1705;
BgL_n2z00_1705 = 
(long)(BgL_arg2024z00_1696); 
BgL_restz00_1695 = 
(BgL_offsetz00_1692%BgL_n2z00_1705); } } 
{ /* ./DotNet/compress.scm 62 */

{ /* ./DotNet/compress.scm 62 */
obj_t BgL_bucketz00_1697;
{ /* ./DotNet/compress.scm 62 */
int BgL_kz00_1707;
BgL_kz00_1707 = 
(int)(BgL_modz00_1693); 
BgL_bucketz00_1697 = 
VECTOR_REF(BgL_arg2017z00_1688,BgL_kz00_1707); } 
{ /* ./DotNet/compress.scm 62 */
int BgL_kz00_1709;
BgL_kz00_1709 = 
(int)(BgL_restz00_1695); 
BgL_method3113z00_1685 = 
VECTOR_REF(BgL_bucketz00_1697,BgL_kz00_1709); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 62 */
obj_t BgL_auxz00_3462;
BgL_auxz00_3462 = 
PROCEDURE_ENTRY(BgL_method3113z00_1685)(BgL_method3113z00_1685, 
(obj_t)(BgL_arg3556z00_1224), BEOA); 
BgL_res4386z00_1710 = 
(BgL_nodez00_bglt)(BgL_auxz00_3462); } } 
BgL_arg3552z00_1223 = BgL_res4386z00_1710; } } 
{ /* ./DotNet/compress.scm 62 */
BgL_letzd2varzd2_bglt BgL_obj2491z00_1711;BgL_nodez00_bglt BgL_val2490z00_1712;
BgL_obj2491z00_1711 = BgL_ez00_1212; 
BgL_val2490z00_1712 = BgL_arg3552z00_1223; 
((((BgL_letzd2varzd2_bglt)CREF(BgL_obj2491z00_1711))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_val2490z00_1712), BUNSPEC); } } 
{ 
obj_t BgL_l3045z00_1225;
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_arg3560z00_1227;
BgL_arg3560z00_1227 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_l3045z00_1225 = BgL_arg3560z00_1227; 
BgL_forzd2each3046zd2_1226:
{ /* ./DotNet/compress.scm 63 */
bool_t BgL_test3563z00_1228;
BgL_test3563z00_1228 = 
PAIRP(BgL_l3045z00_1225); 
if(BgL_test3563z00_1228)
{ /* ./DotNet/compress.scm 63 */
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_cz00_1229;
BgL_cz00_1229 = 
CAR(BgL_l3045z00_1225); 
{ /* ./DotNet/compress.scm 63 */
BgL_nodez00_bglt BgL_arg3565z00_1230;
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_arg3568z00_1231;
BgL_arg3568z00_1231 = 
CDR(BgL_cz00_1229); 
{ /* ./DotNet/compress.scm 63 */
BgL_nodez00_bglt BgL_res4389z00_1743;
{ /* ./DotNet/compress.scm 63 */
BgL_nodez00_bglt BgL_ez00_1717;
BgL_ez00_1717 = 
(BgL_nodez00_bglt)(BgL_arg3568z00_1231); 
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_method3113z00_1718;
{ /* ./DotNet/compress.scm 63 */
BgL_objectz00_bglt BgL_objz00_1719;
BgL_objz00_1719 = 
(BgL_objectz00_bglt)(BgL_ez00_1717); 
{ /* ./DotNet/compress.scm 63 */
long BgL_objzd2classzd2numz00_1720;
BgL_objzd2classzd2numz00_1720 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1719); 
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_arg2017z00_1721;
{ /* ./DotNet/compress.scm 63 */
int BgL_auxz00_3476;
BgL_auxz00_3476 = 
(int)(((long)1)); 
BgL_arg2017z00_1721 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3476); } 
{ /* ./DotNet/compress.scm 63 */
int BgL_offsetz00_1724;
BgL_offsetz00_1724 = 
(int)(BgL_objzd2classzd2numz00_1720); 
{ /* ./DotNet/compress.scm 63 */
long BgL_offsetz00_1725;
{ /* ./DotNet/compress.scm 63 */
long BgL_auxz00_3480;
BgL_auxz00_3480 = 
(long)(BgL_offsetz00_1724); 
BgL_offsetz00_1725 = 
(BgL_auxz00_3480-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 63 */
long BgL_modz00_1726;
{ /* ./DotNet/compress.scm 63 */
int BgL_arg2028z00_1727;
BgL_arg2028z00_1727 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 63 */
long BgL_n2z00_1735;
BgL_n2z00_1735 = 
(long)(BgL_arg2028z00_1727); 
BgL_modz00_1726 = 
(BgL_offsetz00_1725/BgL_n2z00_1735); } } 
{ /* ./DotNet/compress.scm 63 */
long BgL_restz00_1728;
{ /* ./DotNet/compress.scm 63 */
int BgL_arg2024z00_1729;
BgL_arg2024z00_1729 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 63 */
long BgL_n2z00_1738;
BgL_n2z00_1738 = 
(long)(BgL_arg2024z00_1729); 
BgL_restz00_1728 = 
(BgL_offsetz00_1725%BgL_n2z00_1738); } } 
{ /* ./DotNet/compress.scm 63 */

{ /* ./DotNet/compress.scm 63 */
obj_t BgL_bucketz00_1730;
{ /* ./DotNet/compress.scm 63 */
int BgL_kz00_1740;
BgL_kz00_1740 = 
(int)(BgL_modz00_1726); 
BgL_bucketz00_1730 = 
VECTOR_REF(BgL_arg2017z00_1721,BgL_kz00_1740); } 
{ /* ./DotNet/compress.scm 63 */
int BgL_kz00_1742;
BgL_kz00_1742 = 
(int)(BgL_restz00_1728); 
BgL_method3113z00_1718 = 
VECTOR_REF(BgL_bucketz00_1730,BgL_kz00_1742); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_auxz00_3493;
BgL_auxz00_3493 = 
PROCEDURE_ENTRY(BgL_method3113z00_1718)(BgL_method3113z00_1718, 
(obj_t)(BgL_ez00_1717), BEOA); 
BgL_res4389z00_1743 = 
(BgL_nodez00_bglt)(BgL_auxz00_3493); } } } 
BgL_arg3565z00_1230 = BgL_res4389z00_1743; } } 
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_objz00_1745;
BgL_objz00_1745 = 
(obj_t)(BgL_arg3565z00_1230); 
SET_CDR(BgL_cz00_1229, BgL_objz00_1745); } } } 
{ /* ./DotNet/compress.scm 63 */
obj_t BgL_arg3573z00_1232;
BgL_arg3573z00_1232 = 
CDR(BgL_l3045z00_1225); 
{ 
obj_t BgL_l3045z00_3501;
BgL_l3045z00_3501 = BgL_arg3573z00_1232; 
BgL_l3045z00_1225 = BgL_l3045z00_3501; 
goto BgL_forzd2each3046zd2_1226;} } }  else 
{ /* ./DotNet/compress.scm 63 */((bool_t)1); } } } } 
{ /* ./DotNet/compress.scm 65 */
bool_t BgL_test3577z00_1233;
{ /* ./DotNet/compress.scm 65 */
obj_t BgL_auxz00_3502;
BgL_auxz00_3502 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_test3577z00_1233 = 
NULLP(BgL_auxz00_3502); } 
if(BgL_test3577z00_1233)
{ /* ./DotNet/compress.scm 65 */
{ /* ./DotNet/compress.scm 65 */
BgL_nodez00_bglt BgL_auxz00_3506;
BgL_auxz00_3506 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
return 
(obj_t)(BgL_auxz00_3506);} }  else 
{ /* ./DotNet/compress.scm 68 */
bool_t BgL_test3579z00_1234;
{ 
obj_t BgL_l3047z00_1384;
BgL_l3047z00_1384 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_any3048z00_1385:
if(
NULLP(BgL_l3047z00_1384))
{ /* ./DotNet/compress.scm 68 */
BgL_test3579z00_1234 = ((bool_t)0); }  else 
{ /* ./DotNet/compress.scm 68 */
bool_t BgL_testz00_3511;
{ /* ./DotNet/compress.scm 68 */
long BgL_auxz00_3512;
{ /* ./DotNet/compress.scm 68 */
BgL_variablez00_bglt BgL_obj1112z00_1754;
{ /* ./DotNet/compress.scm 68 */
obj_t BgL_auxz00_3513;
{ /* ./DotNet/compress.scm 68 */
obj_t BgL_auxz00_3514;
BgL_auxz00_3514 = 
CAR(BgL_l3047z00_1384); 
BgL_auxz00_3513 = 
CAR(BgL_auxz00_3514); } 
BgL_obj1112z00_1754 = 
(BgL_variablez00_bglt)(BgL_auxz00_3513); } 
BgL_auxz00_3512 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1112z00_1754))->BgL_occurrencez00); } 
BgL_testz00_3511 = 
(BgL_auxz00_3512>((long)1)); } 
if(BgL_testz00_3511)
{ /* ./DotNet/compress.scm 68 */
BgL_test3579z00_1234 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 68 */
{ 
obj_t BgL_l3047z00_3520;
BgL_l3047z00_3520 = 
CDR(BgL_l3047z00_1384); 
BgL_l3047z00_1384 = BgL_l3047z00_3520; 
goto BgL_any3048z00_1385;} } } } 
if(BgL_test3579z00_1234)
{ /* ./DotNet/compress.scm 68 */
return 
(obj_t)(BgL_ez00_1212);}  else 
{ /* ./DotNet/compress.scm 70 */
bool_t BgL_test3580z00_1235;
{ /* ./DotNet/compress.scm 70 */
bool_t BgL_test3890z00_1379;
{ /* ./DotNet/compress.scm 70 */
BgL_nodez00_bglt BgL_arg3901z00_1383;
BgL_arg3901z00_1383 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 70 */
obj_t BgL_obj1640z00_1759;
BgL_obj1640z00_1759 = 
(obj_t)(BgL_arg3901z00_1383); 
BgL_test3890z00_1379 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1640z00_1759, BGl_varz00zzast_nodez00); } } 
if(BgL_test3890z00_1379)
{ /* ./DotNet/compress.scm 70 */
obj_t BgL_arg3892z00_1380;BgL_nodez00_bglt BgL_arg3893z00_1381;
{ /* ./DotNet/compress.scm 70 */
obj_t BgL_auxz00_3529;
{ /* ./DotNet/compress.scm 70 */
obj_t BgL_auxz00_3530;
BgL_auxz00_3530 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_auxz00_3529 = 
CAR(BgL_auxz00_3530); } 
BgL_arg3892z00_1380 = 
CAR(BgL_auxz00_3529); } 
BgL_arg3893z00_1381 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 70 */
bool_t BgL__andtest_3019z00_1768;
{ /* ./DotNet/compress.scm 70 */
obj_t BgL_obj1640z00_1770;
BgL_obj1640z00_1770 = 
(obj_t)(BgL_arg3893z00_1381); 
BgL__andtest_3019z00_1768 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1640z00_1770, BGl_varz00zzast_nodez00); } 
if(BgL__andtest_3019z00_1768)
{ /* ./DotNet/compress.scm 70 */
obj_t BgL_auxz00_3538;
{ /* ./DotNet/compress.scm 70 */
BgL_variablez00_bglt BgL_auxz00_3539;
{ /* ./DotNet/compress.scm 70 */
BgL_varz00_bglt BgL_obj1625z00_1771;
BgL_obj1625z00_1771 = 
(BgL_varz00_bglt)(BgL_arg3893z00_1381); 
BgL_auxz00_3539 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_1771))->BgL_variablez00); } 
BgL_auxz00_3538 = 
(obj_t)(BgL_auxz00_3539); } 
BgL_test3580z00_1235 = 
(BgL_auxz00_3538==BgL_arg3892z00_1380); }  else 
{ /* ./DotNet/compress.scm 70 */
BgL_test3580z00_1235 = ((bool_t)0); } } }  else 
{ /* ./DotNet/compress.scm 70 */
BgL_test3580z00_1235 = ((bool_t)0); } } 
if(BgL_test3580z00_1235)
{ /* ./DotNet/compress.scm 70 */
{ /* ./DotNet/compress.scm 72 */
obj_t BgL_auxz00_3545;
{ /* ./DotNet/compress.scm 72 */
obj_t BgL_auxz00_3546;
BgL_auxz00_3546 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_auxz00_3545 = 
CAR(BgL_auxz00_3546); } 
return 
CDR(BgL_auxz00_3545);} }  else 
{ /* ./DotNet/compress.scm 73 */
bool_t BgL_test3585z00_1237;
{ /* ./DotNet/compress.scm 73 */
bool_t BgL_test3795z00_1332;
{ /* ./DotNet/compress.scm 73 */
BgL_nodez00_bglt BgL_arg3887z00_1378;
BgL_arg3887z00_1378 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 73 */
obj_t BgL_obj1746z00_1778;
BgL_obj1746z00_1778 = 
(obj_t)(BgL_arg3887z00_1378); 
BgL_test3795z00_1332 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1746z00_1778, BGl_appz00zzast_nodez00); } } 
if(BgL_test3795z00_1332)
{ /* ./DotNet/compress.scm 74 */
bool_t BgL_test3796z00_1333;
{ /* ./DotNet/compress.scm 74 */
obj_t BgL_auxz00_3554;
{ /* ./DotNet/compress.scm 74 */
BgL_appz00_bglt BgL_obj1722z00_1780;
{ /* ./DotNet/compress.scm 74 */
BgL_nodez00_bglt BgL_auxz00_3555;
BgL_auxz00_3555 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1722z00_1780 = 
(BgL_appz00_bglt)(BgL_auxz00_3555); } 
BgL_auxz00_3554 = 
(((BgL_appz00_bglt)CREF(BgL_obj1722z00_1780))->BgL_argsz00); } 
BgL_test3796z00_1333 = 
BGl_simpleza2zf3z51zzdotnet_compressz00(BgL_auxz00_3554, 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00)); } 
if(BgL_test3796z00_1333)
{ /* ./DotNet/compress.scm 75 */
bool_t BgL__ortest_3049z00_1334;
{ /* ./DotNet/compress.scm 75 */
long BgL_auxz00_3562;
{ /* ./DotNet/compress.scm 75 */
obj_t BgL_auxz00_3563;
{ /* ./DotNet/compress.scm 75 */
BgL_appz00_bglt BgL_obj1722z00_1783;
{ /* ./DotNet/compress.scm 75 */
BgL_nodez00_bglt BgL_auxz00_3564;
BgL_auxz00_3564 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1722z00_1783 = 
(BgL_appz00_bglt)(BgL_auxz00_3564); } 
BgL_auxz00_3563 = 
(((BgL_appz00_bglt)CREF(BgL_obj1722z00_1783))->BgL_argsz00); } 
BgL_auxz00_3562 = 
bgl_list_length(BgL_auxz00_3563); } 
BgL__ortest_3049z00_1334 = 
(BgL_auxz00_3562==((long)1)); } 
if(BgL__ortest_3049z00_1334)
{ /* ./DotNet/compress.scm 75 */
BgL_test3585z00_1237 = BgL__ortest_3049z00_1334; }  else 
{ /* ./DotNet/compress.scm 76 */
bool_t BgL__ortest_3050z00_1335;
{ 
obj_t BgL_l3052z00_1362;
{ /* ./DotNet/compress.scm 76 */
obj_t BgL_arg3848z00_1364;
BgL_arg3848z00_1364 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_l3052z00_1362 = BgL_arg3848z00_1364; 
BgL_every3053z00_1363:
{ /* ./DotNet/compress.scm 76 */
bool_t BgL_test3851z00_1365;
BgL_test3851z00_1365 = 
NULLP(BgL_l3052z00_1362); 
if(BgL_test3851z00_1365)
{ /* ./DotNet/compress.scm 76 */
BgL__ortest_3050z00_1335 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 77 */
bool_t BgL_test3852z00_1366;
{ /* ./DotNet/compress.scm 77 */
obj_t BgL_bz00_1368;
BgL_bz00_1368 = 
CAR(BgL_l3052z00_1362); 
{ /* ./DotNet/compress.scm 77 */
bool_t BgL_test3858z00_1369;
{ /* ./DotNet/compress.scm 77 */
obj_t BgL_arg3860z00_1370;
BgL_arg3860z00_1370 = 
CDR(BgL_bz00_1368); 
BgL_test3858z00_1369 = 
BGl_sidezd2effectzf3z21zzeffect_effectz00(
(BgL_nodez00_bglt)(BgL_arg3860z00_1370)); } 
if(BgL_test3858z00_1369)
{ /* ./DotNet/compress.scm 77 */
BgL_test3852z00_1366 = ((bool_t)0); }  else 
{ /* ./DotNet/compress.scm 77 */
BgL_test3852z00_1366 = ((bool_t)1); } } } 
if(BgL_test3852z00_1366)
{ /* ./DotNet/compress.scm 76 */
{ /* ./DotNet/compress.scm 76 */
obj_t BgL_arg3855z00_1367;
BgL_arg3855z00_1367 = 
CDR(BgL_l3052z00_1362); 
{ 
obj_t BgL_l3052z00_3581;
BgL_l3052z00_3581 = BgL_arg3855z00_1367; 
BgL_l3052z00_1362 = BgL_l3052z00_3581; 
goto BgL_every3053z00_1363;} } }  else 
{ /* ./DotNet/compress.scm 76 */
BgL__ortest_3050z00_1335 = ((bool_t)0); } } } } } 
if(BgL__ortest_3050z00_1335)
{ /* ./DotNet/compress.scm 76 */
BgL_test3585z00_1237 = BgL__ortest_3050z00_1335; }  else 
{ /* ./DotNet/compress.scm 79 */
bool_t BgL__ortest_3051z00_1336;
{ 
obj_t BgL_l3054z00_1349;
{ /* ./DotNet/compress.scm 83 */
BgL_appz00_bglt BgL_obj1722z00_1792;
{ /* ./DotNet/compress.scm 83 */
BgL_nodez00_bglt BgL_auxz00_3599;
BgL_auxz00_3599 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1722z00_1792 = 
(BgL_appz00_bglt)(BgL_auxz00_3599); } 
BgL_l3054z00_1349 = 
(((BgL_appz00_bglt)CREF(BgL_obj1722z00_1792))->BgL_argsz00); } 
BgL_every3055z00_1350:
{ /* ./DotNet/compress.scm 79 */
bool_t BgL_test3828z00_1353;
BgL_test3828z00_1353 = 
NULLP(BgL_l3054z00_1349); 
if(BgL_test3828z00_1353)
{ /* ./DotNet/compress.scm 79 */
BgL__ortest_3051z00_1336 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 80 */
bool_t BgL_test3829z00_1354;
{ /* ./DotNet/compress.scm 80 */
obj_t BgL_az00_1356;
BgL_az00_1356 = 
CAR(BgL_l3054z00_1349); 
{ /* ./DotNet/compress.scm 80 */
bool_t BgL__ortest_3056z00_1357;
{ /* ./DotNet/compress.scm 80 */
bool_t BgL_test3843z00_1361;
BgL_test3843z00_1361 = 
BGl_iszd2azf3z21zz__objectz00(BgL_az00_1356, BGl_varz00zzast_nodez00); 
if(BgL_test3843z00_1361)
{ /* ./DotNet/compress.scm 80 */
BgL__ortest_3056z00_1357 = ((bool_t)0); }  else 
{ /* ./DotNet/compress.scm 80 */
BgL__ortest_3056z00_1357 = ((bool_t)1); } } 
if(BgL__ortest_3056z00_1357)
{ /* ./DotNet/compress.scm 80 */
BgL_test3829z00_1354 = BgL__ortest_3056z00_1357; }  else 
{ /* ./DotNet/compress.scm 81 */
obj_t BgL_auxz00_3593;obj_t BgL_auxz00_3589;
BgL_auxz00_3593 = 
CNST_TABLE_REF(((long)0)); 
{ /* ./DotNet/compress.scm 81 */
BgL_variablez00_bglt BgL_arg3840z00_1360;
{ /* ./DotNet/compress.scm 81 */
BgL_varz00_bglt BgL_obj1625z00_1796;
BgL_obj1625z00_1796 = 
(BgL_varz00_bglt)(BgL_az00_1356); 
BgL_arg3840z00_1360 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_1796))->BgL_variablez00); } 
BgL_auxz00_3589 = 
(((BgL_variablez00_bglt)CREF(BgL_arg3840z00_1360))->BgL_accessz00); } 
BgL_test3829z00_1354 = 
(BgL_auxz00_3589==BgL_auxz00_3593); } } } 
if(BgL_test3829z00_1354)
{ /* ./DotNet/compress.scm 79 */
{ 
obj_t BgL_l3054z00_3597;
BgL_l3054z00_3597 = 
CDR(BgL_l3054z00_1349); 
BgL_l3054z00_1349 = BgL_l3054z00_3597; 
goto BgL_every3055z00_1350;} }  else 
{ /* ./DotNet/compress.scm 79 */
BgL__ortest_3051z00_1336 = ((bool_t)0); } } } } 
if(BgL__ortest_3051z00_1336)
{ /* ./DotNet/compress.scm 79 */
BgL_test3585z00_1237 = BgL__ortest_3051z00_1336; }  else 
{ /* ./DotNet/compress.scm 84 */
obj_t BgL_argsz00_1337;
{ /* ./DotNet/compress.scm 84 */
obj_t BgL_arg3815z00_1347;
{ /* ./DotNet/compress.scm 84 */
BgL_appz00_bglt BgL_obj1722z00_1800;
{ /* ./DotNet/compress.scm 84 */
BgL_nodez00_bglt BgL_auxz00_3604;
BgL_auxz00_3604 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1722z00_1800 = 
(BgL_appz00_bglt)(BgL_auxz00_3604); } 
BgL_arg3815z00_1347 = 
(((BgL_appz00_bglt)CREF(BgL_obj1722z00_1800))->BgL_argsz00); } 
BgL_argsz00_1337 = 
BGl_filterz00zzdotnet_compressz00(BGl_varzf3zd2envz21zzdotnet_compressz00, BgL_arg3815z00_1347); } 
{ 
obj_t BgL_l3057z00_1338;
{ /* ./DotNet/compress.scm 85 */
obj_t BgL_arg3798z00_1340;
BgL_arg3798z00_1340 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_l3057z00_1338 = BgL_arg3798z00_1340; 
BgL_every3058z00_1339:
{ /* ./DotNet/compress.scm 85 */
bool_t BgL_test3801z00_1341;
BgL_test3801z00_1341 = 
NULLP(BgL_l3057z00_1338); 
if(BgL_test3801z00_1341)
{ /* ./DotNet/compress.scm 85 */
BgL_test3585z00_1237 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 86 */
bool_t BgL_test3802z00_1342;
{ /* ./DotNet/compress.scm 86 */
obj_t BgL_bz00_1344;
BgL_bz00_1344 = 
CAR(BgL_l3057z00_1338); 
{ /* ./DotNet/compress.scm 86 */
bool_t BgL_test3807z00_1345;
{ /* ./DotNet/compress.scm 86 */
obj_t BgL_arg3809z00_1346;
BgL_arg3809z00_1346 = 
CDR(BgL_bz00_1344); 
{ /* ./DotNet/compress.scm 86 */
obj_t BgL_auxz00_3614;
BgL_auxz00_3614 = 
BGl_vmemqzf3zf3zzdotnet_vmemqz00(BgL_argsz00_1337, 
(BgL_nodez00_bglt)(BgL_arg3809z00_1346)); 
BgL_test3807z00_1345 = 
CBOOL(BgL_auxz00_3614); } } 
if(BgL_test3807z00_1345)
{ /* ./DotNet/compress.scm 86 */
BgL_test3802z00_1342 = ((bool_t)0); }  else 
{ /* ./DotNet/compress.scm 86 */
BgL_test3802z00_1342 = ((bool_t)1); } } } 
if(BgL_test3802z00_1342)
{ /* ./DotNet/compress.scm 85 */
{ /* ./DotNet/compress.scm 85 */
obj_t BgL_arg3804z00_1343;
BgL_arg3804z00_1343 = 
CDR(BgL_l3057z00_1338); 
{ 
obj_t BgL_l3057z00_3621;
BgL_l3057z00_3621 = BgL_arg3804z00_1343; 
BgL_l3057z00_1338 = BgL_l3057z00_3621; 
goto BgL_every3058z00_1339;} } }  else 
{ /* ./DotNet/compress.scm 85 */
BgL_test3585z00_1237 = ((bool_t)0); } } } } } } } } }  else 
{ /* ./DotNet/compress.scm 74 */
BgL_test3585z00_1237 = ((bool_t)0); } }  else 
{ /* ./DotNet/compress.scm 73 */
BgL_test3585z00_1237 = ((bool_t)0); } } 
if(BgL_test3585z00_1237)
{ /* ./DotNet/compress.scm 73 */
{ /* ./DotNet/compress.scm 89 */
BgL_nodez00_bglt BgL_arg3587z00_1238;obj_t BgL_arg3589z00_1239;
BgL_arg3587z00_1238 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 89 */
obj_t BgL_l3059z00_1240;
{ /* ./DotNet/compress.scm 89 */
BgL_appz00_bglt BgL_obj1722z00_1808;
{ /* ./DotNet/compress.scm 89 */
BgL_nodez00_bglt BgL_auxz00_3624;
BgL_auxz00_3624 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1722z00_1808 = 
(BgL_appz00_bglt)(BgL_auxz00_3624); } 
BgL_l3059z00_1240 = 
(((BgL_appz00_bglt)CREF(BgL_obj1722z00_1808))->BgL_argsz00); } 
{ /* ./DotNet/compress.scm 89 */
bool_t BgL_test3592z00_1241;
BgL_test3592z00_1241 = 
NULLP(BgL_l3059z00_1240); 
if(BgL_test3592z00_1241)
{ /* ./DotNet/compress.scm 89 */
BgL_arg3589z00_1239 = BNIL; }  else 
{ /* ./DotNet/compress.scm 89 */
obj_t BgL_head3061z00_1242;
{ /* ./DotNet/compress.scm 89 */
obj_t BgL_arg3613z00_1253;
BgL_arg3613z00_1253 = 
BGl_getz00zzdotnet_compressz00(
CAR(BgL_l3059z00_1240), 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00)); 
BgL_head3061z00_1242 = 
MAKE_PAIR(BgL_arg3613z00_1253, BNIL); } 
{ 
obj_t BgL_l3059z00_1243;obj_t BgL_tail3062z00_1244;
{ /* ./DotNet/compress.scm 89 */
obj_t BgL_arg3594z00_1246;
BgL_arg3594z00_1246 = 
CDR(BgL_l3059z00_1240); 
BgL_l3059z00_1243 = BgL_arg3594z00_1246; 
BgL_tail3062z00_1244 = BgL_head3061z00_1242; 
BgL_map3060z00_1245:
{ /* ./DotNet/compress.scm 89 */
bool_t BgL_test3597z00_1247;
BgL_test3597z00_1247 = 
NULLP(BgL_l3059z00_1243); 
if(BgL_test3597z00_1247)
{ /* ./DotNet/compress.scm 89 */
BgL_arg3589z00_1239 = BgL_head3061z00_1242; }  else 
{ /* ./DotNet/compress.scm 89 */
obj_t BgL_newtail3063z00_1248;
{ /* ./DotNet/compress.scm 89 */
obj_t BgL_arg3604z00_1250;
BgL_arg3604z00_1250 = 
BGl_getz00zzdotnet_compressz00(
CAR(BgL_l3059z00_1243), 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00)); 
BgL_newtail3063z00_1248 = 
MAKE_PAIR(BgL_arg3604z00_1250, BNIL); } 
SET_CDR(BgL_tail3062z00_1244, BgL_newtail3063z00_1248); 
{ /* ./DotNet/compress.scm 89 */
obj_t BgL_arg3600z00_1249;
BgL_arg3600z00_1249 = 
CDR(BgL_l3059z00_1243); 
{ 
obj_t BgL_tail3062z00_3644;obj_t BgL_l3059z00_3643;
BgL_l3059z00_3643 = BgL_arg3600z00_1249; 
BgL_tail3062z00_3644 = BgL_newtail3063z00_1248; 
BgL_tail3062z00_1244 = BgL_tail3062z00_3644; 
BgL_l3059z00_1243 = BgL_l3059z00_3643; 
goto BgL_map3060z00_1245;} } } } } } } } } 
{ /* ./DotNet/compress.scm 89 */
BgL_appz00_bglt BgL_obj1724z00_1827;obj_t BgL_val1723z00_1828;
BgL_obj1724z00_1827 = 
(BgL_appz00_bglt)(BgL_arg3587z00_1238); 
BgL_val1723z00_1828 = BgL_arg3589z00_1239; 
((((BgL_appz00_bglt)CREF(BgL_obj1724z00_1827))->BgL_argsz00) = ((obj_t)BgL_val1723z00_1828), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 89 */
BgL_nodez00_bglt BgL_auxz00_3647;
BgL_auxz00_3647 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
return 
(obj_t)(BgL_auxz00_3647);} }  else 
{ /* ./DotNet/compress.scm 91 */
bool_t BgL_test3627z00_1257;
{ /* ./DotNet/compress.scm 91 */
bool_t BgL_test3781z00_1327;
{ /* ./DotNet/compress.scm 91 */
BgL_nodez00_bglt BgL_arg3792z00_1331;
BgL_arg3792z00_1331 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 91 */
obj_t BgL_obj1746z00_1831;
BgL_obj1746z00_1831 = 
(obj_t)(BgL_arg3792z00_1331); 
BgL_test3781z00_1327 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1746z00_1831, BGl_appz00zzast_nodez00); } } 
if(BgL_test3781z00_1327)
{ /* ./DotNet/compress.scm 91 */
obj_t BgL_auxz00_3654;
{ /* ./DotNet/compress.scm 91 */
BgL_appz00_bglt BgL_obj1722z00_1833;
{ /* ./DotNet/compress.scm 91 */
BgL_nodez00_bglt BgL_auxz00_3655;
BgL_auxz00_3655 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1722z00_1833 = 
(BgL_appz00_bglt)(BgL_auxz00_3655); } 
BgL_auxz00_3654 = 
(((BgL_appz00_bglt)CREF(BgL_obj1722z00_1833))->BgL_argsz00); } 
BgL_test3627z00_1257 = 
BGl_simpleza2zf3z51zzdotnet_compressz00(BgL_auxz00_3654, 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00)); }  else 
{ /* ./DotNet/compress.scm 91 */
BgL_test3627z00_1257 = ((bool_t)0); } } 
if(BgL_test3627z00_1257)
{ /* ./DotNet/compress.scm 91 */
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_exprz00_1258;
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_arg3644z00_1266;
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_arg3647z00_1267;obj_t BgL_arg3648z00_1268;
BgL_arg3647z00_1267 = 
CNST_TABLE_REF(((long)1)); 
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_arg3651z00_1269;obj_t BgL_arg3652z00_1270;
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_l3064z00_1271;
BgL_l3064z00_1271 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
{ /* ./DotNet/compress.scm 92 */
bool_t BgL_test3654z00_1272;
BgL_test3654z00_1272 = 
NULLP(BgL_l3064z00_1271); 
if(BgL_test3654z00_1272)
{ /* ./DotNet/compress.scm 92 */
BgL_arg3651z00_1269 = BNIL; }  else 
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_head3066z00_1273;
BgL_head3066z00_1273 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3064z00_1274;obj_t BgL_tail3067z00_1275;
BgL_l3064z00_1274 = BgL_l3064z00_1271; 
BgL_tail3067z00_1275 = BgL_head3066z00_1273; 
BgL_map3065z00_1276:
{ /* ./DotNet/compress.scm 92 */
bool_t BgL_test3656z00_1277;
BgL_test3656z00_1277 = 
NULLP(BgL_l3064z00_1274); 
if(BgL_test3656z00_1277)
{ /* ./DotNet/compress.scm 92 */
BgL_arg3651z00_1269 = 
CDR(BgL_head3066z00_1273); }  else 
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_newtail3068z00_1278;
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_arg3664z00_1280;
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_bz00_1282;
BgL_bz00_1282 = 
CAR(BgL_l3064z00_1274); 
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_arg3668z00_1283;obj_t BgL_arg3669z00_1284;
BgL_arg3668z00_1283 = 
CAR(BgL_bz00_1282); 
BgL_arg3669z00_1284 = 
CDR(BgL_bz00_1282); 
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_list3671z00_1285;
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_arg3673z00_1286;
BgL_arg3673z00_1286 = 
MAKE_PAIR(BgL_arg3669z00_1284, BNIL); 
BgL_list3671z00_1285 = 
MAKE_PAIR(BgL_arg3668z00_1283, BgL_arg3673z00_1286); } 
BgL_arg3664z00_1280 = BgL_list3671z00_1285; } } } 
BgL_newtail3068z00_1278 = 
MAKE_PAIR(BgL_arg3664z00_1280, BNIL); } 
SET_CDR(BgL_tail3067z00_1275, BgL_newtail3068z00_1278); 
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_arg3660z00_1279;
BgL_arg3660z00_1279 = 
CDR(BgL_l3064z00_1274); 
{ 
obj_t BgL_tail3067z00_3679;obj_t BgL_l3064z00_3678;
BgL_l3064z00_3678 = BgL_arg3660z00_1279; 
BgL_tail3067z00_3679 = BgL_newtail3068z00_1278; 
BgL_tail3067z00_1275 = BgL_tail3067z00_3679; 
BgL_l3064z00_1274 = BgL_l3064z00_3678; 
goto BgL_map3065z00_1276;} } } } } } } } 
{ /* ./DotNet/compress.scm 92 */
BgL_nodez00_bglt BgL_arg3684z00_1287;
BgL_arg3684z00_1287 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 92 */
obj_t BgL_auxz00_3681;
BgL_auxz00_3681 = 
(obj_t)(BgL_arg3684z00_1287); 
BgL_arg3652z00_1270 = 
MAKE_PAIR(BgL_auxz00_3681, BNIL); } } 
BgL_arg3648z00_1268 = 
MAKE_PAIR(BgL_arg3651z00_1269, BgL_arg3652z00_1270); } 
BgL_arg3644z00_1266 = 
MAKE_PAIR(BgL_arg3647z00_1267, BgL_arg3648z00_1268); } 
BgL_exprz00_1258 = 
BGl_shapez00zztools_shapez00(BgL_arg3644z00_1266); } 
{ /* ./DotNet/compress.scm 95 */
bool_t BgL_test3628z00_1259;
{ /* ./DotNet/compress.scm 95 */
bool_t BgL_test3640z00_1265;
{ /* ./DotNet/compress.scm 95 */
bool_t BgL_res4391z00_1856;
{ /* ./DotNet/compress.scm 95 */
obj_t BgL_objz00_1852;
BgL_objz00_1852 = BGl_za2verboseza2z00zzengine_paramz00; 
if(
INTEGERP(BgL_objz00_1852))
{ /* ./DotNet/compress.scm 95 */
BgL_res4391z00_1856 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 95 */
BgL_res4391z00_1856 = 
REALP(BgL_objz00_1852); } } 
BgL_test3640z00_1265 = BgL_res4391z00_1856; } 
if(BgL_test3640z00_1265)
{ /* ./DotNet/compress.scm 95 */
BgL_test3628z00_1259 = 
BGl_2ze3zd3z30zz__r4_numbers_6_5z00(BGl_za2verboseza2z00zzengine_paramz00, 
BINT(((long)2))); }  else 
{ /* ./DotNet/compress.scm 95 */
BgL_test3628z00_1259 = ((bool_t)0); } } 
if(BgL_test3628z00_1259)
{ /* ./DotNet/compress.scm 97 */
obj_t BgL_list3630z00_1260;
{ /* ./DotNet/compress.scm 97 */
obj_t BgL_arg3633z00_1262;
{ /* ./DotNet/compress.scm 97 */
obj_t BgL_arg3637z00_1264;
BgL_arg3637z00_1264 = 
MAKE_PAIR(BgL_exprz00_1258, BNIL); 
BgL_arg3633z00_1262 = 
MAKE_PAIR(BGl_string4944z00zzdotnet_compressz00, BgL_arg3637z00_1264); } 
BgL_list3630z00_1260 = 
MAKE_PAIR(BGl_string4945z00zzdotnet_compressz00, BgL_arg3633z00_1262); } 
BGl_warningz00zz__errorz00(BgL_list3630z00_1260); }  else 
{ /* ./DotNet/compress.scm 95 */BFALSE; } } 
return 
(obj_t)(BgL_ez00_1212);} }  else 
{ /* ./DotNet/compress.scm 101 */
bool_t BgL_test3688z00_1289;
{ /* ./DotNet/compress.scm 101 */
bool_t BgL_test3766z00_1322;
{ /* ./DotNet/compress.scm 101 */
BgL_nodez00_bglt BgL_arg3778z00_1326;
BgL_arg3778z00_1326 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 101 */
obj_t BgL_obj1844z00_1858;
BgL_obj1844z00_1858 = 
(obj_t)(BgL_arg3778z00_1326); 
BgL_test3766z00_1322 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1844z00_1858, BGl_externz00zzast_nodez00); } } 
if(BgL_test3766z00_1322)
{ /* ./DotNet/compress.scm 101 */
obj_t BgL_auxz00_3703;
{ /* ./DotNet/compress.scm 101 */
BgL_externz00_bglt BgL_obj1817z00_1860;
{ /* ./DotNet/compress.scm 101 */
BgL_nodez00_bglt BgL_auxz00_3704;
BgL_auxz00_3704 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1817z00_1860 = 
(BgL_externz00_bglt)(BgL_auxz00_3704); } 
BgL_auxz00_3703 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_1860))->BgL_exprza2za2); } 
BgL_test3688z00_1289 = 
BGl_simpleza2zf3z51zzdotnet_compressz00(BgL_auxz00_3703, 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00)); }  else 
{ /* ./DotNet/compress.scm 101 */
BgL_test3688z00_1289 = ((bool_t)0); } } 
if(BgL_test3688z00_1289)
{ /* ./DotNet/compress.scm 101 */
{ /* ./DotNet/compress.scm 103 */
BgL_nodez00_bglt BgL_arg3690z00_1290;obj_t BgL_arg3691z00_1291;
BgL_arg3690z00_1290 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 103 */
obj_t BgL_l3069z00_1292;
{ /* ./DotNet/compress.scm 103 */
BgL_externz00_bglt BgL_obj1817z00_1864;
{ /* ./DotNet/compress.scm 103 */
BgL_nodez00_bglt BgL_auxz00_3712;
BgL_auxz00_3712 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj1817z00_1864 = 
(BgL_externz00_bglt)(BgL_auxz00_3712); } 
BgL_l3069z00_1292 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_1864))->BgL_exprza2za2); } 
{ /* ./DotNet/compress.scm 103 */
bool_t BgL_test3694z00_1293;
BgL_test3694z00_1293 = 
NULLP(BgL_l3069z00_1292); 
if(BgL_test3694z00_1293)
{ /* ./DotNet/compress.scm 103 */
BgL_arg3691z00_1291 = BNIL; }  else 
{ /* ./DotNet/compress.scm 103 */
obj_t BgL_head3071z00_1294;
{ /* ./DotNet/compress.scm 103 */
obj_t BgL_arg3717z00_1305;
BgL_arg3717z00_1305 = 
BGl_getz00zzdotnet_compressz00(
CAR(BgL_l3069z00_1292), 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00)); 
BgL_head3071z00_1294 = 
MAKE_PAIR(BgL_arg3717z00_1305, BNIL); } 
{ 
obj_t BgL_l3069z00_1295;obj_t BgL_tail3072z00_1296;
{ /* ./DotNet/compress.scm 103 */
obj_t BgL_arg3697z00_1298;
BgL_arg3697z00_1298 = 
CDR(BgL_l3069z00_1292); 
BgL_l3069z00_1295 = BgL_arg3697z00_1298; 
BgL_tail3072z00_1296 = BgL_head3071z00_1294; 
BgL_map3070z00_1297:
{ /* ./DotNet/compress.scm 103 */
bool_t BgL_test3700z00_1299;
BgL_test3700z00_1299 = 
NULLP(BgL_l3069z00_1295); 
if(BgL_test3700z00_1299)
{ /* ./DotNet/compress.scm 103 */
BgL_arg3691z00_1291 = BgL_head3071z00_1294; }  else 
{ /* ./DotNet/compress.scm 103 */
obj_t BgL_newtail3073z00_1300;
{ /* ./DotNet/compress.scm 103 */
obj_t BgL_arg3707z00_1302;
BgL_arg3707z00_1302 = 
BGl_getz00zzdotnet_compressz00(
CAR(BgL_l3069z00_1295), 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00)); 
BgL_newtail3073z00_1300 = 
MAKE_PAIR(BgL_arg3707z00_1302, BNIL); } 
SET_CDR(BgL_tail3072z00_1296, BgL_newtail3073z00_1300); 
{ /* ./DotNet/compress.scm 103 */
obj_t BgL_arg3703z00_1301;
BgL_arg3703z00_1301 = 
CDR(BgL_l3069z00_1295); 
{ 
obj_t BgL_tail3072z00_3732;obj_t BgL_l3069z00_3731;
BgL_l3069z00_3731 = BgL_arg3703z00_1301; 
BgL_tail3072z00_3732 = BgL_newtail3073z00_1300; 
BgL_tail3072z00_1296 = BgL_tail3072z00_3732; 
BgL_l3069z00_1295 = BgL_l3069z00_3731; 
goto BgL_map3070z00_1297;} } } } } } } } } 
{ /* ./DotNet/compress.scm 103 */
BgL_externz00_bglt BgL_obj1819z00_1883;obj_t BgL_val1818z00_1884;
BgL_obj1819z00_1883 = 
(BgL_externz00_bglt)(BgL_arg3690z00_1290); 
BgL_val1818z00_1884 = BgL_arg3691z00_1291; 
((((BgL_externz00_bglt)CREF(BgL_obj1819z00_1883))->BgL_exprza2za2) = ((obj_t)BgL_val1818z00_1884), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 103 */
BgL_nodez00_bglt BgL_auxz00_3735;
BgL_auxz00_3735 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
return 
(obj_t)(BgL_auxz00_3735);} }  else 
{ /* ./DotNet/compress.scm 105 */
bool_t BgL_test3730z00_1309;
{ /* ./DotNet/compress.scm 105 */
bool_t BgL_test3741z00_1313;
{ /* ./DotNet/compress.scm 105 */
BgL_nodez00_bglt BgL_arg3763z00_1321;
BgL_arg3763z00_1321 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 105 */
obj_t BgL_obj2365z00_1887;
BgL_obj2365z00_1887 = 
(obj_t)(BgL_arg3763z00_1321); 
BgL_test3741z00_1313 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2365z00_1887, BGl_conditionalz00zzast_nodez00); } } 
if(BgL_test3741z00_1313)
{ /* ./DotNet/compress.scm 106 */
bool_t BgL_test3742z00_1314;
{ /* ./DotNet/compress.scm 106 */
obj_t BgL_auxz00_3742;
{ /* ./DotNet/compress.scm 106 */
obj_t BgL_auxz00_3743;
BgL_auxz00_3743 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_auxz00_3742 = 
CDR(BgL_auxz00_3743); } 
BgL_test3742z00_1314 = 
NULLP(BgL_auxz00_3742); } 
if(BgL_test3742z00_1314)
{ /* ./DotNet/compress.scm 107 */
obj_t BgL_arg3744z00_1315;BgL_nodez00_bglt BgL_arg3745z00_1316;
{ /* ./DotNet/compress.scm 107 */
obj_t BgL_auxz00_3748;
{ /* ./DotNet/compress.scm 107 */
obj_t BgL_auxz00_3749;
BgL_auxz00_3749 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_auxz00_3748 = 
CAR(BgL_auxz00_3749); } 
BgL_arg3744z00_1315 = 
CAR(BgL_auxz00_3748); } 
{ /* ./DotNet/compress.scm 107 */
BgL_conditionalz00_bglt BgL_obj2332z00_1897;
{ /* ./DotNet/compress.scm 107 */
BgL_nodez00_bglt BgL_auxz00_3753;
BgL_auxz00_3753 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
BgL_obj2332z00_1897 = 
(BgL_conditionalz00_bglt)(BgL_auxz00_3753); } 
BgL_arg3745z00_1316 = 
(((BgL_conditionalz00_bglt)CREF(BgL_obj2332z00_1897))->BgL_testz00); } 
{ /* ./DotNet/compress.scm 107 */
bool_t BgL__andtest_3019z00_1900;
{ /* ./DotNet/compress.scm 107 */
obj_t BgL_obj1640z00_1902;
BgL_obj1640z00_1902 = 
(obj_t)(BgL_arg3745z00_1316); 
BgL__andtest_3019z00_1900 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1640z00_1902, BGl_varz00zzast_nodez00); } 
if(BgL__andtest_3019z00_1900)
{ /* ./DotNet/compress.scm 107 */
obj_t BgL_auxz00_3760;
{ /* ./DotNet/compress.scm 107 */
BgL_variablez00_bglt BgL_auxz00_3761;
{ /* ./DotNet/compress.scm 107 */
BgL_varz00_bglt BgL_obj1625z00_1903;
BgL_obj1625z00_1903 = 
(BgL_varz00_bglt)(BgL_arg3745z00_1316); 
BgL_auxz00_3761 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_1903))->BgL_variablez00); } 
BgL_auxz00_3760 = 
(obj_t)(BgL_auxz00_3761); } 
BgL_test3730z00_1309 = 
(BgL_auxz00_3760==BgL_arg3744z00_1315); }  else 
{ /* ./DotNet/compress.scm 107 */
BgL_test3730z00_1309 = ((bool_t)0); } } }  else 
{ /* ./DotNet/compress.scm 106 */
BgL_test3730z00_1309 = ((bool_t)0); } }  else 
{ /* ./DotNet/compress.scm 105 */
BgL_test3730z00_1309 = ((bool_t)0); } } 
if(BgL_test3730z00_1309)
{ /* ./DotNet/compress.scm 105 */
{ /* ./DotNet/compress.scm 109 */
BgL_nodez00_bglt BgL_arg3732z00_1310;obj_t BgL_arg3733z00_1311;
BgL_arg3732z00_1310 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
{ /* ./DotNet/compress.scm 109 */
obj_t BgL_auxz00_3768;
{ /* ./DotNet/compress.scm 109 */
obj_t BgL_auxz00_3769;
BgL_auxz00_3769 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bindingsz00); 
BgL_auxz00_3768 = 
CAR(BgL_auxz00_3769); } 
BgL_arg3733z00_1311 = 
CDR(BgL_auxz00_3768); } 
{ /* ./DotNet/compress.scm 109 */
BgL_conditionalz00_bglt BgL_obj2334z00_1910;BgL_nodez00_bglt BgL_val2333z00_1911;
BgL_obj2334z00_1910 = 
(BgL_conditionalz00_bglt)(BgL_arg3732z00_1310); 
BgL_val2333z00_1911 = 
(BgL_nodez00_bglt)(BgL_arg3733z00_1311); 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2334z00_1910))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_val2333z00_1911), BUNSPEC); } } 
{ /* ./DotNet/compress.scm 109 */
BgL_nodez00_bglt BgL_auxz00_3776;
BgL_auxz00_3776 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1212))->BgL_bodyz00); 
return 
(obj_t)(BgL_auxz00_3776);} }  else 
{ /* ./DotNet/compress.scm 105 */
return 
(obj_t)(BgL_ez00_1212);} } } } } } } } } } 
}



/* simple? */
obj_t BGl_simplezf3zf3zzdotnet_compressz00(obj_t BgL_ez00_1432)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 47 */
{ 
BgL_varz00_bglt BgL_funz00_1464;
{ /* ./DotNet/compress.scm 43 */
bool_t BgL__ortest_3022z00_1434;
BgL__ortest_3022z00_1434 = 
BGl_iszd2azf3z21zz__objectz00(BgL_ez00_1432, BGl_atomz00zzast_nodez00); 
if(BgL__ortest_3022z00_1434)
{ /* ./DotNet/compress.scm 43 */
return 
BBOOL(BgL__ortest_3022z00_1434);}  else 
{ /* ./DotNet/compress.scm 44 */
bool_t BgL__ortest_3023z00_1435;
BgL__ortest_3023z00_1435 = 
BGl_iszd2azf3z21zz__objectz00(BgL_ez00_1432, BGl_varz00zzast_nodez00); 
if(BgL__ortest_3023z00_1435)
{ /* ./DotNet/compress.scm 44 */
return 
BBOOL(BgL__ortest_3023z00_1435);}  else 
{ /* ./DotNet/compress.scm 45 */
obj_t BgL__ortest_3024z00_1436;
{ /* ./DotNet/compress.scm 45 */
bool_t BgL__andtest_3026z00_1454;
BgL__andtest_3026z00_1454 = 
BGl_iszd2azf3z21zz__objectz00(BgL_ez00_1432, BGl_appz00zzast_nodez00); 
if(BgL__andtest_3026z00_1454)
{ /* ./DotNet/compress.scm 45 */
bool_t BgL_testz00_3789;
{ 
obj_t BgL_l3028z00_1457;
{ /* ./DotNet/compress.scm 45 */
BgL_appz00_bglt BgL_obj1722z00_1939;
BgL_obj1722z00_1939 = 
(BgL_appz00_bglt)(BgL_ez00_1432); 
BgL_l3028z00_1457 = 
(((BgL_appz00_bglt)CREF(BgL_obj1722z00_1939))->BgL_argsz00); } 
BgL_every3029z00_1458:
if(
NULLP(BgL_l3028z00_1457))
{ /* ./DotNet/compress.scm 45 */
BgL_testz00_3789 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 45 */
bool_t BgL_testz00_3792;
{ /* ./DotNet/compress.scm 45 */
obj_t BgL_auxz00_3793;
BgL_auxz00_3793 = 
BGl_simplezf3zf3zzdotnet_compressz00(
CAR(BgL_l3028z00_1457)); 
BgL_testz00_3792 = 
CBOOL(BgL_auxz00_3793); } 
if(BgL_testz00_3792)
{ /* ./DotNet/compress.scm 45 */
{ 
obj_t BgL_l3028z00_3797;
BgL_l3028z00_3797 = 
CDR(BgL_l3028z00_1457); 
BgL_l3028z00_1457 = BgL_l3028z00_3797; 
goto BgL_every3029z00_1458;} }  else 
{ /* ./DotNet/compress.scm 45 */
BgL_testz00_3789 = ((bool_t)0); } } } 
if(BgL_testz00_3789)
{ /* ./DotNet/compress.scm 45 */
{ /* ./DotNet/compress.scm 45 */
BgL_appz00_bglt BgL_obj1719z00_1943;
BgL_obj1719z00_1943 = 
(BgL_appz00_bglt)(BgL_ez00_1432); 
BgL_funz00_1464 = 
(((BgL_appz00_bglt)CREF(BgL_obj1719z00_1943))->BgL_funz00); } 
{ /* ./DotNet/compress.scm 38 */
BgL_variablez00_bglt BgL_vz00_1466;
BgL_vz00_1466 = 
(((BgL_varz00_bglt)CREF(BgL_funz00_1464))->BgL_variablez00); 
{ /* ./DotNet/compress.scm 39 */
bool_t BgL__andtest_3020z00_1467;
{ /* ./DotNet/compress.scm 39 */
obj_t BgL_obj1240z00_1955;
BgL_obj1240z00_1955 = 
(obj_t)(BgL_vz00_1466); 
BgL__andtest_3020z00_1467 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1240z00_1955, BGl_globalz00zzast_varz00); } 
if(BgL__andtest_3020z00_1467)
{ /* ./DotNet/compress.scm 40 */
bool_t BgL_testz00_3805;
{ /* ./DotNet/compress.scm 40 */
obj_t BgL_auxz00_3806;
BgL_auxz00_3806 = 
(((BgL_variablez00_bglt)CREF(BgL_vz00_1466))->BgL_namez00); 
BgL_testz00_3805 = 
STRINGP(BgL_auxz00_3806); } 
if(BgL_testz00_3805)
{ /* ./DotNet/compress.scm 40 */
BgL__ortest_3024z00_1436 = 
BGl_hashtablezd2getzd2zz__hashz00(BGl_za2safezd2functionsza2zd2zzdotnet_compressz00, 
(((BgL_variablez00_bglt)CREF(BgL_vz00_1466))->BgL_namez00)); }  else 
{ /* ./DotNet/compress.scm 40 */
BgL__ortest_3024z00_1436 = BFALSE; } }  else 
{ /* ./DotNet/compress.scm 39 */
BgL__ortest_3024z00_1436 = BFALSE; } } } }  else 
{ /* ./DotNet/compress.scm 45 */
BgL__ortest_3024z00_1436 = BFALSE; } }  else 
{ /* ./DotNet/compress.scm 45 */
BgL__ortest_3024z00_1436 = BFALSE; } } 
if(
CBOOL(BgL__ortest_3024z00_1436))
{ /* ./DotNet/compress.scm 45 */
return BgL__ortest_3024z00_1436;}  else 
{ /* ./DotNet/compress.scm 46 */
bool_t BgL__ortest_3025z00_1437;
{ /* ./DotNet/compress.scm 46 */
bool_t BgL__andtest_3030z00_1446;
BgL__andtest_3030z00_1446 = 
BGl_iszd2azf3z21zz__objectz00(BgL_ez00_1432, BGl_vrefz00zzast_nodez00); 
if(BgL__andtest_3030z00_1446)
{ 
obj_t BgL_l3031z00_1447;
{ /* ./DotNet/compress.scm 46 */
BgL_externz00_bglt BgL_obj1817z00_1945;
BgL_obj1817z00_1945 = 
(BgL_externz00_bglt)(BgL_ez00_1432); 
BgL_l3031z00_1447 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_1945))->BgL_exprza2za2); } 
BgL_every3032z00_1448:
if(
NULLP(BgL_l3031z00_1447))
{ /* ./DotNet/compress.scm 46 */
BgL__ortest_3025z00_1437 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 46 */
bool_t BgL_testz00_3819;
{ /* ./DotNet/compress.scm 46 */
obj_t BgL_auxz00_3820;
BgL_auxz00_3820 = 
BGl_simplezf3zf3zzdotnet_compressz00(
CAR(BgL_l3031z00_1447)); 
BgL_testz00_3819 = 
CBOOL(BgL_auxz00_3820); } 
if(BgL_testz00_3819)
{ /* ./DotNet/compress.scm 46 */
{ 
obj_t BgL_l3031z00_3824;
BgL_l3031z00_3824 = 
CDR(BgL_l3031z00_1447); 
BgL_l3031z00_1447 = BgL_l3031z00_3824; 
goto BgL_every3032z00_1448;} }  else 
{ /* ./DotNet/compress.scm 46 */
BgL__ortest_3025z00_1437 = ((bool_t)0); } } }  else 
{ /* ./DotNet/compress.scm 46 */
BgL__ortest_3025z00_1437 = ((bool_t)0); } } 
if(BgL__ortest_3025z00_1437)
{ /* ./DotNet/compress.scm 46 */
return 
BBOOL(BgL__ortest_3025z00_1437);}  else 
{ /* ./DotNet/compress.scm 47 */
bool_t BgL__andtest_3033z00_1438;
BgL__andtest_3033z00_1438 = 
BGl_iszd2azf3z21zz__objectz00(BgL_ez00_1432, BGl_getfieldz00zzast_nodez00); 
if(BgL__andtest_3033z00_1438)
{ 
obj_t BgL_l3034z00_1439;
{ /* ./DotNet/compress.scm 47 */
bool_t BgL_auxz00_3832;
{ /* ./DotNet/compress.scm 47 */
BgL_externz00_bglt BgL_obj1817z00_1950;
BgL_obj1817z00_1950 = 
(BgL_externz00_bglt)(BgL_ez00_1432); 
BgL_l3034z00_1439 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_1950))->BgL_exprza2za2); } 
BgL_every3035z00_1440:
if(
NULLP(BgL_l3034z00_1439))
{ /* ./DotNet/compress.scm 47 */
BgL_auxz00_3832 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 47 */
bool_t BgL_testz00_3835;
{ /* ./DotNet/compress.scm 47 */
obj_t BgL_auxz00_3836;
BgL_auxz00_3836 = 
BGl_simplezf3zf3zzdotnet_compressz00(
CAR(BgL_l3034z00_1439)); 
BgL_testz00_3835 = 
CBOOL(BgL_auxz00_3836); } 
if(BgL_testz00_3835)
{ /* ./DotNet/compress.scm 47 */
{ 
obj_t BgL_l3034z00_3840;
BgL_l3034z00_3840 = 
CDR(BgL_l3034z00_1439); 
BgL_l3034z00_1439 = BgL_l3034z00_3840; 
goto BgL_every3035z00_1440;} }  else 
{ /* ./DotNet/compress.scm 47 */
BgL_auxz00_3832 = ((bool_t)0); } } 
return 
BBOOL(BgL_auxz00_3832);} }  else 
{ /* ./DotNet/compress.scm 47 */
return BFALSE;} } } } } } } } 
}



/* filter */
obj_t BGl_filterz00zzdotnet_compressz00(obj_t BgL_predz00_1399, obj_t BgL_lstz00_1400)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 59 */
BGl_filterz00zzdotnet_compressz00:
{ /* ./DotNet/compress.scm 54 */
bool_t BgL_test3934z00_1402;
BgL_test3934z00_1402 = 
NULLP(BgL_lstz00_1400); 
if(BgL_test3934z00_1402)
{ /* ./DotNet/compress.scm 54 */
return BgL_lstz00_1400;}  else 
{ /* ./DotNet/compress.scm 56 */
bool_t BgL_test3935z00_1403;
{ /* ./DotNet/compress.scm 56 */
obj_t BgL_arg3952z00_1408;
BgL_arg3952z00_1408 = 
CAR(BgL_lstz00_1400); 
{ /* ./DotNet/compress.scm 56 */
obj_t BgL_auxz00_3848;
BgL_auxz00_3848 = 
PROCEDURE_ENTRY(BgL_predz00_1399)(BgL_predz00_1399, BgL_arg3952z00_1408, BEOA); 
BgL_test3935z00_1403 = 
CBOOL(BgL_auxz00_3848); } } 
if(BgL_test3935z00_1403)
{ /* ./DotNet/compress.scm 56 */
{ /* ./DotNet/compress.scm 57 */
obj_t BgL_arg3937z00_1404;obj_t BgL_arg3938z00_1405;
BgL_arg3937z00_1404 = 
CAR(BgL_lstz00_1400); 
{ /* ./DotNet/compress.scm 57 */
obj_t BgL_arg3943z00_1406;
BgL_arg3943z00_1406 = 
CDR(BgL_lstz00_1400); 
BgL_arg3938z00_1405 = 
BGl_filterz00zzdotnet_compressz00(BgL_predz00_1399, BgL_arg3943z00_1406); } 
return 
MAKE_PAIR(BgL_arg3937z00_1404, BgL_arg3938z00_1405);} }  else 
{ /* ./DotNet/compress.scm 56 */
{ /* ./DotNet/compress.scm 59 */
obj_t BgL_arg3948z00_1407;
BgL_arg3948z00_1407 = 
CDR(BgL_lstz00_1400); 
{ 
obj_t BgL_lstz00_3858;
BgL_lstz00_3858 = BgL_arg3948z00_1407; 
BgL_lstz00_1400 = BgL_lstz00_3858; 
goto BGl_filterz00zzdotnet_compressz00;} } } } } } 
}



/* simple*? */
bool_t BGl_simpleza2zf3z51zzdotnet_compressz00(obj_t BgL_exprza2za2_1409, obj_t BgL_bindingsz00_1410)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 51 */
{ /* ./DotNet/compress.scm 49 */
bool_t BgL_testz00_3859;
{ 
obj_t BgL_l3037z00_1426;
BgL_l3037z00_1426 = BgL_exprza2za2_1409; 
BgL_every3038z00_1427:
if(
NULLP(BgL_l3037z00_1426))
{ /* ./DotNet/compress.scm 49 */
BgL_testz00_3859 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 49 */
bool_t BgL_testz00_3862;
{ /* ./DotNet/compress.scm 49 */
obj_t BgL_auxz00_3863;
BgL_auxz00_3863 = 
BGl_simplezf3zf3zzdotnet_compressz00(
CAR(BgL_l3037z00_1426)); 
BgL_testz00_3862 = 
CBOOL(BgL_auxz00_3863); } 
if(BgL_testz00_3862)
{ /* ./DotNet/compress.scm 49 */
{ 
obj_t BgL_l3037z00_3867;
BgL_l3037z00_3867 = 
CDR(BgL_l3037z00_1426); 
BgL_l3037z00_1426 = BgL_l3037z00_3867; 
goto BgL_every3038z00_1427;} }  else 
{ /* ./DotNet/compress.scm 49 */
BgL_testz00_3859 = ((bool_t)0); } } } 
if(BgL_testz00_3859)
{ 
obj_t BgL_l3039z00_1413;
BgL_l3039z00_1413 = BgL_bindingsz00_1410; 
BgL_every3040z00_1414:
if(
NULLP(BgL_l3039z00_1413))
{ /* ./DotNet/compress.scm 50 */
return ((bool_t)1);}  else 
{ /* ./DotNet/compress.scm 50 */
bool_t BgL_test3959z00_1416;
{ /* ./DotNet/compress.scm 50 */
obj_t BgL_sz00_1418;
BgL_sz00_1418 = 
CAR(BgL_l3039z00_1413); 
{ 
obj_t BgL_l3041z00_1419;
BgL_l3041z00_1419 = BgL_exprza2za2_1409; 
BgL_any3042z00_1420:
{ /* ./DotNet/compress.scm 50 */
bool_t BgL_test3965z00_1421;
BgL_test3965z00_1421 = 
NULLP(BgL_l3041z00_1419); 
if(BgL_test3965z00_1421)
{ /* ./DotNet/compress.scm 50 */
BgL_test3959z00_1416 = ((bool_t)0); }  else 
{ /* ./DotNet/compress.scm 50 */
bool_t BgL_test3966z00_1422;
{ /* ./DotNet/compress.scm 50 */
obj_t BgL_az00_1424;
BgL_az00_1424 = 
CAR(BgL_l3041z00_1419); 
{ /* ./DotNet/compress.scm 50 */
obj_t BgL_arg3972z00_1425;
BgL_arg3972z00_1425 = 
CAR(BgL_sz00_1418); 
{ /* ./DotNet/compress.scm 50 */
bool_t BgL__andtest_3019z00_1930;
BgL__andtest_3019z00_1930 = 
BGl_iszd2azf3z21zz__objectz00(BgL_az00_1424, BGl_varz00zzast_nodez00); 
if(BgL__andtest_3019z00_1930)
{ /* ./DotNet/compress.scm 50 */
obj_t BgL_auxz00_3878;
{ /* ./DotNet/compress.scm 50 */
BgL_variablez00_bglt BgL_auxz00_3879;
{ /* ./DotNet/compress.scm 50 */
BgL_varz00_bglt BgL_obj1625z00_1933;
BgL_obj1625z00_1933 = 
(BgL_varz00_bglt)(BgL_az00_1424); 
BgL_auxz00_3879 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_1933))->BgL_variablez00); } 
BgL_auxz00_3878 = 
(obj_t)(BgL_auxz00_3879); } 
BgL_test3966z00_1422 = 
(BgL_auxz00_3878==BgL_arg3972z00_1425); }  else 
{ /* ./DotNet/compress.scm 50 */
BgL_test3966z00_1422 = ((bool_t)0); } } } } 
if(BgL_test3966z00_1422)
{ /* ./DotNet/compress.scm 50 */
BgL_test3959z00_1416 = ((bool_t)1); }  else 
{ /* ./DotNet/compress.scm 50 */
{ 
obj_t BgL_l3041z00_3885;
BgL_l3041z00_3885 = 
CDR(BgL_l3041z00_1419); 
BgL_l3041z00_1419 = BgL_l3041z00_3885; 
goto BgL_any3042z00_1420;} } } } } } 
if(BgL_test3959z00_1416)
{ /* ./DotNet/compress.scm 50 */
{ 
obj_t BgL_l3039z00_3888;
BgL_l3039z00_3888 = 
CDR(BgL_l3039z00_1413); 
BgL_l3039z00_1413 = BgL_l3039z00_3888; 
goto BgL_every3040z00_1414;} }  else 
{ /* ./DotNet/compress.scm 50 */
return ((bool_t)0);} } }  else 
{ /* ./DotNet/compress.scm 49 */
return ((bool_t)0);} } } 
}



/* get */
obj_t BGl_getz00zzdotnet_compressz00(obj_t BgL_xz00_1476, obj_t BgL_lz00_1477)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 34 */
{ /* ./DotNet/compress.scm 30 */
bool_t BgL_test4064z00_1479;
BgL_test4064z00_1479 = 
BGl_iszd2azf3z21zz__objectz00(BgL_xz00_1476, BGl_varz00zzast_nodez00); 
if(BgL_test4064z00_1479)
{ /* ./DotNet/compress.scm 32 */
obj_t BgL_slotz00_1481;
{ /* ./DotNet/compress.scm 32 */
obj_t BgL_auxz00_3892;
{ /* ./DotNet/compress.scm 32 */
BgL_variablez00_bglt BgL_auxz00_3893;
{ /* ./DotNet/compress.scm 31 */
BgL_varz00_bglt BgL_obj1625z00_1964;
BgL_obj1625z00_1964 = 
(BgL_varz00_bglt)(BgL_xz00_1476); 
BgL_auxz00_3893 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_1964))->BgL_variablez00); } 
BgL_auxz00_3892 = 
(obj_t)(BgL_auxz00_3893); } 
BgL_slotz00_1481 = 
BGl_assqz00zz__r4_pairs_and_lists_6_3z00(BgL_auxz00_3892, BgL_lz00_1477); } 
if(
CBOOL(BgL_slotz00_1481))
{ /* ./DotNet/compress.scm 33 */
return 
CDR(BgL_slotz00_1481);}  else 
{ /* ./DotNet/compress.scm 33 */
return BgL_xz00_1476;} }  else 
{ /* ./DotNet/compress.scm 30 */
return BgL_xz00_1476;} } } 
}



/* compile-compress-var3117 */
obj_t BGl_compilezd2compresszd2var3117z00zzdotnet_compressz00(obj_t BgL_envz00_2702, obj_t BgL_ez00_2703)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 21 */
{ /* ./DotNet/compress.scm 22 */
BgL_varz00_bglt BgL_auxz00_3901;
BgL_auxz00_3901 = 
(BgL_varz00_bglt)(BgL_ez00_2703); 
return 
(obj_t)(BgL_auxz00_3901);} } 
}



/* compile-compress-atom3115 */
obj_t BGl_compilezd2compresszd2atom3115z00zzdotnet_compressz00(obj_t BgL_envz00_2704, obj_t BgL_ez00_2705)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 18 */
{ /* ./DotNet/compress.scm 19 */
BgL_atomz00_bglt BgL_auxz00_3904;
BgL_auxz00_3904 = 
(BgL_atomz00_bglt)(BgL_ez00_2705); 
return 
(obj_t)(BgL_auxz00_3904);} } 
}



/* compile-compress */
BGL_EXPORTED_DEF BgL_nodez00_bglt BGl_compilezd2compresszd2zzdotnet_compressz00(BgL_nodez00_bglt BgL_ez00_1)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 11 */
{ /* ./DotNet/compress.scm 11 */
obj_t BgL_method3113z00_2617;
{ /* ./DotNet/compress.scm 11 */
BgL_objectz00_bglt BgL_objz00_2618;
BgL_objz00_2618 = 
(BgL_objectz00_bglt)(BgL_ez00_1); 
{ /* ./DotNet/compress.scm 11 */
long BgL_objzd2classzd2numz00_2619;
BgL_objzd2classzd2numz00_2619 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2618); 
{ /* ./DotNet/compress.scm 11 */
obj_t BgL_arg2017z00_2620;
{ /* ./DotNet/compress.scm 11 */
int BgL_auxz00_3909;
BgL_auxz00_3909 = 
(int)(((long)1)); 
BgL_arg2017z00_2620 = 
PROCEDURE_REF(BGl_compilezd2compresszd2envz00zzdotnet_compressz00, BgL_auxz00_3909); } 
{ /* ./DotNet/compress.scm 11 */
int BgL_offsetz00_2623;
BgL_offsetz00_2623 = 
(int)(BgL_objzd2classzd2numz00_2619); 
{ /* ./DotNet/compress.scm 11 */
long BgL_offsetz00_2624;
{ /* ./DotNet/compress.scm 11 */
long BgL_auxz00_3913;
BgL_auxz00_3913 = 
(long)(BgL_offsetz00_2623); 
BgL_offsetz00_2624 = 
(BgL_auxz00_3913-OBJECT_TYPE); } 
{ /* ./DotNet/compress.scm 11 */
long BgL_modz00_2625;
{ /* ./DotNet/compress.scm 11 */
int BgL_arg2028z00_2626;
BgL_arg2028z00_2626 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 11 */
long BgL_n2z00_2634;
BgL_n2z00_2634 = 
(long)(BgL_arg2028z00_2626); 
BgL_modz00_2625 = 
(BgL_offsetz00_2624/BgL_n2z00_2634); } } 
{ /* ./DotNet/compress.scm 11 */
long BgL_restz00_2627;
{ /* ./DotNet/compress.scm 11 */
int BgL_arg2024z00_2628;
BgL_arg2024z00_2628 = 
(int)(((long)8)); 
{ /* ./DotNet/compress.scm 11 */
long BgL_n2z00_2637;
BgL_n2z00_2637 = 
(long)(BgL_arg2024z00_2628); 
BgL_restz00_2627 = 
(BgL_offsetz00_2624%BgL_n2z00_2637); } } 
{ /* ./DotNet/compress.scm 11 */

{ /* ./DotNet/compress.scm 11 */
obj_t BgL_bucketz00_2629;
{ /* ./DotNet/compress.scm 11 */
int BgL_kz00_2639;
BgL_kz00_2639 = 
(int)(BgL_modz00_2625); 
BgL_bucketz00_2629 = 
VECTOR_REF(BgL_arg2017z00_2620,BgL_kz00_2639); } 
{ /* ./DotNet/compress.scm 11 */
int BgL_kz00_2641;
BgL_kz00_2641 = 
(int)(BgL_restz00_2627); 
BgL_method3113z00_2617 = 
VECTOR_REF(BgL_bucketz00_2629,BgL_kz00_2641); } } } } } } } } } } 
{ /* ./DotNet/compress.scm 11 */
obj_t BgL_auxz00_3926;
BgL_auxz00_3926 = 
PROCEDURE_ENTRY(BgL_method3113z00_2617)(BgL_method3113z00_2617, 
(obj_t)(BgL_ez00_1), BEOA); 
return 
(BgL_nodez00_bglt)(BgL_auxz00_3926);} } } 
}



/* _compile-compress4457 */
obj_t BGl__compilezd2compress4457zd2zzdotnet_compressz00(obj_t BgL_envz00_2645, obj_t BgL_ez00_2646)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 11 */
{ /* ./DotNet/compress.scm 11 */
BgL_nodez00_bglt BgL_auxz00_3931;
BgL_auxz00_3931 = 
BGl_compilezd2compresszd2zzdotnet_compressz00(
(BgL_nodez00_bglt)(BgL_ez00_2646)); 
return 
(obj_t)(BgL_auxz00_3931);} } 
}



/* compile-compress-default3112 */
BgL_nodez00_bglt BGl_compilezd2compresszd2default3112z00zzdotnet_compressz00(BgL_nodez00_bglt BgL_ez00_2)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 1 */
{ /* ./DotNet/compress.scm 1 */
obj_t BgL_procz00_2642;obj_t BgL_objectz00_2644;
BgL_procz00_2642 = 
CNST_TABLE_REF(((long)2)); 
BgL_objectz00_2644 = 
(obj_t)(BgL_ez00_2); 
FAILURE(BgL_procz00_2642,BGl_string4946z00zzdotnet_compressz00,BgL_objectz00_2644);} } 
}



/* _compile-compress-default3112 */
obj_t BGl__compilezd2compresszd2default3112z00zzdotnet_compressz00(obj_t BgL_envz00_2706, obj_t BgL_ez00_2707)
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 1 */
{ /* ./DotNet/compress.scm 1 */
BgL_nodez00_bglt BgL_auxz00_3938;
BgL_auxz00_3938 = 
BGl_compilezd2compresszd2default3112z00zzdotnet_compressz00(
(BgL_nodez00_bglt)(BgL_ez00_2707)); 
return 
(obj_t)(BgL_auxz00_3938);} } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzdotnet_compressz00()
{ AN_OBJECT;
{ /* ./DotNet/compress.scm 1 */
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zzobject_classz00(((long)30791), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zzdotnet_envz00(((long)58889), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zzdotnet_vmemqz00(((long)46723), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zztools_shapez00(((long)30833), "dotnet_compress"); 
BGl_modulezd2initializa7ationz75zzengine_paramz00(((long)14260), "dotnet_compress"); 
return 
BGl_modulezd2initializa7ationz75zzeffect_effectz00(((long)14017), "dotnet_compress");} 
}

