/*===========================================================================*/
/*   (Cfa/setup.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 Cfa/setup.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_ccompz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_producerz00;
   obj_t BgL_consumerz00;
   obj_t BgL_finaliza7erza7;
} *BgL_ccompz00_bglt;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

typedef struct BgL_approxz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   bool_t BgL_typezd2lockedzf3z21;
   obj_t BgL_allocsz00;
   bool_t BgL_topzf3zf3;
   long BgL_lostzd2stampzd2;
} *BgL_approxz00_bglt;

typedef struct BgL_cfunzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_cfunzf2cinfozf2_bglt;

typedef struct BgL_externzd2sfunzf2cinfoz20_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_externzd2sfunzf2cinfoz20_bglt;

typedef struct BgL_internzd2sfunzf2cinfoz20_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   long BgL_stampz00;
} *BgL_internzd2sfunzf2cinfoz20_bglt;

typedef struct BgL_scnstzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_scnstzf2cinfozf2_bglt;

typedef struct BgL_prezd2clozd2envz00_bgl {
   char dummy;
} *BgL_prezd2clozd2envz00_bglt;

typedef struct BgL_svarzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   bool_t BgL_clozd2envzf3z21;
} *BgL_svarzf2cinfozf2_bglt;

typedef struct BgL_cvarzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_cvarzf2cinfozf2_bglt;

typedef struct BgL_sexitzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_sexitzf2cinfozf2_bglt;

typedef struct BgL_reshapedzd2localzd2_bgl {
   obj_t BgL_bindingzd2valuezd2;
} *BgL_reshapedzd2localzd2_bglt;

typedef struct BgL_reshapedzd2globalzd2_bgl {
   char dummy;
} *BgL_reshapedzd2globalzd2_bglt;

typedef struct BgL_atomzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_atomzf2cinfozf2_bglt;

typedef struct BgL_kwotezf2nodezf2_bgl {
   struct BgL_nodez00_bgl * BgL_nodez00;
} *BgL_kwotezf2nodezf2_bglt;

typedef struct BgL_kwotezf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_kwotezf2cinfozf2_bglt;

typedef struct BgL_appzd2lyzf2cinfoz20_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_appzd2lyzf2cinfoz20_bglt;

typedef struct BgL_funcallzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   struct BgL_approxz00_bgl * BgL_vazd2approxzd2;
   bool_t BgL_arityzd2errorzd2noticedzf3zf3;
   bool_t BgL_typezd2errorzd2noticedzf3zf3;
} *BgL_funcallzf2cinfozf2_bglt;

typedef struct BgL_setqzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_setqzf2cinfozf2_bglt;

typedef struct BgL_conditionalzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_conditionalzf2cinfozf2_bglt;

typedef struct BgL_failzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_failzf2cinfozf2_bglt;

typedef struct BgL_selectzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_selectzf2cinfozf2_bglt;

typedef struct BgL_setzd2exzd2itzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_setzd2exzd2itzf2cinfozf2_bglt;

typedef struct BgL_jumpzd2exzd2itzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_jumpzd2exzd2itzf2cinfozf2_bglt;

typedef struct BgL_prezd2makezd2boxz00_bgl {
   char dummy;
} *BgL_prezd2makezd2boxz00_bglt;

typedef struct BgL_makezd2boxzf2cinfoz20_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_makezd2boxzf2cinfoz20_bglt;

typedef struct BgL_makezd2boxzf2ozd2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   struct BgL_approxz00_bgl * BgL_valuezd2approxzd2;
} *BgL_makezd2boxzf2ozd2cinfozf2_bglt;

typedef struct BgL_boxzd2setz12zf2cinfoz32_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_boxzd2setz12zf2cinfoz32_bglt;

typedef struct BgL_boxzd2refzf2cinfoz20_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_boxzd2refzf2cinfoz20_bglt;

typedef struct BgL_boxzd2setz12zf2ozd2cinfoze0_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_boxzd2setz12zf2ozd2cinfoze0_bglt;

typedef struct BgL_boxzd2refzf2ozd2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_boxzd2refzf2ozd2cinfozf2_bglt;

typedef struct BgL_prezd2arithmeticzd2appz00_bgl {
   obj_t BgL_speczd2typeszd2;
} *BgL_prezd2arithmeticzd2appz00_bglt;

typedef struct BgL_arithmeticzd2appzd2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   obj_t BgL_speczd2typeszd2;
} *BgL_arithmeticzd2appzd2_bglt;

typedef struct BgL_prezd2makezd2procedurezd2appzd2_bgl {
   struct BgL_variablez00_bgl * BgL_ownerz00;
} *BgL_prezd2makezd2procedurezd2appzd2_bglt;

typedef struct BgL_prezd2procedurezd2refzd2appzd2_bgl {
   char dummy;
} *BgL_prezd2procedurezd2refzd2appzd2_bglt;

typedef struct BgL_prezd2procedurezd2setz12zd2appzc0_bgl {
   char dummy;
} *BgL_prezd2procedurezd2setz12zd2appzc0_bglt;

typedef struct BgL_makezd2procedurezd2appz00_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   obj_t BgL_valueszd2approxzd2;
   long BgL_lostzd2stampzd2;
   bool_t BgL_xzd2tzf3z21;
   bool_t BgL_xz00;
   bool_t BgL_tz00;
   struct BgL_variablez00_bgl * BgL_ownerz00;
   obj_t BgL_stackzd2stampzd2;
} *BgL_makezd2procedurezd2appz00_bglt;

typedef struct BgL_procedurezd2refzd2appz00_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_procedurezd2refzd2appz00_bglt;

typedef struct BgL_procedurezd2setz12zd2appz12_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_procedurezd2setz12zd2appz12_bglt;

typedef struct BgL_prezd2makezd2vectorzd2appzd2_bgl {
   struct BgL_variablez00_bgl * BgL_ownerz00;
} *BgL_prezd2makezd2vectorzd2appzd2_bglt;

typedef struct BgL_makezd2vectorzd2appz00_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   struct BgL_approxz00_bgl * BgL_valuezd2approxzd2;
   long BgL_lostzd2stampzd2;
   struct BgL_variablez00_bgl * BgL_ownerz00;
   obj_t BgL_stackzd2stampzd2;
   bool_t BgL_seenzf3zf3;
} *BgL_makezd2vectorzd2appz00_bglt;

typedef struct BgL_prezd2makezd2structzd2appzd2_bgl {
   struct BgL_variablez00_bgl * BgL_ownerz00;
} *BgL_prezd2makezd2structzd2appzd2_bglt;

typedef struct BgL_prezd2structzd2refzd2appzd2_bgl {
   char dummy;
} *BgL_prezd2structzd2refzd2appzd2_bglt;

typedef struct BgL_prezd2structzd2setz12zd2appzc0_bgl {
   char dummy;
} *BgL_prezd2structzd2setz12zd2appzc0_bglt;

typedef struct BgL_makezd2structzd2appz00_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   struct BgL_approxz00_bgl * BgL_valuezd2approxzd2;
   long BgL_lostzd2stampzd2;
   struct BgL_variablez00_bgl * BgL_ownerz00;
   obj_t BgL_stackzd2stampzd2;
} *BgL_makezd2structzd2appz00_bglt;

typedef struct BgL_structzd2refzd2appz00_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_structzd2refzd2appz00_bglt;

typedef struct BgL_structzd2setz12zd2appz12_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_structzd2setz12zd2appz12_bglt;

typedef struct BgL_pragmazf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_pragmazf2cinfozf2_bglt;

typedef struct BgL_getfieldzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_getfieldzf2cinfozf2_bglt;

typedef struct BgL_setfieldzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_setfieldzf2cinfozf2_bglt;

typedef struct BgL_newzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_newzf2cinfozf2_bglt;

typedef struct BgL_isazf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_isazf2cinfozf2_bglt;

typedef struct BgL_vrefzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   bool_t BgL_tvectorzf3zf3;
} *BgL_vrefzf2cinfozf2_bglt;

typedef struct BgL_vsetz12zf2cinfoze0_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   bool_t BgL_tvectorzf3zf3;
} *BgL_vsetz12zf2cinfoze0_bglt;

typedef struct BgL_vlengthzf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   bool_t BgL_tvectorzf3zf3;
} *BgL_vlengthzf2cinfozf2_bglt;

typedef struct BgL_prezd2valloczf2cinfoz20_bgl {
   struct BgL_variablez00_bgl * BgL_ownerz00;
} *BgL_prezd2valloczf2cinfoz20_bglt;

typedef struct BgL_valloczf2cinfozf2_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
} *BgL_valloczf2cinfozf2_bglt;

typedef struct BgL_valloczf2cinfozb2optimz40_bgl {
   struct BgL_approxz00_bgl * BgL_approxz00;
   struct BgL_approxz00_bgl * BgL_valuezd2approxzd2;
   long BgL_lostzd2stampzd2;
   struct BgL_variablez00_bgl * BgL_ownerz00;
   bool_t BgL_stackablezf3zf3;
   obj_t BgL_stackzd2stampzd2;
   bool_t BgL_seenzf3zf3;
} *BgL_valloczf2cinfozb2optimz40_bglt;


static obj_t BGl_methodzd2initzd2zzcfa_setupz00();
extern obj_t BGl_scnstzf2Cinfozf2zzcfa_infoz00;
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl_nodezd2setupz12zd2new4680z12zzcfa_setupz00(obj_t, obj_t);
BGL_IMPORT long BGl_classzd2numzd2zz__objectz00(obj_t);
extern obj_t BGl_letzd2funzd2zzast_nodez00;
extern obj_t BGl_externzd2sfunzf2Cinfoz20zzcfa_infoz00;
static obj_t BGl_variablezd2valuezd2setupz12zd2cvar4655zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
extern obj_t BGl_sfunz00zzast_varz00;
extern obj_t BGl_wideningzd2setzd2exzd2itzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
extern BgL_approxz00_bglt BGl_makezd2emptyzd2approxz00zzcfa_approxz00();
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
static obj_t BGl__variablezd2valuezd2setupz12zd2default4640zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
extern obj_t BGl_wideningzd2svarzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt, bool_t);
extern obj_t BGl_scnstz00zzast_varz00;
extern obj_t BGl_wideningzd2cfunzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
static obj_t BGl_nodezd2setupz12zd2setzd2exzd2it4698z12zzcfa_setupz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_addzd2genericz12zc0zz__objectz00(obj_t, obj_t);
extern obj_t BGl_wideningzd2conditionalzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
extern obj_t BGl_wideningzd2reshapedzd2globalz00zzcfa_infoz00();
extern obj_t BGl_letzd2varzd2zzast_nodez00;
extern obj_t BGl_pragmaz00zzast_nodez00;
extern obj_t BGl_svarz00zzast_varz00;
extern obj_t BGl_za2moduleza2z00zzmodule_modulez00;
static obj_t BGl_nodezd2setupz12zd2kwotezf2node4637ze0zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_kwotez00zzast_nodez00;
static obj_t BGl_variablezd2valuezd2setupz12zd2svar4645zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
static obj_t BGl_nodezd2setupz12zd2setq4686z12zzcfa_setupz00(obj_t, obj_t);
static obj_t BGl_nodezd2setupz12zd2var4639z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_wideningzd2isazf2Cinfoz20zzcfa_info3z00(BgL_approxz00_bglt);
extern obj_t BGl_globalz00zzast_varz00;
extern obj_t BGl_za2procedureza2z00zztype_cachez00;
extern obj_t BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00;
extern obj_t BGl_failzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_setzd2exzd2itzf2Cinfozf2zzcfa_infoz00;
static obj_t BGl_funzd2setupz12zd2cfun4668z12zzcfa_setupz00(obj_t, obj_t, obj_t);
extern obj_t BGl_sexitz00zzast_varz00;
static obj_t BGl__nodezd2setupz126669zc0zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_castz00zzast_nodez00;
static obj_t BGl_variablezd2valuezd2setupz12zd2sfun4643zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
static obj_t BGl__funzd2setupz126665zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
static obj_t BGl__funzd2setupz12zd2default4662z12zzcfa_setupz00(obj_t, obj_t, obj_t);
extern obj_t BGl_atomzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_varz00zzast_nodez00;
static obj_t BGl_cnstzd2initzd2zzcfa_setupz00();
static obj_t BGl_nodezd2setupz12zd2funcall4672z12zzcfa_setupz00(obj_t, obj_t);
static obj_t BGl_funzd2setupz12zd2default4662z12zzcfa_setupz00(BgL_funz00_bglt, obj_t);
extern obj_t BGl_wideningzd2kwotezf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
extern obj_t BGl_atomz00zzast_nodez00;
extern obj_t BGl_failz00zzast_nodez00;
extern obj_t BGl_funcallz00zzast_nodez00;
extern obj_t BGl_wideningzd2pragmazf2Cinfoz20zzcfa_info3z00(BgL_approxz00_bglt);
static obj_t BGl_nodezd2setupz12zd2closure4657z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_cvarzf2Cinfozf2zzcfa_infoz00;
BGL_EXPORTED_DECL obj_t BGl_setzd2initialzd2approxz12z12zzcfa_setupz00(obj_t);
extern obj_t BGl_wideningzd2failzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
static obj_t BGl_nodezd2setupz12zd2atom4633z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_za2unspecza2z00zztype_cachez00;
static obj_t BGl_importedzd2moduleszd2initz00zzcfa_setupz00();
extern obj_t BGl_internzd2sfunzf2Cinfoz20zzcfa_infoz00;
static obj_t BGl_funzd2setupz12zd2sfun4665z12zzcfa_setupz00(obj_t, obj_t, obj_t);
extern obj_t BGl_reshapedzd2localzd2zzcfa_infoz00;
extern obj_t BGl_wideningzd2appzd2lyzf2Cinfozf2zzcfa_infoz00(BgL_approxz00_bglt);
extern obj_t BGl_prezd2clozd2envz00zzcfa_infoz00;
static obj_t BGl_nodezd2setupz12zd2kwote4635z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_wideningzd2sexitzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
extern obj_t BGl_getfieldz00zzast_nodez00;
extern obj_t BGl_isaz00zzast_nodez00;
extern obj_t BGl_newzf2Cinfozf2zzcfa_info3z00;
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
extern obj_t BGl_wideningzd2setqzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
extern obj_t BGl_wideningzd2getfieldzf2Cinfoz20zzcfa_info3z00(BgL_approxz00_bglt);
extern obj_t BGl_wideningzd2jumpzd2exzd2itzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
extern obj_t BGl_pragmazf2Cinfozf2zzcfa_info3z00;
extern obj_t BGl_selectz00zzast_nodez00;
static obj_t BGl_nodezd2setupz12zd2getfield4676z12zzcfa_setupz00(obj_t, obj_t);
static obj_t BGl_toplevelzd2initzd2zzcfa_setupz00();
static obj_t BGl_nodezd2setupz12zd2isa4682z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_appzd2lyzd2zzast_nodez00;
extern obj_t BGl_wideningzd2scnstzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzcfa_setupz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_tracez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_cachez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typeofz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmodule_modulez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcfa_infoz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcfa_info2z00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcfa_info3z00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcfa_approxz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__errorz00(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 *);
extern obj_t BGl_reshapedzd2globalzd2zzcfa_infoz00;
extern obj_t BGl_svarzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_za2structza2z00zztype_cachez00;
static obj_t BGl_nodezd2setupz12zd2default4630z12zzcfa_setupz00(BgL_nodez00_bglt);
extern obj_t BGl_jumpzd2exzd2itzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_wideningzd2funcallzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt, BgL_approxz00_bglt, bool_t, bool_t);
BGL_EXPORTED_DECL obj_t BGl_nodezd2setupz12zc0zzcfa_setupz00(BgL_nodez00_bglt);
extern obj_t BGl_setfieldzf2Cinfozf2zzcfa_info3z00;
extern obj_t BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_approxz00_bglt);
extern obj_t BGl_setzd2exzd2itz00zzast_nodez00;
extern obj_t BGl_za2vectorza2z00zztype_cachez00;
static obj_t BGl_nodezd2setupz12zd2fail4690z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_wideningzd2internzd2sfunzf2Cinfozf2zzcfa_infoz00(BgL_approxz00_bglt, long);
extern obj_t BGl_shapez00zztools_shapez00(obj_t);
extern BgL_approxz00_bglt BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_typez00_bglt);
static obj_t BGl_nodezd2setupz12zd2letzd2fun4694zc0zzcfa_setupz00(obj_t, obj_t);
static obj_t BGl__setzd2initialzd2approxz12z12zzcfa_setupz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_memqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
static obj_t BGl_variablezd2valuezd2setupz12zd2scnstzf2Cinfo4651z32zzcfa_setupz00(obj_t, obj_t, obj_t);
static obj_t BGl_nodezd2setupz12zd2conditional4688z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_cfunz00zzast_varz00;
static obj_t BGl_variablezd2valuezd2setupz12zd2default4640zc0zzcfa_setupz00(BgL_valuez00_bglt, BgL_variablez00_bglt);
extern obj_t BGl_wideningzd2atomzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
static obj_t BGl_nodezd2setupz12zd2app4661z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_jumpzd2exzd2itz00zzast_nodez00;
static obj_t BGl_variablezd2valuezd2setupz12zd2prezd2clozd2env4647zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
static obj_t BGl__nodezd2setupz12zd2default4630z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_newz00zzast_nodez00;
BGL_EXPORTED_DECL obj_t BGl_nodezd2setupza2z12z62zzcfa_setupz00(obj_t);
extern obj_t BGl_wideningzd2setfieldzf2Cinfoz20zzcfa_info3z00(BgL_approxz00_bglt);
extern obj_t BGl_conditionalz00zzast_nodez00;
static obj_t BGl__variablezd2valuezd2setupz126667z12zzcfa_setupz00(obj_t, obj_t, obj_t);
static obj_t BGl_nodezd2setupz12zd2appzd2ly4670zc0zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_sequencez00zzast_nodez00;
extern obj_t BGl_wideningzd2cvarzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
static obj_t BGl_nodezd2setupz12zd2letzd2var4696zc0zzcfa_setupz00(obj_t, obj_t);
static obj_t BGl_nodezd2setupz12zd2pragma4674z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_cfunzf2Cinfozf2zzcfa_infoz00;
static obj_t BGl_funzd2setupz12zc0zzcfa_setupz00(BgL_funz00_bglt, obj_t);
extern obj_t BGl_internalzd2errorzd2zztools_errorz00(obj_t, obj_t, obj_t);
static obj_t BGl_variablezd2valuezd2setupz12z12zzcfa_setupz00(BgL_valuez00_bglt, BgL_variablez00_bglt);
extern obj_t BGl_funcallzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_wideningzd2selectzf2Cinfoz20zzcfa_infoz00(BgL_approxz00_bglt);
extern obj_t BGl_appz00zzast_nodez00;
extern obj_t BGl_kwotezf2nodezf2zzcfa_infoz00;
extern obj_t BGl_cvarz00zzast_varz00;
static obj_t BGl_nodezd2setupz12zd2jumpzd2exzd2it4700z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_localz00zzast_varz00;
extern obj_t BGl_wideningzd2newzf2Cinfoz20zzcfa_info3z00(BgL_approxz00_bglt);
extern obj_t BGl_closurez00zzast_nodez00;
extern obj_t BGl_appzd2lyzf2Cinfoz20zzcfa_infoz00;
static obj_t BGl_nodezd2setupz12zd2select4692z12zzcfa_setupz00(obj_t, obj_t);
static obj_t BGl_nodezd2setupz12zd2setfield4678z12zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_setfieldz00zzast_nodez00;
extern obj_t BGl_isazf2Cinfozf2zzcfa_info3z00;
static obj_t BGl__nodezd2setupza2z12z62zzcfa_setupz00(obj_t, obj_t);
extern obj_t BGl_conditionalzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_setqzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_kwotezf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_getfieldzf2Cinfozf2zzcfa_info3z00;
extern BgL_typez00_bglt BGl_typeofzd2kwotezd2zztype_typeofz00(obj_t);
extern obj_t BGl_za2objza2z00zztype_cachez00;
static obj_t BGl_nodezd2setupz12zd2sequence4659z12zzcfa_setupz00(obj_t, obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzcfa_setupz00 = BUNSPEC;
static obj_t BGl_variablezd2valuezd2setupz12zd2scnst4653zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
extern obj_t BGl_wideningzd2reshapedzd2localz00zzcfa_infoz00(obj_t);
static obj_t BGl_nodezd2setupz12zd2cast4684z12zzcfa_setupz00(obj_t, obj_t);
static bool_t BGl_alloczd2typezf3z21zzcfa_setupz00(BgL_typez00_bglt);
extern obj_t BGl_wideningzd2externzd2sfunzf2Cinfozf2zzcfa_infoz00(BgL_approxz00_bglt);
BGL_IMPORT obj_t BGl_za2warningza2z00zz__errorz00;
extern obj_t BGl_sexitzf2Cinfozf2zzcfa_infoz00;
extern BgL_typez00_bglt BGl_typeofzd2atomzd2zztype_typeofz00(obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzcfa_setupz00();
static obj_t BGl_variablezd2valuezd2setupz12zd2sexit4649zc0zzcfa_setupz00(obj_t, obj_t, obj_t);
extern obj_t BGl_selectzf2Cinfozf2zzcfa_infoz00;
extern obj_t BGl_setqz00zzast_nodez00;
BGL_IMPORT obj_t BGl_findzd2superzd2classzd2methodzd2zz__objectz00(BgL_objectz00_bglt, obj_t, obj_t);
static obj_t __cnst[ 7 ] ;


DEFINE_STATIC_PROCEDURE( BGl_funzd2setupz12zd2default4662zd2envzc0zzcfa_setupz00, BgL_bgl__funza7d2setupza712za7d2default4662za712za7za7cfa_setupza7007503za7, BGl__funzd2setupz12zd2default4662z12zzcfa_setupz00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_nodezd2setupza2z12zd2envzb0zzcfa_setupz00, BgL_bgl__nodeza7d2setupza7a2za712za762za7za7cfa_setupza7007504za7, BGl__nodezd2setupza2z12z62zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_GENERIC( BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BgL_bgl__variableza7d2valueza7d2setupza7126667za712za7za7cfa_setupza7007505za7, BGl__variablezd2valuezd2setupz126667z12zzcfa_setupz00, 0L, 2 );
DEFINE_STRING( BGl_string7473z00zzcfa_setupz00, BgL_bgl_string7473za700za7za7cfa_setupza7007506z00, "variable-value-setup!-default4640 node-setup!-default4630 static already-done (sfun sgfun) import read ", 103 );
DEFINE_STRING( BGl_string7472z00zzcfa_setupz00, BgL_bgl_string7472za700za7za7cfa_setupza7007507z00, "No method for this object", 25 );
DEFINE_STRING( BGl_string7471z00zzcfa_setupz00, BgL_bgl_string7471za700za7za7cfa_setupza7007508z00, "Unexpected closure", 18 );
DEFINE_STRING( BGl_string7470z00zzcfa_setupz00, BgL_bgl_string7470za700za7za7cfa_setupza7007509z00, "node-setup!", 11 );
DEFINE_STATIC_PROCEDURE( BGl_nodezd2setupz12zd2default4630zd2envzc0zzcfa_setupz00, BgL_bgl__nodeza7d2setupza712za7d2default4630za712za7za7cfa_setupza7007510za7, BGl__nodezd2setupz12zd2default4630z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7438z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2atom4633za712za7za7cfa_setupza7007511za7, BGl_nodezd2setupz12zd2atom4633z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7440z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2kwoteza7f2node4637za7e0za7za7cfa_setupza7007512z00, BGl_nodezd2setupz12zd2kwotezf2node4637ze0zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7439z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2kwote4635za712za7za7cfa_setupza7007513za7, BGl_nodezd2setupz12zd2kwote4635z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7441z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2var4639za712za7za7cfa_setupza7007514za7, BGl_nodezd2setupz12zd2var4639z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7442z00zzcfa_setupz00, BgL_bgl_variableza7d2valueza7d2setupza712za7d2sfun4643za7c0za7za7cfa_setupza7007515z00, BGl_variablezd2valuezd2setupz12zd2sfun4643zc0zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7443z00zzcfa_setupz00, BgL_bgl_variableza7d2valueza7d2setupza712za7d2svar4645za7c0za7za7cfa_setupza7007516z00, BGl_variablezd2valuezd2setupz12zd2svar4645zc0zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7444z00zzcfa_setupz00, BgL_bgl_variableza7d2valueza7d2setupza712za7d2preza7d2cloza7d2env4647za7c0za7za7cfa_setupza7007517z00, BGl_variablezd2valuezd2setupz12zd2prezd2clozd2env4647zc0zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7445z00zzcfa_setupz00, BgL_bgl_variableza7d2valueza7d2setupza712za7d2sexit4649za7c0za7za7cfa_setupza7007518z00, BGl_variablezd2valuezd2setupz12zd2sexit4649zc0zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7446z00zzcfa_setupz00, BgL_bgl_variableza7d2valueza7d2setupza712za7d2scnstza7f2cinfo4651za732za7za7cfa_setupza7007519za7, BGl_variablezd2valuezd2setupz12zd2scnstzf2Cinfo4651z32zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7447z00zzcfa_setupz00, BgL_bgl_variableza7d2valueza7d2setupza712za7d2scnst4653za7c0za7za7cfa_setupza7007520z00, BGl_variablezd2valuezd2setupz12zd2scnst4653zc0zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7448z00zzcfa_setupz00, BgL_bgl_variableza7d2valueza7d2setupza712za7d2cvar4655za7c0za7za7cfa_setupza7007521z00, BGl_variablezd2valuezd2setupz12zd2cvar4655zc0zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7450z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2sequence4659za712za7za7cfa_setupza7007522za7, BGl_nodezd2setupz12zd2sequence4659z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7449z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2closure4657za712za7za7cfa_setupza7007523za7, BGl_nodezd2setupz12zd2closure4657z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7451z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2app4661za712za7za7cfa_setupza7007524za7, BGl_nodezd2setupz12zd2app4661z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7452z00zzcfa_setupz00, BgL_bgl_funza7d2setupza712za7d2sfun4665za712za7za7cfa_setupza7007525za7, BGl_funzd2setupz12zd2sfun4665z12zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7453z00zzcfa_setupz00, BgL_bgl_funza7d2setupza712za7d2cfun4668za712za7za7cfa_setupza7007526za7, BGl_funzd2setupz12zd2cfun4668z12zzcfa_setupz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7454z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2appza7d2ly4670za7c0za7za7cfa_setupza7007527z00, BGl_nodezd2setupz12zd2appzd2ly4670zc0zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7455z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2funcall4672za712za7za7cfa_setupza7007528za7, BGl_nodezd2setupz12zd2funcall4672z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7456z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2pragma4674za712za7za7cfa_setupza7007529za7, BGl_nodezd2setupz12zd2pragma4674z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7457z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2getfield4676za712za7za7cfa_setupza7007530za7, BGl_nodezd2setupz12zd2getfield4676z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7458z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2setfield4678za712za7za7cfa_setupza7007531za7, BGl_nodezd2setupz12zd2setfield4678z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7460z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2isa4682za712za7za7cfa_setupza7007532za7, BGl_nodezd2setupz12zd2isa4682z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7459z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2new4680za712za7za7cfa_setupza7007533za7, BGl_nodezd2setupz12zd2new4680z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7461z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2cast4684za712za7za7cfa_setupza7007534za7, BGl_nodezd2setupz12zd2cast4684z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7462z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2setq4686za712za7za7cfa_setupza7007535za7, BGl_nodezd2setupz12zd2setq4686z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7463z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2conditional4688za712za7za7cfa_setupza7007536za7, BGl_nodezd2setupz12zd2conditional4688z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7464z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2fail4690za712za7za7cfa_setupza7007537za7, BGl_nodezd2setupz12zd2fail4690z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7465z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2select4692za712za7za7cfa_setupza7007538za7, BGl_nodezd2setupz12zd2select4692z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7466z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2letza7d2fun4694za7c0za7za7cfa_setupza7007539z00, BGl_nodezd2setupz12zd2letzd2fun4694zc0zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7467z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2letza7d2var4696za7c0za7za7cfa_setupza7007540z00, BGl_nodezd2setupz12zd2letzd2var4696zc0zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7468z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2setza7d2exza7d2it4698za712za7za7cfa_setupza7007541za7, BGl_nodezd2setupz12zd2setzd2exzd2it4698z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7469z00zzcfa_setupz00, BgL_bgl_nodeza7d2setupza712za7d2jumpza7d2exza7d2it4700za712za7za7cfa_setupza7007542za7, BGl_nodezd2setupz12zd2jumpzd2exzd2it4700z12zzcfa_setupz00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_setzd2initialzd2approxz12zd2envzc0zzcfa_setupz00, BgL_bgl__setza7d2initialza7d2approxza712za712za7za7cfa_setupza7007543za7, BGl__setzd2initialzd2approxz12z12zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_GENERIC( BGl_funzd2setupz12zd2envz12zzcfa_setupz00, BgL_bgl__funza7d2setupza7126665za7c0za7za7cfa_setupza7007544z00, BGl__funzd2setupz126665zc0zzcfa_setupz00, 0L, 2 );
DEFINE_EXPORT_GENERIC( BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_bgl__nodeza7d2setupza7126669za7c0za7za7cfa_setupza7007545z00, BGl__nodezd2setupz126669zc0zzcfa_setupz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_variablezd2valuezd2setupz12zd2default4640zd2envz12zzcfa_setupz00, BgL_bgl__variableza7d2valueza7d2setupza712za7d2default4640za7c0za7za7cfa_setupza7007546z00, BGl__variablezd2valuezd2setupz12zd2default4640zc0zzcfa_setupz00, 0L, 2 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzcfa_setupz00(long BgL_checksumz00_3460, char * BgL_fromz00_3461)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzcfa_setupz00))
{ 
BGl_requirezd2initializa7ationz75zzcfa_setupz00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzcfa_setupz00(); 
BGl_cnstzd2initzd2zzcfa_setupz00(); 
BGl_importedzd2moduleszd2initz00zzcfa_setupz00(); 
BGl_methodzd2initzd2zzcfa_setupz00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzcfa_setupz00()
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zz__errorz00(((long)0), "cfa_setup"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzcfa_setupz00()
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
{ /* ./Cfa/setup.scm 15 */
obj_t BgL_cportz00_3445;
BgL_cportz00_3445 = 
open_input_string(BGl_string7473z00zzcfa_setupz00); 
{ 
long BgL_iz00_3446;
BgL_iz00_3446 = ((long)6); 
BgL_loopz00_3447:
{ /* ./Cfa/setup.scm 15 */
bool_t BgL_test7475z00_3448;
BgL_test7475z00_3448 = 
(BgL_iz00_3446==((long)-1)); 
if(BgL_test7475z00_3448)
{ /* ./Cfa/setup.scm 15 */
return BUNSPEC;}  else 
{ /* ./Cfa/setup.scm 15 */
{ /* ./Cfa/setup.scm 15 */
obj_t BgL_arg7477z00_3449;
{ /* ./Cfa/setup.scm 15 */
obj_t BgL_list7480z00_3450;
BgL_list7480z00_3450 = 
MAKE_PAIR(BgL_cportz00_3445, BNIL); 
BgL_arg7477z00_3449 = 
BGl_readz00zz__readerz00(BgL_list7480z00_3450); } 
{ /* ./Cfa/setup.scm 15 */
int BgL_auxz00_3478;
BgL_auxz00_3478 = 
(int)(BgL_iz00_3446); 
CNST_TABLE_SET(BgL_auxz00_3478, BgL_arg7477z00_3449); } } 
{ /* ./Cfa/setup.scm 15 */
int BgL_auxz00_3451;
{ /* ./Cfa/setup.scm 15 */
long BgL_auxz00_3481;
BgL_auxz00_3481 = 
(BgL_iz00_3446-((long)1)); 
BgL_auxz00_3451 = 
(int)(BgL_auxz00_3481); } 
{ 
long BgL_iz00_3484;
BgL_iz00_3484 = 
(long)(BgL_auxz00_3451); 
BgL_iz00_3446 = BgL_iz00_3484; 
goto BgL_loopz00_3447;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzcfa_setupz00()
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
return BUNSPEC;} 
}



/* set-initial-approx! */
BGL_EXPORTED_DEF obj_t BGl_setzd2initialzd2approxz12z12zzcfa_setupz00(obj_t BgL_globalsz00_1)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 36 */
{ 
obj_t BgL_l4537z00_1067;
{ /* ./Cfa/setup.scm 37 */
bool_t BgL_auxz00_3486;
BgL_l4537z00_1067 = BgL_globalsz00_1; 
BgL_forzd2each4538zd2_1068:
{ /* ./Cfa/setup.scm 37 */
bool_t BgL_test4702z00_1069;
BgL_test4702z00_1069 = 
PAIRP(BgL_l4537z00_1067); 
if(BgL_test4702z00_1069)
{ /* ./Cfa/setup.scm 37 */
{ /* ./Cfa/setup.scm 38 */
obj_t BgL_globalz00_1070;
BgL_globalz00_1070 = 
CAR(BgL_l4537z00_1067); 
{ /* ./Cfa/setup.scm 40 */
BgL_valuez00_bglt BgL_funz00_1071;
{ /* ./Cfa/setup.scm 40 */
BgL_variablez00_bglt BgL_obj1120z00_2129;
BgL_obj1120z00_2129 = 
(BgL_variablez00_bglt)(BgL_globalz00_1070); 
BgL_funz00_1071 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_2129))->BgL_valuez00); } 
{ /* ./Cfa/setup.scm 41 */
BgL_funz00_bglt BgL_funz00_2130;
BgL_funz00_2130 = 
(BgL_funz00_bglt)(BgL_funz00_1071); 
{ /* ./Cfa/setup.scm 41 */
obj_t BgL_method4663z00_2132;
{ /* ./Cfa/setup.scm 41 */
BgL_objectz00_bglt BgL_objz00_2133;
BgL_objz00_2133 = 
(BgL_objectz00_bglt)(BgL_funz00_2130); 
{ /* ./Cfa/setup.scm 41 */
long BgL_objzd2classzd2numz00_2134;
BgL_objzd2classzd2numz00_2134 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2133); 
{ /* ./Cfa/setup.scm 41 */
obj_t BgL_arg2017z00_2135;
{ /* ./Cfa/setup.scm 41 */
int BgL_auxz00_3495;
BgL_auxz00_3495 = 
(int)(((long)1)); 
BgL_arg2017z00_2135 = 
PROCEDURE_REF(BGl_funzd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3495); } 
{ /* ./Cfa/setup.scm 41 */
int BgL_offsetz00_2138;
BgL_offsetz00_2138 = 
(int)(BgL_objzd2classzd2numz00_2134); 
{ /* ./Cfa/setup.scm 41 */
long BgL_offsetz00_2139;
{ /* ./Cfa/setup.scm 41 */
long BgL_auxz00_3499;
BgL_auxz00_3499 = 
(long)(BgL_offsetz00_2138); 
BgL_offsetz00_2139 = 
(BgL_auxz00_3499-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 41 */
long BgL_modz00_2140;
{ /* ./Cfa/setup.scm 41 */
int BgL_arg2028z00_2141;
BgL_arg2028z00_2141 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 41 */
long BgL_n2z00_2149;
BgL_n2z00_2149 = 
(long)(BgL_arg2028z00_2141); 
BgL_modz00_2140 = 
(BgL_offsetz00_2139/BgL_n2z00_2149); } } 
{ /* ./Cfa/setup.scm 41 */
long BgL_restz00_2142;
{ /* ./Cfa/setup.scm 41 */
int BgL_arg2024z00_2143;
BgL_arg2024z00_2143 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 41 */
long BgL_n2z00_2152;
BgL_n2z00_2152 = 
(long)(BgL_arg2024z00_2143); 
BgL_restz00_2142 = 
(BgL_offsetz00_2139%BgL_n2z00_2152); } } 
{ /* ./Cfa/setup.scm 41 */

{ /* ./Cfa/setup.scm 41 */
obj_t BgL_bucketz00_2144;
{ /* ./Cfa/setup.scm 41 */
int BgL_kz00_2154;
BgL_kz00_2154 = 
(int)(BgL_modz00_2140); 
BgL_bucketz00_2144 = 
VECTOR_REF(BgL_arg2017z00_2135,BgL_kz00_2154); } 
{ /* ./Cfa/setup.scm 41 */
int BgL_kz00_2156;
BgL_kz00_2156 = 
(int)(BgL_restz00_2142); 
BgL_method4663z00_2132 = 
VECTOR_REF(BgL_bucketz00_2144,BgL_kz00_2156); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4663z00_2132)(BgL_method4663z00_2132, 
(obj_t)(BgL_funz00_2130), BgL_globalz00_1070, BEOA); } } 
{ 
obj_t BgL_l4539z00_1072;
{ /* ./Cfa/setup.scm 46 */
obj_t BgL_arg4705z00_1074;
{ /* ./Cfa/setup.scm 46 */
BgL_sfunz00_bglt BgL_obj1389z00_2157;
BgL_obj1389z00_2157 = 
(BgL_sfunz00_bglt)(BgL_funz00_1071); 
BgL_arg4705z00_1074 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1389z00_2157))->BgL_argsz00); } 
BgL_l4539z00_1072 = BgL_arg4705z00_1074; 
BgL_forzd2each4540zd2_1073:
{ /* ./Cfa/setup.scm 42 */
bool_t BgL_test4708z00_1075;
BgL_test4708z00_1075 = 
PAIRP(BgL_l4539z00_1072); 
if(BgL_test4708z00_1075)
{ /* ./Cfa/setup.scm 42 */
{ /* ./Cfa/setup.scm 43 */
obj_t BgL_localz00_1076;
BgL_localz00_1076 = 
CAR(BgL_l4539z00_1072); 
{ /* ./Cfa/setup.scm 43 */
BgL_localz00_bglt BgL_obj4541z00_1077;
{ 
BgL_localz00_bglt BgL_auxz00_3520;
BgL_auxz00_3520 = 
(BgL_localz00_bglt)(BgL_localz00_1076); 
BgL_obj4541z00_1077 = 
((BgL_localz00_bglt)BgL_auxz00_3520); } 
{ /* ./Cfa/setup.scm 43 */
obj_t BgL_arg4710z00_1078;
BgL_arg4710z00_1078 = 
BGl_wideningzd2reshapedzd2localz00zzcfa_infoz00(BFALSE); 
{ /* ./Cfa/setup.scm 43 */
BgL_objectz00_bglt BgL_auxz00_3524;
BgL_auxz00_3524 = 
(BgL_objectz00_bglt)(BgL_obj4541z00_1077); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3524, BgL_arg4710z00_1078); } } 
{ /* ./Cfa/setup.scm 43 */
long BgL_arg4714z00_1079;
BgL_arg4714z00_1079 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2localzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 43 */
BgL_objectz00_bglt BgL_objz00_2160;
BgL_objz00_2160 = 
(BgL_objectz00_bglt)(BgL_obj4541z00_1077); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2160, BgL_arg4714z00_1079); } } 
{ /* ./Cfa/setup.scm 43 */
obj_t BgL_objz00_2162;
BgL_objz00_2162 = 
(obj_t)(BgL_obj4541z00_1077); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2162); BUNSPEC; } BgL_obj4541z00_1077; } 
{ /* ./Cfa/setup.scm 44 */
BgL_valuez00_bglt BgL_arg4719z00_1080;
{ /* ./Cfa/setup.scm 44 */
BgL_variablez00_bglt BgL_obj1120z00_2163;
BgL_obj1120z00_2163 = 
(BgL_variablez00_bglt)(BgL_localz00_1076); 
BgL_arg4719z00_1080 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_2163))->BgL_valuez00); } 
{ /* ./Cfa/setup.scm 44 */
BgL_variablez00_bglt BgL_variablez00_2165;
BgL_variablez00_2165 = 
(BgL_variablez00_bglt)(BgL_localz00_1076); 
{ /* ./Cfa/setup.scm 44 */
obj_t BgL_method4641z00_2166;
{ /* ./Cfa/setup.scm 44 */
BgL_objectz00_bglt BgL_objz00_2167;
BgL_objz00_2167 = 
(BgL_objectz00_bglt)(BgL_arg4719z00_1080); 
{ /* ./Cfa/setup.scm 44 */
long BgL_objzd2classzd2numz00_2168;
BgL_objzd2classzd2numz00_2168 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2167); 
{ /* ./Cfa/setup.scm 44 */
obj_t BgL_arg2017z00_2169;
{ /* ./Cfa/setup.scm 44 */
int BgL_auxz00_3537;
BgL_auxz00_3537 = 
(int)(((long)1)); 
BgL_arg2017z00_2169 = 
PROCEDURE_REF(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BgL_auxz00_3537); } 
{ /* ./Cfa/setup.scm 44 */
int BgL_offsetz00_2172;
BgL_offsetz00_2172 = 
(int)(BgL_objzd2classzd2numz00_2168); 
{ /* ./Cfa/setup.scm 44 */
long BgL_offsetz00_2173;
{ /* ./Cfa/setup.scm 44 */
long BgL_auxz00_3541;
BgL_auxz00_3541 = 
(long)(BgL_offsetz00_2172); 
BgL_offsetz00_2173 = 
(BgL_auxz00_3541-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 44 */
long BgL_modz00_2174;
{ /* ./Cfa/setup.scm 44 */
int BgL_arg2028z00_2175;
BgL_arg2028z00_2175 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 44 */
long BgL_n2z00_2183;
BgL_n2z00_2183 = 
(long)(BgL_arg2028z00_2175); 
BgL_modz00_2174 = 
(BgL_offsetz00_2173/BgL_n2z00_2183); } } 
{ /* ./Cfa/setup.scm 44 */
long BgL_restz00_2176;
{ /* ./Cfa/setup.scm 44 */
int BgL_arg2024z00_2177;
BgL_arg2024z00_2177 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 44 */
long BgL_n2z00_2186;
BgL_n2z00_2186 = 
(long)(BgL_arg2024z00_2177); 
BgL_restz00_2176 = 
(BgL_offsetz00_2173%BgL_n2z00_2186); } } 
{ /* ./Cfa/setup.scm 44 */

{ /* ./Cfa/setup.scm 44 */
obj_t BgL_bucketz00_2178;
{ /* ./Cfa/setup.scm 44 */
int BgL_kz00_2188;
BgL_kz00_2188 = 
(int)(BgL_modz00_2174); 
BgL_bucketz00_2178 = 
VECTOR_REF(BgL_arg2017z00_2169,BgL_kz00_2188); } 
{ /* ./Cfa/setup.scm 44 */
int BgL_kz00_2190;
BgL_kz00_2190 = 
(int)(BgL_restz00_2176); 
BgL_method4641z00_2166 = 
VECTOR_REF(BgL_bucketz00_2178,BgL_kz00_2190); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4641z00_2166)(BgL_method4641z00_2166, 
(obj_t)(BgL_arg4719z00_1080), 
(obj_t)(BgL_variablez00_2165), BEOA); } } } } 
{ /* ./Cfa/setup.scm 42 */
obj_t BgL_arg4724z00_1081;
BgL_arg4724z00_1081 = 
CDR(BgL_l4539z00_1072); 
{ 
obj_t BgL_l4539z00_3559;
BgL_l4539z00_3559 = BgL_arg4724z00_1081; 
BgL_l4539z00_1072 = BgL_l4539z00_3559; 
goto BgL_forzd2each4540zd2_1073;} } }  else 
{ /* ./Cfa/setup.scm 42 */((bool_t)1); } } } } } 
{ /* ./Cfa/setup.scm 47 */
obj_t BgL_arg4731z00_1082;
{ /* ./Cfa/setup.scm 47 */
BgL_sfunz00_bglt BgL_obj1392z00_2193;
{ /* ./Cfa/setup.scm 47 */
BgL_valuez00_bglt BgL_auxz00_3560;
{ /* ./Cfa/setup.scm 47 */
BgL_variablez00_bglt BgL_obj1120z00_2192;
BgL_obj1120z00_2192 = 
(BgL_variablez00_bglt)(BgL_globalz00_1070); 
BgL_auxz00_3560 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_2192))->BgL_valuez00); } 
BgL_obj1392z00_2193 = 
(BgL_sfunz00_bglt)(BgL_auxz00_3560); } 
BgL_arg4731z00_1082 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1392z00_2193))->BgL_bodyz00); } 
{ /* ./Cfa/setup.scm 47 */
BgL_nodez00_bglt BgL_nodez00_2194;
BgL_nodez00_2194 = 
(BgL_nodez00_bglt)(BgL_arg4731z00_1082); 
{ /* ./Cfa/setup.scm 47 */
obj_t BgL_method4631z00_2195;
{ /* ./Cfa/setup.scm 47 */
BgL_objectz00_bglt BgL_objz00_2196;
BgL_objz00_2196 = 
(BgL_objectz00_bglt)(BgL_nodez00_2194); 
{ /* ./Cfa/setup.scm 47 */
long BgL_objzd2classzd2numz00_2197;
BgL_objzd2classzd2numz00_2197 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2196); 
{ /* ./Cfa/setup.scm 47 */
obj_t BgL_arg2017z00_2198;
{ /* ./Cfa/setup.scm 47 */
int BgL_auxz00_3568;
BgL_auxz00_3568 = 
(int)(((long)1)); 
BgL_arg2017z00_2198 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3568); } 
{ /* ./Cfa/setup.scm 47 */
int BgL_offsetz00_2201;
BgL_offsetz00_2201 = 
(int)(BgL_objzd2classzd2numz00_2197); 
{ /* ./Cfa/setup.scm 47 */
long BgL_offsetz00_2202;
{ /* ./Cfa/setup.scm 47 */
long BgL_auxz00_3572;
BgL_auxz00_3572 = 
(long)(BgL_offsetz00_2201); 
BgL_offsetz00_2202 = 
(BgL_auxz00_3572-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 47 */
long BgL_modz00_2203;
{ /* ./Cfa/setup.scm 47 */
int BgL_arg2028z00_2204;
BgL_arg2028z00_2204 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 47 */
long BgL_n2z00_2212;
BgL_n2z00_2212 = 
(long)(BgL_arg2028z00_2204); 
BgL_modz00_2203 = 
(BgL_offsetz00_2202/BgL_n2z00_2212); } } 
{ /* ./Cfa/setup.scm 47 */
long BgL_restz00_2205;
{ /* ./Cfa/setup.scm 47 */
int BgL_arg2024z00_2206;
BgL_arg2024z00_2206 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 47 */
long BgL_n2z00_2215;
BgL_n2z00_2215 = 
(long)(BgL_arg2024z00_2206); 
BgL_restz00_2205 = 
(BgL_offsetz00_2202%BgL_n2z00_2215); } } 
{ /* ./Cfa/setup.scm 47 */

{ /* ./Cfa/setup.scm 47 */
obj_t BgL_bucketz00_2207;
{ /* ./Cfa/setup.scm 47 */
int BgL_kz00_2217;
BgL_kz00_2217 = 
(int)(BgL_modz00_2203); 
BgL_bucketz00_2207 = 
VECTOR_REF(BgL_arg2017z00_2198,BgL_kz00_2217); } 
{ /* ./Cfa/setup.scm 47 */
int BgL_kz00_2219;
BgL_kz00_2219 = 
(int)(BgL_restz00_2205); 
BgL_method4631z00_2195 = 
VECTOR_REF(BgL_bucketz00_2207,BgL_kz00_2219); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2195)(BgL_method4631z00_2195, 
(obj_t)(BgL_nodez00_2194), BEOA); } } } } 
{ /* ./Cfa/setup.scm 37 */
obj_t BgL_arg4739z00_1084;
BgL_arg4739z00_1084 = 
CDR(BgL_l4537z00_1067); 
{ 
obj_t BgL_l4537z00_3589;
BgL_l4537z00_3589 = BgL_arg4739z00_1084; 
BgL_l4537z00_1067 = BgL_l4537z00_3589; 
goto BgL_forzd2each4538zd2_1068;} } }  else 
{ /* ./Cfa/setup.scm 37 */
BgL_auxz00_3486 = ((bool_t)1); } } 
return 
BBOOL(BgL_auxz00_3486);} } } 
}



/* _set-initial-approx! */
obj_t BGl__setzd2initialzd2approxz12z12zzcfa_setupz00(obj_t BgL_envz00_3320, obj_t BgL_globalsz00_3321)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 36 */
return 
BGl_setzd2initialzd2approxz12z12zzcfa_setupz00(BgL_globalsz00_3321);} 
}



