/*===========================================================================*/
/*   (Jvm/lisp.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 Jvm/lisp.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;


static obj_t BGl_compilezd2lispzd2fail2820z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2app2792z00zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_vrefz00zzast_nodez00;
BGL_IMPORT obj_t BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2appzd2ly2794zd2zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_methodzd2initzd2zzjvm_lispz00();
BGL_IMPORT obj_t open_input_string(obj_t);
extern obj_t BGl_letzd2funzd2zzast_nodez00;
static obj_t BGl_compilezd2lispzd2conditional2786z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2boxzd2ref2824zd2zzjvm_lispz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_compilezd2lispzd2zzjvm_lispz00(BgL_nodez00_bglt);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_addzd2genericz12zc0zz__objectz00(obj_t, obj_t);
extern obj_t BGl_letzd2varzd2zzast_nodez00;
static obj_t BGl_compilezd2lispzd2makezd2box2822zd2zzjvm_lispz00(obj_t, obj_t);
extern BgL_typez00_bglt BGl_typeofz00zztype_typeofz00(BgL_nodez00_bglt);
extern obj_t BGl_castz00zzast_nodez00;
extern obj_t BGl_boxzd2refzd2zzast_nodez00;
extern obj_t BGl_varz00zzast_nodez00;
static obj_t BGl_compilezd2lispzd2cast2814z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_cnstzd2initzd2zzjvm_lispz00();
extern obj_t BGl_atomz00zzast_nodez00;
extern obj_t BGl_failz00zzast_nodez00;
extern obj_t BGl_funcallz00zzast_nodez00;
static obj_t BGl_compilezd2lispzd2jumpzd2exzd2it2818z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2sfunzd2zzjvm_lispz00(obj_t);
static obj_t BGl_compilezd2lispzd2new2802z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzjvm_lispz00();
extern obj_t BGl_makezd2boxzd2zzast_nodez00;
static obj_t BGl_compilezd2lispzd2vsetz122808z12zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_getfieldz00zzast_nodez00;
extern obj_t BGl_isaz00zzast_nodez00;
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
extern obj_t BGl_selectz00zzast_nodez00;
extern obj_t BGl_vallocz00zzast_nodez00;
static obj_t BGl_toplevelzd2initzd2zzjvm_lispz00();
extern obj_t BGl_appzd2lyzd2zzast_nodez00;
extern obj_t BGl_boxzd2setz12zc0zzast_nodez00;
static obj_t BGl_compilezd2lispzd2select2788z00zzjvm_lispz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzjvm_lispz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typeofz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(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 *);
static obj_t BGl_compilezd2lispzd2var2778z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2vref2806z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2setq2782z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2default2773z00zzjvm_lispz00(BgL_nodez00_bglt);
static obj_t BGl_compilezd2lispzd2letzd2fun2790zd2zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_setzd2exzd2itz00zzast_nodez00;
static obj_t BGl_compilezd2lispzd2funcall2796z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2letzd2var2780zd2zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_jumpzd2exzd2itz00zzast_nodez00;
static obj_t BGl_compilezd2lispzd2setzd2exzd2it2816z00zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_newz00zzast_nodez00;
extern obj_t BGl_conditionalz00zzast_nodez00;
extern obj_t BGl_sequencez00zzast_nodez00;
static obj_t BGl_compilezd2lispzd2boxzd2setz122826zc0zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2atom2776z00zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_appz00zzast_nodez00;
static obj_t BGl__compilezd2lisp4237zd2zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2isa2812z00zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_localz00zzast_varz00;
extern obj_t BGl_vlengthz00zzast_nodez00;
static obj_t BGl_compilezd2lispzd2getfield2798z00zzjvm_lispz00(obj_t, obj_t);
extern obj_t BGl_setfieldz00zzast_nodez00;
static obj_t BGl_compilezd2lispzd2valloc2804z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2sequence2784z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_compilezd2lispzd2vlength2810z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzjvm_lispz00 = BUNSPEC;
static obj_t BGl_compilezd2lispzd2setfield2800z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl__compilezd2lispzd2default2773z00zzjvm_lispz00(obj_t, obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzjvm_lispz00();
extern obj_t BGl_vsetz12z12zzast_nodez00;
extern obj_t BGl_setqz00zzast_nodez00;
static obj_t __cnst[ 24 ] ;


DEFINE_STRING( BGl_string4937z00zzjvm_lispz00, BgL_bgl_string4937za700za7za7jvm_lispza7004964z00, "compile-lisp-default2773 let setq progn if selectq flet apply funcall getfield setfield new makevector vref vset vlength is? cast setexit throw fail make-box box-ref box-set ", 174 );
DEFINE_STRING( BGl_string4936z00zzjvm_lispz00, BgL_bgl_string4936za700za7za7jvm_lispza7004965z00, "No method for this object", 25 );
DEFINE_STATIC_PROCEDURE( BGl_compilezd2lispzd2default2773zd2envzd2zzjvm_lispz00, BgL_bgl__compileza7d2lispza7d2default2773za700za7za7jvm_lispza7004966z00, BGl__compilezd2lispzd2default2773z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4910z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2atom2776za700za7za7jvm_lispza7004967z00, BGl_compilezd2lispzd2atom2776z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4911z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2var2778za700za7za7jvm_lispza7004968z00, BGl_compilezd2lispzd2var2778z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4912z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2letza7d2var2780za7d2za7za7jvm_lispza7004969za7, BGl_compilezd2lispzd2letzd2var2780zd2zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4913z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2setq2782za700za7za7jvm_lispza7004970z00, BGl_compilezd2lispzd2setq2782z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4914z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2sequence2784za700za7za7jvm_lispza7004971z00, BGl_compilezd2lispzd2sequence2784z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4915z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2conditional2786za700za7za7jvm_lispza7004972z00, BGl_compilezd2lispzd2conditional2786z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4916z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2select2788za700za7za7jvm_lispza7004973z00, BGl_compilezd2lispzd2select2788z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4917z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2letza7d2fun2790za7d2za7za7jvm_lispza7004974za7, BGl_compilezd2lispzd2letzd2fun2790zd2zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4918z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2app2792za700za7za7jvm_lispza7004975z00, BGl_compilezd2lispzd2app2792z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4920z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2funcall2796za700za7za7jvm_lispza7004976z00, BGl_compilezd2lispzd2funcall2796z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4919z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2appza7d2ly2794za7d2za7za7jvm_lispza7004977za7, BGl_compilezd2lispzd2appzd2ly2794zd2zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4921z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2getfield2798za700za7za7jvm_lispza7004978z00, BGl_compilezd2lispzd2getfield2798z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4922z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2setfield2800za700za7za7jvm_lispza7004979z00, BGl_compilezd2lispzd2setfield2800z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4923z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2new2802za700za7za7jvm_lispza7004980z00, BGl_compilezd2lispzd2new2802z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4924z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2valloc2804za700za7za7jvm_lispza7004981z00, BGl_compilezd2lispzd2valloc2804z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4925z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2vref2806za700za7za7jvm_lispza7004982z00, BGl_compilezd2lispzd2vref2806z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4926z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2vsetza7122808za712za7za7jvm_lispza7004983za7, BGl_compilezd2lispzd2vsetz122808z12zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4927z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2vlength2810za700za7za7jvm_lispza7004984z00, BGl_compilezd2lispzd2vlength2810z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4928z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2isa2812za700za7za7jvm_lispza7004985z00, BGl_compilezd2lispzd2isa2812z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4930z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2setza7d2exza7d2it2816za700za7za7jvm_lispza7004986z00, BGl_compilezd2lispzd2setzd2exzd2it2816z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4929z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2cast2814za700za7za7jvm_lispza7004987z00, BGl_compilezd2lispzd2cast2814z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4931z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2jumpza7d2exza7d2it2818za700za7za7jvm_lispza7004988z00, BGl_compilezd2lispzd2jumpzd2exzd2it2818z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4932z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2fail2820za700za7za7jvm_lispza7004989z00, BGl_compilezd2lispzd2fail2820z00zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4933z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2makeza7d2box2822za7d2za7za7jvm_lispza7004990za7, BGl_compilezd2lispzd2makezd2box2822zd2zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4934z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2boxza7d2ref2824za7d2za7za7jvm_lispza7004991za7, BGl_compilezd2lispzd2boxzd2ref2824zd2zzjvm_lispz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4935z00zzjvm_lispz00, BgL_bgl_compileza7d2lispza7d2boxza7d2setza7122826za7c0za7za7jvm_lispza7004992z00, BGl_compilezd2lispzd2boxzd2setz122826zc0zzjvm_lispz00, 0L, 1 );
DEFINE_EXPORT_GENERIC( BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_bgl__compileza7d2lisp4237za7d2za7za7jvm_lispza7004993za7, BGl__compilezd2lisp4237zd2zzjvm_lispz00, 0L, 1 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzjvm_lispz00(long BgL_checksumz00_3190, char * BgL_fromz00_3191)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzjvm_lispz00))
{ 
BGl_requirezd2initializa7ationz75zzjvm_lispz00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzjvm_lispz00(); 
BGl_cnstzd2initzd2zzjvm_lispz00(); 
BGl_importedzd2moduleszd2initz00zzjvm_lispz00(); 
BGl_methodzd2initzd2zzjvm_lispz00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzjvm_lispz00()
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 1 */
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "jvm_lisp"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "jvm_lisp"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "jvm_lisp"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzjvm_lispz00()
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 1 */
{ /* ./Jvm/lisp.scm 1 */
obj_t BgL_cportz00_3182;
BgL_cportz00_3182 = 
open_input_string(BGl_string4937z00zzjvm_lispz00); 
{ 
long BgL_iz00_3183;
BgL_iz00_3183 = ((long)23); 
BgL_loopz00_3184:
{ /* ./Jvm/lisp.scm 1 */
bool_t BgL_test4939z00_3185;
BgL_test4939z00_3185 = 
(BgL_iz00_3183==((long)-1)); 
if(BgL_test4939z00_3185)
{ /* ./Jvm/lisp.scm 1 */
return BUNSPEC;}  else 
{ /* ./Jvm/lisp.scm 1 */
{ /* ./Jvm/lisp.scm 1 */
obj_t BgL_arg4941z00_3186;
{ /* ./Jvm/lisp.scm 1 */
obj_t BgL_list4944z00_3187;
BgL_list4944z00_3187 = 
MAKE_PAIR(BgL_cportz00_3182, BNIL); 
BgL_arg4941z00_3186 = 
BGl_readz00zz__readerz00(BgL_list4944z00_3187); } 
{ /* ./Jvm/lisp.scm 1 */
int BgL_auxz00_3207;
BgL_auxz00_3207 = 
(int)(BgL_iz00_3183); 
CNST_TABLE_SET(BgL_auxz00_3207, BgL_arg4941z00_3186); } } 
{ /* ./Jvm/lisp.scm 1 */
int BgL_auxz00_3188;
{ /* ./Jvm/lisp.scm 1 */
long BgL_auxz00_3210;
BgL_auxz00_3210 = 
(BgL_iz00_3183-((long)1)); 
BgL_auxz00_3188 = 
(int)(BgL_auxz00_3210); } 
{ 
long BgL_iz00_3213;
BgL_iz00_3213 = 
(long)(BgL_auxz00_3188); 
BgL_iz00_3183 = BgL_iz00_3213; 
goto BgL_loopz00_3184;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzjvm_lispz00()
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 1 */
return BUNSPEC;} 
}



/* compile-sfun */
obj_t BGl_compilezd2sfunzd2zzjvm_lispz00(obj_t BgL_vz00_11)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 46 */
{ /* ./Jvm/lisp.scm 48 */
BgL_valuez00_bglt BgL_instance2696z00_688;
{ /* ./Jvm/lisp.scm 49 */
BgL_variablez00_bglt BgL_obj1100z00_1589;
BgL_obj1100z00_1589 = 
(BgL_variablez00_bglt)(BgL_vz00_11); 
BgL_instance2696z00_688 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1100z00_1589))->BgL_valuez00); } 
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_arg2828z00_689;obj_t BgL_arg2829z00_690;
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_l2698z00_691;
{ /* ./Jvm/lisp.scm 49 */
BgL_sfunz00_bglt BgL_obj1367z00_1590;
BgL_obj1367z00_1590 = 
(BgL_sfunz00_bglt)(BgL_instance2696z00_688); 
BgL_l2698z00_691 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1367z00_1590))->BgL_argsz00); } 
{ /* ./Jvm/lisp.scm 49 */
bool_t BgL_test2831z00_692;
BgL_test2831z00_692 = 
NULLP(BgL_l2698z00_691); 
if(BgL_test2831z00_692)
{ /* ./Jvm/lisp.scm 49 */
BgL_arg2828z00_689 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_head2700z00_693;
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_arg2852z00_704;
{ /* ./Jvm/lisp.scm 49 */
BgL_variablez00_bglt BgL_obj1094z00_1593;
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_auxz00_3221;
BgL_auxz00_3221 = 
CAR(BgL_l2698z00_691); 
BgL_obj1094z00_1593 = 
(BgL_variablez00_bglt)(BgL_auxz00_3221); } 
BgL_arg2852z00_704 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1094z00_1593))->BgL_namez00); } 
BgL_head2700z00_693 = 
MAKE_PAIR(BgL_arg2852z00_704, BNIL); } 
{ 
obj_t BgL_l2698z00_694;obj_t BgL_tail2701z00_695;
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_arg2833z00_697;
BgL_arg2833z00_697 = 
CDR(BgL_l2698z00_691); 
BgL_l2698z00_694 = BgL_arg2833z00_697; 
BgL_tail2701z00_695 = BgL_head2700z00_693; 
BgL_map2699z00_696:
{ /* ./Jvm/lisp.scm 49 */
bool_t BgL_test2836z00_698;
BgL_test2836z00_698 = 
NULLP(BgL_l2698z00_694); 
if(BgL_test2836z00_698)
{ /* ./Jvm/lisp.scm 49 */
BgL_arg2828z00_689 = BgL_head2700z00_693; }  else 
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_newtail2702z00_699;
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_arg2843z00_701;
{ /* ./Jvm/lisp.scm 49 */
BgL_variablez00_bglt BgL_obj1094z00_1599;
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_auxz00_3229;
BgL_auxz00_3229 = 
CAR(BgL_l2698z00_694); 
BgL_obj1094z00_1599 = 
(BgL_variablez00_bglt)(BgL_auxz00_3229); } 
BgL_arg2843z00_701 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1094z00_1599))->BgL_namez00); } 
BgL_newtail2702z00_699 = 
MAKE_PAIR(BgL_arg2843z00_701, BNIL); } 
SET_CDR(BgL_tail2701z00_695, BgL_newtail2702z00_699); 
{ /* ./Jvm/lisp.scm 49 */
obj_t BgL_arg2839z00_700;
BgL_arg2839z00_700 = 
CDR(BgL_l2698z00_694); 
{ 
obj_t BgL_tail2701z00_3237;obj_t BgL_l2698z00_3236;
BgL_l2698z00_3236 = BgL_arg2839z00_700; 
BgL_tail2701z00_3237 = BgL_newtail2702z00_699; 
BgL_tail2701z00_695 = BgL_tail2701z00_3237; 
BgL_l2698z00_694 = BgL_l2698z00_3236; 
goto BgL_map2699z00_696;} } } } } } } } } 
{ /* ./Jvm/lisp.scm 50 */
obj_t BgL_arg2862z00_707;
{ /* ./Jvm/lisp.scm 50 */
obj_t BgL_arg2866z00_709;
{ /* ./Jvm/lisp.scm 50 */
BgL_sfunz00_bglt BgL_obj1370z00_1605;
BgL_obj1370z00_1605 = 
(BgL_sfunz00_bglt)(BgL_instance2696z00_688); 
BgL_arg2866z00_709 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1370z00_1605))->BgL_bodyz00); } 
{ /* ./Jvm/lisp.scm 50 */
BgL_nodez00_bglt BgL_ez00_1606;
BgL_ez00_1606 = 
(BgL_nodez00_bglt)(BgL_arg2866z00_709); 
{ /* ./Jvm/lisp.scm 50 */
obj_t BgL_method2774z00_1607;
{ /* ./Jvm/lisp.scm 50 */
BgL_objectz00_bglt BgL_objz00_1608;
BgL_objz00_1608 = 
(BgL_objectz00_bglt)(BgL_ez00_1606); 
{ /* ./Jvm/lisp.scm 50 */
long BgL_objzd2classzd2numz00_1609;
BgL_objzd2classzd2numz00_1609 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1608); 
{ /* ./Jvm/lisp.scm 50 */
obj_t BgL_arg2017z00_1610;
{ /* ./Jvm/lisp.scm 50 */
int BgL_auxz00_3243;
BgL_auxz00_3243 = 
(int)(((long)1)); 
BgL_arg2017z00_1610 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3243); } 
{ /* ./Jvm/lisp.scm 50 */
int BgL_offsetz00_1613;
BgL_offsetz00_1613 = 
(int)(BgL_objzd2classzd2numz00_1609); 
{ /* ./Jvm/lisp.scm 50 */
long BgL_offsetz00_1614;
{ /* ./Jvm/lisp.scm 50 */
long BgL_auxz00_3247;
BgL_auxz00_3247 = 
(long)(BgL_offsetz00_1613); 
BgL_offsetz00_1614 = 
(BgL_auxz00_3247-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 50 */
long BgL_modz00_1615;
{ /* ./Jvm/lisp.scm 50 */
int BgL_arg2028z00_1616;
BgL_arg2028z00_1616 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 50 */
long BgL_n2z00_1624;
BgL_n2z00_1624 = 
(long)(BgL_arg2028z00_1616); 
BgL_modz00_1615 = 
(BgL_offsetz00_1614/BgL_n2z00_1624); } } 
{ /* ./Jvm/lisp.scm 50 */
long BgL_restz00_1617;
{ /* ./Jvm/lisp.scm 50 */
int BgL_arg2024z00_1618;
BgL_arg2024z00_1618 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 50 */
long BgL_n2z00_1627;
BgL_n2z00_1627 = 
(long)(BgL_arg2024z00_1618); 
BgL_restz00_1617 = 
(BgL_offsetz00_1614%BgL_n2z00_1627); } } 
{ /* ./Jvm/lisp.scm 50 */

{ /* ./Jvm/lisp.scm 50 */
obj_t BgL_bucketz00_1619;
{ /* ./Jvm/lisp.scm 50 */
int BgL_kz00_1629;
BgL_kz00_1629 = 
(int)(BgL_modz00_1615); 
BgL_bucketz00_1619 = 
VECTOR_REF(BgL_arg2017z00_1610,BgL_kz00_1629); } 
{ /* ./Jvm/lisp.scm 50 */
int BgL_kz00_1631;
BgL_kz00_1631 = 
(int)(BgL_restz00_1617); 
BgL_method2774z00_1607 = 
VECTOR_REF(BgL_bucketz00_1619,BgL_kz00_1631); } } } } } } } } } } 
BgL_arg2862z00_707 = 
PROCEDURE_ENTRY(BgL_method2774z00_1607)(BgL_method2774z00_1607, 
(obj_t)(BgL_ez00_1606), BEOA); } } } 
BgL_arg2829z00_690 = 
MAKE_PAIR(BgL_arg2862z00_707, BNIL); } 
return 
MAKE_PAIR(BgL_arg2828z00_689, BgL_arg2829z00_690);} } } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzjvm_lispz00()
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 1 */
BGl_addzd2genericz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_compilezd2lispzd2default2773zd2envzd2zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_atomz00zzast_nodez00, BGl_proc4910z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_varz00zzast_nodez00, BGl_proc4911z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc4912z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_setqz00zzast_nodez00, BGl_proc4913z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_sequencez00zzast_nodez00, BGl_proc4914z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_conditionalz00zzast_nodez00, BGl_proc4915z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_selectz00zzast_nodez00, BGl_proc4916z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc4917z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_appz00zzast_nodez00, BGl_proc4918z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc4919z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_funcallz00zzast_nodez00, BGl_proc4920z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_getfieldz00zzast_nodez00, BGl_proc4921z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_setfieldz00zzast_nodez00, BGl_proc4922z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_newz00zzast_nodez00, BGl_proc4923z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_vallocz00zzast_nodez00, BGl_proc4924z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_vrefz00zzast_nodez00, BGl_proc4925z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_vsetz12z12zzast_nodez00, BGl_proc4926z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_vlengthz00zzast_nodez00, BGl_proc4927z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_isaz00zzast_nodez00, BGl_proc4928z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_castz00zzast_nodez00, BGl_proc4929z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc4930z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc4931z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_failz00zzast_nodez00, BGl_proc4932z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_makezd2boxzd2zzast_nodez00, BGl_proc4933z00zzjvm_lispz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_boxzd2refzd2zzast_nodez00, BGl_proc4934z00zzjvm_lispz00); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc4935z00zzjvm_lispz00);} 
}



/* compile-lisp-box-set!2826 */
obj_t BGl_compilezd2lispzd2boxzd2setz122826zc0zzjvm_lispz00(obj_t BgL_envz00_3128, obj_t BgL_ez00_3129)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 112 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_ez00_1574;
BgL_ez00_1574 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_ez00_3129); 
{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_arg4106z00_1578;obj_t BgL_arg4107z00_1579;
BgL_arg4106z00_1578 = 
CNST_TABLE_REF(((long)0)); 
{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_arg4110z00_1580;obj_t BgL_arg4111z00_1581;
{ /* ./Jvm/lisp.scm 114 */
BgL_varz00_bglt BgL_arg4114z00_1582;
BgL_arg4114z00_1582 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_ez00_1574))->BgL_varz00); 
{ /* ./Jvm/lisp.scm 114 */
BgL_nodez00_bglt BgL_ez00_3019;
BgL_ez00_3019 = 
(BgL_nodez00_bglt)(BgL_arg4114z00_1582); 
{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_method2774z00_3020;
{ /* ./Jvm/lisp.scm 114 */
BgL_objectz00_bglt BgL_objz00_3021;
BgL_objz00_3021 = 
(BgL_objectz00_bglt)(BgL_ez00_3019); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_objzd2classzd2numz00_3022;
BgL_objzd2classzd2numz00_3022 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3021); 
{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_arg2017z00_3023;
{ /* ./Jvm/lisp.scm 114 */
int BgL_auxz00_3297;
BgL_auxz00_3297 = 
(int)(((long)1)); 
BgL_arg2017z00_3023 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3297); } 
{ /* ./Jvm/lisp.scm 114 */
int BgL_offsetz00_3026;
BgL_offsetz00_3026 = 
(int)(BgL_objzd2classzd2numz00_3022); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_offsetz00_3027;
{ /* ./Jvm/lisp.scm 114 */
long BgL_auxz00_3301;
BgL_auxz00_3301 = 
(long)(BgL_offsetz00_3026); 
BgL_offsetz00_3027 = 
(BgL_auxz00_3301-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 114 */
long BgL_modz00_3028;
{ /* ./Jvm/lisp.scm 114 */
int BgL_arg2028z00_3029;
BgL_arg2028z00_3029 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_n2z00_3037;
BgL_n2z00_3037 = 
(long)(BgL_arg2028z00_3029); 
BgL_modz00_3028 = 
(BgL_offsetz00_3027/BgL_n2z00_3037); } } 
{ /* ./Jvm/lisp.scm 114 */
long BgL_restz00_3030;
{ /* ./Jvm/lisp.scm 114 */
int BgL_arg2024z00_3031;
BgL_arg2024z00_3031 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_n2z00_3040;
BgL_n2z00_3040 = 
(long)(BgL_arg2024z00_3031); 
BgL_restz00_3030 = 
(BgL_offsetz00_3027%BgL_n2z00_3040); } } 
{ /* ./Jvm/lisp.scm 114 */

{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_bucketz00_3032;
{ /* ./Jvm/lisp.scm 114 */
int BgL_kz00_3042;
BgL_kz00_3042 = 
(int)(BgL_modz00_3028); 
BgL_bucketz00_3032 = 
VECTOR_REF(BgL_arg2017z00_3023,BgL_kz00_3042); } 
{ /* ./Jvm/lisp.scm 114 */
int BgL_kz00_3044;
BgL_kz00_3044 = 
(int)(BgL_restz00_3030); 
BgL_method2774z00_3020 = 
VECTOR_REF(BgL_bucketz00_3032,BgL_kz00_3044); } } } } } } } } } } 
BgL_arg4110z00_1580 = 
PROCEDURE_ENTRY(BgL_method2774z00_3020)(BgL_method2774z00_3020, 
(obj_t)(BgL_ez00_3019), BEOA); } } } 
{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_arg4118z00_1583;
{ /* ./Jvm/lisp.scm 114 */
BgL_nodez00_bglt BgL_arg4122z00_1585;
BgL_arg4122z00_1585 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_ez00_1574))->BgL_valuez00); 
{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_method2774z00_3047;
{ /* ./Jvm/lisp.scm 114 */
BgL_objectz00_bglt BgL_objz00_3048;
BgL_objz00_3048 = 
(BgL_objectz00_bglt)(BgL_arg4122z00_1585); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_objzd2classzd2numz00_3049;
BgL_objzd2classzd2numz00_3049 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3048); 
{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_arg2017z00_3050;
{ /* ./Jvm/lisp.scm 114 */
int BgL_auxz00_3320;
BgL_auxz00_3320 = 
(int)(((long)1)); 
BgL_arg2017z00_3050 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3320); } 
{ /* ./Jvm/lisp.scm 114 */
int BgL_offsetz00_3053;
BgL_offsetz00_3053 = 
(int)(BgL_objzd2classzd2numz00_3049); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_offsetz00_3054;
{ /* ./Jvm/lisp.scm 114 */
long BgL_auxz00_3324;
BgL_auxz00_3324 = 
(long)(BgL_offsetz00_3053); 
BgL_offsetz00_3054 = 
(BgL_auxz00_3324-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 114 */
long BgL_modz00_3055;
{ /* ./Jvm/lisp.scm 114 */
int BgL_arg2028z00_3056;
BgL_arg2028z00_3056 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_n2z00_3064;
BgL_n2z00_3064 = 
(long)(BgL_arg2028z00_3056); 
BgL_modz00_3055 = 
(BgL_offsetz00_3054/BgL_n2z00_3064); } } 
{ /* ./Jvm/lisp.scm 114 */
long BgL_restz00_3057;
{ /* ./Jvm/lisp.scm 114 */
int BgL_arg2024z00_3058;
BgL_arg2024z00_3058 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 114 */
long BgL_n2z00_3067;
BgL_n2z00_3067 = 
(long)(BgL_arg2024z00_3058); 
BgL_restz00_3057 = 
(BgL_offsetz00_3054%BgL_n2z00_3067); } } 
{ /* ./Jvm/lisp.scm 114 */

{ /* ./Jvm/lisp.scm 114 */
obj_t BgL_bucketz00_3059;
{ /* ./Jvm/lisp.scm 114 */
int BgL_kz00_3069;
BgL_kz00_3069 = 
(int)(BgL_modz00_3055); 
BgL_bucketz00_3059 = 
VECTOR_REF(BgL_arg2017z00_3050,BgL_kz00_3069); } 
{ /* ./Jvm/lisp.scm 114 */
int BgL_kz00_3071;
BgL_kz00_3071 = 
(int)(BgL_restz00_3057); 
BgL_method2774z00_3047 = 
VECTOR_REF(BgL_bucketz00_3059,BgL_kz00_3071); } } } } } } } } } } 
BgL_arg4118z00_1583 = 
PROCEDURE_ENTRY(BgL_method2774z00_3047)(BgL_method2774z00_3047, 
(obj_t)(BgL_arg4122z00_1585), BEOA); } } 
BgL_arg4111z00_1581 = 
MAKE_PAIR(BgL_arg4118z00_1583, BNIL); } 
BgL_arg4107z00_1579 = 
MAKE_PAIR(BgL_arg4110z00_1580, BgL_arg4111z00_1581); } 
return 
MAKE_PAIR(BgL_arg4106z00_1578, BgL_arg4107z00_1579);} } } 
}