/* alloc-type? */
bool_t BGl_alloczd2typezf3z21zzcfa_setupz00(BgL_typez00_bglt BgL_typez00_8)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 97 */
{ /* ./Cfa/setup.scm 99 */
bool_t BgL_test4743z00_1085;
{ /* ./Cfa/setup.scm 99 */
obj_t BgL_auxz00_3592;
BgL_auxz00_3592 = 
(obj_t)(BgL_typez00_8); 
BgL_test4743z00_1085 = 
(BgL_auxz00_3592==BGl_za2vectorza2z00zztype_cachez00); } 
if(BgL_test4743z00_1085)
{ /* ./Cfa/setup.scm 99 */
return ((bool_t)1);}  else 
{ /* ./Cfa/setup.scm 101 */
bool_t BgL_test4744z00_1086;
{ /* ./Cfa/setup.scm 101 */
obj_t BgL_auxz00_3596;
BgL_auxz00_3596 = 
(obj_t)(BgL_typez00_8); 
BgL_test4744z00_1086 = 
(BgL_auxz00_3596==BGl_za2procedureza2z00zztype_cachez00); } 
if(BgL_test4744z00_1086)
{ /* ./Cfa/setup.scm 101 */
return ((bool_t)1);}  else 
{ /* ./Cfa/setup.scm 103 */
bool_t BgL_test4745z00_1087;
{ /* ./Cfa/setup.scm 103 */
obj_t BgL_auxz00_3600;
BgL_auxz00_3600 = 
(obj_t)(BgL_typez00_8); 
BgL_test4745z00_1087 = 
(BgL_auxz00_3600==BGl_za2structza2z00zztype_cachez00); } 
if(BgL_test4745z00_1087)
{ /* ./Cfa/setup.scm 103 */
return ((bool_t)1);}  else 
{ /* ./Cfa/setup.scm 103 */
return ((bool_t)0);} } } } } 
}



/* node-setup*! */
BGL_EXPORTED_DEF obj_t BGl_nodezd2setupza2z12z62zzcfa_setupz00(obj_t BgL_nodeza2za2_54)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 435 */
{ 
obj_t BgL_l4628z00_1088;
{ /* ./Cfa/setup.scm 436 */
bool_t BgL_auxz00_3604;
BgL_l4628z00_1088 = BgL_nodeza2za2_54; 
BgL_forzd2each4629zd2_1089:
{ /* ./Cfa/setup.scm 436 */
bool_t BgL_test4750z00_1090;
BgL_test4750z00_1090 = 
PAIRP(BgL_l4628z00_1088); 
if(BgL_test4750z00_1090)
{ /* ./Cfa/setup.scm 436 */
{ /* ./Cfa/setup.scm 436 */
obj_t BgL_arg4752z00_1091;
BgL_arg4752z00_1091 = 
CAR(BgL_l4628z00_1088); 
{ /* ./Cfa/setup.scm 436 */
BgL_nodez00_bglt BgL_nodez00_2223;
BgL_nodez00_2223 = 
(BgL_nodez00_bglt)(BgL_arg4752z00_1091); 
{ /* ./Cfa/setup.scm 436 */
obj_t BgL_method4631z00_2224;
{ /* ./Cfa/setup.scm 436 */
BgL_objectz00_bglt BgL_objz00_2225;
BgL_objz00_2225 = 
(BgL_objectz00_bglt)(BgL_nodez00_2223); 
{ /* ./Cfa/setup.scm 436 */
long BgL_objzd2classzd2numz00_2226;
BgL_objzd2classzd2numz00_2226 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2225); 
{ /* ./Cfa/setup.scm 436 */
obj_t BgL_arg2017z00_2227;
{ /* ./Cfa/setup.scm 436 */
int BgL_auxz00_3611;
BgL_auxz00_3611 = 
(int)(((long)1)); 
BgL_arg2017z00_2227 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3611); } 
{ /* ./Cfa/setup.scm 436 */
int BgL_offsetz00_2230;
BgL_offsetz00_2230 = 
(int)(BgL_objzd2classzd2numz00_2226); 
{ /* ./Cfa/setup.scm 436 */
long BgL_offsetz00_2231;
{ /* ./Cfa/setup.scm 436 */
long BgL_auxz00_3615;
BgL_auxz00_3615 = 
(long)(BgL_offsetz00_2230); 
BgL_offsetz00_2231 = 
(BgL_auxz00_3615-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 436 */
long BgL_modz00_2232;
{ /* ./Cfa/setup.scm 436 */
int BgL_arg2028z00_2233;
BgL_arg2028z00_2233 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 436 */
long BgL_n2z00_2241;
BgL_n2z00_2241 = 
(long)(BgL_arg2028z00_2233); 
BgL_modz00_2232 = 
(BgL_offsetz00_2231/BgL_n2z00_2241); } } 
{ /* ./Cfa/setup.scm 436 */
long BgL_restz00_2234;
{ /* ./Cfa/setup.scm 436 */
int BgL_arg2024z00_2235;
BgL_arg2024z00_2235 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 436 */
long BgL_n2z00_2244;
BgL_n2z00_2244 = 
(long)(BgL_arg2024z00_2235); 
BgL_restz00_2234 = 
(BgL_offsetz00_2231%BgL_n2z00_2244); } } 
{ /* ./Cfa/setup.scm 436 */

{ /* ./Cfa/setup.scm 436 */
obj_t BgL_bucketz00_2236;
{ /* ./Cfa/setup.scm 436 */
int BgL_kz00_2246;
BgL_kz00_2246 = 
(int)(BgL_modz00_2232); 
BgL_bucketz00_2236 = 
VECTOR_REF(BgL_arg2017z00_2227,BgL_kz00_2246); } 
{ /* ./Cfa/setup.scm 436 */
int BgL_kz00_2248;
BgL_kz00_2248 = 
(int)(BgL_restz00_2234); 
BgL_method4631z00_2224 = 
VECTOR_REF(BgL_bucketz00_2236,BgL_kz00_2248); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2224)(BgL_method4631z00_2224, 
(obj_t)(BgL_nodez00_2223), BEOA); } } } 
{ /* ./Cfa/setup.scm 436 */
obj_t BgL_arg4756z00_1092;
BgL_arg4756z00_1092 = 
CDR(BgL_l4628z00_1088); 
{ 
obj_t BgL_l4628z00_3632;
BgL_l4628z00_3632 = BgL_arg4756z00_1092; 
BgL_l4628z00_1088 = BgL_l4628z00_3632; 
goto BgL_forzd2each4629zd2_1089;} } }  else 
{ /* ./Cfa/setup.scm 436 */
BgL_auxz00_3604 = ((bool_t)1); } } 
return 
BBOOL(BgL_auxz00_3604);} } } 
}



/* _node-setup*! */
obj_t BGl__nodezd2setupza2z12z62zzcfa_setupz00(obj_t BgL_envz00_3330, obj_t BgL_nodeza2za2_3331)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 435 */
return 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_nodeza2za2_3331);} 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzcfa_setupz00()
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
BGl_addzd2genericz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_nodezd2setupz12zd2default4630zd2envzc0zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_atomz00zzast_nodez00, BGl_proc7438z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_kwotez00zzast_nodez00, BGl_proc7439z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_kwotezf2nodezf2zzcfa_infoz00, BGl_proc7440z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_varz00zzast_nodez00, BGl_proc7441z00zzcfa_setupz00); 
BGl_addzd2genericz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_variablezd2valuezd2setupz12zd2default4640zd2envz12zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_sfunz00zzast_varz00, BGl_proc7442z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_svarz00zzast_varz00, BGl_proc7443z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_prezd2clozd2envz00zzcfa_infoz00, BGl_proc7444z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_sexitz00zzast_varz00, BGl_proc7445z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_scnstzf2Cinfozf2zzcfa_infoz00, BGl_proc7446z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_scnstz00zzast_varz00, BGl_proc7447z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_cvarz00zzast_varz00, BGl_proc7448z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_closurez00zzast_nodez00, BGl_proc7449z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_sequencez00zzast_nodez00, BGl_proc7450z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_appz00zzast_nodez00, BGl_proc7451z00zzcfa_setupz00); 
BGl_addzd2genericz12zc0zz__objectz00(BGl_funzd2setupz12zd2envz12zzcfa_setupz00, BGl_funzd2setupz12zd2default4662zd2envzc0zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_funzd2setupz12zd2envz12zzcfa_setupz00, BGl_sfunz00zzast_varz00, BGl_proc7452z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_funzd2setupz12zd2envz12zzcfa_setupz00, BGl_cfunz00zzast_varz00, BGl_proc7453z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc7454z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_funcallz00zzast_nodez00, BGl_proc7455z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_pragmaz00zzast_nodez00, BGl_proc7456z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_getfieldz00zzast_nodez00, BGl_proc7457z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_setfieldz00zzast_nodez00, BGl_proc7458z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_newz00zzast_nodez00, BGl_proc7459z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_isaz00zzast_nodez00, BGl_proc7460z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_castz00zzast_nodez00, BGl_proc7461z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_setqz00zzast_nodez00, BGl_proc7462z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_conditionalz00zzast_nodez00, BGl_proc7463z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_failz00zzast_nodez00, BGl_proc7464z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_selectz00zzast_nodez00, BGl_proc7465z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc7466z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc7467z00zzcfa_setupz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc7468z00zzcfa_setupz00); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc7469z00zzcfa_setupz00);} 
}



/* node-setup!-jump-ex-it4700 */
obj_t BGl_nodezd2setupz12zd2jumpzd2exzd2it4700z12zzcfa_setupz00(obj_t BgL_envz00_3364, obj_t BgL_nodez00_3365)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 424 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_nodez00_2105;
BgL_nodez00_2105 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_nodez00_3365); 
{ /* ./Cfa/setup.scm 426 */
BgL_nodez00_bglt BgL_arg6527z00_2109;
BgL_arg6527z00_2109 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_2105))->BgL_exitz00); 
{ /* ./Cfa/setup.scm 426 */
obj_t BgL_method4631z00_3178;
{ /* ./Cfa/setup.scm 426 */
BgL_objectz00_bglt BgL_objz00_3179;
BgL_objz00_3179 = 
(BgL_objectz00_bglt)(BgL_arg6527z00_2109); 
{ /* ./Cfa/setup.scm 426 */
long BgL_objzd2classzd2numz00_3180;
BgL_objzd2classzd2numz00_3180 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3179); 
{ /* ./Cfa/setup.scm 426 */
obj_t BgL_arg2017z00_3181;
{ /* ./Cfa/setup.scm 426 */
int BgL_auxz00_3673;
BgL_auxz00_3673 = 
(int)(((long)1)); 
BgL_arg2017z00_3181 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3673); } 
{ /* ./Cfa/setup.scm 426 */
int BgL_offsetz00_3184;
BgL_offsetz00_3184 = 
(int)(BgL_objzd2classzd2numz00_3180); 
{ /* ./Cfa/setup.scm 426 */
long BgL_offsetz00_3185;
{ /* ./Cfa/setup.scm 426 */
long BgL_auxz00_3677;
BgL_auxz00_3677 = 
(long)(BgL_offsetz00_3184); 
BgL_offsetz00_3185 = 
(BgL_auxz00_3677-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 426 */
long BgL_modz00_3186;
{ /* ./Cfa/setup.scm 426 */
int BgL_arg2028z00_3187;
BgL_arg2028z00_3187 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 426 */
long BgL_n2z00_3195;
BgL_n2z00_3195 = 
(long)(BgL_arg2028z00_3187); 
BgL_modz00_3186 = 
(BgL_offsetz00_3185/BgL_n2z00_3195); } } 
{ /* ./Cfa/setup.scm 426 */
long BgL_restz00_3188;
{ /* ./Cfa/setup.scm 426 */
int BgL_arg2024z00_3189;
BgL_arg2024z00_3189 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 426 */
long BgL_n2z00_3198;
BgL_n2z00_3198 = 
(long)(BgL_arg2024z00_3189); 
BgL_restz00_3188 = 
(BgL_offsetz00_3185%BgL_n2z00_3198); } } 
{ /* ./Cfa/setup.scm 426 */

{ /* ./Cfa/setup.scm 426 */
obj_t BgL_bucketz00_3190;
{ /* ./Cfa/setup.scm 426 */
int BgL_kz00_3200;
BgL_kz00_3200 = 
(int)(BgL_modz00_3186); 
BgL_bucketz00_3190 = 
VECTOR_REF(BgL_arg2017z00_3181,BgL_kz00_3200); } 
{ /* ./Cfa/setup.scm 426 */
int BgL_kz00_3202;
BgL_kz00_3202 = 
(int)(BgL_restz00_3188); 
BgL_method4631z00_3178 = 
VECTOR_REF(BgL_bucketz00_3190,BgL_kz00_3202); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_3178)(BgL_method4631z00_3178, 
(obj_t)(BgL_arg6527z00_2109), BEOA); } } 
{ /* ./Cfa/setup.scm 427 */
BgL_nodez00_bglt BgL_arg6531z00_2110;
BgL_arg6531z00_2110 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_2105))->BgL_valuez00); 
{ /* ./Cfa/setup.scm 427 */
obj_t BgL_method4631z00_3205;
{ /* ./Cfa/setup.scm 427 */
BgL_objectz00_bglt BgL_objz00_3206;
BgL_objz00_3206 = 
(BgL_objectz00_bglt)(BgL_arg6531z00_2110); 
{ /* ./Cfa/setup.scm 427 */
long BgL_objzd2classzd2numz00_3207;
BgL_objzd2classzd2numz00_3207 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3206); 
{ /* ./Cfa/setup.scm 427 */
obj_t BgL_arg2017z00_3208;
{ /* ./Cfa/setup.scm 427 */
int BgL_auxz00_3696;
BgL_auxz00_3696 = 
(int)(((long)1)); 
BgL_arg2017z00_3208 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3696); } 
{ /* ./Cfa/setup.scm 427 */
int BgL_offsetz00_3211;
BgL_offsetz00_3211 = 
(int)(BgL_objzd2classzd2numz00_3207); 
{ /* ./Cfa/setup.scm 427 */
long BgL_offsetz00_3212;
{ /* ./Cfa/setup.scm 427 */
long BgL_auxz00_3700;
BgL_auxz00_3700 = 
(long)(BgL_offsetz00_3211); 
BgL_offsetz00_3212 = 
(BgL_auxz00_3700-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 427 */
long BgL_modz00_3213;
{ /* ./Cfa/setup.scm 427 */
int BgL_arg2028z00_3214;
BgL_arg2028z00_3214 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 427 */
long BgL_n2z00_3222;
BgL_n2z00_3222 = 
(long)(BgL_arg2028z00_3214); 
BgL_modz00_3213 = 
(BgL_offsetz00_3212/BgL_n2z00_3222); } } 
{ /* ./Cfa/setup.scm 427 */
long BgL_restz00_3215;
{ /* ./Cfa/setup.scm 427 */
int BgL_arg2024z00_3216;
BgL_arg2024z00_3216 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 427 */
long BgL_n2z00_3225;
BgL_n2z00_3225 = 
(long)(BgL_arg2024z00_3216); 
BgL_restz00_3215 = 
(BgL_offsetz00_3212%BgL_n2z00_3225); } } 
{ /* ./Cfa/setup.scm 427 */

{ /* ./Cfa/setup.scm 427 */
obj_t BgL_bucketz00_3217;
{ /* ./Cfa/setup.scm 427 */
int BgL_kz00_3227;
BgL_kz00_3227 = 
(int)(BgL_modz00_3213); 
BgL_bucketz00_3217 = 
VECTOR_REF(BgL_arg2017z00_3208,BgL_kz00_3227); } 
{ /* ./Cfa/setup.scm 427 */
int BgL_kz00_3229;
BgL_kz00_3229 = 
(int)(BgL_restz00_3215); 
BgL_method4631z00_3205 = 
VECTOR_REF(BgL_bucketz00_3217,BgL_kz00_3229); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_3205)(BgL_method4631z00_3205, 
(obj_t)(BgL_arg6531z00_2110), BEOA); } } 
{ /* ./Cfa/setup.scm 428 */
BgL_jumpzd2exzd2itz00_bglt BgL_obj4627z00_2111;
BgL_obj4627z00_2111 = 
((BgL_jumpzd2exzd2itz00_bglt)BgL_nodez00_2105); 
{ /* ./Cfa/setup.scm 429 */
obj_t BgL_arg6535z00_2112;
{ /* ./Cfa/setup.scm 429 */
BgL_approxz00_bglt BgL_arg6538z00_2113;
BgL_arg6538z00_2113 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00)); 
BgL_arg6535z00_2112 = 
BGl_wideningzd2jumpzd2exzd2itzf2Cinfoz20zzcfa_infoz00(BgL_arg6538z00_2113); } 
{ /* ./Cfa/setup.scm 428 */
BgL_objectz00_bglt BgL_auxz00_3720;
BgL_auxz00_3720 = 
(BgL_objectz00_bglt)(BgL_obj4627z00_2111); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3720, BgL_arg6535z00_2112); } } 
{ /* ./Cfa/setup.scm 428 */
long BgL_arg6542z00_2114;
BgL_arg6542z00_2114 = 
BGl_classzd2numzd2zz__objectz00(BGl_jumpzd2exzd2itzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 428 */
BgL_objectz00_bglt BgL_objz00_3230;
BgL_objz00_3230 = 
(BgL_objectz00_bglt)(BgL_obj4627z00_2111); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3230, BgL_arg6542z00_2114); } } 
{ /* ./Cfa/setup.scm 428 */
obj_t BgL_objz00_3232;
BgL_objz00_3232 = 
(obj_t)(BgL_obj4627z00_2111); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3232); BUNSPEC; } BgL_obj4627z00_2111; } 
{ /* ./Cfa/setup.scm 430 */
BgL_approxz00_bglt BgL_arg6547z00_2115;
{ /* ./Cfa/setup.scm 430 */
BgL_jumpzd2exzd2itzf2cinfozf2_bglt BgL_obj3333z00_3233;
BgL_obj3333z00_3233 = 
(BgL_jumpzd2exzd2itzf2cinfozf2_bglt)(BgL_nodez00_2105); 
{ 
obj_t BgL_auxz00_3729;
{ /* ./Cfa/setup.scm 430 */
BgL_objectz00_bglt BgL_auxz00_3730;
BgL_auxz00_3730 = 
(BgL_objectz00_bglt)(BgL_obj3333z00_3233); 
BgL_auxz00_3729 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3730); } 
BgL_arg6547z00_2115 = 
(((BgL_jumpzd2exzd2itzf2cinfozf2_bglt)CREF(BgL_auxz00_3729))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6547z00_2115);} } } 
}



/* node-setup!-set-ex-it4698 */
obj_t BGl_nodezd2setupz12zd2setzd2exzd2it4698z12zzcfa_setupz00(obj_t BgL_envz00_3366, obj_t BgL_nodez00_3367)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 412 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_nodez00_2088;
BgL_nodez00_2088 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_nodez00_3367); 
{ /* ./Cfa/setup.scm 414 */
BgL_nodez00_bglt BgL_arg6484z00_2092;
BgL_arg6484z00_2092 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_nodez00_2088))->BgL_bodyz00); 
{ /* ./Cfa/setup.scm 414 */
obj_t BgL_method4631z00_3115;
{ /* ./Cfa/setup.scm 414 */
BgL_objectz00_bglt BgL_objz00_3116;
BgL_objz00_3116 = 
(BgL_objectz00_bglt)(BgL_arg6484z00_2092); 
{ /* ./Cfa/setup.scm 414 */
long BgL_objzd2classzd2numz00_3117;
BgL_objzd2classzd2numz00_3117 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3116); 
{ /* ./Cfa/setup.scm 414 */
obj_t BgL_arg2017z00_3118;
{ /* ./Cfa/setup.scm 414 */
int BgL_auxz00_3739;
BgL_auxz00_3739 = 
(int)(((long)1)); 
BgL_arg2017z00_3118 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3739); } 
{ /* ./Cfa/setup.scm 414 */
int BgL_offsetz00_3121;
BgL_offsetz00_3121 = 
(int)(BgL_objzd2classzd2numz00_3117); 
{ /* ./Cfa/setup.scm 414 */
long BgL_offsetz00_3122;
{ /* ./Cfa/setup.scm 414 */
long BgL_auxz00_3743;
BgL_auxz00_3743 = 
(long)(BgL_offsetz00_3121); 
BgL_offsetz00_3122 = 
(BgL_auxz00_3743-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 414 */
long BgL_modz00_3123;
{ /* ./Cfa/setup.scm 414 */
int BgL_arg2028z00_3124;
BgL_arg2028z00_3124 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 414 */
long BgL_n2z00_3132;
BgL_n2z00_3132 = 
(long)(BgL_arg2028z00_3124); 
BgL_modz00_3123 = 
(BgL_offsetz00_3122/BgL_n2z00_3132); } } 
{ /* ./Cfa/setup.scm 414 */
long BgL_restz00_3125;
{ /* ./Cfa/setup.scm 414 */
int BgL_arg2024z00_3126;
BgL_arg2024z00_3126 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 414 */
long BgL_n2z00_3135;
BgL_n2z00_3135 = 
(long)(BgL_arg2024z00_3126); 
BgL_restz00_3125 = 
(BgL_offsetz00_3122%BgL_n2z00_3135); } } 
{ /* ./Cfa/setup.scm 414 */

{ /* ./Cfa/setup.scm 414 */
obj_t BgL_bucketz00_3127;
{ /* ./Cfa/setup.scm 414 */
int BgL_kz00_3137;
BgL_kz00_3137 = 
(int)(BgL_modz00_3123); 
BgL_bucketz00_3127 = 
VECTOR_REF(BgL_arg2017z00_3118,BgL_kz00_3137); } 
{ /* ./Cfa/setup.scm 414 */
int BgL_kz00_3139;
BgL_kz00_3139 = 
(int)(BgL_restz00_3125); 
BgL_method4631z00_3115 = 
VECTOR_REF(BgL_bucketz00_3127,BgL_kz00_3139); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_3115)(BgL_method4631z00_3115, 
(obj_t)(BgL_arg6484z00_2092), BEOA); } } 
{ /* ./Cfa/setup.scm 415 */
BgL_varz00_bglt BgL_arg6488z00_2093;
BgL_arg6488z00_2093 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_nodez00_2088))->BgL_varz00); 
{ /* ./Cfa/setup.scm 415 */
BgL_nodez00_bglt BgL_nodez00_3141;
BgL_nodez00_3141 = 
(BgL_nodez00_bglt)(BgL_arg6488z00_2093); 
{ /* ./Cfa/setup.scm 415 */
obj_t BgL_method4631z00_3142;
{ /* ./Cfa/setup.scm 415 */
BgL_objectz00_bglt BgL_objz00_3143;
BgL_objz00_3143 = 
(BgL_objectz00_bglt)(BgL_nodez00_3141); 
{ /* ./Cfa/setup.scm 415 */
long BgL_objzd2classzd2numz00_3144;
BgL_objzd2classzd2numz00_3144 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3143); 
{ /* ./Cfa/setup.scm 415 */
obj_t BgL_arg2017z00_3145;
{ /* ./Cfa/setup.scm 415 */
int BgL_auxz00_3763;
BgL_auxz00_3763 = 
(int)(((long)1)); 
BgL_arg2017z00_3145 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3763); } 
{ /* ./Cfa/setup.scm 415 */
int BgL_offsetz00_3148;
BgL_offsetz00_3148 = 
(int)(BgL_objzd2classzd2numz00_3144); 
{ /* ./Cfa/setup.scm 415 */
long BgL_offsetz00_3149;
{ /* ./Cfa/setup.scm 415 */
long BgL_auxz00_3767;
BgL_auxz00_3767 = 
(long)(BgL_offsetz00_3148); 
BgL_offsetz00_3149 = 
(BgL_auxz00_3767-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 415 */
long BgL_modz00_3150;
{ /* ./Cfa/setup.scm 415 */
int BgL_arg2028z00_3151;
BgL_arg2028z00_3151 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 415 */
long BgL_n2z00_3159;
BgL_n2z00_3159 = 
(long)(BgL_arg2028z00_3151); 
BgL_modz00_3150 = 
(BgL_offsetz00_3149/BgL_n2z00_3159); } } 
{ /* ./Cfa/setup.scm 415 */
long BgL_restz00_3152;
{ /* ./Cfa/setup.scm 415 */
int BgL_arg2024z00_3153;
BgL_arg2024z00_3153 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 415 */
long BgL_n2z00_3162;
BgL_n2z00_3162 = 
(long)(BgL_arg2024z00_3153); 
BgL_restz00_3152 = 
(BgL_offsetz00_3149%BgL_n2z00_3162); } } 
{ /* ./Cfa/setup.scm 415 */

{ /* ./Cfa/setup.scm 415 */
obj_t BgL_bucketz00_3154;
{ /* ./Cfa/setup.scm 415 */
int BgL_kz00_3164;
BgL_kz00_3164 = 
(int)(BgL_modz00_3150); 
BgL_bucketz00_3154 = 
VECTOR_REF(BgL_arg2017z00_3145,BgL_kz00_3164); } 
{ /* ./Cfa/setup.scm 415 */
int BgL_kz00_3166;
BgL_kz00_3166 = 
(int)(BgL_restz00_3152); 
BgL_method4631z00_3142 = 
VECTOR_REF(BgL_bucketz00_3154,BgL_kz00_3166); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_3142)(BgL_method4631z00_3142, 
(obj_t)(BgL_nodez00_3141), BEOA); } } } 
{ /* ./Cfa/setup.scm 416 */
BgL_localz00_bglt BgL_obj4623z00_2094;
{ 
BgL_localz00_bglt BgL_auxz00_3783;
{ /* ./Cfa/setup.scm 416 */
BgL_varz00_bglt BgL_arg6501z00_2097;
BgL_arg6501z00_2097 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_nodez00_2088))->BgL_varz00); 
{ /* ./Cfa/setup.scm 416 */
BgL_variablez00_bglt BgL_auxz00_3785;
BgL_auxz00_3785 = 
(((BgL_varz00_bglt)CREF(BgL_arg6501z00_2097))->BgL_variablez00); 
BgL_auxz00_3783 = 
(BgL_localz00_bglt)(BgL_auxz00_3785); } } 
BgL_obj4623z00_2094 = 
((BgL_localz00_bglt)BgL_auxz00_3783); } 
{ /* ./Cfa/setup.scm 416 */
obj_t BgL_arg6492z00_2095;
BgL_arg6492z00_2095 = 
BGl_wideningzd2reshapedzd2localz00zzcfa_infoz00(BFALSE); 
{ /* ./Cfa/setup.scm 416 */
BgL_objectz00_bglt BgL_auxz00_3790;
BgL_auxz00_3790 = 
(BgL_objectz00_bglt)(BgL_obj4623z00_2094); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3790, BgL_arg6492z00_2095); } } 
{ /* ./Cfa/setup.scm 416 */
long BgL_arg6496z00_2096;
BgL_arg6496z00_2096 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2localzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 416 */
BgL_objectz00_bglt BgL_objz00_3169;
BgL_objz00_3169 = 
(BgL_objectz00_bglt)(BgL_obj4623z00_2094); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3169, BgL_arg6496z00_2096); } } 
{ /* ./Cfa/setup.scm 416 */
obj_t BgL_objz00_3171;
BgL_objz00_3171 = 
(obj_t)(BgL_obj4623z00_2094); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3171); BUNSPEC; } BgL_obj4623z00_2094; } 
{ /* ./Cfa/setup.scm 417 */
BgL_setzd2exzd2itz00_bglt BgL_obj4624z00_2098;
BgL_obj4624z00_2098 = 
((BgL_setzd2exzd2itz00_bglt)BgL_nodez00_2088); 
{ /* ./Cfa/setup.scm 418 */
obj_t BgL_arg6505z00_2099;
{ /* ./Cfa/setup.scm 418 */
BgL_approxz00_bglt BgL_arg6508z00_2100;
BgL_arg6508z00_2100 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00)); 
BgL_arg6505z00_2099 = 
BGl_wideningzd2setzd2exzd2itzf2Cinfoz20zzcfa_infoz00(BgL_arg6508z00_2100); } 
{ /* ./Cfa/setup.scm 417 */
BgL_objectz00_bglt BgL_auxz00_3802;
BgL_auxz00_3802 = 
(BgL_objectz00_bglt)(BgL_obj4624z00_2098); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3802, BgL_arg6505z00_2099); } } 
{ /* ./Cfa/setup.scm 417 */
long BgL_arg6512z00_2101;
BgL_arg6512z00_2101 = 
BGl_classzd2numzd2zz__objectz00(BGl_setzd2exzd2itzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 417 */
BgL_objectz00_bglt BgL_objz00_3172;
BgL_objz00_3172 = 
(BgL_objectz00_bglt)(BgL_obj4624z00_2098); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3172, BgL_arg6512z00_2101); } } 
{ /* ./Cfa/setup.scm 417 */
obj_t BgL_objz00_3174;
BgL_objz00_3174 = 
(obj_t)(BgL_obj4624z00_2098); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3174); BUNSPEC; } BgL_obj4624z00_2098; } 
{ /* ./Cfa/setup.scm 419 */
BgL_approxz00_bglt BgL_arg6517z00_2102;
{ /* ./Cfa/setup.scm 419 */
BgL_setzd2exzd2itzf2cinfozf2_bglt BgL_obj3310z00_3175;
BgL_obj3310z00_3175 = 
(BgL_setzd2exzd2itzf2cinfozf2_bglt)(BgL_nodez00_2088); 
{ 
obj_t BgL_auxz00_3811;
{ /* ./Cfa/setup.scm 419 */
BgL_objectz00_bglt BgL_auxz00_3812;
BgL_auxz00_3812 = 
(BgL_objectz00_bglt)(BgL_obj3310z00_3175); 
BgL_auxz00_3811 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3812); } 
BgL_arg6517z00_2102 = 
(((BgL_setzd2exzd2itzf2cinfozf2_bglt)CREF(BgL_auxz00_3811))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6517z00_2102);} } } 
}



/* node-setup!-let-var4696 */
obj_t BGl_nodezd2setupz12zd2letzd2var4696zc0zzcfa_setupz00(obj_t BgL_envz00_3368, obj_t BgL_nodez00_3369)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 387 */
{ 
BgL_letzd2varzd2_bglt BgL_nodez00_2065;
BgL_nodez00_2065 = 
(BgL_letzd2varzd2_bglt)(BgL_nodez00_3369); 
{ 
obj_t BgL_l4618z00_2069;
{ /* ./Cfa/setup.scm 390 */
obj_t BgL_arg6439z00_2071;
BgL_arg6439z00_2071 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_2065))->BgL_bindingsz00); 
BgL_l4618z00_2069 = BgL_arg6439z00_2071; 
BgL_forzd2each4619zd2_2070:
{ /* ./Cfa/setup.scm 390 */
bool_t BgL_test6442z00_2072;
BgL_test6442z00_2072 = 
PAIRP(BgL_l4618z00_2069); 
if(BgL_test6442z00_2072)
{ /* ./Cfa/setup.scm 390 */
{ /* ./Cfa/setup.scm 391 */
obj_t BgL_bindingz00_2073;
BgL_bindingz00_2073 = 
CAR(BgL_l4618z00_2069); 
{ /* ./Cfa/setup.scm 391 */
obj_t BgL_varz00_2074;obj_t BgL_valz00_2075;
BgL_varz00_2074 = 
CAR(BgL_bindingz00_2073); 
BgL_valz00_2075 = 
CDR(BgL_bindingz00_2073); 
{ /* ./Cfa/setup.scm 393 */
BgL_valuez00_bglt BgL_arg6444z00_2076;
{ /* ./Cfa/setup.scm 393 */
BgL_variablez00_bglt BgL_obj1120z00_3027;
BgL_obj1120z00_3027 = 
(BgL_variablez00_bglt)(BgL_varz00_2074); 
BgL_arg6444z00_2076 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_3027))->BgL_valuez00); } 
{ /* ./Cfa/setup.scm 393 */
BgL_variablez00_bglt BgL_variablez00_3029;
BgL_variablez00_3029 = 
(BgL_variablez00_bglt)(BgL_varz00_2074); 
{ /* ./Cfa/setup.scm 393 */
obj_t BgL_method4641z00_3030;
{ /* ./Cfa/setup.scm 393 */
BgL_objectz00_bglt BgL_objz00_3031;
BgL_objz00_3031 = 
(BgL_objectz00_bglt)(BgL_arg6444z00_2076); 
{ /* ./Cfa/setup.scm 393 */
long BgL_objzd2classzd2numz00_3032;
BgL_objzd2classzd2numz00_3032 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3031); 
{ /* ./Cfa/setup.scm 393 */
obj_t BgL_arg2017z00_3033;
{ /* ./Cfa/setup.scm 393 */
int BgL_auxz00_3829;
BgL_auxz00_3829 = 
(int)(((long)1)); 
BgL_arg2017z00_3033 = 
PROCEDURE_REF(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BgL_auxz00_3829); } 
{ /* ./Cfa/setup.scm 393 */
int BgL_offsetz00_3036;
BgL_offsetz00_3036 = 
(int)(BgL_objzd2classzd2numz00_3032); 
{ /* ./Cfa/setup.scm 393 */
long BgL_offsetz00_3037;
{ /* ./Cfa/setup.scm 393 */
long BgL_auxz00_3833;
BgL_auxz00_3833 = 
(long)(BgL_offsetz00_3036); 
BgL_offsetz00_3037 = 
(BgL_auxz00_3833-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 393 */
long BgL_modz00_3038;
{ /* ./Cfa/setup.scm 393 */
int BgL_arg2028z00_3039;
BgL_arg2028z00_3039 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 393 */
long BgL_n2z00_3047;
BgL_n2z00_3047 = 
(long)(BgL_arg2028z00_3039); 
BgL_modz00_3038 = 
(BgL_offsetz00_3037/BgL_n2z00_3047); } } 
{ /* ./Cfa/setup.scm 393 */
long BgL_restz00_3040;
{ /* ./Cfa/setup.scm 393 */
int BgL_arg2024z00_3041;
BgL_arg2024z00_3041 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 393 */
long BgL_n2z00_3050;
BgL_n2z00_3050 = 
(long)(BgL_arg2024z00_3041); 
BgL_restz00_3040 = 
(BgL_offsetz00_3037%BgL_n2z00_3050); } } 
{ /* ./Cfa/setup.scm 393 */

{ /* ./Cfa/setup.scm 393 */
obj_t BgL_bucketz00_3042;
{ /* ./Cfa/setup.scm 393 */
int BgL_kz00_3052;
BgL_kz00_3052 = 
(int)(BgL_modz00_3038); 
BgL_bucketz00_3042 = 
VECTOR_REF(BgL_arg2017z00_3033,BgL_kz00_3052); } 
{ /* ./Cfa/setup.scm 393 */
int BgL_kz00_3054;
BgL_kz00_3054 = 
(int)(BgL_restz00_3040); 
BgL_method4641z00_3030 = 
VECTOR_REF(BgL_bucketz00_3042,BgL_kz00_3054); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4641z00_3030)(BgL_method4641z00_3030, 
(obj_t)(BgL_arg6444z00_2076), 
(obj_t)(BgL_variablez00_3029), BEOA); } } } 
{ /* ./Cfa/setup.scm 397 */
BgL_nodez00_bglt BgL_nodez00_3055;
BgL_nodez00_3055 = 
(BgL_nodez00_bglt)(BgL_valz00_2075); 
{ /* ./Cfa/setup.scm 397 */
obj_t BgL_method4631z00_3056;
{ /* ./Cfa/setup.scm 397 */
BgL_objectz00_bglt BgL_objz00_3057;
BgL_objz00_3057 = 
(BgL_objectz00_bglt)(BgL_nodez00_3055); 
{ /* ./Cfa/setup.scm 397 */
long BgL_objzd2classzd2numz00_3058;
BgL_objzd2classzd2numz00_3058 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3057); 
{ /* ./Cfa/setup.scm 397 */
obj_t BgL_arg2017z00_3059;
{ /* ./Cfa/setup.scm 397 */
int BgL_auxz00_3853;
BgL_auxz00_3853 = 
(int)(((long)1)); 
BgL_arg2017z00_3059 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3853); } 
{ /* ./Cfa/setup.scm 397 */
int BgL_offsetz00_3062;
BgL_offsetz00_3062 = 
(int)(BgL_objzd2classzd2numz00_3058); 
{ /* ./Cfa/setup.scm 397 */
long BgL_offsetz00_3063;
{ /* ./Cfa/setup.scm 397 */
long BgL_auxz00_3857;
BgL_auxz00_3857 = 
(long)(BgL_offsetz00_3062); 
BgL_offsetz00_3063 = 
(BgL_auxz00_3857-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 397 */
long BgL_modz00_3064;
{ /* ./Cfa/setup.scm 397 */
int BgL_arg2028z00_3065;
BgL_arg2028z00_3065 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 397 */
long BgL_n2z00_3073;
BgL_n2z00_3073 = 
(long)(BgL_arg2028z00_3065); 
BgL_modz00_3064 = 
(BgL_offsetz00_3063/BgL_n2z00_3073); } } 
{ /* ./Cfa/setup.scm 397 */
long BgL_restz00_3066;
{ /* ./Cfa/setup.scm 397 */
int BgL_arg2024z00_3067;
BgL_arg2024z00_3067 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 397 */
long BgL_n2z00_3076;
BgL_n2z00_3076 = 
(long)(BgL_arg2024z00_3067); 
BgL_restz00_3066 = 
(BgL_offsetz00_3063%BgL_n2z00_3076); } } 
{ /* ./Cfa/setup.scm 397 */

{ /* ./Cfa/setup.scm 397 */
obj_t BgL_bucketz00_3068;
{ /* ./Cfa/setup.scm 397 */
int BgL_kz00_3078;
BgL_kz00_3078 = 
(int)(BgL_modz00_3064); 
BgL_bucketz00_3068 = 
VECTOR_REF(BgL_arg2017z00_3059,BgL_kz00_3078); } 
{ /* ./Cfa/setup.scm 397 */
int BgL_kz00_3080;
BgL_kz00_3080 = 
(int)(BgL_restz00_3066); 
BgL_method4631z00_3056 = 
VECTOR_REF(BgL_bucketz00_3068,BgL_kz00_3080); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_3056)(BgL_method4631z00_3056, 
(obj_t)(BgL_nodez00_3055), BEOA); } } 
{ /* ./Cfa/setup.scm 398 */
BgL_localz00_bglt BgL_obj4620z00_2077;
{ 
BgL_localz00_bglt BgL_auxz00_3873;
BgL_auxz00_3873 = 
(BgL_localz00_bglt)(BgL_varz00_2074); 
BgL_obj4620z00_2077 = 
((BgL_localz00_bglt)BgL_auxz00_3873); } 
{ /* ./Cfa/setup.scm 399 */
obj_t BgL_arg6449z00_2078;
{ /* ./Cfa/setup.scm 399 */
obj_t BgL_arg6452z00_2079;
{ /* ./Cfa/setup.scm 399 */
bool_t BgL_testz00_3876;
{ /* ./Cfa/setup.scm 399 */
obj_t BgL_auxz00_3880;obj_t BgL_auxz00_3877;
BgL_auxz00_3880 = 
CNST_TABLE_REF(((long)0)); 
{ /* ./Cfa/setup.scm 399 */
BgL_variablez00_bglt BgL_obj1123z00_3081;
BgL_obj1123z00_3081 = 
(BgL_variablez00_bglt)(BgL_varz00_2074); 
BgL_auxz00_3877 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1123z00_3081))->BgL_accessz00); } 
BgL_testz00_3876 = 
(BgL_auxz00_3877==BgL_auxz00_3880); } 
if(BgL_testz00_3876)
{ /* ./Cfa/setup.scm 399 */
BgL_arg6452z00_2079 = BgL_valz00_2075; }  else 
{ /* ./Cfa/setup.scm 399 */
BgL_arg6452z00_2079 = BFALSE; } } 
BgL_arg6449z00_2078 = 
BGl_wideningzd2reshapedzd2localz00zzcfa_infoz00(BgL_arg6452z00_2079); } 
{ /* ./Cfa/setup.scm 398 */
BgL_objectz00_bglt BgL_auxz00_3884;
BgL_auxz00_3884 = 
(BgL_objectz00_bglt)(BgL_obj4620z00_2077); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3884, BgL_arg6449z00_2078); } } 
{ /* ./Cfa/setup.scm 398 */
long BgL_arg6461z00_2083;
BgL_arg6461z00_2083 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2localzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 398 */
BgL_objectz00_bglt BgL_objz00_3082;
BgL_objz00_3082 = 
(BgL_objectz00_bglt)(BgL_obj4620z00_2077); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3082, BgL_arg6461z00_2083); } } 
{ /* ./Cfa/setup.scm 398 */
obj_t BgL_objz00_3084;
BgL_objz00_3084 = 
(obj_t)(BgL_obj4620z00_2077); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3084); BUNSPEC; } BgL_obj4620z00_2077; } BNIL; } } 
{ /* ./Cfa/setup.scm 390 */
obj_t BgL_arg6469z00_2084;
BgL_arg6469z00_2084 = 
CDR(BgL_l4618z00_2069); 
{ 
obj_t BgL_l4618z00_3893;
BgL_l4618z00_3893 = BgL_arg6469z00_2084; 
BgL_l4618z00_2069 = BgL_l4618z00_3893; 
goto BgL_forzd2each4619zd2_2070;} } }  else 
{ /* ./Cfa/setup.scm 390 */((bool_t)1); } } } } 
{ /* ./Cfa/setup.scm 407 */
BgL_nodez00_bglt BgL_arg6474z00_2085;
BgL_arg6474z00_2085 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_2065))->BgL_bodyz00); 
{ /* ./Cfa/setup.scm 407 */
obj_t BgL_method4631z00_3088;
{ /* ./Cfa/setup.scm 407 */
BgL_objectz00_bglt BgL_objz00_3089;
BgL_objz00_3089 = 
(BgL_objectz00_bglt)(BgL_arg6474z00_2085); 
{ /* ./Cfa/setup.scm 407 */
long BgL_objzd2classzd2numz00_3090;
BgL_objzd2classzd2numz00_3090 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3089); 
{ /* ./Cfa/setup.scm 407 */
obj_t BgL_arg2017z00_3091;
{ /* ./Cfa/setup.scm 407 */
int BgL_auxz00_3897;
BgL_auxz00_3897 = 
(int)(((long)1)); 
BgL_arg2017z00_3091 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3897); } 
{ /* ./Cfa/setup.scm 407 */
int BgL_offsetz00_3094;
BgL_offsetz00_3094 = 
(int)(BgL_objzd2classzd2numz00_3090); 
{ /* ./Cfa/setup.scm 407 */
long BgL_offsetz00_3095;
{ /* ./Cfa/setup.scm 407 */
long BgL_auxz00_3901;
BgL_auxz00_3901 = 
(long)(BgL_offsetz00_3094); 
BgL_offsetz00_3095 = 
(BgL_auxz00_3901-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 407 */
long BgL_modz00_3096;
{ /* ./Cfa/setup.scm 407 */
int BgL_arg2028z00_3097;
BgL_arg2028z00_3097 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 407 */
long BgL_n2z00_3105;
BgL_n2z00_3105 = 
(long)(BgL_arg2028z00_3097); 
BgL_modz00_3096 = 
(BgL_offsetz00_3095/BgL_n2z00_3105); } } 
{ /* ./Cfa/setup.scm 407 */
long BgL_restz00_3098;
{ /* ./Cfa/setup.scm 407 */
int BgL_arg2024z00_3099;
BgL_arg2024z00_3099 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 407 */
long BgL_n2z00_3108;
BgL_n2z00_3108 = 
(long)(BgL_arg2024z00_3099); 
BgL_restz00_3098 = 
(BgL_offsetz00_3095%BgL_n2z00_3108); } } 
{ /* ./Cfa/setup.scm 407 */

{ /* ./Cfa/setup.scm 407 */
obj_t BgL_bucketz00_3100;
{ /* ./Cfa/setup.scm 407 */
int BgL_kz00_3110;
BgL_kz00_3110 = 
(int)(BgL_modz00_3096); 
BgL_bucketz00_3100 = 
VECTOR_REF(BgL_arg2017z00_3091,BgL_kz00_3110); } 
{ /* ./Cfa/setup.scm 407 */
int BgL_kz00_3112;
BgL_kz00_3112 = 
(int)(BgL_restz00_3098); 
BgL_method4631z00_3088 = 
VECTOR_REF(BgL_bucketz00_3100,BgL_kz00_3112); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4631z00_3088)(BgL_method4631z00_3088, 
(obj_t)(BgL_arg6474z00_2085), BEOA);} } } } 
}



/* node-setup!-let-fun4694 */
obj_t BGl_nodezd2setupz12zd2letzd2fun4694zc0zzcfa_setupz00(obj_t BgL_envz00_3370, obj_t BgL_nodez00_3371)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 370 */
{ 
BgL_letzd2funzd2_bglt BgL_nodez00_2037;
BgL_nodez00_2037 = 
(BgL_letzd2funzd2_bglt)(BgL_nodez00_3371); 
{ 
obj_t BgL_l4610z00_2041;
{ /* ./Cfa/setup.scm 372 */
obj_t BgL_arg6380z00_2043;
BgL_arg6380z00_2043 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_nodez00_2037))->BgL_localsz00); 
BgL_l4610z00_2041 = BgL_arg6380z00_2043; 
BgL_forzd2each4611zd2_2042:
{ /* ./Cfa/setup.scm 372 */
bool_t BgL_test6383z00_2044;
BgL_test6383z00_2044 = 
PAIRP(BgL_l4610z00_2041); 
if(BgL_test6383z00_2044)
{ /* ./Cfa/setup.scm 372 */
{ /* ./Cfa/setup.scm 373 */
obj_t BgL_lz00_2045;
BgL_lz00_2045 = 
CAR(BgL_l4610z00_2041); 
{ /* ./Cfa/setup.scm 373 */
BgL_localz00_bglt BgL_obj4612z00_2046;
{ 
BgL_localz00_bglt BgL_auxz00_3922;
BgL_auxz00_3922 = 
(BgL_localz00_bglt)(BgL_lz00_2045); 
BgL_obj4612z00_2046 = 
((BgL_localz00_bglt)BgL_auxz00_3922); } 
{ /* ./Cfa/setup.scm 373 */
obj_t BgL_arg6385z00_2047;
BgL_arg6385z00_2047 = 
BGl_wideningzd2reshapedzd2localz00zzcfa_infoz00(BFALSE); 
{ /* ./Cfa/setup.scm 373 */
BgL_objectz00_bglt BgL_auxz00_3926;
BgL_auxz00_3926 = 
(BgL_objectz00_bglt)(BgL_obj4612z00_2046); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3926, BgL_arg6385z00_2047); } } 
{ /* ./Cfa/setup.scm 373 */
long BgL_arg6389z00_2048;
BgL_arg6389z00_2048 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2localzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 373 */
BgL_objectz00_bglt BgL_objz00_2928;
BgL_objz00_2928 = 
(BgL_objectz00_bglt)(BgL_obj4612z00_2046); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2928, BgL_arg6389z00_2048); } } 
{ /* ./Cfa/setup.scm 373 */
obj_t BgL_objz00_2930;
BgL_objz00_2930 = 
(obj_t)(BgL_obj4612z00_2046); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2930); BUNSPEC; } BgL_obj4612z00_2046; } 
{ /* ./Cfa/setup.scm 374 */
BgL_valuez00_bglt BgL_funz00_2049;
{ /* ./Cfa/setup.scm 374 */
BgL_variablez00_bglt BgL_obj1120z00_2931;
BgL_obj1120z00_2931 = 
(BgL_variablez00_bglt)(BgL_lz00_2045); 
BgL_funz00_2049 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_2931))->BgL_valuez00); } 
{ 
obj_t BgL_l4613z00_2050;
{ /* ./Cfa/setup.scm 379 */
obj_t BgL_arg6394z00_2052;
{ /* ./Cfa/setup.scm 379 */
BgL_sfunz00_bglt BgL_obj1389z00_2932;
BgL_obj1389z00_2932 = 
(BgL_sfunz00_bglt)(BgL_funz00_2049); 
BgL_arg6394z00_2052 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1389z00_2932))->BgL_argsz00); } 
BgL_l4613z00_2050 = BgL_arg6394z00_2052; 
BgL_forzd2each4614zd2_2051:
{ /* ./Cfa/setup.scm 375 */
bool_t BgL_test6397z00_2053;
BgL_test6397z00_2053 = 
PAIRP(BgL_l4613z00_2050); 
if(BgL_test6397z00_2053)
{ /* ./Cfa/setup.scm 375 */
{ /* ./Cfa/setup.scm 376 */
obj_t BgL_localz00_2054;
BgL_localz00_2054 = 
CAR(BgL_l4613z00_2050); 
{ /* ./Cfa/setup.scm 376 */
BgL_localz00_bglt BgL_obj4615z00_2055;
{ 
BgL_localz00_bglt BgL_auxz00_3941;
BgL_auxz00_3941 = 
(BgL_localz00_bglt)(BgL_localz00_2054); 
BgL_obj4615z00_2055 = 
((BgL_localz00_bglt)BgL_auxz00_3941); } 
{ /* ./Cfa/setup.scm 376 */
obj_t BgL_arg6399z00_2056;
BgL_arg6399z00_2056 = 
BGl_wideningzd2reshapedzd2localz00zzcfa_infoz00(BFALSE); 
{ /* ./Cfa/setup.scm 376 */
BgL_objectz00_bglt BgL_auxz00_3945;
BgL_auxz00_3945 = 
(BgL_objectz00_bglt)(BgL_obj4615z00_2055); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3945, BgL_arg6399z00_2056); } } 
{ /* ./Cfa/setup.scm 376 */
long BgL_arg6403z00_2057;
BgL_arg6403z00_2057 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2localzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 376 */
BgL_objectz00_bglt BgL_objz00_2935;
BgL_objz00_2935 = 
(BgL_objectz00_bglt)(BgL_obj4615z00_2055); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2935, BgL_arg6403z00_2057); } } 
{ /* ./Cfa/setup.scm 376 */
obj_t BgL_objz00_2937;
BgL_objz00_2937 = 
(obj_t)(BgL_obj4615z00_2055); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2937); BUNSPEC; } BgL_obj4615z00_2055; } 
{ /* ./Cfa/setup.scm 377 */
BgL_valuez00_bglt BgL_arg6408z00_2058;
{ /* ./Cfa/setup.scm 377 */
BgL_variablez00_bglt BgL_obj1120z00_2938;
BgL_obj1120z00_2938 = 
(BgL_variablez00_bglt)(BgL_localz00_2054); 
BgL_arg6408z00_2058 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_2938))->BgL_valuez00); } 
{ /* ./Cfa/setup.scm 377 */
BgL_variablez00_bglt BgL_variablez00_2940;
BgL_variablez00_2940 = 
(BgL_variablez00_bglt)(BgL_localz00_2054); 
{ /* ./Cfa/setup.scm 377 */
obj_t BgL_method4641z00_2941;
{ /* ./Cfa/setup.scm 377 */
BgL_objectz00_bglt BgL_objz00_2942;
BgL_objz00_2942 = 
(BgL_objectz00_bglt)(BgL_arg6408z00_2058); 
{ /* ./Cfa/setup.scm 377 */
long BgL_objzd2classzd2numz00_2943;
BgL_objzd2classzd2numz00_2943 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2942); 
{ /* ./Cfa/setup.scm 377 */
obj_t BgL_arg2017z00_2944;
{ /* ./Cfa/setup.scm 377 */
int BgL_auxz00_3958;
BgL_auxz00_3958 = 
(int)(((long)1)); 
BgL_arg2017z00_2944 = 
PROCEDURE_REF(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BgL_auxz00_3958); } 
{ /* ./Cfa/setup.scm 377 */
int BgL_offsetz00_2947;
BgL_offsetz00_2947 = 
(int)(BgL_objzd2classzd2numz00_2943); 
{ /* ./Cfa/setup.scm 377 */
long BgL_offsetz00_2948;
{ /* ./Cfa/setup.scm 377 */
long BgL_auxz00_3962;
BgL_auxz00_3962 = 
(long)(BgL_offsetz00_2947); 
BgL_offsetz00_2948 = 
(BgL_auxz00_3962-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 377 */
long BgL_modz00_2949;
{ /* ./Cfa/setup.scm 377 */
int BgL_arg2028z00_2950;
BgL_arg2028z00_2950 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 377 */
long BgL_n2z00_2958;
BgL_n2z00_2958 = 
(long)(BgL_arg2028z00_2950); 
BgL_modz00_2949 = 
(BgL_offsetz00_2948/BgL_n2z00_2958); } } 
{ /* ./Cfa/setup.scm 377 */
long BgL_restz00_2951;
{ /* ./Cfa/setup.scm 377 */
int BgL_arg2024z00_2952;
BgL_arg2024z00_2952 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 377 */
long BgL_n2z00_2961;
BgL_n2z00_2961 = 
(long)(BgL_arg2024z00_2952); 
BgL_restz00_2951 = 
(BgL_offsetz00_2948%BgL_n2z00_2961); } } 
{ /* ./Cfa/setup.scm 377 */

{ /* ./Cfa/setup.scm 377 */
obj_t BgL_bucketz00_2953;
{ /* ./Cfa/setup.scm 377 */
int BgL_kz00_2963;
BgL_kz00_2963 = 
(int)(BgL_modz00_2949); 
BgL_bucketz00_2953 = 
VECTOR_REF(BgL_arg2017z00_2944,BgL_kz00_2963); } 
{ /* ./Cfa/setup.scm 377 */
int BgL_kz00_2965;
BgL_kz00_2965 = 
(int)(BgL_restz00_2951); 
BgL_method4641z00_2941 = 
VECTOR_REF(BgL_bucketz00_2953,BgL_kz00_2965); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4641z00_2941)(BgL_method4641z00_2941, 
(obj_t)(BgL_arg6408z00_2058), 
(obj_t)(BgL_variablez00_2940), BEOA); } } } } 
{ /* ./Cfa/setup.scm 375 */
obj_t BgL_arg6413z00_2059;
BgL_arg6413z00_2059 = 
CDR(BgL_l4613z00_2050); 
{ 
obj_t BgL_l4613z00_3980;
BgL_l4613z00_3980 = BgL_arg6413z00_2059; 
BgL_l4613z00_2050 = BgL_l4613z00_3980; 
goto BgL_forzd2each4614zd2_2051;} } }  else 
{ /* ./Cfa/setup.scm 375 */((bool_t)1); } } } } 
{ /* ./Cfa/setup.scm 380 */
obj_t BgL_arg6418z00_2060;
{ /* ./Cfa/setup.scm 380 */
BgL_sfunz00_bglt BgL_obj1392z00_2967;
BgL_obj1392z00_2967 = 
(BgL_sfunz00_bglt)(BgL_funz00_2049); 
BgL_arg6418z00_2060 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1392z00_2967))->BgL_bodyz00); } 
{ /* ./Cfa/setup.scm 380 */
BgL_nodez00_bglt BgL_nodez00_2968;
BgL_nodez00_2968 = 
(BgL_nodez00_bglt)(BgL_arg6418z00_2060); 
{ /* ./Cfa/setup.scm 380 */
obj_t BgL_method4631z00_2969;
{ /* ./Cfa/setup.scm 380 */
BgL_objectz00_bglt BgL_objz00_2970;
BgL_objz00_2970 = 
(BgL_objectz00_bglt)(BgL_nodez00_2968); 
{ /* ./Cfa/setup.scm 380 */
long BgL_objzd2classzd2numz00_2971;
BgL_objzd2classzd2numz00_2971 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2970); 
{ /* ./Cfa/setup.scm 380 */
obj_t BgL_arg2017z00_2972;
{ /* ./Cfa/setup.scm 380 */
int BgL_auxz00_3986;
BgL_auxz00_3986 = 
(int)(((long)1)); 
BgL_arg2017z00_2972 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_3986); } 
{ /* ./Cfa/setup.scm 380 */
int BgL_offsetz00_2975;
BgL_offsetz00_2975 = 
(int)(BgL_objzd2classzd2numz00_2971); 
{ /* ./Cfa/setup.scm 380 */
long BgL_offsetz00_2976;
{ /* ./Cfa/setup.scm 380 */
long BgL_auxz00_3990;
BgL_auxz00_3990 = 
(long)(BgL_offsetz00_2975); 
BgL_offsetz00_2976 = 
(BgL_auxz00_3990-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 380 */
long BgL_modz00_2977;
{ /* ./Cfa/setup.scm 380 */
int BgL_arg2028z00_2978;
BgL_arg2028z00_2978 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 380 */
long BgL_n2z00_2986;
BgL_n2z00_2986 = 
(long)(BgL_arg2028z00_2978); 
BgL_modz00_2977 = 
(BgL_offsetz00_2976/BgL_n2z00_2986); } } 
{ /* ./Cfa/setup.scm 380 */
long BgL_restz00_2979;
{ /* ./Cfa/setup.scm 380 */
int BgL_arg2024z00_2980;
BgL_arg2024z00_2980 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 380 */
long BgL_n2z00_2989;
BgL_n2z00_2989 = 
(long)(BgL_arg2024z00_2980); 
BgL_restz00_2979 = 
(BgL_offsetz00_2976%BgL_n2z00_2989); } } 
{ /* ./Cfa/setup.scm 380 */

{ /* ./Cfa/setup.scm 380 */
obj_t BgL_bucketz00_2981;
{ /* ./Cfa/setup.scm 380 */
int BgL_kz00_2991;
BgL_kz00_2991 = 
(int)(BgL_modz00_2977); 
BgL_bucketz00_2981 = 
VECTOR_REF(BgL_arg2017z00_2972,BgL_kz00_2991); } 
{ /* ./Cfa/setup.scm 380 */
int BgL_kz00_2993;
BgL_kz00_2993 = 
(int)(BgL_restz00_2979); 
BgL_method4631z00_2969 = 
VECTOR_REF(BgL_bucketz00_2981,BgL_kz00_2993); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2969)(BgL_method4631z00_2969, 
(obj_t)(BgL_nodez00_2968), BEOA); } } } } } 
{ /* ./Cfa/setup.scm 372 */
obj_t BgL_arg6424z00_2061;
BgL_arg6424z00_2061 = 
CDR(BgL_l4610z00_2041); 
{ 
obj_t BgL_l4610z00_4007;
BgL_l4610z00_4007 = BgL_arg6424z00_2061; 
BgL_l4610z00_2041 = BgL_l4610z00_4007; 
goto BgL_forzd2each4611zd2_2042;} } }  else 
{ /* ./Cfa/setup.scm 372 */((bool_t)1); } } } } 
{ /* ./Cfa/setup.scm 382 */
BgL_nodez00_bglt BgL_arg6429z00_2062;
BgL_arg6429z00_2062 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_nodez00_2037))->BgL_bodyz00); 
{ /* ./Cfa/setup.scm 382 */
obj_t BgL_method4631z00_2997;
{ /* ./Cfa/setup.scm 382 */
BgL_objectz00_bglt BgL_objz00_2998;
BgL_objz00_2998 = 
(BgL_objectz00_bglt)(BgL_arg6429z00_2062); 
{ /* ./Cfa/setup.scm 382 */
long BgL_objzd2classzd2numz00_2999;
BgL_objzd2classzd2numz00_2999 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2998); 
{ /* ./Cfa/setup.scm 382 */
obj_t BgL_arg2017z00_3000;
{ /* ./Cfa/setup.scm 382 */
int BgL_auxz00_4011;
BgL_auxz00_4011 = 
(int)(((long)1)); 
BgL_arg2017z00_3000 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4011); } 
{ /* ./Cfa/setup.scm 382 */
int BgL_offsetz00_3003;
BgL_offsetz00_3003 = 
(int)(BgL_objzd2classzd2numz00_2999); 
{ /* ./Cfa/setup.scm 382 */
long BgL_offsetz00_3004;
{ /* ./Cfa/setup.scm 382 */
long BgL_auxz00_4015;
BgL_auxz00_4015 = 
(long)(BgL_offsetz00_3003); 
BgL_offsetz00_3004 = 
(BgL_auxz00_4015-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 382 */
long BgL_modz00_3005;
{ /* ./Cfa/setup.scm 382 */
int BgL_arg2028z00_3006;
BgL_arg2028z00_3006 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 382 */
long BgL_n2z00_3014;
BgL_n2z00_3014 = 
(long)(BgL_arg2028z00_3006); 
BgL_modz00_3005 = 
(BgL_offsetz00_3004/BgL_n2z00_3014); } } 
{ /* ./Cfa/setup.scm 382 */
long BgL_restz00_3007;
{ /* ./Cfa/setup.scm 382 */
int BgL_arg2024z00_3008;
BgL_arg2024z00_3008 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 382 */
long BgL_n2z00_3017;
BgL_n2z00_3017 = 
(long)(BgL_arg2024z00_3008); 
BgL_restz00_3007 = 
(BgL_offsetz00_3004%BgL_n2z00_3017); } } 
{ /* ./Cfa/setup.scm 382 */

{ /* ./Cfa/setup.scm 382 */
obj_t BgL_bucketz00_3009;
{ /* ./Cfa/setup.scm 382 */
int BgL_kz00_3019;
BgL_kz00_3019 = 
(int)(BgL_modz00_3005); 
BgL_bucketz00_3009 = 
VECTOR_REF(BgL_arg2017z00_3000,BgL_kz00_3019); } 
{ /* ./Cfa/setup.scm 382 */
int BgL_kz00_3021;
BgL_kz00_3021 = 
(int)(BgL_restz00_3007); 
BgL_method4631z00_2997 = 
VECTOR_REF(BgL_bucketz00_3009,BgL_kz00_3021); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4631z00_2997)(BgL_method4631z00_2997, 
(obj_t)(BgL_arg6429z00_2062), BEOA);} } } } 
}



/* node-setup!-select4692 */
obj_t BGl_nodezd2setupz12zd2select4692z12zzcfa_setupz00(obj_t BgL_envz00_3372, obj_t BgL_nodez00_3373)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 358 */
{ 
BgL_selectz00_bglt BgL_nodez00_2019;
{ /* ./Cfa/setup.scm 359 */
BgL_selectz00_bglt BgL_auxz00_4032;
BgL_nodez00_2019 = 
(BgL_selectz00_bglt)(BgL_nodez00_3373); 
{ /* ./Cfa/setup.scm 360 */
BgL_nodez00_bglt BgL_arg6343z00_2023;
BgL_arg6343z00_2023 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_2019))->BgL_testz00); 
{ /* ./Cfa/setup.scm 360 */
obj_t BgL_method4631z00_2866;
{ /* ./Cfa/setup.scm 360 */
BgL_objectz00_bglt BgL_objz00_2867;
BgL_objz00_2867 = 
(BgL_objectz00_bglt)(BgL_arg6343z00_2023); 
{ /* ./Cfa/setup.scm 360 */
long BgL_objzd2classzd2numz00_2868;
BgL_objzd2classzd2numz00_2868 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2867); 
{ /* ./Cfa/setup.scm 360 */
obj_t BgL_arg2017z00_2869;
{ /* ./Cfa/setup.scm 360 */
int BgL_auxz00_4036;
BgL_auxz00_4036 = 
(int)(((long)1)); 
BgL_arg2017z00_2869 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4036); } 
{ /* ./Cfa/setup.scm 360 */
int BgL_offsetz00_2872;
BgL_offsetz00_2872 = 
(int)(BgL_objzd2classzd2numz00_2868); 
{ /* ./Cfa/setup.scm 360 */
long BgL_offsetz00_2873;
{ /* ./Cfa/setup.scm 360 */
long BgL_auxz00_4040;
BgL_auxz00_4040 = 
(long)(BgL_offsetz00_2872); 
BgL_offsetz00_2873 = 
(BgL_auxz00_4040-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 360 */
long BgL_modz00_2874;
{ /* ./Cfa/setup.scm 360 */
int BgL_arg2028z00_2875;
BgL_arg2028z00_2875 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 360 */
long BgL_n2z00_2883;
BgL_n2z00_2883 = 
(long)(BgL_arg2028z00_2875); 
BgL_modz00_2874 = 
(BgL_offsetz00_2873/BgL_n2z00_2883); } } 
{ /* ./Cfa/setup.scm 360 */
long BgL_restz00_2876;
{ /* ./Cfa/setup.scm 360 */
int BgL_arg2024z00_2877;
BgL_arg2024z00_2877 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 360 */
long BgL_n2z00_2886;
BgL_n2z00_2886 = 
(long)(BgL_arg2024z00_2877); 
BgL_restz00_2876 = 
(BgL_offsetz00_2873%BgL_n2z00_2886); } } 
{ /* ./Cfa/setup.scm 360 */

{ /* ./Cfa/setup.scm 360 */
obj_t BgL_bucketz00_2878;
{ /* ./Cfa/setup.scm 360 */
int BgL_kz00_2888;
BgL_kz00_2888 = 
(int)(BgL_modz00_2874); 
BgL_bucketz00_2878 = 
VECTOR_REF(BgL_arg2017z00_2869,BgL_kz00_2888); } 
{ /* ./Cfa/setup.scm 360 */
int BgL_kz00_2890;
BgL_kz00_2890 = 
(int)(BgL_restz00_2876); 
BgL_method4631z00_2866 = 
VECTOR_REF(BgL_bucketz00_2878,BgL_kz00_2890); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2866)(BgL_method4631z00_2866, 
(obj_t)(BgL_arg6343z00_2023), BEOA); } } 
{ 
obj_t BgL_l4605z00_2024;
{ /* ./Cfa/setup.scm 361 */
obj_t BgL_arg6347z00_2026;
BgL_arg6347z00_2026 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_2019))->BgL_clausesz00); 
BgL_l4605z00_2024 = BgL_arg6347z00_2026; 
BgL_forzd2each4606zd2_2025:
{ /* ./Cfa/setup.scm 361 */
bool_t BgL_test6350z00_2027;
BgL_test6350z00_2027 = 
PAIRP(BgL_l4605z00_2024); 
if(BgL_test6350z00_2027)
{ /* ./Cfa/setup.scm 361 */
{ /* ./Cfa/setup.scm 362 */
obj_t BgL_clausez00_2028;
BgL_clausez00_2028 = 
CAR(BgL_l4605z00_2024); 
{ /* ./Cfa/setup.scm 362 */
obj_t BgL_arg6352z00_2029;
BgL_arg6352z00_2029 = 
CDR(BgL_clausez00_2028); 
{ /* ./Cfa/setup.scm 362 */
BgL_nodez00_bglt BgL_nodez00_2895;
BgL_nodez00_2895 = 
(BgL_nodez00_bglt)(BgL_arg6352z00_2029); 
{ /* ./Cfa/setup.scm 362 */
obj_t BgL_method4631z00_2896;
{ /* ./Cfa/setup.scm 362 */
BgL_objectz00_bglt BgL_objz00_2897;
BgL_objz00_2897 = 
(BgL_objectz00_bglt)(BgL_nodez00_2895); 
{ /* ./Cfa/setup.scm 362 */
long BgL_objzd2classzd2numz00_2898;
BgL_objzd2classzd2numz00_2898 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2897); 
{ /* ./Cfa/setup.scm 362 */
obj_t BgL_arg2017z00_2899;
{ /* ./Cfa/setup.scm 362 */
int BgL_auxz00_4064;
BgL_auxz00_4064 = 
(int)(((long)1)); 
BgL_arg2017z00_2899 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4064); } 
{ /* ./Cfa/setup.scm 362 */
int BgL_offsetz00_2902;
BgL_offsetz00_2902 = 
(int)(BgL_objzd2classzd2numz00_2898); 
{ /* ./Cfa/setup.scm 362 */
long BgL_offsetz00_2903;
{ /* ./Cfa/setup.scm 362 */
long BgL_auxz00_4068;
BgL_auxz00_4068 = 
(long)(BgL_offsetz00_2902); 
BgL_offsetz00_2903 = 
(BgL_auxz00_4068-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 362 */
long BgL_modz00_2904;
{ /* ./Cfa/setup.scm 362 */
int BgL_arg2028z00_2905;
BgL_arg2028z00_2905 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 362 */
long BgL_n2z00_2913;
BgL_n2z00_2913 = 
(long)(BgL_arg2028z00_2905); 
BgL_modz00_2904 = 
(BgL_offsetz00_2903/BgL_n2z00_2913); } } 
{ /* ./Cfa/setup.scm 362 */
long BgL_restz00_2906;
{ /* ./Cfa/setup.scm 362 */
int BgL_arg2024z00_2907;
BgL_arg2024z00_2907 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 362 */
long BgL_n2z00_2916;
BgL_n2z00_2916 = 
(long)(BgL_arg2024z00_2907); 
BgL_restz00_2906 = 
(BgL_offsetz00_2903%BgL_n2z00_2916); } } 
{ /* ./Cfa/setup.scm 362 */

{ /* ./Cfa/setup.scm 362 */
obj_t BgL_bucketz00_2908;
{ /* ./Cfa/setup.scm 362 */
int BgL_kz00_2918;
BgL_kz00_2918 = 
(int)(BgL_modz00_2904); 
BgL_bucketz00_2908 = 
VECTOR_REF(BgL_arg2017z00_2899,BgL_kz00_2918); } 
{ /* ./Cfa/setup.scm 362 */
int BgL_kz00_2920;
BgL_kz00_2920 = 
(int)(BgL_restz00_2906); 
BgL_method4631z00_2896 = 
VECTOR_REF(BgL_bucketz00_2908,BgL_kz00_2920); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2896)(BgL_method4631z00_2896, 
(obj_t)(BgL_nodez00_2895), BEOA); } } } } 
{ /* ./Cfa/setup.scm 361 */
obj_t BgL_arg6357z00_2030;
BgL_arg6357z00_2030 = 
CDR(BgL_l4605z00_2024); 
{ 
obj_t BgL_l4605z00_4085;
BgL_l4605z00_4085 = BgL_arg6357z00_2030; 
BgL_l4605z00_2024 = BgL_l4605z00_4085; 
goto BgL_forzd2each4606zd2_2025;} } }  else 
{ /* ./Cfa/setup.scm 361 */((bool_t)1); } } } } 
{ /* ./Cfa/setup.scm 364 */
BgL_selectz00_bglt BgL_obj4607z00_2031;
BgL_obj4607z00_2031 = 
((BgL_selectz00_bglt)BgL_nodez00_2019); 
{ /* ./Cfa/setup.scm 365 */
obj_t BgL_arg6362z00_2032;
{ /* ./Cfa/setup.scm 365 */
BgL_approxz00_bglt BgL_arg6365z00_2033;
BgL_arg6365z00_2033 = 
BGl_makezd2emptyzd2approxz00zzcfa_approxz00(); 
BgL_arg6362z00_2032 = 
BGl_wideningzd2selectzf2Cinfoz20zzcfa_infoz00(BgL_arg6365z00_2033); } 
{ /* ./Cfa/setup.scm 364 */
BgL_objectz00_bglt BgL_auxz00_4089;
BgL_auxz00_4089 = 
(BgL_objectz00_bglt)(BgL_obj4607z00_2031); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4089, BgL_arg6362z00_2032); } } 
{ /* ./Cfa/setup.scm 364 */
long BgL_arg6369z00_2034;
BgL_arg6369z00_2034 = 
BGl_classzd2numzd2zz__objectz00(BGl_selectzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 364 */
BgL_objectz00_bglt BgL_objz00_2922;
BgL_objz00_2922 = 
(BgL_objectz00_bglt)(BgL_obj4607z00_2031); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2922, BgL_arg6369z00_2034); } } 
{ /* ./Cfa/setup.scm 364 */
obj_t BgL_objz00_2924;
BgL_objz00_2924 = 
(obj_t)(BgL_obj4607z00_2031); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2924); BUNSPEC; } 
BgL_auxz00_4032 = BgL_obj4607z00_2031; } 
return 
(obj_t)(BgL_auxz00_4032);} } } 
}



/* node-setup!-fail4690 */
obj_t BGl_nodezd2setupz12zd2fail4690z12zzcfa_setupz00(obj_t BgL_envz00_3374, obj_t BgL_nodez00_3375)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 347 */
{ 
BgL_failz00_bglt BgL_nodez00_2006;
{ /* ./Cfa/setup.scm 348 */
BgL_failz00_bglt BgL_auxz00_4099;
BgL_nodez00_2006 = 
(BgL_failz00_bglt)(BgL_nodez00_3375); 
{ /* ./Cfa/setup.scm 349 */
BgL_nodez00_bglt BgL_arg6313z00_2010;
BgL_arg6313z00_2010 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_2006))->BgL_procz00); 
{ /* ./Cfa/setup.scm 349 */
obj_t BgL_method4631z00_2782;
{ /* ./Cfa/setup.scm 349 */
BgL_objectz00_bglt BgL_objz00_2783;
BgL_objz00_2783 = 
(BgL_objectz00_bglt)(BgL_arg6313z00_2010); 
{ /* ./Cfa/setup.scm 349 */
long BgL_objzd2classzd2numz00_2784;
BgL_objzd2classzd2numz00_2784 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2783); 
{ /* ./Cfa/setup.scm 349 */
obj_t BgL_arg2017z00_2785;
{ /* ./Cfa/setup.scm 349 */
int BgL_auxz00_4103;
BgL_auxz00_4103 = 
(int)(((long)1)); 
BgL_arg2017z00_2785 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4103); } 
{ /* ./Cfa/setup.scm 349 */
int BgL_offsetz00_2788;
BgL_offsetz00_2788 = 
(int)(BgL_objzd2classzd2numz00_2784); 
{ /* ./Cfa/setup.scm 349 */
long BgL_offsetz00_2789;
{ /* ./Cfa/setup.scm 349 */
long BgL_auxz00_4107;
BgL_auxz00_4107 = 
(long)(BgL_offsetz00_2788); 
BgL_offsetz00_2789 = 
(BgL_auxz00_4107-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 349 */
long BgL_modz00_2790;
{ /* ./Cfa/setup.scm 349 */
int BgL_arg2028z00_2791;
BgL_arg2028z00_2791 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 349 */
long BgL_n2z00_2799;
BgL_n2z00_2799 = 
(long)(BgL_arg2028z00_2791); 
BgL_modz00_2790 = 
(BgL_offsetz00_2789/BgL_n2z00_2799); } } 
{ /* ./Cfa/setup.scm 349 */
long BgL_restz00_2792;
{ /* ./Cfa/setup.scm 349 */
int BgL_arg2024z00_2793;
BgL_arg2024z00_2793 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 349 */
long BgL_n2z00_2802;
BgL_n2z00_2802 = 
(long)(BgL_arg2024z00_2793); 
BgL_restz00_2792 = 
(BgL_offsetz00_2789%BgL_n2z00_2802); } } 
{ /* ./Cfa/setup.scm 349 */

{ /* ./Cfa/setup.scm 349 */
obj_t BgL_bucketz00_2794;
{ /* ./Cfa/setup.scm 349 */
int BgL_kz00_2804;
BgL_kz00_2804 = 
(int)(BgL_modz00_2790); 
BgL_bucketz00_2794 = 
VECTOR_REF(BgL_arg2017z00_2785,BgL_kz00_2804); } 
{ /* ./Cfa/setup.scm 349 */
int BgL_kz00_2806;
BgL_kz00_2806 = 
(int)(BgL_restz00_2792); 
BgL_method4631z00_2782 = 
VECTOR_REF(BgL_bucketz00_2794,BgL_kz00_2806); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2782)(BgL_method4631z00_2782, 
(obj_t)(BgL_arg6313z00_2010), BEOA); } } 
{ /* ./Cfa/setup.scm 350 */
BgL_nodez00_bglt BgL_arg6317z00_2011;
BgL_arg6317z00_2011 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_2006))->BgL_msgz00); 
{ /* ./Cfa/setup.scm 350 */
obj_t BgL_method4631z00_2809;
{ /* ./Cfa/setup.scm 350 */
BgL_objectz00_bglt BgL_objz00_2810;
BgL_objz00_2810 = 
(BgL_objectz00_bglt)(BgL_arg6317z00_2011); 
{ /* ./Cfa/setup.scm 350 */
long BgL_objzd2classzd2numz00_2811;
BgL_objzd2classzd2numz00_2811 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2810); 
{ /* ./Cfa/setup.scm 350 */
obj_t BgL_arg2017z00_2812;
{ /* ./Cfa/setup.scm 350 */
int BgL_auxz00_4126;
BgL_auxz00_4126 = 
(int)(((long)1)); 
BgL_arg2017z00_2812 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4126); } 
{ /* ./Cfa/setup.scm 350 */
int BgL_offsetz00_2815;
BgL_offsetz00_2815 = 
(int)(BgL_objzd2classzd2numz00_2811); 
{ /* ./Cfa/setup.scm 350 */
long BgL_offsetz00_2816;
{ /* ./Cfa/setup.scm 350 */
long BgL_auxz00_4130;
BgL_auxz00_4130 = 
(long)(BgL_offsetz00_2815); 
BgL_offsetz00_2816 = 
(BgL_auxz00_4130-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 350 */
long BgL_modz00_2817;
{ /* ./Cfa/setup.scm 350 */
int BgL_arg2028z00_2818;
BgL_arg2028z00_2818 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 350 */
long BgL_n2z00_2826;
BgL_n2z00_2826 = 
(long)(BgL_arg2028z00_2818); 
BgL_modz00_2817 = 
(BgL_offsetz00_2816/BgL_n2z00_2826); } } 
{ /* ./Cfa/setup.scm 350 */
long BgL_restz00_2819;
{ /* ./Cfa/setup.scm 350 */
int BgL_arg2024z00_2820;
BgL_arg2024z00_2820 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 350 */
long BgL_n2z00_2829;
BgL_n2z00_2829 = 
(long)(BgL_arg2024z00_2820); 
BgL_restz00_2819 = 
(BgL_offsetz00_2816%BgL_n2z00_2829); } } 
{ /* ./Cfa/setup.scm 350 */

{ /* ./Cfa/setup.scm 350 */
obj_t BgL_bucketz00_2821;
{ /* ./Cfa/setup.scm 350 */
int BgL_kz00_2831;
BgL_kz00_2831 = 
(int)(BgL_modz00_2817); 
BgL_bucketz00_2821 = 
VECTOR_REF(BgL_arg2017z00_2812,BgL_kz00_2831); } 
{ /* ./Cfa/setup.scm 350 */
int BgL_kz00_2833;
BgL_kz00_2833 = 
(int)(BgL_restz00_2819); 
BgL_method4631z00_2809 = 
VECTOR_REF(BgL_bucketz00_2821,BgL_kz00_2833); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2809)(BgL_method4631z00_2809, 
(obj_t)(BgL_arg6317z00_2011), BEOA); } } 
{ /* ./Cfa/setup.scm 351 */
BgL_nodez00_bglt BgL_arg6321z00_2012;
BgL_arg6321z00_2012 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_2006))->BgL_objz00); 
{ /* ./Cfa/setup.scm 351 */
obj_t BgL_method4631z00_2836;
{ /* ./Cfa/setup.scm 351 */
BgL_objectz00_bglt BgL_objz00_2837;
BgL_objz00_2837 = 
(BgL_objectz00_bglt)(BgL_arg6321z00_2012); 
{ /* ./Cfa/setup.scm 351 */
long BgL_objzd2classzd2numz00_2838;
BgL_objzd2classzd2numz00_2838 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2837); 
{ /* ./Cfa/setup.scm 351 */
obj_t BgL_arg2017z00_2839;
{ /* ./Cfa/setup.scm 351 */
int BgL_auxz00_4149;
BgL_auxz00_4149 = 
(int)(((long)1)); 
BgL_arg2017z00_2839 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4149); } 
{ /* ./Cfa/setup.scm 351 */
int BgL_offsetz00_2842;
BgL_offsetz00_2842 = 
(int)(BgL_objzd2classzd2numz00_2838); 
{ /* ./Cfa/setup.scm 351 */
long BgL_offsetz00_2843;
{ /* ./Cfa/setup.scm 351 */
long BgL_auxz00_4153;
BgL_auxz00_4153 = 
(long)(BgL_offsetz00_2842); 
BgL_offsetz00_2843 = 
(BgL_auxz00_4153-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 351 */
long BgL_modz00_2844;
{ /* ./Cfa/setup.scm 351 */
int BgL_arg2028z00_2845;
BgL_arg2028z00_2845 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 351 */
long BgL_n2z00_2853;
BgL_n2z00_2853 = 
(long)(BgL_arg2028z00_2845); 
BgL_modz00_2844 = 
(BgL_offsetz00_2843/BgL_n2z00_2853); } } 
{ /* ./Cfa/setup.scm 351 */
long BgL_restz00_2846;
{ /* ./Cfa/setup.scm 351 */
int BgL_arg2024z00_2847;
BgL_arg2024z00_2847 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 351 */
long BgL_n2z00_2856;
BgL_n2z00_2856 = 
(long)(BgL_arg2024z00_2847); 
BgL_restz00_2846 = 
(BgL_offsetz00_2843%BgL_n2z00_2856); } } 
{ /* ./Cfa/setup.scm 351 */

{ /* ./Cfa/setup.scm 351 */
obj_t BgL_bucketz00_2848;
{ /* ./Cfa/setup.scm 351 */
int BgL_kz00_2858;
BgL_kz00_2858 = 
(int)(BgL_modz00_2844); 
BgL_bucketz00_2848 = 
VECTOR_REF(BgL_arg2017z00_2839,BgL_kz00_2858); } 
{ /* ./Cfa/setup.scm 351 */
int BgL_kz00_2860;
BgL_kz00_2860 = 
(int)(BgL_restz00_2846); 
BgL_method4631z00_2836 = 
VECTOR_REF(BgL_bucketz00_2848,BgL_kz00_2860); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2836)(BgL_method4631z00_2836, 
(obj_t)(BgL_arg6321z00_2012), BEOA); } } 
{ /* ./Cfa/setup.scm 352 */
BgL_failz00_bglt BgL_obj4602z00_2013;
BgL_obj4602z00_2013 = 
((BgL_failz00_bglt)BgL_nodez00_2006); 
{ /* ./Cfa/setup.scm 353 */
obj_t BgL_arg6325z00_2014;
{ /* ./Cfa/setup.scm 353 */
BgL_approxz00_bglt BgL_arg6328z00_2015;
BgL_arg6328z00_2015 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00)); 
BgL_arg6325z00_2014 = 
BGl_wideningzd2failzf2Cinfoz20zzcfa_infoz00(BgL_arg6328z00_2015); } 
{ /* ./Cfa/setup.scm 352 */
BgL_objectz00_bglt BgL_auxz00_4173;
BgL_auxz00_4173 = 
(BgL_objectz00_bglt)(BgL_obj4602z00_2013); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4173, BgL_arg6325z00_2014); } } 
{ /* ./Cfa/setup.scm 352 */
long BgL_arg6332z00_2016;
BgL_arg6332z00_2016 = 
BGl_classzd2numzd2zz__objectz00(BGl_failzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 352 */
BgL_objectz00_bglt BgL_objz00_2861;
BgL_objz00_2861 = 
(BgL_objectz00_bglt)(BgL_obj4602z00_2013); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2861, BgL_arg6332z00_2016); } } 
{ /* ./Cfa/setup.scm 352 */
obj_t BgL_objz00_2863;
BgL_objz00_2863 = 
(obj_t)(BgL_obj4602z00_2013); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2863); BUNSPEC; } 
BgL_auxz00_4099 = BgL_obj4602z00_2013; } 
return 
(obj_t)(BgL_auxz00_4099);} } } 
}



/* node-setup!-conditional4688 */
obj_t BGl_nodezd2setupz12zd2conditional4688z12zzcfa_setupz00(obj_t BgL_envz00_3376, obj_t BgL_nodez00_3377)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 336 */
{ 
BgL_conditionalz00_bglt BgL_nodez00_1993;
{ /* ./Cfa/setup.scm 337 */
BgL_conditionalz00_bglt BgL_auxz00_4183;
BgL_nodez00_1993 = 
(BgL_conditionalz00_bglt)(BgL_nodez00_3377); 
{ /* ./Cfa/setup.scm 338 */
BgL_nodez00_bglt BgL_arg6283z00_1997;
BgL_arg6283z00_1997 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1993))->BgL_testz00); 
{ /* ./Cfa/setup.scm 338 */
obj_t BgL_method4631z00_2698;
{ /* ./Cfa/setup.scm 338 */
BgL_objectz00_bglt BgL_objz00_2699;
BgL_objz00_2699 = 
(BgL_objectz00_bglt)(BgL_arg6283z00_1997); 
{ /* ./Cfa/setup.scm 338 */
long BgL_objzd2classzd2numz00_2700;
BgL_objzd2classzd2numz00_2700 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2699); 
{ /* ./Cfa/setup.scm 338 */
obj_t BgL_arg2017z00_2701;
{ /* ./Cfa/setup.scm 338 */
int BgL_auxz00_4187;
BgL_auxz00_4187 = 
(int)(((long)1)); 
BgL_arg2017z00_2701 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4187); } 
{ /* ./Cfa/setup.scm 338 */
int BgL_offsetz00_2704;
BgL_offsetz00_2704 = 
(int)(BgL_objzd2classzd2numz00_2700); 
{ /* ./Cfa/setup.scm 338 */
long BgL_offsetz00_2705;
{ /* ./Cfa/setup.scm 338 */
long BgL_auxz00_4191;
BgL_auxz00_4191 = 
(long)(BgL_offsetz00_2704); 
BgL_offsetz00_2705 = 
(BgL_auxz00_4191-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 338 */
long BgL_modz00_2706;
{ /* ./Cfa/setup.scm 338 */
int BgL_arg2028z00_2707;
BgL_arg2028z00_2707 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 338 */
long BgL_n2z00_2715;
BgL_n2z00_2715 = 
(long)(BgL_arg2028z00_2707); 
BgL_modz00_2706 = 
(BgL_offsetz00_2705/BgL_n2z00_2715); } } 
{ /* ./Cfa/setup.scm 338 */
long BgL_restz00_2708;
{ /* ./Cfa/setup.scm 338 */
int BgL_arg2024z00_2709;
BgL_arg2024z00_2709 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 338 */
long BgL_n2z00_2718;
BgL_n2z00_2718 = 
(long)(BgL_arg2024z00_2709); 
BgL_restz00_2708 = 
(BgL_offsetz00_2705%BgL_n2z00_2718); } } 
{ /* ./Cfa/setup.scm 338 */

{ /* ./Cfa/setup.scm 338 */
obj_t BgL_bucketz00_2710;
{ /* ./Cfa/setup.scm 338 */
int BgL_kz00_2720;
BgL_kz00_2720 = 
(int)(BgL_modz00_2706); 
BgL_bucketz00_2710 = 
VECTOR_REF(BgL_arg2017z00_2701,BgL_kz00_2720); } 
{ /* ./Cfa/setup.scm 338 */
int BgL_kz00_2722;
BgL_kz00_2722 = 
(int)(BgL_restz00_2708); 
BgL_method4631z00_2698 = 
VECTOR_REF(BgL_bucketz00_2710,BgL_kz00_2722); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2698)(BgL_method4631z00_2698, 
(obj_t)(BgL_arg6283z00_1997), BEOA); } } 
{ /* ./Cfa/setup.scm 339 */
BgL_nodez00_bglt BgL_arg6287z00_1998;
BgL_arg6287z00_1998 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1993))->BgL_truez00); 
{ /* ./Cfa/setup.scm 339 */
obj_t BgL_method4631z00_2725;
{ /* ./Cfa/setup.scm 339 */
BgL_objectz00_bglt BgL_objz00_2726;
BgL_objz00_2726 = 
(BgL_objectz00_bglt)(BgL_arg6287z00_1998); 
{ /* ./Cfa/setup.scm 339 */
long BgL_objzd2classzd2numz00_2727;
BgL_objzd2classzd2numz00_2727 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2726); 
{ /* ./Cfa/setup.scm 339 */
obj_t BgL_arg2017z00_2728;
{ /* ./Cfa/setup.scm 339 */
int BgL_auxz00_4210;
BgL_auxz00_4210 = 
(int)(((long)1)); 
BgL_arg2017z00_2728 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4210); } 
{ /* ./Cfa/setup.scm 339 */
int BgL_offsetz00_2731;
BgL_offsetz00_2731 = 
(int)(BgL_objzd2classzd2numz00_2727); 
{ /* ./Cfa/setup.scm 339 */
long BgL_offsetz00_2732;
{ /* ./Cfa/setup.scm 339 */
long BgL_auxz00_4214;
BgL_auxz00_4214 = 
(long)(BgL_offsetz00_2731); 
BgL_offsetz00_2732 = 
(BgL_auxz00_4214-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 339 */
long BgL_modz00_2733;
{ /* ./Cfa/setup.scm 339 */
int BgL_arg2028z00_2734;
BgL_arg2028z00_2734 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 339 */
long BgL_n2z00_2742;
BgL_n2z00_2742 = 
(long)(BgL_arg2028z00_2734); 
BgL_modz00_2733 = 
(BgL_offsetz00_2732/BgL_n2z00_2742); } } 
{ /* ./Cfa/setup.scm 339 */
long BgL_restz00_2735;
{ /* ./Cfa/setup.scm 339 */
int BgL_arg2024z00_2736;
BgL_arg2024z00_2736 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 339 */
long BgL_n2z00_2745;
BgL_n2z00_2745 = 
(long)(BgL_arg2024z00_2736); 
BgL_restz00_2735 = 
(BgL_offsetz00_2732%BgL_n2z00_2745); } } 
{ /* ./Cfa/setup.scm 339 */

{ /* ./Cfa/setup.scm 339 */
obj_t BgL_bucketz00_2737;
{ /* ./Cfa/setup.scm 339 */
int BgL_kz00_2747;
BgL_kz00_2747 = 
(int)(BgL_modz00_2733); 
BgL_bucketz00_2737 = 
VECTOR_REF(BgL_arg2017z00_2728,BgL_kz00_2747); } 
{ /* ./Cfa/setup.scm 339 */
int BgL_kz00_2749;
BgL_kz00_2749 = 
(int)(BgL_restz00_2735); 
BgL_method4631z00_2725 = 
VECTOR_REF(BgL_bucketz00_2737,BgL_kz00_2749); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2725)(BgL_method4631z00_2725, 
(obj_t)(BgL_arg6287z00_1998), BEOA); } } 
{ /* ./Cfa/setup.scm 340 */
BgL_nodez00_bglt BgL_arg6291z00_1999;
BgL_arg6291z00_1999 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1993))->BgL_falsez00); 
{ /* ./Cfa/setup.scm 340 */
obj_t BgL_method4631z00_2752;
{ /* ./Cfa/setup.scm 340 */
BgL_objectz00_bglt BgL_objz00_2753;
BgL_objz00_2753 = 
(BgL_objectz00_bglt)(BgL_arg6291z00_1999); 
{ /* ./Cfa/setup.scm 340 */
long BgL_objzd2classzd2numz00_2754;
BgL_objzd2classzd2numz00_2754 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2753); 
{ /* ./Cfa/setup.scm 340 */
obj_t BgL_arg2017z00_2755;
{ /* ./Cfa/setup.scm 340 */
int BgL_auxz00_4233;
BgL_auxz00_4233 = 
(int)(((long)1)); 
BgL_arg2017z00_2755 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4233); } 
{ /* ./Cfa/setup.scm 340 */
int BgL_offsetz00_2758;
BgL_offsetz00_2758 = 
(int)(BgL_objzd2classzd2numz00_2754); 
{ /* ./Cfa/setup.scm 340 */
long BgL_offsetz00_2759;
{ /* ./Cfa/setup.scm 340 */
long BgL_auxz00_4237;
BgL_auxz00_4237 = 
(long)(BgL_offsetz00_2758); 
BgL_offsetz00_2759 = 
(BgL_auxz00_4237-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 340 */
long BgL_modz00_2760;
{ /* ./Cfa/setup.scm 340 */
int BgL_arg2028z00_2761;
BgL_arg2028z00_2761 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 340 */
long BgL_n2z00_2769;
BgL_n2z00_2769 = 
(long)(BgL_arg2028z00_2761); 
BgL_modz00_2760 = 
(BgL_offsetz00_2759/BgL_n2z00_2769); } } 
{ /* ./Cfa/setup.scm 340 */
long BgL_restz00_2762;
{ /* ./Cfa/setup.scm 340 */
int BgL_arg2024z00_2763;
BgL_arg2024z00_2763 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 340 */
long BgL_n2z00_2772;
BgL_n2z00_2772 = 
(long)(BgL_arg2024z00_2763); 
BgL_restz00_2762 = 
(BgL_offsetz00_2759%BgL_n2z00_2772); } } 
{ /* ./Cfa/setup.scm 340 */

{ /* ./Cfa/setup.scm 340 */
obj_t BgL_bucketz00_2764;
{ /* ./Cfa/setup.scm 340 */
int BgL_kz00_2774;
BgL_kz00_2774 = 
(int)(BgL_modz00_2760); 
BgL_bucketz00_2764 = 
VECTOR_REF(BgL_arg2017z00_2755,BgL_kz00_2774); } 
{ /* ./Cfa/setup.scm 340 */
int BgL_kz00_2776;
BgL_kz00_2776 = 
(int)(BgL_restz00_2762); 
BgL_method4631z00_2752 = 
VECTOR_REF(BgL_bucketz00_2764,BgL_kz00_2776); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2752)(BgL_method4631z00_2752, 
(obj_t)(BgL_arg6291z00_1999), BEOA); } } 
{ /* ./Cfa/setup.scm 341 */
BgL_conditionalz00_bglt BgL_obj4599z00_2000;
BgL_obj4599z00_2000 = 
((BgL_conditionalz00_bglt)BgL_nodez00_1993); 
{ /* ./Cfa/setup.scm 342 */
obj_t BgL_arg6295z00_2001;
{ /* ./Cfa/setup.scm 342 */
BgL_approxz00_bglt BgL_arg6298z00_2002;
BgL_arg6298z00_2002 = 
BGl_makezd2emptyzd2approxz00zzcfa_approxz00(); 
BgL_arg6295z00_2001 = 
BGl_wideningzd2conditionalzf2Cinfoz20zzcfa_infoz00(BgL_arg6298z00_2002); } 
{ /* ./Cfa/setup.scm 341 */
BgL_objectz00_bglt BgL_auxz00_4256;
BgL_auxz00_4256 = 
(BgL_objectz00_bglt)(BgL_obj4599z00_2000); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4256, BgL_arg6295z00_2001); } } 
{ /* ./Cfa/setup.scm 341 */
long BgL_arg6302z00_2003;
BgL_arg6302z00_2003 = 
BGl_classzd2numzd2zz__objectz00(BGl_conditionalzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 341 */
BgL_objectz00_bglt BgL_objz00_2777;
BgL_objz00_2777 = 
(BgL_objectz00_bglt)(BgL_obj4599z00_2000); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2777, BgL_arg6302z00_2003); } } 
{ /* ./Cfa/setup.scm 341 */
obj_t BgL_objz00_2779;
BgL_objz00_2779 = 
(obj_t)(BgL_obj4599z00_2000); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2779); BUNSPEC; } 
BgL_auxz00_4183 = BgL_obj4599z00_2000; } 
return 
(obj_t)(BgL_auxz00_4183);} } } 
}



/* node-setup!-setq4686 */
obj_t BGl_nodezd2setupz12zd2setq4686z12zzcfa_setupz00(obj_t BgL_envz00_3378, obj_t BgL_nodez00_3379)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 325 */
{ 
BgL_setqz00_bglt BgL_nodez00_1981;
{ /* ./Tools/trace.sch 42 */
BgL_setqz00_bglt BgL_auxz00_4266;
BgL_nodez00_1981 = 
(BgL_setqz00_bglt)(BgL_nodez00_3379); 
{ /* ./Cfa/setup.scm 328 */
BgL_nodez00_bglt BgL_arg6257z00_1985;
BgL_arg6257z00_1985 = 
(((BgL_setqz00_bglt)CREF(BgL_nodez00_1981))->BgL_valuez00); 
{ /* ./Cfa/setup.scm 328 */
obj_t BgL_method4631z00_2641;
{ /* ./Cfa/setup.scm 328 */
BgL_objectz00_bglt BgL_objz00_2642;
BgL_objz00_2642 = 
(BgL_objectz00_bglt)(BgL_arg6257z00_1985); 
{ /* ./Cfa/setup.scm 328 */
long BgL_objzd2classzd2numz00_2643;
BgL_objzd2classzd2numz00_2643 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2642); 
{ /* ./Cfa/setup.scm 328 */
obj_t BgL_arg2017z00_2644;
{ /* ./Cfa/setup.scm 328 */
int BgL_auxz00_4270;
BgL_auxz00_4270 = 
(int)(((long)1)); 
BgL_arg2017z00_2644 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4270); } 
{ /* ./Cfa/setup.scm 328 */
int BgL_offsetz00_2647;
BgL_offsetz00_2647 = 
(int)(BgL_objzd2classzd2numz00_2643); 
{ /* ./Cfa/setup.scm 328 */
long BgL_offsetz00_2648;
{ /* ./Cfa/setup.scm 328 */
long BgL_auxz00_4274;
BgL_auxz00_4274 = 
(long)(BgL_offsetz00_2647); 
BgL_offsetz00_2648 = 
(BgL_auxz00_4274-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 328 */
long BgL_modz00_2649;
{ /* ./Cfa/setup.scm 328 */
int BgL_arg2028z00_2650;
BgL_arg2028z00_2650 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 328 */
long BgL_n2z00_2658;
BgL_n2z00_2658 = 
(long)(BgL_arg2028z00_2650); 
BgL_modz00_2649 = 
(BgL_offsetz00_2648/BgL_n2z00_2658); } } 
{ /* ./Cfa/setup.scm 328 */
long BgL_restz00_2651;
{ /* ./Cfa/setup.scm 328 */
int BgL_arg2024z00_2652;
BgL_arg2024z00_2652 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 328 */
long BgL_n2z00_2661;
BgL_n2z00_2661 = 
(long)(BgL_arg2024z00_2652); 
BgL_restz00_2651 = 
(BgL_offsetz00_2648%BgL_n2z00_2661); } } 
{ /* ./Cfa/setup.scm 328 */

{ /* ./Cfa/setup.scm 328 */
obj_t BgL_bucketz00_2653;
{ /* ./Cfa/setup.scm 328 */
int BgL_kz00_2663;
BgL_kz00_2663 = 
(int)(BgL_modz00_2649); 
BgL_bucketz00_2653 = 
VECTOR_REF(BgL_arg2017z00_2644,BgL_kz00_2663); } 
{ /* ./Cfa/setup.scm 328 */
int BgL_kz00_2665;
BgL_kz00_2665 = 
(int)(BgL_restz00_2651); 
BgL_method4631z00_2641 = 
VECTOR_REF(BgL_bucketz00_2653,BgL_kz00_2665); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2641)(BgL_method4631z00_2641, 
(obj_t)(BgL_arg6257z00_1985), BEOA); } } 
{ /* ./Cfa/setup.scm 329 */
BgL_varz00_bglt BgL_arg6261z00_1986;
BgL_arg6261z00_1986 = 
(((BgL_setqz00_bglt)CREF(BgL_nodez00_1981))->BgL_varz00); 
{ /* ./Cfa/setup.scm 329 */
BgL_nodez00_bglt BgL_nodez00_2667;
BgL_nodez00_2667 = 
(BgL_nodez00_bglt)(BgL_arg6261z00_1986); 
{ /* ./Cfa/setup.scm 329 */
obj_t BgL_method4631z00_2668;
{ /* ./Cfa/setup.scm 329 */
BgL_objectz00_bglt BgL_objz00_2669;
BgL_objz00_2669 = 
(BgL_objectz00_bglt)(BgL_nodez00_2667); 
{ /* ./Cfa/setup.scm 329 */
long BgL_objzd2classzd2numz00_2670;
BgL_objzd2classzd2numz00_2670 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2669); 
{ /* ./Cfa/setup.scm 329 */
obj_t BgL_arg2017z00_2671;
{ /* ./Cfa/setup.scm 329 */
int BgL_auxz00_4294;
BgL_auxz00_4294 = 
(int)(((long)1)); 
BgL_arg2017z00_2671 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4294); } 
{ /* ./Cfa/setup.scm 329 */
int BgL_offsetz00_2674;
BgL_offsetz00_2674 = 
(int)(BgL_objzd2classzd2numz00_2670); 
{ /* ./Cfa/setup.scm 329 */
long BgL_offsetz00_2675;
{ /* ./Cfa/setup.scm 329 */
long BgL_auxz00_4298;
BgL_auxz00_4298 = 
(long)(BgL_offsetz00_2674); 
BgL_offsetz00_2675 = 
(BgL_auxz00_4298-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 329 */
long BgL_modz00_2676;
{ /* ./Cfa/setup.scm 329 */
int BgL_arg2028z00_2677;
BgL_arg2028z00_2677 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 329 */
long BgL_n2z00_2685;
BgL_n2z00_2685 = 
(long)(BgL_arg2028z00_2677); 
BgL_modz00_2676 = 
(BgL_offsetz00_2675/BgL_n2z00_2685); } } 
{ /* ./Cfa/setup.scm 329 */
long BgL_restz00_2678;
{ /* ./Cfa/setup.scm 329 */
int BgL_arg2024z00_2679;
BgL_arg2024z00_2679 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 329 */
long BgL_n2z00_2688;
BgL_n2z00_2688 = 
(long)(BgL_arg2024z00_2679); 
BgL_restz00_2678 = 
(BgL_offsetz00_2675%BgL_n2z00_2688); } } 
{ /* ./Cfa/setup.scm 329 */

{ /* ./Cfa/setup.scm 329 */
obj_t BgL_bucketz00_2680;
{ /* ./Cfa/setup.scm 329 */
int BgL_kz00_2690;
BgL_kz00_2690 = 
(int)(BgL_modz00_2676); 
BgL_bucketz00_2680 = 
VECTOR_REF(BgL_arg2017z00_2671,BgL_kz00_2690); } 
{ /* ./Cfa/setup.scm 329 */
int BgL_kz00_2692;
BgL_kz00_2692 = 
(int)(BgL_restz00_2678); 
BgL_method4631z00_2668 = 
VECTOR_REF(BgL_bucketz00_2680,BgL_kz00_2692); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2668)(BgL_method4631z00_2668, 
(obj_t)(BgL_nodez00_2667), BEOA); } } } 
{ /* ./Cfa/setup.scm 330 */
BgL_setqz00_bglt BgL_obj4596z00_1987;
BgL_obj4596z00_1987 = 
((BgL_setqz00_bglt)BgL_nodez00_1981); 
{ /* ./Cfa/setup.scm 331 */
obj_t BgL_arg6265z00_1988;
{ /* ./Cfa/setup.scm 331 */
BgL_approxz00_bglt BgL_arg6268z00_1989;
BgL_arg6268z00_1989 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(
(BgL_typez00_bglt)(BGl_za2unspecza2z00zztype_cachez00)); 
BgL_arg6265z00_1988 = 
BGl_wideningzd2setqzf2Cinfoz20zzcfa_infoz00(BgL_arg6268z00_1989); } 
{ /* ./Cfa/setup.scm 330 */
BgL_objectz00_bglt BgL_auxz00_4318;
BgL_auxz00_4318 = 
(BgL_objectz00_bglt)(BgL_obj4596z00_1987); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4318, BgL_arg6265z00_1988); } } 
{ /* ./Cfa/setup.scm 330 */
long BgL_arg6272z00_1990;
BgL_arg6272z00_1990 = 
BGl_classzd2numzd2zz__objectz00(BGl_setqzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 330 */
BgL_objectz00_bglt BgL_objz00_2693;
BgL_objz00_2693 = 
(BgL_objectz00_bglt)(BgL_obj4596z00_1987); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2693, BgL_arg6272z00_1990); } } 
{ /* ./Cfa/setup.scm 330 */
obj_t BgL_objz00_2695;
BgL_objz00_2695 = 
(obj_t)(BgL_obj4596z00_1987); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2695); BUNSPEC; } 
BgL_auxz00_4266 = BgL_obj4596z00_1987; } 
return 
(obj_t)(BgL_auxz00_4266);} } } 
}



/* node-setup!-cast4684 */
obj_t BGl_nodezd2setupz12zd2cast4684z12zzcfa_setupz00(obj_t BgL_envz00_3380, obj_t BgL_nodez00_3381)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 318 */
{ 
BgL_castz00_bglt BgL_nodez00_1974;
BgL_nodez00_1974 = 
(BgL_castz00_bglt)(BgL_nodez00_3381); 
{ /* ./Cfa/setup.scm 319 */
BgL_nodez00_bglt BgL_arg6247z00_2611;
BgL_arg6247z00_2611 = 
(((BgL_castz00_bglt)CREF(BgL_nodez00_1974))->BgL_argz00); 
{ /* ./Cfa/setup.scm 319 */
obj_t BgL_method4631z00_2614;
{ /* ./Cfa/setup.scm 319 */
BgL_objectz00_bglt BgL_objz00_2615;
BgL_objz00_2615 = 
(BgL_objectz00_bglt)(BgL_arg6247z00_2611); 
{ /* ./Cfa/setup.scm 319 */
long BgL_objzd2classzd2numz00_2616;
BgL_objzd2classzd2numz00_2616 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2615); 
{ /* ./Cfa/setup.scm 319 */
obj_t BgL_arg2017z00_2617;
{ /* ./Cfa/setup.scm 319 */
int BgL_auxz00_4331;
BgL_auxz00_4331 = 
(int)(((long)1)); 
BgL_arg2017z00_2617 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4331); } 
{ /* ./Cfa/setup.scm 319 */
int BgL_offsetz00_2620;
BgL_offsetz00_2620 = 
(int)(BgL_objzd2classzd2numz00_2616); 
{ /* ./Cfa/setup.scm 319 */
long BgL_offsetz00_2621;
{ /* ./Cfa/setup.scm 319 */
long BgL_auxz00_4335;
BgL_auxz00_4335 = 
(long)(BgL_offsetz00_2620); 
BgL_offsetz00_2621 = 
(BgL_auxz00_4335-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 319 */
long BgL_modz00_2622;
{ /* ./Cfa/setup.scm 319 */
int BgL_arg2028z00_2623;
BgL_arg2028z00_2623 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 319 */
long BgL_n2z00_2631;
BgL_n2z00_2631 = 
(long)(BgL_arg2028z00_2623); 
BgL_modz00_2622 = 
(BgL_offsetz00_2621/BgL_n2z00_2631); } } 
{ /* ./Cfa/setup.scm 319 */
long BgL_restz00_2624;
{ /* ./Cfa/setup.scm 319 */
int BgL_arg2024z00_2625;
BgL_arg2024z00_2625 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 319 */
long BgL_n2z00_2634;
BgL_n2z00_2634 = 
(long)(BgL_arg2024z00_2625); 
BgL_restz00_2624 = 
(BgL_offsetz00_2621%BgL_n2z00_2634); } } 
{ /* ./Cfa/setup.scm 319 */

{ /* ./Cfa/setup.scm 319 */
obj_t BgL_bucketz00_2626;
{ /* ./Cfa/setup.scm 319 */
int BgL_kz00_2636;
BgL_kz00_2636 = 
(int)(BgL_modz00_2622); 
BgL_bucketz00_2626 = 
VECTOR_REF(BgL_arg2017z00_2617,BgL_kz00_2636); } 
{ /* ./Cfa/setup.scm 319 */
int BgL_kz00_2638;
BgL_kz00_2638 = 
(int)(BgL_restz00_2624); 
BgL_method4631z00_2614 = 
VECTOR_REF(BgL_bucketz00_2626,BgL_kz00_2638); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4631z00_2614)(BgL_method4631z00_2614, 
(obj_t)(BgL_arg6247z00_2611), BEOA);} } } } 
}



/* node-setup!-isa4682 */
obj_t BGl_nodezd2setupz12zd2isa4682z12zzcfa_setupz00(obj_t BgL_envz00_3382, obj_t BgL_nodez00_3383)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 308 */
{ 
BgL_isaz00_bglt BgL_nodez00_1961;
BgL_nodez00_1961 = 
(BgL_isaz00_bglt)(BgL_nodez00_3383); 
{ /* ./Cfa/setup.scm 310 */
obj_t BgL_arg6218z00_1965;
{ /* ./Cfa/setup.scm 310 */
BgL_externz00_bglt BgL_obj1836z00_2604;
BgL_obj1836z00_2604 = 
(BgL_externz00_bglt)(BgL_nodez00_1961); 
BgL_arg6218z00_1965 = 
(((BgL_externz00_bglt)CREF(BgL_obj1836z00_2604))->BgL_exprza2za2); } 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg6218z00_1965); } 
{ /* ./Cfa/setup.scm 311 */
BgL_isaz00_bglt BgL_obj4591z00_1966;
BgL_obj4591z00_1966 = 
((BgL_isaz00_bglt)BgL_nodez00_1961); 
{ /* ./Cfa/setup.scm 312 */
obj_t BgL_arg6222z00_1967;
{ /* ./Cfa/setup.scm 312 */
BgL_approxz00_bglt BgL_arg6225z00_1968;
{ /* ./Cfa/setup.scm 312 */
BgL_typez00_bglt BgL_arg6228z00_1969;
{ /* ./Cfa/setup.scm 312 */
BgL_nodez00_bglt BgL_obj1583z00_2605;
BgL_obj1583z00_2605 = 
(BgL_nodez00_bglt)(BgL_nodez00_1961); 
BgL_arg6228z00_1969 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1583z00_2605))->BgL_typez00); } 
BgL_arg6225z00_1968 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg6228z00_1969); } 
BgL_arg6222z00_1967 = 
BGl_wideningzd2isazf2Cinfoz20zzcfa_info3z00(BgL_arg6225z00_1968); } 
{ /* ./Cfa/setup.scm 311 */
BgL_objectz00_bglt BgL_auxz00_4360;
BgL_auxz00_4360 = 
(BgL_objectz00_bglt)(BgL_obj4591z00_1966); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4360, BgL_arg6222z00_1967); } } 
{ /* ./Cfa/setup.scm 311 */
long BgL_arg6232z00_1970;
BgL_arg6232z00_1970 = 
BGl_classzd2numzd2zz__objectz00(BGl_isazf2Cinfozf2zzcfa_info3z00); 
{ /* ./Cfa/setup.scm 311 */
BgL_objectz00_bglt BgL_objz00_2606;
BgL_objz00_2606 = 
(BgL_objectz00_bglt)(BgL_obj4591z00_1966); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2606, BgL_arg6232z00_1970); } } 
{ /* ./Cfa/setup.scm 311 */
obj_t BgL_objz00_2608;
BgL_objz00_2608 = 
(obj_t)(BgL_obj4591z00_1966); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2608); BUNSPEC; } BgL_obj4591z00_1966; } 
{ /* ./Cfa/setup.scm 313 */
BgL_approxz00_bglt BgL_arg6237z00_1971;
{ /* ./Cfa/setup.scm 313 */
BgL_isazf2cinfozf2_bglt BgL_obj4245z00_2609;
BgL_obj4245z00_2609 = 
(BgL_isazf2cinfozf2_bglt)(BgL_nodez00_1961); 
{ 
obj_t BgL_auxz00_4369;
{ /* ./Cfa/setup.scm 313 */
BgL_objectz00_bglt BgL_auxz00_4370;
BgL_auxz00_4370 = 
(BgL_objectz00_bglt)(BgL_obj4245z00_2609); 
BgL_auxz00_4369 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4370); } 
BgL_arg6237z00_1971 = 
(((BgL_isazf2cinfozf2_bglt)CREF(BgL_auxz00_4369))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6237z00_1971);} } } 
}



/* node-setup!-new4680 */
obj_t BGl_nodezd2setupz12zd2new4680z12zzcfa_setupz00(obj_t BgL_envz00_3384, obj_t BgL_nodez00_3385)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 298 */
{ 
BgL_newz00_bglt BgL_nodez00_1948;
BgL_nodez00_1948 = 
(BgL_newz00_bglt)(BgL_nodez00_3385); 
{ /* ./Cfa/setup.scm 300 */
obj_t BgL_arg6189z00_1952;
{ /* ./Cfa/setup.scm 300 */
BgL_externz00_bglt BgL_obj1836z00_2598;
BgL_obj1836z00_2598 = 
(BgL_externz00_bglt)(BgL_nodez00_1948); 
BgL_arg6189z00_1952 = 
(((BgL_externz00_bglt)CREF(BgL_obj1836z00_2598))->BgL_exprza2za2); } 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg6189z00_1952); } 
{ /* ./Cfa/setup.scm 301 */
BgL_newz00_bglt BgL_obj4588z00_1953;
BgL_obj4588z00_1953 = 
((BgL_newz00_bglt)BgL_nodez00_1948); 
{ /* ./Cfa/setup.scm 302 */
obj_t BgL_arg6193z00_1954;
{ /* ./Cfa/setup.scm 302 */
BgL_approxz00_bglt BgL_arg6196z00_1955;
{ /* ./Cfa/setup.scm 302 */
BgL_typez00_bglt BgL_arg6199z00_1956;
{ /* ./Cfa/setup.scm 302 */
BgL_nodez00_bglt BgL_obj1583z00_2599;
BgL_obj1583z00_2599 = 
(BgL_nodez00_bglt)(BgL_nodez00_1948); 
BgL_arg6199z00_1956 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1583z00_2599))->BgL_typez00); } 
BgL_arg6196z00_1955 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg6199z00_1956); } 
BgL_arg6193z00_1954 = 
BGl_wideningzd2newzf2Cinfoz20zzcfa_info3z00(BgL_arg6196z00_1955); } 
{ /* ./Cfa/setup.scm 301 */
BgL_objectz00_bglt BgL_auxz00_4384;
BgL_auxz00_4384 = 
(BgL_objectz00_bglt)(BgL_obj4588z00_1953); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4384, BgL_arg6193z00_1954); } } 
{ /* ./Cfa/setup.scm 301 */
long BgL_arg6203z00_1957;
BgL_arg6203z00_1957 = 
BGl_classzd2numzd2zz__objectz00(BGl_newzf2Cinfozf2zzcfa_info3z00); 
{ /* ./Cfa/setup.scm 301 */
BgL_objectz00_bglt BgL_objz00_2600;
BgL_objz00_2600 = 
(BgL_objectz00_bglt)(BgL_obj4588z00_1953); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2600, BgL_arg6203z00_1957); } } 
{ /* ./Cfa/setup.scm 301 */
obj_t BgL_objz00_2602;
BgL_objz00_2602 = 
(obj_t)(BgL_obj4588z00_1953); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2602); BUNSPEC; } BgL_obj4588z00_1953; } 
{ /* ./Cfa/setup.scm 303 */
BgL_approxz00_bglt BgL_arg6208z00_1958;
{ /* ./Cfa/setup.scm 303 */
BgL_newzf2cinfozf2_bglt BgL_obj4214z00_2603;
BgL_obj4214z00_2603 = 
(BgL_newzf2cinfozf2_bglt)(BgL_nodez00_1948); 
{ 
obj_t BgL_auxz00_4393;
{ /* ./Cfa/setup.scm 303 */
BgL_objectz00_bglt BgL_auxz00_4394;
BgL_auxz00_4394 = 
(BgL_objectz00_bglt)(BgL_obj4214z00_2603); 
BgL_auxz00_4393 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4394); } 
BgL_arg6208z00_1958 = 
(((BgL_newzf2cinfozf2_bglt)CREF(BgL_auxz00_4393))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6208z00_1958);} } } 
}



/* node-setup!-setfield4678 */
obj_t BGl_nodezd2setupz12zd2setfield4678z12zzcfa_setupz00(obj_t BgL_envz00_3386, obj_t BgL_nodez00_3387)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 288 */
{ 
BgL_setfieldz00_bglt BgL_nodez00_1935;
BgL_nodez00_1935 = 
(BgL_setfieldz00_bglt)(BgL_nodez00_3387); 
{ /* ./Cfa/setup.scm 290 */
obj_t BgL_arg6160z00_1939;
{ /* ./Cfa/setup.scm 290 */
BgL_externz00_bglt BgL_obj1836z00_2592;
BgL_obj1836z00_2592 = 
(BgL_externz00_bglt)(BgL_nodez00_1935); 
BgL_arg6160z00_1939 = 
(((BgL_externz00_bglt)CREF(BgL_obj1836z00_2592))->BgL_exprza2za2); } 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg6160z00_1939); } 
{ /* ./Cfa/setup.scm 291 */
BgL_setfieldz00_bglt BgL_obj4585z00_1940;
BgL_obj4585z00_1940 = 
((BgL_setfieldz00_bglt)BgL_nodez00_1935); 
{ /* ./Cfa/setup.scm 292 */
obj_t BgL_arg6164z00_1941;
{ /* ./Cfa/setup.scm 292 */
BgL_approxz00_bglt BgL_arg6167z00_1942;
{ /* ./Cfa/setup.scm 292 */
BgL_typez00_bglt BgL_arg6170z00_1943;
{ /* ./Cfa/setup.scm 292 */
BgL_nodez00_bglt BgL_obj1583z00_2593;
BgL_obj1583z00_2593 = 
(BgL_nodez00_bglt)(BgL_nodez00_1935); 
BgL_arg6170z00_1943 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1583z00_2593))->BgL_typez00); } 
BgL_arg6167z00_1942 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg6170z00_1943); } 
BgL_arg6164z00_1941 = 
BGl_wideningzd2setfieldzf2Cinfoz20zzcfa_info3z00(BgL_arg6167z00_1942); } 
{ /* ./Cfa/setup.scm 291 */
BgL_objectz00_bglt BgL_auxz00_4408;
BgL_auxz00_4408 = 
(BgL_objectz00_bglt)(BgL_obj4585z00_1940); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4408, BgL_arg6164z00_1941); } } 
{ /* ./Cfa/setup.scm 291 */
long BgL_arg6174z00_1944;
BgL_arg6174z00_1944 = 
BGl_classzd2numzd2zz__objectz00(BGl_setfieldzf2Cinfozf2zzcfa_info3z00); 
{ /* ./Cfa/setup.scm 291 */
BgL_objectz00_bglt BgL_objz00_2594;
BgL_objz00_2594 = 
(BgL_objectz00_bglt)(BgL_obj4585z00_1940); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2594, BgL_arg6174z00_1944); } } 
{ /* ./Cfa/setup.scm 291 */
obj_t BgL_objz00_2596;
BgL_objz00_2596 = 
(obj_t)(BgL_obj4585z00_1940); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2596); BUNSPEC; } BgL_obj4585z00_1940; } 
{ /* ./Cfa/setup.scm 293 */
BgL_approxz00_bglt BgL_arg6179z00_1945;
{ /* ./Cfa/setup.scm 293 */
BgL_setfieldzf2cinfozf2_bglt BgL_obj4181z00_2597;
BgL_obj4181z00_2597 = 
(BgL_setfieldzf2cinfozf2_bglt)(BgL_nodez00_1935); 
{ 
obj_t BgL_auxz00_4417;
{ /* ./Cfa/setup.scm 293 */
BgL_objectz00_bglt BgL_auxz00_4418;
BgL_auxz00_4418 = 
(BgL_objectz00_bglt)(BgL_obj4181z00_2597); 
BgL_auxz00_4417 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4418); } 
BgL_arg6179z00_1945 = 
(((BgL_setfieldzf2cinfozf2_bglt)CREF(BgL_auxz00_4417))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6179z00_1945);} } } 
}