/* compile-lisp-box-ref2824 */
obj_t BGl_compilezd2lispzd2boxzd2ref2824zd2zzjvm_lispz00(obj_t BgL_envz00_3130, obj_t BgL_ez00_3131)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 108 */
{ 
BgL_boxzd2refzd2_bglt BgL_ez00_1563;
BgL_ez00_1563 = 
(BgL_boxzd2refzd2_bglt)(BgL_ez00_3131); 
{ /* ./Jvm/lisp.scm 110 */
obj_t BgL_arg4088z00_1567;obj_t BgL_arg4089z00_1568;
BgL_arg4088z00_1567 = 
CNST_TABLE_REF(((long)1)); 
{ /* ./Jvm/lisp.scm 110 */
obj_t BgL_arg4092z00_1569;
{ /* ./Jvm/lisp.scm 110 */
BgL_varz00_bglt BgL_arg4096z00_1571;
BgL_arg4096z00_1571 = 
(((BgL_boxzd2refzd2_bglt)CREF(BgL_ez00_1563))->BgL_varz00); 
{ /* ./Jvm/lisp.scm 110 */
BgL_nodez00_bglt BgL_ez00_2992;
BgL_ez00_2992 = 
(BgL_nodez00_bglt)(BgL_arg4096z00_1571); 
{ /* ./Jvm/lisp.scm 110 */
obj_t BgL_method2774z00_2993;
{ /* ./Jvm/lisp.scm 110 */
BgL_objectz00_bglt BgL_objz00_2994;
BgL_objz00_2994 = 
(BgL_objectz00_bglt)(BgL_ez00_2992); 
{ /* ./Jvm/lisp.scm 110 */
long BgL_objzd2classzd2numz00_2995;
BgL_objzd2classzd2numz00_2995 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2994); 
{ /* ./Jvm/lisp.scm 110 */
obj_t BgL_arg2017z00_2996;
{ /* ./Jvm/lisp.scm 110 */
int BgL_auxz00_3349;
BgL_auxz00_3349 = 
(int)(((long)1)); 
BgL_arg2017z00_2996 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3349); } 
{ /* ./Jvm/lisp.scm 110 */
int BgL_offsetz00_2999;
BgL_offsetz00_2999 = 
(int)(BgL_objzd2classzd2numz00_2995); 
{ /* ./Jvm/lisp.scm 110 */
long BgL_offsetz00_3000;
{ /* ./Jvm/lisp.scm 110 */
long BgL_auxz00_3353;
BgL_auxz00_3353 = 
(long)(BgL_offsetz00_2999); 
BgL_offsetz00_3000 = 
(BgL_auxz00_3353-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 110 */
long BgL_modz00_3001;
{ /* ./Jvm/lisp.scm 110 */
int BgL_arg2028z00_3002;
BgL_arg2028z00_3002 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 110 */
long BgL_n2z00_3010;
BgL_n2z00_3010 = 
(long)(BgL_arg2028z00_3002); 
BgL_modz00_3001 = 
(BgL_offsetz00_3000/BgL_n2z00_3010); } } 
{ /* ./Jvm/lisp.scm 110 */
long BgL_restz00_3003;
{ /* ./Jvm/lisp.scm 110 */
int BgL_arg2024z00_3004;
BgL_arg2024z00_3004 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 110 */
long BgL_n2z00_3013;
BgL_n2z00_3013 = 
(long)(BgL_arg2024z00_3004); 
BgL_restz00_3003 = 
(BgL_offsetz00_3000%BgL_n2z00_3013); } } 
{ /* ./Jvm/lisp.scm 110 */

{ /* ./Jvm/lisp.scm 110 */
obj_t BgL_bucketz00_3005;
{ /* ./Jvm/lisp.scm 110 */
int BgL_kz00_3015;
BgL_kz00_3015 = 
(int)(BgL_modz00_3001); 
BgL_bucketz00_3005 = 
VECTOR_REF(BgL_arg2017z00_2996,BgL_kz00_3015); } 
{ /* ./Jvm/lisp.scm 110 */
int BgL_kz00_3017;
BgL_kz00_3017 = 
(int)(BgL_restz00_3003); 
BgL_method2774z00_2993 = 
VECTOR_REF(BgL_bucketz00_3005,BgL_kz00_3017); } } } } } } } } } } 
BgL_arg4092z00_1569 = 
PROCEDURE_ENTRY(BgL_method2774z00_2993)(BgL_method2774z00_2993, 
(obj_t)(BgL_ez00_2992), BEOA); } } } 
BgL_arg4089z00_1568 = 
MAKE_PAIR(BgL_arg4092z00_1569, BNIL); } 
return 
MAKE_PAIR(BgL_arg4088z00_1567, BgL_arg4089z00_1568);} } } 
}



/* compile-lisp-make-box2822 */
obj_t BGl_compilezd2lispzd2makezd2box2822zd2zzjvm_lispz00(obj_t BgL_envz00_3132, obj_t BgL_ez00_3133)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 104 */
{ 
BgL_makezd2boxzd2_bglt BgL_ez00_1552;
BgL_ez00_1552 = 
(BgL_makezd2boxzd2_bglt)(BgL_ez00_3133); 
{ /* ./Jvm/lisp.scm 106 */
obj_t BgL_arg4070z00_1556;obj_t BgL_arg4071z00_1557;
BgL_arg4070z00_1556 = 
CNST_TABLE_REF(((long)2)); 
{ /* ./Jvm/lisp.scm 106 */
obj_t BgL_arg4074z00_1558;
{ /* ./Jvm/lisp.scm 106 */
BgL_nodez00_bglt BgL_arg4078z00_1560;
BgL_arg4078z00_1560 = 
(((BgL_makezd2boxzd2_bglt)CREF(BgL_ez00_1552))->BgL_valuez00); 
{ /* ./Jvm/lisp.scm 106 */
obj_t BgL_method2774z00_2966;
{ /* ./Jvm/lisp.scm 106 */
BgL_objectz00_bglt BgL_objz00_2967;
BgL_objz00_2967 = 
(BgL_objectz00_bglt)(BgL_arg4078z00_1560); 
{ /* ./Jvm/lisp.scm 106 */
long BgL_objzd2classzd2numz00_2968;
BgL_objzd2classzd2numz00_2968 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2967); 
{ /* ./Jvm/lisp.scm 106 */
obj_t BgL_arg2017z00_2969;
{ /* ./Jvm/lisp.scm 106 */
int BgL_auxz00_3376;
BgL_auxz00_3376 = 
(int)(((long)1)); 
BgL_arg2017z00_2969 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3376); } 
{ /* ./Jvm/lisp.scm 106 */
int BgL_offsetz00_2972;
BgL_offsetz00_2972 = 
(int)(BgL_objzd2classzd2numz00_2968); 
{ /* ./Jvm/lisp.scm 106 */
long BgL_offsetz00_2973;
{ /* ./Jvm/lisp.scm 106 */
long BgL_auxz00_3380;
BgL_auxz00_3380 = 
(long)(BgL_offsetz00_2972); 
BgL_offsetz00_2973 = 
(BgL_auxz00_3380-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 106 */
long BgL_modz00_2974;
{ /* ./Jvm/lisp.scm 106 */
int BgL_arg2028z00_2975;
BgL_arg2028z00_2975 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 106 */
long BgL_n2z00_2983;
BgL_n2z00_2983 = 
(long)(BgL_arg2028z00_2975); 
BgL_modz00_2974 = 
(BgL_offsetz00_2973/BgL_n2z00_2983); } } 
{ /* ./Jvm/lisp.scm 106 */
long BgL_restz00_2976;
{ /* ./Jvm/lisp.scm 106 */
int BgL_arg2024z00_2977;
BgL_arg2024z00_2977 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 106 */
long BgL_n2z00_2986;
BgL_n2z00_2986 = 
(long)(BgL_arg2024z00_2977); 
BgL_restz00_2976 = 
(BgL_offsetz00_2973%BgL_n2z00_2986); } } 
{ /* ./Jvm/lisp.scm 106 */

{ /* ./Jvm/lisp.scm 106 */
obj_t BgL_bucketz00_2978;
{ /* ./Jvm/lisp.scm 106 */
int BgL_kz00_2988;
BgL_kz00_2988 = 
(int)(BgL_modz00_2974); 
BgL_bucketz00_2978 = 
VECTOR_REF(BgL_arg2017z00_2969,BgL_kz00_2988); } 
{ /* ./Jvm/lisp.scm 106 */
int BgL_kz00_2990;
BgL_kz00_2990 = 
(int)(BgL_restz00_2976); 
BgL_method2774z00_2966 = 
VECTOR_REF(BgL_bucketz00_2978,BgL_kz00_2990); } } } } } } } } } } 
BgL_arg4074z00_1558 = 
PROCEDURE_ENTRY(BgL_method2774z00_2966)(BgL_method2774z00_2966, 
(obj_t)(BgL_arg4078z00_1560), BEOA); } } 
BgL_arg4071z00_1557 = 
MAKE_PAIR(BgL_arg4074z00_1558, BNIL); } 
return 
MAKE_PAIR(BgL_arg4070z00_1556, BgL_arg4071z00_1557);} } } 
}



/* compile-lisp-fail2820 */
obj_t BGl_compilezd2lispzd2fail2820z00zzjvm_lispz00(obj_t BgL_envz00_3134, obj_t BgL_ez00_3135)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 100 */
{ 
BgL_failz00_bglt BgL_ez00_1535;
BgL_ez00_1535 = 
(BgL_failz00_bglt)(BgL_ez00_3135); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_arg4036z00_1539;obj_t BgL_arg4037z00_1540;
BgL_arg4036z00_1539 = 
CNST_TABLE_REF(((long)3)); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_arg4040z00_1541;obj_t BgL_arg4041z00_1542;
{ /* ./Jvm/lisp.scm 102 */
BgL_nodez00_bglt BgL_arg4044z00_1543;
BgL_arg4044z00_1543 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_1535))->BgL_procz00); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_method2774z00_2885;
{ /* ./Jvm/lisp.scm 102 */
BgL_objectz00_bglt BgL_objz00_2886;
BgL_objz00_2886 = 
(BgL_objectz00_bglt)(BgL_arg4044z00_1543); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_objzd2classzd2numz00_2887;
BgL_objzd2classzd2numz00_2887 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2886); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_arg2017z00_2888;
{ /* ./Jvm/lisp.scm 102 */
int BgL_auxz00_3403;
BgL_auxz00_3403 = 
(int)(((long)1)); 
BgL_arg2017z00_2888 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3403); } 
{ /* ./Jvm/lisp.scm 102 */
int BgL_offsetz00_2891;
BgL_offsetz00_2891 = 
(int)(BgL_objzd2classzd2numz00_2887); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_offsetz00_2892;
{ /* ./Jvm/lisp.scm 102 */
long BgL_auxz00_3407;
BgL_auxz00_3407 = 
(long)(BgL_offsetz00_2891); 
BgL_offsetz00_2892 = 
(BgL_auxz00_3407-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 102 */
long BgL_modz00_2893;
{ /* ./Jvm/lisp.scm 102 */
int BgL_arg2028z00_2894;
BgL_arg2028z00_2894 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_n2z00_2902;
BgL_n2z00_2902 = 
(long)(BgL_arg2028z00_2894); 
BgL_modz00_2893 = 
(BgL_offsetz00_2892/BgL_n2z00_2902); } } 
{ /* ./Jvm/lisp.scm 102 */
long BgL_restz00_2895;
{ /* ./Jvm/lisp.scm 102 */
int BgL_arg2024z00_2896;
BgL_arg2024z00_2896 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_n2z00_2905;
BgL_n2z00_2905 = 
(long)(BgL_arg2024z00_2896); 
BgL_restz00_2895 = 
(BgL_offsetz00_2892%BgL_n2z00_2905); } } 
{ /* ./Jvm/lisp.scm 102 */

{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_bucketz00_2897;
{ /* ./Jvm/lisp.scm 102 */
int BgL_kz00_2907;
BgL_kz00_2907 = 
(int)(BgL_modz00_2893); 
BgL_bucketz00_2897 = 
VECTOR_REF(BgL_arg2017z00_2888,BgL_kz00_2907); } 
{ /* ./Jvm/lisp.scm 102 */
int BgL_kz00_2909;
BgL_kz00_2909 = 
(int)(BgL_restz00_2895); 
BgL_method2774z00_2885 = 
VECTOR_REF(BgL_bucketz00_2897,BgL_kz00_2909); } } } } } } } } } } 
BgL_arg4040z00_1541 = 
PROCEDURE_ENTRY(BgL_method2774z00_2885)(BgL_method2774z00_2885, 
(obj_t)(BgL_arg4044z00_1543), BEOA); } } 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_arg4048z00_1544;obj_t BgL_arg4049z00_1545;
{ /* ./Jvm/lisp.scm 102 */
BgL_nodez00_bglt BgL_arg4052z00_1546;
BgL_arg4052z00_1546 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_1535))->BgL_msgz00); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_method2774z00_2912;
{ /* ./Jvm/lisp.scm 102 */
BgL_objectz00_bglt BgL_objz00_2913;
BgL_objz00_2913 = 
(BgL_objectz00_bglt)(BgL_arg4052z00_1546); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_objzd2classzd2numz00_2914;
BgL_objzd2classzd2numz00_2914 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2913); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_arg2017z00_2915;
{ /* ./Jvm/lisp.scm 102 */
int BgL_auxz00_3426;
BgL_auxz00_3426 = 
(int)(((long)1)); 
BgL_arg2017z00_2915 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3426); } 
{ /* ./Jvm/lisp.scm 102 */
int BgL_offsetz00_2918;
BgL_offsetz00_2918 = 
(int)(BgL_objzd2classzd2numz00_2914); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_offsetz00_2919;
{ /* ./Jvm/lisp.scm 102 */
long BgL_auxz00_3430;
BgL_auxz00_3430 = 
(long)(BgL_offsetz00_2918); 
BgL_offsetz00_2919 = 
(BgL_auxz00_3430-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 102 */
long BgL_modz00_2920;
{ /* ./Jvm/lisp.scm 102 */
int BgL_arg2028z00_2921;
BgL_arg2028z00_2921 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_n2z00_2929;
BgL_n2z00_2929 = 
(long)(BgL_arg2028z00_2921); 
BgL_modz00_2920 = 
(BgL_offsetz00_2919/BgL_n2z00_2929); } } 
{ /* ./Jvm/lisp.scm 102 */
long BgL_restz00_2922;
{ /* ./Jvm/lisp.scm 102 */
int BgL_arg2024z00_2923;
BgL_arg2024z00_2923 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_n2z00_2932;
BgL_n2z00_2932 = 
(long)(BgL_arg2024z00_2923); 
BgL_restz00_2922 = 
(BgL_offsetz00_2919%BgL_n2z00_2932); } } 
{ /* ./Jvm/lisp.scm 102 */

{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_bucketz00_2924;
{ /* ./Jvm/lisp.scm 102 */
int BgL_kz00_2934;
BgL_kz00_2934 = 
(int)(BgL_modz00_2920); 
BgL_bucketz00_2924 = 
VECTOR_REF(BgL_arg2017z00_2915,BgL_kz00_2934); } 
{ /* ./Jvm/lisp.scm 102 */
int BgL_kz00_2936;
BgL_kz00_2936 = 
(int)(BgL_restz00_2922); 
BgL_method2774z00_2912 = 
VECTOR_REF(BgL_bucketz00_2924,BgL_kz00_2936); } } } } } } } } } } 
BgL_arg4048z00_1544 = 
PROCEDURE_ENTRY(BgL_method2774z00_2912)(BgL_method2774z00_2912, 
(obj_t)(BgL_arg4052z00_1546), BEOA); } } 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_arg4056z00_1547;
{ /* ./Jvm/lisp.scm 102 */
BgL_nodez00_bglt BgL_arg4060z00_1549;
BgL_arg4060z00_1549 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_1535))->BgL_objz00); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_method2774z00_2939;
{ /* ./Jvm/lisp.scm 102 */
BgL_objectz00_bglt BgL_objz00_2940;
BgL_objz00_2940 = 
(BgL_objectz00_bglt)(BgL_arg4060z00_1549); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_objzd2classzd2numz00_2941;
BgL_objzd2classzd2numz00_2941 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2940); 
{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_arg2017z00_2942;
{ /* ./Jvm/lisp.scm 102 */
int BgL_auxz00_3449;
BgL_auxz00_3449 = 
(int)(((long)1)); 
BgL_arg2017z00_2942 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3449); } 
{ /* ./Jvm/lisp.scm 102 */
int BgL_offsetz00_2945;
BgL_offsetz00_2945 = 
(int)(BgL_objzd2classzd2numz00_2941); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_offsetz00_2946;
{ /* ./Jvm/lisp.scm 102 */
long BgL_auxz00_3453;
BgL_auxz00_3453 = 
(long)(BgL_offsetz00_2945); 
BgL_offsetz00_2946 = 
(BgL_auxz00_3453-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 102 */
long BgL_modz00_2947;
{ /* ./Jvm/lisp.scm 102 */
int BgL_arg2028z00_2948;
BgL_arg2028z00_2948 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_n2z00_2956;
BgL_n2z00_2956 = 
(long)(BgL_arg2028z00_2948); 
BgL_modz00_2947 = 
(BgL_offsetz00_2946/BgL_n2z00_2956); } } 
{ /* ./Jvm/lisp.scm 102 */
long BgL_restz00_2949;
{ /* ./Jvm/lisp.scm 102 */
int BgL_arg2024z00_2950;
BgL_arg2024z00_2950 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 102 */
long BgL_n2z00_2959;
BgL_n2z00_2959 = 
(long)(BgL_arg2024z00_2950); 
BgL_restz00_2949 = 
(BgL_offsetz00_2946%BgL_n2z00_2959); } } 
{ /* ./Jvm/lisp.scm 102 */

{ /* ./Jvm/lisp.scm 102 */
obj_t BgL_bucketz00_2951;
{ /* ./Jvm/lisp.scm 102 */
int BgL_kz00_2961;
BgL_kz00_2961 = 
(int)(BgL_modz00_2947); 
BgL_bucketz00_2951 = 
VECTOR_REF(BgL_arg2017z00_2942,BgL_kz00_2961); } 
{ /* ./Jvm/lisp.scm 102 */
int BgL_kz00_2963;
BgL_kz00_2963 = 
(int)(BgL_restz00_2949); 
BgL_method2774z00_2939 = 
VECTOR_REF(BgL_bucketz00_2951,BgL_kz00_2963); } } } } } } } } } } 
BgL_arg4056z00_1547 = 
PROCEDURE_ENTRY(BgL_method2774z00_2939)(BgL_method2774z00_2939, 
(obj_t)(BgL_arg4060z00_1549), BEOA); } } 
BgL_arg4049z00_1545 = 
MAKE_PAIR(BgL_arg4056z00_1547, BNIL); } 
BgL_arg4041z00_1542 = 
MAKE_PAIR(BgL_arg4048z00_1544, BgL_arg4049z00_1545); } 
BgL_arg4037z00_1540 = 
MAKE_PAIR(BgL_arg4040z00_1541, BgL_arg4041z00_1542); } 
return 
MAKE_PAIR(BgL_arg4036z00_1539, BgL_arg4037z00_1540);} } } 
}



/* compile-lisp-jump-ex-it2818 */
obj_t BGl_compilezd2lispzd2jumpzd2exzd2it2818z00zzjvm_lispz00(obj_t BgL_envz00_3136, obj_t BgL_ez00_3137)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 96 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_ez00_1521;
BgL_ez00_1521 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_ez00_3137); 
{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_arg4010z00_1525;obj_t BgL_arg4011z00_1526;
BgL_arg4010z00_1525 = 
CNST_TABLE_REF(((long)4)); 
{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_arg4014z00_1527;obj_t BgL_arg4015z00_1528;
{ /* ./Jvm/lisp.scm 98 */
BgL_nodez00_bglt BgL_arg4018z00_1529;
BgL_arg4018z00_1529 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_ez00_1521))->BgL_exitz00); 
{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_method2774z00_2831;
{ /* ./Jvm/lisp.scm 98 */
BgL_objectz00_bglt BgL_objz00_2832;
BgL_objz00_2832 = 
(BgL_objectz00_bglt)(BgL_arg4018z00_1529); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_objzd2classzd2numz00_2833;
BgL_objzd2classzd2numz00_2833 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2832); 
{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_arg2017z00_2834;
{ /* ./Jvm/lisp.scm 98 */
int BgL_auxz00_3478;
BgL_auxz00_3478 = 
(int)(((long)1)); 
BgL_arg2017z00_2834 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3478); } 
{ /* ./Jvm/lisp.scm 98 */
int BgL_offsetz00_2837;
BgL_offsetz00_2837 = 
(int)(BgL_objzd2classzd2numz00_2833); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_offsetz00_2838;
{ /* ./Jvm/lisp.scm 98 */
long BgL_auxz00_3482;
BgL_auxz00_3482 = 
(long)(BgL_offsetz00_2837); 
BgL_offsetz00_2838 = 
(BgL_auxz00_3482-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 98 */
long BgL_modz00_2839;
{ /* ./Jvm/lisp.scm 98 */
int BgL_arg2028z00_2840;
BgL_arg2028z00_2840 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_n2z00_2848;
BgL_n2z00_2848 = 
(long)(BgL_arg2028z00_2840); 
BgL_modz00_2839 = 
(BgL_offsetz00_2838/BgL_n2z00_2848); } } 
{ /* ./Jvm/lisp.scm 98 */
long BgL_restz00_2841;
{ /* ./Jvm/lisp.scm 98 */
int BgL_arg2024z00_2842;
BgL_arg2024z00_2842 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_n2z00_2851;
BgL_n2z00_2851 = 
(long)(BgL_arg2024z00_2842); 
BgL_restz00_2841 = 
(BgL_offsetz00_2838%BgL_n2z00_2851); } } 
{ /* ./Jvm/lisp.scm 98 */

{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_bucketz00_2843;
{ /* ./Jvm/lisp.scm 98 */
int BgL_kz00_2853;
BgL_kz00_2853 = 
(int)(BgL_modz00_2839); 
BgL_bucketz00_2843 = 
VECTOR_REF(BgL_arg2017z00_2834,BgL_kz00_2853); } 
{ /* ./Jvm/lisp.scm 98 */
int BgL_kz00_2855;
BgL_kz00_2855 = 
(int)(BgL_restz00_2841); 
BgL_method2774z00_2831 = 
VECTOR_REF(BgL_bucketz00_2843,BgL_kz00_2855); } } } } } } } } } } 
BgL_arg4014z00_1527 = 
PROCEDURE_ENTRY(BgL_method2774z00_2831)(BgL_method2774z00_2831, 
(obj_t)(BgL_arg4018z00_1529), BEOA); } } 
{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_arg4022z00_1530;
{ /* ./Jvm/lisp.scm 98 */
BgL_nodez00_bglt BgL_arg4026z00_1532;
BgL_arg4026z00_1532 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_ez00_1521))->BgL_valuez00); 
{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_method2774z00_2858;
{ /* ./Jvm/lisp.scm 98 */
BgL_objectz00_bglt BgL_objz00_2859;
BgL_objz00_2859 = 
(BgL_objectz00_bglt)(BgL_arg4026z00_1532); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_objzd2classzd2numz00_2860;
BgL_objzd2classzd2numz00_2860 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2859); 
{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_arg2017z00_2861;
{ /* ./Jvm/lisp.scm 98 */
int BgL_auxz00_3501;
BgL_auxz00_3501 = 
(int)(((long)1)); 
BgL_arg2017z00_2861 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3501); } 
{ /* ./Jvm/lisp.scm 98 */
int BgL_offsetz00_2864;
BgL_offsetz00_2864 = 
(int)(BgL_objzd2classzd2numz00_2860); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_offsetz00_2865;
{ /* ./Jvm/lisp.scm 98 */
long BgL_auxz00_3505;
BgL_auxz00_3505 = 
(long)(BgL_offsetz00_2864); 
BgL_offsetz00_2865 = 
(BgL_auxz00_3505-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 98 */
long BgL_modz00_2866;
{ /* ./Jvm/lisp.scm 98 */
int BgL_arg2028z00_2867;
BgL_arg2028z00_2867 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_n2z00_2875;
BgL_n2z00_2875 = 
(long)(BgL_arg2028z00_2867); 
BgL_modz00_2866 = 
(BgL_offsetz00_2865/BgL_n2z00_2875); } } 
{ /* ./Jvm/lisp.scm 98 */
long BgL_restz00_2868;
{ /* ./Jvm/lisp.scm 98 */
int BgL_arg2024z00_2869;
BgL_arg2024z00_2869 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 98 */
long BgL_n2z00_2878;
BgL_n2z00_2878 = 
(long)(BgL_arg2024z00_2869); 
BgL_restz00_2868 = 
(BgL_offsetz00_2865%BgL_n2z00_2878); } } 
{ /* ./Jvm/lisp.scm 98 */

{ /* ./Jvm/lisp.scm 98 */
obj_t BgL_bucketz00_2870;
{ /* ./Jvm/lisp.scm 98 */
int BgL_kz00_2880;
BgL_kz00_2880 = 
(int)(BgL_modz00_2866); 
BgL_bucketz00_2870 = 
VECTOR_REF(BgL_arg2017z00_2861,BgL_kz00_2880); } 
{ /* ./Jvm/lisp.scm 98 */
int BgL_kz00_2882;
BgL_kz00_2882 = 
(int)(BgL_restz00_2868); 
BgL_method2774z00_2858 = 
VECTOR_REF(BgL_bucketz00_2870,BgL_kz00_2882); } } } } } } } } } } 
BgL_arg4022z00_1530 = 
PROCEDURE_ENTRY(BgL_method2774z00_2858)(BgL_method2774z00_2858, 
(obj_t)(BgL_arg4026z00_1532), BEOA); } } 
BgL_arg4015z00_1528 = 
MAKE_PAIR(BgL_arg4022z00_1530, BNIL); } 
BgL_arg4011z00_1526 = 
MAKE_PAIR(BgL_arg4014z00_1527, BgL_arg4015z00_1528); } 
return 
MAKE_PAIR(BgL_arg4010z00_1525, BgL_arg4011z00_1526);} } } 
}



/* compile-lisp-set-ex-it2816 */
obj_t BGl_compilezd2lispzd2setzd2exzd2it2816z00zzjvm_lispz00(obj_t BgL_envz00_3138, obj_t BgL_ez00_3139)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 92 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_ez00_1507;
BgL_ez00_1507 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_ez00_3139); 
{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_arg3984z00_1511;obj_t BgL_arg3985z00_1512;
BgL_arg3984z00_1511 = 
CNST_TABLE_REF(((long)5)); 
{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_arg3988z00_1513;obj_t BgL_arg3989z00_1514;
{ /* ./Jvm/lisp.scm 94 */
BgL_varz00_bglt BgL_arg3992z00_1515;
BgL_arg3992z00_1515 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_ez00_1507))->BgL_varz00); 
{ /* ./Jvm/lisp.scm 94 */
BgL_nodez00_bglt BgL_ez00_2776;
BgL_ez00_2776 = 
(BgL_nodez00_bglt)(BgL_arg3992z00_1515); 
{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_method2774z00_2777;
{ /* ./Jvm/lisp.scm 94 */
BgL_objectz00_bglt BgL_objz00_2778;
BgL_objz00_2778 = 
(BgL_objectz00_bglt)(BgL_ez00_2776); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_objzd2classzd2numz00_2779;
BgL_objzd2classzd2numz00_2779 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2778); 
{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_arg2017z00_2780;
{ /* ./Jvm/lisp.scm 94 */
int BgL_auxz00_3530;
BgL_auxz00_3530 = 
(int)(((long)1)); 
BgL_arg2017z00_2780 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3530); } 
{ /* ./Jvm/lisp.scm 94 */
int BgL_offsetz00_2783;
BgL_offsetz00_2783 = 
(int)(BgL_objzd2classzd2numz00_2779); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_offsetz00_2784;
{ /* ./Jvm/lisp.scm 94 */
long BgL_auxz00_3534;
BgL_auxz00_3534 = 
(long)(BgL_offsetz00_2783); 
BgL_offsetz00_2784 = 
(BgL_auxz00_3534-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 94 */
long BgL_modz00_2785;
{ /* ./Jvm/lisp.scm 94 */
int BgL_arg2028z00_2786;
BgL_arg2028z00_2786 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_n2z00_2794;
BgL_n2z00_2794 = 
(long)(BgL_arg2028z00_2786); 
BgL_modz00_2785 = 
(BgL_offsetz00_2784/BgL_n2z00_2794); } } 
{ /* ./Jvm/lisp.scm 94 */
long BgL_restz00_2787;
{ /* ./Jvm/lisp.scm 94 */
int BgL_arg2024z00_2788;
BgL_arg2024z00_2788 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_n2z00_2797;
BgL_n2z00_2797 = 
(long)(BgL_arg2024z00_2788); 
BgL_restz00_2787 = 
(BgL_offsetz00_2784%BgL_n2z00_2797); } } 
{ /* ./Jvm/lisp.scm 94 */

{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_bucketz00_2789;
{ /* ./Jvm/lisp.scm 94 */
int BgL_kz00_2799;
BgL_kz00_2799 = 
(int)(BgL_modz00_2785); 
BgL_bucketz00_2789 = 
VECTOR_REF(BgL_arg2017z00_2780,BgL_kz00_2799); } 
{ /* ./Jvm/lisp.scm 94 */
int BgL_kz00_2801;
BgL_kz00_2801 = 
(int)(BgL_restz00_2787); 
BgL_method2774z00_2777 = 
VECTOR_REF(BgL_bucketz00_2789,BgL_kz00_2801); } } } } } } } } } } 
BgL_arg3988z00_1513 = 
PROCEDURE_ENTRY(BgL_method2774z00_2777)(BgL_method2774z00_2777, 
(obj_t)(BgL_ez00_2776), BEOA); } } } 
{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_arg3996z00_1516;
{ /* ./Jvm/lisp.scm 94 */
BgL_nodez00_bglt BgL_arg4000z00_1518;
BgL_arg4000z00_1518 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_ez00_1507))->BgL_bodyz00); 
{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_method2774z00_2804;
{ /* ./Jvm/lisp.scm 94 */
BgL_objectz00_bglt BgL_objz00_2805;
BgL_objz00_2805 = 
(BgL_objectz00_bglt)(BgL_arg4000z00_1518); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_objzd2classzd2numz00_2806;
BgL_objzd2classzd2numz00_2806 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2805); 
{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_arg2017z00_2807;
{ /* ./Jvm/lisp.scm 94 */
int BgL_auxz00_3553;
BgL_auxz00_3553 = 
(int)(((long)1)); 
BgL_arg2017z00_2807 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3553); } 
{ /* ./Jvm/lisp.scm 94 */
int BgL_offsetz00_2810;
BgL_offsetz00_2810 = 
(int)(BgL_objzd2classzd2numz00_2806); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_offsetz00_2811;
{ /* ./Jvm/lisp.scm 94 */
long BgL_auxz00_3557;
BgL_auxz00_3557 = 
(long)(BgL_offsetz00_2810); 
BgL_offsetz00_2811 = 
(BgL_auxz00_3557-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 94 */
long BgL_modz00_2812;
{ /* ./Jvm/lisp.scm 94 */
int BgL_arg2028z00_2813;
BgL_arg2028z00_2813 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_n2z00_2821;
BgL_n2z00_2821 = 
(long)(BgL_arg2028z00_2813); 
BgL_modz00_2812 = 
(BgL_offsetz00_2811/BgL_n2z00_2821); } } 
{ /* ./Jvm/lisp.scm 94 */
long BgL_restz00_2814;
{ /* ./Jvm/lisp.scm 94 */
int BgL_arg2024z00_2815;
BgL_arg2024z00_2815 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 94 */
long BgL_n2z00_2824;
BgL_n2z00_2824 = 
(long)(BgL_arg2024z00_2815); 
BgL_restz00_2814 = 
(BgL_offsetz00_2811%BgL_n2z00_2824); } } 
{ /* ./Jvm/lisp.scm 94 */

{ /* ./Jvm/lisp.scm 94 */
obj_t BgL_bucketz00_2816;
{ /* ./Jvm/lisp.scm 94 */
int BgL_kz00_2826;
BgL_kz00_2826 = 
(int)(BgL_modz00_2812); 
BgL_bucketz00_2816 = 
VECTOR_REF(BgL_arg2017z00_2807,BgL_kz00_2826); } 
{ /* ./Jvm/lisp.scm 94 */
int BgL_kz00_2828;
BgL_kz00_2828 = 
(int)(BgL_restz00_2814); 
BgL_method2774z00_2804 = 
VECTOR_REF(BgL_bucketz00_2816,BgL_kz00_2828); } } } } } } } } } } 
BgL_arg3996z00_1516 = 
PROCEDURE_ENTRY(BgL_method2774z00_2804)(BgL_method2774z00_2804, 
(obj_t)(BgL_arg4000z00_1518), BEOA); } } 
BgL_arg3989z00_1514 = 
MAKE_PAIR(BgL_arg3996z00_1516, BNIL); } 
BgL_arg3985z00_1512 = 
MAKE_PAIR(BgL_arg3988z00_1513, BgL_arg3989z00_1514); } 
return 
MAKE_PAIR(BgL_arg3984z00_1511, BgL_arg3985z00_1512);} } } 
}