/* node-setup!-getfield4676 */
obj_t BGl_nodezd2setupz12zd2getfield4676z12zzcfa_setupz00(obj_t BgL_envz00_3388, obj_t BgL_nodez00_3389)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 278 */
{ 
BgL_getfieldz00_bglt BgL_nodez00_1922;
BgL_nodez00_1922 = 
(BgL_getfieldz00_bglt)(BgL_nodez00_3389); 
{ /* ./Cfa/setup.scm 280 */
obj_t BgL_arg6131z00_1926;
{ /* ./Cfa/setup.scm 280 */
BgL_externz00_bglt BgL_obj1836z00_2586;
BgL_obj1836z00_2586 = 
(BgL_externz00_bglt)(BgL_nodez00_1922); 
BgL_arg6131z00_1926 = 
(((BgL_externz00_bglt)CREF(BgL_obj1836z00_2586))->BgL_exprza2za2); } 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg6131z00_1926); } 
{ /* ./Cfa/setup.scm 281 */
BgL_getfieldz00_bglt BgL_obj4582z00_1927;
BgL_obj4582z00_1927 = 
((BgL_getfieldz00_bglt)BgL_nodez00_1922); 
{ /* ./Cfa/setup.scm 282 */
obj_t BgL_arg6135z00_1928;
{ /* ./Cfa/setup.scm 282 */
BgL_approxz00_bglt BgL_arg6138z00_1929;
{ /* ./Cfa/setup.scm 282 */
BgL_typez00_bglt BgL_arg6141z00_1930;
{ /* ./Cfa/setup.scm 282 */
BgL_nodez00_bglt BgL_obj1583z00_2587;
BgL_obj1583z00_2587 = 
(BgL_nodez00_bglt)(BgL_nodez00_1922); 
BgL_arg6141z00_1930 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1583z00_2587))->BgL_typez00); } 
BgL_arg6138z00_1929 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg6141z00_1930); } 
BgL_arg6135z00_1928 = 
BGl_wideningzd2getfieldzf2Cinfoz20zzcfa_info3z00(BgL_arg6138z00_1929); } 
{ /* ./Cfa/setup.scm 281 */
BgL_objectz00_bglt BgL_auxz00_4432;
BgL_auxz00_4432 = 
(BgL_objectz00_bglt)(BgL_obj4582z00_1927); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4432, BgL_arg6135z00_1928); } } 
{ /* ./Cfa/setup.scm 281 */
long BgL_arg6145z00_1931;
BgL_arg6145z00_1931 = 
BGl_classzd2numzd2zz__objectz00(BGl_getfieldzf2Cinfozf2zzcfa_info3z00); 
{ /* ./Cfa/setup.scm 281 */
BgL_objectz00_bglt BgL_objz00_2588;
BgL_objz00_2588 = 
(BgL_objectz00_bglt)(BgL_obj4582z00_1927); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2588, BgL_arg6145z00_1931); } } 
{ /* ./Cfa/setup.scm 281 */
obj_t BgL_objz00_2590;
BgL_objz00_2590 = 
(obj_t)(BgL_obj4582z00_1927); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2590); BUNSPEC; } BgL_obj4582z00_1927; } 
{ /* ./Cfa/setup.scm 283 */
BgL_approxz00_bglt BgL_arg6150z00_1932;
{ /* ./Cfa/setup.scm 283 */
BgL_getfieldzf2cinfozf2_bglt BgL_obj4145z00_2591;
BgL_obj4145z00_2591 = 
(BgL_getfieldzf2cinfozf2_bglt)(BgL_nodez00_1922); 
{ 
obj_t BgL_auxz00_4441;
{ /* ./Cfa/setup.scm 283 */
BgL_objectz00_bglt BgL_auxz00_4442;
BgL_auxz00_4442 = 
(BgL_objectz00_bglt)(BgL_obj4145z00_2591); 
BgL_auxz00_4441 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4442); } 
BgL_arg6150z00_1932 = 
(((BgL_getfieldzf2cinfozf2_bglt)CREF(BgL_auxz00_4441))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6150z00_1932);} } } 
}