/* compile-lisp-cast2814 */
obj_t BGl_compilezd2lispzd2cast2814z00zzjvm_lispz00(obj_t BgL_envz00_3140, obj_t BgL_ez00_3141)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 88 */
{ 
BgL_castz00_bglt BgL_ez00_1494;
BgL_ez00_1494 = 
(BgL_castz00_bglt)(BgL_ez00_3141); 
{ /* ./Jvm/lisp.scm 90 */
obj_t BgL_arg3961z00_1498;obj_t BgL_arg3962z00_1499;
BgL_arg3961z00_1498 = 
CNST_TABLE_REF(((long)6)); 
{ /* ./Jvm/lisp.scm 90 */
BgL_typez00_bglt BgL_arg3965z00_1500;obj_t BgL_arg3966z00_1501;
BgL_arg3965z00_1500 = 
BGl_typeofz00zztype_typeofz00(
(BgL_nodez00_bglt)(BgL_ez00_1494)); 
{ /* ./Jvm/lisp.scm 90 */
obj_t BgL_arg3970z00_1502;
{ /* ./Jvm/lisp.scm 90 */
BgL_nodez00_bglt BgL_arg3974z00_1504;
BgL_arg3974z00_1504 = 
(((BgL_castz00_bglt)CREF(BgL_ez00_1494))->BgL_argz00); 
{ /* ./Jvm/lisp.scm 90 */
obj_t BgL_method2774z00_2750;
{ /* ./Jvm/lisp.scm 90 */
BgL_objectz00_bglt BgL_objz00_2751;
BgL_objz00_2751 = 
(BgL_objectz00_bglt)(BgL_arg3974z00_1504); 
{ /* ./Jvm/lisp.scm 90 */
long BgL_objzd2classzd2numz00_2752;
BgL_objzd2classzd2numz00_2752 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2751); 
{ /* ./Jvm/lisp.scm 90 */
obj_t BgL_arg2017z00_2753;
{ /* ./Jvm/lisp.scm 90 */
int BgL_auxz00_3583;
BgL_auxz00_3583 = 
(int)(((long)1)); 
BgL_arg2017z00_2753 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3583); } 
{ /* ./Jvm/lisp.scm 90 */
int BgL_offsetz00_2756;
BgL_offsetz00_2756 = 
(int)(BgL_objzd2classzd2numz00_2752); 
{ /* ./Jvm/lisp.scm 90 */
long BgL_offsetz00_2757;
{ /* ./Jvm/lisp.scm 90 */
long BgL_auxz00_3587;
BgL_auxz00_3587 = 
(long)(BgL_offsetz00_2756); 
BgL_offsetz00_2757 = 
(BgL_auxz00_3587-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 90 */
long BgL_modz00_2758;
{ /* ./Jvm/lisp.scm 90 */
int BgL_arg2028z00_2759;
BgL_arg2028z00_2759 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 90 */
long BgL_n2z00_2767;
BgL_n2z00_2767 = 
(long)(BgL_arg2028z00_2759); 
BgL_modz00_2758 = 
(BgL_offsetz00_2757/BgL_n2z00_2767); } } 
{ /* ./Jvm/lisp.scm 90 */
long BgL_restz00_2760;
{ /* ./Jvm/lisp.scm 90 */
int BgL_arg2024z00_2761;
BgL_arg2024z00_2761 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 90 */
long BgL_n2z00_2770;
BgL_n2z00_2770 = 
(long)(BgL_arg2024z00_2761); 
BgL_restz00_2760 = 
(BgL_offsetz00_2757%BgL_n2z00_2770); } } 
{ /* ./Jvm/lisp.scm 90 */

{ /* ./Jvm/lisp.scm 90 */
obj_t BgL_bucketz00_2762;
{ /* ./Jvm/lisp.scm 90 */
int BgL_kz00_2772;
BgL_kz00_2772 = 
(int)(BgL_modz00_2758); 
BgL_bucketz00_2762 = 
VECTOR_REF(BgL_arg2017z00_2753,BgL_kz00_2772); } 
{ /* ./Jvm/lisp.scm 90 */
int BgL_kz00_2774;
BgL_kz00_2774 = 
(int)(BgL_restz00_2760); 
BgL_method2774z00_2750 = 
VECTOR_REF(BgL_bucketz00_2762,BgL_kz00_2774); } } } } } } } } } } 
BgL_arg3970z00_1502 = 
PROCEDURE_ENTRY(BgL_method2774z00_2750)(BgL_method2774z00_2750, 
(obj_t)(BgL_arg3974z00_1504), BEOA); } } 
BgL_arg3966z00_1501 = 
MAKE_PAIR(BgL_arg3970z00_1502, BNIL); } 
{ /* ./Jvm/lisp.scm 90 */
obj_t BgL_auxz00_3604;
BgL_auxz00_3604 = 
(obj_t)(BgL_arg3965z00_1500); 
BgL_arg3962z00_1499 = 
MAKE_PAIR(BgL_auxz00_3604, BgL_arg3966z00_1501); } } 
return 
MAKE_PAIR(BgL_arg3961z00_1498, BgL_arg3962z00_1499);} } } 
}



/* compile-lisp-isa2812 */
obj_t BGl_compilezd2lispzd2isa2812z00zzjvm_lispz00(obj_t BgL_envz00_3142, obj_t BgL_ez00_3143)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 85 */
{ 
BgL_isaz00_bglt BgL_ez00_1467;
BgL_ez00_1467 = 
(BgL_isaz00_bglt)(BgL_ez00_3143); 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3911z00_1470;obj_t BgL_arg3912z00_1471;
BgL_arg3911z00_1470 = 
CNST_TABLE_REF(((long)7)); 
{ /* ./Jvm/lisp.scm 86 */
BgL_typez00_bglt BgL_arg3915z00_1472;obj_t BgL_arg3916z00_1473;
BgL_arg3915z00_1472 = 
(((BgL_isaz00_bglt)CREF(BgL_ez00_1467))->BgL_classz00); 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3920z00_1474;
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_l2754z00_1476;
{ /* ./Jvm/lisp.scm 86 */
BgL_externz00_bglt BgL_obj1817z00_2683;
BgL_obj1817z00_2683 = 
(BgL_externz00_bglt)(BgL_ez00_1467); 
BgL_l2754z00_1476 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2683))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 86 */
bool_t BgL_test3923z00_1477;
BgL_test3923z00_1477 = 
NULLP(BgL_l2754z00_1476); 
if(BgL_test3923z00_1477)
{ /* ./Jvm/lisp.scm 86 */
BgL_arg3920z00_1474 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_head2756z00_1478;
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3945z00_1489;
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3949z00_1491;
BgL_arg3949z00_1491 = 
CAR(BgL_l2754z00_1476); 
{ /* ./Jvm/lisp.scm 86 */
BgL_nodez00_bglt BgL_ez00_2686;
BgL_ez00_2686 = 
(BgL_nodez00_bglt)(BgL_arg3949z00_1491); 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_method2774z00_2687;
{ /* ./Jvm/lisp.scm 86 */
BgL_objectz00_bglt BgL_objz00_2688;
BgL_objz00_2688 = 
(BgL_objectz00_bglt)(BgL_ez00_2686); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_objzd2classzd2numz00_2689;
BgL_objzd2classzd2numz00_2689 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2688); 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg2017z00_2690;
{ /* ./Jvm/lisp.scm 86 */
int BgL_auxz00_3619;
BgL_auxz00_3619 = 
(int)(((long)1)); 
BgL_arg2017z00_2690 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3619); } 
{ /* ./Jvm/lisp.scm 86 */
int BgL_offsetz00_2693;
BgL_offsetz00_2693 = 
(int)(BgL_objzd2classzd2numz00_2689); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_offsetz00_2694;
{ /* ./Jvm/lisp.scm 86 */
long BgL_auxz00_3623;
BgL_auxz00_3623 = 
(long)(BgL_offsetz00_2693); 
BgL_offsetz00_2694 = 
(BgL_auxz00_3623-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 86 */
long BgL_modz00_2695;
{ /* ./Jvm/lisp.scm 86 */
int BgL_arg2028z00_2696;
BgL_arg2028z00_2696 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_n2z00_2704;
BgL_n2z00_2704 = 
(long)(BgL_arg2028z00_2696); 
BgL_modz00_2695 = 
(BgL_offsetz00_2694/BgL_n2z00_2704); } } 
{ /* ./Jvm/lisp.scm 86 */
long BgL_restz00_2697;
{ /* ./Jvm/lisp.scm 86 */
int BgL_arg2024z00_2698;
BgL_arg2024z00_2698 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_n2z00_2707;
BgL_n2z00_2707 = 
(long)(BgL_arg2024z00_2698); 
BgL_restz00_2697 = 
(BgL_offsetz00_2694%BgL_n2z00_2707); } } 
{ /* ./Jvm/lisp.scm 86 */

{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_bucketz00_2699;
{ /* ./Jvm/lisp.scm 86 */
int BgL_kz00_2709;
BgL_kz00_2709 = 
(int)(BgL_modz00_2695); 
BgL_bucketz00_2699 = 
VECTOR_REF(BgL_arg2017z00_2690,BgL_kz00_2709); } 
{ /* ./Jvm/lisp.scm 86 */
int BgL_kz00_2711;
BgL_kz00_2711 = 
(int)(BgL_restz00_2697); 
BgL_method2774z00_2687 = 
VECTOR_REF(BgL_bucketz00_2699,BgL_kz00_2711); } } } } } } } } } } 
BgL_arg3945z00_1489 = 
PROCEDURE_ENTRY(BgL_method2774z00_2687)(BgL_method2774z00_2687, 
(obj_t)(BgL_ez00_2686), BEOA); } } } 
BgL_head2756z00_1478 = 
MAKE_PAIR(BgL_arg3945z00_1489, BNIL); } 
{ 
obj_t BgL_l2754z00_1479;obj_t BgL_tail2757z00_1480;
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3925z00_1482;
BgL_arg3925z00_1482 = 
CDR(BgL_l2754z00_1476); 
BgL_l2754z00_1479 = BgL_arg3925z00_1482; 
BgL_tail2757z00_1480 = BgL_head2756z00_1478; 
BgL_map2755z00_1481:
{ /* ./Jvm/lisp.scm 86 */
bool_t BgL_test3928z00_1483;
BgL_test3928z00_1483 = 
NULLP(BgL_l2754z00_1479); 
if(BgL_test3928z00_1483)
{ /* ./Jvm/lisp.scm 86 */
BgL_arg3920z00_1474 = BgL_head2756z00_1478; }  else 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_newtail2758z00_1484;
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3935z00_1486;
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3940z00_1488;
BgL_arg3940z00_1488 = 
CAR(BgL_l2754z00_1479); 
{ /* ./Jvm/lisp.scm 86 */
BgL_nodez00_bglt BgL_ez00_2717;
BgL_ez00_2717 = 
(BgL_nodez00_bglt)(BgL_arg3940z00_1488); 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_method2774z00_2718;
{ /* ./Jvm/lisp.scm 86 */
BgL_objectz00_bglt BgL_objz00_2719;
BgL_objz00_2719 = 
(BgL_objectz00_bglt)(BgL_ez00_2717); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_objzd2classzd2numz00_2720;
BgL_objzd2classzd2numz00_2720 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2719); 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg2017z00_2721;
{ /* ./Jvm/lisp.scm 86 */
int BgL_auxz00_3647;
BgL_auxz00_3647 = 
(int)(((long)1)); 
BgL_arg2017z00_2721 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3647); } 
{ /* ./Jvm/lisp.scm 86 */
int BgL_offsetz00_2724;
BgL_offsetz00_2724 = 
(int)(BgL_objzd2classzd2numz00_2720); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_offsetz00_2725;
{ /* ./Jvm/lisp.scm 86 */
long BgL_auxz00_3651;
BgL_auxz00_3651 = 
(long)(BgL_offsetz00_2724); 
BgL_offsetz00_2725 = 
(BgL_auxz00_3651-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 86 */
long BgL_modz00_2726;
{ /* ./Jvm/lisp.scm 86 */
int BgL_arg2028z00_2727;
BgL_arg2028z00_2727 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_n2z00_2735;
BgL_n2z00_2735 = 
(long)(BgL_arg2028z00_2727); 
BgL_modz00_2726 = 
(BgL_offsetz00_2725/BgL_n2z00_2735); } } 
{ /* ./Jvm/lisp.scm 86 */
long BgL_restz00_2728;
{ /* ./Jvm/lisp.scm 86 */
int BgL_arg2024z00_2729;
BgL_arg2024z00_2729 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 86 */
long BgL_n2z00_2738;
BgL_n2z00_2738 = 
(long)(BgL_arg2024z00_2729); 
BgL_restz00_2728 = 
(BgL_offsetz00_2725%BgL_n2z00_2738); } } 
{ /* ./Jvm/lisp.scm 86 */

{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_bucketz00_2730;
{ /* ./Jvm/lisp.scm 86 */
int BgL_kz00_2740;
BgL_kz00_2740 = 
(int)(BgL_modz00_2726); 
BgL_bucketz00_2730 = 
VECTOR_REF(BgL_arg2017z00_2721,BgL_kz00_2740); } 
{ /* ./Jvm/lisp.scm 86 */
int BgL_kz00_2742;
BgL_kz00_2742 = 
(int)(BgL_restz00_2728); 
BgL_method2774z00_2718 = 
VECTOR_REF(BgL_bucketz00_2730,BgL_kz00_2742); } } } } } } } } } } 
BgL_arg3935z00_1486 = 
PROCEDURE_ENTRY(BgL_method2774z00_2718)(BgL_method2774z00_2718, 
(obj_t)(BgL_ez00_2717), BEOA); } } } 
BgL_newtail2758z00_1484 = 
MAKE_PAIR(BgL_arg3935z00_1486, BNIL); } 
SET_CDR(BgL_tail2757z00_1480, BgL_newtail2758z00_1484); 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_arg3931z00_1485;
BgL_arg3931z00_1485 = 
CDR(BgL_l2754z00_1479); 
{ 
obj_t BgL_tail2757z00_3671;obj_t BgL_l2754z00_3670;
BgL_l2754z00_3670 = BgL_arg3931z00_1485; 
BgL_tail2757z00_3671 = BgL_newtail2758z00_1484; 
BgL_tail2757z00_1480 = BgL_tail2757z00_3671; 
BgL_l2754z00_1479 = BgL_l2754z00_3670; 
goto BgL_map2755z00_1481;} } } } } } } } } 
BgL_arg3916z00_1473 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3920z00_1474, BNIL); } 
{ /* ./Jvm/lisp.scm 86 */
obj_t BgL_auxz00_3673;
BgL_auxz00_3673 = 
(obj_t)(BgL_arg3915z00_1472); 
BgL_arg3912z00_1471 = 
MAKE_PAIR(BgL_auxz00_3673, BgL_arg3916z00_1473); } } 
return 
MAKE_PAIR(BgL_arg3911z00_1470, BgL_arg3912z00_1471);} } } 
}



/* compile-lisp-vlength2810 */
obj_t BGl_compilezd2lispzd2vlength2810z00zzjvm_lispz00(obj_t BgL_envz00_3144, obj_t BgL_ez00_3145)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 82 */
{ 
BgL_vlengthz00_bglt BgL_ez00_1442;
BgL_ez00_1442 = 
(BgL_vlengthz00_bglt)(BgL_ez00_3145); 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3867z00_1445;obj_t BgL_arg3868z00_1446;
BgL_arg3867z00_1445 = 
CNST_TABLE_REF(((long)8)); 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3871z00_1447;
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_l2749z00_1449;
{ /* ./Jvm/lisp.scm 83 */
BgL_externz00_bglt BgL_obj1817z00_2617;
BgL_obj1817z00_2617 = 
(BgL_externz00_bglt)(BgL_ez00_1442); 
BgL_l2749z00_1449 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2617))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 83 */
bool_t BgL_test3874z00_1450;
BgL_test3874z00_1450 = 
NULLP(BgL_l2749z00_1449); 
if(BgL_test3874z00_1450)
{ /* ./Jvm/lisp.scm 83 */
BgL_arg3871z00_1447 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_head2751z00_1451;
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3895z00_1462;
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3899z00_1464;
BgL_arg3899z00_1464 = 
CAR(BgL_l2749z00_1449); 
{ /* ./Jvm/lisp.scm 83 */
BgL_nodez00_bglt BgL_ez00_2620;
BgL_ez00_2620 = 
(BgL_nodez00_bglt)(BgL_arg3899z00_1464); 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_method2774z00_2621;
{ /* ./Jvm/lisp.scm 83 */
BgL_objectz00_bglt BgL_objz00_2622;
BgL_objz00_2622 = 
(BgL_objectz00_bglt)(BgL_ez00_2620); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_objzd2classzd2numz00_2623;
BgL_objzd2classzd2numz00_2623 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2622); 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg2017z00_2624;
{ /* ./Jvm/lisp.scm 83 */
int BgL_auxz00_3687;
BgL_auxz00_3687 = 
(int)(((long)1)); 
BgL_arg2017z00_2624 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3687); } 
{ /* ./Jvm/lisp.scm 83 */
int BgL_offsetz00_2627;
BgL_offsetz00_2627 = 
(int)(BgL_objzd2classzd2numz00_2623); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_offsetz00_2628;
{ /* ./Jvm/lisp.scm 83 */
long BgL_auxz00_3691;
BgL_auxz00_3691 = 
(long)(BgL_offsetz00_2627); 
BgL_offsetz00_2628 = 
(BgL_auxz00_3691-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 83 */
long BgL_modz00_2629;
{ /* ./Jvm/lisp.scm 83 */
int BgL_arg2028z00_2630;
BgL_arg2028z00_2630 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_n2z00_2638;
BgL_n2z00_2638 = 
(long)(BgL_arg2028z00_2630); 
BgL_modz00_2629 = 
(BgL_offsetz00_2628/BgL_n2z00_2638); } } 
{ /* ./Jvm/lisp.scm 83 */
long BgL_restz00_2631;
{ /* ./Jvm/lisp.scm 83 */
int BgL_arg2024z00_2632;
BgL_arg2024z00_2632 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_n2z00_2641;
BgL_n2z00_2641 = 
(long)(BgL_arg2024z00_2632); 
BgL_restz00_2631 = 
(BgL_offsetz00_2628%BgL_n2z00_2641); } } 
{ /* ./Jvm/lisp.scm 83 */

{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_bucketz00_2633;
{ /* ./Jvm/lisp.scm 83 */
int BgL_kz00_2643;
BgL_kz00_2643 = 
(int)(BgL_modz00_2629); 
BgL_bucketz00_2633 = 
VECTOR_REF(BgL_arg2017z00_2624,BgL_kz00_2643); } 
{ /* ./Jvm/lisp.scm 83 */
int BgL_kz00_2645;
BgL_kz00_2645 = 
(int)(BgL_restz00_2631); 
BgL_method2774z00_2621 = 
VECTOR_REF(BgL_bucketz00_2633,BgL_kz00_2645); } } } } } } } } } } 
BgL_arg3895z00_1462 = 
PROCEDURE_ENTRY(BgL_method2774z00_2621)(BgL_method2774z00_2621, 
(obj_t)(BgL_ez00_2620), BEOA); } } } 
BgL_head2751z00_1451 = 
MAKE_PAIR(BgL_arg3895z00_1462, BNIL); } 
{ 
obj_t BgL_l2749z00_1452;obj_t BgL_tail2752z00_1453;
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3876z00_1455;
BgL_arg3876z00_1455 = 
CDR(BgL_l2749z00_1449); 
BgL_l2749z00_1452 = BgL_arg3876z00_1455; 
BgL_tail2752z00_1453 = BgL_head2751z00_1451; 
BgL_map2750z00_1454:
{ /* ./Jvm/lisp.scm 83 */
bool_t BgL_test3879z00_1456;
BgL_test3879z00_1456 = 
NULLP(BgL_l2749z00_1452); 
if(BgL_test3879z00_1456)
{ /* ./Jvm/lisp.scm 83 */
BgL_arg3871z00_1447 = BgL_head2751z00_1451; }  else 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_newtail2753z00_1457;
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3886z00_1459;
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3890z00_1461;
BgL_arg3890z00_1461 = 
CAR(BgL_l2749z00_1452); 
{ /* ./Jvm/lisp.scm 83 */
BgL_nodez00_bglt BgL_ez00_2651;
BgL_ez00_2651 = 
(BgL_nodez00_bglt)(BgL_arg3890z00_1461); 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_method2774z00_2652;
{ /* ./Jvm/lisp.scm 83 */
BgL_objectz00_bglt BgL_objz00_2653;
BgL_objz00_2653 = 
(BgL_objectz00_bglt)(BgL_ez00_2651); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_objzd2classzd2numz00_2654;
BgL_objzd2classzd2numz00_2654 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2653); 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg2017z00_2655;
{ /* ./Jvm/lisp.scm 83 */
int BgL_auxz00_3715;
BgL_auxz00_3715 = 
(int)(((long)1)); 
BgL_arg2017z00_2655 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3715); } 
{ /* ./Jvm/lisp.scm 83 */
int BgL_offsetz00_2658;
BgL_offsetz00_2658 = 
(int)(BgL_objzd2classzd2numz00_2654); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_offsetz00_2659;
{ /* ./Jvm/lisp.scm 83 */
long BgL_auxz00_3719;
BgL_auxz00_3719 = 
(long)(BgL_offsetz00_2658); 
BgL_offsetz00_2659 = 
(BgL_auxz00_3719-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 83 */
long BgL_modz00_2660;
{ /* ./Jvm/lisp.scm 83 */
int BgL_arg2028z00_2661;
BgL_arg2028z00_2661 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_n2z00_2669;
BgL_n2z00_2669 = 
(long)(BgL_arg2028z00_2661); 
BgL_modz00_2660 = 
(BgL_offsetz00_2659/BgL_n2z00_2669); } } 
{ /* ./Jvm/lisp.scm 83 */
long BgL_restz00_2662;
{ /* ./Jvm/lisp.scm 83 */
int BgL_arg2024z00_2663;
BgL_arg2024z00_2663 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 83 */
long BgL_n2z00_2672;
BgL_n2z00_2672 = 
(long)(BgL_arg2024z00_2663); 
BgL_restz00_2662 = 
(BgL_offsetz00_2659%BgL_n2z00_2672); } } 
{ /* ./Jvm/lisp.scm 83 */

{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_bucketz00_2664;
{ /* ./Jvm/lisp.scm 83 */
int BgL_kz00_2674;
BgL_kz00_2674 = 
(int)(BgL_modz00_2660); 
BgL_bucketz00_2664 = 
VECTOR_REF(BgL_arg2017z00_2655,BgL_kz00_2674); } 
{ /* ./Jvm/lisp.scm 83 */
int BgL_kz00_2676;
BgL_kz00_2676 = 
(int)(BgL_restz00_2662); 
BgL_method2774z00_2652 = 
VECTOR_REF(BgL_bucketz00_2664,BgL_kz00_2676); } } } } } } } } } } 
BgL_arg3886z00_1459 = 
PROCEDURE_ENTRY(BgL_method2774z00_2652)(BgL_method2774z00_2652, 
(obj_t)(BgL_ez00_2651), BEOA); } } } 
BgL_newtail2753z00_1457 = 
MAKE_PAIR(BgL_arg3886z00_1459, BNIL); } 
SET_CDR(BgL_tail2752z00_1453, BgL_newtail2753z00_1457); 
{ /* ./Jvm/lisp.scm 83 */
obj_t BgL_arg3882z00_1458;
BgL_arg3882z00_1458 = 
CDR(BgL_l2749z00_1452); 
{ 
obj_t BgL_tail2752z00_3739;obj_t BgL_l2749z00_3738;
BgL_l2749z00_3738 = BgL_arg3882z00_1458; 
BgL_tail2752z00_3739 = BgL_newtail2753z00_1457; 
BgL_tail2752z00_1453 = BgL_tail2752z00_3739; 
BgL_l2749z00_1452 = BgL_l2749z00_3738; 
goto BgL_map2750z00_1454;} } } } } } } } } 
BgL_arg3868z00_1446 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3871z00_1447, BNIL); } 
return 
MAKE_PAIR(BgL_arg3867z00_1445, BgL_arg3868z00_1446);} } } 
}



/* compile-lisp-vset!2808 */
obj_t BGl_compilezd2lispzd2vsetz122808z12zzjvm_lispz00(obj_t BgL_envz00_3146, obj_t BgL_ez00_3147)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 79 */
{ 
BgL_vsetz12z12_bglt BgL_ez00_1417;
BgL_ez00_1417 = 
(BgL_vsetz12z12_bglt)(BgL_ez00_3147); 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3822z00_1420;obj_t BgL_arg3823z00_1421;
BgL_arg3822z00_1420 = 
CNST_TABLE_REF(((long)9)); 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3826z00_1422;
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_l2744z00_1424;
{ /* ./Jvm/lisp.scm 80 */
BgL_externz00_bglt BgL_obj1817z00_2552;
BgL_obj1817z00_2552 = 
(BgL_externz00_bglt)(BgL_ez00_1417); 
BgL_l2744z00_1424 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2552))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 80 */
bool_t BgL_test3829z00_1425;
BgL_test3829z00_1425 = 
NULLP(BgL_l2744z00_1424); 
if(BgL_test3829z00_1425)
{ /* ./Jvm/lisp.scm 80 */
BgL_arg3826z00_1422 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_head2746z00_1426;
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3851z00_1437;
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3855z00_1439;
BgL_arg3855z00_1439 = 
CAR(BgL_l2744z00_1424); 
{ /* ./Jvm/lisp.scm 80 */
BgL_nodez00_bglt BgL_ez00_2555;
BgL_ez00_2555 = 
(BgL_nodez00_bglt)(BgL_arg3855z00_1439); 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_method2774z00_2556;
{ /* ./Jvm/lisp.scm 80 */
BgL_objectz00_bglt BgL_objz00_2557;
BgL_objz00_2557 = 
(BgL_objectz00_bglt)(BgL_ez00_2555); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_objzd2classzd2numz00_2558;
BgL_objzd2classzd2numz00_2558 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2557); 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg2017z00_2559;
{ /* ./Jvm/lisp.scm 80 */
int BgL_auxz00_3752;
BgL_auxz00_3752 = 
(int)(((long)1)); 
BgL_arg2017z00_2559 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3752); } 
{ /* ./Jvm/lisp.scm 80 */
int BgL_offsetz00_2562;
BgL_offsetz00_2562 = 
(int)(BgL_objzd2classzd2numz00_2558); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_offsetz00_2563;
{ /* ./Jvm/lisp.scm 80 */
long BgL_auxz00_3756;
BgL_auxz00_3756 = 
(long)(BgL_offsetz00_2562); 
BgL_offsetz00_2563 = 
(BgL_auxz00_3756-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 80 */
long BgL_modz00_2564;
{ /* ./Jvm/lisp.scm 80 */
int BgL_arg2028z00_2565;
BgL_arg2028z00_2565 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_n2z00_2573;
BgL_n2z00_2573 = 
(long)(BgL_arg2028z00_2565); 
BgL_modz00_2564 = 
(BgL_offsetz00_2563/BgL_n2z00_2573); } } 
{ /* ./Jvm/lisp.scm 80 */
long BgL_restz00_2566;
{ /* ./Jvm/lisp.scm 80 */
int BgL_arg2024z00_2567;
BgL_arg2024z00_2567 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_n2z00_2576;
BgL_n2z00_2576 = 
(long)(BgL_arg2024z00_2567); 
BgL_restz00_2566 = 
(BgL_offsetz00_2563%BgL_n2z00_2576); } } 
{ /* ./Jvm/lisp.scm 80 */

{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_bucketz00_2568;
{ /* ./Jvm/lisp.scm 80 */
int BgL_kz00_2578;
BgL_kz00_2578 = 
(int)(BgL_modz00_2564); 
BgL_bucketz00_2568 = 
VECTOR_REF(BgL_arg2017z00_2559,BgL_kz00_2578); } 
{ /* ./Jvm/lisp.scm 80 */
int BgL_kz00_2580;
BgL_kz00_2580 = 
(int)(BgL_restz00_2566); 
BgL_method2774z00_2556 = 
VECTOR_REF(BgL_bucketz00_2568,BgL_kz00_2580); } } } } } } } } } } 
BgL_arg3851z00_1437 = 
PROCEDURE_ENTRY(BgL_method2774z00_2556)(BgL_method2774z00_2556, 
(obj_t)(BgL_ez00_2555), BEOA); } } } 
BgL_head2746z00_1426 = 
MAKE_PAIR(BgL_arg3851z00_1437, BNIL); } 
{ 
obj_t BgL_l2744z00_1427;obj_t BgL_tail2747z00_1428;
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3832z00_1430;
BgL_arg3832z00_1430 = 
CDR(BgL_l2744z00_1424); 
BgL_l2744z00_1427 = BgL_arg3832z00_1430; 
BgL_tail2747z00_1428 = BgL_head2746z00_1426; 
BgL_map2745z00_1429:
{ /* ./Jvm/lisp.scm 80 */
bool_t BgL_test3835z00_1431;
BgL_test3835z00_1431 = 
NULLP(BgL_l2744z00_1427); 
if(BgL_test3835z00_1431)
{ /* ./Jvm/lisp.scm 80 */
BgL_arg3826z00_1422 = BgL_head2746z00_1426; }  else 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_newtail2748z00_1432;
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3842z00_1434;
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3846z00_1436;
BgL_arg3846z00_1436 = 
CAR(BgL_l2744z00_1427); 
{ /* ./Jvm/lisp.scm 80 */
BgL_nodez00_bglt BgL_ez00_2586;
BgL_ez00_2586 = 
(BgL_nodez00_bglt)(BgL_arg3846z00_1436); 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_method2774z00_2587;
{ /* ./Jvm/lisp.scm 80 */
BgL_objectz00_bglt BgL_objz00_2588;
BgL_objz00_2588 = 
(BgL_objectz00_bglt)(BgL_ez00_2586); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_objzd2classzd2numz00_2589;
BgL_objzd2classzd2numz00_2589 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2588); 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg2017z00_2590;
{ /* ./Jvm/lisp.scm 80 */
int BgL_auxz00_3780;
BgL_auxz00_3780 = 
(int)(((long)1)); 
BgL_arg2017z00_2590 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3780); } 
{ /* ./Jvm/lisp.scm 80 */
int BgL_offsetz00_2593;
BgL_offsetz00_2593 = 
(int)(BgL_objzd2classzd2numz00_2589); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_offsetz00_2594;
{ /* ./Jvm/lisp.scm 80 */
long BgL_auxz00_3784;
BgL_auxz00_3784 = 
(long)(BgL_offsetz00_2593); 
BgL_offsetz00_2594 = 
(BgL_auxz00_3784-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 80 */
long BgL_modz00_2595;
{ /* ./Jvm/lisp.scm 80 */
int BgL_arg2028z00_2596;
BgL_arg2028z00_2596 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_n2z00_2604;
BgL_n2z00_2604 = 
(long)(BgL_arg2028z00_2596); 
BgL_modz00_2595 = 
(BgL_offsetz00_2594/BgL_n2z00_2604); } } 
{ /* ./Jvm/lisp.scm 80 */
long BgL_restz00_2597;
{ /* ./Jvm/lisp.scm 80 */
int BgL_arg2024z00_2598;
BgL_arg2024z00_2598 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 80 */
long BgL_n2z00_2607;
BgL_n2z00_2607 = 
(long)(BgL_arg2024z00_2598); 
BgL_restz00_2597 = 
(BgL_offsetz00_2594%BgL_n2z00_2607); } } 
{ /* ./Jvm/lisp.scm 80 */

{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_bucketz00_2599;
{ /* ./Jvm/lisp.scm 80 */
int BgL_kz00_2609;
BgL_kz00_2609 = 
(int)(BgL_modz00_2595); 
BgL_bucketz00_2599 = 
VECTOR_REF(BgL_arg2017z00_2590,BgL_kz00_2609); } 
{ /* ./Jvm/lisp.scm 80 */
int BgL_kz00_2611;
BgL_kz00_2611 = 
(int)(BgL_restz00_2597); 
BgL_method2774z00_2587 = 
VECTOR_REF(BgL_bucketz00_2599,BgL_kz00_2611); } } } } } } } } } } 
BgL_arg3842z00_1434 = 
PROCEDURE_ENTRY(BgL_method2774z00_2587)(BgL_method2774z00_2587, 
(obj_t)(BgL_ez00_2586), BEOA); } } } 
BgL_newtail2748z00_1432 = 
MAKE_PAIR(BgL_arg3842z00_1434, BNIL); } 
SET_CDR(BgL_tail2747z00_1428, BgL_newtail2748z00_1432); 
{ /* ./Jvm/lisp.scm 80 */
obj_t BgL_arg3838z00_1433;
BgL_arg3838z00_1433 = 
CDR(BgL_l2744z00_1427); 
{ 
obj_t BgL_tail2747z00_3804;obj_t BgL_l2744z00_3803;
BgL_l2744z00_3803 = BgL_arg3838z00_1433; 
BgL_tail2747z00_3804 = BgL_newtail2748z00_1432; 
BgL_tail2747z00_1428 = BgL_tail2747z00_3804; 
BgL_l2744z00_1427 = BgL_l2744z00_3803; 
goto BgL_map2745z00_1429;} } } } } } } } } 
BgL_arg3823z00_1421 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3826z00_1422, BNIL); } 
return 
MAKE_PAIR(BgL_arg3822z00_1420, BgL_arg3823z00_1421);} } } 
}



/* compile-lisp-vref2806 */
obj_t BGl_compilezd2lispzd2vref2806z00zzjvm_lispz00(obj_t BgL_envz00_3148, obj_t BgL_ez00_3149)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 76 */
{ 
BgL_vrefz00_bglt BgL_ez00_1392;
BgL_ez00_1392 = 
(BgL_vrefz00_bglt)(BgL_ez00_3149); 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3778z00_1395;obj_t BgL_arg3779z00_1396;
BgL_arg3778z00_1395 = 
CNST_TABLE_REF(((long)10)); 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3782z00_1397;
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_l2739z00_1399;
{ /* ./Jvm/lisp.scm 77 */
BgL_externz00_bglt BgL_obj1817z00_2487;
BgL_obj1817z00_2487 = 
(BgL_externz00_bglt)(BgL_ez00_1392); 
BgL_l2739z00_1399 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2487))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 77 */
bool_t BgL_test3785z00_1400;
BgL_test3785z00_1400 = 
NULLP(BgL_l2739z00_1399); 
if(BgL_test3785z00_1400)
{ /* ./Jvm/lisp.scm 77 */
BgL_arg3782z00_1397 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_head2741z00_1401;
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3806z00_1412;
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3810z00_1414;
BgL_arg3810z00_1414 = 
CAR(BgL_l2739z00_1399); 
{ /* ./Jvm/lisp.scm 77 */
BgL_nodez00_bglt BgL_ez00_2490;
BgL_ez00_2490 = 
(BgL_nodez00_bglt)(BgL_arg3810z00_1414); 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_method2774z00_2491;
{ /* ./Jvm/lisp.scm 77 */
BgL_objectz00_bglt BgL_objz00_2492;
BgL_objz00_2492 = 
(BgL_objectz00_bglt)(BgL_ez00_2490); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_objzd2classzd2numz00_2493;
BgL_objzd2classzd2numz00_2493 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2492); 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg2017z00_2494;
{ /* ./Jvm/lisp.scm 77 */
int BgL_auxz00_3817;
BgL_auxz00_3817 = 
(int)(((long)1)); 
BgL_arg2017z00_2494 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3817); } 
{ /* ./Jvm/lisp.scm 77 */
int BgL_offsetz00_2497;
BgL_offsetz00_2497 = 
(int)(BgL_objzd2classzd2numz00_2493); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_offsetz00_2498;
{ /* ./Jvm/lisp.scm 77 */
long BgL_auxz00_3821;
BgL_auxz00_3821 = 
(long)(BgL_offsetz00_2497); 
BgL_offsetz00_2498 = 
(BgL_auxz00_3821-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 77 */
long BgL_modz00_2499;
{ /* ./Jvm/lisp.scm 77 */
int BgL_arg2028z00_2500;
BgL_arg2028z00_2500 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_n2z00_2508;
BgL_n2z00_2508 = 
(long)(BgL_arg2028z00_2500); 
BgL_modz00_2499 = 
(BgL_offsetz00_2498/BgL_n2z00_2508); } } 
{ /* ./Jvm/lisp.scm 77 */
long BgL_restz00_2501;
{ /* ./Jvm/lisp.scm 77 */
int BgL_arg2024z00_2502;
BgL_arg2024z00_2502 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_n2z00_2511;
BgL_n2z00_2511 = 
(long)(BgL_arg2024z00_2502); 
BgL_restz00_2501 = 
(BgL_offsetz00_2498%BgL_n2z00_2511); } } 
{ /* ./Jvm/lisp.scm 77 */

{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_bucketz00_2503;
{ /* ./Jvm/lisp.scm 77 */
int BgL_kz00_2513;
BgL_kz00_2513 = 
(int)(BgL_modz00_2499); 
BgL_bucketz00_2503 = 
VECTOR_REF(BgL_arg2017z00_2494,BgL_kz00_2513); } 
{ /* ./Jvm/lisp.scm 77 */
int BgL_kz00_2515;
BgL_kz00_2515 = 
(int)(BgL_restz00_2501); 
BgL_method2774z00_2491 = 
VECTOR_REF(BgL_bucketz00_2503,BgL_kz00_2515); } } } } } } } } } } 
BgL_arg3806z00_1412 = 
PROCEDURE_ENTRY(BgL_method2774z00_2491)(BgL_method2774z00_2491, 
(obj_t)(BgL_ez00_2490), BEOA); } } } 
BgL_head2741z00_1401 = 
MAKE_PAIR(BgL_arg3806z00_1412, BNIL); } 
{ 
obj_t BgL_l2739z00_1402;obj_t BgL_tail2742z00_1403;
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3787z00_1405;
BgL_arg3787z00_1405 = 
CDR(BgL_l2739z00_1399); 
BgL_l2739z00_1402 = BgL_arg3787z00_1405; 
BgL_tail2742z00_1403 = BgL_head2741z00_1401; 
BgL_map2740z00_1404:
{ /* ./Jvm/lisp.scm 77 */
bool_t BgL_test3790z00_1406;
BgL_test3790z00_1406 = 
NULLP(BgL_l2739z00_1402); 
if(BgL_test3790z00_1406)
{ /* ./Jvm/lisp.scm 77 */
BgL_arg3782z00_1397 = BgL_head2741z00_1401; }  else 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_newtail2743z00_1407;
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3797z00_1409;
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3801z00_1411;
BgL_arg3801z00_1411 = 
CAR(BgL_l2739z00_1402); 
{ /* ./Jvm/lisp.scm 77 */
BgL_nodez00_bglt BgL_ez00_2521;
BgL_ez00_2521 = 
(BgL_nodez00_bglt)(BgL_arg3801z00_1411); 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_method2774z00_2522;
{ /* ./Jvm/lisp.scm 77 */
BgL_objectz00_bglt BgL_objz00_2523;
BgL_objz00_2523 = 
(BgL_objectz00_bglt)(BgL_ez00_2521); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_objzd2classzd2numz00_2524;
BgL_objzd2classzd2numz00_2524 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2523); 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg2017z00_2525;
{ /* ./Jvm/lisp.scm 77 */
int BgL_auxz00_3845;
BgL_auxz00_3845 = 
(int)(((long)1)); 
BgL_arg2017z00_2525 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3845); } 
{ /* ./Jvm/lisp.scm 77 */
int BgL_offsetz00_2528;
BgL_offsetz00_2528 = 
(int)(BgL_objzd2classzd2numz00_2524); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_offsetz00_2529;
{ /* ./Jvm/lisp.scm 77 */
long BgL_auxz00_3849;
BgL_auxz00_3849 = 
(long)(BgL_offsetz00_2528); 
BgL_offsetz00_2529 = 
(BgL_auxz00_3849-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 77 */
long BgL_modz00_2530;
{ /* ./Jvm/lisp.scm 77 */
int BgL_arg2028z00_2531;
BgL_arg2028z00_2531 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_n2z00_2539;
BgL_n2z00_2539 = 
(long)(BgL_arg2028z00_2531); 
BgL_modz00_2530 = 
(BgL_offsetz00_2529/BgL_n2z00_2539); } } 
{ /* ./Jvm/lisp.scm 77 */
long BgL_restz00_2532;
{ /* ./Jvm/lisp.scm 77 */
int BgL_arg2024z00_2533;
BgL_arg2024z00_2533 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 77 */
long BgL_n2z00_2542;
BgL_n2z00_2542 = 
(long)(BgL_arg2024z00_2533); 
BgL_restz00_2532 = 
(BgL_offsetz00_2529%BgL_n2z00_2542); } } 
{ /* ./Jvm/lisp.scm 77 */

{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_bucketz00_2534;
{ /* ./Jvm/lisp.scm 77 */
int BgL_kz00_2544;
BgL_kz00_2544 = 
(int)(BgL_modz00_2530); 
BgL_bucketz00_2534 = 
VECTOR_REF(BgL_arg2017z00_2525,BgL_kz00_2544); } 
{ /* ./Jvm/lisp.scm 77 */
int BgL_kz00_2546;
BgL_kz00_2546 = 
(int)(BgL_restz00_2532); 
BgL_method2774z00_2522 = 
VECTOR_REF(BgL_bucketz00_2534,BgL_kz00_2546); } } } } } } } } } } 
BgL_arg3797z00_1409 = 
PROCEDURE_ENTRY(BgL_method2774z00_2522)(BgL_method2774z00_2522, 
(obj_t)(BgL_ez00_2521), BEOA); } } } 
BgL_newtail2743z00_1407 = 
MAKE_PAIR(BgL_arg3797z00_1409, BNIL); } 
SET_CDR(BgL_tail2742z00_1403, BgL_newtail2743z00_1407); 
{ /* ./Jvm/lisp.scm 77 */
obj_t BgL_arg3793z00_1408;
BgL_arg3793z00_1408 = 
CDR(BgL_l2739z00_1402); 
{ 
obj_t BgL_tail2742z00_3869;obj_t BgL_l2739z00_3868;
BgL_l2739z00_3868 = BgL_arg3793z00_1408; 
BgL_tail2742z00_3869 = BgL_newtail2743z00_1407; 
BgL_tail2742z00_1403 = BgL_tail2742z00_3869; 
BgL_l2739z00_1402 = BgL_l2739z00_3868; 
goto BgL_map2740z00_1404;} } } } } } } } } 
BgL_arg3779z00_1396 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3782z00_1397, BNIL); } 
return 
MAKE_PAIR(BgL_arg3778z00_1395, BgL_arg3779z00_1396);} } } 
}



/* compile-lisp-valloc2804 */
obj_t BGl_compilezd2lispzd2valloc2804z00zzjvm_lispz00(obj_t BgL_envz00_3150, obj_t BgL_ez00_3151)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 73 */
{ 
BgL_vallocz00_bglt BgL_ez00_1367;
BgL_ez00_1367 = 
(BgL_vallocz00_bglt)(BgL_ez00_3151); 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3734z00_1370;obj_t BgL_arg3735z00_1371;
BgL_arg3734z00_1370 = 
CNST_TABLE_REF(((long)11)); 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3738z00_1372;
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_l2734z00_1374;
{ /* ./Jvm/lisp.scm 74 */
BgL_externz00_bglt BgL_obj1817z00_2422;
BgL_obj1817z00_2422 = 
(BgL_externz00_bglt)(BgL_ez00_1367); 
BgL_l2734z00_1374 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2422))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 74 */
bool_t BgL_test3741z00_1375;
BgL_test3741z00_1375 = 
NULLP(BgL_l2734z00_1374); 
if(BgL_test3741z00_1375)
{ /* ./Jvm/lisp.scm 74 */
BgL_arg3738z00_1372 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_head2736z00_1376;
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3762z00_1387;
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3766z00_1389;
BgL_arg3766z00_1389 = 
CAR(BgL_l2734z00_1374); 
{ /* ./Jvm/lisp.scm 74 */
BgL_nodez00_bglt BgL_ez00_2425;
BgL_ez00_2425 = 
(BgL_nodez00_bglt)(BgL_arg3766z00_1389); 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_method2774z00_2426;
{ /* ./Jvm/lisp.scm 74 */
BgL_objectz00_bglt BgL_objz00_2427;
BgL_objz00_2427 = 
(BgL_objectz00_bglt)(BgL_ez00_2425); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_objzd2classzd2numz00_2428;
BgL_objzd2classzd2numz00_2428 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2427); 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg2017z00_2429;
{ /* ./Jvm/lisp.scm 74 */
int BgL_auxz00_3882;
BgL_auxz00_3882 = 
(int)(((long)1)); 
BgL_arg2017z00_2429 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3882); } 
{ /* ./Jvm/lisp.scm 74 */
int BgL_offsetz00_2432;
BgL_offsetz00_2432 = 
(int)(BgL_objzd2classzd2numz00_2428); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_offsetz00_2433;
{ /* ./Jvm/lisp.scm 74 */
long BgL_auxz00_3886;
BgL_auxz00_3886 = 
(long)(BgL_offsetz00_2432); 
BgL_offsetz00_2433 = 
(BgL_auxz00_3886-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 74 */
long BgL_modz00_2434;
{ /* ./Jvm/lisp.scm 74 */
int BgL_arg2028z00_2435;
BgL_arg2028z00_2435 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_n2z00_2443;
BgL_n2z00_2443 = 
(long)(BgL_arg2028z00_2435); 
BgL_modz00_2434 = 
(BgL_offsetz00_2433/BgL_n2z00_2443); } } 
{ /* ./Jvm/lisp.scm 74 */
long BgL_restz00_2436;
{ /* ./Jvm/lisp.scm 74 */
int BgL_arg2024z00_2437;
BgL_arg2024z00_2437 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_n2z00_2446;
BgL_n2z00_2446 = 
(long)(BgL_arg2024z00_2437); 
BgL_restz00_2436 = 
(BgL_offsetz00_2433%BgL_n2z00_2446); } } 
{ /* ./Jvm/lisp.scm 74 */

{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_bucketz00_2438;
{ /* ./Jvm/lisp.scm 74 */
int BgL_kz00_2448;
BgL_kz00_2448 = 
(int)(BgL_modz00_2434); 
BgL_bucketz00_2438 = 
VECTOR_REF(BgL_arg2017z00_2429,BgL_kz00_2448); } 
{ /* ./Jvm/lisp.scm 74 */
int BgL_kz00_2450;
BgL_kz00_2450 = 
(int)(BgL_restz00_2436); 
BgL_method2774z00_2426 = 
VECTOR_REF(BgL_bucketz00_2438,BgL_kz00_2450); } } } } } } } } } } 
BgL_arg3762z00_1387 = 
PROCEDURE_ENTRY(BgL_method2774z00_2426)(BgL_method2774z00_2426, 
(obj_t)(BgL_ez00_2425), BEOA); } } } 
BgL_head2736z00_1376 = 
MAKE_PAIR(BgL_arg3762z00_1387, BNIL); } 
{ 
obj_t BgL_l2734z00_1377;obj_t BgL_tail2737z00_1378;
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3743z00_1380;
BgL_arg3743z00_1380 = 
CDR(BgL_l2734z00_1374); 
BgL_l2734z00_1377 = BgL_arg3743z00_1380; 
BgL_tail2737z00_1378 = BgL_head2736z00_1376; 
BgL_map2735z00_1379:
{ /* ./Jvm/lisp.scm 74 */
bool_t BgL_test3746z00_1381;
BgL_test3746z00_1381 = 
NULLP(BgL_l2734z00_1377); 
if(BgL_test3746z00_1381)
{ /* ./Jvm/lisp.scm 74 */
BgL_arg3738z00_1372 = BgL_head2736z00_1376; }  else 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_newtail2738z00_1382;
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3753z00_1384;
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3757z00_1386;
BgL_arg3757z00_1386 = 
CAR(BgL_l2734z00_1377); 
{ /* ./Jvm/lisp.scm 74 */
BgL_nodez00_bglt BgL_ez00_2456;
BgL_ez00_2456 = 
(BgL_nodez00_bglt)(BgL_arg3757z00_1386); 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_method2774z00_2457;
{ /* ./Jvm/lisp.scm 74 */
BgL_objectz00_bglt BgL_objz00_2458;
BgL_objz00_2458 = 
(BgL_objectz00_bglt)(BgL_ez00_2456); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_objzd2classzd2numz00_2459;
BgL_objzd2classzd2numz00_2459 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2458); 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg2017z00_2460;
{ /* ./Jvm/lisp.scm 74 */
int BgL_auxz00_3910;
BgL_auxz00_3910 = 
(int)(((long)1)); 
BgL_arg2017z00_2460 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3910); } 
{ /* ./Jvm/lisp.scm 74 */
int BgL_offsetz00_2463;
BgL_offsetz00_2463 = 
(int)(BgL_objzd2classzd2numz00_2459); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_offsetz00_2464;
{ /* ./Jvm/lisp.scm 74 */
long BgL_auxz00_3914;
BgL_auxz00_3914 = 
(long)(BgL_offsetz00_2463); 
BgL_offsetz00_2464 = 
(BgL_auxz00_3914-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 74 */
long BgL_modz00_2465;
{ /* ./Jvm/lisp.scm 74 */
int BgL_arg2028z00_2466;
BgL_arg2028z00_2466 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_n2z00_2474;
BgL_n2z00_2474 = 
(long)(BgL_arg2028z00_2466); 
BgL_modz00_2465 = 
(BgL_offsetz00_2464/BgL_n2z00_2474); } } 
{ /* ./Jvm/lisp.scm 74 */
long BgL_restz00_2467;
{ /* ./Jvm/lisp.scm 74 */
int BgL_arg2024z00_2468;
BgL_arg2024z00_2468 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 74 */
long BgL_n2z00_2477;
BgL_n2z00_2477 = 
(long)(BgL_arg2024z00_2468); 
BgL_restz00_2467 = 
(BgL_offsetz00_2464%BgL_n2z00_2477); } } 
{ /* ./Jvm/lisp.scm 74 */

{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_bucketz00_2469;
{ /* ./Jvm/lisp.scm 74 */
int BgL_kz00_2479;
BgL_kz00_2479 = 
(int)(BgL_modz00_2465); 
BgL_bucketz00_2469 = 
VECTOR_REF(BgL_arg2017z00_2460,BgL_kz00_2479); } 
{ /* ./Jvm/lisp.scm 74 */
int BgL_kz00_2481;
BgL_kz00_2481 = 
(int)(BgL_restz00_2467); 
BgL_method2774z00_2457 = 
VECTOR_REF(BgL_bucketz00_2469,BgL_kz00_2481); } } } } } } } } } } 
BgL_arg3753z00_1384 = 
PROCEDURE_ENTRY(BgL_method2774z00_2457)(BgL_method2774z00_2457, 
(obj_t)(BgL_ez00_2456), BEOA); } } } 
BgL_newtail2738z00_1382 = 
MAKE_PAIR(BgL_arg3753z00_1384, BNIL); } 
SET_CDR(BgL_tail2737z00_1378, BgL_newtail2738z00_1382); 
{ /* ./Jvm/lisp.scm 74 */
obj_t BgL_arg3749z00_1383;
BgL_arg3749z00_1383 = 
CDR(BgL_l2734z00_1377); 
{ 
obj_t BgL_tail2737z00_3934;obj_t BgL_l2734z00_3933;
BgL_l2734z00_3933 = BgL_arg3749z00_1383; 
BgL_tail2737z00_3934 = BgL_newtail2738z00_1382; 
BgL_tail2737z00_1378 = BgL_tail2737z00_3934; 
BgL_l2734z00_1377 = BgL_l2734z00_3933; 
goto BgL_map2735z00_1379;} } } } } } } } } 
BgL_arg3735z00_1371 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3738z00_1372, BNIL); } 
return 
MAKE_PAIR(BgL_arg3734z00_1370, BgL_arg3735z00_1371);} } } 
}