/* node-setup!-pragma4674 */
obj_t BGl_nodezd2setupz12zd2pragma4674z12zzcfa_setupz00(obj_t BgL_envz00_3390, obj_t BgL_nodez00_3391)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 268 */
{ 
BgL_pragmaz00_bglt BgL_nodez00_1909;
BgL_nodez00_1909 = 
(BgL_pragmaz00_bglt)(BgL_nodez00_3391); 
{ /* ./Cfa/setup.scm 270 */
obj_t BgL_arg6102z00_1913;
{ /* ./Cfa/setup.scm 270 */
BgL_externz00_bglt BgL_obj1836z00_2580;
BgL_obj1836z00_2580 = 
(BgL_externz00_bglt)(BgL_nodez00_1909); 
BgL_arg6102z00_1913 = 
(((BgL_externz00_bglt)CREF(BgL_obj1836z00_2580))->BgL_exprza2za2); } 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg6102z00_1913); } 
{ /* ./Cfa/setup.scm 271 */
BgL_pragmaz00_bglt BgL_obj4579z00_1914;
BgL_obj4579z00_1914 = 
((BgL_pragmaz00_bglt)BgL_nodez00_1909); 
{ /* ./Cfa/setup.scm 272 */
obj_t BgL_arg6106z00_1915;
{ /* ./Cfa/setup.scm 272 */
BgL_approxz00_bglt BgL_arg6109z00_1916;
{ /* ./Cfa/setup.scm 272 */
BgL_typez00_bglt BgL_arg6112z00_1917;
{ /* ./Cfa/setup.scm 272 */
BgL_nodez00_bglt BgL_obj1583z00_2581;
BgL_obj1583z00_2581 = 
(BgL_nodez00_bglt)(BgL_nodez00_1909); 
BgL_arg6112z00_1917 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1583z00_2581))->BgL_typez00); } 
BgL_arg6109z00_1916 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg6112z00_1917); } 
BgL_arg6106z00_1915 = 
BGl_wideningzd2pragmazf2Cinfoz20zzcfa_info3z00(BgL_arg6109z00_1916); } 
{ /* ./Cfa/setup.scm 271 */
BgL_objectz00_bglt BgL_auxz00_4456;
BgL_auxz00_4456 = 
(BgL_objectz00_bglt)(BgL_obj4579z00_1914); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4456, BgL_arg6106z00_1915); } } 
{ /* ./Cfa/setup.scm 271 */
long BgL_arg6116z00_1918;
BgL_arg6116z00_1918 = 
BGl_classzd2numzd2zz__objectz00(BGl_pragmazf2Cinfozf2zzcfa_info3z00); 
{ /* ./Cfa/setup.scm 271 */
BgL_objectz00_bglt BgL_objz00_2582;
BgL_objz00_2582 = 
(BgL_objectz00_bglt)(BgL_obj4579z00_1914); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2582, BgL_arg6116z00_1918); } } 
{ /* ./Cfa/setup.scm 271 */
obj_t BgL_objz00_2584;
BgL_objz00_2584 = 
(obj_t)(BgL_obj4579z00_1914); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2584); BUNSPEC; } BgL_obj4579z00_1914; } 
{ /* ./Cfa/setup.scm 273 */
BgL_approxz00_bglt BgL_arg6121z00_1919;
{ /* ./Cfa/setup.scm 273 */
BgL_pragmazf2cinfozf2_bglt BgL_obj4111z00_2585;
BgL_obj4111z00_2585 = 
(BgL_pragmazf2cinfozf2_bglt)(BgL_nodez00_1909); 
{ 
obj_t BgL_auxz00_4465;
{ /* ./Cfa/setup.scm 273 */
BgL_objectz00_bglt BgL_auxz00_4466;
BgL_auxz00_4466 = 
(BgL_objectz00_bglt)(BgL_obj4111z00_2585); 
BgL_auxz00_4465 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4466); } 
BgL_arg6121z00_1919 = 
(((BgL_pragmazf2cinfozf2_bglt)CREF(BgL_auxz00_4465))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6121z00_1919);} } } 
}



/* node-setup!-funcall4672 */
obj_t BGl_nodezd2setupz12zd2funcall4672z12zzcfa_setupz00(obj_t BgL_envz00_3392, obj_t BgL_nodez00_3393)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 256 */
{ 
BgL_funcallz00_bglt BgL_nodez00_1893;
BgL_nodez00_1893 = 
(BgL_funcallz00_bglt)(BgL_nodez00_3393); 
{ /* ./Cfa/setup.scm 258 */
BgL_nodez00_bglt BgL_arg6068z00_1897;
BgL_arg6068z00_1897 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1893))->BgL_funz00); 
{ /* ./Cfa/setup.scm 258 */
obj_t BgL_method4631z00_2550;
{ /* ./Cfa/setup.scm 258 */
BgL_objectz00_bglt BgL_objz00_2551;
BgL_objz00_2551 = 
(BgL_objectz00_bglt)(BgL_arg6068z00_1897); 
{ /* ./Cfa/setup.scm 258 */
long BgL_objzd2classzd2numz00_2552;
BgL_objzd2classzd2numz00_2552 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2551); 
{ /* ./Cfa/setup.scm 258 */
obj_t BgL_arg2017z00_2553;
{ /* ./Cfa/setup.scm 258 */
int BgL_auxz00_4475;
BgL_auxz00_4475 = 
(int)(((long)1)); 
BgL_arg2017z00_2553 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4475); } 
{ /* ./Cfa/setup.scm 258 */
int BgL_offsetz00_2556;
BgL_offsetz00_2556 = 
(int)(BgL_objzd2classzd2numz00_2552); 
{ /* ./Cfa/setup.scm 258 */
long BgL_offsetz00_2557;
{ /* ./Cfa/setup.scm 258 */
long BgL_auxz00_4479;
BgL_auxz00_4479 = 
(long)(BgL_offsetz00_2556); 
BgL_offsetz00_2557 = 
(BgL_auxz00_4479-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 258 */
long BgL_modz00_2558;
{ /* ./Cfa/setup.scm 258 */
int BgL_arg2028z00_2559;
BgL_arg2028z00_2559 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 258 */
long BgL_n2z00_2567;
BgL_n2z00_2567 = 
(long)(BgL_arg2028z00_2559); 
BgL_modz00_2558 = 
(BgL_offsetz00_2557/BgL_n2z00_2567); } } 
{ /* ./Cfa/setup.scm 258 */
long BgL_restz00_2560;
{ /* ./Cfa/setup.scm 258 */
int BgL_arg2024z00_2561;
BgL_arg2024z00_2561 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 258 */
long BgL_n2z00_2570;
BgL_n2z00_2570 = 
(long)(BgL_arg2024z00_2561); 
BgL_restz00_2560 = 
(BgL_offsetz00_2557%BgL_n2z00_2570); } } 
{ /* ./Cfa/setup.scm 258 */

{ /* ./Cfa/setup.scm 258 */
obj_t BgL_bucketz00_2562;
{ /* ./Cfa/setup.scm 258 */
int BgL_kz00_2572;
BgL_kz00_2572 = 
(int)(BgL_modz00_2558); 
BgL_bucketz00_2562 = 
VECTOR_REF(BgL_arg2017z00_2553,BgL_kz00_2572); } 
{ /* ./Cfa/setup.scm 258 */
int BgL_kz00_2574;
BgL_kz00_2574 = 
(int)(BgL_restz00_2560); 
BgL_method4631z00_2550 = 
VECTOR_REF(BgL_bucketz00_2562,BgL_kz00_2574); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2550)(BgL_method4631z00_2550, 
(obj_t)(BgL_arg6068z00_1897), BEOA); } } 
{ /* ./Cfa/setup.scm 259 */
obj_t BgL_arg6072z00_1898;
BgL_arg6072z00_1898 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1893))->BgL_argsz00); 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg6072z00_1898); } 
{ /* ./Cfa/setup.scm 260 */
BgL_funcallz00_bglt BgL_obj4576z00_1899;
BgL_obj4576z00_1899 = 
((BgL_funcallz00_bglt)BgL_nodez00_1893); 
{ /* ./Cfa/setup.scm 261 */
obj_t BgL_arg6076z00_1900;
{ /* ./Cfa/setup.scm 261 */
BgL_approxz00_bglt BgL_arg6079z00_1901;BgL_approxz00_bglt BgL_arg6080z00_1902;bool_t BgL_arg6081z00_1903;bool_t BgL_arg6082z00_1904;
BgL_arg6079z00_1901 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00)); 
BgL_arg6080z00_1902 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00)); 
if(
CBOOL(BGl_za2warningza2z00zz__errorz00))
{ /* ./Cfa/cinfo.scm 84 */
BgL_arg6081z00_1903 = ((bool_t)0); }  else 
{ /* ./Cfa/cinfo.scm 84 */
BgL_arg6081z00_1903 = ((bool_t)1); } 
if(
CBOOL(BGl_za2warningza2z00zz__errorz00))
{ /* ./Cfa/cinfo.scm 85 */
BgL_arg6082z00_1904 = ((bool_t)0); }  else 
{ /* ./Cfa/cinfo.scm 85 */
BgL_arg6082z00_1904 = ((bool_t)1); } 
BgL_arg6076z00_1900 = 
BGl_wideningzd2funcallzf2Cinfoz20zzcfa_infoz00(BgL_arg6079z00_1901, BgL_arg6080z00_1902, BgL_arg6081z00_1903, BgL_arg6082z00_1904); } 
{ /* ./Cfa/setup.scm 260 */
BgL_objectz00_bglt BgL_auxz00_4507;
BgL_auxz00_4507 = 
(BgL_objectz00_bglt)(BgL_obj4576z00_1899); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4507, BgL_arg6076z00_1900); } } 
{ /* ./Cfa/setup.scm 260 */
long BgL_arg6087z00_1905;
BgL_arg6087z00_1905 = 
BGl_classzd2numzd2zz__objectz00(BGl_funcallzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 260 */
BgL_objectz00_bglt BgL_objz00_2576;
BgL_objz00_2576 = 
(BgL_objectz00_bglt)(BgL_obj4576z00_1899); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2576, BgL_arg6087z00_1905); } } 
{ /* ./Cfa/setup.scm 260 */
obj_t BgL_objz00_2578;
BgL_objz00_2578 = 
(obj_t)(BgL_obj4576z00_1899); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2578); BUNSPEC; } BgL_obj4576z00_1899; } 
{ /* ./Cfa/setup.scm 263 */
BgL_approxz00_bglt BgL_arg6092z00_1906;
{ /* ./Cfa/setup.scm 263 */
BgL_funcallzf2cinfozf2_bglt BgL_obj3164z00_2579;
BgL_obj3164z00_2579 = 
(BgL_funcallzf2cinfozf2_bglt)(BgL_nodez00_1893); 
{ 
obj_t BgL_auxz00_4516;
{ /* ./Cfa/setup.scm 263 */
BgL_objectz00_bglt BgL_auxz00_4517;
BgL_auxz00_4517 = 
(BgL_objectz00_bglt)(BgL_obj3164z00_2579); 
BgL_auxz00_4516 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4517); } 
BgL_arg6092z00_1906 = 
(((BgL_funcallzf2cinfozf2_bglt)CREF(BgL_auxz00_4516))->BgL_vazd2approxzd2); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6092z00_1906);} } } 
}