/* compile-lisp-new2802 */
obj_t BGl_compilezd2lispzd2new2802z00zzjvm_lispz00(obj_t BgL_envz00_3152, obj_t BgL_ez00_3153)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 70 */
{ 
BgL_newz00_bglt BgL_ez00_1342;
BgL_ez00_1342 = 
(BgL_newz00_bglt)(BgL_ez00_3153); 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3690z00_1345;obj_t BgL_arg3691z00_1346;
BgL_arg3690z00_1345 = 
CNST_TABLE_REF(((long)12)); 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3694z00_1347;
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_l2729z00_1349;
{ /* ./Jvm/lisp.scm 71 */
BgL_externz00_bglt BgL_obj1817z00_2357;
BgL_obj1817z00_2357 = 
(BgL_externz00_bglt)(BgL_ez00_1342); 
BgL_l2729z00_1349 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2357))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 71 */
bool_t BgL_test3697z00_1350;
BgL_test3697z00_1350 = 
NULLP(BgL_l2729z00_1349); 
if(BgL_test3697z00_1350)
{ /* ./Jvm/lisp.scm 71 */
BgL_arg3694z00_1347 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_head2731z00_1351;
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3718z00_1362;
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3722z00_1364;
BgL_arg3722z00_1364 = 
CAR(BgL_l2729z00_1349); 
{ /* ./Jvm/lisp.scm 71 */
BgL_nodez00_bglt BgL_ez00_2360;
BgL_ez00_2360 = 
(BgL_nodez00_bglt)(BgL_arg3722z00_1364); 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_method2774z00_2361;
{ /* ./Jvm/lisp.scm 71 */
BgL_objectz00_bglt BgL_objz00_2362;
BgL_objz00_2362 = 
(BgL_objectz00_bglt)(BgL_ez00_2360); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_objzd2classzd2numz00_2363;
BgL_objzd2classzd2numz00_2363 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2362); 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg2017z00_2364;
{ /* ./Jvm/lisp.scm 71 */
int BgL_auxz00_3947;
BgL_auxz00_3947 = 
(int)(((long)1)); 
BgL_arg2017z00_2364 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3947); } 
{ /* ./Jvm/lisp.scm 71 */
int BgL_offsetz00_2367;
BgL_offsetz00_2367 = 
(int)(BgL_objzd2classzd2numz00_2363); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_offsetz00_2368;
{ /* ./Jvm/lisp.scm 71 */
long BgL_auxz00_3951;
BgL_auxz00_3951 = 
(long)(BgL_offsetz00_2367); 
BgL_offsetz00_2368 = 
(BgL_auxz00_3951-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 71 */
long BgL_modz00_2369;
{ /* ./Jvm/lisp.scm 71 */
int BgL_arg2028z00_2370;
BgL_arg2028z00_2370 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_n2z00_2378;
BgL_n2z00_2378 = 
(long)(BgL_arg2028z00_2370); 
BgL_modz00_2369 = 
(BgL_offsetz00_2368/BgL_n2z00_2378); } } 
{ /* ./Jvm/lisp.scm 71 */
long BgL_restz00_2371;
{ /* ./Jvm/lisp.scm 71 */
int BgL_arg2024z00_2372;
BgL_arg2024z00_2372 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_n2z00_2381;
BgL_n2z00_2381 = 
(long)(BgL_arg2024z00_2372); 
BgL_restz00_2371 = 
(BgL_offsetz00_2368%BgL_n2z00_2381); } } 
{ /* ./Jvm/lisp.scm 71 */

{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_bucketz00_2373;
{ /* ./Jvm/lisp.scm 71 */
int BgL_kz00_2383;
BgL_kz00_2383 = 
(int)(BgL_modz00_2369); 
BgL_bucketz00_2373 = 
VECTOR_REF(BgL_arg2017z00_2364,BgL_kz00_2383); } 
{ /* ./Jvm/lisp.scm 71 */
int BgL_kz00_2385;
BgL_kz00_2385 = 
(int)(BgL_restz00_2371); 
BgL_method2774z00_2361 = 
VECTOR_REF(BgL_bucketz00_2373,BgL_kz00_2385); } } } } } } } } } } 
BgL_arg3718z00_1362 = 
PROCEDURE_ENTRY(BgL_method2774z00_2361)(BgL_method2774z00_2361, 
(obj_t)(BgL_ez00_2360), BEOA); } } } 
BgL_head2731z00_1351 = 
MAKE_PAIR(BgL_arg3718z00_1362, BNIL); } 
{ 
obj_t BgL_l2729z00_1352;obj_t BgL_tail2732z00_1353;
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3699z00_1355;
BgL_arg3699z00_1355 = 
CDR(BgL_l2729z00_1349); 
BgL_l2729z00_1352 = BgL_arg3699z00_1355; 
BgL_tail2732z00_1353 = BgL_head2731z00_1351; 
BgL_map2730z00_1354:
{ /* ./Jvm/lisp.scm 71 */
bool_t BgL_test3702z00_1356;
BgL_test3702z00_1356 = 
NULLP(BgL_l2729z00_1352); 
if(BgL_test3702z00_1356)
{ /* ./Jvm/lisp.scm 71 */
BgL_arg3694z00_1347 = BgL_head2731z00_1351; }  else 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_newtail2733z00_1357;
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3709z00_1359;
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3713z00_1361;
BgL_arg3713z00_1361 = 
CAR(BgL_l2729z00_1352); 
{ /* ./Jvm/lisp.scm 71 */
BgL_nodez00_bglt BgL_ez00_2391;
BgL_ez00_2391 = 
(BgL_nodez00_bglt)(BgL_arg3713z00_1361); 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_method2774z00_2392;
{ /* ./Jvm/lisp.scm 71 */
BgL_objectz00_bglt BgL_objz00_2393;
BgL_objz00_2393 = 
(BgL_objectz00_bglt)(BgL_ez00_2391); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_objzd2classzd2numz00_2394;
BgL_objzd2classzd2numz00_2394 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2393); 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg2017z00_2395;
{ /* ./Jvm/lisp.scm 71 */
int BgL_auxz00_3975;
BgL_auxz00_3975 = 
(int)(((long)1)); 
BgL_arg2017z00_2395 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_3975); } 
{ /* ./Jvm/lisp.scm 71 */
int BgL_offsetz00_2398;
BgL_offsetz00_2398 = 
(int)(BgL_objzd2classzd2numz00_2394); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_offsetz00_2399;
{ /* ./Jvm/lisp.scm 71 */
long BgL_auxz00_3979;
BgL_auxz00_3979 = 
(long)(BgL_offsetz00_2398); 
BgL_offsetz00_2399 = 
(BgL_auxz00_3979-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 71 */
long BgL_modz00_2400;
{ /* ./Jvm/lisp.scm 71 */
int BgL_arg2028z00_2401;
BgL_arg2028z00_2401 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_n2z00_2409;
BgL_n2z00_2409 = 
(long)(BgL_arg2028z00_2401); 
BgL_modz00_2400 = 
(BgL_offsetz00_2399/BgL_n2z00_2409); } } 
{ /* ./Jvm/lisp.scm 71 */
long BgL_restz00_2402;
{ /* ./Jvm/lisp.scm 71 */
int BgL_arg2024z00_2403;
BgL_arg2024z00_2403 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 71 */
long BgL_n2z00_2412;
BgL_n2z00_2412 = 
(long)(BgL_arg2024z00_2403); 
BgL_restz00_2402 = 
(BgL_offsetz00_2399%BgL_n2z00_2412); } } 
{ /* ./Jvm/lisp.scm 71 */

{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_bucketz00_2404;
{ /* ./Jvm/lisp.scm 71 */
int BgL_kz00_2414;
BgL_kz00_2414 = 
(int)(BgL_modz00_2400); 
BgL_bucketz00_2404 = 
VECTOR_REF(BgL_arg2017z00_2395,BgL_kz00_2414); } 
{ /* ./Jvm/lisp.scm 71 */
int BgL_kz00_2416;
BgL_kz00_2416 = 
(int)(BgL_restz00_2402); 
BgL_method2774z00_2392 = 
VECTOR_REF(BgL_bucketz00_2404,BgL_kz00_2416); } } } } } } } } } } 
BgL_arg3709z00_1359 = 
PROCEDURE_ENTRY(BgL_method2774z00_2392)(BgL_method2774z00_2392, 
(obj_t)(BgL_ez00_2391), BEOA); } } } 
BgL_newtail2733z00_1357 = 
MAKE_PAIR(BgL_arg3709z00_1359, BNIL); } 
SET_CDR(BgL_tail2732z00_1353, BgL_newtail2733z00_1357); 
{ /* ./Jvm/lisp.scm 71 */
obj_t BgL_arg3705z00_1358;
BgL_arg3705z00_1358 = 
CDR(BgL_l2729z00_1352); 
{ 
obj_t BgL_tail2732z00_3999;obj_t BgL_l2729z00_3998;
BgL_l2729z00_3998 = BgL_arg3705z00_1358; 
BgL_tail2732z00_3999 = BgL_newtail2733z00_1357; 
BgL_tail2732z00_1353 = BgL_tail2732z00_3999; 
BgL_l2729z00_1352 = BgL_l2729z00_3998; 
goto BgL_map2730z00_1354;} } } } } } } } } 
BgL_arg3691z00_1346 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3694z00_1347, BNIL); } 
return 
MAKE_PAIR(BgL_arg3690z00_1345, BgL_arg3691z00_1346);} } } 
}



/* compile-lisp-setfield2800 */
obj_t BGl_compilezd2lispzd2setfield2800z00zzjvm_lispz00(obj_t BgL_envz00_3154, obj_t BgL_ez00_3155)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 67 */
{ 
BgL_setfieldz00_bglt BgL_ez00_1317;
BgL_ez00_1317 = 
(BgL_setfieldz00_bglt)(BgL_ez00_3155); 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3645z00_1320;obj_t BgL_arg3646z00_1321;
BgL_arg3645z00_1320 = 
CNST_TABLE_REF(((long)13)); 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3650z00_1322;
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_l2724z00_1324;
{ /* ./Jvm/lisp.scm 68 */
BgL_externz00_bglt BgL_obj1817z00_2292;
BgL_obj1817z00_2292 = 
(BgL_externz00_bglt)(BgL_ez00_1317); 
BgL_l2724z00_1324 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2292))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 68 */
bool_t BgL_test3653z00_1325;
BgL_test3653z00_1325 = 
NULLP(BgL_l2724z00_1324); 
if(BgL_test3653z00_1325)
{ /* ./Jvm/lisp.scm 68 */
BgL_arg3650z00_1322 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_head2726z00_1326;
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3674z00_1337;
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3678z00_1339;
BgL_arg3678z00_1339 = 
CAR(BgL_l2724z00_1324); 
{ /* ./Jvm/lisp.scm 68 */
BgL_nodez00_bglt BgL_ez00_2295;
BgL_ez00_2295 = 
(BgL_nodez00_bglt)(BgL_arg3678z00_1339); 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_method2774z00_2296;
{ /* ./Jvm/lisp.scm 68 */
BgL_objectz00_bglt BgL_objz00_2297;
BgL_objz00_2297 = 
(BgL_objectz00_bglt)(BgL_ez00_2295); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_objzd2classzd2numz00_2298;
BgL_objzd2classzd2numz00_2298 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2297); 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg2017z00_2299;
{ /* ./Jvm/lisp.scm 68 */
int BgL_auxz00_4012;
BgL_auxz00_4012 = 
(int)(((long)1)); 
BgL_arg2017z00_2299 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4012); } 
{ /* ./Jvm/lisp.scm 68 */
int BgL_offsetz00_2302;
BgL_offsetz00_2302 = 
(int)(BgL_objzd2classzd2numz00_2298); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_offsetz00_2303;
{ /* ./Jvm/lisp.scm 68 */
long BgL_auxz00_4016;
BgL_auxz00_4016 = 
(long)(BgL_offsetz00_2302); 
BgL_offsetz00_2303 = 
(BgL_auxz00_4016-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 68 */
long BgL_modz00_2304;
{ /* ./Jvm/lisp.scm 68 */
int BgL_arg2028z00_2305;
BgL_arg2028z00_2305 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_n2z00_2313;
BgL_n2z00_2313 = 
(long)(BgL_arg2028z00_2305); 
BgL_modz00_2304 = 
(BgL_offsetz00_2303/BgL_n2z00_2313); } } 
{ /* ./Jvm/lisp.scm 68 */
long BgL_restz00_2306;
{ /* ./Jvm/lisp.scm 68 */
int BgL_arg2024z00_2307;
BgL_arg2024z00_2307 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_n2z00_2316;
BgL_n2z00_2316 = 
(long)(BgL_arg2024z00_2307); 
BgL_restz00_2306 = 
(BgL_offsetz00_2303%BgL_n2z00_2316); } } 
{ /* ./Jvm/lisp.scm 68 */

{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_bucketz00_2308;
{ /* ./Jvm/lisp.scm 68 */
int BgL_kz00_2318;
BgL_kz00_2318 = 
(int)(BgL_modz00_2304); 
BgL_bucketz00_2308 = 
VECTOR_REF(BgL_arg2017z00_2299,BgL_kz00_2318); } 
{ /* ./Jvm/lisp.scm 68 */
int BgL_kz00_2320;
BgL_kz00_2320 = 
(int)(BgL_restz00_2306); 
BgL_method2774z00_2296 = 
VECTOR_REF(BgL_bucketz00_2308,BgL_kz00_2320); } } } } } } } } } } 
BgL_arg3674z00_1337 = 
PROCEDURE_ENTRY(BgL_method2774z00_2296)(BgL_method2774z00_2296, 
(obj_t)(BgL_ez00_2295), BEOA); } } } 
BgL_head2726z00_1326 = 
MAKE_PAIR(BgL_arg3674z00_1337, BNIL); } 
{ 
obj_t BgL_l2724z00_1327;obj_t BgL_tail2727z00_1328;
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3655z00_1330;
BgL_arg3655z00_1330 = 
CDR(BgL_l2724z00_1324); 
BgL_l2724z00_1327 = BgL_arg3655z00_1330; 
BgL_tail2727z00_1328 = BgL_head2726z00_1326; 
BgL_map2725z00_1329:
{ /* ./Jvm/lisp.scm 68 */
bool_t BgL_test3658z00_1331;
BgL_test3658z00_1331 = 
NULLP(BgL_l2724z00_1327); 
if(BgL_test3658z00_1331)
{ /* ./Jvm/lisp.scm 68 */
BgL_arg3650z00_1322 = BgL_head2726z00_1326; }  else 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_newtail2728z00_1332;
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3665z00_1334;
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3669z00_1336;
BgL_arg3669z00_1336 = 
CAR(BgL_l2724z00_1327); 
{ /* ./Jvm/lisp.scm 68 */
BgL_nodez00_bglt BgL_ez00_2326;
BgL_ez00_2326 = 
(BgL_nodez00_bglt)(BgL_arg3669z00_1336); 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_method2774z00_2327;
{ /* ./Jvm/lisp.scm 68 */
BgL_objectz00_bglt BgL_objz00_2328;
BgL_objz00_2328 = 
(BgL_objectz00_bglt)(BgL_ez00_2326); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_objzd2classzd2numz00_2329;
BgL_objzd2classzd2numz00_2329 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2328); 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg2017z00_2330;
{ /* ./Jvm/lisp.scm 68 */
int BgL_auxz00_4040;
BgL_auxz00_4040 = 
(int)(((long)1)); 
BgL_arg2017z00_2330 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4040); } 
{ /* ./Jvm/lisp.scm 68 */
int BgL_offsetz00_2333;
BgL_offsetz00_2333 = 
(int)(BgL_objzd2classzd2numz00_2329); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_offsetz00_2334;
{ /* ./Jvm/lisp.scm 68 */
long BgL_auxz00_4044;
BgL_auxz00_4044 = 
(long)(BgL_offsetz00_2333); 
BgL_offsetz00_2334 = 
(BgL_auxz00_4044-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 68 */
long BgL_modz00_2335;
{ /* ./Jvm/lisp.scm 68 */
int BgL_arg2028z00_2336;
BgL_arg2028z00_2336 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_n2z00_2344;
BgL_n2z00_2344 = 
(long)(BgL_arg2028z00_2336); 
BgL_modz00_2335 = 
(BgL_offsetz00_2334/BgL_n2z00_2344); } } 
{ /* ./Jvm/lisp.scm 68 */
long BgL_restz00_2337;
{ /* ./Jvm/lisp.scm 68 */
int BgL_arg2024z00_2338;
BgL_arg2024z00_2338 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 68 */
long BgL_n2z00_2347;
BgL_n2z00_2347 = 
(long)(BgL_arg2024z00_2338); 
BgL_restz00_2337 = 
(BgL_offsetz00_2334%BgL_n2z00_2347); } } 
{ /* ./Jvm/lisp.scm 68 */

{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_bucketz00_2339;
{ /* ./Jvm/lisp.scm 68 */
int BgL_kz00_2349;
BgL_kz00_2349 = 
(int)(BgL_modz00_2335); 
BgL_bucketz00_2339 = 
VECTOR_REF(BgL_arg2017z00_2330,BgL_kz00_2349); } 
{ /* ./Jvm/lisp.scm 68 */
int BgL_kz00_2351;
BgL_kz00_2351 = 
(int)(BgL_restz00_2337); 
BgL_method2774z00_2327 = 
VECTOR_REF(BgL_bucketz00_2339,BgL_kz00_2351); } } } } } } } } } } 
BgL_arg3665z00_1334 = 
PROCEDURE_ENTRY(BgL_method2774z00_2327)(BgL_method2774z00_2327, 
(obj_t)(BgL_ez00_2326), BEOA); } } } 
BgL_newtail2728z00_1332 = 
MAKE_PAIR(BgL_arg3665z00_1334, BNIL); } 
SET_CDR(BgL_tail2727z00_1328, BgL_newtail2728z00_1332); 
{ /* ./Jvm/lisp.scm 68 */
obj_t BgL_arg3661z00_1333;
BgL_arg3661z00_1333 = 
CDR(BgL_l2724z00_1327); 
{ 
obj_t BgL_tail2727z00_4064;obj_t BgL_l2724z00_4063;
BgL_l2724z00_4063 = BgL_arg3661z00_1333; 
BgL_tail2727z00_4064 = BgL_newtail2728z00_1332; 
BgL_tail2727z00_1328 = BgL_tail2727z00_4064; 
BgL_l2724z00_1327 = BgL_l2724z00_4063; 
goto BgL_map2725z00_1329;} } } } } } } } } 
BgL_arg3646z00_1321 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3650z00_1322, BNIL); } 
return 
MAKE_PAIR(BgL_arg3645z00_1320, BgL_arg3646z00_1321);} } } 
}



/* compile-lisp-getfield2798 */
obj_t BGl_compilezd2lispzd2getfield2798z00zzjvm_lispz00(obj_t BgL_envz00_3156, obj_t BgL_ez00_3157)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 64 */
{ 
BgL_getfieldz00_bglt BgL_ez00_1292;
BgL_ez00_1292 = 
(BgL_getfieldz00_bglt)(BgL_ez00_3157); 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3601z00_1295;obj_t BgL_arg3602z00_1296;
BgL_arg3601z00_1295 = 
CNST_TABLE_REF(((long)14)); 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3605z00_1297;
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_l2719z00_1299;
{ /* ./Jvm/lisp.scm 65 */
BgL_externz00_bglt BgL_obj1817z00_2227;
BgL_obj1817z00_2227 = 
(BgL_externz00_bglt)(BgL_ez00_1292); 
BgL_l2719z00_1299 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_2227))->BgL_exprza2za2); } 
{ /* ./Jvm/lisp.scm 65 */
bool_t BgL_test3608z00_1300;
BgL_test3608z00_1300 = 
NULLP(BgL_l2719z00_1299); 
if(BgL_test3608z00_1300)
{ /* ./Jvm/lisp.scm 65 */
BgL_arg3605z00_1297 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_head2721z00_1301;
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3629z00_1312;
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3633z00_1314;
BgL_arg3633z00_1314 = 
CAR(BgL_l2719z00_1299); 
{ /* ./Jvm/lisp.scm 65 */
BgL_nodez00_bglt BgL_ez00_2230;
BgL_ez00_2230 = 
(BgL_nodez00_bglt)(BgL_arg3633z00_1314); 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_method2774z00_2231;
{ /* ./Jvm/lisp.scm 65 */
BgL_objectz00_bglt BgL_objz00_2232;
BgL_objz00_2232 = 
(BgL_objectz00_bglt)(BgL_ez00_2230); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_objzd2classzd2numz00_2233;
BgL_objzd2classzd2numz00_2233 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2232); 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg2017z00_2234;
{ /* ./Jvm/lisp.scm 65 */
int BgL_auxz00_4077;
BgL_auxz00_4077 = 
(int)(((long)1)); 
BgL_arg2017z00_2234 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4077); } 
{ /* ./Jvm/lisp.scm 65 */
int BgL_offsetz00_2237;
BgL_offsetz00_2237 = 
(int)(BgL_objzd2classzd2numz00_2233); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_offsetz00_2238;
{ /* ./Jvm/lisp.scm 65 */
long BgL_auxz00_4081;
BgL_auxz00_4081 = 
(long)(BgL_offsetz00_2237); 
BgL_offsetz00_2238 = 
(BgL_auxz00_4081-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 65 */
long BgL_modz00_2239;
{ /* ./Jvm/lisp.scm 65 */
int BgL_arg2028z00_2240;
BgL_arg2028z00_2240 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_n2z00_2248;
BgL_n2z00_2248 = 
(long)(BgL_arg2028z00_2240); 
BgL_modz00_2239 = 
(BgL_offsetz00_2238/BgL_n2z00_2248); } } 
{ /* ./Jvm/lisp.scm 65 */
long BgL_restz00_2241;
{ /* ./Jvm/lisp.scm 65 */
int BgL_arg2024z00_2242;
BgL_arg2024z00_2242 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_n2z00_2251;
BgL_n2z00_2251 = 
(long)(BgL_arg2024z00_2242); 
BgL_restz00_2241 = 
(BgL_offsetz00_2238%BgL_n2z00_2251); } } 
{ /* ./Jvm/lisp.scm 65 */

{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_bucketz00_2243;
{ /* ./Jvm/lisp.scm 65 */
int BgL_kz00_2253;
BgL_kz00_2253 = 
(int)(BgL_modz00_2239); 
BgL_bucketz00_2243 = 
VECTOR_REF(BgL_arg2017z00_2234,BgL_kz00_2253); } 
{ /* ./Jvm/lisp.scm 65 */
int BgL_kz00_2255;
BgL_kz00_2255 = 
(int)(BgL_restz00_2241); 
BgL_method2774z00_2231 = 
VECTOR_REF(BgL_bucketz00_2243,BgL_kz00_2255); } } } } } } } } } } 
BgL_arg3629z00_1312 = 
PROCEDURE_ENTRY(BgL_method2774z00_2231)(BgL_method2774z00_2231, 
(obj_t)(BgL_ez00_2230), BEOA); } } } 
BgL_head2721z00_1301 = 
MAKE_PAIR(BgL_arg3629z00_1312, BNIL); } 
{ 
obj_t BgL_l2719z00_1302;obj_t BgL_tail2722z00_1303;
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3610z00_1305;
BgL_arg3610z00_1305 = 
CDR(BgL_l2719z00_1299); 
BgL_l2719z00_1302 = BgL_arg3610z00_1305; 
BgL_tail2722z00_1303 = BgL_head2721z00_1301; 
BgL_map2720z00_1304:
{ /* ./Jvm/lisp.scm 65 */
bool_t BgL_test3613z00_1306;
BgL_test3613z00_1306 = 
NULLP(BgL_l2719z00_1302); 
if(BgL_test3613z00_1306)
{ /* ./Jvm/lisp.scm 65 */
BgL_arg3605z00_1297 = BgL_head2721z00_1301; }  else 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_newtail2723z00_1307;
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3620z00_1309;
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3624z00_1311;
BgL_arg3624z00_1311 = 
CAR(BgL_l2719z00_1302); 
{ /* ./Jvm/lisp.scm 65 */
BgL_nodez00_bglt BgL_ez00_2261;
BgL_ez00_2261 = 
(BgL_nodez00_bglt)(BgL_arg3624z00_1311); 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_method2774z00_2262;
{ /* ./Jvm/lisp.scm 65 */
BgL_objectz00_bglt BgL_objz00_2263;
BgL_objz00_2263 = 
(BgL_objectz00_bglt)(BgL_ez00_2261); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_objzd2classzd2numz00_2264;
BgL_objzd2classzd2numz00_2264 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2263); 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg2017z00_2265;
{ /* ./Jvm/lisp.scm 65 */
int BgL_auxz00_4105;
BgL_auxz00_4105 = 
(int)(((long)1)); 
BgL_arg2017z00_2265 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4105); } 
{ /* ./Jvm/lisp.scm 65 */
int BgL_offsetz00_2268;
BgL_offsetz00_2268 = 
(int)(BgL_objzd2classzd2numz00_2264); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_offsetz00_2269;
{ /* ./Jvm/lisp.scm 65 */
long BgL_auxz00_4109;
BgL_auxz00_4109 = 
(long)(BgL_offsetz00_2268); 
BgL_offsetz00_2269 = 
(BgL_auxz00_4109-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 65 */
long BgL_modz00_2270;
{ /* ./Jvm/lisp.scm 65 */
int BgL_arg2028z00_2271;
BgL_arg2028z00_2271 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_n2z00_2279;
BgL_n2z00_2279 = 
(long)(BgL_arg2028z00_2271); 
BgL_modz00_2270 = 
(BgL_offsetz00_2269/BgL_n2z00_2279); } } 
{ /* ./Jvm/lisp.scm 65 */
long BgL_restz00_2272;
{ /* ./Jvm/lisp.scm 65 */
int BgL_arg2024z00_2273;
BgL_arg2024z00_2273 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 65 */
long BgL_n2z00_2282;
BgL_n2z00_2282 = 
(long)(BgL_arg2024z00_2273); 
BgL_restz00_2272 = 
(BgL_offsetz00_2269%BgL_n2z00_2282); } } 
{ /* ./Jvm/lisp.scm 65 */

{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_bucketz00_2274;
{ /* ./Jvm/lisp.scm 65 */
int BgL_kz00_2284;
BgL_kz00_2284 = 
(int)(BgL_modz00_2270); 
BgL_bucketz00_2274 = 
VECTOR_REF(BgL_arg2017z00_2265,BgL_kz00_2284); } 
{ /* ./Jvm/lisp.scm 65 */
int BgL_kz00_2286;
BgL_kz00_2286 = 
(int)(BgL_restz00_2272); 
BgL_method2774z00_2262 = 
VECTOR_REF(BgL_bucketz00_2274,BgL_kz00_2286); } } } } } } } } } } 
BgL_arg3620z00_1309 = 
PROCEDURE_ENTRY(BgL_method2774z00_2262)(BgL_method2774z00_2262, 
(obj_t)(BgL_ez00_2261), BEOA); } } } 
BgL_newtail2723z00_1307 = 
MAKE_PAIR(BgL_arg3620z00_1309, BNIL); } 
SET_CDR(BgL_tail2722z00_1303, BgL_newtail2723z00_1307); 
{ /* ./Jvm/lisp.scm 65 */
obj_t BgL_arg3616z00_1308;
BgL_arg3616z00_1308 = 
CDR(BgL_l2719z00_1302); 
{ 
obj_t BgL_tail2722z00_4129;obj_t BgL_l2719z00_4128;
BgL_l2719z00_4128 = BgL_arg3616z00_1308; 
BgL_tail2722z00_4129 = BgL_newtail2723z00_1307; 
BgL_tail2722z00_1303 = BgL_tail2722z00_4129; 
BgL_l2719z00_1302 = BgL_l2719z00_4128; 
goto BgL_map2720z00_1304;} } } } } } } } } 
BgL_arg3602z00_1296 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3605z00_1297, BNIL); } 
return 
MAKE_PAIR(BgL_arg3601z00_1295, BgL_arg3602z00_1296);} } } 
}