/* node-setup!-app-ly4670 */
obj_t BGl_nodezd2setupz12zd2appzd2ly4670zc0zzcfa_setupz00(obj_t BgL_envz00_3394, obj_t BgL_nodez00_3395)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 245 */
{ 
BgL_appzd2lyzd2_bglt BgL_nodez00_1880;
BgL_nodez00_1880 = 
(BgL_appzd2lyzd2_bglt)(BgL_nodez00_3395); 
{ /* ./Cfa/setup.scm 247 */
BgL_nodez00_bglt BgL_arg6038z00_1884;
BgL_arg6038z00_1884 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1880))->BgL_funz00); 
{ /* ./Cfa/setup.scm 247 */
obj_t BgL_method4631z00_2492;
{ /* ./Cfa/setup.scm 247 */
BgL_objectz00_bglt BgL_objz00_2493;
BgL_objz00_2493 = 
(BgL_objectz00_bglt)(BgL_arg6038z00_1884); 
{ /* ./Cfa/setup.scm 247 */
long BgL_objzd2classzd2numz00_2494;
BgL_objzd2classzd2numz00_2494 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2493); 
{ /* ./Cfa/setup.scm 247 */
obj_t BgL_arg2017z00_2495;
{ /* ./Cfa/setup.scm 247 */
int BgL_auxz00_4526;
BgL_auxz00_4526 = 
(int)(((long)1)); 
BgL_arg2017z00_2495 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4526); } 
{ /* ./Cfa/setup.scm 247 */
int BgL_offsetz00_2498;
BgL_offsetz00_2498 = 
(int)(BgL_objzd2classzd2numz00_2494); 
{ /* ./Cfa/setup.scm 247 */
long BgL_offsetz00_2499;
{ /* ./Cfa/setup.scm 247 */
long BgL_auxz00_4530;
BgL_auxz00_4530 = 
(long)(BgL_offsetz00_2498); 
BgL_offsetz00_2499 = 
(BgL_auxz00_4530-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 247 */
long BgL_modz00_2500;
{ /* ./Cfa/setup.scm 247 */
int BgL_arg2028z00_2501;
BgL_arg2028z00_2501 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 247 */
long BgL_n2z00_2509;
BgL_n2z00_2509 = 
(long)(BgL_arg2028z00_2501); 
BgL_modz00_2500 = 
(BgL_offsetz00_2499/BgL_n2z00_2509); } } 
{ /* ./Cfa/setup.scm 247 */
long BgL_restz00_2502;
{ /* ./Cfa/setup.scm 247 */
int BgL_arg2024z00_2503;
BgL_arg2024z00_2503 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 247 */
long BgL_n2z00_2512;
BgL_n2z00_2512 = 
(long)(BgL_arg2024z00_2503); 
BgL_restz00_2502 = 
(BgL_offsetz00_2499%BgL_n2z00_2512); } } 
{ /* ./Cfa/setup.scm 247 */

{ /* ./Cfa/setup.scm 247 */
obj_t BgL_bucketz00_2504;
{ /* ./Cfa/setup.scm 247 */
int BgL_kz00_2514;
BgL_kz00_2514 = 
(int)(BgL_modz00_2500); 
BgL_bucketz00_2504 = 
VECTOR_REF(BgL_arg2017z00_2495,BgL_kz00_2514); } 
{ /* ./Cfa/setup.scm 247 */
int BgL_kz00_2516;
BgL_kz00_2516 = 
(int)(BgL_restz00_2502); 
BgL_method4631z00_2492 = 
VECTOR_REF(BgL_bucketz00_2504,BgL_kz00_2516); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2492)(BgL_method4631z00_2492, 
(obj_t)(BgL_arg6038z00_1884), BEOA); } } 
{ /* ./Cfa/setup.scm 248 */
BgL_nodez00_bglt BgL_arg6042z00_1885;
BgL_arg6042z00_1885 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1880))->BgL_argz00); 
{ /* ./Cfa/setup.scm 248 */
obj_t BgL_method4631z00_2519;
{ /* ./Cfa/setup.scm 248 */
BgL_objectz00_bglt BgL_objz00_2520;
BgL_objz00_2520 = 
(BgL_objectz00_bglt)(BgL_arg6042z00_1885); 
{ /* ./Cfa/setup.scm 248 */
long BgL_objzd2classzd2numz00_2521;
BgL_objzd2classzd2numz00_2521 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2520); 
{ /* ./Cfa/setup.scm 248 */
obj_t BgL_arg2017z00_2522;
{ /* ./Cfa/setup.scm 248 */
int BgL_auxz00_4549;
BgL_auxz00_4549 = 
(int)(((long)1)); 
BgL_arg2017z00_2522 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4549); } 
{ /* ./Cfa/setup.scm 248 */
int BgL_offsetz00_2525;
BgL_offsetz00_2525 = 
(int)(BgL_objzd2classzd2numz00_2521); 
{ /* ./Cfa/setup.scm 248 */
long BgL_offsetz00_2526;
{ /* ./Cfa/setup.scm 248 */
long BgL_auxz00_4553;
BgL_auxz00_4553 = 
(long)(BgL_offsetz00_2525); 
BgL_offsetz00_2526 = 
(BgL_auxz00_4553-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 248 */
long BgL_modz00_2527;
{ /* ./Cfa/setup.scm 248 */
int BgL_arg2028z00_2528;
BgL_arg2028z00_2528 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 248 */
long BgL_n2z00_2536;
BgL_n2z00_2536 = 
(long)(BgL_arg2028z00_2528); 
BgL_modz00_2527 = 
(BgL_offsetz00_2526/BgL_n2z00_2536); } } 
{ /* ./Cfa/setup.scm 248 */
long BgL_restz00_2529;
{ /* ./Cfa/setup.scm 248 */
int BgL_arg2024z00_2530;
BgL_arg2024z00_2530 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 248 */
long BgL_n2z00_2539;
BgL_n2z00_2539 = 
(long)(BgL_arg2024z00_2530); 
BgL_restz00_2529 = 
(BgL_offsetz00_2526%BgL_n2z00_2539); } } 
{ /* ./Cfa/setup.scm 248 */

{ /* ./Cfa/setup.scm 248 */
obj_t BgL_bucketz00_2531;
{ /* ./Cfa/setup.scm 248 */
int BgL_kz00_2541;
BgL_kz00_2541 = 
(int)(BgL_modz00_2527); 
BgL_bucketz00_2531 = 
VECTOR_REF(BgL_arg2017z00_2522,BgL_kz00_2541); } 
{ /* ./Cfa/setup.scm 248 */
int BgL_kz00_2543;
BgL_kz00_2543 = 
(int)(BgL_restz00_2529); 
BgL_method4631z00_2519 = 
VECTOR_REF(BgL_bucketz00_2531,BgL_kz00_2543); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2519)(BgL_method4631z00_2519, 
(obj_t)(BgL_arg6042z00_1885), BEOA); } } 
{ /* ./Cfa/setup.scm 249 */
BgL_appzd2lyzd2_bglt BgL_obj4573z00_1886;
BgL_obj4573z00_1886 = 
((BgL_appzd2lyzd2_bglt)BgL_nodez00_1880); 
{ /* ./Cfa/setup.scm 250 */
obj_t BgL_arg6046z00_1887;
{ /* ./Cfa/setup.scm 250 */
BgL_approxz00_bglt BgL_arg6049z00_1888;
BgL_arg6049z00_1888 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00)); 
BgL_arg6046z00_1887 = 
BGl_wideningzd2appzd2lyzf2Cinfozf2zzcfa_infoz00(BgL_arg6049z00_1888); } 
{ /* ./Cfa/setup.scm 249 */
BgL_objectz00_bglt BgL_auxz00_4573;
BgL_auxz00_4573 = 
(BgL_objectz00_bglt)(BgL_obj4573z00_1886); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4573, BgL_arg6046z00_1887); } } 
{ /* ./Cfa/setup.scm 249 */
long BgL_arg6053z00_1889;
BgL_arg6053z00_1889 = 
BGl_classzd2numzd2zz__objectz00(BGl_appzd2lyzf2Cinfoz20zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 249 */
BgL_objectz00_bglt BgL_objz00_2544;
BgL_objz00_2544 = 
(BgL_objectz00_bglt)(BgL_obj4573z00_1886); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2544, BgL_arg6053z00_1889); } } 
{ /* ./Cfa/setup.scm 249 */
obj_t BgL_objz00_2546;
BgL_objz00_2546 = 
(obj_t)(BgL_obj4573z00_1886); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2546); BUNSPEC; } BgL_obj4573z00_1886; } 
{ /* ./Cfa/setup.scm 251 */
BgL_approxz00_bglt BgL_arg6058z00_1890;
{ /* ./Cfa/setup.scm 251 */
BgL_appzd2lyzf2cinfoz20_bglt BgL_obj3131z00_2547;
BgL_obj3131z00_2547 = 
(BgL_appzd2lyzf2cinfoz20_bglt)(BgL_nodez00_1880); 
{ 
obj_t BgL_auxz00_4582;
{ /* ./Cfa/setup.scm 251 */
BgL_objectz00_bglt BgL_auxz00_4583;
BgL_auxz00_4583 = 
(BgL_objectz00_bglt)(BgL_obj3131z00_2547); 
BgL_auxz00_4582 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4583); } 
BgL_arg6058z00_1890 = 
(((BgL_appzd2lyzf2cinfoz20_bglt)CREF(BgL_auxz00_4582))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg6058z00_1890);} } } 
}



/* fun-setup!-cfun4668 */
obj_t BGl_funzd2setupz12zd2cfun4668z12zzcfa_setupz00(obj_t BgL_envz00_3396, obj_t BgL_funz00_3397, obj_t BgL_varz00_3398)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 234 */
{ 
BgL_cfunz00_bglt BgL_funz00_1863;obj_t BgL_varz00_1864;
{ /* ./Cfa/setup.scm 235 */
BgL_cfunz00_bglt BgL_auxz00_4589;
BgL_funz00_1863 = 
(BgL_cfunz00_bglt)(BgL_funz00_3397); 
BgL_varz00_1864 = BgL_varz00_3398; 
{ /* ./Cfa/setup.scm 235 */
bool_t BgL_test6002z00_1867;
BgL_test6002z00_1867 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_1864, BGl_reshapedzd2globalzd2zzcfa_infoz00); 
if(BgL_test6002z00_1867)
{ /* ./Cfa/setup.scm 235 */BFALSE; }  else 
{ /* ./Cfa/setup.scm 236 */
BgL_globalz00_bglt BgL_obj4569z00_1868;
{ 
BgL_globalz00_bglt BgL_auxz00_4592;
BgL_auxz00_4592 = 
(BgL_globalz00_bglt)(BgL_varz00_1864); 
BgL_obj4569z00_1868 = 
((BgL_globalz00_bglt)BgL_auxz00_4592); } 
{ /* ./Cfa/setup.scm 236 */
obj_t BgL_arg6004z00_1869;
BgL_arg6004z00_1869 = 
BGl_wideningzd2reshapedzd2globalz00zzcfa_infoz00(); 
{ /* ./Cfa/setup.scm 236 */
BgL_objectz00_bglt BgL_auxz00_4596;
BgL_auxz00_4596 = 
(BgL_objectz00_bglt)(BgL_obj4569z00_1868); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4596, BgL_arg6004z00_1869); } } 
{ /* ./Cfa/setup.scm 236 */
long BgL_arg6008z00_1870;
BgL_arg6008z00_1870 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2globalzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 236 */
BgL_objectz00_bglt BgL_objz00_2482;
BgL_objz00_2482 = 
(BgL_objectz00_bglt)(BgL_obj4569z00_1868); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2482, BgL_arg6008z00_1870); } } 
{ /* ./Cfa/setup.scm 236 */
obj_t BgL_objz00_2484;
BgL_objz00_2484 = 
(obj_t)(BgL_obj4569z00_1868); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2484); BUNSPEC; } 
(obj_t)(BgL_obj4569z00_1868); } } 
{ /* ./Cfa/setup.scm 237 */
BgL_approxz00_bglt BgL_approxz00_1871;
{ /* ./Cfa/setup.scm 237 */
BgL_typez00_bglt BgL_arg6028z00_1877;
{ /* ./Cfa/setup.scm 237 */
BgL_variablez00_bglt BgL_obj1117z00_2485;
BgL_obj1117z00_2485 = 
(BgL_variablez00_bglt)(BgL_varz00_1864); 
BgL_arg6028z00_1877 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2485))->BgL_typez00); } 
BgL_approxz00_1871 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg6028z00_1877); } 
{ /* ./Cfa/setup.scm 238 */
bool_t BgL_test6013z00_1872;
{ /* ./Cfa/setup.scm 238 */
BgL_funz00_bglt BgL_obj1333z00_2486;
BgL_obj1333z00_2486 = 
(BgL_funz00_bglt)(BgL_funz00_1863); 
BgL_test6013z00_1872 = 
(((BgL_funz00_bglt)CREF(BgL_obj1333z00_2486))->BgL_topzf3zf3); } 
if(BgL_test6013z00_1872)
{ /* ./Cfa/setup.scm 238 */
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_approxz00_1871); }  else 
{ /* ./Cfa/setup.scm 238 */BFALSE; } } 
{ /* ./Cfa/setup.scm 239 */
BgL_cfunz00_bglt BgL_obj4570z00_1873;
BgL_obj4570z00_1873 = 
((BgL_cfunz00_bglt)BgL_funz00_1863); 
{ /* ./Cfa/setup.scm 240 */
obj_t BgL_arg6017z00_1874;
{ /* ./Cfa/setup.scm 240 */
BgL_approxz00_bglt BgL_arg6020z00_1875;
BgL_arg6020z00_1875 = BgL_approxz00_1871; 
BgL_arg6017z00_1874 = 
BGl_wideningzd2cfunzf2Cinfoz20zzcfa_infoz00(BgL_arg6020z00_1875); } 
{ /* ./Cfa/setup.scm 239 */
BgL_objectz00_bglt BgL_auxz00_4614;
BgL_auxz00_4614 = 
(BgL_objectz00_bglt)(BgL_obj4570z00_1873); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4614, BgL_arg6017z00_1874); } } 
{ /* ./Cfa/setup.scm 239 */
long BgL_arg6023z00_1876;
BgL_arg6023z00_1876 = 
BGl_classzd2numzd2zz__objectz00(BGl_cfunzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 239 */
BgL_objectz00_bglt BgL_objz00_2487;
BgL_objz00_2487 = 
(BgL_objectz00_bglt)(BgL_obj4570z00_1873); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2487, BgL_arg6023z00_1876); } } 
{ /* ./Cfa/setup.scm 239 */
obj_t BgL_objz00_2489;
BgL_objz00_2489 = 
(obj_t)(BgL_obj4570z00_1873); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2489); BUNSPEC; } 
BgL_auxz00_4589 = BgL_obj4570z00_1873; } } 
return 
(obj_t)(BgL_auxz00_4589);} } } 
}



/* fun-setup!-sfun4665 */
obj_t BGl_funzd2setupz12zd2sfun4665z12zzcfa_setupz00(obj_t BgL_envz00_3399, obj_t BgL_funz00_3400, obj_t BgL_varz00_3401)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 220 */
{ 
BgL_sfunz00_bglt BgL_funz00_1834;obj_t BgL_varz00_1835;
{ /* ./Cfa/setup.scm 221 */
BgL_sfunz00_bglt BgL_auxz00_4624;
BgL_funz00_1834 = 
(BgL_sfunz00_bglt)(BgL_funz00_3400); 
BgL_varz00_1835 = BgL_varz00_3401; 
{ /* ./Cfa/setup.scm 221 */
bool_t BgL_test5940z00_1838;
{ /* ./Cfa/setup.scm 221 */
bool_t BgL_test5950z00_1842;
BgL_test5950z00_1842 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_1835, BGl_globalz00zzast_varz00); 
if(BgL_test5950z00_1842)
{ /* ./Cfa/setup.scm 221 */
bool_t BgL_test5951z00_1843;
BgL_test5951z00_1843 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_1835, BGl_reshapedzd2globalzd2zzcfa_infoz00); 
if(BgL_test5951z00_1843)
{ /* ./Cfa/setup.scm 221 */
BgL_test5940z00_1838 = ((bool_t)0); }  else 
{ /* ./Cfa/setup.scm 221 */
BgL_test5940z00_1838 = ((bool_t)1); } }  else 
{ /* ./Cfa/setup.scm 221 */
BgL_test5940z00_1838 = ((bool_t)0); } } 
if(BgL_test5940z00_1838)
{ /* ./Cfa/setup.scm 222 */
BgL_globalz00_bglt BgL_obj4566z00_1839;
{ 
BgL_globalz00_bglt BgL_auxz00_4630;
BgL_auxz00_4630 = 
(BgL_globalz00_bglt)(BgL_varz00_1835); 
BgL_obj4566z00_1839 = 
((BgL_globalz00_bglt)BgL_auxz00_4630); } 
{ /* ./Cfa/setup.scm 222 */
obj_t BgL_arg5942z00_1840;
BgL_arg5942z00_1840 = 
BGl_wideningzd2reshapedzd2globalz00zzcfa_infoz00(); 
{ /* ./Cfa/setup.scm 222 */
BgL_objectz00_bglt BgL_auxz00_4634;
BgL_auxz00_4634 = 
(BgL_objectz00_bglt)(BgL_obj4566z00_1839); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4634, BgL_arg5942z00_1840); } } 
{ /* ./Cfa/setup.scm 222 */
long BgL_arg5946z00_1841;
BgL_arg5946z00_1841 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2globalzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 222 */
BgL_objectz00_bglt BgL_objz00_2467;
BgL_objz00_2467 = 
(BgL_objectz00_bglt)(BgL_obj4566z00_1839); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2467, BgL_arg5946z00_1841); } } 
{ /* ./Cfa/setup.scm 222 */
obj_t BgL_objz00_2469;
BgL_objz00_2469 = 
(obj_t)(BgL_obj4566z00_1839); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2469); BUNSPEC; } 
(obj_t)(BgL_obj4566z00_1839); }  else 
{ /* ./Cfa/setup.scm 221 */BFALSE; } } 
{ /* ./Cfa/setup.scm 223 */
bool_t BgL_test5954z00_1844;
{ /* ./Cfa/setup.scm 223 */
bool_t BgL_test5989z00_1858;
BgL_test5989z00_1858 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_1835, BGl_globalz00zzast_varz00); 
if(BgL_test5989z00_1858)
{ /* ./Cfa/setup.scm 223 */
obj_t BgL_auxz00_4648;obj_t BgL_auxz00_4645;
BgL_auxz00_4648 = 
CNST_TABLE_REF(((long)1)); 
{ /* ./Cfa/setup.scm 223 */
BgL_globalz00_bglt BgL_obj1189z00_2471;
BgL_obj1189z00_2471 = 
(BgL_globalz00_bglt)(BgL_varz00_1835); 
BgL_auxz00_4645 = 
(((BgL_globalz00_bglt)CREF(BgL_obj1189z00_2471))->BgL_importz00); } 
BgL_test5954z00_1844 = 
(BgL_auxz00_4645==BgL_auxz00_4648); }  else 
{ /* ./Cfa/setup.scm 223 */
BgL_test5954z00_1844 = ((bool_t)0); } } 
if(BgL_test5954z00_1844)
{ /* ./Cfa/setup.scm 224 */
BgL_approxz00_bglt BgL_approxz00_1845;
{ /* ./Cfa/setup.scm 224 */
BgL_typez00_bglt BgL_arg5970z00_1851;
{ /* ./Cfa/setup.scm 224 */
BgL_variablez00_bglt BgL_obj1117z00_2472;
BgL_obj1117z00_2472 = 
(BgL_variablez00_bglt)(BgL_varz00_1835); 
BgL_arg5970z00_1851 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2472))->BgL_typez00); } 
BgL_approxz00_1845 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5970z00_1851); } 
{ /* ./Cfa/setup.scm 225 */
bool_t BgL_test5955z00_1846;
{ /* ./Cfa/setup.scm 225 */
BgL_funz00_bglt BgL_obj1333z00_2473;
BgL_obj1333z00_2473 = 
(BgL_funz00_bglt)(BgL_funz00_1834); 
BgL_test5955z00_1846 = 
(((BgL_funz00_bglt)CREF(BgL_obj1333z00_2473))->BgL_topzf3zf3); } 
if(BgL_test5955z00_1846)
{ /* ./Cfa/setup.scm 225 */
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_approxz00_1845); }  else 
{ /* ./Cfa/setup.scm 225 */BFALSE; } } 
{ /* ./Cfa/setup.scm 226 */
BgL_sfunz00_bglt BgL_obj4567z00_1847;
BgL_obj4567z00_1847 = 
((BgL_sfunz00_bglt)BgL_funz00_1834); 
{ /* ./Cfa/setup.scm 227 */
obj_t BgL_arg5959z00_1848;
{ /* ./Cfa/setup.scm 227 */
BgL_approxz00_bglt BgL_arg5962z00_1849;
BgL_arg5962z00_1849 = BgL_approxz00_1845; 
BgL_arg5959z00_1848 = 
BGl_wideningzd2externzd2sfunzf2Cinfozf2zzcfa_infoz00(BgL_arg5962z00_1849); } 
{ /* ./Cfa/setup.scm 226 */
BgL_objectz00_bglt BgL_auxz00_4661;
BgL_auxz00_4661 = 
(BgL_objectz00_bglt)(BgL_obj4567z00_1847); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4661, BgL_arg5959z00_1848); } } 
{ /* ./Cfa/setup.scm 226 */
long BgL_arg5965z00_1850;
BgL_arg5965z00_1850 = 
BGl_classzd2numzd2zz__objectz00(BGl_externzd2sfunzf2Cinfoz20zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 226 */
BgL_objectz00_bglt BgL_objz00_2474;
BgL_objz00_2474 = 
(BgL_objectz00_bglt)(BgL_obj4567z00_1847); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2474, BgL_arg5965z00_1850); } } 
{ /* ./Cfa/setup.scm 226 */
obj_t BgL_objz00_2476;
BgL_objz00_2476 = 
(obj_t)(BgL_obj4567z00_1847); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2476); BUNSPEC; } 
BgL_auxz00_4624 = BgL_obj4567z00_1847; } }  else 
{ /* ./Cfa/setup.scm 228 */
BgL_sfunz00_bglt BgL_obj4568z00_1852;
BgL_obj4568z00_1852 = 
((BgL_sfunz00_bglt)BgL_funz00_1834); 
{ /* ./Cfa/setup.scm 229 */
obj_t BgL_arg5974z00_1853;
{ /* ./Cfa/setup.scm 229 */
BgL_approxz00_bglt BgL_arg5977z00_1854;
{ /* ./Cfa/setup.scm 229 */
BgL_typez00_bglt BgL_arg5981z00_1856;
{ /* ./Cfa/setup.scm 229 */
BgL_variablez00_bglt BgL_obj1117z00_2477;
BgL_obj1117z00_2477 = 
(BgL_variablez00_bglt)(BgL_varz00_1835); 
BgL_arg5981z00_1856 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2477))->BgL_typez00); } 
BgL_arg5977z00_1854 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5981z00_1856); } 
BgL_arg5974z00_1853 = 
BGl_wideningzd2internzd2sfunzf2Cinfozf2zzcfa_infoz00(BgL_arg5977z00_1854, ((long)-1)); } 
{ /* ./Cfa/setup.scm 228 */
BgL_objectz00_bglt BgL_auxz00_4674;
BgL_auxz00_4674 = 
(BgL_objectz00_bglt)(BgL_obj4568z00_1852); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4674, BgL_arg5974z00_1853); } } 
{ /* ./Cfa/setup.scm 228 */
long BgL_arg5985z00_1857;
BgL_arg5985z00_1857 = 
BGl_classzd2numzd2zz__objectz00(BGl_internzd2sfunzf2Cinfoz20zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 228 */
BgL_objectz00_bglt BgL_objz00_2478;
BgL_objz00_2478 = 
(BgL_objectz00_bglt)(BgL_obj4568z00_1852); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2478, BgL_arg5985z00_1857); } } 
{ /* ./Cfa/setup.scm 228 */
obj_t BgL_objz00_2480;
BgL_objz00_2480 = 
(obj_t)(BgL_obj4568z00_1852); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2480); BUNSPEC; } 
BgL_auxz00_4624 = BgL_obj4568z00_1852; } } 
return 
(obj_t)(BgL_auxz00_4624);} } } 
}



/* node-setup!-app4661 */
obj_t BGl_nodezd2setupz12zd2app4661z12zzcfa_setupz00(obj_t BgL_envz00_3402, obj_t BgL_nodez00_3403)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 202 */
{ 
BgL_appz00_bglt BgL_nodez00_1824;
BgL_nodez00_1824 = 
(BgL_appz00_bglt)(BgL_nodez00_3403); 
{ /* ./Cfa/setup.scm 205 */
obj_t BgL_arg5922z00_1828;
BgL_arg5922z00_1828 = 
(((BgL_appz00_bglt)CREF(BgL_nodez00_1824))->BgL_argsz00); 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg5922z00_1828); } 
{ /* ./Cfa/setup.scm 206 */
BgL_variablez00_bglt BgL_variablez00_1829;
{ /* ./Cfa/setup.scm 206 */
BgL_varz00_bglt BgL_arg5930z00_1831;
BgL_arg5930z00_1831 = 
(((BgL_appz00_bglt)CREF(BgL_nodez00_1824))->BgL_funz00); 
BgL_variablez00_1829 = 
(((BgL_varz00_bglt)CREF(BgL_arg5930z00_1831))->BgL_variablez00); } 
{ /* ./Cfa/setup.scm 207 */
BgL_valuez00_bglt BgL_arg5926z00_1830;
BgL_arg5926z00_1830 = 
(((BgL_variablez00_bglt)CREF(BgL_variablez00_1829))->BgL_valuez00); 
{ /* ./Cfa/setup.scm 207 */
BgL_funz00_bglt BgL_funz00_2438;
BgL_funz00_2438 = 
(BgL_funz00_bglt)(BgL_arg5926z00_1830); 
{ /* ./Cfa/setup.scm 207 */
obj_t BgL_method4663z00_2440;
{ /* ./Cfa/setup.scm 207 */
BgL_objectz00_bglt BgL_objz00_2441;
BgL_objz00_2441 = 
(BgL_objectz00_bglt)(BgL_funz00_2438); 
{ /* ./Cfa/setup.scm 207 */
long BgL_objzd2classzd2numz00_2442;
BgL_objzd2classzd2numz00_2442 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2441); 
{ /* ./Cfa/setup.scm 207 */
obj_t BgL_arg2017z00_2443;
{ /* ./Cfa/setup.scm 207 */
int BgL_auxz00_4692;
BgL_auxz00_4692 = 
(int)(((long)1)); 
BgL_arg2017z00_2443 = 
PROCEDURE_REF(BGl_funzd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4692); } 
{ /* ./Cfa/setup.scm 207 */
int BgL_offsetz00_2446;
BgL_offsetz00_2446 = 
(int)(BgL_objzd2classzd2numz00_2442); 
{ /* ./Cfa/setup.scm 207 */
long BgL_offsetz00_2447;
{ /* ./Cfa/setup.scm 207 */
long BgL_auxz00_4696;
BgL_auxz00_4696 = 
(long)(BgL_offsetz00_2446); 
BgL_offsetz00_2447 = 
(BgL_auxz00_4696-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 207 */
long BgL_modz00_2448;
{ /* ./Cfa/setup.scm 207 */
int BgL_arg2028z00_2449;
BgL_arg2028z00_2449 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 207 */
long BgL_n2z00_2457;
BgL_n2z00_2457 = 
(long)(BgL_arg2028z00_2449); 
BgL_modz00_2448 = 
(BgL_offsetz00_2447/BgL_n2z00_2457); } } 
{ /* ./Cfa/setup.scm 207 */
long BgL_restz00_2450;
{ /* ./Cfa/setup.scm 207 */
int BgL_arg2024z00_2451;
BgL_arg2024z00_2451 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 207 */
long BgL_n2z00_2460;
BgL_n2z00_2460 = 
(long)(BgL_arg2024z00_2451); 
BgL_restz00_2450 = 
(BgL_offsetz00_2447%BgL_n2z00_2460); } } 
{ /* ./Cfa/setup.scm 207 */

{ /* ./Cfa/setup.scm 207 */
obj_t BgL_bucketz00_2452;
{ /* ./Cfa/setup.scm 207 */
int BgL_kz00_2462;
BgL_kz00_2462 = 
(int)(BgL_modz00_2448); 
BgL_bucketz00_2452 = 
VECTOR_REF(BgL_arg2017z00_2443,BgL_kz00_2462); } 
{ /* ./Cfa/setup.scm 207 */
int BgL_kz00_2464;
BgL_kz00_2464 = 
(int)(BgL_restz00_2450); 
BgL_method4663z00_2440 = 
VECTOR_REF(BgL_bucketz00_2452,BgL_kz00_2464); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4663z00_2440)(BgL_method4663z00_2440, 
(obj_t)(BgL_funz00_2438), 
(obj_t)(BgL_variablez00_1829), BEOA);} } } } } } 
}



/* node-setup!-sequence4659 */
obj_t BGl_nodezd2setupz12zd2sequence4659z12zzcfa_setupz00(obj_t BgL_envz00_3404, obj_t BgL_nodez00_3405)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 195 */
{ 
BgL_sequencez00_bglt BgL_nodez00_1817;
BgL_nodez00_1817 = 
(BgL_sequencez00_bglt)(BgL_nodez00_3405); 
{ /* ./Cfa/setup.scm 196 */
obj_t BgL_arg5912z00_2432;
BgL_arg5912z00_2432 = 
(((BgL_sequencez00_bglt)CREF(BgL_nodez00_1817))->BgL_nodesz00); 
return 
BGl_nodezd2setupza2z12z62zzcfa_setupz00(BgL_arg5912z00_2432);} } } 
}



/* node-setup!-closure4657 */
obj_t BGl_nodezd2setupz12zd2closure4657z12zzcfa_setupz00(obj_t BgL_envz00_3406, obj_t BgL_nodez00_3407)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 189 */
{ 
BgL_closurez00_bglt BgL_nodez00_1809;
BgL_nodez00_1809 = 
(BgL_closurez00_bglt)(BgL_nodez00_3407); 
{ /* ./Cfa/setup.scm 190 */
obj_t BgL_arg5902z00_1814;
BgL_arg5902z00_1814 = 
BGl_shapez00zztools_shapez00(
(obj_t)(BgL_nodez00_1809)); 
return 
BGl_internalzd2errorzd2zztools_errorz00(BGl_string7470z00zzcfa_setupz00, BGl_string7471z00zzcfa_setupz00, BgL_arg5902z00_1814);} } } 
}



/* variable-value-setup!-cvar4655 */
obj_t BGl_variablezd2valuezd2setupz12zd2cvar4655zc0zzcfa_setupz00(obj_t BgL_envz00_3408, obj_t BgL_valuez00_3409, obj_t BgL_varz00_3410)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 180 */
{ 
BgL_cvarz00_bglt BgL_valuez00_1795;obj_t BgL_varz00_1796;
BgL_valuez00_1795 = 
(BgL_cvarz00_bglt)(BgL_valuez00_3409); 
BgL_varz00_1796 = BgL_varz00_3410; 
{ /* ./Cfa/setup.scm 181 */
BgL_cvarz00_bglt BgL_obj4560z00_1799;
BgL_obj4560z00_1799 = 
((BgL_cvarz00_bglt)BgL_valuez00_1795); 
{ /* ./Cfa/setup.scm 182 */
obj_t BgL_arg5870z00_1800;
{ /* ./Cfa/setup.scm 182 */
BgL_approxz00_bglt BgL_arg5873z00_1801;
{ /* ./Cfa/setup.scm 182 */
BgL_typez00_bglt BgL_arg5876z00_1802;
{ /* ./Cfa/setup.scm 182 */
BgL_variablez00_bglt BgL_obj1117z00_2425;
BgL_obj1117z00_2425 = 
(BgL_variablez00_bglt)(BgL_varz00_1796); 
BgL_arg5876z00_1802 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2425))->BgL_typez00); } 
BgL_arg5873z00_1801 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5876z00_1802); } 
BgL_arg5870z00_1800 = 
BGl_wideningzd2cvarzf2Cinfoz20zzcfa_infoz00(BgL_arg5873z00_1801); } 
{ /* ./Cfa/setup.scm 181 */
BgL_objectz00_bglt BgL_auxz00_4726;
BgL_auxz00_4726 = 
(BgL_objectz00_bglt)(BgL_obj4560z00_1799); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4726, BgL_arg5870z00_1800); } } 
{ /* ./Cfa/setup.scm 181 */
long BgL_arg5880z00_1803;
BgL_arg5880z00_1803 = 
BGl_classzd2numzd2zz__objectz00(BGl_cvarzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 181 */
BgL_objectz00_bglt BgL_objz00_2426;
BgL_objz00_2426 = 
(BgL_objectz00_bglt)(BgL_obj4560z00_1799); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2426, BgL_arg5880z00_1803); } } 
{ /* ./Cfa/setup.scm 181 */
obj_t BgL_objz00_2428;
BgL_objz00_2428 = 
(obj_t)(BgL_obj4560z00_1799); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2428); BUNSPEC; } BgL_obj4560z00_1799; } 
{ /* ./Cfa/setup.scm 183 */
bool_t BgL_test5884z00_1804;
{ /* ./Cfa/setup.scm 183 */
BgL_typez00_bglt BgL_auxz00_4734;
{ /* ./Cfa/setup.scm 183 */
BgL_variablez00_bglt BgL_obj1117z00_2429;
BgL_obj1117z00_2429 = 
(BgL_variablez00_bglt)(BgL_varz00_1796); 
BgL_auxz00_4734 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2429))->BgL_typez00); } 
BgL_test5884z00_1804 = 
BGl_alloczd2typezf3z21zzcfa_setupz00(BgL_auxz00_4734); } 
if(BgL_test5884z00_1804)
{ /* ./Cfa/setup.scm 184 */
BgL_approxz00_bglt BgL_arg5886z00_1805;
{ /* ./Cfa/setup.scm 184 */
BgL_cvarzf2cinfozf2_bglt BgL_obj2939z00_2430;
BgL_obj2939z00_2430 = 
(BgL_cvarzf2cinfozf2_bglt)(BgL_valuez00_1795); 
{ 
obj_t BgL_auxz00_4740;
{ /* ./Cfa/setup.scm 184 */
BgL_objectz00_bglt BgL_auxz00_4741;
BgL_auxz00_4741 = 
(BgL_objectz00_bglt)(BgL_obj2939z00_2430); 
BgL_auxz00_4740 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4741); } 
BgL_arg5886z00_1805 = 
(((BgL_cvarzf2cinfozf2_bglt)CREF(BgL_auxz00_4740))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg5886z00_1805);}  else 
{ /* ./Cfa/setup.scm 183 */
return BFALSE;} } } } 
}



/* variable-value-setup!-scnst4653 */
obj_t BGl_variablezd2valuezd2setupz12zd2scnst4653zc0zzcfa_setupz00(obj_t BgL_envz00_3411, obj_t BgL_valuez00_3412, obj_t BgL_varz00_3413)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 158 */
{ 
BgL_scnstz00_bglt BgL_valuez00_1764;obj_t BgL_varz00_1765;
BgL_valuez00_1764 = 
(BgL_scnstz00_bglt)(BgL_valuez00_3412); 
BgL_varz00_1765 = BgL_varz00_3413; 
{ /* ./Cfa/setup.scm 161 */
bool_t BgL_test5797z00_1768;
BgL_test5797z00_1768 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_1765, BGl_globalz00zzast_varz00); 
if(BgL_test5797z00_1768)
{ /* ./Cfa/setup.scm 162 */
bool_t BgL_test5798z00_1769;
{ /* ./Cfa/setup.scm 162 */
bool_t BgL_test5832z00_1782;
{ /* ./Cfa/setup.scm 162 */
obj_t BgL_arg5844z00_1787;
{ /* ./Cfa/setup.scm 162 */
BgL_globalz00_bglt BgL_obj1186z00_2381;
BgL_obj1186z00_2381 = 
(BgL_globalz00_bglt)(BgL_varz00_1765); 
BgL_arg5844z00_1787 = 
(((BgL_globalz00_bglt)CREF(BgL_obj1186z00_2381))->BgL_modulez00); } 
BgL_test5832z00_1782 = 
(BgL_arg5844z00_1787==BGl_za2moduleza2z00zzmodule_modulez00); } 
if(BgL_test5832z00_1782)
{ /* ./Cfa/setup.scm 163 */
bool_t BgL_test5833z00_1783;
{ /* ./Cfa/setup.scm 163 */
obj_t BgL_auxz00_4753;
BgL_auxz00_4753 = 
BGl_memqz00zz__r4_pairs_and_lists_6_3z00(
(((BgL_scnstz00_bglt)CREF(BgL_valuez00_1764))->BgL_classz00), 
CNST_TABLE_REF(((long)2))); 
BgL_test5833z00_1783 = 
CBOOL(BgL_auxz00_4753); } 
if(BgL_test5833z00_1783)
{ /* ./Cfa/setup.scm 164 */
obj_t BgL_arg5835z00_1784;
BgL_arg5835z00_1784 = 
(((BgL_scnstz00_bglt)CREF(BgL_valuez00_1764))->BgL_nodez00); 
BgL_test5798z00_1769 = 
BGl_iszd2azf3z21zz__objectz00(BgL_arg5835z00_1784, BGl_prezd2makezd2procedurezd2appzd2zzcfa_info2z00); }  else 
{ /* ./Cfa/setup.scm 163 */
BgL_test5798z00_1769 = ((bool_t)0); } }  else 
{ /* ./Cfa/setup.scm 162 */
BgL_test5798z00_1769 = ((bool_t)0); } } 
if(BgL_test5798z00_1769)
{ /* ./Cfa/setup.scm 166 */
obj_t BgL_nodez00_1770;
BgL_nodez00_1770 = 
(((BgL_scnstz00_bglt)CREF(BgL_valuez00_1764))->BgL_nodez00); 
{ /* ./Cfa/setup.scm 168 */
BgL_nodez00_bglt BgL_nodez00_2386;
BgL_nodez00_2386 = 
(BgL_nodez00_bglt)(BgL_nodez00_1770); 
{ /* ./Cfa/setup.scm 168 */
obj_t BgL_method4631z00_2387;
{ /* ./Cfa/setup.scm 168 */
BgL_objectz00_bglt BgL_objz00_2388;
BgL_objz00_2388 = 
(BgL_objectz00_bglt)(BgL_nodez00_2386); 
{ /* ./Cfa/setup.scm 168 */
long BgL_objzd2classzd2numz00_2389;
BgL_objzd2classzd2numz00_2389 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2388); 
{ /* ./Cfa/setup.scm 168 */
obj_t BgL_arg2017z00_2390;
{ /* ./Cfa/setup.scm 168 */
int BgL_auxz00_4766;
BgL_auxz00_4766 = 
(int)(((long)1)); 
BgL_arg2017z00_2390 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_4766); } 
{ /* ./Cfa/setup.scm 168 */
int BgL_offsetz00_2393;
BgL_offsetz00_2393 = 
(int)(BgL_objzd2classzd2numz00_2389); 
{ /* ./Cfa/setup.scm 168 */
long BgL_offsetz00_2394;
{ /* ./Cfa/setup.scm 168 */
long BgL_auxz00_4770;
BgL_auxz00_4770 = 
(long)(BgL_offsetz00_2393); 
BgL_offsetz00_2394 = 
(BgL_auxz00_4770-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 168 */
long BgL_modz00_2395;
{ /* ./Cfa/setup.scm 168 */
int BgL_arg2028z00_2396;
BgL_arg2028z00_2396 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 168 */
long BgL_n2z00_2404;
BgL_n2z00_2404 = 
(long)(BgL_arg2028z00_2396); 
BgL_modz00_2395 = 
(BgL_offsetz00_2394/BgL_n2z00_2404); } } 
{ /* ./Cfa/setup.scm 168 */
long BgL_restz00_2397;
{ /* ./Cfa/setup.scm 168 */
int BgL_arg2024z00_2398;
BgL_arg2024z00_2398 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 168 */
long BgL_n2z00_2407;
BgL_n2z00_2407 = 
(long)(BgL_arg2024z00_2398); 
BgL_restz00_2397 = 
(BgL_offsetz00_2394%BgL_n2z00_2407); } } 
{ /* ./Cfa/setup.scm 168 */

{ /* ./Cfa/setup.scm 168 */
obj_t BgL_bucketz00_2399;
{ /* ./Cfa/setup.scm 168 */
int BgL_kz00_2409;
BgL_kz00_2409 = 
(int)(BgL_modz00_2395); 
BgL_bucketz00_2399 = 
VECTOR_REF(BgL_arg2017z00_2390,BgL_kz00_2409); } 
{ /* ./Cfa/setup.scm 168 */
int BgL_kz00_2411;
BgL_kz00_2411 = 
(int)(BgL_restz00_2397); 
BgL_method4631z00_2387 = 
VECTOR_REF(BgL_bucketz00_2399,BgL_kz00_2411); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4631z00_2387)(BgL_method4631z00_2387, 
(obj_t)(BgL_nodez00_2386), BEOA); } } 
{ /* ./Cfa/setup.scm 169 */
BgL_scnstz00_bglt BgL_obj4557z00_1771;
BgL_obj4557z00_1771 = 
((BgL_scnstz00_bglt)BgL_valuez00_1764); 
{ /* ./Cfa/setup.scm 170 */
obj_t BgL_arg5801z00_1772;
{ /* ./Cfa/setup.scm 170 */
BgL_approxz00_bglt BgL_arg5804z00_1773;
{ /* ./Cfa/setup.scm 170 */
BgL_makezd2procedurezd2appz00_bglt BgL_obj3710z00_2412;
BgL_obj3710z00_2412 = 
(BgL_makezd2procedurezd2appz00_bglt)(BgL_nodez00_1770); 
{ 
obj_t BgL_auxz00_4788;
{ /* ./Cfa/setup.scm 170 */
BgL_objectz00_bglt BgL_auxz00_4789;
BgL_auxz00_4789 = 
(BgL_objectz00_bglt)(BgL_obj3710z00_2412); 
BgL_auxz00_4788 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4789); } 
BgL_arg5804z00_1773 = 
(((BgL_makezd2procedurezd2appz00_bglt)CREF(BgL_auxz00_4788))->BgL_approxz00); } } 
BgL_arg5801z00_1772 = 
BGl_wideningzd2scnstzf2Cinfoz20zzcfa_infoz00(BgL_arg5804z00_1773); } 
{ /* ./Cfa/setup.scm 169 */
BgL_objectz00_bglt BgL_auxz00_4794;
BgL_auxz00_4794 = 
(BgL_objectz00_bglt)(BgL_obj4557z00_1771); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4794, BgL_arg5801z00_1772); } } 
{ /* ./Cfa/setup.scm 169 */
long BgL_arg5808z00_1774;
BgL_arg5808z00_1774 = 
BGl_classzd2numzd2zz__objectz00(BGl_scnstzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 169 */
BgL_objectz00_bglt BgL_objz00_2413;
BgL_objz00_2413 = 
(BgL_objectz00_bglt)(BgL_obj4557z00_1771); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2413, BgL_arg5808z00_1774); } } 
{ /* ./Cfa/setup.scm 169 */
obj_t BgL_objz00_2415;
BgL_objz00_2415 = 
(obj_t)(BgL_obj4557z00_1771); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2415); BUNSPEC; } 
return 
(obj_t)(BgL_obj4557z00_1771);} }  else 
{ /* ./Cfa/setup.scm 171 */
BgL_scnstz00_bglt BgL_valuez00_1775;
{ /* ./Cfa/setup.scm 171 */
BgL_scnstz00_bglt BgL_obj4558z00_1777;
BgL_obj4558z00_1777 = 
((BgL_scnstz00_bglt)BgL_valuez00_1764); 
{ /* ./Cfa/setup.scm 172 */
obj_t BgL_arg5818z00_1778;
{ /* ./Cfa/setup.scm 172 */
BgL_approxz00_bglt BgL_arg5821z00_1779;
{ /* ./Cfa/setup.scm 172 */
BgL_typez00_bglt BgL_arg5824z00_1780;
{ /* ./Cfa/setup.scm 172 */
BgL_variablez00_bglt BgL_obj1117z00_2416;
BgL_obj1117z00_2416 = 
(BgL_variablez00_bglt)(BgL_varz00_1765); 
BgL_arg5824z00_1780 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2416))->BgL_typez00); } 
BgL_arg5821z00_1779 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5824z00_1780); } 
BgL_arg5818z00_1778 = 
BGl_wideningzd2scnstzf2Cinfoz20zzcfa_infoz00(BgL_arg5821z00_1779); } 
{ /* ./Cfa/setup.scm 171 */
BgL_objectz00_bglt BgL_auxz00_4808;
BgL_auxz00_4808 = 
(BgL_objectz00_bglt)(BgL_obj4558z00_1777); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4808, BgL_arg5818z00_1778); } } 
{ /* ./Cfa/setup.scm 171 */
long BgL_arg5828z00_1781;
BgL_arg5828z00_1781 = 
BGl_classzd2numzd2zz__objectz00(BGl_scnstzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 171 */
BgL_objectz00_bglt BgL_objz00_2417;
BgL_objz00_2417 = 
(BgL_objectz00_bglt)(BgL_obj4558z00_1777); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2417, BgL_arg5828z00_1781); } } 
{ /* ./Cfa/setup.scm 171 */
obj_t BgL_objz00_2419;
BgL_objz00_2419 = 
(obj_t)(BgL_obj4558z00_1777); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2419); BUNSPEC; } 
BgL_valuez00_1775 = BgL_obj4558z00_1777; } 
{ /* ./Cfa/setup.scm 173 */
BgL_approxz00_bglt BgL_arg5814z00_1776;
{ /* ./Cfa/setup.scm 173 */
BgL_scnstzf2cinfozf2_bglt BgL_obj2897z00_2420;
BgL_obj2897z00_2420 = 
(BgL_scnstzf2cinfozf2_bglt)(BgL_valuez00_1775); 
{ 
obj_t BgL_auxz00_4817;
{ /* ./Cfa/setup.scm 173 */
BgL_objectz00_bglt BgL_auxz00_4818;
BgL_auxz00_4818 = 
(BgL_objectz00_bglt)(BgL_obj2897z00_2420); 
BgL_auxz00_4817 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4818); } 
BgL_arg5814z00_1776 = 
(((BgL_scnstzf2cinfozf2_bglt)CREF(BgL_auxz00_4817))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg5814z00_1776);} } }  else 
{ /* ./Cfa/setup.scm 174 */
BgL_scnstz00_bglt BgL_obj4559z00_1788;
BgL_obj4559z00_1788 = 
((BgL_scnstz00_bglt)BgL_valuez00_1764); 
{ /* ./Cfa/setup.scm 175 */
obj_t BgL_arg5848z00_1789;
{ /* ./Cfa/setup.scm 175 */
BgL_approxz00_bglt BgL_arg5851z00_1790;
{ /* ./Cfa/setup.scm 175 */
BgL_typez00_bglt BgL_arg5854z00_1791;
{ /* ./Cfa/setup.scm 175 */
BgL_variablez00_bglt BgL_obj1117z00_2421;
BgL_obj1117z00_2421 = 
(BgL_variablez00_bglt)(BgL_varz00_1765); 
BgL_arg5854z00_1791 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2421))->BgL_typez00); } 
BgL_arg5851z00_1790 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5854z00_1791); } 
BgL_arg5848z00_1789 = 
BGl_wideningzd2scnstzf2Cinfoz20zzcfa_infoz00(BgL_arg5851z00_1790); } 
{ /* ./Cfa/setup.scm 174 */
BgL_objectz00_bglt BgL_auxz00_4828;
BgL_auxz00_4828 = 
(BgL_objectz00_bglt)(BgL_obj4559z00_1788); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4828, BgL_arg5848z00_1789); } } 
{ /* ./Cfa/setup.scm 174 */
long BgL_arg5858z00_1792;
BgL_arg5858z00_1792 = 
BGl_classzd2numzd2zz__objectz00(BGl_scnstzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 174 */
BgL_objectz00_bglt BgL_objz00_2422;
BgL_objz00_2422 = 
(BgL_objectz00_bglt)(BgL_obj4559z00_1788); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2422, BgL_arg5858z00_1792); } } 
{ /* ./Cfa/setup.scm 174 */
obj_t BgL_objz00_2424;
BgL_objz00_2424 = 
(obj_t)(BgL_obj4559z00_1788); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2424); BUNSPEC; } 
return 
(obj_t)(BgL_obj4559z00_1788);} } } } 
}



/* variable-value-setup!-scnst/Cinfo4651 */
obj_t BGl_variablezd2valuezd2setupz12zd2scnstzf2Cinfo4651z32zzcfa_setupz00(obj_t BgL_envz00_3414, obj_t BgL_valuez00_3415, obj_t BgL_varz00_3416)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 152 */
{ /* ./Cfa/setup.scm 153 */
obj_t BgL_res7489z00_3454;
BgL_res7489z00_3454 = 
CNST_TABLE_REF(((long)3)); 
return BgL_res7489z00_3454;} } 
}



/* variable-value-setup!-sexit4649 */
obj_t BGl_variablezd2valuezd2setupz12zd2sexit4649zc0zzcfa_setupz00(obj_t BgL_envz00_3417, obj_t BgL_valuez00_3418, obj_t BgL_varz00_3419)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 145 */
{ 
BgL_sexitz00_bglt BgL_valuez00_1747;obj_t BgL_varz00_1748;
{ /* ./Cfa/setup.scm 146 */
BgL_sexitz00_bglt BgL_auxz00_4839;
BgL_valuez00_1747 = 
(BgL_sexitz00_bglt)(BgL_valuez00_3418); 
BgL_varz00_1748 = BgL_varz00_3419; 
{ /* ./Cfa/setup.scm 146 */
BgL_sexitz00_bglt BgL_obj4556z00_1751;
BgL_obj4556z00_1751 = 
((BgL_sexitz00_bglt)BgL_valuez00_1747); 
{ /* ./Cfa/setup.scm 147 */
obj_t BgL_arg5771z00_1752;
{ /* ./Cfa/setup.scm 147 */
BgL_approxz00_bglt BgL_arg5774z00_1753;
{ /* ./Cfa/setup.scm 147 */
BgL_typez00_bglt BgL_arg5777z00_1754;
{ /* ./Cfa/setup.scm 147 */
BgL_variablez00_bglt BgL_obj1117z00_2376;
BgL_obj1117z00_2376 = 
(BgL_variablez00_bglt)(BgL_varz00_1748); 
BgL_arg5777z00_1754 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2376))->BgL_typez00); } 
BgL_arg5774z00_1753 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5777z00_1754); } 
BgL_arg5771z00_1752 = 
BGl_wideningzd2sexitzf2Cinfoz20zzcfa_infoz00(BgL_arg5774z00_1753); } 
{ /* ./Cfa/setup.scm 146 */
BgL_objectz00_bglt BgL_auxz00_4845;
BgL_auxz00_4845 = 
(BgL_objectz00_bglt)(BgL_obj4556z00_1751); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4845, BgL_arg5771z00_1752); } } 
{ /* ./Cfa/setup.scm 146 */
long BgL_arg5781z00_1755;
BgL_arg5781z00_1755 = 
BGl_classzd2numzd2zz__objectz00(BGl_sexitzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 146 */
BgL_objectz00_bglt BgL_objz00_2377;
BgL_objz00_2377 = 
(BgL_objectz00_bglt)(BgL_obj4556z00_1751); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2377, BgL_arg5781z00_1755); } } 
{ /* ./Cfa/setup.scm 146 */
obj_t BgL_objz00_2379;
BgL_objz00_2379 = 
(obj_t)(BgL_obj4556z00_1751); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2379); BUNSPEC; } 
BgL_auxz00_4839 = BgL_obj4556z00_1751; } 
return 
(obj_t)(BgL_auxz00_4839);} } } 
}



/* variable-value-setup!-pre-clo-env4647 */
obj_t BGl_variablezd2valuezd2setupz12zd2prezd2clozd2env4647zc0zzcfa_setupz00(obj_t BgL_envz00_3420, obj_t BgL_valuez00_3421, obj_t BgL_varz00_3422)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 137 */
{ 
BgL_prezd2clozd2envz00_bglt BgL_valuez00_1740;obj_t BgL_varz00_1741;
BgL_valuez00_1740 = 
(BgL_prezd2clozd2envz00_bglt)(BgL_valuez00_3421); 
BgL_varz00_1741 = BgL_varz00_3422; 
{ 

{ /* ./Cfa/setup.scm 137 */
obj_t BgL_nextzd2method4646zd2_1745;
BgL_nextzd2method4646zd2_1745 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_valuez00_1740), BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BGl_prezd2clozd2envz00zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 137 */
bool_t BgL_test5764z00_1746;
BgL_test5764z00_1746 = 
PROCEDUREP(BgL_nextzd2method4646zd2_1745); 
if(BgL_test5764z00_1746)
{ /* ./Cfa/setup.scm 137 */
PROCEDURE_ENTRY(BgL_nextzd2method4646zd2_1745)(BgL_nextzd2method4646zd2_1745, 
(obj_t)(BgL_valuez00_1740), BgL_varz00_1741, BEOA); }  else 
{ /* ./Cfa/setup.scm 137 */
{ /* ./Cfa/setup.scm 137 */
BgL_valuez00_bglt BgL_valuez00_2349;BgL_variablez00_bglt BgL_variablez00_2350;
BgL_valuez00_2349 = 
(BgL_valuez00_bglt)(BgL_valuez00_1740); 
BgL_variablez00_2350 = 
(BgL_variablez00_bglt)(BgL_varz00_1741); 
{ /* ./Cfa/setup.scm 137 */
obj_t BgL_method4641z00_2351;
{ /* ./Cfa/setup.scm 137 */
BgL_objectz00_bglt BgL_objz00_2352;
BgL_objz00_2352 = 
(BgL_objectz00_bglt)(BgL_valuez00_2349); 
{ /* ./Cfa/setup.scm 137 */
long BgL_objzd2classzd2numz00_2353;
BgL_objzd2classzd2numz00_2353 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2352); 
{ /* ./Cfa/setup.scm 137 */
obj_t BgL_arg2017z00_2354;
{ /* ./Cfa/setup.scm 137 */
int BgL_auxz00_4866;
BgL_auxz00_4866 = 
(int)(((long)1)); 
BgL_arg2017z00_2354 = 
PROCEDURE_REF(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BgL_auxz00_4866); } 
{ /* ./Cfa/setup.scm 137 */
int BgL_offsetz00_2357;
BgL_offsetz00_2357 = 
(int)(BgL_objzd2classzd2numz00_2353); 
{ /* ./Cfa/setup.scm 137 */
long BgL_offsetz00_2358;
{ /* ./Cfa/setup.scm 137 */
long BgL_auxz00_4870;
BgL_auxz00_4870 = 
(long)(BgL_offsetz00_2357); 
BgL_offsetz00_2358 = 
(BgL_auxz00_4870-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 137 */
long BgL_modz00_2359;
{ /* ./Cfa/setup.scm 137 */
int BgL_arg2028z00_2360;
BgL_arg2028z00_2360 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 137 */
long BgL_n2z00_2368;
BgL_n2z00_2368 = 
(long)(BgL_arg2028z00_2360); 
BgL_modz00_2359 = 
(BgL_offsetz00_2358/BgL_n2z00_2368); } } 
{ /* ./Cfa/setup.scm 137 */
long BgL_restz00_2361;
{ /* ./Cfa/setup.scm 137 */
int BgL_arg2024z00_2362;
BgL_arg2024z00_2362 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 137 */
long BgL_n2z00_2371;
BgL_n2z00_2371 = 
(long)(BgL_arg2024z00_2362); 
BgL_restz00_2361 = 
(BgL_offsetz00_2358%BgL_n2z00_2371); } } 
{ /* ./Cfa/setup.scm 137 */

{ /* ./Cfa/setup.scm 137 */
obj_t BgL_bucketz00_2363;
{ /* ./Cfa/setup.scm 137 */
int BgL_kz00_2373;
BgL_kz00_2373 = 
(int)(BgL_modz00_2359); 
BgL_bucketz00_2363 = 
VECTOR_REF(BgL_arg2017z00_2354,BgL_kz00_2373); } 
{ /* ./Cfa/setup.scm 137 */
int BgL_kz00_2375;
BgL_kz00_2375 = 
(int)(BgL_restz00_2361); 
BgL_method4641z00_2351 = 
VECTOR_REF(BgL_bucketz00_2363,BgL_kz00_2375); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4641z00_2351)(BgL_method4641z00_2351, 
(obj_t)(BgL_valuez00_2349), 
(obj_t)(BgL_variablez00_2350), BEOA); } } } } } 
{ /* ./Cfa/setup.scm 140 */
BgL_valuez00_bglt BgL_arg5761z00_1744;
{ /* ./Cfa/setup.scm 140 */
BgL_variablez00_bglt BgL_obj1120z00_2345;
BgL_obj1120z00_2345 = 
(BgL_variablez00_bglt)(BgL_varz00_1741); 
BgL_arg5761z00_1744 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_2345))->BgL_valuez00); } 
{ /* ./Cfa/setup.scm 140 */
BgL_svarzf2cinfozf2_bglt BgL_obj2927z00_2346;bool_t BgL_val2926z00_2347;
BgL_obj2927z00_2346 = 
(BgL_svarzf2cinfozf2_bglt)(BgL_arg5761z00_1744); 
BgL_val2926z00_2347 = ((bool_t)1); 
{ 
obj_t BgL_auxz00_4890;
{ /* ./Cfa/setup.scm 140 */
BgL_objectz00_bglt BgL_auxz00_4891;
BgL_auxz00_4891 = 
(BgL_objectz00_bglt)(BgL_obj2927z00_2346); 
BgL_auxz00_4890 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4891); } 
return 
((((BgL_svarzf2cinfozf2_bglt)CREF(BgL_auxz00_4890))->BgL_clozd2envzf3z21) = ((bool_t)BgL_val2926z00_2347), BUNSPEC);} } } } } } 
}



/* variable-value-setup!-svar4645 */
obj_t BGl_variablezd2valuezd2setupz12zd2svar4645zc0zzcfa_setupz00(obj_t BgL_envz00_3423, obj_t BgL_valuez00_3424, obj_t BgL_varz00_3425)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 124 */
{ 
BgL_svarz00_bglt BgL_valuez00_1716;obj_t BgL_varz00_1717;
BgL_valuez00_1716 = 
(BgL_svarz00_bglt)(BgL_valuez00_3424); 
BgL_varz00_1717 = BgL_varz00_3425; 
{ /* ./Cfa/setup.scm 125 */
bool_t BgL_test5706z00_1720;
BgL_test5706z00_1720 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_1717, BGl_globalz00zzast_varz00); 
if(BgL_test5706z00_1720)
{ /* ./Cfa/setup.scm 126 */
BgL_svarz00_bglt BgL_valuez00_1721;
{ /* ./Cfa/setup.scm 126 */
BgL_svarz00_bglt BgL_obj4554z00_1728;
BgL_obj4554z00_1728 = 
((BgL_svarz00_bglt)BgL_valuez00_1716); 
{ /* ./Cfa/setup.scm 127 */
obj_t BgL_arg5723z00_1729;
{ /* ./Cfa/setup.scm 127 */
BgL_approxz00_bglt BgL_arg5726z00_1730;
{ /* ./Cfa/setup.scm 127 */
BgL_typez00_bglt BgL_arg5729z00_1731;
{ /* ./Cfa/setup.scm 127 */
BgL_variablez00_bglt BgL_obj1117z00_2334;
BgL_obj1117z00_2334 = 
(BgL_variablez00_bglt)(BgL_varz00_1717); 
BgL_arg5729z00_1731 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2334))->BgL_typez00); } 
BgL_arg5726z00_1730 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5729z00_1731); } 
BgL_arg5723z00_1729 = 
BGl_wideningzd2svarzf2Cinfoz20zzcfa_infoz00(BgL_arg5726z00_1730, ((bool_t)0)); } 
{ /* ./Cfa/setup.scm 126 */
BgL_objectz00_bglt BgL_auxz00_4903;
BgL_auxz00_4903 = 
(BgL_objectz00_bglt)(BgL_obj4554z00_1728); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4903, BgL_arg5723z00_1729); } } 
{ /* ./Cfa/setup.scm 126 */
long BgL_arg5733z00_1732;
BgL_arg5733z00_1732 = 
BGl_classzd2numzd2zz__objectz00(BGl_svarzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 126 */
BgL_objectz00_bglt BgL_objz00_2335;
BgL_objz00_2335 = 
(BgL_objectz00_bglt)(BgL_obj4554z00_1728); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2335, BgL_arg5733z00_1732); } } 
{ /* ./Cfa/setup.scm 126 */
obj_t BgL_objz00_2337;
BgL_objz00_2337 = 
(obj_t)(BgL_obj4554z00_1728); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2337); BUNSPEC; } 
BgL_valuez00_1721 = BgL_obj4554z00_1728; } 
{ /* ./Cfa/setup.scm 128 */
bool_t BgL_test5707z00_1722;
{ /* ./Cfa/setup.scm 128 */
bool_t BgL_testz00_4911;
{ /* ./Cfa/setup.scm 128 */
obj_t BgL_auxz00_4915;obj_t BgL_auxz00_4912;
BgL_auxz00_4915 = 
CNST_TABLE_REF(((long)4)); 
{ /* ./Cfa/setup.scm 128 */
BgL_globalz00_bglt BgL_obj1189z00_2338;
BgL_obj1189z00_2338 = 
(BgL_globalz00_bglt)(BgL_varz00_1717); 
BgL_auxz00_4912 = 
(((BgL_globalz00_bglt)CREF(BgL_obj1189z00_2338))->BgL_importz00); } 
BgL_testz00_4911 = 
(BgL_auxz00_4912==BgL_auxz00_4915); } 
if(BgL_testz00_4911)
{ /* ./Cfa/setup.scm 128 */
BgL_test5707z00_1722 = ((bool_t)0); }  else 
{ /* ./Cfa/setup.scm 129 */
BgL_typez00_bglt BgL_auxz00_4918;
{ /* ./Cfa/setup.scm 129 */
BgL_variablez00_bglt BgL_obj1117z00_2339;
BgL_obj1117z00_2339 = 
(BgL_variablez00_bglt)(BgL_varz00_1717); 
BgL_auxz00_4918 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2339))->BgL_typez00); } 
BgL_test5707z00_1722 = 
BGl_alloczd2typezf3z21zzcfa_setupz00(BgL_auxz00_4918); } } 
if(BgL_test5707z00_1722)
{ /* ./Cfa/setup.scm 130 */
BgL_approxz00_bglt BgL_arg5709z00_1723;
{ /* ./Cfa/setup.scm 130 */
BgL_svarzf2cinfozf2_bglt BgL_obj2924z00_2340;
BgL_obj2924z00_2340 = 
(BgL_svarzf2cinfozf2_bglt)(BgL_valuez00_1721); 
{ 
obj_t BgL_auxz00_4924;
{ /* ./Cfa/setup.scm 130 */
BgL_objectz00_bglt BgL_auxz00_4925;
BgL_auxz00_4925 = 
(BgL_objectz00_bglt)(BgL_obj2924z00_2340); 
BgL_auxz00_4924 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4925); } 
BgL_arg5709z00_1723 = 
(((BgL_svarzf2cinfozf2_bglt)CREF(BgL_auxz00_4924))->BgL_approxz00); } } 
return 
BGl_approxzd2setzd2topz12z12zzcfa_approxz00(BgL_arg5709z00_1723);}  else 
{ /* ./Cfa/setup.scm 128 */
return BFALSE;} } }  else 
{ /* ./Cfa/setup.scm 131 */
BgL_svarz00_bglt BgL_obj4555z00_1733;
BgL_obj4555z00_1733 = 
((BgL_svarz00_bglt)BgL_valuez00_1716); 
{ /* ./Cfa/setup.scm 132 */
obj_t BgL_arg5738z00_1734;
{ /* ./Cfa/setup.scm 132 */
BgL_approxz00_bglt BgL_arg5741z00_1735;
{ /* ./Cfa/setup.scm 132 */
BgL_typez00_bglt BgL_arg5744z00_1736;
{ /* ./Cfa/setup.scm 132 */
BgL_variablez00_bglt BgL_obj1117z00_2341;
BgL_obj1117z00_2341 = 
(BgL_variablez00_bglt)(BgL_varz00_1717); 
BgL_arg5744z00_1736 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1117z00_2341))->BgL_typez00); } 
BgL_arg5741z00_1735 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5744z00_1736); } 
BgL_arg5738z00_1734 = 
BGl_wideningzd2svarzf2Cinfoz20zzcfa_infoz00(BgL_arg5741z00_1735, ((bool_t)0)); } 
{ /* ./Cfa/setup.scm 131 */
BgL_objectz00_bglt BgL_auxz00_4935;
BgL_auxz00_4935 = 
(BgL_objectz00_bglt)(BgL_obj4555z00_1733); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4935, BgL_arg5738z00_1734); } } 
{ /* ./Cfa/setup.scm 131 */
long BgL_arg5748z00_1737;
BgL_arg5748z00_1737 = 
BGl_classzd2numzd2zz__objectz00(BGl_svarzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 131 */
BgL_objectz00_bglt BgL_objz00_2342;
BgL_objz00_2342 = 
(BgL_objectz00_bglt)(BgL_obj4555z00_1733); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2342, BgL_arg5748z00_1737); } } 
{ /* ./Cfa/setup.scm 131 */
obj_t BgL_objz00_2344;
BgL_objz00_2344 = 
(obj_t)(BgL_obj4555z00_1733); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2344); BUNSPEC; } 
return 
(obj_t)(BgL_obj4555z00_1733);} } } } 
}



/* variable-value-setup!-sfun4643 */
obj_t BGl_variablezd2valuezd2setupz12zd2sfun4643zc0zzcfa_setupz00(obj_t BgL_envz00_3426, obj_t BgL_valuez00_3427, obj_t BgL_varz00_3428)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 116 */
return BUNSPEC;} 
}