/* compile-lisp-funcall2796 */
obj_t BGl_compilezd2lispzd2funcall2796z00zzjvm_lispz00(obj_t BgL_envz00_3158, obj_t BgL_ez00_3159)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 60 */
{ 
BgL_funcallz00_bglt BgL_ez00_1263;
BgL_ez00_1263 = 
(BgL_funcallz00_bglt)(BgL_ez00_3159); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3546z00_1267;obj_t BgL_arg3547z00_1268;
BgL_arg3546z00_1267 = 
CNST_TABLE_REF(((long)15)); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3550z00_1269;obj_t BgL_arg3552z00_1270;
{ /* ./Jvm/lisp.scm 62 */
BgL_nodez00_bglt BgL_arg3556z00_1271;
BgL_arg3556z00_1271 = 
(((BgL_funcallz00_bglt)CREF(BgL_ez00_1263))->BgL_funz00); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_method2774z00_2137;
{ /* ./Jvm/lisp.scm 62 */
BgL_objectz00_bglt BgL_objz00_2138;
BgL_objz00_2138 = 
(BgL_objectz00_bglt)(BgL_arg3556z00_1271); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_objzd2classzd2numz00_2139;
BgL_objzd2classzd2numz00_2139 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2138); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg2017z00_2140;
{ /* ./Jvm/lisp.scm 62 */
int BgL_auxz00_4137;
BgL_auxz00_4137 = 
(int)(((long)1)); 
BgL_arg2017z00_2140 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4137); } 
{ /* ./Jvm/lisp.scm 62 */
int BgL_offsetz00_2143;
BgL_offsetz00_2143 = 
(int)(BgL_objzd2classzd2numz00_2139); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_offsetz00_2144;
{ /* ./Jvm/lisp.scm 62 */
long BgL_auxz00_4141;
BgL_auxz00_4141 = 
(long)(BgL_offsetz00_2143); 
BgL_offsetz00_2144 = 
(BgL_auxz00_4141-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 62 */
long BgL_modz00_2145;
{ /* ./Jvm/lisp.scm 62 */
int BgL_arg2028z00_2146;
BgL_arg2028z00_2146 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_n2z00_2154;
BgL_n2z00_2154 = 
(long)(BgL_arg2028z00_2146); 
BgL_modz00_2145 = 
(BgL_offsetz00_2144/BgL_n2z00_2154); } } 
{ /* ./Jvm/lisp.scm 62 */
long BgL_restz00_2147;
{ /* ./Jvm/lisp.scm 62 */
int BgL_arg2024z00_2148;
BgL_arg2024z00_2148 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_n2z00_2157;
BgL_n2z00_2157 = 
(long)(BgL_arg2024z00_2148); 
BgL_restz00_2147 = 
(BgL_offsetz00_2144%BgL_n2z00_2157); } } 
{ /* ./Jvm/lisp.scm 62 */

{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_bucketz00_2149;
{ /* ./Jvm/lisp.scm 62 */
int BgL_kz00_2159;
BgL_kz00_2159 = 
(int)(BgL_modz00_2145); 
BgL_bucketz00_2149 = 
VECTOR_REF(BgL_arg2017z00_2140,BgL_kz00_2159); } 
{ /* ./Jvm/lisp.scm 62 */
int BgL_kz00_2161;
BgL_kz00_2161 = 
(int)(BgL_restz00_2147); 
BgL_method2774z00_2137 = 
VECTOR_REF(BgL_bucketz00_2149,BgL_kz00_2161); } } } } } } } } } } 
BgL_arg3550z00_1269 = 
PROCEDURE_ENTRY(BgL_method2774z00_2137)(BgL_method2774z00_2137, 
(obj_t)(BgL_arg3556z00_1271), BEOA); } } 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3560z00_1272;
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_l2714z00_1274;
BgL_l2714z00_1274 = 
(((BgL_funcallz00_bglt)CREF(BgL_ez00_1263))->BgL_argsz00); 
{ /* ./Jvm/lisp.scm 62 */
bool_t BgL_test3563z00_1275;
BgL_test3563z00_1275 = 
NULLP(BgL_l2714z00_1274); 
if(BgL_test3563z00_1275)
{ /* ./Jvm/lisp.scm 62 */
BgL_arg3560z00_1272 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_head2716z00_1276;
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3585z00_1287;
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3589z00_1289;
BgL_arg3589z00_1289 = 
CAR(BgL_l2714z00_1274); 
{ /* ./Jvm/lisp.scm 62 */
BgL_nodez00_bglt BgL_ez00_2165;
BgL_ez00_2165 = 
(BgL_nodez00_bglt)(BgL_arg3589z00_1289); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_method2774z00_2166;
{ /* ./Jvm/lisp.scm 62 */
BgL_objectz00_bglt BgL_objz00_2167;
BgL_objz00_2167 = 
(BgL_objectz00_bglt)(BgL_ez00_2165); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_objzd2classzd2numz00_2168;
BgL_objzd2classzd2numz00_2168 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2167); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg2017z00_2169;
{ /* ./Jvm/lisp.scm 62 */
int BgL_auxz00_4164;
BgL_auxz00_4164 = 
(int)(((long)1)); 
BgL_arg2017z00_2169 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4164); } 
{ /* ./Jvm/lisp.scm 62 */
int BgL_offsetz00_2172;
BgL_offsetz00_2172 = 
(int)(BgL_objzd2classzd2numz00_2168); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_offsetz00_2173;
{ /* ./Jvm/lisp.scm 62 */
long BgL_auxz00_4168;
BgL_auxz00_4168 = 
(long)(BgL_offsetz00_2172); 
BgL_offsetz00_2173 = 
(BgL_auxz00_4168-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 62 */
long BgL_modz00_2174;
{ /* ./Jvm/lisp.scm 62 */
int BgL_arg2028z00_2175;
BgL_arg2028z00_2175 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_n2z00_2183;
BgL_n2z00_2183 = 
(long)(BgL_arg2028z00_2175); 
BgL_modz00_2174 = 
(BgL_offsetz00_2173/BgL_n2z00_2183); } } 
{ /* ./Jvm/lisp.scm 62 */
long BgL_restz00_2176;
{ /* ./Jvm/lisp.scm 62 */
int BgL_arg2024z00_2177;
BgL_arg2024z00_2177 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_n2z00_2186;
BgL_n2z00_2186 = 
(long)(BgL_arg2024z00_2177); 
BgL_restz00_2176 = 
(BgL_offsetz00_2173%BgL_n2z00_2186); } } 
{ /* ./Jvm/lisp.scm 62 */

{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_bucketz00_2178;
{ /* ./Jvm/lisp.scm 62 */
int BgL_kz00_2188;
BgL_kz00_2188 = 
(int)(BgL_modz00_2174); 
BgL_bucketz00_2178 = 
VECTOR_REF(BgL_arg2017z00_2169,BgL_kz00_2188); } 
{ /* ./Jvm/lisp.scm 62 */
int BgL_kz00_2190;
BgL_kz00_2190 = 
(int)(BgL_restz00_2176); 
BgL_method2774z00_2166 = 
VECTOR_REF(BgL_bucketz00_2178,BgL_kz00_2190); } } } } } } } } } } 
BgL_arg3585z00_1287 = 
PROCEDURE_ENTRY(BgL_method2774z00_2166)(BgL_method2774z00_2166, 
(obj_t)(BgL_ez00_2165), BEOA); } } } 
BgL_head2716z00_1276 = 
MAKE_PAIR(BgL_arg3585z00_1287, BNIL); } 
{ 
obj_t BgL_l2714z00_1277;obj_t BgL_tail2717z00_1278;
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3565z00_1280;
BgL_arg3565z00_1280 = 
CDR(BgL_l2714z00_1274); 
BgL_l2714z00_1277 = BgL_arg3565z00_1280; 
BgL_tail2717z00_1278 = BgL_head2716z00_1276; 
BgL_map2715z00_1279:
{ /* ./Jvm/lisp.scm 62 */
bool_t BgL_test3568z00_1281;
BgL_test3568z00_1281 = 
NULLP(BgL_l2714z00_1277); 
if(BgL_test3568z00_1281)
{ /* ./Jvm/lisp.scm 62 */
BgL_arg3560z00_1272 = BgL_head2716z00_1276; }  else 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_newtail2718z00_1282;
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3575z00_1284;
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3579z00_1286;
BgL_arg3579z00_1286 = 
CAR(BgL_l2714z00_1277); 
{ /* ./Jvm/lisp.scm 62 */
BgL_nodez00_bglt BgL_ez00_2196;
BgL_ez00_2196 = 
(BgL_nodez00_bglt)(BgL_arg3579z00_1286); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_method2774z00_2197;
{ /* ./Jvm/lisp.scm 62 */
BgL_objectz00_bglt BgL_objz00_2198;
BgL_objz00_2198 = 
(BgL_objectz00_bglt)(BgL_ez00_2196); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_objzd2classzd2numz00_2199;
BgL_objzd2classzd2numz00_2199 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2198); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg2017z00_2200;
{ /* ./Jvm/lisp.scm 62 */
int BgL_auxz00_4192;
BgL_auxz00_4192 = 
(int)(((long)1)); 
BgL_arg2017z00_2200 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4192); } 
{ /* ./Jvm/lisp.scm 62 */
int BgL_offsetz00_2203;
BgL_offsetz00_2203 = 
(int)(BgL_objzd2classzd2numz00_2199); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_offsetz00_2204;
{ /* ./Jvm/lisp.scm 62 */
long BgL_auxz00_4196;
BgL_auxz00_4196 = 
(long)(BgL_offsetz00_2203); 
BgL_offsetz00_2204 = 
(BgL_auxz00_4196-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 62 */
long BgL_modz00_2205;
{ /* ./Jvm/lisp.scm 62 */
int BgL_arg2028z00_2206;
BgL_arg2028z00_2206 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_n2z00_2214;
BgL_n2z00_2214 = 
(long)(BgL_arg2028z00_2206); 
BgL_modz00_2205 = 
(BgL_offsetz00_2204/BgL_n2z00_2214); } } 
{ /* ./Jvm/lisp.scm 62 */
long BgL_restz00_2207;
{ /* ./Jvm/lisp.scm 62 */
int BgL_arg2024z00_2208;
BgL_arg2024z00_2208 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 62 */
long BgL_n2z00_2217;
BgL_n2z00_2217 = 
(long)(BgL_arg2024z00_2208); 
BgL_restz00_2207 = 
(BgL_offsetz00_2204%BgL_n2z00_2217); } } 
{ /* ./Jvm/lisp.scm 62 */

{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_bucketz00_2209;
{ /* ./Jvm/lisp.scm 62 */
int BgL_kz00_2219;
BgL_kz00_2219 = 
(int)(BgL_modz00_2205); 
BgL_bucketz00_2209 = 
VECTOR_REF(BgL_arg2017z00_2200,BgL_kz00_2219); } 
{ /* ./Jvm/lisp.scm 62 */
int BgL_kz00_2221;
BgL_kz00_2221 = 
(int)(BgL_restz00_2207); 
BgL_method2774z00_2197 = 
VECTOR_REF(BgL_bucketz00_2209,BgL_kz00_2221); } } } } } } } } } } 
BgL_arg3575z00_1284 = 
PROCEDURE_ENTRY(BgL_method2774z00_2197)(BgL_method2774z00_2197, 
(obj_t)(BgL_ez00_2196), BEOA); } } } 
BgL_newtail2718z00_1282 = 
MAKE_PAIR(BgL_arg3575z00_1284, BNIL); } 
SET_CDR(BgL_tail2717z00_1278, BgL_newtail2718z00_1282); 
{ /* ./Jvm/lisp.scm 62 */
obj_t BgL_arg3571z00_1283;
BgL_arg3571z00_1283 = 
CDR(BgL_l2714z00_1277); 
{ 
obj_t BgL_tail2717z00_4216;obj_t BgL_l2714z00_4215;
BgL_l2714z00_4215 = BgL_arg3571z00_1283; 
BgL_tail2717z00_4216 = BgL_newtail2718z00_1282; 
BgL_tail2717z00_1278 = BgL_tail2717z00_4216; 
BgL_l2714z00_1277 = BgL_l2714z00_4215; 
goto BgL_map2715z00_1279;} } } } } } } } } 
BgL_arg3552z00_1270 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3560z00_1272, BNIL); } 
BgL_arg3547z00_1268 = 
MAKE_PAIR(BgL_arg3550z00_1269, BgL_arg3552z00_1270); } 
return 
MAKE_PAIR(BgL_arg3546z00_1267, BgL_arg3547z00_1268);} } } 
}



/* compile-lisp-app-ly2794 */
obj_t BGl_compilezd2lispzd2appzd2ly2794zd2zzjvm_lispz00(obj_t BgL_envz00_3160, obj_t BgL_ez00_3161)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 56 */
{ 
BgL_appzd2lyzd2_bglt BgL_ez00_1249;
BgL_ez00_1249 = 
(BgL_appzd2lyzd2_bglt)(BgL_ez00_3161); 
{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_arg3520z00_1253;obj_t BgL_arg3521z00_1254;
BgL_arg3520z00_1253 = 
CNST_TABLE_REF(((long)16)); 
{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_arg3524z00_1255;obj_t BgL_arg3525z00_1256;
{ /* ./Jvm/lisp.scm 58 */
BgL_nodez00_bglt BgL_arg3528z00_1257;
BgL_arg3528z00_1257 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_ez00_1249))->BgL_funz00); 
{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_method2774z00_2083;
{ /* ./Jvm/lisp.scm 58 */
BgL_objectz00_bglt BgL_objz00_2084;
BgL_objz00_2084 = 
(BgL_objectz00_bglt)(BgL_arg3528z00_1257); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_objzd2classzd2numz00_2085;
BgL_objzd2classzd2numz00_2085 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2084); 
{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_arg2017z00_2086;
{ /* ./Jvm/lisp.scm 58 */
int BgL_auxz00_4225;
BgL_auxz00_4225 = 
(int)(((long)1)); 
BgL_arg2017z00_2086 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4225); } 
{ /* ./Jvm/lisp.scm 58 */
int BgL_offsetz00_2089;
BgL_offsetz00_2089 = 
(int)(BgL_objzd2classzd2numz00_2085); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_offsetz00_2090;
{ /* ./Jvm/lisp.scm 58 */
long BgL_auxz00_4229;
BgL_auxz00_4229 = 
(long)(BgL_offsetz00_2089); 
BgL_offsetz00_2090 = 
(BgL_auxz00_4229-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 58 */
long BgL_modz00_2091;
{ /* ./Jvm/lisp.scm 58 */
int BgL_arg2028z00_2092;
BgL_arg2028z00_2092 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_n2z00_2100;
BgL_n2z00_2100 = 
(long)(BgL_arg2028z00_2092); 
BgL_modz00_2091 = 
(BgL_offsetz00_2090/BgL_n2z00_2100); } } 
{ /* ./Jvm/lisp.scm 58 */
long BgL_restz00_2093;
{ /* ./Jvm/lisp.scm 58 */
int BgL_arg2024z00_2094;
BgL_arg2024z00_2094 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_n2z00_2103;
BgL_n2z00_2103 = 
(long)(BgL_arg2024z00_2094); 
BgL_restz00_2093 = 
(BgL_offsetz00_2090%BgL_n2z00_2103); } } 
{ /* ./Jvm/lisp.scm 58 */

{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_bucketz00_2095;
{ /* ./Jvm/lisp.scm 58 */
int BgL_kz00_2105;
BgL_kz00_2105 = 
(int)(BgL_modz00_2091); 
BgL_bucketz00_2095 = 
VECTOR_REF(BgL_arg2017z00_2086,BgL_kz00_2105); } 
{ /* ./Jvm/lisp.scm 58 */
int BgL_kz00_2107;
BgL_kz00_2107 = 
(int)(BgL_restz00_2093); 
BgL_method2774z00_2083 = 
VECTOR_REF(BgL_bucketz00_2095,BgL_kz00_2107); } } } } } } } } } } 
BgL_arg3524z00_1255 = 
PROCEDURE_ENTRY(BgL_method2774z00_2083)(BgL_method2774z00_2083, 
(obj_t)(BgL_arg3528z00_1257), BEOA); } } 
{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_arg3532z00_1258;
{ /* ./Jvm/lisp.scm 58 */
BgL_nodez00_bglt BgL_arg3536z00_1260;
BgL_arg3536z00_1260 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_ez00_1249))->BgL_argz00); 
{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_method2774z00_2110;
{ /* ./Jvm/lisp.scm 58 */
BgL_objectz00_bglt BgL_objz00_2111;
BgL_objz00_2111 = 
(BgL_objectz00_bglt)(BgL_arg3536z00_1260); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_objzd2classzd2numz00_2112;
BgL_objzd2classzd2numz00_2112 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2111); 
{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_arg2017z00_2113;
{ /* ./Jvm/lisp.scm 58 */
int BgL_auxz00_4248;
BgL_auxz00_4248 = 
(int)(((long)1)); 
BgL_arg2017z00_2113 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4248); } 
{ /* ./Jvm/lisp.scm 58 */
int BgL_offsetz00_2116;
BgL_offsetz00_2116 = 
(int)(BgL_objzd2classzd2numz00_2112); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_offsetz00_2117;
{ /* ./Jvm/lisp.scm 58 */
long BgL_auxz00_4252;
BgL_auxz00_4252 = 
(long)(BgL_offsetz00_2116); 
BgL_offsetz00_2117 = 
(BgL_auxz00_4252-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 58 */
long BgL_modz00_2118;
{ /* ./Jvm/lisp.scm 58 */
int BgL_arg2028z00_2119;
BgL_arg2028z00_2119 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_n2z00_2127;
BgL_n2z00_2127 = 
(long)(BgL_arg2028z00_2119); 
BgL_modz00_2118 = 
(BgL_offsetz00_2117/BgL_n2z00_2127); } } 
{ /* ./Jvm/lisp.scm 58 */
long BgL_restz00_2120;
{ /* ./Jvm/lisp.scm 58 */
int BgL_arg2024z00_2121;
BgL_arg2024z00_2121 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 58 */
long BgL_n2z00_2130;
BgL_n2z00_2130 = 
(long)(BgL_arg2024z00_2121); 
BgL_restz00_2120 = 
(BgL_offsetz00_2117%BgL_n2z00_2130); } } 
{ /* ./Jvm/lisp.scm 58 */

{ /* ./Jvm/lisp.scm 58 */
obj_t BgL_bucketz00_2122;
{ /* ./Jvm/lisp.scm 58 */
int BgL_kz00_2132;
BgL_kz00_2132 = 
(int)(BgL_modz00_2118); 
BgL_bucketz00_2122 = 
VECTOR_REF(BgL_arg2017z00_2113,BgL_kz00_2132); } 
{ /* ./Jvm/lisp.scm 58 */
int BgL_kz00_2134;
BgL_kz00_2134 = 
(int)(BgL_restz00_2120); 
BgL_method2774z00_2110 = 
VECTOR_REF(BgL_bucketz00_2122,BgL_kz00_2134); } } } } } } } } } } 
BgL_arg3532z00_1258 = 
PROCEDURE_ENTRY(BgL_method2774z00_2110)(BgL_method2774z00_2110, 
(obj_t)(BgL_arg3536z00_1260), BEOA); } } 
BgL_arg3525z00_1256 = 
MAKE_PAIR(BgL_arg3532z00_1258, BNIL); } 
BgL_arg3521z00_1254 = 
MAKE_PAIR(BgL_arg3524z00_1255, BgL_arg3525z00_1256); } 
return 
MAKE_PAIR(BgL_arg3520z00_1253, BgL_arg3521z00_1254);} } } 
}



/* compile-lisp-app2792 */
obj_t BGl_compilezd2lispzd2app2792z00zzjvm_lispz00(obj_t BgL_envz00_3162, obj_t BgL_ez00_3163)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 52 */
{ 
BgL_appz00_bglt BgL_ez00_1222;
BgL_ez00_1222 = 
(BgL_appz00_bglt)(BgL_ez00_3163); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3470z00_1226;obj_t BgL_arg3471z00_1227;
{ /* ./Jvm/lisp.scm 54 */
BgL_varz00_bglt BgL_arg3474z00_1228;
BgL_arg3474z00_1228 = 
(((BgL_appz00_bglt)CREF(BgL_ez00_1222))->BgL_funz00); 
{ /* ./Jvm/lisp.scm 54 */
BgL_nodez00_bglt BgL_ez00_1990;
BgL_ez00_1990 = 
(BgL_nodez00_bglt)(BgL_arg3474z00_1228); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_method2774z00_1991;
{ /* ./Jvm/lisp.scm 54 */
BgL_objectz00_bglt BgL_objz00_1992;
BgL_objz00_1992 = 
(BgL_objectz00_bglt)(BgL_ez00_1990); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_objzd2classzd2numz00_1993;
BgL_objzd2classzd2numz00_1993 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1992); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg2017z00_1994;
{ /* ./Jvm/lisp.scm 54 */
int BgL_auxz00_4276;
BgL_auxz00_4276 = 
(int)(((long)1)); 
BgL_arg2017z00_1994 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4276); } 
{ /* ./Jvm/lisp.scm 54 */
int BgL_offsetz00_1997;
BgL_offsetz00_1997 = 
(int)(BgL_objzd2classzd2numz00_1993); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_offsetz00_1998;
{ /* ./Jvm/lisp.scm 54 */
long BgL_auxz00_4280;
BgL_auxz00_4280 = 
(long)(BgL_offsetz00_1997); 
BgL_offsetz00_1998 = 
(BgL_auxz00_4280-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 54 */
long BgL_modz00_1999;
{ /* ./Jvm/lisp.scm 54 */
int BgL_arg2028z00_2000;
BgL_arg2028z00_2000 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_n2z00_2008;
BgL_n2z00_2008 = 
(long)(BgL_arg2028z00_2000); 
BgL_modz00_1999 = 
(BgL_offsetz00_1998/BgL_n2z00_2008); } } 
{ /* ./Jvm/lisp.scm 54 */
long BgL_restz00_2001;
{ /* ./Jvm/lisp.scm 54 */
int BgL_arg2024z00_2002;
BgL_arg2024z00_2002 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_n2z00_2011;
BgL_n2z00_2011 = 
(long)(BgL_arg2024z00_2002); 
BgL_restz00_2001 = 
(BgL_offsetz00_1998%BgL_n2z00_2011); } } 
{ /* ./Jvm/lisp.scm 54 */

{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_bucketz00_2003;
{ /* ./Jvm/lisp.scm 54 */
int BgL_kz00_2013;
BgL_kz00_2013 = 
(int)(BgL_modz00_1999); 
BgL_bucketz00_2003 = 
VECTOR_REF(BgL_arg2017z00_1994,BgL_kz00_2013); } 
{ /* ./Jvm/lisp.scm 54 */
int BgL_kz00_2015;
BgL_kz00_2015 = 
(int)(BgL_restz00_2001); 
BgL_method2774z00_1991 = 
VECTOR_REF(BgL_bucketz00_2003,BgL_kz00_2015); } } } } } } } } } } 
BgL_arg3470z00_1226 = 
PROCEDURE_ENTRY(BgL_method2774z00_1991)(BgL_method2774z00_1991, 
(obj_t)(BgL_ez00_1990), BEOA); } } } 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3478z00_1229;
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_l2705z00_1231;
BgL_l2705z00_1231 = 
(((BgL_appz00_bglt)CREF(BgL_ez00_1222))->BgL_argsz00); 
{ /* ./Jvm/lisp.scm 54 */
bool_t BgL_test3481z00_1232;
BgL_test3481z00_1232 = 
NULLP(BgL_l2705z00_1231); 
if(BgL_test3481z00_1232)
{ /* ./Jvm/lisp.scm 54 */
BgL_arg3478z00_1229 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_head2707z00_1233;
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3503z00_1244;
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3507z00_1246;
BgL_arg3507z00_1246 = 
CAR(BgL_l2705z00_1231); 
{ /* ./Jvm/lisp.scm 54 */
BgL_nodez00_bglt BgL_ez00_2019;
BgL_ez00_2019 = 
(BgL_nodez00_bglt)(BgL_arg3507z00_1246); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_method2774z00_2020;
{ /* ./Jvm/lisp.scm 54 */
BgL_objectz00_bglt BgL_objz00_2021;
BgL_objz00_2021 = 
(BgL_objectz00_bglt)(BgL_ez00_2019); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_objzd2classzd2numz00_2022;
BgL_objzd2classzd2numz00_2022 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2021); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg2017z00_2023;
{ /* ./Jvm/lisp.scm 54 */
int BgL_auxz00_4303;
BgL_auxz00_4303 = 
(int)(((long)1)); 
BgL_arg2017z00_2023 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4303); } 
{ /* ./Jvm/lisp.scm 54 */
int BgL_offsetz00_2026;
BgL_offsetz00_2026 = 
(int)(BgL_objzd2classzd2numz00_2022); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_offsetz00_2027;
{ /* ./Jvm/lisp.scm 54 */
long BgL_auxz00_4307;
BgL_auxz00_4307 = 
(long)(BgL_offsetz00_2026); 
BgL_offsetz00_2027 = 
(BgL_auxz00_4307-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 54 */
long BgL_modz00_2028;
{ /* ./Jvm/lisp.scm 54 */
int BgL_arg2028z00_2029;
BgL_arg2028z00_2029 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_n2z00_2037;
BgL_n2z00_2037 = 
(long)(BgL_arg2028z00_2029); 
BgL_modz00_2028 = 
(BgL_offsetz00_2027/BgL_n2z00_2037); } } 
{ /* ./Jvm/lisp.scm 54 */
long BgL_restz00_2030;
{ /* ./Jvm/lisp.scm 54 */
int BgL_arg2024z00_2031;
BgL_arg2024z00_2031 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_n2z00_2040;
BgL_n2z00_2040 = 
(long)(BgL_arg2024z00_2031); 
BgL_restz00_2030 = 
(BgL_offsetz00_2027%BgL_n2z00_2040); } } 
{ /* ./Jvm/lisp.scm 54 */

{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_bucketz00_2032;
{ /* ./Jvm/lisp.scm 54 */
int BgL_kz00_2042;
BgL_kz00_2042 = 
(int)(BgL_modz00_2028); 
BgL_bucketz00_2032 = 
VECTOR_REF(BgL_arg2017z00_2023,BgL_kz00_2042); } 
{ /* ./Jvm/lisp.scm 54 */
int BgL_kz00_2044;
BgL_kz00_2044 = 
(int)(BgL_restz00_2030); 
BgL_method2774z00_2020 = 
VECTOR_REF(BgL_bucketz00_2032,BgL_kz00_2044); } } } } } } } } } } 
BgL_arg3503z00_1244 = 
PROCEDURE_ENTRY(BgL_method2774z00_2020)(BgL_method2774z00_2020, 
(obj_t)(BgL_ez00_2019), BEOA); } } } 
BgL_head2707z00_1233 = 
MAKE_PAIR(BgL_arg3503z00_1244, BNIL); } 
{ 
obj_t BgL_l2705z00_1234;obj_t BgL_tail2708z00_1235;
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3483z00_1237;
BgL_arg3483z00_1237 = 
CDR(BgL_l2705z00_1231); 
BgL_l2705z00_1234 = BgL_arg3483z00_1237; 
BgL_tail2708z00_1235 = BgL_head2707z00_1233; 
BgL_map2706z00_1236:
{ /* ./Jvm/lisp.scm 54 */
bool_t BgL_test3486z00_1238;
BgL_test3486z00_1238 = 
NULLP(BgL_l2705z00_1234); 
if(BgL_test3486z00_1238)
{ /* ./Jvm/lisp.scm 54 */
BgL_arg3478z00_1229 = BgL_head2707z00_1233; }  else 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_newtail2709z00_1239;
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3493z00_1241;
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3498z00_1243;
BgL_arg3498z00_1243 = 
CAR(BgL_l2705z00_1234); 
{ /* ./Jvm/lisp.scm 54 */
BgL_nodez00_bglt BgL_ez00_2050;
BgL_ez00_2050 = 
(BgL_nodez00_bglt)(BgL_arg3498z00_1243); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_method2774z00_2051;
{ /* ./Jvm/lisp.scm 54 */
BgL_objectz00_bglt BgL_objz00_2052;
BgL_objz00_2052 = 
(BgL_objectz00_bglt)(BgL_ez00_2050); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_objzd2classzd2numz00_2053;
BgL_objzd2classzd2numz00_2053 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2052); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg2017z00_2054;
{ /* ./Jvm/lisp.scm 54 */
int BgL_auxz00_4331;
BgL_auxz00_4331 = 
(int)(((long)1)); 
BgL_arg2017z00_2054 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4331); } 
{ /* ./Jvm/lisp.scm 54 */
int BgL_offsetz00_2057;
BgL_offsetz00_2057 = 
(int)(BgL_objzd2classzd2numz00_2053); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_offsetz00_2058;
{ /* ./Jvm/lisp.scm 54 */
long BgL_auxz00_4335;
BgL_auxz00_4335 = 
(long)(BgL_offsetz00_2057); 
BgL_offsetz00_2058 = 
(BgL_auxz00_4335-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 54 */
long BgL_modz00_2059;
{ /* ./Jvm/lisp.scm 54 */
int BgL_arg2028z00_2060;
BgL_arg2028z00_2060 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_n2z00_2068;
BgL_n2z00_2068 = 
(long)(BgL_arg2028z00_2060); 
BgL_modz00_2059 = 
(BgL_offsetz00_2058/BgL_n2z00_2068); } } 
{ /* ./Jvm/lisp.scm 54 */
long BgL_restz00_2061;
{ /* ./Jvm/lisp.scm 54 */
int BgL_arg2024z00_2062;
BgL_arg2024z00_2062 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 54 */
long BgL_n2z00_2071;
BgL_n2z00_2071 = 
(long)(BgL_arg2024z00_2062); 
BgL_restz00_2061 = 
(BgL_offsetz00_2058%BgL_n2z00_2071); } } 
{ /* ./Jvm/lisp.scm 54 */

{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_bucketz00_2063;
{ /* ./Jvm/lisp.scm 54 */
int BgL_kz00_2073;
BgL_kz00_2073 = 
(int)(BgL_modz00_2059); 
BgL_bucketz00_2063 = 
VECTOR_REF(BgL_arg2017z00_2054,BgL_kz00_2073); } 
{ /* ./Jvm/lisp.scm 54 */
int BgL_kz00_2075;
BgL_kz00_2075 = 
(int)(BgL_restz00_2061); 
BgL_method2774z00_2051 = 
VECTOR_REF(BgL_bucketz00_2063,BgL_kz00_2075); } } } } } } } } } } 
BgL_arg3493z00_1241 = 
PROCEDURE_ENTRY(BgL_method2774z00_2051)(BgL_method2774z00_2051, 
(obj_t)(BgL_ez00_2050), BEOA); } } } 
BgL_newtail2709z00_1239 = 
MAKE_PAIR(BgL_arg3493z00_1241, BNIL); } 
SET_CDR(BgL_tail2708z00_1235, BgL_newtail2709z00_1239); 
{ /* ./Jvm/lisp.scm 54 */
obj_t BgL_arg3489z00_1240;
BgL_arg3489z00_1240 = 
CDR(BgL_l2705z00_1234); 
{ 
obj_t BgL_tail2708z00_4355;obj_t BgL_l2705z00_4354;
BgL_l2705z00_4354 = BgL_arg3489z00_1240; 
BgL_tail2708z00_4355 = BgL_newtail2709z00_1239; 
BgL_tail2708z00_1235 = BgL_tail2708z00_4355; 
BgL_l2705z00_1234 = BgL_l2705z00_4354; 
goto BgL_map2706z00_1236;} } } } } } } } } 
BgL_arg3471z00_1227 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3478z00_1229, BNIL); } 
return 
MAKE_PAIR(BgL_arg3470z00_1226, BgL_arg3471z00_1227);} } } 
}