/* node-setup!-var4639 */
obj_t BGl_nodezd2setupz12zd2var4639z12zzcfa_setupz00(obj_t BgL_envz00_3429, obj_t BgL_nodez00_3430)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 81 */
{ 
BgL_varz00_bglt BgL_nodez00_1685;
BgL_nodez00_1685 = 
(BgL_varz00_bglt)(BgL_nodez00_3430); 
{ /* ./Cfa/setup.scm 83 */
BgL_valuez00_bglt BgL_arg5643z00_1689;BgL_variablez00_bglt BgL_arg5644z00_1690;
{ /* ./Cfa/setup.scm 83 */
BgL_variablez00_bglt BgL_arg5647z00_1691;
BgL_arg5647z00_1691 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
BgL_arg5643z00_1689 = 
(((BgL_variablez00_bglt)CREF(BgL_arg5647z00_1691))->BgL_valuez00); } 
BgL_arg5644z00_1690 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
{ /* ./Cfa/setup.scm 83 */
obj_t BgL_method4641z00_2292;
{ /* ./Cfa/setup.scm 83 */
BgL_objectz00_bglt BgL_objz00_2293;
BgL_objz00_2293 = 
(BgL_objectz00_bglt)(BgL_arg5643z00_1689); 
{ /* ./Cfa/setup.scm 83 */
long BgL_objzd2classzd2numz00_2294;
BgL_objzd2classzd2numz00_2294 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2293); 
{ /* ./Cfa/setup.scm 83 */
obj_t BgL_arg2017z00_2295;
{ /* ./Cfa/setup.scm 83 */
int BgL_auxz00_4950;
BgL_auxz00_4950 = 
(int)(((long)1)); 
BgL_arg2017z00_2295 = 
PROCEDURE_REF(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BgL_auxz00_4950); } 
{ /* ./Cfa/setup.scm 83 */
int BgL_offsetz00_2298;
BgL_offsetz00_2298 = 
(int)(BgL_objzd2classzd2numz00_2294); 
{ /* ./Cfa/setup.scm 83 */
long BgL_offsetz00_2299;
{ /* ./Cfa/setup.scm 83 */
long BgL_auxz00_4954;
BgL_auxz00_4954 = 
(long)(BgL_offsetz00_2298); 
BgL_offsetz00_2299 = 
(BgL_auxz00_4954-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 83 */
long BgL_modz00_2300;
{ /* ./Cfa/setup.scm 83 */
int BgL_arg2028z00_2301;
BgL_arg2028z00_2301 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 83 */
long BgL_n2z00_2309;
BgL_n2z00_2309 = 
(long)(BgL_arg2028z00_2301); 
BgL_modz00_2300 = 
(BgL_offsetz00_2299/BgL_n2z00_2309); } } 
{ /* ./Cfa/setup.scm 83 */
long BgL_restz00_2302;
{ /* ./Cfa/setup.scm 83 */
int BgL_arg2024z00_2303;
BgL_arg2024z00_2303 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 83 */
long BgL_n2z00_2312;
BgL_n2z00_2312 = 
(long)(BgL_arg2024z00_2303); 
BgL_restz00_2302 = 
(BgL_offsetz00_2299%BgL_n2z00_2312); } } 
{ /* ./Cfa/setup.scm 83 */

{ /* ./Cfa/setup.scm 83 */
obj_t BgL_bucketz00_2304;
{ /* ./Cfa/setup.scm 83 */
int BgL_kz00_2314;
BgL_kz00_2314 = 
(int)(BgL_modz00_2300); 
BgL_bucketz00_2304 = 
VECTOR_REF(BgL_arg2017z00_2295,BgL_kz00_2314); } 
{ /* ./Cfa/setup.scm 83 */
int BgL_kz00_2316;
BgL_kz00_2316 = 
(int)(BgL_restz00_2302); 
BgL_method4641z00_2292 = 
VECTOR_REF(BgL_bucketz00_2304,BgL_kz00_2316); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method4641z00_2292)(BgL_method4641z00_2292, 
(obj_t)(BgL_arg5643z00_1689), 
(obj_t)(BgL_arg5644z00_1690), BEOA); } } 
{ /* ./Cfa/setup.scm 86 */
bool_t BgL_test5651z00_1692;
{ /* ./Cfa/setup.scm 86 */
bool_t BgL_test5683z00_1704;
{ /* ./Cfa/setup.scm 86 */
BgL_variablez00_bglt BgL_arg5690z00_1707;
BgL_arg5690z00_1707 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
{ /* ./Cfa/setup.scm 86 */
obj_t BgL_obj1322z00_2318;
BgL_obj1322z00_2318 = 
(obj_t)(BgL_arg5690z00_1707); 
BgL_test5683z00_1704 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1322z00_2318, BGl_localz00zzast_varz00); } } 
if(BgL_test5683z00_1704)
{ /* ./Cfa/setup.scm 86 */
bool_t BgL_test5684z00_1705;
{ /* ./Cfa/setup.scm 86 */
BgL_variablez00_bglt BgL_arg5686z00_1706;
BgL_arg5686z00_1706 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
{ /* ./Cfa/setup.scm 86 */
obj_t BgL_obj2973z00_2320;
BgL_obj2973z00_2320 = 
(obj_t)(BgL_arg5686z00_1706); 
BgL_test5684z00_1705 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2973z00_2320, BGl_reshapedzd2localzd2zzcfa_infoz00); } } 
if(BgL_test5684z00_1705)
{ /* ./Cfa/setup.scm 86 */
BgL_test5651z00_1692 = ((bool_t)0); }  else 
{ /* ./Cfa/setup.scm 86 */
BgL_test5651z00_1692 = ((bool_t)1); } }  else 
{ /* ./Cfa/setup.scm 86 */
BgL_test5651z00_1692 = ((bool_t)0); } } 
if(BgL_test5651z00_1692)
{ /* ./Cfa/setup.scm 86 */
{ /* ./Cfa/setup.scm 87 */
BgL_localz00_bglt BgL_obj4552z00_1693;
{ 
BgL_localz00_bglt BgL_auxz00_4980;
{ /* ./Cfa/setup.scm 87 */
BgL_variablez00_bglt BgL_auxz00_4981;
BgL_auxz00_4981 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
BgL_auxz00_4980 = 
(BgL_localz00_bglt)(BgL_auxz00_4981); } 
BgL_obj4552z00_1693 = 
((BgL_localz00_bglt)BgL_auxz00_4980); } 
{ /* ./Cfa/setup.scm 87 */
obj_t BgL_arg5653z00_1694;
BgL_arg5653z00_1694 = 
BGl_wideningzd2reshapedzd2localz00zzcfa_infoz00(BFALSE); 
{ /* ./Cfa/setup.scm 87 */
BgL_objectz00_bglt BgL_auxz00_4986;
BgL_auxz00_4986 = 
(BgL_objectz00_bglt)(BgL_obj4552z00_1693); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4986, BgL_arg5653z00_1694); } } 
{ /* ./Cfa/setup.scm 87 */
long BgL_arg5657z00_1695;
BgL_arg5657z00_1695 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2localzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 87 */
BgL_objectz00_bglt BgL_objz00_2322;
BgL_objz00_2322 = 
(BgL_objectz00_bglt)(BgL_obj4552z00_1693); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2322, BgL_arg5657z00_1695); } } 
{ /* ./Cfa/setup.scm 87 */
obj_t BgL_objz00_2324;
BgL_objz00_2324 = 
(obj_t)(BgL_obj4552z00_1693); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2324); BUNSPEC; } 
return 
(obj_t)(BgL_obj4552z00_1693);} }  else 
{ /* ./Cfa/setup.scm 88 */
bool_t BgL_test5662z00_1696;
{ /* ./Cfa/setup.scm 88 */
bool_t BgL_test5673z00_1700;
{ /* ./Cfa/setup.scm 88 */
BgL_variablez00_bglt BgL_arg5680z00_1703;
BgL_arg5680z00_1703 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
{ /* ./Cfa/setup.scm 88 */
obj_t BgL_obj1261z00_2326;
BgL_obj1261z00_2326 = 
(obj_t)(BgL_arg5680z00_1703); 
BgL_test5673z00_1700 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1261z00_2326, BGl_globalz00zzast_varz00); } } 
if(BgL_test5673z00_1700)
{ /* ./Cfa/setup.scm 88 */
bool_t BgL_test5674z00_1701;
{ /* ./Cfa/setup.scm 88 */
BgL_variablez00_bglt BgL_arg5676z00_1702;
BgL_arg5676z00_1702 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
{ /* ./Cfa/setup.scm 88 */
obj_t BgL_obj3021z00_2328;
BgL_obj3021z00_2328 = 
(obj_t)(BgL_arg5676z00_1702); 
BgL_test5674z00_1701 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3021z00_2328, BGl_reshapedzd2globalzd2zzcfa_infoz00); } } 
if(BgL_test5674z00_1701)
{ /* ./Cfa/setup.scm 88 */
BgL_test5662z00_1696 = ((bool_t)0); }  else 
{ /* ./Cfa/setup.scm 88 */
BgL_test5662z00_1696 = ((bool_t)1); } }  else 
{ /* ./Cfa/setup.scm 88 */
BgL_test5662z00_1696 = ((bool_t)0); } } 
if(BgL_test5662z00_1696)
{ /* ./Cfa/setup.scm 88 */
{ /* ./Cfa/setup.scm 89 */
BgL_globalz00_bglt BgL_obj4553z00_1697;
{ 
BgL_globalz00_bglt BgL_auxz00_5004;
{ /* ./Cfa/setup.scm 89 */
BgL_variablez00_bglt BgL_auxz00_5005;
BgL_auxz00_5005 = 
(((BgL_varz00_bglt)CREF(BgL_nodez00_1685))->BgL_variablez00); 
BgL_auxz00_5004 = 
(BgL_globalz00_bglt)(BgL_auxz00_5005); } 
BgL_obj4553z00_1697 = 
((BgL_globalz00_bglt)BgL_auxz00_5004); } 
{ /* ./Cfa/setup.scm 89 */
obj_t BgL_arg5664z00_1698;
BgL_arg5664z00_1698 = 
BGl_wideningzd2reshapedzd2globalz00zzcfa_infoz00(); 
{ /* ./Cfa/setup.scm 89 */
BgL_objectz00_bglt BgL_auxz00_5010;
BgL_auxz00_5010 = 
(BgL_objectz00_bglt)(BgL_obj4553z00_1697); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_5010, BgL_arg5664z00_1698); } } 
{ /* ./Cfa/setup.scm 89 */
long BgL_arg5668z00_1699;
BgL_arg5668z00_1699 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2globalzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 89 */
BgL_objectz00_bglt BgL_objz00_2330;
BgL_objz00_2330 = 
(BgL_objectz00_bglt)(BgL_obj4553z00_1697); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2330, BgL_arg5668z00_1699); } } 
{ /* ./Cfa/setup.scm 89 */
obj_t BgL_objz00_2332;
BgL_objz00_2332 = 
(obj_t)(BgL_obj4553z00_1697); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2332); BUNSPEC; } 
return 
(obj_t)(BgL_obj4553z00_1697);} }  else 
{ /* ./Cfa/setup.scm 88 */
return BFALSE;} } } } } 
}



/* node-setup!-kwote/node4637 */
obj_t BGl_nodezd2setupz12zd2kwotezf2node4637ze0zzcfa_setupz00(obj_t BgL_envz00_3431, obj_t BgL_kwotez00_3432)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 74 */
{ 
BgL_kwotezf2nodezf2_bglt BgL_kwotez00_1678;
BgL_kwotez00_1678 = 
(BgL_kwotezf2nodezf2_bglt)(BgL_kwotez00_3432); 
{ /* ./Cfa/setup.scm 75 */
BgL_nodez00_bglt BgL_arg5633z00_2259;
{ 
obj_t BgL_auxz00_5020;
{ /* ./Cfa/setup.scm 75 */
BgL_objectz00_bglt BgL_auxz00_5021;
BgL_auxz00_5021 = 
(BgL_objectz00_bglt)(BgL_kwotez00_1678); 
BgL_auxz00_5020 = 
BGL_OBJECT_WIDENING(BgL_auxz00_5021); } 
BgL_arg5633z00_2259 = 
(((BgL_kwotezf2nodezf2_bglt)CREF(BgL_auxz00_5020))->BgL_nodez00); } 
{ /* ./Cfa/setup.scm 75 */
obj_t BgL_method4631z00_2262;
{ /* ./Cfa/setup.scm 75 */
BgL_objectz00_bglt BgL_objz00_2263;
BgL_objz00_2263 = 
(BgL_objectz00_bglt)(BgL_arg5633z00_2259); 
{ /* ./Cfa/setup.scm 75 */
long BgL_objzd2classzd2numz00_2264;
BgL_objzd2classzd2numz00_2264 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2263); 
{ /* ./Cfa/setup.scm 75 */
obj_t BgL_arg2017z00_2265;
{ /* ./Cfa/setup.scm 75 */
int BgL_auxz00_5027;
BgL_auxz00_5027 = 
(int)(((long)1)); 
BgL_arg2017z00_2265 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_5027); } 
{ /* ./Cfa/setup.scm 75 */
int BgL_offsetz00_2268;
BgL_offsetz00_2268 = 
(int)(BgL_objzd2classzd2numz00_2264); 
{ /* ./Cfa/setup.scm 75 */
long BgL_offsetz00_2269;
{ /* ./Cfa/setup.scm 75 */
long BgL_auxz00_5031;
BgL_auxz00_5031 = 
(long)(BgL_offsetz00_2268); 
BgL_offsetz00_2269 = 
(BgL_auxz00_5031-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 75 */
long BgL_modz00_2270;
{ /* ./Cfa/setup.scm 75 */
int BgL_arg2028z00_2271;
BgL_arg2028z00_2271 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 75 */
long BgL_n2z00_2279;
BgL_n2z00_2279 = 
(long)(BgL_arg2028z00_2271); 
BgL_modz00_2270 = 
(BgL_offsetz00_2269/BgL_n2z00_2279); } } 
{ /* ./Cfa/setup.scm 75 */
long BgL_restz00_2272;
{ /* ./Cfa/setup.scm 75 */
int BgL_arg2024z00_2273;
BgL_arg2024z00_2273 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 75 */
long BgL_n2z00_2282;
BgL_n2z00_2282 = 
(long)(BgL_arg2024z00_2273); 
BgL_restz00_2272 = 
(BgL_offsetz00_2269%BgL_n2z00_2282); } } 
{ /* ./Cfa/setup.scm 75 */

{ /* ./Cfa/setup.scm 75 */
obj_t BgL_bucketz00_2274;
{ /* ./Cfa/setup.scm 75 */
int BgL_kz00_2284;
BgL_kz00_2284 = 
(int)(BgL_modz00_2270); 
BgL_bucketz00_2274 = 
VECTOR_REF(BgL_arg2017z00_2265,BgL_kz00_2284); } 
{ /* ./Cfa/setup.scm 75 */
int BgL_kz00_2286;
BgL_kz00_2286 = 
(int)(BgL_restz00_2272); 
BgL_method4631z00_2262 = 
VECTOR_REF(BgL_bucketz00_2274,BgL_kz00_2286); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4631z00_2262)(BgL_method4631z00_2262, 
(obj_t)(BgL_arg5633z00_2259), BEOA);} } } } 
}



/* node-setup!-kwote4635 */
obj_t BGl_nodezd2setupz12zd2kwote4635z12zzcfa_setupz00(obj_t BgL_envz00_3433, obj_t BgL_nodez00_3434)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 66 */
{ 
BgL_kwotez00_bglt BgL_nodez00_1666;
{ /* ./Cfa/setup.scm 67 */
BgL_kwotez00_bglt BgL_auxz00_5048;
BgL_nodez00_1666 = 
(BgL_kwotez00_bglt)(BgL_nodez00_3434); 
{ /* ./Cfa/setup.scm 68 */
BgL_kwotez00_bglt BgL_obj4547z00_1670;
BgL_obj4547z00_1670 = 
((BgL_kwotez00_bglt)BgL_nodez00_1666); 
{ /* ./Cfa/setup.scm 69 */
obj_t BgL_arg5609z00_1671;
{ /* ./Cfa/setup.scm 69 */
BgL_approxz00_bglt BgL_arg5612z00_1672;
{ /* ./Cfa/setup.scm 69 */
BgL_typez00_bglt BgL_arg5615z00_1673;
{ /* ./Cfa/setup.scm 69 */
obj_t BgL_arg5618z00_1674;
BgL_arg5618z00_1674 = 
(((BgL_kwotez00_bglt)CREF(BgL_nodez00_1666))->BgL_valuez00); 
BgL_arg5615z00_1673 = 
BGl_typeofzd2kwotezd2zztype_typeofz00(BgL_arg5618z00_1674); } 
BgL_arg5612z00_1672 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5615z00_1673); } 
BgL_arg5609z00_1671 = 
BGl_wideningzd2kwotezf2Cinfoz20zzcfa_infoz00(BgL_arg5612z00_1672); } 
{ /* ./Cfa/setup.scm 68 */
BgL_objectz00_bglt BgL_auxz00_5054;
BgL_auxz00_5054 = 
(BgL_objectz00_bglt)(BgL_obj4547z00_1670); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_5054, BgL_arg5609z00_1671); } } 
{ /* ./Cfa/setup.scm 68 */
long BgL_arg5622z00_1675;
BgL_arg5622z00_1675 = 
BGl_classzd2numzd2zz__objectz00(BGl_kwotezf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 68 */
BgL_objectz00_bglt BgL_objz00_2255;
BgL_objz00_2255 = 
(BgL_objectz00_bglt)(BgL_obj4547z00_1670); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2255, BgL_arg5622z00_1675); } } 
{ /* ./Cfa/setup.scm 68 */
obj_t BgL_objz00_2257;
BgL_objz00_2257 = 
(obj_t)(BgL_obj4547z00_1670); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2257); BUNSPEC; } 
BgL_auxz00_5048 = BgL_obj4547z00_1670; } 
return 
(obj_t)(BgL_auxz00_5048);} } } 
}



/* node-setup!-atom4633 */
obj_t BGl_nodezd2setupz12zd2atom4633z12zzcfa_setupz00(obj_t BgL_envz00_3435, obj_t BgL_nodez00_3436)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 58 */
{ 
BgL_atomz00_bglt BgL_nodez00_1654;
{ /* ./Cfa/setup.scm 59 */
BgL_atomz00_bglt BgL_auxz00_5064;
BgL_nodez00_1654 = 
(BgL_atomz00_bglt)(BgL_nodez00_3436); 
{ /* ./Cfa/setup.scm 60 */
BgL_atomz00_bglt BgL_obj4544z00_1658;
BgL_obj4544z00_1658 = 
((BgL_atomz00_bglt)BgL_nodez00_1654); 
{ /* ./Cfa/setup.scm 61 */
obj_t BgL_arg5585z00_1659;
{ /* ./Cfa/setup.scm 61 */
BgL_approxz00_bglt BgL_arg5588z00_1660;
{ /* ./Cfa/setup.scm 61 */
BgL_typez00_bglt BgL_arg5591z00_1661;
{ /* ./Cfa/setup.scm 61 */
obj_t BgL_arg5594z00_1662;
BgL_arg5594z00_1662 = 
(((BgL_atomz00_bglt)CREF(BgL_nodez00_1654))->BgL_valuez00); 
BgL_arg5591z00_1661 = 
BGl_typeofzd2atomzd2zztype_typeofz00(BgL_arg5594z00_1662); } 
BgL_arg5588z00_1660 = 
BGl_makezd2typezd2approxz00zzcfa_approxz00(BgL_arg5591z00_1661); } 
BgL_arg5585z00_1659 = 
BGl_wideningzd2atomzf2Cinfoz20zzcfa_infoz00(BgL_arg5588z00_1660); } 
{ /* ./Cfa/setup.scm 60 */
BgL_objectz00_bglt BgL_auxz00_5070;
BgL_auxz00_5070 = 
(BgL_objectz00_bglt)(BgL_obj4544z00_1658); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_5070, BgL_arg5585z00_1659); } } 
{ /* ./Cfa/setup.scm 60 */
long BgL_arg5598z00_1663;
BgL_arg5598z00_1663 = 
BGl_classzd2numzd2zz__objectz00(BGl_atomzf2Cinfozf2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 60 */
BgL_objectz00_bglt BgL_objz00_2251;
BgL_objz00_2251 = 
(BgL_objectz00_bglt)(BgL_obj4544z00_1658); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2251, BgL_arg5598z00_1663); } } 
{ /* ./Cfa/setup.scm 60 */
obj_t BgL_objz00_2253;
BgL_objz00_2253 = 
(obj_t)(BgL_obj4544z00_1658); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2253); BUNSPEC; } 
BgL_auxz00_5064 = BgL_obj4544z00_1658; } 
return 
(obj_t)(BgL_auxz00_5064);} } } 
}



/* node-setup! */
BGL_EXPORTED_DEF obj_t BGl_nodezd2setupz12zc0zzcfa_setupz00(BgL_nodez00_bglt BgL_nodez00_2)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 53 */
{ /* ./Cfa/setup.scm 53 */
obj_t BgL_method4631z00_3234;
{ /* ./Cfa/setup.scm 53 */
BgL_objectz00_bglt BgL_objz00_3235;
BgL_objz00_3235 = 
(BgL_objectz00_bglt)(BgL_nodez00_2); 
{ /* ./Cfa/setup.scm 53 */
long BgL_objzd2classzd2numz00_3236;
BgL_objzd2classzd2numz00_3236 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3235); 
{ /* ./Cfa/setup.scm 53 */
obj_t BgL_arg2017z00_3237;
{ /* ./Cfa/setup.scm 53 */
int BgL_auxz00_5082;
BgL_auxz00_5082 = 
(int)(((long)1)); 
BgL_arg2017z00_3237 = 
PROCEDURE_REF(BGl_nodezd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_5082); } 
{ /* ./Cfa/setup.scm 53 */
int BgL_offsetz00_3240;
BgL_offsetz00_3240 = 
(int)(BgL_objzd2classzd2numz00_3236); 
{ /* ./Cfa/setup.scm 53 */
long BgL_offsetz00_3241;
{ /* ./Cfa/setup.scm 53 */
long BgL_auxz00_5086;
BgL_auxz00_5086 = 
(long)(BgL_offsetz00_3240); 
BgL_offsetz00_3241 = 
(BgL_auxz00_5086-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 53 */
long BgL_modz00_3242;
{ /* ./Cfa/setup.scm 53 */
int BgL_arg2028z00_3243;
BgL_arg2028z00_3243 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 53 */
long BgL_n2z00_3251;
BgL_n2z00_3251 = 
(long)(BgL_arg2028z00_3243); 
BgL_modz00_3242 = 
(BgL_offsetz00_3241/BgL_n2z00_3251); } } 
{ /* ./Cfa/setup.scm 53 */
long BgL_restz00_3244;
{ /* ./Cfa/setup.scm 53 */
int BgL_arg2024z00_3245;
BgL_arg2024z00_3245 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 53 */
long BgL_n2z00_3254;
BgL_n2z00_3254 = 
(long)(BgL_arg2024z00_3245); 
BgL_restz00_3244 = 
(BgL_offsetz00_3241%BgL_n2z00_3254); } } 
{ /* ./Cfa/setup.scm 53 */

{ /* ./Cfa/setup.scm 53 */
obj_t BgL_bucketz00_3246;
{ /* ./Cfa/setup.scm 53 */
int BgL_kz00_3256;
BgL_kz00_3256 = 
(int)(BgL_modz00_3242); 
BgL_bucketz00_3246 = 
VECTOR_REF(BgL_arg2017z00_3237,BgL_kz00_3256); } 
{ /* ./Cfa/setup.scm 53 */
int BgL_kz00_3258;
BgL_kz00_3258 = 
(int)(BgL_restz00_3244); 
BgL_method4631z00_3234 = 
VECTOR_REF(BgL_bucketz00_3246,BgL_kz00_3258); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4631z00_3234)(BgL_method4631z00_3234, 
(obj_t)(BgL_nodez00_2), BEOA);} } 
}



/* _node-setup!6669 */
obj_t BGl__nodezd2setupz126669zc0zzcfa_setupz00(obj_t BgL_envz00_3328, obj_t BgL_nodez00_3329)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 53 */
return 
BGl_nodezd2setupz12zc0zzcfa_setupz00(
(BgL_nodez00_bglt)(BgL_nodez00_3329));} 
}



/* node-setup!-default4630 */
obj_t BGl_nodezd2setupz12zd2default4630z12zzcfa_setupz00(BgL_nodez00_bglt BgL_nodez00_3)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
{ /* ./Cfa/setup.scm 15 */
obj_t BgL_procz00_3259;obj_t BgL_objectz00_3261;
BgL_procz00_3259 = 
CNST_TABLE_REF(((long)5)); 
BgL_objectz00_3261 = 
(obj_t)(BgL_nodez00_3); 
FAILURE(BgL_procz00_3259,BGl_string7472z00zzcfa_setupz00,BgL_objectz00_3261);} } 
}



/* _node-setup!-default4630 */
obj_t BGl__nodezd2setupz12zd2default4630z12zzcfa_setupz00(obj_t BgL_envz00_3437, obj_t BgL_nodez00_3438)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
return 
BGl_nodezd2setupz12zd2default4630z12zzcfa_setupz00(
(BgL_nodez00_bglt)(BgL_nodez00_3438));} 
}



/* variable-value-setup! */
obj_t BGl_variablezd2valuezd2setupz12z12zzcfa_setupz00(BgL_valuez00_bglt BgL_valuez00_9, BgL_variablez00_bglt BgL_variablez00_10)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 111 */
{ /* ./Cfa/setup.scm 111 */
obj_t BgL_method4641z00_3262;
{ /* ./Cfa/setup.scm 111 */
BgL_objectz00_bglt BgL_objz00_3263;
BgL_objz00_3263 = 
(BgL_objectz00_bglt)(BgL_valuez00_9); 
{ /* ./Cfa/setup.scm 111 */
long BgL_objzd2classzd2numz00_3264;
BgL_objzd2classzd2numz00_3264 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3263); 
{ /* ./Cfa/setup.scm 111 */
obj_t BgL_arg2017z00_3265;
{ /* ./Cfa/setup.scm 111 */
int BgL_auxz00_5111;
BgL_auxz00_5111 = 
(int)(((long)1)); 
BgL_arg2017z00_3265 = 
PROCEDURE_REF(BGl_variablezd2valuezd2setupz12zd2envzc0zzcfa_setupz00, BgL_auxz00_5111); } 
{ /* ./Cfa/setup.scm 111 */
int BgL_offsetz00_3268;
BgL_offsetz00_3268 = 
(int)(BgL_objzd2classzd2numz00_3264); 
{ /* ./Cfa/setup.scm 111 */
long BgL_offsetz00_3269;
{ /* ./Cfa/setup.scm 111 */
long BgL_auxz00_5115;
BgL_auxz00_5115 = 
(long)(BgL_offsetz00_3268); 
BgL_offsetz00_3269 = 
(BgL_auxz00_5115-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 111 */
long BgL_modz00_3270;
{ /* ./Cfa/setup.scm 111 */
int BgL_arg2028z00_3271;
BgL_arg2028z00_3271 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 111 */
long BgL_n2z00_3279;
BgL_n2z00_3279 = 
(long)(BgL_arg2028z00_3271); 
BgL_modz00_3270 = 
(BgL_offsetz00_3269/BgL_n2z00_3279); } } 
{ /* ./Cfa/setup.scm 111 */
long BgL_restz00_3272;
{ /* ./Cfa/setup.scm 111 */
int BgL_arg2024z00_3273;
BgL_arg2024z00_3273 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 111 */
long BgL_n2z00_3282;
BgL_n2z00_3282 = 
(long)(BgL_arg2024z00_3273); 
BgL_restz00_3272 = 
(BgL_offsetz00_3269%BgL_n2z00_3282); } } 
{ /* ./Cfa/setup.scm 111 */

{ /* ./Cfa/setup.scm 111 */
obj_t BgL_bucketz00_3274;
{ /* ./Cfa/setup.scm 111 */
int BgL_kz00_3284;
BgL_kz00_3284 = 
(int)(BgL_modz00_3270); 
BgL_bucketz00_3274 = 
VECTOR_REF(BgL_arg2017z00_3265,BgL_kz00_3284); } 
{ /* ./Cfa/setup.scm 111 */
int BgL_kz00_3286;
BgL_kz00_3286 = 
(int)(BgL_restz00_3272); 
BgL_method4641z00_3262 = 
VECTOR_REF(BgL_bucketz00_3274,BgL_kz00_3286); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4641z00_3262)(BgL_method4641z00_3262, 
(obj_t)(BgL_valuez00_9), 
(obj_t)(BgL_variablez00_10), BEOA);} } 
}



/* _variable-value-setup!6667 */
obj_t BGl__variablezd2valuezd2setupz126667z12zzcfa_setupz00(obj_t BgL_envz00_3325, obj_t BgL_valuez00_3326, obj_t BgL_variablez00_3327)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 111 */
return 
BGl_variablezd2valuezd2setupz12z12zzcfa_setupz00(
(BgL_valuez00_bglt)(BgL_valuez00_3326), 
(BgL_variablez00_bglt)(BgL_variablez00_3327));} 
}



/* variable-value-setup!-default4640 */
obj_t BGl_variablezd2valuezd2setupz12zd2default4640zc0zzcfa_setupz00(BgL_valuez00_bglt BgL_valuez00_11, BgL_variablez00_bglt BgL_variablez00_12)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
{ /* ./Cfa/setup.scm 15 */
obj_t BgL_procz00_3287;obj_t BgL_objectz00_3289;
BgL_procz00_3287 = 
CNST_TABLE_REF(((long)6)); 
BgL_objectz00_3289 = 
(obj_t)(BgL_valuez00_11); 
FAILURE(BgL_procz00_3287,BGl_string7472z00zzcfa_setupz00,BgL_objectz00_3289);} } 
}



/* _variable-value-setup!-default4640 */
obj_t BGl__variablezd2valuezd2setupz12zd2default4640zc0zzcfa_setupz00(obj_t BgL_envz00_3439, obj_t BgL_valuez00_3440, obj_t BgL_variablez00_3441)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
return 
BGl_variablezd2valuezd2setupz12zd2default4640zc0zzcfa_setupz00(
(BgL_valuez00_bglt)(BgL_valuez00_3440), 
(BgL_variablez00_bglt)(BgL_variablez00_3441));} 
}



/* fun-setup! */
obj_t BGl_funzd2setupz12zc0zzcfa_setupz00(BgL_funz00_bglt BgL_funz00_30, obj_t BgL_varz00_31)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 212 */
{ /* ./Cfa/setup.scm 212 */
obj_t BgL_method4663z00_3290;
{ /* ./Cfa/setup.scm 212 */
BgL_objectz00_bglt BgL_objz00_3291;
BgL_objz00_3291 = 
(BgL_objectz00_bglt)(BgL_funz00_30); 
{ /* ./Cfa/setup.scm 212 */
long BgL_objzd2classzd2numz00_3292;
BgL_objzd2classzd2numz00_3292 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3291); 
{ /* ./Cfa/setup.scm 212 */
obj_t BgL_arg2017z00_3293;
{ /* ./Cfa/setup.scm 212 */
int BgL_auxz00_5143;
BgL_auxz00_5143 = 
(int)(((long)1)); 
BgL_arg2017z00_3293 = 
PROCEDURE_REF(BGl_funzd2setupz12zd2envz12zzcfa_setupz00, BgL_auxz00_5143); } 
{ /* ./Cfa/setup.scm 212 */
int BgL_offsetz00_3296;
BgL_offsetz00_3296 = 
(int)(BgL_objzd2classzd2numz00_3292); 
{ /* ./Cfa/setup.scm 212 */
long BgL_offsetz00_3297;
{ /* ./Cfa/setup.scm 212 */
long BgL_auxz00_5147;
BgL_auxz00_5147 = 
(long)(BgL_offsetz00_3296); 
BgL_offsetz00_3297 = 
(BgL_auxz00_5147-OBJECT_TYPE); } 
{ /* ./Cfa/setup.scm 212 */
long BgL_modz00_3298;
{ /* ./Cfa/setup.scm 212 */
int BgL_arg2028z00_3299;
BgL_arg2028z00_3299 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 212 */
long BgL_n2z00_3307;
BgL_n2z00_3307 = 
(long)(BgL_arg2028z00_3299); 
BgL_modz00_3298 = 
(BgL_offsetz00_3297/BgL_n2z00_3307); } } 
{ /* ./Cfa/setup.scm 212 */
long BgL_restz00_3300;
{ /* ./Cfa/setup.scm 212 */
int BgL_arg2024z00_3301;
BgL_arg2024z00_3301 = 
(int)(((long)8)); 
{ /* ./Cfa/setup.scm 212 */
long BgL_n2z00_3310;
BgL_n2z00_3310 = 
(long)(BgL_arg2024z00_3301); 
BgL_restz00_3300 = 
(BgL_offsetz00_3297%BgL_n2z00_3310); } } 
{ /* ./Cfa/setup.scm 212 */

{ /* ./Cfa/setup.scm 212 */
obj_t BgL_bucketz00_3302;
{ /* ./Cfa/setup.scm 212 */
int BgL_kz00_3312;
BgL_kz00_3312 = 
(int)(BgL_modz00_3298); 
BgL_bucketz00_3302 = 
VECTOR_REF(BgL_arg2017z00_3293,BgL_kz00_3312); } 
{ /* ./Cfa/setup.scm 212 */
int BgL_kz00_3314;
BgL_kz00_3314 = 
(int)(BgL_restz00_3300); 
BgL_method4663z00_3290 = 
VECTOR_REF(BgL_bucketz00_3302,BgL_kz00_3314); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method4663z00_3290)(BgL_method4663z00_3290, 
(obj_t)(BgL_funz00_30), BgL_varz00_31, BEOA);} } 
}



/* _fun-setup!6665 */
obj_t BGl__funzd2setupz126665zc0zzcfa_setupz00(obj_t BgL_envz00_3322, obj_t BgL_funz00_3323, obj_t BgL_varz00_3324)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 212 */
return 
BGl_funzd2setupz12zc0zzcfa_setupz00(
(BgL_funz00_bglt)(BgL_funz00_3323), BgL_varz00_3324);} 
}



/* fun-setup!-default4662 */
obj_t BGl_funzd2setupz12zd2default4662z12zzcfa_setupz00(BgL_funz00_bglt BgL_funz00_32, obj_t BgL_varz00_33)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
{ /* ./Cfa/setup.scm 213 */
bool_t BgL_test6563z00_2121;
{ /* ./Cfa/setup.scm 213 */
bool_t BgL_test6573z00_2125;
BgL_test6573z00_2125 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_33, BGl_globalz00zzast_varz00); 
if(BgL_test6573z00_2125)
{ /* ./Cfa/setup.scm 213 */
bool_t BgL_test6574z00_2126;
BgL_test6574z00_2126 = 
BGl_iszd2azf3z21zz__objectz00(BgL_varz00_33, BGl_reshapedzd2globalzd2zzcfa_infoz00); 
if(BgL_test6574z00_2126)
{ /* ./Cfa/setup.scm 213 */
BgL_test6563z00_2121 = ((bool_t)0); }  else 
{ /* ./Cfa/setup.scm 213 */
BgL_test6563z00_2121 = ((bool_t)1); } }  else 
{ /* ./Cfa/setup.scm 213 */
BgL_test6563z00_2121 = ((bool_t)0); } } 
if(BgL_test6563z00_2121)
{ /* ./Cfa/setup.scm 214 */
BgL_globalz00_bglt BgL_obj4565z00_2122;
{ 
BgL_globalz00_bglt BgL_auxz00_5170;
BgL_auxz00_5170 = 
(BgL_globalz00_bglt)(BgL_varz00_33); 
BgL_obj4565z00_2122 = 
((BgL_globalz00_bglt)BgL_auxz00_5170); } 
{ /* ./Cfa/setup.scm 214 */
obj_t BgL_arg6565z00_2123;
BgL_arg6565z00_2123 = 
BGl_wideningzd2reshapedzd2globalz00zzcfa_infoz00(); 
{ /* ./Cfa/setup.scm 214 */
BgL_objectz00_bglt BgL_auxz00_5174;
BgL_auxz00_5174 = 
(BgL_objectz00_bglt)(BgL_obj4565z00_2122); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_5174, BgL_arg6565z00_2123); } } 
{ /* ./Cfa/setup.scm 214 */
long BgL_arg6569z00_2124;
BgL_arg6569z00_2124 = 
BGl_classzd2numzd2zz__objectz00(BGl_reshapedzd2globalzd2zzcfa_infoz00); 
{ /* ./Cfa/setup.scm 214 */
BgL_objectz00_bglt BgL_objz00_3317;
BgL_objz00_3317 = 
(BgL_objectz00_bglt)(BgL_obj4565z00_2122); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3317, BgL_arg6569z00_2124); } } 
{ /* ./Cfa/setup.scm 214 */
obj_t BgL_objz00_3319;
BgL_objz00_3319 = 
(obj_t)(BgL_obj4565z00_2122); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3319); BUNSPEC; } 
(obj_t)(BgL_obj4565z00_2122); }  else 
{ /* ./Cfa/setup.scm 213 */BFALSE; } } 
return BUNSPEC;} 
}



/* _fun-setup!-default4662 */
obj_t BGl__funzd2setupz12zd2default4662z12zzcfa_setupz00(obj_t BgL_envz00_3442, obj_t BgL_funz00_3443, obj_t BgL_varz00_3444)
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
return 
BGl_funzd2setupz12zd2default4662z12zzcfa_setupz00(
(BgL_funz00_bglt)(BgL_funz00_3443), BgL_varz00_3444);} 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzcfa_setupz00()
{ AN_OBJECT;
{ /* ./Cfa/setup.scm 15 */
BGl_modulezd2initializa7ationz75zztools_tracez00(((long)59211), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zztype_cachez00(((long)25848), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zztype_typeofz00(((long)852), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zzmodule_modulez00(((long)8699), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zztools_shapez00(((long)30833), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zztools_errorz00(((long)25566), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zzcfa_infoz00(((long)2565), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zzcfa_info2z00(((long)0), "cfa_setup"); 
BGl_modulezd2initializa7ationz75zzcfa_info3z00(((long)0), "cfa_setup"); 
return 
BGl_modulezd2initializa7ationz75zzcfa_approxz00(((long)43477), "cfa_setup");} 
}