/* compile-lisp-let-fun2790 */
obj_t BGl_compilezd2lispzd2letzd2fun2790zd2zzjvm_lispz00(obj_t BgL_envz00_3164, obj_t BgL_ez00_3165)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 40 */
{ 
BgL_letzd2funzd2_bglt BgL_ez00_1195;
BgL_ez00_1195 = 
(BgL_letzd2funzd2_bglt)(BgL_ez00_3165); 
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_arg3422z00_1199;obj_t BgL_arg3423z00_1200;
BgL_arg3422z00_1199 = 
CNST_TABLE_REF(((long)17)); 
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_arg3426z00_1201;obj_t BgL_arg3427z00_1202;
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_l2689z00_1203;
BgL_l2689z00_1203 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_ez00_1195))->BgL_localsz00); 
{ /* ./Jvm/lisp.scm 42 */
bool_t BgL_test3429z00_1204;
BgL_test3429z00_1204 = 
NULLP(BgL_l2689z00_1203); 
if(BgL_test3429z00_1204)
{ /* ./Jvm/lisp.scm 42 */
BgL_arg3426z00_1201 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_head2691z00_1205;
BgL_head2691z00_1205 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l2689z00_1206;obj_t BgL_tail2692z00_1207;
BgL_l2689z00_1206 = BgL_l2689z00_1203; 
BgL_tail2692z00_1207 = BgL_head2691z00_1205; 
BgL_map2690z00_1208:
{ /* ./Jvm/lisp.scm 42 */
bool_t BgL_test3431z00_1209;
BgL_test3431z00_1209 = 
NULLP(BgL_l2689z00_1206); 
if(BgL_test3431z00_1209)
{ /* ./Jvm/lisp.scm 42 */
BgL_arg3426z00_1201 = 
CDR(BgL_head2691z00_1205); }  else 
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_newtail2693z00_1210;
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_arg3440z00_1212;
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_bz00_1214;
BgL_bz00_1214 = 
CAR(BgL_l2689z00_1206); 
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_arg3444z00_1215;obj_t BgL_arg3446z00_1216;
{ /* ./Jvm/lisp.scm 42 */
BgL_variablez00_bglt BgL_obj1094z00_1956;
BgL_obj1094z00_1956 = 
(BgL_variablez00_bglt)(BgL_bz00_1214); 
BgL_arg3444z00_1215 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1094z00_1956))->BgL_namez00); } 
BgL_arg3446z00_1216 = 
BGl_compilezd2sfunzd2zzjvm_lispz00(BgL_bz00_1214); 
BgL_arg3440z00_1212 = 
MAKE_PAIR(BgL_arg3444z00_1215, BgL_arg3446z00_1216); } } 
BgL_newtail2693z00_1210 = 
MAKE_PAIR(BgL_arg3440z00_1212, BNIL); } 
SET_CDR(BgL_tail2692z00_1207, BgL_newtail2693z00_1210); 
{ /* ./Jvm/lisp.scm 42 */
obj_t BgL_arg3436z00_1211;
BgL_arg3436z00_1211 = 
CDR(BgL_l2689z00_1206); 
{ 
obj_t BgL_tail2692z00_4376;obj_t BgL_l2689z00_4375;
BgL_l2689z00_4375 = BgL_arg3436z00_1211; 
BgL_tail2692z00_4376 = BgL_newtail2693z00_1210; 
BgL_tail2692z00_1207 = BgL_tail2692z00_4376; 
BgL_l2689z00_1206 = BgL_l2689z00_4375; 
goto BgL_map2690z00_1208;} } } } } } } } 
{ /* ./Jvm/lisp.scm 44 */
obj_t BgL_arg3456z00_1217;
{ /* ./Jvm/lisp.scm 44 */
BgL_nodez00_bglt BgL_arg3460z00_1219;
BgL_arg3460z00_1219 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_ez00_1195))->BgL_bodyz00); 
{ /* ./Jvm/lisp.scm 44 */
obj_t BgL_method2774z00_1964;
{ /* ./Jvm/lisp.scm 44 */
BgL_objectz00_bglt BgL_objz00_1965;
BgL_objz00_1965 = 
(BgL_objectz00_bglt)(BgL_arg3460z00_1219); 
{ /* ./Jvm/lisp.scm 44 */
long BgL_objzd2classzd2numz00_1966;
BgL_objzd2classzd2numz00_1966 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1965); 
{ /* ./Jvm/lisp.scm 44 */
obj_t BgL_arg2017z00_1967;
{ /* ./Jvm/lisp.scm 44 */
int BgL_auxz00_4380;
BgL_auxz00_4380 = 
(int)(((long)1)); 
BgL_arg2017z00_1967 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4380); } 
{ /* ./Jvm/lisp.scm 44 */
int BgL_offsetz00_1970;
BgL_offsetz00_1970 = 
(int)(BgL_objzd2classzd2numz00_1966); 
{ /* ./Jvm/lisp.scm 44 */
long BgL_offsetz00_1971;
{ /* ./Jvm/lisp.scm 44 */
long BgL_auxz00_4384;
BgL_auxz00_4384 = 
(long)(BgL_offsetz00_1970); 
BgL_offsetz00_1971 = 
(BgL_auxz00_4384-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 44 */
long BgL_modz00_1972;
{ /* ./Jvm/lisp.scm 44 */
int BgL_arg2028z00_1973;
BgL_arg2028z00_1973 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 44 */
long BgL_n2z00_1981;
BgL_n2z00_1981 = 
(long)(BgL_arg2028z00_1973); 
BgL_modz00_1972 = 
(BgL_offsetz00_1971/BgL_n2z00_1981); } } 
{ /* ./Jvm/lisp.scm 44 */
long BgL_restz00_1974;
{ /* ./Jvm/lisp.scm 44 */
int BgL_arg2024z00_1975;
BgL_arg2024z00_1975 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 44 */
long BgL_n2z00_1984;
BgL_n2z00_1984 = 
(long)(BgL_arg2024z00_1975); 
BgL_restz00_1974 = 
(BgL_offsetz00_1971%BgL_n2z00_1984); } } 
{ /* ./Jvm/lisp.scm 44 */

{ /* ./Jvm/lisp.scm 44 */
obj_t BgL_bucketz00_1976;
{ /* ./Jvm/lisp.scm 44 */
int BgL_kz00_1986;
BgL_kz00_1986 = 
(int)(BgL_modz00_1972); 
BgL_bucketz00_1976 = 
VECTOR_REF(BgL_arg2017z00_1967,BgL_kz00_1986); } 
{ /* ./Jvm/lisp.scm 44 */
int BgL_kz00_1988;
BgL_kz00_1988 = 
(int)(BgL_restz00_1974); 
BgL_method2774z00_1964 = 
VECTOR_REF(BgL_bucketz00_1976,BgL_kz00_1988); } } } } } } } } } } 
BgL_arg3456z00_1217 = 
PROCEDURE_ENTRY(BgL_method2774z00_1964)(BgL_method2774z00_1964, 
(obj_t)(BgL_arg3460z00_1219), BEOA); } } 
BgL_arg3427z00_1202 = 
MAKE_PAIR(BgL_arg3456z00_1217, BNIL); } 
BgL_arg3423z00_1200 = 
MAKE_PAIR(BgL_arg3426z00_1201, BgL_arg3427z00_1202); } 
return 
MAKE_PAIR(BgL_arg3422z00_1199, BgL_arg3423z00_1200);} } } 
}



/* compile-lisp-select2788 */
obj_t BGl_compilezd2lispzd2select2788z00zzjvm_lispz00(obj_t BgL_envz00_3166, obj_t BgL_ez00_3167)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 35 */
{ 
BgL_selectz00_bglt BgL_ez00_1168;
BgL_ez00_1168 = 
(BgL_selectz00_bglt)(BgL_ez00_3167); 
{ /* ./Jvm/lisp.scm 37 */
obj_t BgL_arg3376z00_1172;obj_t BgL_arg3377z00_1173;
BgL_arg3376z00_1172 = 
CNST_TABLE_REF(((long)18)); 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_arg3380z00_1174;
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_l2682z00_1176;
BgL_l2682z00_1176 = 
(((BgL_selectz00_bglt)CREF(BgL_ez00_1168))->BgL_clausesz00); 
{ /* ./Jvm/lisp.scm 38 */
bool_t BgL_test3383z00_1177;
BgL_test3383z00_1177 = 
NULLP(BgL_l2682z00_1176); 
if(BgL_test3383z00_1177)
{ /* ./Jvm/lisp.scm 38 */
BgL_arg3380z00_1174 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_head2684z00_1178;
BgL_head2684z00_1178 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l2682z00_1179;obj_t BgL_tail2685z00_1180;
BgL_l2682z00_1179 = BgL_l2682z00_1176; 
BgL_tail2685z00_1180 = BgL_head2684z00_1178; 
BgL_map2683z00_1181:
{ /* ./Jvm/lisp.scm 38 */
bool_t BgL_test3385z00_1182;
BgL_test3385z00_1182 = 
NULLP(BgL_l2682z00_1179); 
if(BgL_test3385z00_1182)
{ /* ./Jvm/lisp.scm 38 */
BgL_arg3380z00_1174 = 
CDR(BgL_head2684z00_1178); }  else 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_newtail2686z00_1183;
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_arg3393z00_1185;
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_bz00_1187;
BgL_bz00_1187 = 
CAR(BgL_l2682z00_1179); 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_arg3397z00_1188;obj_t BgL_arg3398z00_1189;
BgL_arg3397z00_1188 = 
CAR(BgL_bz00_1187); 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_arg3407z00_1192;
BgL_arg3407z00_1192 = 
CDR(BgL_bz00_1187); 
{ /* ./Jvm/lisp.scm 38 */
BgL_nodez00_bglt BgL_ez00_1916;
BgL_ez00_1916 = 
(BgL_nodez00_bglt)(BgL_arg3407z00_1192); 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_method2774z00_1917;
{ /* ./Jvm/lisp.scm 38 */
BgL_objectz00_bglt BgL_objz00_1918;
BgL_objz00_1918 = 
(BgL_objectz00_bglt)(BgL_ez00_1916); 
{ /* ./Jvm/lisp.scm 38 */
long BgL_objzd2classzd2numz00_1919;
BgL_objzd2classzd2numz00_1919 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1918); 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_arg2017z00_1920;
{ /* ./Jvm/lisp.scm 38 */
int BgL_auxz00_4418;
BgL_auxz00_4418 = 
(int)(((long)1)); 
BgL_arg2017z00_1920 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4418); } 
{ /* ./Jvm/lisp.scm 38 */
int BgL_offsetz00_1923;
BgL_offsetz00_1923 = 
(int)(BgL_objzd2classzd2numz00_1919); 
{ /* ./Jvm/lisp.scm 38 */
long BgL_offsetz00_1924;
{ /* ./Jvm/lisp.scm 38 */
long BgL_auxz00_4422;
BgL_auxz00_4422 = 
(long)(BgL_offsetz00_1923); 
BgL_offsetz00_1924 = 
(BgL_auxz00_4422-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 38 */
long BgL_modz00_1925;
{ /* ./Jvm/lisp.scm 38 */
int BgL_arg2028z00_1926;
BgL_arg2028z00_1926 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 38 */
long BgL_n2z00_1934;
BgL_n2z00_1934 = 
(long)(BgL_arg2028z00_1926); 
BgL_modz00_1925 = 
(BgL_offsetz00_1924/BgL_n2z00_1934); } } 
{ /* ./Jvm/lisp.scm 38 */
long BgL_restz00_1927;
{ /* ./Jvm/lisp.scm 38 */
int BgL_arg2024z00_1928;
BgL_arg2024z00_1928 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 38 */
long BgL_n2z00_1937;
BgL_n2z00_1937 = 
(long)(BgL_arg2024z00_1928); 
BgL_restz00_1927 = 
(BgL_offsetz00_1924%BgL_n2z00_1937); } } 
{ /* ./Jvm/lisp.scm 38 */

{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_bucketz00_1929;
{ /* ./Jvm/lisp.scm 38 */
int BgL_kz00_1939;
BgL_kz00_1939 = 
(int)(BgL_modz00_1925); 
BgL_bucketz00_1929 = 
VECTOR_REF(BgL_arg2017z00_1920,BgL_kz00_1939); } 
{ /* ./Jvm/lisp.scm 38 */
int BgL_kz00_1941;
BgL_kz00_1941 = 
(int)(BgL_restz00_1927); 
BgL_method2774z00_1917 = 
VECTOR_REF(BgL_bucketz00_1929,BgL_kz00_1941); } } } } } } } } } } 
BgL_arg3398z00_1189 = 
PROCEDURE_ENTRY(BgL_method2774z00_1917)(BgL_method2774z00_1917, 
(obj_t)(BgL_ez00_1916), BEOA); } } } 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_list3400z00_1190;
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_arg3402z00_1191;
BgL_arg3402z00_1191 = 
MAKE_PAIR(BgL_arg3398z00_1189, BNIL); 
BgL_list3400z00_1190 = 
MAKE_PAIR(BgL_arg3397z00_1188, BgL_arg3402z00_1191); } 
BgL_arg3393z00_1185 = BgL_list3400z00_1190; } } } 
BgL_newtail2686z00_1183 = 
MAKE_PAIR(BgL_arg3393z00_1185, BNIL); } 
SET_CDR(BgL_tail2685z00_1180, BgL_newtail2686z00_1183); 
{ /* ./Jvm/lisp.scm 38 */
obj_t BgL_arg3389z00_1184;
BgL_arg3389z00_1184 = 
CDR(BgL_l2682z00_1179); 
{ 
obj_t BgL_tail2685z00_4444;obj_t BgL_l2682z00_4443;
BgL_l2682z00_4443 = BgL_arg3389z00_1184; 
BgL_tail2685z00_4444 = BgL_newtail2686z00_1183; 
BgL_tail2685z00_1180 = BgL_tail2685z00_4444; 
BgL_l2682z00_1179 = BgL_l2682z00_4443; 
goto BgL_map2683z00_1181;} } } } } } } } 
BgL_arg3377z00_1173 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3380z00_1174, BNIL); } 
return 
MAKE_PAIR(BgL_arg3376z00_1172, BgL_arg3377z00_1173);} } } 
}



/* compile-lisp-conditional2786 */
obj_t BGl_compilezd2lispzd2conditional2786z00zzjvm_lispz00(obj_t BgL_envz00_3168, obj_t BgL_ez00_3169)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 31 */
{ 
BgL_conditionalz00_bglt BgL_ez00_1151;
BgL_ez00_1151 = 
(BgL_conditionalz00_bglt)(BgL_ez00_3169); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_arg3340z00_1155;obj_t BgL_arg3341z00_1156;
BgL_arg3340z00_1155 = 
CNST_TABLE_REF(((long)19)); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_arg3344z00_1157;obj_t BgL_arg3345z00_1158;
{ /* ./Jvm/lisp.scm 33 */
BgL_nodez00_bglt BgL_arg3348z00_1159;
BgL_arg3348z00_1159 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_1151))->BgL_testz00); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_method2774z00_1828;
{ /* ./Jvm/lisp.scm 33 */
BgL_objectz00_bglt BgL_objz00_1829;
BgL_objz00_1829 = 
(BgL_objectz00_bglt)(BgL_arg3348z00_1159); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_objzd2classzd2numz00_1830;
BgL_objzd2classzd2numz00_1830 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1829); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_arg2017z00_1831;
{ /* ./Jvm/lisp.scm 33 */
int BgL_auxz00_4452;
BgL_auxz00_4452 = 
(int)(((long)1)); 
BgL_arg2017z00_1831 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4452); } 
{ /* ./Jvm/lisp.scm 33 */
int BgL_offsetz00_1834;
BgL_offsetz00_1834 = 
(int)(BgL_objzd2classzd2numz00_1830); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_offsetz00_1835;
{ /* ./Jvm/lisp.scm 33 */
long BgL_auxz00_4456;
BgL_auxz00_4456 = 
(long)(BgL_offsetz00_1834); 
BgL_offsetz00_1835 = 
(BgL_auxz00_4456-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 33 */
long BgL_modz00_1836;
{ /* ./Jvm/lisp.scm 33 */
int BgL_arg2028z00_1837;
BgL_arg2028z00_1837 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_n2z00_1845;
BgL_n2z00_1845 = 
(long)(BgL_arg2028z00_1837); 
BgL_modz00_1836 = 
(BgL_offsetz00_1835/BgL_n2z00_1845); } } 
{ /* ./Jvm/lisp.scm 33 */
long BgL_restz00_1838;
{ /* ./Jvm/lisp.scm 33 */
int BgL_arg2024z00_1839;
BgL_arg2024z00_1839 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_n2z00_1848;
BgL_n2z00_1848 = 
(long)(BgL_arg2024z00_1839); 
BgL_restz00_1838 = 
(BgL_offsetz00_1835%BgL_n2z00_1848); } } 
{ /* ./Jvm/lisp.scm 33 */

{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_bucketz00_1840;
{ /* ./Jvm/lisp.scm 33 */
int BgL_kz00_1850;
BgL_kz00_1850 = 
(int)(BgL_modz00_1836); 
BgL_bucketz00_1840 = 
VECTOR_REF(BgL_arg2017z00_1831,BgL_kz00_1850); } 
{ /* ./Jvm/lisp.scm 33 */
int BgL_kz00_1852;
BgL_kz00_1852 = 
(int)(BgL_restz00_1838); 
BgL_method2774z00_1828 = 
VECTOR_REF(BgL_bucketz00_1840,BgL_kz00_1852); } } } } } } } } } } 
BgL_arg3344z00_1157 = 
PROCEDURE_ENTRY(BgL_method2774z00_1828)(BgL_method2774z00_1828, 
(obj_t)(BgL_arg3348z00_1159), BEOA); } } 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_arg3352z00_1160;obj_t BgL_arg3354z00_1161;
{ /* ./Jvm/lisp.scm 33 */
BgL_nodez00_bglt BgL_arg3357z00_1162;
BgL_arg3357z00_1162 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_1151))->BgL_truez00); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_method2774z00_1855;
{ /* ./Jvm/lisp.scm 33 */
BgL_objectz00_bglt BgL_objz00_1856;
BgL_objz00_1856 = 
(BgL_objectz00_bglt)(BgL_arg3357z00_1162); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_objzd2classzd2numz00_1857;
BgL_objzd2classzd2numz00_1857 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1856); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_arg2017z00_1858;
{ /* ./Jvm/lisp.scm 33 */
int BgL_auxz00_4475;
BgL_auxz00_4475 = 
(int)(((long)1)); 
BgL_arg2017z00_1858 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4475); } 
{ /* ./Jvm/lisp.scm 33 */
int BgL_offsetz00_1861;
BgL_offsetz00_1861 = 
(int)(BgL_objzd2classzd2numz00_1857); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_offsetz00_1862;
{ /* ./Jvm/lisp.scm 33 */
long BgL_auxz00_4479;
BgL_auxz00_4479 = 
(long)(BgL_offsetz00_1861); 
BgL_offsetz00_1862 = 
(BgL_auxz00_4479-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 33 */
long BgL_modz00_1863;
{ /* ./Jvm/lisp.scm 33 */
int BgL_arg2028z00_1864;
BgL_arg2028z00_1864 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_n2z00_1872;
BgL_n2z00_1872 = 
(long)(BgL_arg2028z00_1864); 
BgL_modz00_1863 = 
(BgL_offsetz00_1862/BgL_n2z00_1872); } } 
{ /* ./Jvm/lisp.scm 33 */
long BgL_restz00_1865;
{ /* ./Jvm/lisp.scm 33 */
int BgL_arg2024z00_1866;
BgL_arg2024z00_1866 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_n2z00_1875;
BgL_n2z00_1875 = 
(long)(BgL_arg2024z00_1866); 
BgL_restz00_1865 = 
(BgL_offsetz00_1862%BgL_n2z00_1875); } } 
{ /* ./Jvm/lisp.scm 33 */

{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_bucketz00_1867;
{ /* ./Jvm/lisp.scm 33 */
int BgL_kz00_1877;
BgL_kz00_1877 = 
(int)(BgL_modz00_1863); 
BgL_bucketz00_1867 = 
VECTOR_REF(BgL_arg2017z00_1858,BgL_kz00_1877); } 
{ /* ./Jvm/lisp.scm 33 */
int BgL_kz00_1879;
BgL_kz00_1879 = 
(int)(BgL_restz00_1865); 
BgL_method2774z00_1855 = 
VECTOR_REF(BgL_bucketz00_1867,BgL_kz00_1879); } } } } } } } } } } 
BgL_arg3352z00_1160 = 
PROCEDURE_ENTRY(BgL_method2774z00_1855)(BgL_method2774z00_1855, 
(obj_t)(BgL_arg3357z00_1162), BEOA); } } 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_arg3362z00_1163;
{ /* ./Jvm/lisp.scm 33 */
BgL_nodez00_bglt BgL_arg3366z00_1165;
BgL_arg3366z00_1165 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_1151))->BgL_falsez00); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_method2774z00_1882;
{ /* ./Jvm/lisp.scm 33 */
BgL_objectz00_bglt BgL_objz00_1883;
BgL_objz00_1883 = 
(BgL_objectz00_bglt)(BgL_arg3366z00_1165); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_objzd2classzd2numz00_1884;
BgL_objzd2classzd2numz00_1884 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1883); 
{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_arg2017z00_1885;
{ /* ./Jvm/lisp.scm 33 */
int BgL_auxz00_4498;
BgL_auxz00_4498 = 
(int)(((long)1)); 
BgL_arg2017z00_1885 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4498); } 
{ /* ./Jvm/lisp.scm 33 */
int BgL_offsetz00_1888;
BgL_offsetz00_1888 = 
(int)(BgL_objzd2classzd2numz00_1884); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_offsetz00_1889;
{ /* ./Jvm/lisp.scm 33 */
long BgL_auxz00_4502;
BgL_auxz00_4502 = 
(long)(BgL_offsetz00_1888); 
BgL_offsetz00_1889 = 
(BgL_auxz00_4502-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 33 */
long BgL_modz00_1890;
{ /* ./Jvm/lisp.scm 33 */
int BgL_arg2028z00_1891;
BgL_arg2028z00_1891 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_n2z00_1899;
BgL_n2z00_1899 = 
(long)(BgL_arg2028z00_1891); 
BgL_modz00_1890 = 
(BgL_offsetz00_1889/BgL_n2z00_1899); } } 
{ /* ./Jvm/lisp.scm 33 */
long BgL_restz00_1892;
{ /* ./Jvm/lisp.scm 33 */
int BgL_arg2024z00_1893;
BgL_arg2024z00_1893 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 33 */
long BgL_n2z00_1902;
BgL_n2z00_1902 = 
(long)(BgL_arg2024z00_1893); 
BgL_restz00_1892 = 
(BgL_offsetz00_1889%BgL_n2z00_1902); } } 
{ /* ./Jvm/lisp.scm 33 */

{ /* ./Jvm/lisp.scm 33 */
obj_t BgL_bucketz00_1894;
{ /* ./Jvm/lisp.scm 33 */
int BgL_kz00_1904;
BgL_kz00_1904 = 
(int)(BgL_modz00_1890); 
BgL_bucketz00_1894 = 
VECTOR_REF(BgL_arg2017z00_1885,BgL_kz00_1904); } 
{ /* ./Jvm/lisp.scm 33 */
int BgL_kz00_1906;
BgL_kz00_1906 = 
(int)(BgL_restz00_1892); 
BgL_method2774z00_1882 = 
VECTOR_REF(BgL_bucketz00_1894,BgL_kz00_1906); } } } } } } } } } } 
BgL_arg3362z00_1163 = 
PROCEDURE_ENTRY(BgL_method2774z00_1882)(BgL_method2774z00_1882, 
(obj_t)(BgL_arg3366z00_1165), BEOA); } } 
BgL_arg3354z00_1161 = 
MAKE_PAIR(BgL_arg3362z00_1163, BNIL); } 
BgL_arg3345z00_1158 = 
MAKE_PAIR(BgL_arg3352z00_1160, BgL_arg3354z00_1161); } 
BgL_arg3341z00_1156 = 
MAKE_PAIR(BgL_arg3344z00_1157, BgL_arg3345z00_1158); } 
return 
MAKE_PAIR(BgL_arg3340z00_1155, BgL_arg3341z00_1156);} } } 
}



/* compile-lisp-sequence2784 */
obj_t BGl_compilezd2lispzd2sequence2784z00zzjvm_lispz00(obj_t BgL_envz00_3170, obj_t BgL_ez00_3171)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 27 */
{ 
BgL_sequencez00_bglt BgL_ez00_1125;
BgL_ez00_1125 = 
(BgL_sequencez00_bglt)(BgL_ez00_3171); 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3295z00_1129;obj_t BgL_arg3296z00_1130;
BgL_arg3295z00_1129 = 
CNST_TABLE_REF(((long)20)); 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3299z00_1131;
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_l2673z00_1133;
BgL_l2673z00_1133 = 
(((BgL_sequencez00_bglt)CREF(BgL_ez00_1125))->BgL_nodesz00); 
{ /* ./Jvm/lisp.scm 29 */
bool_t BgL_test3302z00_1134;
BgL_test3302z00_1134 = 
NULLP(BgL_l2673z00_1133); 
if(BgL_test3302z00_1134)
{ /* ./Jvm/lisp.scm 29 */
BgL_arg3299z00_1131 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_head2675z00_1135;
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3324z00_1146;
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3328z00_1148;
BgL_arg3328z00_1148 = 
CAR(BgL_l2673z00_1133); 
{ /* ./Jvm/lisp.scm 29 */
BgL_nodez00_bglt BgL_ez00_1764;
BgL_ez00_1764 = 
(BgL_nodez00_bglt)(BgL_arg3328z00_1148); 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_method2774z00_1765;
{ /* ./Jvm/lisp.scm 29 */
BgL_objectz00_bglt BgL_objz00_1766;
BgL_objz00_1766 = 
(BgL_objectz00_bglt)(BgL_ez00_1764); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_objzd2classzd2numz00_1767;
BgL_objzd2classzd2numz00_1767 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1766); 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg2017z00_1768;
{ /* ./Jvm/lisp.scm 29 */
int BgL_auxz00_4531;
BgL_auxz00_4531 = 
(int)(((long)1)); 
BgL_arg2017z00_1768 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4531); } 
{ /* ./Jvm/lisp.scm 29 */
int BgL_offsetz00_1771;
BgL_offsetz00_1771 = 
(int)(BgL_objzd2classzd2numz00_1767); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_offsetz00_1772;
{ /* ./Jvm/lisp.scm 29 */
long BgL_auxz00_4535;
BgL_auxz00_4535 = 
(long)(BgL_offsetz00_1771); 
BgL_offsetz00_1772 = 
(BgL_auxz00_4535-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 29 */
long BgL_modz00_1773;
{ /* ./Jvm/lisp.scm 29 */
int BgL_arg2028z00_1774;
BgL_arg2028z00_1774 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_n2z00_1782;
BgL_n2z00_1782 = 
(long)(BgL_arg2028z00_1774); 
BgL_modz00_1773 = 
(BgL_offsetz00_1772/BgL_n2z00_1782); } } 
{ /* ./Jvm/lisp.scm 29 */
long BgL_restz00_1775;
{ /* ./Jvm/lisp.scm 29 */
int BgL_arg2024z00_1776;
BgL_arg2024z00_1776 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_n2z00_1785;
BgL_n2z00_1785 = 
(long)(BgL_arg2024z00_1776); 
BgL_restz00_1775 = 
(BgL_offsetz00_1772%BgL_n2z00_1785); } } 
{ /* ./Jvm/lisp.scm 29 */

{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_bucketz00_1777;
{ /* ./Jvm/lisp.scm 29 */
int BgL_kz00_1787;
BgL_kz00_1787 = 
(int)(BgL_modz00_1773); 
BgL_bucketz00_1777 = 
VECTOR_REF(BgL_arg2017z00_1768,BgL_kz00_1787); } 
{ /* ./Jvm/lisp.scm 29 */
int BgL_kz00_1789;
BgL_kz00_1789 = 
(int)(BgL_restz00_1775); 
BgL_method2774z00_1765 = 
VECTOR_REF(BgL_bucketz00_1777,BgL_kz00_1789); } } } } } } } } } } 
BgL_arg3324z00_1146 = 
PROCEDURE_ENTRY(BgL_method2774z00_1765)(BgL_method2774z00_1765, 
(obj_t)(BgL_ez00_1764), BEOA); } } } 
BgL_head2675z00_1135 = 
MAKE_PAIR(BgL_arg3324z00_1146, BNIL); } 
{ 
obj_t BgL_l2673z00_1136;obj_t BgL_tail2676z00_1137;
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3304z00_1139;
BgL_arg3304z00_1139 = 
CDR(BgL_l2673z00_1133); 
BgL_l2673z00_1136 = BgL_arg3304z00_1139; 
BgL_tail2676z00_1137 = BgL_head2675z00_1135; 
BgL_map2674z00_1138:
{ /* ./Jvm/lisp.scm 29 */
bool_t BgL_test3307z00_1140;
BgL_test3307z00_1140 = 
NULLP(BgL_l2673z00_1136); 
if(BgL_test3307z00_1140)
{ /* ./Jvm/lisp.scm 29 */
BgL_arg3299z00_1131 = BgL_head2675z00_1135; }  else 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_newtail2677z00_1141;
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3314z00_1143;
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3319z00_1145;
BgL_arg3319z00_1145 = 
CAR(BgL_l2673z00_1136); 
{ /* ./Jvm/lisp.scm 29 */
BgL_nodez00_bglt BgL_ez00_1795;
BgL_ez00_1795 = 
(BgL_nodez00_bglt)(BgL_arg3319z00_1145); 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_method2774z00_1796;
{ /* ./Jvm/lisp.scm 29 */
BgL_objectz00_bglt BgL_objz00_1797;
BgL_objz00_1797 = 
(BgL_objectz00_bglt)(BgL_ez00_1795); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_objzd2classzd2numz00_1798;
BgL_objzd2classzd2numz00_1798 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1797); 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg2017z00_1799;
{ /* ./Jvm/lisp.scm 29 */
int BgL_auxz00_4559;
BgL_auxz00_4559 = 
(int)(((long)1)); 
BgL_arg2017z00_1799 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4559); } 
{ /* ./Jvm/lisp.scm 29 */
int BgL_offsetz00_1802;
BgL_offsetz00_1802 = 
(int)(BgL_objzd2classzd2numz00_1798); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_offsetz00_1803;
{ /* ./Jvm/lisp.scm 29 */
long BgL_auxz00_4563;
BgL_auxz00_4563 = 
(long)(BgL_offsetz00_1802); 
BgL_offsetz00_1803 = 
(BgL_auxz00_4563-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 29 */
long BgL_modz00_1804;
{ /* ./Jvm/lisp.scm 29 */
int BgL_arg2028z00_1805;
BgL_arg2028z00_1805 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_n2z00_1813;
BgL_n2z00_1813 = 
(long)(BgL_arg2028z00_1805); 
BgL_modz00_1804 = 
(BgL_offsetz00_1803/BgL_n2z00_1813); } } 
{ /* ./Jvm/lisp.scm 29 */
long BgL_restz00_1806;
{ /* ./Jvm/lisp.scm 29 */
int BgL_arg2024z00_1807;
BgL_arg2024z00_1807 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 29 */
long BgL_n2z00_1816;
BgL_n2z00_1816 = 
(long)(BgL_arg2024z00_1807); 
BgL_restz00_1806 = 
(BgL_offsetz00_1803%BgL_n2z00_1816); } } 
{ /* ./Jvm/lisp.scm 29 */

{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_bucketz00_1808;
{ /* ./Jvm/lisp.scm 29 */
int BgL_kz00_1818;
BgL_kz00_1818 = 
(int)(BgL_modz00_1804); 
BgL_bucketz00_1808 = 
VECTOR_REF(BgL_arg2017z00_1799,BgL_kz00_1818); } 
{ /* ./Jvm/lisp.scm 29 */
int BgL_kz00_1820;
BgL_kz00_1820 = 
(int)(BgL_restz00_1806); 
BgL_method2774z00_1796 = 
VECTOR_REF(BgL_bucketz00_1808,BgL_kz00_1820); } } } } } } } } } } 
BgL_arg3314z00_1143 = 
PROCEDURE_ENTRY(BgL_method2774z00_1796)(BgL_method2774z00_1796, 
(obj_t)(BgL_ez00_1795), BEOA); } } } 
BgL_newtail2677z00_1141 = 
MAKE_PAIR(BgL_arg3314z00_1143, BNIL); } 
SET_CDR(BgL_tail2676z00_1137, BgL_newtail2677z00_1141); 
{ /* ./Jvm/lisp.scm 29 */
obj_t BgL_arg3310z00_1142;
BgL_arg3310z00_1142 = 
CDR(BgL_l2673z00_1136); 
{ 
obj_t BgL_tail2676z00_4583;obj_t BgL_l2673z00_4582;
BgL_l2673z00_4582 = BgL_arg3310z00_1142; 
BgL_tail2676z00_4583 = BgL_newtail2677z00_1141; 
BgL_tail2676z00_1137 = BgL_tail2676z00_4583; 
BgL_l2673z00_1136 = BgL_l2673z00_4582; 
goto BgL_map2674z00_1138;} } } } } } } } } 
BgL_arg3296z00_1130 = 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_arg3299z00_1131, BNIL); } 
return 
MAKE_PAIR(BgL_arg3295z00_1129, BgL_arg3296z00_1130);} } } 
}



/* compile-lisp-setq2782 */
obj_t BGl_compilezd2lispzd2setq2782z00zzjvm_lispz00(obj_t BgL_envz00_3172, obj_t BgL_ez00_3173)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 23 */
{ 
BgL_setqz00_bglt BgL_ez00_1111;
BgL_ez00_1111 = 
(BgL_setqz00_bglt)(BgL_ez00_3173); 
{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_arg3269z00_1115;obj_t BgL_arg3270z00_1116;
BgL_arg3269z00_1115 = 
CNST_TABLE_REF(((long)21)); 
{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_arg3273z00_1117;obj_t BgL_arg3274z00_1118;
{ /* ./Jvm/lisp.scm 25 */
BgL_varz00_bglt BgL_arg3277z00_1119;
BgL_arg3277z00_1119 = 
(((BgL_setqz00_bglt)CREF(BgL_ez00_1111))->BgL_varz00); 
{ /* ./Jvm/lisp.scm 25 */
BgL_nodez00_bglt BgL_ez00_1708;
BgL_ez00_1708 = 
(BgL_nodez00_bglt)(BgL_arg3277z00_1119); 
{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_method2774z00_1709;
{ /* ./Jvm/lisp.scm 25 */
BgL_objectz00_bglt BgL_objz00_1710;
BgL_objz00_1710 = 
(BgL_objectz00_bglt)(BgL_ez00_1708); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_objzd2classzd2numz00_1711;
BgL_objzd2classzd2numz00_1711 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1710); 
{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_arg2017z00_1712;
{ /* ./Jvm/lisp.scm 25 */
int BgL_auxz00_4592;
BgL_auxz00_4592 = 
(int)(((long)1)); 
BgL_arg2017z00_1712 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4592); } 
{ /* ./Jvm/lisp.scm 25 */
int BgL_offsetz00_1715;
BgL_offsetz00_1715 = 
(int)(BgL_objzd2classzd2numz00_1711); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_offsetz00_1716;
{ /* ./Jvm/lisp.scm 25 */
long BgL_auxz00_4596;
BgL_auxz00_4596 = 
(long)(BgL_offsetz00_1715); 
BgL_offsetz00_1716 = 
(BgL_auxz00_4596-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 25 */
long BgL_modz00_1717;
{ /* ./Jvm/lisp.scm 25 */
int BgL_arg2028z00_1718;
BgL_arg2028z00_1718 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_n2z00_1726;
BgL_n2z00_1726 = 
(long)(BgL_arg2028z00_1718); 
BgL_modz00_1717 = 
(BgL_offsetz00_1716/BgL_n2z00_1726); } } 
{ /* ./Jvm/lisp.scm 25 */
long BgL_restz00_1719;
{ /* ./Jvm/lisp.scm 25 */
int BgL_arg2024z00_1720;
BgL_arg2024z00_1720 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_n2z00_1729;
BgL_n2z00_1729 = 
(long)(BgL_arg2024z00_1720); 
BgL_restz00_1719 = 
(BgL_offsetz00_1716%BgL_n2z00_1729); } } 
{ /* ./Jvm/lisp.scm 25 */

{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_bucketz00_1721;
{ /* ./Jvm/lisp.scm 25 */
int BgL_kz00_1731;
BgL_kz00_1731 = 
(int)(BgL_modz00_1717); 
BgL_bucketz00_1721 = 
VECTOR_REF(BgL_arg2017z00_1712,BgL_kz00_1731); } 
{ /* ./Jvm/lisp.scm 25 */
int BgL_kz00_1733;
BgL_kz00_1733 = 
(int)(BgL_restz00_1719); 
BgL_method2774z00_1709 = 
VECTOR_REF(BgL_bucketz00_1721,BgL_kz00_1733); } } } } } } } } } } 
BgL_arg3273z00_1117 = 
PROCEDURE_ENTRY(BgL_method2774z00_1709)(BgL_method2774z00_1709, 
(obj_t)(BgL_ez00_1708), BEOA); } } } 
{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_arg3281z00_1120;
{ /* ./Jvm/lisp.scm 25 */
BgL_nodez00_bglt BgL_arg3285z00_1122;
BgL_arg3285z00_1122 = 
(((BgL_setqz00_bglt)CREF(BgL_ez00_1111))->BgL_valuez00); 
{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_method2774z00_1736;
{ /* ./Jvm/lisp.scm 25 */
BgL_objectz00_bglt BgL_objz00_1737;
BgL_objz00_1737 = 
(BgL_objectz00_bglt)(BgL_arg3285z00_1122); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_objzd2classzd2numz00_1738;
BgL_objzd2classzd2numz00_1738 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1737); 
{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_arg2017z00_1739;
{ /* ./Jvm/lisp.scm 25 */
int BgL_auxz00_4615;
BgL_auxz00_4615 = 
(int)(((long)1)); 
BgL_arg2017z00_1739 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4615); } 
{ /* ./Jvm/lisp.scm 25 */
int BgL_offsetz00_1742;
BgL_offsetz00_1742 = 
(int)(BgL_objzd2classzd2numz00_1738); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_offsetz00_1743;
{ /* ./Jvm/lisp.scm 25 */
long BgL_auxz00_4619;
BgL_auxz00_4619 = 
(long)(BgL_offsetz00_1742); 
BgL_offsetz00_1743 = 
(BgL_auxz00_4619-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 25 */
long BgL_modz00_1744;
{ /* ./Jvm/lisp.scm 25 */
int BgL_arg2028z00_1745;
BgL_arg2028z00_1745 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_n2z00_1753;
BgL_n2z00_1753 = 
(long)(BgL_arg2028z00_1745); 
BgL_modz00_1744 = 
(BgL_offsetz00_1743/BgL_n2z00_1753); } } 
{ /* ./Jvm/lisp.scm 25 */
long BgL_restz00_1746;
{ /* ./Jvm/lisp.scm 25 */
int BgL_arg2024z00_1747;
BgL_arg2024z00_1747 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 25 */
long BgL_n2z00_1756;
BgL_n2z00_1756 = 
(long)(BgL_arg2024z00_1747); 
BgL_restz00_1746 = 
(BgL_offsetz00_1743%BgL_n2z00_1756); } } 
{ /* ./Jvm/lisp.scm 25 */

{ /* ./Jvm/lisp.scm 25 */
obj_t BgL_bucketz00_1748;
{ /* ./Jvm/lisp.scm 25 */
int BgL_kz00_1758;
BgL_kz00_1758 = 
(int)(BgL_modz00_1744); 
BgL_bucketz00_1748 = 
VECTOR_REF(BgL_arg2017z00_1739,BgL_kz00_1758); } 
{ /* ./Jvm/lisp.scm 25 */
int BgL_kz00_1760;
BgL_kz00_1760 = 
(int)(BgL_restz00_1746); 
BgL_method2774z00_1736 = 
VECTOR_REF(BgL_bucketz00_1748,BgL_kz00_1760); } } } } } } } } } } 
BgL_arg3281z00_1120 = 
PROCEDURE_ENTRY(BgL_method2774z00_1736)(BgL_method2774z00_1736, 
(obj_t)(BgL_arg3285z00_1122), BEOA); } } 
BgL_arg3274z00_1118 = 
MAKE_PAIR(BgL_arg3281z00_1120, BNIL); } 
BgL_arg3270z00_1116 = 
MAKE_PAIR(BgL_arg3273z00_1117, BgL_arg3274z00_1118); } 
return 
MAKE_PAIR(BgL_arg3269z00_1115, BgL_arg3270z00_1116);} } } 
}



/* compile-lisp-let-var2780 */
obj_t BGl_compilezd2lispzd2letzd2var2780zd2zzjvm_lispz00(obj_t BgL_envz00_3174, obj_t BgL_ez00_3175)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 16 */
{ 
BgL_letzd2varzd2_bglt BgL_ez00_1080;
BgL_ez00_1080 = 
(BgL_letzd2varzd2_bglt)(BgL_ez00_3175); 
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_arg3210z00_1084;obj_t BgL_arg3211z00_1085;
BgL_arg3210z00_1084 = 
CNST_TABLE_REF(((long)22)); 
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_arg3214z00_1086;obj_t BgL_arg3215z00_1087;
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_l2664z00_1088;
BgL_l2664z00_1088 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1080))->BgL_bindingsz00); 
{ /* ./Jvm/lisp.scm 18 */
bool_t BgL_test3217z00_1089;
BgL_test3217z00_1089 = 
NULLP(BgL_l2664z00_1088); 
if(BgL_test3217z00_1089)
{ /* ./Jvm/lisp.scm 18 */
BgL_arg3214z00_1086 = BNIL; }  else 
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_head2666z00_1090;
BgL_head2666z00_1090 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l2664z00_1091;obj_t BgL_tail2667z00_1092;
BgL_l2664z00_1091 = BgL_l2664z00_1088; 
BgL_tail2667z00_1092 = BgL_head2666z00_1090; 
BgL_map2665z00_1093:
{ /* ./Jvm/lisp.scm 18 */
bool_t BgL_test3219z00_1094;
BgL_test3219z00_1094 = 
NULLP(BgL_l2664z00_1091); 
if(BgL_test3219z00_1094)
{ /* ./Jvm/lisp.scm 18 */
BgL_arg3214z00_1086 = 
CDR(BgL_head2666z00_1090); }  else 
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_newtail2668z00_1095;
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_arg3227z00_1097;
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_bz00_1099;
BgL_bz00_1099 = 
CAR(BgL_l2664z00_1091); 
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_arg3231z00_1100;obj_t BgL_arg3232z00_1101;
{ /* ./Jvm/lisp.scm 18 */
BgL_variablez00_bglt BgL_obj1094z00_1645;
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_auxz00_4648;
BgL_auxz00_4648 = 
CAR(BgL_bz00_1099); 
BgL_obj1094z00_1645 = 
(BgL_variablez00_bglt)(BgL_auxz00_4648); } 
BgL_arg3231z00_1100 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1094z00_1645))->BgL_namez00); } 
{ /* ./Jvm/lisp.scm 19 */
obj_t BgL_arg3245z00_1105;
BgL_arg3245z00_1105 = 
CDR(BgL_bz00_1099); 
{ /* ./Jvm/lisp.scm 19 */
BgL_nodez00_bglt BgL_ez00_1647;
BgL_ez00_1647 = 
(BgL_nodez00_bglt)(BgL_arg3245z00_1105); 
{ /* ./Jvm/lisp.scm 19 */
obj_t BgL_method2774z00_1648;
{ /* ./Jvm/lisp.scm 19 */
BgL_objectz00_bglt BgL_objz00_1649;
BgL_objz00_1649 = 
(BgL_objectz00_bglt)(BgL_ez00_1647); 
{ /* ./Jvm/lisp.scm 19 */
long BgL_objzd2classzd2numz00_1650;
BgL_objzd2classzd2numz00_1650 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1649); 
{ /* ./Jvm/lisp.scm 19 */
obj_t BgL_arg2017z00_1651;
{ /* ./Jvm/lisp.scm 19 */
int BgL_auxz00_4656;
BgL_auxz00_4656 = 
(int)(((long)1)); 
BgL_arg2017z00_1651 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4656); } 
{ /* ./Jvm/lisp.scm 19 */
int BgL_offsetz00_1654;
BgL_offsetz00_1654 = 
(int)(BgL_objzd2classzd2numz00_1650); 
{ /* ./Jvm/lisp.scm 19 */
long BgL_offsetz00_1655;
{ /* ./Jvm/lisp.scm 19 */
long BgL_auxz00_4660;
BgL_auxz00_4660 = 
(long)(BgL_offsetz00_1654); 
BgL_offsetz00_1655 = 
(BgL_auxz00_4660-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 19 */
long BgL_modz00_1656;
{ /* ./Jvm/lisp.scm 19 */
int BgL_arg2028z00_1657;
BgL_arg2028z00_1657 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 19 */
long BgL_n2z00_1665;
BgL_n2z00_1665 = 
(long)(BgL_arg2028z00_1657); 
BgL_modz00_1656 = 
(BgL_offsetz00_1655/BgL_n2z00_1665); } } 
{ /* ./Jvm/lisp.scm 19 */
long BgL_restz00_1658;
{ /* ./Jvm/lisp.scm 19 */
int BgL_arg2024z00_1659;
BgL_arg2024z00_1659 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 19 */
long BgL_n2z00_1668;
BgL_n2z00_1668 = 
(long)(BgL_arg2024z00_1659); 
BgL_restz00_1658 = 
(BgL_offsetz00_1655%BgL_n2z00_1668); } } 
{ /* ./Jvm/lisp.scm 19 */

{ /* ./Jvm/lisp.scm 19 */
obj_t BgL_bucketz00_1660;
{ /* ./Jvm/lisp.scm 19 */
int BgL_kz00_1670;
BgL_kz00_1670 = 
(int)(BgL_modz00_1656); 
BgL_bucketz00_1660 = 
VECTOR_REF(BgL_arg2017z00_1651,BgL_kz00_1670); } 
{ /* ./Jvm/lisp.scm 19 */
int BgL_kz00_1672;
BgL_kz00_1672 = 
(int)(BgL_restz00_1658); 
BgL_method2774z00_1648 = 
VECTOR_REF(BgL_bucketz00_1660,BgL_kz00_1672); } } } } } } } } } } 
BgL_arg3232z00_1101 = 
PROCEDURE_ENTRY(BgL_method2774z00_1648)(BgL_method2774z00_1648, 
(obj_t)(BgL_ez00_1647), BEOA); } } } 
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_list3234z00_1102;
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_arg3236z00_1103;
BgL_arg3236z00_1103 = 
MAKE_PAIR(BgL_arg3232z00_1101, BNIL); 
BgL_list3234z00_1102 = 
MAKE_PAIR(BgL_arg3231z00_1100, BgL_arg3236z00_1103); } 
BgL_arg3227z00_1097 = BgL_list3234z00_1102; } } } 
BgL_newtail2668z00_1095 = 
MAKE_PAIR(BgL_arg3227z00_1097, BNIL); } 
SET_CDR(BgL_tail2667z00_1092, BgL_newtail2668z00_1095); 
{ /* ./Jvm/lisp.scm 18 */
obj_t BgL_arg3223z00_1096;
BgL_arg3223z00_1096 = 
CDR(BgL_l2664z00_1091); 
{ 
obj_t BgL_tail2667z00_4682;obj_t BgL_l2664z00_4681;
BgL_l2664z00_4681 = BgL_arg3223z00_1096; 
BgL_tail2667z00_4682 = BgL_newtail2668z00_1095; 
BgL_tail2667z00_1092 = BgL_tail2667z00_4682; 
BgL_l2664z00_1091 = BgL_l2664z00_4681; 
goto BgL_map2665z00_1093;} } } } } } } } 
{ /* ./Jvm/lisp.scm 21 */
obj_t BgL_arg3254z00_1106;
{ /* ./Jvm/lisp.scm 21 */
BgL_nodez00_bglt BgL_arg3259z00_1108;
BgL_arg3259z00_1108 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1080))->BgL_bodyz00); 
{ /* ./Jvm/lisp.scm 21 */
obj_t BgL_method2774z00_1682;
{ /* ./Jvm/lisp.scm 21 */
BgL_objectz00_bglt BgL_objz00_1683;
BgL_objz00_1683 = 
(BgL_objectz00_bglt)(BgL_arg3259z00_1108); 
{ /* ./Jvm/lisp.scm 21 */
long BgL_objzd2classzd2numz00_1684;
BgL_objzd2classzd2numz00_1684 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1683); 
{ /* ./Jvm/lisp.scm 21 */
obj_t BgL_arg2017z00_1685;
{ /* ./Jvm/lisp.scm 21 */
int BgL_auxz00_4686;
BgL_auxz00_4686 = 
(int)(((long)1)); 
BgL_arg2017z00_1685 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4686); } 
{ /* ./Jvm/lisp.scm 21 */
int BgL_offsetz00_1688;
BgL_offsetz00_1688 = 
(int)(BgL_objzd2classzd2numz00_1684); 
{ /* ./Jvm/lisp.scm 21 */
long BgL_offsetz00_1689;
{ /* ./Jvm/lisp.scm 21 */
long BgL_auxz00_4690;
BgL_auxz00_4690 = 
(long)(BgL_offsetz00_1688); 
BgL_offsetz00_1689 = 
(BgL_auxz00_4690-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 21 */
long BgL_modz00_1690;
{ /* ./Jvm/lisp.scm 21 */
int BgL_arg2028z00_1691;
BgL_arg2028z00_1691 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 21 */
long BgL_n2z00_1699;
BgL_n2z00_1699 = 
(long)(BgL_arg2028z00_1691); 
BgL_modz00_1690 = 
(BgL_offsetz00_1689/BgL_n2z00_1699); } } 
{ /* ./Jvm/lisp.scm 21 */
long BgL_restz00_1692;
{ /* ./Jvm/lisp.scm 21 */
int BgL_arg2024z00_1693;
BgL_arg2024z00_1693 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 21 */
long BgL_n2z00_1702;
BgL_n2z00_1702 = 
(long)(BgL_arg2024z00_1693); 
BgL_restz00_1692 = 
(BgL_offsetz00_1689%BgL_n2z00_1702); } } 
{ /* ./Jvm/lisp.scm 21 */

{ /* ./Jvm/lisp.scm 21 */
obj_t BgL_bucketz00_1694;
{ /* ./Jvm/lisp.scm 21 */
int BgL_kz00_1704;
BgL_kz00_1704 = 
(int)(BgL_modz00_1690); 
BgL_bucketz00_1694 = 
VECTOR_REF(BgL_arg2017z00_1685,BgL_kz00_1704); } 
{ /* ./Jvm/lisp.scm 21 */
int BgL_kz00_1706;
BgL_kz00_1706 = 
(int)(BgL_restz00_1692); 
BgL_method2774z00_1682 = 
VECTOR_REF(BgL_bucketz00_1694,BgL_kz00_1706); } } } } } } } } } } 
BgL_arg3254z00_1106 = 
PROCEDURE_ENTRY(BgL_method2774z00_1682)(BgL_method2774z00_1682, 
(obj_t)(BgL_arg3259z00_1108), BEOA); } } 
BgL_arg3215z00_1087 = 
MAKE_PAIR(BgL_arg3254z00_1106, BNIL); } 
BgL_arg3211z00_1085 = 
MAKE_PAIR(BgL_arg3214z00_1086, BgL_arg3215z00_1087); } 
return 
MAKE_PAIR(BgL_arg3210z00_1084, BgL_arg3211z00_1085);} } } 
}



/* compile-lisp-var2778 */
obj_t BGl_compilezd2lispzd2var2778z00zzjvm_lispz00(obj_t BgL_envz00_3176, obj_t BgL_ez00_3177)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 10 */
{ 
BgL_varz00_bglt BgL_ez00_1073;
BgL_ez00_1073 = 
(BgL_varz00_bglt)(BgL_ez00_3177); 
{ /* ./Jvm/lisp.scm 11 */
BgL_variablez00_bglt BgL_vz00_1076;
BgL_vz00_1076 = 
(((BgL_varz00_bglt)CREF(BgL_ez00_1073))->BgL_variablez00); 
{ /* ./Jvm/lisp.scm 12 */
bool_t BgL_test3197z00_1077;
{ /* ./Jvm/lisp.scm 12 */
obj_t BgL_obj1300z00_1634;
BgL_obj1300z00_1634 = 
(obj_t)(BgL_vz00_1076); 
BgL_test3197z00_1077 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1300z00_1634, BGl_localz00zzast_varz00); } 
if(BgL_test3197z00_1077)
{ /* ./Jvm/lisp.scm 12 */
return 
(((BgL_variablez00_bglt)CREF(BgL_vz00_1076))->BgL_namez00);}  else 
{ /* ./Jvm/lisp.scm 12 */
return 
(((BgL_variablez00_bglt)CREF(BgL_vz00_1076))->BgL_idz00);} } } } } 
}



/* compile-lisp-atom2776 */
obj_t BGl_compilezd2lispzd2atom2776z00zzjvm_lispz00(obj_t BgL_envz00_3178, obj_t BgL_ez00_3179)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 7 */
{ /* ./Jvm/lisp.scm 8 */
BgL_atomz00_bglt BgL_ez00_3189;
BgL_ez00_3189 = 
(BgL_atomz00_bglt)(BgL_ez00_3179); 
return 
(((BgL_atomz00_bglt)CREF(BgL_ez00_3189))->BgL_valuez00);} } 
}



/* compile-lisp */
BGL_EXPORTED_DEF obj_t BGl_compilezd2lispzd2zzjvm_lispz00(BgL_nodez00_bglt BgL_ez00_1)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 5 */
{ /* ./Jvm/lisp.scm 5 */
obj_t BgL_method2774z00_3072;
{ /* ./Jvm/lisp.scm 5 */
BgL_objectz00_bglt BgL_objz00_3073;
BgL_objz00_3073 = 
(BgL_objectz00_bglt)(BgL_ez00_1); 
{ /* ./Jvm/lisp.scm 5 */
long BgL_objzd2classzd2numz00_3074;
BgL_objzd2classzd2numz00_3074 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3073); 
{ /* ./Jvm/lisp.scm 5 */
obj_t BgL_arg2017z00_3075;
{ /* ./Jvm/lisp.scm 5 */
int BgL_auxz00_4721;
BgL_auxz00_4721 = 
(int)(((long)1)); 
BgL_arg2017z00_3075 = 
PROCEDURE_REF(BGl_compilezd2lispzd2envz00zzjvm_lispz00, BgL_auxz00_4721); } 
{ /* ./Jvm/lisp.scm 5 */
int BgL_offsetz00_3078;
BgL_offsetz00_3078 = 
(int)(BgL_objzd2classzd2numz00_3074); 
{ /* ./Jvm/lisp.scm 5 */
long BgL_offsetz00_3079;
{ /* ./Jvm/lisp.scm 5 */
long BgL_auxz00_4725;
BgL_auxz00_4725 = 
(long)(BgL_offsetz00_3078); 
BgL_offsetz00_3079 = 
(BgL_auxz00_4725-OBJECT_TYPE); } 
{ /* ./Jvm/lisp.scm 5 */
long BgL_modz00_3080;
{ /* ./Jvm/lisp.scm 5 */
int BgL_arg2028z00_3081;
BgL_arg2028z00_3081 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 5 */
long BgL_n2z00_3089;
BgL_n2z00_3089 = 
(long)(BgL_arg2028z00_3081); 
BgL_modz00_3080 = 
(BgL_offsetz00_3079/BgL_n2z00_3089); } } 
{ /* ./Jvm/lisp.scm 5 */
long BgL_restz00_3082;
{ /* ./Jvm/lisp.scm 5 */
int BgL_arg2024z00_3083;
BgL_arg2024z00_3083 = 
(int)(((long)8)); 
{ /* ./Jvm/lisp.scm 5 */
long BgL_n2z00_3092;
BgL_n2z00_3092 = 
(long)(BgL_arg2024z00_3083); 
BgL_restz00_3082 = 
(BgL_offsetz00_3079%BgL_n2z00_3092); } } 
{ /* ./Jvm/lisp.scm 5 */

{ /* ./Jvm/lisp.scm 5 */
obj_t BgL_bucketz00_3084;
{ /* ./Jvm/lisp.scm 5 */
int BgL_kz00_3094;
BgL_kz00_3094 = 
(int)(BgL_modz00_3080); 
BgL_bucketz00_3084 = 
VECTOR_REF(BgL_arg2017z00_3075,BgL_kz00_3094); } 
{ /* ./Jvm/lisp.scm 5 */
int BgL_kz00_3096;
BgL_kz00_3096 = 
(int)(BgL_restz00_3082); 
BgL_method2774z00_3072 = 
VECTOR_REF(BgL_bucketz00_3084,BgL_kz00_3096); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2774z00_3072)(BgL_method2774z00_3072, 
(obj_t)(BgL_ez00_1), BEOA);} } 
}



/* _compile-lisp4237 */
obj_t BGl__compilezd2lisp4237zd2zzjvm_lispz00(obj_t BgL_envz00_3100, obj_t BgL_ez00_3101)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 5 */
return 
BGl_compilezd2lispzd2zzjvm_lispz00(
(BgL_nodez00_bglt)(BgL_ez00_3101));} 
}



/* compile-lisp-default2773 */
obj_t BGl_compilezd2lispzd2default2773z00zzjvm_lispz00(BgL_nodez00_bglt BgL_ez00_2)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 1 */
{ /* ./Jvm/lisp.scm 1 */
obj_t BgL_procz00_3097;obj_t BgL_objectz00_3099;
BgL_procz00_3097 = 
CNST_TABLE_REF(((long)23)); 
BgL_objectz00_3099 = 
(obj_t)(BgL_ez00_2); 
FAILURE(BgL_procz00_3097,BGl_string4936z00zzjvm_lispz00,BgL_objectz00_3099);} } 
}



/* _compile-lisp-default2773 */
obj_t BGl__compilezd2lispzd2default2773z00zzjvm_lispz00(obj_t BgL_envz00_3180, obj_t BgL_ez00_3181)
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 1 */
return 
BGl_compilezd2lispzd2default2773z00zzjvm_lispz00(
(BgL_nodez00_bglt)(BgL_ez00_3181));} 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzjvm_lispz00()
{ AN_OBJECT;
{ /* ./Jvm/lisp.scm 1 */
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "jvm_lisp"); 
BGl_modulezd2initializa7ationz75zztype_typeofz00(((long)852), "jvm_lisp"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "jvm_lisp"); 
return 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "jvm_lisp");} 
}

