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

#include <bigloo.h>


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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


BGL_IMPORT double BGl_roundflz00zz__r4_numbers_6_5_flonumz00(double);
static obj_t BGl_methodzd2initzd2zzbdb_spreadzd2objzd2();
BGL_IMPORT obj_t open_input_string(obj_t);
extern obj_t BGl_letzd2funzd2zzast_nodez00;
static obj_t BGl_spreadzd2objzd2nodez12zd2funcall2700zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_IMPORT obj_t BGl_addzd2genericz12zc0zz__objectz00(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2makezd2box2722z12zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_letzd2varzd2zzast_nodez00;
static obj_t BGl__bdbzd2spreadzd2objz12z12zzbdb_spreadzd2objzd2(obj_t, obj_t);
BGL_IMPORT obj_t string_to_bstring(char *);
static obj_t BGl_spreadzd2objzd2nodez12zd2select2712zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_za2_za2z00zztype_cachez00;
static obj_t BGl_spreadzd2objzd2nodez12zd2fail2710zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2extern2702zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2conditional2708zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_castz00zzast_nodez00;
static obj_t BGl_spreadzd2objzd2nodez12zd2appzd2ly2698z12zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_boxzd2refzd2zzast_nodez00;
extern obj_t BGl_enterzd2functionzd2zztools_errorz00(obj_t);
extern obj_t BGl_za2bdbzd2debugza2zd2zzengine_paramz00;
static obj_t BGl_cnstzd2initzd2zzbdb_spreadzd2objzd2();
extern obj_t BGl_failz00zzast_nodez00;
extern obj_t BGl_funcallz00zzast_nodez00;
extern obj_t BGl_leavezd2functionzd2zztools_errorz00();
extern obj_t BGl_za2nbzd2errorzd2onzd2passza2zd2zztools_errorz00;
BGL_IMPORT obj_t BGl_displayzd22zd2zz__r4_output_6_10_3z00(obj_t, obj_t);
extern obj_t BGl_za2currentzd2passza2zd2zzengine_passz00;
static obj_t BGl_importedzd2moduleszd2initz00zzbdb_spreadzd2objzd2();
extern obj_t BGl_makezd2boxzd2zzast_nodez00;
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_exitz00zz__errorz00(obj_t);
extern obj_t BGl_selectz00zzast_nodez00;
static obj_t BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2(obj_t);
static obj_t BGl_toplevelzd2initzd2zzbdb_spreadzd2objzd2();
extern obj_t BGl_appzd2lyzd2zzast_nodez00;
extern obj_t BGl_boxzd2setz12zc0zzast_nodez00;
BGL_IMPORT bool_t BGl_2ze3ze3zz__r4_numbers_6_5z00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzbdb_spreadzd2objzd2(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_speekz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_passz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_miscz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_cachez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_sexpz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(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_numbers_6_5z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_flonumz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(long, char *);
extern obj_t BGl_verbosez00zztools_speekz00(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2setzd2exzd2it2718zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2funz12z12zzbdb_spreadzd2objzd2(obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2jumpzd2exzd2it2720zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_setzd2exzd2itz00zzast_nodez00;
static obj_t BGl__spreadzd2objzd2nodez12z12zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2boxzd2ref2724z12zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2setq2706zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_bdbzd2spreadzd2objz12z12zzbdb_spreadzd2objzd2(obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2boxzd2setz122726z00zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_jumpzd2exzd2itz00zzast_nodez00;
extern obj_t BGl_externz00zzast_nodez00;
extern obj_t BGl_conditionalz00zzast_nodez00;
extern obj_t BGl_sequencez00zzast_nodez00;
BGL_IMPORT obj_t display_string(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12zd2app2696zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_internalzd2errorzd2zztools_errorz00(obj_t, obj_t, obj_t);
extern obj_t BGl_appz00zzast_nodez00;
static obj_t BGl_spreadzd2objzd2nodez12zd2sequence2694zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_spreadzd2objzd2nodez12z12zzbdb_spreadzd2objzd2(BgL_nodez00_bglt);
extern obj_t BGl_za2objza2z00zztype_cachez00;
static obj_t BGl_spreadzd2objzd2nodez12zd2letzd2fun2714z12zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzbdb_spreadzd2objzd2 = BUNSPEC;
static obj_t BGl_spreadzd2objzd2nodez12zd2cast2704zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzbdb_spreadzd2objzd2();
static obj_t BGl_spreadzd2objzd2nodez12zd2letzd2var2716z12zzbdb_spreadzd2objzd2(obj_t, obj_t);
static obj_t BGl__spreadzd2objzd2nodez12zd2default2691zc0zzbdb_spreadzd2objzd2(obj_t, obj_t);
extern obj_t BGl_setqz00zzast_nodez00;
static obj_t __cnst[ 2 ] ;


DEFINE_EXPORT_PROCEDURE( BGl_bdbzd2spreadzd2objz12zd2envzc0zzbdb_spreadzd2objzd2, BgL_bgl__bdbza7d2spreadza7d2objza712za712za7za7bdb_spreadza7d2objza7d23945z00, BGl__bdbzd2spreadzd2objz12z12zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_GENERIC( BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_bgl__spreadza7d2objza7d2nodeza712za712za7za7bdb_spreadza7d2objza7d23946z00, BGl__spreadzd2objzd2nodez12z12zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_spreadzd2objzd2nodez12zd2default2691zd2envz12zzbdb_spreadzd2objzd2, BgL_bgl__spreadza7d2objza7d2nodeza712za7d2default2691za7c0za7za7bdb_spreadza7d2objza7d23947za7, BGl__spreadzd2objzd2nodez12zd2default2691zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STRING( BGl_string3914z00zzbdb_spreadzd2objzd2, BgL_bgl_string3914za700za7za7bdb_spreadza7d2objza7d23948za7, "done pass-started ", 18 );
DEFINE_STRING( BGl_string3896z00zzbdb_spreadzd2objzd2, BgL_bgl_string3896za700za7za7bdb_spreadza7d2objza7d23949za7, "failure during postlude hook", 28 );
DEFINE_STRING( BGl_string3895z00zzbdb_spreadzd2objzd2, BgL_bgl_string3895za700za7za7bdb_spreadza7d2objza7d23950za7, " occured, ending ...", 20 );
DEFINE_STRING( BGl_string3894z00zzbdb_spreadzd2objzd2, BgL_bgl_string3894za700za7za7bdb_spreadza7d2objza7d23951za7, " error", 6 );
DEFINE_STRING( BGl_string3893z00zzbdb_spreadzd2objzd2, BgL_bgl_string3893za700za7za7bdb_spreadza7d2objza7d23952za7, "failure during prelude hook", 27 );
DEFINE_STRING( BGl_string3892z00zzbdb_spreadzd2objzd2, BgL_bgl_string3892za700za7za7bdb_spreadza7d2objza7d23953za7, "   . ", 5 );
DEFINE_STRING( BGl_string3891z00zzbdb_spreadzd2objzd2, BgL_bgl_string3891za700za7za7bdb_spreadza7d2objza7d23954za7, "Bdb (obj spreading)", 19 );
DEFINE_STATIC_PROCEDURE( BGl_proc3900z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2funcall2700za7c0za7za7bdb_spreadza7d2objza7d23955za7, BGl_spreadzd2objzd2nodez12zd2funcall2700zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3901z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2extern2702za7c0za7za7bdb_spreadza7d2objza7d23956za7, BGl_spreadzd2objzd2nodez12zd2extern2702zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3902z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2cast2704za7c0za7za7bdb_spreadza7d2objza7d23957za7, BGl_spreadzd2objzd2nodez12zd2cast2704zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3903z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2setq2706za7c0za7za7bdb_spreadza7d2objza7d23958za7, BGl_spreadzd2objzd2nodez12zd2setq2706zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3904z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2conditional2708za7c0za7za7bdb_spreadza7d2objza7d23959za7, BGl_spreadzd2objzd2nodez12zd2conditional2708zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3905z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2fail2710za7c0za7za7bdb_spreadza7d2objza7d23960za7, BGl_spreadzd2objzd2nodez12zd2fail2710zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3906z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2select2712za7c0za7za7bdb_spreadza7d2objza7d23961za7, BGl_spreadzd2objzd2nodez12zd2select2712zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3907z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2letza7d2fun2714za712za7za7bdb_spreadza7d2objza7d23962z00, BGl_spreadzd2objzd2nodez12zd2letzd2fun2714z12zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3897z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2sequence2694za7c0za7za7bdb_spreadza7d2objza7d23963za7, BGl_spreadzd2objzd2nodez12zd2sequence2694zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3908z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2letza7d2var2716za712za7za7bdb_spreadza7d2objza7d23964z00, BGl_spreadzd2objzd2nodez12zd2letzd2var2716z12zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3898z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2app2696za7c0za7za7bdb_spreadza7d2objza7d23965za7, BGl_spreadzd2objzd2nodez12zd2app2696zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3910z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2jumpza7d2exza7d2it2720za7c0za7za7bdb_spreadza7d2objza7d23966za7, BGl_spreadzd2objzd2nodez12zd2jumpzd2exzd2it2720zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3909z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2setza7d2exza7d2it2718za7c0za7za7bdb_spreadza7d2objza7d23967za7, BGl_spreadzd2objzd2nodez12zd2setzd2exzd2it2718zc0zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3899z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2appza7d2ly2698za712za7za7bdb_spreadza7d2objza7d23968z00, BGl_spreadzd2objzd2nodez12zd2appzd2ly2698z12zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3911z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2makeza7d2box2722za712za7za7bdb_spreadza7d2objza7d23969z00, BGl_spreadzd2objzd2nodez12zd2makezd2box2722z12zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3912z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2boxza7d2ref2724za712za7za7bdb_spreadza7d2objza7d23970z00, BGl_spreadzd2objzd2nodez12zd2boxzd2ref2724z12zzbdb_spreadzd2objzd2, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3913z00zzbdb_spreadzd2objzd2, BgL_bgl_spreadza7d2objza7d2nodeza712za7d2boxza7d2setza7122726za700za7za7bdb_spreadza7d2objza7d23971za7, BGl_spreadzd2objzd2nodez12zd2boxzd2setz122726z00zzbdb_spreadzd2objzd2, 0L, 1 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzbdb_spreadzd2objzd2(long BgL_checksumz00_2081, char * BgL_fromz00_2082)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzbdb_spreadzd2objzd2))
{ 
BGl_requirezd2initializa7ationz75zzbdb_spreadzd2objzd2 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzbdb_spreadzd2objzd2(); 
BGl_cnstzd2initzd2zzbdb_spreadzd2objzd2(); 
BGl_importedzd2moduleszd2initz00zzbdb_spreadzd2objzd2(); 
BGl_methodzd2initzd2zzbdb_spreadzd2objzd2(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzbdb_spreadzd2objzd2()
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 15 */
BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_flonumz00(((long)0), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(((long)0), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zz__errorz00(((long)0), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5z00(((long)0), "bdb_spread-obj"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzbdb_spreadzd2objzd2()
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 15 */
{ /* ./Bdb/spread-obj.scm 15 */
obj_t BgL_cportz00_2072;
BgL_cportz00_2072 = 
open_input_string(BGl_string3914z00zzbdb_spreadzd2objzd2); 
{ 
long BgL_iz00_2073;
BgL_iz00_2073 = ((long)1); 
BgL_loopz00_2074:
{ /* ./Bdb/spread-obj.scm 15 */
bool_t BgL_test3916z00_2075;
BgL_test3916z00_2075 = 
(BgL_iz00_2073==((long)-1)); 
if(BgL_test3916z00_2075)
{ /* ./Bdb/spread-obj.scm 15 */
return BUNSPEC;}  else 
{ /* ./Bdb/spread-obj.scm 15 */
{ /* ./Bdb/spread-obj.scm 15 */
obj_t BgL_arg3918z00_2076;
{ /* ./Bdb/spread-obj.scm 15 */
obj_t BgL_list3921z00_2077;
BgL_list3921z00_2077 = 
MAKE_PAIR(BgL_cportz00_2072, BNIL); 
BgL_arg3918z00_2076 = 
BGl_readz00zz__readerz00(BgL_list3921z00_2077); } 
{ /* ./Bdb/spread-obj.scm 15 */
int BgL_auxz00_2101;
BgL_auxz00_2101 = 
(int)(BgL_iz00_2073); 
CNST_TABLE_SET(BgL_auxz00_2101, BgL_arg3918z00_2076); } } 
{ /* ./Bdb/spread-obj.scm 15 */
int BgL_auxz00_2078;
{ /* ./Bdb/spread-obj.scm 15 */
long BgL_auxz00_2104;
BgL_auxz00_2104 = 
(BgL_iz00_2073-((long)1)); 
BgL_auxz00_2078 = 
(int)(BgL_auxz00_2104); } 
{ 
long BgL_iz00_2107;
BgL_iz00_2107 = 
(long)(BgL_auxz00_2078); 
BgL_iz00_2073 = BgL_iz00_2107; 
goto BgL_loopz00_2074;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzbdb_spreadzd2objzd2()
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 15 */
return BUNSPEC;} 
}



/* bdb-spread-obj! */
BGL_EXPORTED_DEF obj_t BGl_bdbzd2spreadzd2objz12z12zzbdb_spreadzd2objzd2(obj_t BgL_globalsz00_1)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 30 */
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_list2728z00_680;
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_arg2731z00_682;
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_arg2735z00_684;
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_auxz00_2109;
BgL_auxz00_2109 = 
BCHAR(((unsigned char)'\n')); 
BgL_arg2735z00_684 = 
MAKE_PAIR(BgL_auxz00_2109, BNIL); } 
BgL_arg2731z00_682 = 
MAKE_PAIR(BGl_string3891z00zzbdb_spreadzd2objzd2, BgL_arg2735z00_684); } 
BgL_list2728z00_680 = 
MAKE_PAIR(BGl_string3892z00zzbdb_spreadzd2objzd2, BgL_arg2731z00_682); } 
BGl_verbosez00zztools_speekz00(
BINT(((long)1)), BgL_list2728z00_680); } 
BGl_za2nbzd2errorzd2onzd2passza2zd2zztools_errorz00 = 
BINT(((long)0)); 
BGl_za2currentzd2passza2zd2zzengine_passz00 = BGl_string3891z00zzbdb_spreadzd2objzd2; 
{ 
obj_t BgL_hooksz00_685;obj_t BgL_hnamesz00_686;
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_arg2739z00_688;
BgL_arg2739z00_688 = BNIL; 
BgL_hooksz00_685 = BgL_arg2739z00_688; 
BgL_hnamesz00_686 = BNIL; 
BgL_loopz00_687:
{ /* ./Bdb/spread-obj.scm 31 */
bool_t BgL_test2744z00_691;
BgL_test2744z00_691 = 
NULLP(BgL_hooksz00_685); 
if(BgL_test2744z00_691)
{ /* ./Bdb/spread-obj.scm 31 */
CNST_TABLE_REF(((long)0)); }  else 
{ /* ./Bdb/spread-obj.scm 31 */
bool_t BgL_test2745z00_692;
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_fun2760z00_698;
BgL_fun2760z00_698 = 
CAR(BgL_hooksz00_685); 
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_auxz00_2121;
BgL_auxz00_2121 = 
PROCEDURE_ENTRY(BgL_fun2760z00_698)(BgL_fun2760z00_698, BEOA); 
BgL_test2745z00_692 = 
CBOOL(BgL_auxz00_2121); } } 
if(BgL_test2745z00_692)
{ /* ./Bdb/spread-obj.scm 31 */
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_arg2747z00_693;obj_t BgL_arg2748z00_694;
BgL_arg2747z00_693 = 
CDR(BgL_hooksz00_685); 
BgL_arg2748z00_694 = 
CDR(BgL_hnamesz00_686); 
{ 
obj_t BgL_hnamesz00_2129;obj_t BgL_hooksz00_2128;
BgL_hooksz00_2128 = BgL_arg2747z00_693; 
BgL_hnamesz00_2129 = BgL_arg2748z00_694; 
BgL_hnamesz00_686 = BgL_hnamesz00_2129; 
BgL_hooksz00_685 = BgL_hooksz00_2128; 
goto BgL_loopz00_687;} } }  else 
{ /* ./Bdb/spread-obj.scm 31 */
{ /* ./Bdb/spread-obj.scm 31 */
obj_t BgL_arg2755z00_697;
BgL_arg2755z00_697 = 
CAR(BgL_hnamesz00_686); 
BGl_internalzd2errorzd2zztools_errorz00(BGl_string3891z00zzbdb_spreadzd2objzd2, BGl_string3893z00zzbdb_spreadzd2objzd2, BgL_arg2755z00_697); } } } } } } 
{ 
obj_t BgL_l2662z00_699;
BgL_l2662z00_699 = BgL_globalsz00_1; 
BgL_forzd2each2663zd2_700:
{ /* ./Bdb/spread-obj.scm 32 */
bool_t BgL_test2764z00_701;
BgL_test2764z00_701 = 
PAIRP(BgL_l2662z00_699); 
if(BgL_test2764z00_701)
{ /* ./Bdb/spread-obj.scm 32 */
{ /* ./Bdb/spread-obj.scm 32 */
obj_t BgL_arg2766z00_702;
BgL_arg2766z00_702 = 
CAR(BgL_l2662z00_699); 
BGl_spreadzd2objzd2funz12z12zzbdb_spreadzd2objzd2(BgL_arg2766z00_702); } 
{ /* ./Bdb/spread-obj.scm 32 */
obj_t BgL_arg2770z00_703;
BgL_arg2770z00_703 = 
CDR(BgL_l2662z00_699); 
{ 
obj_t BgL_l2662z00_2137;
BgL_l2662z00_2137 = BgL_arg2770z00_703; 
BgL_l2662z00_699 = BgL_l2662z00_2137; 
goto BgL_forzd2each2663zd2_700;} } }  else 
{ /* ./Bdb/spread-obj.scm 32 */((bool_t)1); } } } 
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_test2774z00_705;
{ /* ./Bdb/spread-obj.scm 33 */
long BgL_n1z00_1253;
BgL_n1z00_1253 = 
(long)CINT(BGl_za2nbzd2errorzd2onzd2passza2zd2zztools_errorz00); 
BgL_test2774z00_705 = 
(BgL_n1z00_1253>((long)0)); } 
if(BgL_test2774z00_705)
{ /* ./Bdb/spread-obj.scm 33 */
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_port2664z00_706;
BgL_port2664z00_706 = 
BGL_CURRENT_ERROR_PORT(); 
BGl_displayzd22zd2zz__r4_output_6_10_3z00(BGl_za2nbzd2errorzd2onzd2passza2zd2zztools_errorz00, BgL_port2664z00_706); 
display_string(BGl_string3894z00zzbdb_spreadzd2objzd2, BgL_port2664z00_706); 
{ /* ./Bdb/spread-obj.scm 33 */
char * BgL_arg2778z00_707;
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_test2780z00_708;
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_test2781z00_709;
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_res3445z00_1261;
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_objz00_1255;
BgL_objz00_1255 = BGl_za2nbzd2errorzd2onzd2passza2zd2zztools_errorz00; 
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_test1396z00_1256;
BgL_test1396z00_1256 = 
INTEGERP(BgL_objz00_1255); 
if(BgL_test1396z00_1256)
{ /* ./Bdb/spread-obj.scm 33 */
BgL_res3445z00_1261 = ((bool_t)1); }  else 
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_test1397z00_1257;
BgL_test1397z00_1257 = 
REALP(BgL_objz00_1255); 
if(BgL_test1397z00_1257)
{ /* ./Bdb/spread-obj.scm 33 */
double BgL_arg1399z00_1258;
BgL_arg1399z00_1258 = 
BGl_roundflz00zz__r4_numbers_6_5_flonumz00(
REAL_TO_DOUBLE(BgL_objz00_1255)); 
{ /* ./Bdb/spread-obj.scm 33 */
double BgL_auxz00_2150;
BgL_auxz00_2150 = 
REAL_TO_DOUBLE(BgL_objz00_1255); 
BgL_res3445z00_1261 = 
(BgL_auxz00_2150==BgL_arg1399z00_1258); } }  else 
{ /* ./Bdb/spread-obj.scm 33 */
BgL_res3445z00_1261 = ((bool_t)0); } } } } 
BgL_test2781z00_709 = BgL_res3445z00_1261; } 
if(BgL_test2781z00_709)
{ /* ./Bdb/spread-obj.scm 33 */
BgL_test2780z00_708 = 
BGl_2ze3ze3zz__r4_numbers_6_5z00(BGl_za2nbzd2errorzd2onzd2passza2zd2zztools_errorz00, 
BINT(((long)1))); }  else 
{ /* ./Bdb/spread-obj.scm 33 */
BgL_test2780z00_708 = ((bool_t)0); } } 
if(BgL_test2780z00_708)
{ /* ./Bdb/spread-obj.scm 33 */
BgL_arg2778z00_707 = "s"; }  else 
{ /* ./Bdb/spread-obj.scm 33 */
BgL_arg2778z00_707 = ""; } } 
BGl_displayzd22zd2zz__r4_output_6_10_3z00(
string_to_bstring(BgL_arg2778z00_707), BgL_port2664z00_706); } 
display_string(BGl_string3895z00zzbdb_spreadzd2objzd2, BgL_port2664z00_706); 
WRITE_CHAR(((unsigned char)'\n'), BgL_port2664z00_706); } 
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_list2788z00_710;
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_auxz00_2161;
BgL_auxz00_2161 = 
BINT(((long)-1)); 
BgL_list2788z00_710 = 
MAKE_PAIR(BgL_auxz00_2161, BNIL); } 
return 
BGl_exitz00zz__errorz00(BgL_list2788z00_710);} }  else 
{ 
obj_t BgL_hooksz00_711;obj_t BgL_hnamesz00_712;
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_arg2791z00_714;
BgL_arg2791z00_714 = BNIL; 
BgL_hooksz00_711 = BgL_arg2791z00_714; 
BgL_hnamesz00_712 = BNIL; 
BgL_loopz00_713:
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_test2796z00_717;
BgL_test2796z00_717 = 
NULLP(BgL_hooksz00_711); 
if(BgL_test2796z00_717)
{ /* ./Bdb/spread-obj.scm 33 */
return BgL_globalsz00_1;}  else 
{ /* ./Bdb/spread-obj.scm 33 */
bool_t BgL_test2797z00_718;
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_fun2811z00_723;
BgL_fun2811z00_723 = 
CAR(BgL_hooksz00_711); 
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_auxz00_2168;
BgL_auxz00_2168 = 
PROCEDURE_ENTRY(BgL_fun2811z00_723)(BgL_fun2811z00_723, BEOA); 
BgL_test2797z00_718 = 
CBOOL(BgL_auxz00_2168); } } 
if(BgL_test2797z00_718)
{ /* ./Bdb/spread-obj.scm 33 */
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_arg2799z00_719;obj_t BgL_arg2800z00_720;
BgL_arg2799z00_719 = 
CDR(BgL_hooksz00_711); 
BgL_arg2800z00_720 = 
CDR(BgL_hnamesz00_712); 
{ 
obj_t BgL_hnamesz00_2176;obj_t BgL_hooksz00_2175;
BgL_hooksz00_2175 = BgL_arg2799z00_719; 
BgL_hnamesz00_2176 = BgL_arg2800z00_720; 
BgL_hnamesz00_712 = BgL_hnamesz00_2176; 
BgL_hooksz00_711 = BgL_hooksz00_2175; 
goto BgL_loopz00_713;} } }  else 
{ /* ./Bdb/spread-obj.scm 33 */
{ /* ./Bdb/spread-obj.scm 33 */
obj_t BgL_arg2806z00_722;
BgL_arg2806z00_722 = 
CAR(BgL_hnamesz00_712); 
return 
BGl_internalzd2errorzd2zztools_errorz00(BGl_za2currentzd2passza2zd2zzengine_passz00, BGl_string3896z00zzbdb_spreadzd2objzd2, BgL_arg2806z00_722);} } } } } } } } 
}



/* _bdb-spread-obj! */
obj_t BGl__bdbzd2spreadzd2objz12z12zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2015, obj_t BgL_globalsz00_2016)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 30 */
return 
BGl_bdbzd2spreadzd2objz12z12zzbdb_spreadzd2objzd2(BgL_globalsz00_2016);} 
}



/* spread-obj-fun! */
obj_t BGl_spreadzd2objzd2funz12z12zzbdb_spreadzd2objzd2(obj_t BgL_varz00_2)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 38 */
{ /* ./Bdb/spread-obj.scm 39 */
obj_t BgL_arg2816z00_724;
{ /* ./Bdb/spread-obj.scm 39 */
BgL_variablez00_bglt BgL_obj1093z00_1270;
BgL_obj1093z00_1270 = 
(BgL_variablez00_bglt)(BgL_varz00_2); 
BgL_arg2816z00_724 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1093z00_1270))->BgL_idz00); } 
BGl_enterzd2functionzd2zztools_errorz00(BgL_arg2816z00_724); } 
{ /* ./Bdb/spread-obj.scm 40 */
BgL_valuez00_bglt BgL_funz00_725;
{ /* ./Bdb/spread-obj.scm 40 */
BgL_variablez00_bglt BgL_obj1100z00_1271;
BgL_obj1100z00_1271 = 
(BgL_variablez00_bglt)(BgL_varz00_2); 
BgL_funz00_725 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1100z00_1271))->BgL_valuez00); } 
{ /* ./Bdb/spread-obj.scm 40 */
obj_t BgL_bodyz00_726;
{ /* ./Bdb/spread-obj.scm 41 */
BgL_sfunz00_bglt BgL_obj1370z00_1272;
BgL_obj1370z00_1272 = 
(BgL_sfunz00_bglt)(BgL_funz00_725); 
BgL_bodyz00_726 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1370z00_1272))->BgL_bodyz00); } 
{ /* ./Bdb/spread-obj.scm 41 */
BgL_typez00_bglt BgL_typez00_727;
{ /* ./Bdb/spread-obj.scm 42 */
BgL_variablez00_bglt BgL_obj1097z00_1273;
BgL_obj1097z00_1273 = 
(BgL_variablez00_bglt)(BgL_varz00_2); 
BgL_typez00_727 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1097z00_1273))->BgL_typez00); } 
{ /* ./Bdb/spread-obj.scm 42 */
obj_t BgL_argsz00_728;
{ /* ./Bdb/spread-obj.scm 43 */
BgL_sfunz00_bglt BgL_obj1367z00_1274;
BgL_obj1367z00_1274 = 
(BgL_sfunz00_bglt)(BgL_funz00_725); 
BgL_argsz00_728 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1367z00_1274))->BgL_argsz00); } 
{ /* ./Bdb/spread-obj.scm 43 */

{ /* ./Bdb/spread-obj.scm 44 */
bool_t BgL_test2819z00_729;
{ /* ./Bdb/spread-obj.scm 44 */
obj_t BgL_auxz00_2191;
BgL_auxz00_2191 = 
(obj_t)(BgL_typez00_727); 
BgL_test2819z00_729 = 
(BgL_auxz00_2191==BGl_za2_za2z00zztype_cachez00); } 
if(BgL_test2819z00_729)
{ /* ./Bdb/spread-obj.scm 45 */
BgL_variablez00_bglt BgL_obj1099z00_1275;BgL_typez00_bglt BgL_val1098z00_1276;
BgL_obj1099z00_1275 = 
(BgL_variablez00_bglt)(BgL_varz00_2); 
BgL_val1098z00_1276 = 
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00); 
((((BgL_variablez00_bglt)CREF(BgL_obj1099z00_1275))->BgL_typez00) = ((BgL_typez00_bglt)BgL_val1098z00_1276), BUNSPEC); }  else 
{ /* ./Bdb/spread-obj.scm 44 */BFALSE; } } 
{ 
obj_t BgL_l2665z00_730;
BgL_l2665z00_730 = BgL_argsz00_728; 
BgL_forzd2each2666zd2_731:
{ /* ./Bdb/spread-obj.scm 46 */
bool_t BgL_test2823z00_732;
BgL_test2823z00_732 = 
PAIRP(BgL_l2665z00_730); 
if(BgL_test2823z00_732)
{ /* ./Bdb/spread-obj.scm 46 */
{ /* ./Bdb/spread-obj.scm 47 */
obj_t BgL_argsz00_733;
BgL_argsz00_733 = 
CAR(BgL_l2665z00_730); 
{ /* ./Bdb/spread-obj.scm 47 */
bool_t BgL_test2824z00_734;
{ /* ./Bdb/spread-obj.scm 47 */
BgL_typez00_bglt BgL_arg2827z00_735;
{ /* ./Bdb/spread-obj.scm 47 */
BgL_variablez00_bglt BgL_obj1097z00_1279;
BgL_obj1097z00_1279 = 
(BgL_variablez00_bglt)(BgL_argsz00_733); 
BgL_arg2827z00_735 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1097z00_1279))->BgL_typez00); } 
{ /* ./Bdb/spread-obj.scm 47 */
obj_t BgL_auxz00_2203;
BgL_auxz00_2203 = 
(obj_t)(BgL_arg2827z00_735); 
BgL_test2824z00_734 = 
(BgL_auxz00_2203==BGl_za2_za2z00zztype_cachez00); } } 
if(BgL_test2824z00_734)
{ /* ./Bdb/spread-obj.scm 48 */
BgL_variablez00_bglt BgL_obj1099z00_1280;BgL_typez00_bglt BgL_val1098z00_1281;
BgL_obj1099z00_1280 = 
(BgL_variablez00_bglt)(BgL_argsz00_733); 
BgL_val1098z00_1281 = 
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00); 
((((BgL_variablez00_bglt)CREF(BgL_obj1099z00_1280))->BgL_typez00) = ((BgL_typez00_bglt)BgL_val1098z00_1281), BUNSPEC); }  else 
{ /* ./Bdb/spread-obj.scm 47 */BFALSE; } } } 
{ /* ./Bdb/spread-obj.scm 46 */
obj_t BgL_arg2832z00_736;
BgL_arg2832z00_736 = 
CDR(BgL_l2665z00_730); 
{ 
obj_t BgL_l2665z00_2211;
BgL_l2665z00_2211 = BgL_arg2832z00_736; 
BgL_l2665z00_730 = BgL_l2665z00_2211; 
goto BgL_forzd2each2666zd2_731;} } }  else 
{ /* ./Bdb/spread-obj.scm 46 */((bool_t)1); } } } 
{ /* ./Bdb/spread-obj.scm 50 */
bool_t BgL_test2836z00_737;
{ /* ./Bdb/spread-obj.scm 50 */
long BgL_n1z00_1283;
BgL_n1z00_1283 = 
(long)CINT(BGl_za2bdbzd2debugza2zd2zzengine_paramz00); 
BgL_test2836z00_737 = 
(BgL_n1z00_1283>=((long)3)); } 
if(BgL_test2836z00_737)
{ /* ./Bdb/spread-obj.scm 51 */
BgL_nodez00_bglt BgL_nodez00_1285;
BgL_nodez00_1285 = 
(BgL_nodez00_bglt)(BgL_bodyz00_726); 
{ /* ./Bdb/spread-obj.scm 51 */
obj_t BgL_method2692z00_1286;
{ /* ./Bdb/spread-obj.scm 51 */
BgL_objectz00_bglt BgL_objz00_1287;
BgL_objz00_1287 = 
(BgL_objectz00_bglt)(BgL_nodez00_1285); 
{ /* ./Bdb/spread-obj.scm 51 */
long BgL_objzd2classzd2numz00_1288;
BgL_objzd2classzd2numz00_1288 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1287); 
{ /* ./Bdb/spread-obj.scm 51 */
obj_t BgL_arg2017z00_1289;
{ /* ./Bdb/spread-obj.scm 51 */
int BgL_auxz00_2218;
BgL_auxz00_2218 = 
(int)(((long)1)); 
BgL_arg2017z00_1289 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2218); } 
{ /* ./Bdb/spread-obj.scm 51 */
int BgL_offsetz00_1292;
BgL_offsetz00_1292 = 
(int)(BgL_objzd2classzd2numz00_1288); 
{ /* ./Bdb/spread-obj.scm 51 */
long BgL_offsetz00_1293;
{ /* ./Bdb/spread-obj.scm 51 */
long BgL_auxz00_2222;
BgL_auxz00_2222 = 
(long)(BgL_offsetz00_1292); 
BgL_offsetz00_1293 = 
(BgL_auxz00_2222-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 51 */
long BgL_modz00_1294;
{ /* ./Bdb/spread-obj.scm 51 */
int BgL_arg2028z00_1295;
BgL_arg2028z00_1295 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 51 */
long BgL_n2z00_1303;
BgL_n2z00_1303 = 
(long)(BgL_arg2028z00_1295); 
BgL_modz00_1294 = 
(BgL_offsetz00_1293/BgL_n2z00_1303); } } 
{ /* ./Bdb/spread-obj.scm 51 */
long BgL_restz00_1296;
{ /* ./Bdb/spread-obj.scm 51 */
int BgL_arg2024z00_1297;
BgL_arg2024z00_1297 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 51 */
long BgL_n2z00_1306;
BgL_n2z00_1306 = 
(long)(BgL_arg2024z00_1297); 
BgL_restz00_1296 = 
(BgL_offsetz00_1293%BgL_n2z00_1306); } } 
{ /* ./Bdb/spread-obj.scm 51 */

{ /* ./Bdb/spread-obj.scm 51 */
obj_t BgL_bucketz00_1298;
{ /* ./Bdb/spread-obj.scm 51 */
int BgL_kz00_1308;
BgL_kz00_1308 = 
(int)(BgL_modz00_1294); 
BgL_bucketz00_1298 = 
VECTOR_REF(BgL_arg2017z00_1289,BgL_kz00_1308); } 
{ /* ./Bdb/spread-obj.scm 51 */
int BgL_kz00_1310;
BgL_kz00_1310 = 
(int)(BgL_restz00_1296); 
BgL_method2692z00_1286 = 
VECTOR_REF(BgL_bucketz00_1298,BgL_kz00_1310); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1286)(BgL_method2692z00_1286, 
(obj_t)(BgL_nodez00_1285), BEOA); } }  else 
{ /* ./Bdb/spread-obj.scm 50 */BFALSE; } } 
return 
BGl_leavezd2functionzd2zztools_errorz00();} } } } } } 
}



/* spread-obj-node*! */
obj_t BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2(obj_t BgL_nodeza2za2_22)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 194 */
BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2:
{ /* ./Bdb/spread-obj.scm 195 */
bool_t BgL_test2844z00_738;
BgL_test2844z00_738 = 
NULLP(BgL_nodeza2za2_22); 
if(BgL_test2844z00_738)
{ /* ./Bdb/spread-obj.scm 195 */
return 
CNST_TABLE_REF(((long)1));}  else 
{ /* ./Bdb/spread-obj.scm 195 */
{ /* ./Bdb/spread-obj.scm 198 */
obj_t BgL_arg2846z00_739;
BgL_arg2846z00_739 = 
CAR(BgL_nodeza2za2_22); 
{ /* ./Bdb/spread-obj.scm 198 */
BgL_nodez00_bglt BgL_nodez00_1313;
BgL_nodez00_1313 = 
(BgL_nodez00_bglt)(BgL_arg2846z00_739); 
{ /* ./Bdb/spread-obj.scm 198 */
obj_t BgL_method2692z00_1314;
{ /* ./Bdb/spread-obj.scm 198 */
BgL_objectz00_bglt BgL_objz00_1315;
BgL_objz00_1315 = 
(BgL_objectz00_bglt)(BgL_nodez00_1313); 
{ /* ./Bdb/spread-obj.scm 198 */
long BgL_objzd2classzd2numz00_1316;
BgL_objzd2classzd2numz00_1316 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1315); 
{ /* ./Bdb/spread-obj.scm 198 */
obj_t BgL_arg2017z00_1317;
{ /* ./Bdb/spread-obj.scm 198 */
int BgL_auxz00_2246;
BgL_auxz00_2246 = 
(int)(((long)1)); 
BgL_arg2017z00_1317 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2246); } 
{ /* ./Bdb/spread-obj.scm 198 */
int BgL_offsetz00_1320;
BgL_offsetz00_1320 = 
(int)(BgL_objzd2classzd2numz00_1316); 
{ /* ./Bdb/spread-obj.scm 198 */
long BgL_offsetz00_1321;
{ /* ./Bdb/spread-obj.scm 198 */
long BgL_auxz00_2250;
BgL_auxz00_2250 = 
(long)(BgL_offsetz00_1320); 
BgL_offsetz00_1321 = 
(BgL_auxz00_2250-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 198 */
long BgL_modz00_1322;
{ /* ./Bdb/spread-obj.scm 198 */
int BgL_arg2028z00_1323;
BgL_arg2028z00_1323 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 198 */
long BgL_n2z00_1331;
BgL_n2z00_1331 = 
(long)(BgL_arg2028z00_1323); 
BgL_modz00_1322 = 
(BgL_offsetz00_1321/BgL_n2z00_1331); } } 
{ /* ./Bdb/spread-obj.scm 198 */
long BgL_restz00_1324;
{ /* ./Bdb/spread-obj.scm 198 */
int BgL_arg2024z00_1325;
BgL_arg2024z00_1325 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 198 */
long BgL_n2z00_1334;
BgL_n2z00_1334 = 
(long)(BgL_arg2024z00_1325); 
BgL_restz00_1324 = 
(BgL_offsetz00_1321%BgL_n2z00_1334); } } 
{ /* ./Bdb/spread-obj.scm 198 */

{ /* ./Bdb/spread-obj.scm 198 */
obj_t BgL_bucketz00_1326;
{ /* ./Bdb/spread-obj.scm 198 */
int BgL_kz00_1336;
BgL_kz00_1336 = 
(int)(BgL_modz00_1322); 
BgL_bucketz00_1326 = 
VECTOR_REF(BgL_arg2017z00_1317,BgL_kz00_1336); } 
{ /* ./Bdb/spread-obj.scm 198 */
int BgL_kz00_1338;
BgL_kz00_1338 = 
(int)(BgL_restz00_1324); 
BgL_method2692z00_1314 = 
VECTOR_REF(BgL_bucketz00_1326,BgL_kz00_1338); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1314)(BgL_method2692z00_1314, 
(obj_t)(BgL_nodez00_1313), BEOA); } } } 
{ /* ./Bdb/spread-obj.scm 199 */
obj_t BgL_arg2850z00_740;
BgL_arg2850z00_740 = 
CDR(BgL_nodeza2za2_22); 
{ 
obj_t BgL_nodeza2za2_2267;
BgL_nodeza2za2_2267 = BgL_arg2850z00_740; 
BgL_nodeza2za2_22 = BgL_nodeza2za2_2267; 
goto BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2;} } } } } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzbdb_spreadzd2objzd2()
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 15 */
BGl_addzd2genericz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_spreadzd2objzd2nodez12zd2default2691zd2envz12zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_sequencez00zzast_nodez00, BGl_proc3897z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_appz00zzast_nodez00, BGl_proc3898z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_appzd2lyzd2zzast_nodez00, BGl_proc3899z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_funcallz00zzast_nodez00, BGl_proc3900z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_externz00zzast_nodez00, BGl_proc3901z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_castz00zzast_nodez00, BGl_proc3902z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_setqz00zzast_nodez00, BGl_proc3903z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_conditionalz00zzast_nodez00, BGl_proc3904z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_failz00zzast_nodez00, BGl_proc3905z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_selectz00zzast_nodez00, BGl_proc3906z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_letzd2funzd2zzast_nodez00, BGl_proc3907z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_letzd2varzd2zzast_nodez00, BGl_proc3908z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc3909z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc3910z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_makezd2boxzd2zzast_nodez00, BGl_proc3911z00zzbdb_spreadzd2objzd2); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_boxzd2refzd2zzast_nodez00, BGl_proc3912z00zzbdb_spreadzd2objzd2); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc3913z00zzbdb_spreadzd2objzd2);} 
}



/* spread-obj-node!-box-set!2726 */
obj_t BGl_spreadzd2objzd2nodez12zd2boxzd2setz122726z00zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2036, obj_t BgL_nodez00_2037)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 186 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_nodez00_1234;
BgL_nodez00_1234 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_nodez00_2037); 
{ /* ./Bdb/spread-obj.scm 188 */
BgL_varz00_bglt BgL_arg3418z00_1238;
BgL_arg3418z00_1238 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_nodez00_1234))->BgL_varz00); 
{ /* ./Bdb/spread-obj.scm 188 */
BgL_nodez00_bglt BgL_nodez00_1937;
BgL_nodez00_1937 = 
(BgL_nodez00_bglt)(BgL_arg3418z00_1238); 
{ /* ./Bdb/spread-obj.scm 188 */
obj_t BgL_method2692z00_1938;
{ /* ./Bdb/spread-obj.scm 188 */
BgL_objectz00_bglt BgL_objz00_1939;
BgL_objz00_1939 = 
(BgL_objectz00_bglt)(BgL_nodez00_1937); 
{ /* ./Bdb/spread-obj.scm 188 */
long BgL_objzd2classzd2numz00_1940;
BgL_objzd2classzd2numz00_1940 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1939); 
{ /* ./Bdb/spread-obj.scm 188 */
obj_t BgL_arg2017z00_1941;
{ /* ./Bdb/spread-obj.scm 188 */
int BgL_auxz00_2290;
BgL_auxz00_2290 = 
(int)(((long)1)); 
BgL_arg2017z00_1941 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2290); } 
{ /* ./Bdb/spread-obj.scm 188 */
int BgL_offsetz00_1944;
BgL_offsetz00_1944 = 
(int)(BgL_objzd2classzd2numz00_1940); 
{ /* ./Bdb/spread-obj.scm 188 */
long BgL_offsetz00_1945;
{ /* ./Bdb/spread-obj.scm 188 */
long BgL_auxz00_2294;
BgL_auxz00_2294 = 
(long)(BgL_offsetz00_1944); 
BgL_offsetz00_1945 = 
(BgL_auxz00_2294-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 188 */
long BgL_modz00_1946;
{ /* ./Bdb/spread-obj.scm 188 */
int BgL_arg2028z00_1947;
BgL_arg2028z00_1947 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 188 */
long BgL_n2z00_1955;
BgL_n2z00_1955 = 
(long)(BgL_arg2028z00_1947); 
BgL_modz00_1946 = 
(BgL_offsetz00_1945/BgL_n2z00_1955); } } 
{ /* ./Bdb/spread-obj.scm 188 */
long BgL_restz00_1948;
{ /* ./Bdb/spread-obj.scm 188 */
int BgL_arg2024z00_1949;
BgL_arg2024z00_1949 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 188 */
long BgL_n2z00_1958;
BgL_n2z00_1958 = 
(long)(BgL_arg2024z00_1949); 
BgL_restz00_1948 = 
(BgL_offsetz00_1945%BgL_n2z00_1958); } } 
{ /* ./Bdb/spread-obj.scm 188 */

{ /* ./Bdb/spread-obj.scm 188 */
obj_t BgL_bucketz00_1950;
{ /* ./Bdb/spread-obj.scm 188 */
int BgL_kz00_1960;
BgL_kz00_1960 = 
(int)(BgL_modz00_1946); 
BgL_bucketz00_1950 = 
VECTOR_REF(BgL_arg2017z00_1941,BgL_kz00_1960); } 
{ /* ./Bdb/spread-obj.scm 188 */
int BgL_kz00_1962;
BgL_kz00_1962 = 
(int)(BgL_restz00_1948); 
BgL_method2692z00_1938 = 
VECTOR_REF(BgL_bucketz00_1950,BgL_kz00_1962); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1938)(BgL_method2692z00_1938, 
(obj_t)(BgL_nodez00_1937), BEOA); } } } 
{ /* ./Bdb/spread-obj.scm 189 */
BgL_nodez00_bglt BgL_arg3422z00_1239;
BgL_arg3422z00_1239 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_nodez00_1234))->BgL_valuez00); 
{ /* ./Bdb/spread-obj.scm 189 */
obj_t BgL_method2692z00_1965;
{ /* ./Bdb/spread-obj.scm 189 */
BgL_objectz00_bglt BgL_objz00_1966;
BgL_objz00_1966 = 
(BgL_objectz00_bglt)(BgL_arg3422z00_1239); 
{ /* ./Bdb/spread-obj.scm 189 */
long BgL_objzd2classzd2numz00_1967;
BgL_objzd2classzd2numz00_1967 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1966); 
{ /* ./Bdb/spread-obj.scm 189 */
obj_t BgL_arg2017z00_1968;
{ /* ./Bdb/spread-obj.scm 189 */
int BgL_auxz00_2313;
BgL_auxz00_2313 = 
(int)(((long)1)); 
BgL_arg2017z00_1968 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2313); } 
{ /* ./Bdb/spread-obj.scm 189 */
int BgL_offsetz00_1971;
BgL_offsetz00_1971 = 
(int)(BgL_objzd2classzd2numz00_1967); 
{ /* ./Bdb/spread-obj.scm 189 */
long BgL_offsetz00_1972;
{ /* ./Bdb/spread-obj.scm 189 */
long BgL_auxz00_2317;
BgL_auxz00_2317 = 
(long)(BgL_offsetz00_1971); 
BgL_offsetz00_1972 = 
(BgL_auxz00_2317-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 189 */
long BgL_modz00_1973;
{ /* ./Bdb/spread-obj.scm 189 */
int BgL_arg2028z00_1974;
BgL_arg2028z00_1974 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 189 */
long BgL_n2z00_1982;
BgL_n2z00_1982 = 
(long)(BgL_arg2028z00_1974); 
BgL_modz00_1973 = 
(BgL_offsetz00_1972/BgL_n2z00_1982); } } 
{ /* ./Bdb/spread-obj.scm 189 */
long BgL_restz00_1975;
{ /* ./Bdb/spread-obj.scm 189 */
int BgL_arg2024z00_1976;
BgL_arg2024z00_1976 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 189 */
long BgL_n2z00_1985;
BgL_n2z00_1985 = 
(long)(BgL_arg2024z00_1976); 
BgL_restz00_1975 = 
(BgL_offsetz00_1972%BgL_n2z00_1985); } } 
{ /* ./Bdb/spread-obj.scm 189 */

{ /* ./Bdb/spread-obj.scm 189 */
obj_t BgL_bucketz00_1977;
{ /* ./Bdb/spread-obj.scm 189 */
int BgL_kz00_1987;
BgL_kz00_1987 = 
(int)(BgL_modz00_1973); 
BgL_bucketz00_1977 = 
VECTOR_REF(BgL_arg2017z00_1968,BgL_kz00_1987); } 
{ /* ./Bdb/spread-obj.scm 189 */
int BgL_kz00_1989;
BgL_kz00_1989 = 
(int)(BgL_restz00_1975); 
BgL_method2692z00_1965 = 
VECTOR_REF(BgL_bucketz00_1977,BgL_kz00_1989); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1965)(BgL_method2692z00_1965, 
(obj_t)(BgL_arg3422z00_1239), BEOA);} } } } 
}



/* spread-obj-node!-box-ref2724 */
obj_t BGl_spreadzd2objzd2nodez12zd2boxzd2ref2724z12zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2038, obj_t BgL_nodez00_2039)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 180 */
{ 
BgL_boxzd2refzd2_bglt BgL_nodez00_1228;
BgL_nodez00_1228 = 
(BgL_boxzd2refzd2_bglt)(BgL_nodez00_2039); 
{ /* ./Bdb/spread-obj.scm 181 */
BgL_varz00_bglt BgL_arg3408z00_1908;
BgL_arg3408z00_1908 = 
(((BgL_boxzd2refzd2_bglt)CREF(BgL_nodez00_1228))->BgL_varz00); 
{ /* ./Bdb/spread-obj.scm 181 */
BgL_nodez00_bglt BgL_nodez00_1910;
BgL_nodez00_1910 = 
(BgL_nodez00_bglt)(BgL_arg3408z00_1908); 
{ /* ./Bdb/spread-obj.scm 181 */
obj_t BgL_method2692z00_1911;
{ /* ./Bdb/spread-obj.scm 181 */
BgL_objectz00_bglt BgL_objz00_1912;
BgL_objz00_1912 = 
(BgL_objectz00_bglt)(BgL_nodez00_1910); 
{ /* ./Bdb/spread-obj.scm 181 */
long BgL_objzd2classzd2numz00_1913;
BgL_objzd2classzd2numz00_1913 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1912); 
{ /* ./Bdb/spread-obj.scm 181 */
obj_t BgL_arg2017z00_1914;
{ /* ./Bdb/spread-obj.scm 181 */
int BgL_auxz00_2338;
BgL_auxz00_2338 = 
(int)(((long)1)); 
BgL_arg2017z00_1914 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2338); } 
{ /* ./Bdb/spread-obj.scm 181 */
int BgL_offsetz00_1917;
BgL_offsetz00_1917 = 
(int)(BgL_objzd2classzd2numz00_1913); 
{ /* ./Bdb/spread-obj.scm 181 */
long BgL_offsetz00_1918;
{ /* ./Bdb/spread-obj.scm 181 */
long BgL_auxz00_2342;
BgL_auxz00_2342 = 
(long)(BgL_offsetz00_1917); 
BgL_offsetz00_1918 = 
(BgL_auxz00_2342-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 181 */
long BgL_modz00_1919;
{ /* ./Bdb/spread-obj.scm 181 */
int BgL_arg2028z00_1920;
BgL_arg2028z00_1920 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 181 */
long BgL_n2z00_1928;
BgL_n2z00_1928 = 
(long)(BgL_arg2028z00_1920); 
BgL_modz00_1919 = 
(BgL_offsetz00_1918/BgL_n2z00_1928); } } 
{ /* ./Bdb/spread-obj.scm 181 */
long BgL_restz00_1921;
{ /* ./Bdb/spread-obj.scm 181 */
int BgL_arg2024z00_1922;
BgL_arg2024z00_1922 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 181 */
long BgL_n2z00_1931;
BgL_n2z00_1931 = 
(long)(BgL_arg2024z00_1922); 
BgL_restz00_1921 = 
(BgL_offsetz00_1918%BgL_n2z00_1931); } } 
{ /* ./Bdb/spread-obj.scm 181 */

{ /* ./Bdb/spread-obj.scm 181 */
obj_t BgL_bucketz00_1923;
{ /* ./Bdb/spread-obj.scm 181 */
int BgL_kz00_1933;
BgL_kz00_1933 = 
(int)(BgL_modz00_1919); 
BgL_bucketz00_1923 = 
VECTOR_REF(BgL_arg2017z00_1914,BgL_kz00_1933); } 
{ /* ./Bdb/spread-obj.scm 181 */
int BgL_kz00_1935;
BgL_kz00_1935 = 
(int)(BgL_restz00_1921); 
BgL_method2692z00_1911 = 
VECTOR_REF(BgL_bucketz00_1923,BgL_kz00_1935); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1911)(BgL_method2692z00_1911, 
(obj_t)(BgL_nodez00_1910), BEOA);} } } } } 
}



/* spread-obj-node!-make-box2722 */
obj_t BGl_spreadzd2objzd2nodez12zd2makezd2box2722z12zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2040, obj_t BgL_nodez00_2041)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 174 */
{ 
BgL_makezd2boxzd2_bglt BgL_nodez00_1222;
BgL_nodez00_1222 = 
(BgL_makezd2boxzd2_bglt)(BgL_nodez00_2041); 
{ /* ./Bdb/spread-obj.scm 175 */
BgL_nodez00_bglt BgL_arg3398z00_1880;
BgL_arg3398z00_1880 = 
(((BgL_makezd2boxzd2_bglt)CREF(BgL_nodez00_1222))->BgL_valuez00); 
{ /* ./Bdb/spread-obj.scm 175 */
obj_t BgL_method2692z00_1883;
{ /* ./Bdb/spread-obj.scm 175 */
BgL_objectz00_bglt BgL_objz00_1884;
BgL_objz00_1884 = 
(BgL_objectz00_bglt)(BgL_arg3398z00_1880); 
{ /* ./Bdb/spread-obj.scm 175 */
long BgL_objzd2classzd2numz00_1885;
BgL_objzd2classzd2numz00_1885 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1884); 
{ /* ./Bdb/spread-obj.scm 175 */
obj_t BgL_arg2017z00_1886;
{ /* ./Bdb/spread-obj.scm 175 */
int BgL_auxz00_2362;
BgL_auxz00_2362 = 
(int)(((long)1)); 
BgL_arg2017z00_1886 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2362); } 
{ /* ./Bdb/spread-obj.scm 175 */
int BgL_offsetz00_1889;
BgL_offsetz00_1889 = 
(int)(BgL_objzd2classzd2numz00_1885); 
{ /* ./Bdb/spread-obj.scm 175 */
long BgL_offsetz00_1890;
{ /* ./Bdb/spread-obj.scm 175 */
long BgL_auxz00_2366;
BgL_auxz00_2366 = 
(long)(BgL_offsetz00_1889); 
BgL_offsetz00_1890 = 
(BgL_auxz00_2366-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 175 */
long BgL_modz00_1891;
{ /* ./Bdb/spread-obj.scm 175 */
int BgL_arg2028z00_1892;
BgL_arg2028z00_1892 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 175 */
long BgL_n2z00_1900;
BgL_n2z00_1900 = 
(long)(BgL_arg2028z00_1892); 
BgL_modz00_1891 = 
(BgL_offsetz00_1890/BgL_n2z00_1900); } } 
{ /* ./Bdb/spread-obj.scm 175 */
long BgL_restz00_1893;
{ /* ./Bdb/spread-obj.scm 175 */
int BgL_arg2024z00_1894;
BgL_arg2024z00_1894 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 175 */
long BgL_n2z00_1903;
BgL_n2z00_1903 = 
(long)(BgL_arg2024z00_1894); 
BgL_restz00_1893 = 
(BgL_offsetz00_1890%BgL_n2z00_1903); } } 
{ /* ./Bdb/spread-obj.scm 175 */

{ /* ./Bdb/spread-obj.scm 175 */
obj_t BgL_bucketz00_1895;
{ /* ./Bdb/spread-obj.scm 175 */
int BgL_kz00_1905;
BgL_kz00_1905 = 
(int)(BgL_modz00_1891); 
BgL_bucketz00_1895 = 
VECTOR_REF(BgL_arg2017z00_1886,BgL_kz00_1905); } 
{ /* ./Bdb/spread-obj.scm 175 */
int BgL_kz00_1907;
BgL_kz00_1907 = 
(int)(BgL_restz00_1893); 
BgL_method2692z00_1883 = 
VECTOR_REF(BgL_bucketz00_1895,BgL_kz00_1907); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1883)(BgL_method2692z00_1883, 
(obj_t)(BgL_arg3398z00_1880), BEOA);} } } } 
}



/* spread-obj-node!-jump-ex-it2720 */
obj_t BGl_spreadzd2objzd2nodez12zd2jumpzd2exzd2it2720zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2042, obj_t BgL_nodez00_2043)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 165 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_nodez00_1214;
{ /* ./Bdb/spread-obj.scm 166 */
BgL_jumpzd2exzd2itz00_bglt BgL_auxz00_2383;
BgL_nodez00_1214 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_nodez00_2043); 
{ /* ./Bdb/spread-obj.scm 167 */
BgL_nodez00_bglt BgL_arg3384z00_1218;
BgL_arg3384z00_1218 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_1214))->BgL_exitz00); 
{ /* ./Bdb/spread-obj.scm 167 */
obj_t BgL_method2692z00_1828;
{ /* ./Bdb/spread-obj.scm 167 */
BgL_objectz00_bglt BgL_objz00_1829;
BgL_objz00_1829 = 
(BgL_objectz00_bglt)(BgL_arg3384z00_1218); 
{ /* ./Bdb/spread-obj.scm 167 */
long BgL_objzd2classzd2numz00_1830;
BgL_objzd2classzd2numz00_1830 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1829); 
{ /* ./Bdb/spread-obj.scm 167 */
obj_t BgL_arg2017z00_1831;
{ /* ./Bdb/spread-obj.scm 167 */
int BgL_auxz00_2387;
BgL_auxz00_2387 = 
(int)(((long)1)); 
BgL_arg2017z00_1831 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2387); } 
{ /* ./Bdb/spread-obj.scm 167 */
int BgL_offsetz00_1834;
BgL_offsetz00_1834 = 
(int)(BgL_objzd2classzd2numz00_1830); 
{ /* ./Bdb/spread-obj.scm 167 */
long BgL_offsetz00_1835;
{ /* ./Bdb/spread-obj.scm 167 */
long BgL_auxz00_2391;
BgL_auxz00_2391 = 
(long)(BgL_offsetz00_1834); 
BgL_offsetz00_1835 = 
(BgL_auxz00_2391-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 167 */
long BgL_modz00_1836;
{ /* ./Bdb/spread-obj.scm 167 */
int BgL_arg2028z00_1837;
BgL_arg2028z00_1837 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 167 */
long BgL_n2z00_1845;
BgL_n2z00_1845 = 
(long)(BgL_arg2028z00_1837); 
BgL_modz00_1836 = 
(BgL_offsetz00_1835/BgL_n2z00_1845); } } 
{ /* ./Bdb/spread-obj.scm 167 */
long BgL_restz00_1838;
{ /* ./Bdb/spread-obj.scm 167 */
int BgL_arg2024z00_1839;
BgL_arg2024z00_1839 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 167 */
long BgL_n2z00_1848;
BgL_n2z00_1848 = 
(long)(BgL_arg2024z00_1839); 
BgL_restz00_1838 = 
(BgL_offsetz00_1835%BgL_n2z00_1848); } } 
{ /* ./Bdb/spread-obj.scm 167 */

{ /* ./Bdb/spread-obj.scm 167 */
obj_t BgL_bucketz00_1840;
{ /* ./Bdb/spread-obj.scm 167 */
int BgL_kz00_1850;
BgL_kz00_1850 = 
(int)(BgL_modz00_1836); 
BgL_bucketz00_1840 = 
VECTOR_REF(BgL_arg2017z00_1831,BgL_kz00_1850); } 
{ /* ./Bdb/spread-obj.scm 167 */
int BgL_kz00_1852;
BgL_kz00_1852 = 
(int)(BgL_restz00_1838); 
BgL_method2692z00_1828 = 
VECTOR_REF(BgL_bucketz00_1840,BgL_kz00_1852); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1828)(BgL_method2692z00_1828, 
(obj_t)(BgL_arg3384z00_1218), BEOA); } } 
{ /* ./Bdb/spread-obj.scm 168 */
BgL_nodez00_bglt BgL_arg3388z00_1219;
BgL_arg3388z00_1219 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_nodez00_1214))->BgL_valuez00); 
{ /* ./Bdb/spread-obj.scm 168 */
obj_t BgL_method2692z00_1855;
{ /* ./Bdb/spread-obj.scm 168 */
BgL_objectz00_bglt BgL_objz00_1856;
BgL_objz00_1856 = 
(BgL_objectz00_bglt)(BgL_arg3388z00_1219); 
{ /* ./Bdb/spread-obj.scm 168 */
long BgL_objzd2classzd2numz00_1857;
BgL_objzd2classzd2numz00_1857 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1856); 
{ /* ./Bdb/spread-obj.scm 168 */
obj_t BgL_arg2017z00_1858;
{ /* ./Bdb/spread-obj.scm 168 */
int BgL_auxz00_2410;
BgL_auxz00_2410 = 
(int)(((long)1)); 
BgL_arg2017z00_1858 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2410); } 
{ /* ./Bdb/spread-obj.scm 168 */
int BgL_offsetz00_1861;
BgL_offsetz00_1861 = 
(int)(BgL_objzd2classzd2numz00_1857); 
{ /* ./Bdb/spread-obj.scm 168 */
long BgL_offsetz00_1862;
{ /* ./Bdb/spread-obj.scm 168 */
long BgL_auxz00_2414;
BgL_auxz00_2414 = 
(long)(BgL_offsetz00_1861); 
BgL_offsetz00_1862 = 
(BgL_auxz00_2414-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 168 */
long BgL_modz00_1863;
{ /* ./Bdb/spread-obj.scm 168 */
int BgL_arg2028z00_1864;
BgL_arg2028z00_1864 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 168 */
long BgL_n2z00_1872;
BgL_n2z00_1872 = 
(long)(BgL_arg2028z00_1864); 
BgL_modz00_1863 = 
(BgL_offsetz00_1862/BgL_n2z00_1872); } } 
{ /* ./Bdb/spread-obj.scm 168 */
long BgL_restz00_1865;
{ /* ./Bdb/spread-obj.scm 168 */
int BgL_arg2024z00_1866;
BgL_arg2024z00_1866 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 168 */
long BgL_n2z00_1875;
BgL_n2z00_1875 = 
(long)(BgL_arg2024z00_1866); 
BgL_restz00_1865 = 
(BgL_offsetz00_1862%BgL_n2z00_1875); } } 
{ /* ./Bdb/spread-obj.scm 168 */

{ /* ./Bdb/spread-obj.scm 168 */
obj_t BgL_bucketz00_1867;
{ /* ./Bdb/spread-obj.scm 168 */
int BgL_kz00_1877;
BgL_kz00_1877 = 
(int)(BgL_modz00_1863); 
BgL_bucketz00_1867 = 
VECTOR_REF(BgL_arg2017z00_1858,BgL_kz00_1877); } 
{ /* ./Bdb/spread-obj.scm 168 */
int BgL_kz00_1879;
BgL_kz00_1879 = 
(int)(BgL_restz00_1865); 
BgL_method2692z00_1855 = 
VECTOR_REF(BgL_bucketz00_1867,BgL_kz00_1879); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1855)(BgL_method2692z00_1855, 
(obj_t)(BgL_arg3388z00_1219), BEOA); } } 
BgL_auxz00_2383 = BgL_nodez00_1214; 
return 
(obj_t)(BgL_auxz00_2383);} } } 
}



/* spread-obj-node!-set-ex-it2718 */
obj_t BGl_spreadzd2objzd2nodez12zd2setzd2exzd2it2718zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2044, obj_t BgL_nodez00_2045)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 159 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_nodez00_1208;
BgL_nodez00_1208 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_nodez00_2045); 
{ /* ./Bdb/spread-obj.scm 160 */
BgL_nodez00_bglt BgL_arg3374z00_1798;
BgL_arg3374z00_1798 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_nodez00_1208))->BgL_bodyz00); 
{ /* ./Bdb/spread-obj.scm 160 */
obj_t BgL_method2692z00_1801;
{ /* ./Bdb/spread-obj.scm 160 */
BgL_objectz00_bglt BgL_objz00_1802;
BgL_objz00_1802 = 
(BgL_objectz00_bglt)(BgL_arg3374z00_1798); 
{ /* ./Bdb/spread-obj.scm 160 */
long BgL_objzd2classzd2numz00_1803;
BgL_objzd2classzd2numz00_1803 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1802); 
{ /* ./Bdb/spread-obj.scm 160 */
obj_t BgL_arg2017z00_1804;
{ /* ./Bdb/spread-obj.scm 160 */
int BgL_auxz00_2435;
BgL_auxz00_2435 = 
(int)(((long)1)); 
BgL_arg2017z00_1804 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2435); } 
{ /* ./Bdb/spread-obj.scm 160 */
int BgL_offsetz00_1807;
BgL_offsetz00_1807 = 
(int)(BgL_objzd2classzd2numz00_1803); 
{ /* ./Bdb/spread-obj.scm 160 */
long BgL_offsetz00_1808;
{ /* ./Bdb/spread-obj.scm 160 */
long BgL_auxz00_2439;
BgL_auxz00_2439 = 
(long)(BgL_offsetz00_1807); 
BgL_offsetz00_1808 = 
(BgL_auxz00_2439-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 160 */
long BgL_modz00_1809;
{ /* ./Bdb/spread-obj.scm 160 */
int BgL_arg2028z00_1810;
BgL_arg2028z00_1810 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 160 */
long BgL_n2z00_1818;
BgL_n2z00_1818 = 
(long)(BgL_arg2028z00_1810); 
BgL_modz00_1809 = 
(BgL_offsetz00_1808/BgL_n2z00_1818); } } 
{ /* ./Bdb/spread-obj.scm 160 */
long BgL_restz00_1811;
{ /* ./Bdb/spread-obj.scm 160 */
int BgL_arg2024z00_1812;
BgL_arg2024z00_1812 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 160 */
long BgL_n2z00_1821;
BgL_n2z00_1821 = 
(long)(BgL_arg2024z00_1812); 
BgL_restz00_1811 = 
(BgL_offsetz00_1808%BgL_n2z00_1821); } } 
{ /* ./Bdb/spread-obj.scm 160 */

{ /* ./Bdb/spread-obj.scm 160 */
obj_t BgL_bucketz00_1813;
{ /* ./Bdb/spread-obj.scm 160 */
int BgL_kz00_1823;
BgL_kz00_1823 = 
(int)(BgL_modz00_1809); 
BgL_bucketz00_1813 = 
VECTOR_REF(BgL_arg2017z00_1804,BgL_kz00_1823); } 
{ /* ./Bdb/spread-obj.scm 160 */
int BgL_kz00_1825;
BgL_kz00_1825 = 
(int)(BgL_restz00_1811); 
BgL_method2692z00_1801 = 
VECTOR_REF(BgL_bucketz00_1813,BgL_kz00_1825); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1801)(BgL_method2692z00_1801, 
(obj_t)(BgL_arg3374z00_1798), BEOA);} } } } 
}



/* spread-obj-node!-let-var2716 */
obj_t BGl_spreadzd2objzd2nodez12zd2letzd2var2716z12zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2046, obj_t BgL_nodez00_2047)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 145 */
{ 
BgL_letzd2varzd2_bglt BgL_nodez00_1190;
BgL_nodez00_1190 = 
(BgL_letzd2varzd2_bglt)(BgL_nodez00_2047); 
{ 
obj_t BgL_l2685z00_1194;
{ /* ./Bdb/spread-obj.scm 147 */
obj_t BgL_arg3340z00_1196;
BgL_arg3340z00_1196 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_1190))->BgL_bindingsz00); 
BgL_l2685z00_1194 = BgL_arg3340z00_1196; 
BgL_forzd2each2686zd2_1195:
{ /* ./Bdb/spread-obj.scm 147 */
bool_t BgL_test3343z00_1197;
BgL_test3343z00_1197 = 
PAIRP(BgL_l2685z00_1194); 
if(BgL_test3343z00_1197)
{ /* ./Bdb/spread-obj.scm 147 */
{ /* ./Bdb/spread-obj.scm 148 */
obj_t BgL_bindingz00_1198;
BgL_bindingz00_1198 = 
CAR(BgL_l2685z00_1194); 
{ /* ./Bdb/spread-obj.scm 148 */
obj_t BgL_variablez00_1199;
BgL_variablez00_1199 = 
CAR(BgL_bindingz00_1198); 
{ /* ./Bdb/spread-obj.scm 149 */
bool_t BgL_test3344z00_1200;
{ /* ./Bdb/spread-obj.scm 149 */
bool_t BgL_test3346z00_1201;
{ /* ./Bdb/spread-obj.scm 149 */
BgL_typez00_bglt BgL_arg3349z00_1202;
{ /* ./Bdb/spread-obj.scm 149 */
BgL_variablez00_bglt BgL_obj1097z00_1739;
BgL_obj1097z00_1739 = 
(BgL_variablez00_bglt)(BgL_variablez00_1199); 
BgL_arg3349z00_1202 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1097z00_1739))->BgL_typez00); } 
{ /* ./Bdb/spread-obj.scm 149 */
obj_t BgL_auxz00_2463;
BgL_auxz00_2463 = 
(obj_t)(BgL_arg3349z00_1202); 
BgL_test3346z00_1201 = 
(BgL_auxz00_2463==BGl_za2_za2z00zztype_cachez00); } } 
if(BgL_test3346z00_1201)
{ /* ./Bdb/spread-obj.scm 150 */
BgL_localz00_bglt BgL_obj1263z00_1740;
BgL_obj1263z00_1740 = 
(BgL_localz00_bglt)(BgL_variablez00_1199); 
BgL_test3344z00_1200 = 
(((BgL_localz00_bglt)CREF(BgL_obj1263z00_1740))->BgL_userzf3zf3); }  else 
{ /* ./Bdb/spread-obj.scm 149 */
BgL_test3344z00_1200 = ((bool_t)0); } } 
if(BgL_test3344z00_1200)
{ /* ./Bdb/spread-obj.scm 151 */
BgL_variablez00_bglt BgL_obj1099z00_1741;BgL_typez00_bglt BgL_val1098z00_1742;
BgL_obj1099z00_1741 = 
(BgL_variablez00_bglt)(BgL_variablez00_1199); 
BgL_val1098z00_1742 = 
(BgL_typez00_bglt)(BGl_za2objza2z00zztype_cachez00); 
((((BgL_variablez00_bglt)CREF(BgL_obj1099z00_1741))->BgL_typez00) = ((BgL_typez00_bglt)BgL_val1098z00_1742), BUNSPEC); }  else 
{ /* ./Bdb/spread-obj.scm 149 */BFALSE; } } } 
{ /* ./Bdb/spread-obj.scm 152 */
obj_t BgL_arg3354z00_1203;
BgL_arg3354z00_1203 = 
CDR(BgL_bindingz00_1198); 
{ /* ./Bdb/spread-obj.scm 152 */
BgL_nodez00_bglt BgL_nodez00_1744;
BgL_nodez00_1744 = 
(BgL_nodez00_bglt)(BgL_arg3354z00_1203); 
{ /* ./Bdb/spread-obj.scm 152 */
obj_t BgL_method2692z00_1745;
{ /* ./Bdb/spread-obj.scm 152 */
BgL_objectz00_bglt BgL_objz00_1746;
BgL_objz00_1746 = 
(BgL_objectz00_bglt)(BgL_nodez00_1744); 
{ /* ./Bdb/spread-obj.scm 152 */
long BgL_objzd2classzd2numz00_1747;
BgL_objzd2classzd2numz00_1747 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1746); 
{ /* ./Bdb/spread-obj.scm 152 */
obj_t BgL_arg2017z00_1748;
{ /* ./Bdb/spread-obj.scm 152 */
int BgL_auxz00_2477;
BgL_auxz00_2477 = 
(int)(((long)1)); 
BgL_arg2017z00_1748 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2477); } 
{ /* ./Bdb/spread-obj.scm 152 */
int BgL_offsetz00_1751;
BgL_offsetz00_1751 = 
(int)(BgL_objzd2classzd2numz00_1747); 
{ /* ./Bdb/spread-obj.scm 152 */
long BgL_offsetz00_1752;
{ /* ./Bdb/spread-obj.scm 152 */
long BgL_auxz00_2481;
BgL_auxz00_2481 = 
(long)(BgL_offsetz00_1751); 
BgL_offsetz00_1752 = 
(BgL_auxz00_2481-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 152 */
long BgL_modz00_1753;
{ /* ./Bdb/spread-obj.scm 152 */
int BgL_arg2028z00_1754;
BgL_arg2028z00_1754 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 152 */
long BgL_n2z00_1762;
BgL_n2z00_1762 = 
(long)(BgL_arg2028z00_1754); 
BgL_modz00_1753 = 
(BgL_offsetz00_1752/BgL_n2z00_1762); } } 
{ /* ./Bdb/spread-obj.scm 152 */
long BgL_restz00_1755;
{ /* ./Bdb/spread-obj.scm 152 */
int BgL_arg2024z00_1756;
BgL_arg2024z00_1756 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 152 */
long BgL_n2z00_1765;
BgL_n2z00_1765 = 
(long)(BgL_arg2024z00_1756); 
BgL_restz00_1755 = 
(BgL_offsetz00_1752%BgL_n2z00_1765); } } 
{ /* ./Bdb/spread-obj.scm 152 */

{ /* ./Bdb/spread-obj.scm 152 */
obj_t BgL_bucketz00_1757;
{ /* ./Bdb/spread-obj.scm 152 */
int BgL_kz00_1767;
BgL_kz00_1767 = 
(int)(BgL_modz00_1753); 
BgL_bucketz00_1757 = 
VECTOR_REF(BgL_arg2017z00_1748,BgL_kz00_1767); } 
{ /* ./Bdb/spread-obj.scm 152 */
int BgL_kz00_1769;
BgL_kz00_1769 = 
(int)(BgL_restz00_1755); 
BgL_method2692z00_1745 = 
VECTOR_REF(BgL_bucketz00_1757,BgL_kz00_1769); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1745)(BgL_method2692z00_1745, 
(obj_t)(BgL_nodez00_1744), BEOA); } } } } 
{ /* ./Bdb/spread-obj.scm 147 */
obj_t BgL_arg3359z00_1204;
BgL_arg3359z00_1204 = 
CDR(BgL_l2685z00_1194); 
{ 
obj_t BgL_l2685z00_2498;
BgL_l2685z00_2498 = BgL_arg3359z00_1204; 
BgL_l2685z00_1194 = BgL_l2685z00_2498; 
goto BgL_forzd2each2686zd2_1195;} } }  else 
{ /* ./Bdb/spread-obj.scm 147 */((bool_t)1); } } } } 
{ /* ./Bdb/spread-obj.scm 154 */
BgL_nodez00_bglt BgL_arg3364z00_1205;
BgL_arg3364z00_1205 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_nodez00_1190))->BgL_bodyz00); 
{ /* ./Bdb/spread-obj.scm 154 */
obj_t BgL_method2692z00_1773;
{ /* ./Bdb/spread-obj.scm 154 */
BgL_objectz00_bglt BgL_objz00_1774;
BgL_objz00_1774 = 
(BgL_objectz00_bglt)(BgL_arg3364z00_1205); 
{ /* ./Bdb/spread-obj.scm 154 */
long BgL_objzd2classzd2numz00_1775;
BgL_objzd2classzd2numz00_1775 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1774); 
{ /* ./Bdb/spread-obj.scm 154 */
obj_t BgL_arg2017z00_1776;
{ /* ./Bdb/spread-obj.scm 154 */
int BgL_auxz00_2502;
BgL_auxz00_2502 = 
(int)(((long)1)); 
BgL_arg2017z00_1776 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2502); } 
{ /* ./Bdb/spread-obj.scm 154 */
int BgL_offsetz00_1779;
BgL_offsetz00_1779 = 
(int)(BgL_objzd2classzd2numz00_1775); 
{ /* ./Bdb/spread-obj.scm 154 */
long BgL_offsetz00_1780;
{ /* ./Bdb/spread-obj.scm 154 */
long BgL_auxz00_2506;
BgL_auxz00_2506 = 
(long)(BgL_offsetz00_1779); 
BgL_offsetz00_1780 = 
(BgL_auxz00_2506-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 154 */
long BgL_modz00_1781;
{ /* ./Bdb/spread-obj.scm 154 */
int BgL_arg2028z00_1782;
BgL_arg2028z00_1782 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 154 */
long BgL_n2z00_1790;
BgL_n2z00_1790 = 
(long)(BgL_arg2028z00_1782); 
BgL_modz00_1781 = 
(BgL_offsetz00_1780/BgL_n2z00_1790); } } 
{ /* ./Bdb/spread-obj.scm 154 */
long BgL_restz00_1783;
{ /* ./Bdb/spread-obj.scm 154 */
int BgL_arg2024z00_1784;
BgL_arg2024z00_1784 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 154 */
long BgL_n2z00_1793;
BgL_n2z00_1793 = 
(long)(BgL_arg2024z00_1784); 
BgL_restz00_1783 = 
(BgL_offsetz00_1780%BgL_n2z00_1793); } } 
{ /* ./Bdb/spread-obj.scm 154 */

{ /* ./Bdb/spread-obj.scm 154 */
obj_t BgL_bucketz00_1785;
{ /* ./Bdb/spread-obj.scm 154 */
int BgL_kz00_1795;
BgL_kz00_1795 = 
(int)(BgL_modz00_1781); 
BgL_bucketz00_1785 = 
VECTOR_REF(BgL_arg2017z00_1776,BgL_kz00_1795); } 
{ /* ./Bdb/spread-obj.scm 154 */
int BgL_kz00_1797;
BgL_kz00_1797 = 
(int)(BgL_restz00_1783); 
BgL_method2692z00_1773 = 
VECTOR_REF(BgL_bucketz00_1785,BgL_kz00_1797); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1773)(BgL_method2692z00_1773, 
(obj_t)(BgL_arg3364z00_1205), BEOA);} } } } 
}



/* spread-obj-node!-let-fun2714 */
obj_t BGl_spreadzd2objzd2nodez12zd2letzd2fun2714z12zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2048, obj_t BgL_nodez00_2049)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 137 */
{ 
BgL_letzd2funzd2_bglt BgL_nodez00_1177;
BgL_nodez00_1177 = 
(BgL_letzd2funzd2_bglt)(BgL_nodez00_2049); 
{ 
obj_t BgL_l2681z00_1181;
{ /* ./Bdb/spread-obj.scm 139 */
obj_t BgL_arg3315z00_1183;
BgL_arg3315z00_1183 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_nodez00_1177))->BgL_localsz00); 
BgL_l2681z00_1181 = BgL_arg3315z00_1183; 
BgL_forzd2each2682zd2_1182:
{ /* ./Bdb/spread-obj.scm 139 */
bool_t BgL_test3318z00_1184;
BgL_test3318z00_1184 = 
PAIRP(BgL_l2681z00_1181); 
if(BgL_test3318z00_1184)
{ /* ./Bdb/spread-obj.scm 139 */
{ /* ./Bdb/spread-obj.scm 139 */
obj_t BgL_arg3320z00_1185;
BgL_arg3320z00_1185 = 
CAR(BgL_l2681z00_1181); 
BGl_spreadzd2objzd2funz12z12zzbdb_spreadzd2objzd2(BgL_arg3320z00_1185); } 
{ /* ./Bdb/spread-obj.scm 139 */
obj_t BgL_arg3324z00_1186;
BgL_arg3324z00_1186 = 
CDR(BgL_l2681z00_1181); 
{ 
obj_t BgL_l2681z00_2529;
BgL_l2681z00_2529 = BgL_arg3324z00_1186; 
BgL_l2681z00_1181 = BgL_l2681z00_2529; 
goto BgL_forzd2each2682zd2_1182;} } }  else 
{ /* ./Bdb/spread-obj.scm 139 */((bool_t)1); } } } } 
{ /* ./Bdb/spread-obj.scm 140 */
BgL_nodez00_bglt BgL_arg3329z00_1187;
BgL_arg3329z00_1187 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_nodez00_1177))->BgL_bodyz00); 
{ /* ./Bdb/spread-obj.scm 140 */
obj_t BgL_method2692z00_1710;
{ /* ./Bdb/spread-obj.scm 140 */
BgL_objectz00_bglt BgL_objz00_1711;
BgL_objz00_1711 = 
(BgL_objectz00_bglt)(BgL_arg3329z00_1187); 
{ /* ./Bdb/spread-obj.scm 140 */
long BgL_objzd2classzd2numz00_1712;
BgL_objzd2classzd2numz00_1712 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1711); 
{ /* ./Bdb/spread-obj.scm 140 */
obj_t BgL_arg2017z00_1713;
{ /* ./Bdb/spread-obj.scm 140 */
int BgL_auxz00_2533;
BgL_auxz00_2533 = 
(int)(((long)1)); 
BgL_arg2017z00_1713 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2533); } 
{ /* ./Bdb/spread-obj.scm 140 */
int BgL_offsetz00_1716;
BgL_offsetz00_1716 = 
(int)(BgL_objzd2classzd2numz00_1712); 
{ /* ./Bdb/spread-obj.scm 140 */
long BgL_offsetz00_1717;
{ /* ./Bdb/spread-obj.scm 140 */
long BgL_auxz00_2537;
BgL_auxz00_2537 = 
(long)(BgL_offsetz00_1716); 
BgL_offsetz00_1717 = 
(BgL_auxz00_2537-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 140 */
long BgL_modz00_1718;
{ /* ./Bdb/spread-obj.scm 140 */
int BgL_arg2028z00_1719;
BgL_arg2028z00_1719 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 140 */
long BgL_n2z00_1727;
BgL_n2z00_1727 = 
(long)(BgL_arg2028z00_1719); 
BgL_modz00_1718 = 
(BgL_offsetz00_1717/BgL_n2z00_1727); } } 
{ /* ./Bdb/spread-obj.scm 140 */
long BgL_restz00_1720;
{ /* ./Bdb/spread-obj.scm 140 */
int BgL_arg2024z00_1721;
BgL_arg2024z00_1721 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 140 */
long BgL_n2z00_1730;
BgL_n2z00_1730 = 
(long)(BgL_arg2024z00_1721); 
BgL_restz00_1720 = 
(BgL_offsetz00_1717%BgL_n2z00_1730); } } 
{ /* ./Bdb/spread-obj.scm 140 */

{ /* ./Bdb/spread-obj.scm 140 */
obj_t BgL_bucketz00_1722;
{ /* ./Bdb/spread-obj.scm 140 */
int BgL_kz00_1732;
BgL_kz00_1732 = 
(int)(BgL_modz00_1718); 
BgL_bucketz00_1722 = 
VECTOR_REF(BgL_arg2017z00_1713,BgL_kz00_1732); } 
{ /* ./Bdb/spread-obj.scm 140 */
int BgL_kz00_1734;
BgL_kz00_1734 = 
(int)(BgL_restz00_1720); 
BgL_method2692z00_1710 = 
VECTOR_REF(BgL_bucketz00_1722,BgL_kz00_1734); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1710)(BgL_method2692z00_1710, 
(obj_t)(BgL_arg3329z00_1187), BEOA);} } } } 
}



/* spread-obj-node!-select2712 */
obj_t BGl_spreadzd2objzd2nodez12zd2select2712zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2050, obj_t BgL_nodez00_2051)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 127 */
{ 
BgL_selectz00_bglt BgL_nodez00_1163;
{ /* ./Bdb/spread-obj.scm 128 */
bool_t BgL_auxz00_2554;
BgL_nodez00_1163 = 
(BgL_selectz00_bglt)(BgL_nodez00_2051); 
{ /* ./Bdb/spread-obj.scm 129 */
BgL_nodez00_bglt BgL_arg3290z00_1167;
BgL_arg3290z00_1167 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_1163))->BgL_testz00); 
{ /* ./Bdb/spread-obj.scm 129 */
obj_t BgL_method2692z00_1648;
{ /* ./Bdb/spread-obj.scm 129 */
BgL_objectz00_bglt BgL_objz00_1649;
BgL_objz00_1649 = 
(BgL_objectz00_bglt)(BgL_arg3290z00_1167); 
{ /* ./Bdb/spread-obj.scm 129 */
long BgL_objzd2classzd2numz00_1650;
BgL_objzd2classzd2numz00_1650 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1649); 
{ /* ./Bdb/spread-obj.scm 129 */
obj_t BgL_arg2017z00_1651;
{ /* ./Bdb/spread-obj.scm 129 */
int BgL_auxz00_2558;
BgL_auxz00_2558 = 
(int)(((long)1)); 
BgL_arg2017z00_1651 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2558); } 
{ /* ./Bdb/spread-obj.scm 129 */
int BgL_offsetz00_1654;
BgL_offsetz00_1654 = 
(int)(BgL_objzd2classzd2numz00_1650); 
{ /* ./Bdb/spread-obj.scm 129 */
long BgL_offsetz00_1655;
{ /* ./Bdb/spread-obj.scm 129 */
long BgL_auxz00_2562;
BgL_auxz00_2562 = 
(long)(BgL_offsetz00_1654); 
BgL_offsetz00_1655 = 
(BgL_auxz00_2562-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 129 */
long BgL_modz00_1656;
{ /* ./Bdb/spread-obj.scm 129 */
int BgL_arg2028z00_1657;
BgL_arg2028z00_1657 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 129 */
long BgL_n2z00_1665;
BgL_n2z00_1665 = 
(long)(BgL_arg2028z00_1657); 
BgL_modz00_1656 = 
(BgL_offsetz00_1655/BgL_n2z00_1665); } } 
{ /* ./Bdb/spread-obj.scm 129 */
long BgL_restz00_1658;
{ /* ./Bdb/spread-obj.scm 129 */
int BgL_arg2024z00_1659;
BgL_arg2024z00_1659 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 129 */
long BgL_n2z00_1668;
BgL_n2z00_1668 = 
(long)(BgL_arg2024z00_1659); 
BgL_restz00_1658 = 
(BgL_offsetz00_1655%BgL_n2z00_1668); } } 
{ /* ./Bdb/spread-obj.scm 129 */

{ /* ./Bdb/spread-obj.scm 129 */
obj_t BgL_bucketz00_1660;
{ /* ./Bdb/spread-obj.scm 129 */
int BgL_kz00_1670;
BgL_kz00_1670 = 
(int)(BgL_modz00_1656); 
BgL_bucketz00_1660 = 
VECTOR_REF(BgL_arg2017z00_1651,BgL_kz00_1670); } 
{ /* ./Bdb/spread-obj.scm 129 */
int BgL_kz00_1672;
BgL_kz00_1672 = 
(int)(BgL_restz00_1658); 
BgL_method2692z00_1648 = 
VECTOR_REF(BgL_bucketz00_1660,BgL_kz00_1672); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1648)(BgL_method2692z00_1648, 
(obj_t)(BgL_arg3290z00_1167), BEOA); } } 
{ 
obj_t BgL_l2677z00_1168;
{ /* ./Bdb/spread-obj.scm 130 */
obj_t BgL_arg3294z00_1170;
BgL_arg3294z00_1170 = 
(((BgL_selectz00_bglt)CREF(BgL_nodez00_1163))->BgL_clausesz00); 
BgL_l2677z00_1168 = BgL_arg3294z00_1170; 
BgL_forzd2each2678zd2_1169:
{ /* ./Bdb/spread-obj.scm 130 */
bool_t BgL_test3297z00_1171;
BgL_test3297z00_1171 = 
PAIRP(BgL_l2677z00_1168); 
if(BgL_test3297z00_1171)
{ /* ./Bdb/spread-obj.scm 130 */
{ /* ./Bdb/spread-obj.scm 131 */
obj_t BgL_clausez00_1172;
BgL_clausez00_1172 = 
CAR(BgL_l2677z00_1168); 
{ /* ./Bdb/spread-obj.scm 131 */
obj_t BgL_arg3299z00_1173;
BgL_arg3299z00_1173 = 
CDR(BgL_clausez00_1172); 
{ /* ./Bdb/spread-obj.scm 131 */
BgL_nodez00_bglt BgL_nodez00_1677;
BgL_nodez00_1677 = 
(BgL_nodez00_bglt)(BgL_arg3299z00_1173); 
{ /* ./Bdb/spread-obj.scm 131 */
obj_t BgL_method2692z00_1678;
{ /* ./Bdb/spread-obj.scm 131 */
BgL_objectz00_bglt BgL_objz00_1679;
BgL_objz00_1679 = 
(BgL_objectz00_bglt)(BgL_nodez00_1677); 
{ /* ./Bdb/spread-obj.scm 131 */
long BgL_objzd2classzd2numz00_1680;
BgL_objzd2classzd2numz00_1680 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1679); 
{ /* ./Bdb/spread-obj.scm 131 */
obj_t BgL_arg2017z00_1681;
{ /* ./Bdb/spread-obj.scm 131 */
int BgL_auxz00_2586;
BgL_auxz00_2586 = 
(int)(((long)1)); 
BgL_arg2017z00_1681 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2586); } 
{ /* ./Bdb/spread-obj.scm 131 */
int BgL_offsetz00_1684;
BgL_offsetz00_1684 = 
(int)(BgL_objzd2classzd2numz00_1680); 
{ /* ./Bdb/spread-obj.scm 131 */
long BgL_offsetz00_1685;
{ /* ./Bdb/spread-obj.scm 131 */
long BgL_auxz00_2590;
BgL_auxz00_2590 = 
(long)(BgL_offsetz00_1684); 
BgL_offsetz00_1685 = 
(BgL_auxz00_2590-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 131 */
long BgL_modz00_1686;
{ /* ./Bdb/spread-obj.scm 131 */
int BgL_arg2028z00_1687;
BgL_arg2028z00_1687 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 131 */
long BgL_n2z00_1695;
BgL_n2z00_1695 = 
(long)(BgL_arg2028z00_1687); 
BgL_modz00_1686 = 
(BgL_offsetz00_1685/BgL_n2z00_1695); } } 
{ /* ./Bdb/spread-obj.scm 131 */
long BgL_restz00_1688;
{ /* ./Bdb/spread-obj.scm 131 */
int BgL_arg2024z00_1689;
BgL_arg2024z00_1689 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 131 */
long BgL_n2z00_1698;
BgL_n2z00_1698 = 
(long)(BgL_arg2024z00_1689); 
BgL_restz00_1688 = 
(BgL_offsetz00_1685%BgL_n2z00_1698); } } 
{ /* ./Bdb/spread-obj.scm 131 */

{ /* ./Bdb/spread-obj.scm 131 */
obj_t BgL_bucketz00_1690;
{ /* ./Bdb/spread-obj.scm 131 */
int BgL_kz00_1700;
BgL_kz00_1700 = 
(int)(BgL_modz00_1686); 
BgL_bucketz00_1690 = 
VECTOR_REF(BgL_arg2017z00_1681,BgL_kz00_1700); } 
{ /* ./Bdb/spread-obj.scm 131 */
int BgL_kz00_1702;
BgL_kz00_1702 = 
(int)(BgL_restz00_1688); 
BgL_method2692z00_1678 = 
VECTOR_REF(BgL_bucketz00_1690,BgL_kz00_1702); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1678)(BgL_method2692z00_1678, 
(obj_t)(BgL_nodez00_1677), BEOA); } } } } 
{ /* ./Bdb/spread-obj.scm 130 */
obj_t BgL_arg3304z00_1174;
BgL_arg3304z00_1174 = 
CDR(BgL_l2677z00_1168); 
{ 
obj_t BgL_l2677z00_2607;
BgL_l2677z00_2607 = BgL_arg3304z00_1174; 
BgL_l2677z00_1168 = BgL_l2677z00_2607; 
goto BgL_forzd2each2678zd2_1169;} } }  else 
{ /* ./Bdb/spread-obj.scm 130 */
BgL_auxz00_2554 = ((bool_t)1); } } } } 
return 
BBOOL(BgL_auxz00_2554);} } } 
}



/* spread-obj-node!-fail2710 */
obj_t BGl_spreadzd2objzd2nodez12zd2fail2710zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2052, obj_t BgL_nodez00_2053)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 118 */
{ 
BgL_failz00_bglt BgL_nodez00_1154;
BgL_nodez00_1154 = 
(BgL_failz00_bglt)(BgL_nodez00_2053); 
{ /* ./Bdb/spread-obj.scm 120 */
BgL_nodez00_bglt BgL_arg3272z00_1158;
BgL_arg3272z00_1158 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1154))->BgL_procz00); 
{ /* ./Bdb/spread-obj.scm 120 */
obj_t BgL_method2692z00_1567;
{ /* ./Bdb/spread-obj.scm 120 */
BgL_objectz00_bglt BgL_objz00_1568;
BgL_objz00_1568 = 
(BgL_objectz00_bglt)(BgL_arg3272z00_1158); 
{ /* ./Bdb/spread-obj.scm 120 */
long BgL_objzd2classzd2numz00_1569;
BgL_objzd2classzd2numz00_1569 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1568); 
{ /* ./Bdb/spread-obj.scm 120 */
obj_t BgL_arg2017z00_1570;
{ /* ./Bdb/spread-obj.scm 120 */
int BgL_auxz00_2613;
BgL_auxz00_2613 = 
(int)(((long)1)); 
BgL_arg2017z00_1570 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2613); } 
{ /* ./Bdb/spread-obj.scm 120 */
int BgL_offsetz00_1573;
BgL_offsetz00_1573 = 
(int)(BgL_objzd2classzd2numz00_1569); 
{ /* ./Bdb/spread-obj.scm 120 */
long BgL_offsetz00_1574;
{ /* ./Bdb/spread-obj.scm 120 */
long BgL_auxz00_2617;
BgL_auxz00_2617 = 
(long)(BgL_offsetz00_1573); 
BgL_offsetz00_1574 = 
(BgL_auxz00_2617-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 120 */
long BgL_modz00_1575;
{ /* ./Bdb/spread-obj.scm 120 */
int BgL_arg2028z00_1576;
BgL_arg2028z00_1576 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 120 */
long BgL_n2z00_1584;
BgL_n2z00_1584 = 
(long)(BgL_arg2028z00_1576); 
BgL_modz00_1575 = 
(BgL_offsetz00_1574/BgL_n2z00_1584); } } 
{ /* ./Bdb/spread-obj.scm 120 */
long BgL_restz00_1577;
{ /* ./Bdb/spread-obj.scm 120 */
int BgL_arg2024z00_1578;
BgL_arg2024z00_1578 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 120 */
long BgL_n2z00_1587;
BgL_n2z00_1587 = 
(long)(BgL_arg2024z00_1578); 
BgL_restz00_1577 = 
(BgL_offsetz00_1574%BgL_n2z00_1587); } } 
{ /* ./Bdb/spread-obj.scm 120 */

{ /* ./Bdb/spread-obj.scm 120 */
obj_t BgL_bucketz00_1579;
{ /* ./Bdb/spread-obj.scm 120 */
int BgL_kz00_1589;
BgL_kz00_1589 = 
(int)(BgL_modz00_1575); 
BgL_bucketz00_1579 = 
VECTOR_REF(BgL_arg2017z00_1570,BgL_kz00_1589); } 
{ /* ./Bdb/spread-obj.scm 120 */
int BgL_kz00_1591;
BgL_kz00_1591 = 
(int)(BgL_restz00_1577); 
BgL_method2692z00_1567 = 
VECTOR_REF(BgL_bucketz00_1579,BgL_kz00_1591); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1567)(BgL_method2692z00_1567, 
(obj_t)(BgL_arg3272z00_1158), BEOA); } } 
{ /* ./Bdb/spread-obj.scm 121 */
BgL_nodez00_bglt BgL_arg3276z00_1159;
BgL_arg3276z00_1159 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1154))->BgL_msgz00); 
{ /* ./Bdb/spread-obj.scm 121 */
obj_t BgL_method2692z00_1594;
{ /* ./Bdb/spread-obj.scm 121 */
BgL_objectz00_bglt BgL_objz00_1595;
BgL_objz00_1595 = 
(BgL_objectz00_bglt)(BgL_arg3276z00_1159); 
{ /* ./Bdb/spread-obj.scm 121 */
long BgL_objzd2classzd2numz00_1596;
BgL_objzd2classzd2numz00_1596 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1595); 
{ /* ./Bdb/spread-obj.scm 121 */
obj_t BgL_arg2017z00_1597;
{ /* ./Bdb/spread-obj.scm 121 */
int BgL_auxz00_2636;
BgL_auxz00_2636 = 
(int)(((long)1)); 
BgL_arg2017z00_1597 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2636); } 
{ /* ./Bdb/spread-obj.scm 121 */
int BgL_offsetz00_1600;
BgL_offsetz00_1600 = 
(int)(BgL_objzd2classzd2numz00_1596); 
{ /* ./Bdb/spread-obj.scm 121 */
long BgL_offsetz00_1601;
{ /* ./Bdb/spread-obj.scm 121 */
long BgL_auxz00_2640;
BgL_auxz00_2640 = 
(long)(BgL_offsetz00_1600); 
BgL_offsetz00_1601 = 
(BgL_auxz00_2640-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 121 */
long BgL_modz00_1602;
{ /* ./Bdb/spread-obj.scm 121 */
int BgL_arg2028z00_1603;
BgL_arg2028z00_1603 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 121 */
long BgL_n2z00_1611;
BgL_n2z00_1611 = 
(long)(BgL_arg2028z00_1603); 
BgL_modz00_1602 = 
(BgL_offsetz00_1601/BgL_n2z00_1611); } } 
{ /* ./Bdb/spread-obj.scm 121 */
long BgL_restz00_1604;
{ /* ./Bdb/spread-obj.scm 121 */
int BgL_arg2024z00_1605;
BgL_arg2024z00_1605 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 121 */
long BgL_n2z00_1614;
BgL_n2z00_1614 = 
(long)(BgL_arg2024z00_1605); 
BgL_restz00_1604 = 
(BgL_offsetz00_1601%BgL_n2z00_1614); } } 
{ /* ./Bdb/spread-obj.scm 121 */

{ /* ./Bdb/spread-obj.scm 121 */
obj_t BgL_bucketz00_1606;
{ /* ./Bdb/spread-obj.scm 121 */
int BgL_kz00_1616;
BgL_kz00_1616 = 
(int)(BgL_modz00_1602); 
BgL_bucketz00_1606 = 
VECTOR_REF(BgL_arg2017z00_1597,BgL_kz00_1616); } 
{ /* ./Bdb/spread-obj.scm 121 */
int BgL_kz00_1618;
BgL_kz00_1618 = 
(int)(BgL_restz00_1604); 
BgL_method2692z00_1594 = 
VECTOR_REF(BgL_bucketz00_1606,BgL_kz00_1618); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1594)(BgL_method2692z00_1594, 
(obj_t)(BgL_arg3276z00_1159), BEOA); } } 
{ /* ./Bdb/spread-obj.scm 122 */
BgL_nodez00_bglt BgL_arg3280z00_1160;
BgL_arg3280z00_1160 = 
(((BgL_failz00_bglt)CREF(BgL_nodez00_1154))->BgL_objz00); 
{ /* ./Bdb/spread-obj.scm 122 */
obj_t BgL_method2692z00_1621;
{ /* ./Bdb/spread-obj.scm 122 */
BgL_objectz00_bglt BgL_objz00_1622;
BgL_objz00_1622 = 
(BgL_objectz00_bglt)(BgL_arg3280z00_1160); 
{ /* ./Bdb/spread-obj.scm 122 */
long BgL_objzd2classzd2numz00_1623;
BgL_objzd2classzd2numz00_1623 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1622); 
{ /* ./Bdb/spread-obj.scm 122 */
obj_t BgL_arg2017z00_1624;
{ /* ./Bdb/spread-obj.scm 122 */
int BgL_auxz00_2659;
BgL_auxz00_2659 = 
(int)(((long)1)); 
BgL_arg2017z00_1624 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2659); } 
{ /* ./Bdb/spread-obj.scm 122 */
int BgL_offsetz00_1627;
BgL_offsetz00_1627 = 
(int)(BgL_objzd2classzd2numz00_1623); 
{ /* ./Bdb/spread-obj.scm 122 */
long BgL_offsetz00_1628;
{ /* ./Bdb/spread-obj.scm 122 */
long BgL_auxz00_2663;
BgL_auxz00_2663 = 
(long)(BgL_offsetz00_1627); 
BgL_offsetz00_1628 = 
(BgL_auxz00_2663-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 122 */
long BgL_modz00_1629;
{ /* ./Bdb/spread-obj.scm 122 */
int BgL_arg2028z00_1630;
BgL_arg2028z00_1630 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 122 */
long BgL_n2z00_1638;
BgL_n2z00_1638 = 
(long)(BgL_arg2028z00_1630); 
BgL_modz00_1629 = 
(BgL_offsetz00_1628/BgL_n2z00_1638); } } 
{ /* ./Bdb/spread-obj.scm 122 */
long BgL_restz00_1631;
{ /* ./Bdb/spread-obj.scm 122 */
int BgL_arg2024z00_1632;
BgL_arg2024z00_1632 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 122 */
long BgL_n2z00_1641;
BgL_n2z00_1641 = 
(long)(BgL_arg2024z00_1632); 
BgL_restz00_1631 = 
(BgL_offsetz00_1628%BgL_n2z00_1641); } } 
{ /* ./Bdb/spread-obj.scm 122 */

{ /* ./Bdb/spread-obj.scm 122 */
obj_t BgL_bucketz00_1633;
{ /* ./Bdb/spread-obj.scm 122 */
int BgL_kz00_1643;
BgL_kz00_1643 = 
(int)(BgL_modz00_1629); 
BgL_bucketz00_1633 = 
VECTOR_REF(BgL_arg2017z00_1624,BgL_kz00_1643); } 
{ /* ./Bdb/spread-obj.scm 122 */
int BgL_kz00_1645;
BgL_kz00_1645 = 
(int)(BgL_restz00_1631); 
BgL_method2692z00_1621 = 
VECTOR_REF(BgL_bucketz00_1633,BgL_kz00_1645); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1621)(BgL_method2692z00_1621, 
(obj_t)(BgL_arg3280z00_1160), BEOA);} } } } 
}



/* spread-obj-node!-conditional2708 */
obj_t BGl_spreadzd2objzd2nodez12zd2conditional2708zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2054, obj_t BgL_nodez00_2055)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 109 */
{ 
BgL_conditionalz00_bglt BgL_nodez00_1145;
BgL_nodez00_1145 = 
(BgL_conditionalz00_bglt)(BgL_nodez00_2055); 
{ /* ./Bdb/spread-obj.scm 111 */
BgL_nodez00_bglt BgL_arg3253z00_1149;
BgL_arg3253z00_1149 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1145))->BgL_testz00); 
{ /* ./Bdb/spread-obj.scm 111 */
obj_t BgL_method2692z00_1486;
{ /* ./Bdb/spread-obj.scm 111 */
BgL_objectz00_bglt BgL_objz00_1487;
BgL_objz00_1487 = 
(BgL_objectz00_bglt)(BgL_arg3253z00_1149); 
{ /* ./Bdb/spread-obj.scm 111 */
long BgL_objzd2classzd2numz00_1488;
BgL_objzd2classzd2numz00_1488 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1487); 
{ /* ./Bdb/spread-obj.scm 111 */
obj_t BgL_arg2017z00_1489;
{ /* ./Bdb/spread-obj.scm 111 */
int BgL_auxz00_2683;
BgL_auxz00_2683 = 
(int)(((long)1)); 
BgL_arg2017z00_1489 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2683); } 
{ /* ./Bdb/spread-obj.scm 111 */
int BgL_offsetz00_1492;
BgL_offsetz00_1492 = 
(int)(BgL_objzd2classzd2numz00_1488); 
{ /* ./Bdb/spread-obj.scm 111 */
long BgL_offsetz00_1493;
{ /* ./Bdb/spread-obj.scm 111 */
long BgL_auxz00_2687;
BgL_auxz00_2687 = 
(long)(BgL_offsetz00_1492); 
BgL_offsetz00_1493 = 
(BgL_auxz00_2687-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 111 */
long BgL_modz00_1494;
{ /* ./Bdb/spread-obj.scm 111 */
int BgL_arg2028z00_1495;
BgL_arg2028z00_1495 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 111 */
long BgL_n2z00_1503;
BgL_n2z00_1503 = 
(long)(BgL_arg2028z00_1495); 
BgL_modz00_1494 = 
(BgL_offsetz00_1493/BgL_n2z00_1503); } } 
{ /* ./Bdb/spread-obj.scm 111 */
long BgL_restz00_1496;
{ /* ./Bdb/spread-obj.scm 111 */
int BgL_arg2024z00_1497;
BgL_arg2024z00_1497 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 111 */
long BgL_n2z00_1506;
BgL_n2z00_1506 = 
(long)(BgL_arg2024z00_1497); 
BgL_restz00_1496 = 
(BgL_offsetz00_1493%BgL_n2z00_1506); } } 
{ /* ./Bdb/spread-obj.scm 111 */

{ /* ./Bdb/spread-obj.scm 111 */
obj_t BgL_bucketz00_1498;
{ /* ./Bdb/spread-obj.scm 111 */
int BgL_kz00_1508;
BgL_kz00_1508 = 
(int)(BgL_modz00_1494); 
BgL_bucketz00_1498 = 
VECTOR_REF(BgL_arg2017z00_1489,BgL_kz00_1508); } 
{ /* ./Bdb/spread-obj.scm 111 */
int BgL_kz00_1510;
BgL_kz00_1510 = 
(int)(BgL_restz00_1496); 
BgL_method2692z00_1486 = 
VECTOR_REF(BgL_bucketz00_1498,BgL_kz00_1510); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1486)(BgL_method2692z00_1486, 
(obj_t)(BgL_arg3253z00_1149), BEOA); } } 
{ /* ./Bdb/spread-obj.scm 112 */
BgL_nodez00_bglt BgL_arg3257z00_1150;
BgL_arg3257z00_1150 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1145))->BgL_truez00); 
{ /* ./Bdb/spread-obj.scm 112 */
obj_t BgL_method2692z00_1513;
{ /* ./Bdb/spread-obj.scm 112 */
BgL_objectz00_bglt BgL_objz00_1514;
BgL_objz00_1514 = 
(BgL_objectz00_bglt)(BgL_arg3257z00_1150); 
{ /* ./Bdb/spread-obj.scm 112 */
long BgL_objzd2classzd2numz00_1515;
BgL_objzd2classzd2numz00_1515 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1514); 
{ /* ./Bdb/spread-obj.scm 112 */
obj_t BgL_arg2017z00_1516;
{ /* ./Bdb/spread-obj.scm 112 */
int BgL_auxz00_2706;
BgL_auxz00_2706 = 
(int)(((long)1)); 
BgL_arg2017z00_1516 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2706); } 
{ /* ./Bdb/spread-obj.scm 112 */
int BgL_offsetz00_1519;
BgL_offsetz00_1519 = 
(int)(BgL_objzd2classzd2numz00_1515); 
{ /* ./Bdb/spread-obj.scm 112 */
long BgL_offsetz00_1520;
{ /* ./Bdb/spread-obj.scm 112 */
long BgL_auxz00_2710;
BgL_auxz00_2710 = 
(long)(BgL_offsetz00_1519); 
BgL_offsetz00_1520 = 
(BgL_auxz00_2710-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 112 */
long BgL_modz00_1521;
{ /* ./Bdb/spread-obj.scm 112 */
int BgL_arg2028z00_1522;
BgL_arg2028z00_1522 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 112 */
long BgL_n2z00_1530;
BgL_n2z00_1530 = 
(long)(BgL_arg2028z00_1522); 
BgL_modz00_1521 = 
(BgL_offsetz00_1520/BgL_n2z00_1530); } } 
{ /* ./Bdb/spread-obj.scm 112 */
long BgL_restz00_1523;
{ /* ./Bdb/spread-obj.scm 112 */
int BgL_arg2024z00_1524;
BgL_arg2024z00_1524 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 112 */
long BgL_n2z00_1533;
BgL_n2z00_1533 = 
(long)(BgL_arg2024z00_1524); 
BgL_restz00_1523 = 
(BgL_offsetz00_1520%BgL_n2z00_1533); } } 
{ /* ./Bdb/spread-obj.scm 112 */

{ /* ./Bdb/spread-obj.scm 112 */
obj_t BgL_bucketz00_1525;
{ /* ./Bdb/spread-obj.scm 112 */
int BgL_kz00_1535;
BgL_kz00_1535 = 
(int)(BgL_modz00_1521); 
BgL_bucketz00_1525 = 
VECTOR_REF(BgL_arg2017z00_1516,BgL_kz00_1535); } 
{ /* ./Bdb/spread-obj.scm 112 */
int BgL_kz00_1537;
BgL_kz00_1537 = 
(int)(BgL_restz00_1523); 
BgL_method2692z00_1513 = 
VECTOR_REF(BgL_bucketz00_1525,BgL_kz00_1537); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1513)(BgL_method2692z00_1513, 
(obj_t)(BgL_arg3257z00_1150), BEOA); } } 
{ /* ./Bdb/spread-obj.scm 113 */
BgL_nodez00_bglt BgL_arg3261z00_1151;
BgL_arg3261z00_1151 = 
(((BgL_conditionalz00_bglt)CREF(BgL_nodez00_1145))->BgL_falsez00); 
{ /* ./Bdb/spread-obj.scm 113 */
obj_t BgL_method2692z00_1540;
{ /* ./Bdb/spread-obj.scm 113 */
BgL_objectz00_bglt BgL_objz00_1541;
BgL_objz00_1541 = 
(BgL_objectz00_bglt)(BgL_arg3261z00_1151); 
{ /* ./Bdb/spread-obj.scm 113 */
long BgL_objzd2classzd2numz00_1542;
BgL_objzd2classzd2numz00_1542 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1541); 
{ /* ./Bdb/spread-obj.scm 113 */
obj_t BgL_arg2017z00_1543;
{ /* ./Bdb/spread-obj.scm 113 */
int BgL_auxz00_2729;
BgL_auxz00_2729 = 
(int)(((long)1)); 
BgL_arg2017z00_1543 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2729); } 
{ /* ./Bdb/spread-obj.scm 113 */
int BgL_offsetz00_1546;
BgL_offsetz00_1546 = 
(int)(BgL_objzd2classzd2numz00_1542); 
{ /* ./Bdb/spread-obj.scm 113 */
long BgL_offsetz00_1547;
{ /* ./Bdb/spread-obj.scm 113 */
long BgL_auxz00_2733;
BgL_auxz00_2733 = 
(long)(BgL_offsetz00_1546); 
BgL_offsetz00_1547 = 
(BgL_auxz00_2733-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 113 */
long BgL_modz00_1548;
{ /* ./Bdb/spread-obj.scm 113 */
int BgL_arg2028z00_1549;
BgL_arg2028z00_1549 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 113 */
long BgL_n2z00_1557;
BgL_n2z00_1557 = 
(long)(BgL_arg2028z00_1549); 
BgL_modz00_1548 = 
(BgL_offsetz00_1547/BgL_n2z00_1557); } } 
{ /* ./Bdb/spread-obj.scm 113 */
long BgL_restz00_1550;
{ /* ./Bdb/spread-obj.scm 113 */
int BgL_arg2024z00_1551;
BgL_arg2024z00_1551 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 113 */
long BgL_n2z00_1560;
BgL_n2z00_1560 = 
(long)(BgL_arg2024z00_1551); 
BgL_restz00_1550 = 
(BgL_offsetz00_1547%BgL_n2z00_1560); } } 
{ /* ./Bdb/spread-obj.scm 113 */

{ /* ./Bdb/spread-obj.scm 113 */
obj_t BgL_bucketz00_1552;
{ /* ./Bdb/spread-obj.scm 113 */
int BgL_kz00_1562;
BgL_kz00_1562 = 
(int)(BgL_modz00_1548); 
BgL_bucketz00_1552 = 
VECTOR_REF(BgL_arg2017z00_1543,BgL_kz00_1562); } 
{ /* ./Bdb/spread-obj.scm 113 */
int BgL_kz00_1564;
BgL_kz00_1564 = 
(int)(BgL_restz00_1550); 
BgL_method2692z00_1540 = 
VECTOR_REF(BgL_bucketz00_1552,BgL_kz00_1564); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1540)(BgL_method2692z00_1540, 
(obj_t)(BgL_arg3261z00_1151), BEOA);} } } } 
}



/* spread-obj-node!-setq2706 */
obj_t BGl_spreadzd2objzd2nodez12zd2setq2706zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2056, obj_t BgL_nodez00_2057)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 103 */
{ 
BgL_setqz00_bglt BgL_nodez00_1139;
BgL_nodez00_1139 = 
(BgL_setqz00_bglt)(BgL_nodez00_2057); 
{ /* ./Bdb/spread-obj.scm 104 */
BgL_nodez00_bglt BgL_arg3243z00_1456;
BgL_arg3243z00_1456 = 
(((BgL_setqz00_bglt)CREF(BgL_nodez00_1139))->BgL_valuez00); 
{ /* ./Bdb/spread-obj.scm 104 */
obj_t BgL_method2692z00_1459;
{ /* ./Bdb/spread-obj.scm 104 */
BgL_objectz00_bglt BgL_objz00_1460;
BgL_objz00_1460 = 
(BgL_objectz00_bglt)(BgL_arg3243z00_1456); 
{ /* ./Bdb/spread-obj.scm 104 */
long BgL_objzd2classzd2numz00_1461;
BgL_objzd2classzd2numz00_1461 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1460); 
{ /* ./Bdb/spread-obj.scm 104 */
obj_t BgL_arg2017z00_1462;
{ /* ./Bdb/spread-obj.scm 104 */
int BgL_auxz00_2753;
BgL_auxz00_2753 = 
(int)(((long)1)); 
BgL_arg2017z00_1462 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2753); } 
{ /* ./Bdb/spread-obj.scm 104 */
int BgL_offsetz00_1465;
BgL_offsetz00_1465 = 
(int)(BgL_objzd2classzd2numz00_1461); 
{ /* ./Bdb/spread-obj.scm 104 */
long BgL_offsetz00_1466;
{ /* ./Bdb/spread-obj.scm 104 */
long BgL_auxz00_2757;
BgL_auxz00_2757 = 
(long)(BgL_offsetz00_1465); 
BgL_offsetz00_1466 = 
(BgL_auxz00_2757-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 104 */
long BgL_modz00_1467;
{ /* ./Bdb/spread-obj.scm 104 */
int BgL_arg2028z00_1468;
BgL_arg2028z00_1468 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 104 */
long BgL_n2z00_1476;
BgL_n2z00_1476 = 
(long)(BgL_arg2028z00_1468); 
BgL_modz00_1467 = 
(BgL_offsetz00_1466/BgL_n2z00_1476); } } 
{ /* ./Bdb/spread-obj.scm 104 */
long BgL_restz00_1469;
{ /* ./Bdb/spread-obj.scm 104 */
int BgL_arg2024z00_1470;
BgL_arg2024z00_1470 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 104 */
long BgL_n2z00_1479;
BgL_n2z00_1479 = 
(long)(BgL_arg2024z00_1470); 
BgL_restz00_1469 = 
(BgL_offsetz00_1466%BgL_n2z00_1479); } } 
{ /* ./Bdb/spread-obj.scm 104 */

{ /* ./Bdb/spread-obj.scm 104 */
obj_t BgL_bucketz00_1471;
{ /* ./Bdb/spread-obj.scm 104 */
int BgL_kz00_1481;
BgL_kz00_1481 = 
(int)(BgL_modz00_1467); 
BgL_bucketz00_1471 = 
VECTOR_REF(BgL_arg2017z00_1462,BgL_kz00_1481); } 
{ /* ./Bdb/spread-obj.scm 104 */
int BgL_kz00_1483;
BgL_kz00_1483 = 
(int)(BgL_restz00_1469); 
BgL_method2692z00_1459 = 
VECTOR_REF(BgL_bucketz00_1471,BgL_kz00_1483); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1459)(BgL_method2692z00_1459, 
(obj_t)(BgL_arg3243z00_1456), BEOA);} } } } 
}



/* spread-obj-node!-cast2704 */
obj_t BGl_spreadzd2objzd2nodez12zd2cast2704zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2058, obj_t BgL_nodez00_2059)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 97 */
{ 
BgL_castz00_bglt BgL_nodez00_1133;
BgL_nodez00_1133 = 
(BgL_castz00_bglt)(BgL_nodez00_2059); 
{ /* ./Bdb/spread-obj.scm 98 */
BgL_nodez00_bglt BgL_arg3233z00_1428;
BgL_arg3233z00_1428 = 
(((BgL_castz00_bglt)CREF(BgL_nodez00_1133))->BgL_argz00); 
{ /* ./Bdb/spread-obj.scm 98 */
obj_t BgL_method2692z00_1431;
{ /* ./Bdb/spread-obj.scm 98 */
BgL_objectz00_bglt BgL_objz00_1432;
BgL_objz00_1432 = 
(BgL_objectz00_bglt)(BgL_arg3233z00_1428); 
{ /* ./Bdb/spread-obj.scm 98 */
long BgL_objzd2classzd2numz00_1433;
BgL_objzd2classzd2numz00_1433 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1432); 
{ /* ./Bdb/spread-obj.scm 98 */
obj_t BgL_arg2017z00_1434;
{ /* ./Bdb/spread-obj.scm 98 */
int BgL_auxz00_2777;
BgL_auxz00_2777 = 
(int)(((long)1)); 
BgL_arg2017z00_1434 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2777); } 
{ /* ./Bdb/spread-obj.scm 98 */
int BgL_offsetz00_1437;
BgL_offsetz00_1437 = 
(int)(BgL_objzd2classzd2numz00_1433); 
{ /* ./Bdb/spread-obj.scm 98 */
long BgL_offsetz00_1438;
{ /* ./Bdb/spread-obj.scm 98 */
long BgL_auxz00_2781;
BgL_auxz00_2781 = 
(long)(BgL_offsetz00_1437); 
BgL_offsetz00_1438 = 
(BgL_auxz00_2781-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 98 */
long BgL_modz00_1439;
{ /* ./Bdb/spread-obj.scm 98 */
int BgL_arg2028z00_1440;
BgL_arg2028z00_1440 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 98 */
long BgL_n2z00_1448;
BgL_n2z00_1448 = 
(long)(BgL_arg2028z00_1440); 
BgL_modz00_1439 = 
(BgL_offsetz00_1438/BgL_n2z00_1448); } } 
{ /* ./Bdb/spread-obj.scm 98 */
long BgL_restz00_1441;
{ /* ./Bdb/spread-obj.scm 98 */
int BgL_arg2024z00_1442;
BgL_arg2024z00_1442 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 98 */
long BgL_n2z00_1451;
BgL_n2z00_1451 = 
(long)(BgL_arg2024z00_1442); 
BgL_restz00_1441 = 
(BgL_offsetz00_1438%BgL_n2z00_1451); } } 
{ /* ./Bdb/spread-obj.scm 98 */

{ /* ./Bdb/spread-obj.scm 98 */
obj_t BgL_bucketz00_1443;
{ /* ./Bdb/spread-obj.scm 98 */
int BgL_kz00_1453;
BgL_kz00_1453 = 
(int)(BgL_modz00_1439); 
BgL_bucketz00_1443 = 
VECTOR_REF(BgL_arg2017z00_1434,BgL_kz00_1453); } 
{ /* ./Bdb/spread-obj.scm 98 */
int BgL_kz00_1455;
BgL_kz00_1455 = 
(int)(BgL_restz00_1441); 
BgL_method2692z00_1431 = 
VECTOR_REF(BgL_bucketz00_1443,BgL_kz00_1455); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1431)(BgL_method2692z00_1431, 
(obj_t)(BgL_arg3233z00_1428), BEOA);} } } } 
}



/* spread-obj-node!-extern2702 */
obj_t BGl_spreadzd2objzd2nodez12zd2extern2702zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2060, obj_t BgL_nodez00_2061)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 91 */
{ 
BgL_externz00_bglt BgL_nodez00_1127;
BgL_nodez00_1127 = 
(BgL_externz00_bglt)(BgL_nodez00_2061); 
{ /* ./Bdb/spread-obj.scm 92 */
obj_t BgL_arg3223z00_1426;
BgL_arg3223z00_1426 = 
(((BgL_externz00_bglt)CREF(BgL_nodez00_1127))->BgL_exprza2za2); 
return 
BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2(BgL_arg3223z00_1426);} } } 
}



/* spread-obj-node!-funcall2700 */
obj_t BGl_spreadzd2objzd2nodez12zd2funcall2700zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2062, obj_t BgL_nodez00_2063)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 83 */
{ 
BgL_funcallz00_bglt BgL_nodez00_1119;
BgL_nodez00_1119 = 
(BgL_funcallz00_bglt)(BgL_nodez00_2063); 
{ /* ./Bdb/spread-obj.scm 85 */
BgL_nodez00_bglt BgL_arg3208z00_1123;
BgL_arg3208z00_1123 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1119))->BgL_funz00); 
{ /* ./Bdb/spread-obj.scm 85 */
obj_t BgL_method2692z00_1400;
{ /* ./Bdb/spread-obj.scm 85 */
BgL_objectz00_bglt BgL_objz00_1401;
BgL_objz00_1401 = 
(BgL_objectz00_bglt)(BgL_arg3208z00_1123); 
{ /* ./Bdb/spread-obj.scm 85 */
long BgL_objzd2classzd2numz00_1402;
BgL_objzd2classzd2numz00_1402 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1401); 
{ /* ./Bdb/spread-obj.scm 85 */
obj_t BgL_arg2017z00_1403;
{ /* ./Bdb/spread-obj.scm 85 */
int BgL_auxz00_2804;
BgL_auxz00_2804 = 
(int)(((long)1)); 
BgL_arg2017z00_1403 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2804); } 
{ /* ./Bdb/spread-obj.scm 85 */
int BgL_offsetz00_1406;
BgL_offsetz00_1406 = 
(int)(BgL_objzd2classzd2numz00_1402); 
{ /* ./Bdb/spread-obj.scm 85 */
long BgL_offsetz00_1407;
{ /* ./Bdb/spread-obj.scm 85 */
long BgL_auxz00_2808;
BgL_auxz00_2808 = 
(long)(BgL_offsetz00_1406); 
BgL_offsetz00_1407 = 
(BgL_auxz00_2808-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 85 */
long BgL_modz00_1408;
{ /* ./Bdb/spread-obj.scm 85 */
int BgL_arg2028z00_1409;
BgL_arg2028z00_1409 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 85 */
long BgL_n2z00_1417;
BgL_n2z00_1417 = 
(long)(BgL_arg2028z00_1409); 
BgL_modz00_1408 = 
(BgL_offsetz00_1407/BgL_n2z00_1417); } } 
{ /* ./Bdb/spread-obj.scm 85 */
long BgL_restz00_1410;
{ /* ./Bdb/spread-obj.scm 85 */
int BgL_arg2024z00_1411;
BgL_arg2024z00_1411 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 85 */
long BgL_n2z00_1420;
BgL_n2z00_1420 = 
(long)(BgL_arg2024z00_1411); 
BgL_restz00_1410 = 
(BgL_offsetz00_1407%BgL_n2z00_1420); } } 
{ /* ./Bdb/spread-obj.scm 85 */

{ /* ./Bdb/spread-obj.scm 85 */
obj_t BgL_bucketz00_1412;
{ /* ./Bdb/spread-obj.scm 85 */
int BgL_kz00_1422;
BgL_kz00_1422 = 
(int)(BgL_modz00_1408); 
BgL_bucketz00_1412 = 
VECTOR_REF(BgL_arg2017z00_1403,BgL_kz00_1422); } 
{ /* ./Bdb/spread-obj.scm 85 */
int BgL_kz00_1424;
BgL_kz00_1424 = 
(int)(BgL_restz00_1410); 
BgL_method2692z00_1400 = 
VECTOR_REF(BgL_bucketz00_1412,BgL_kz00_1424); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1400)(BgL_method2692z00_1400, 
(obj_t)(BgL_arg3208z00_1123), BEOA); } } 
{ /* ./Bdb/spread-obj.scm 86 */
obj_t BgL_arg3213z00_1124;
BgL_arg3213z00_1124 = 
(((BgL_funcallz00_bglt)CREF(BgL_nodez00_1119))->BgL_argsz00); 
return 
BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2(BgL_arg3213z00_1124);} } } 
}



/* spread-obj-node!-app-ly2698 */
obj_t BGl_spreadzd2objzd2nodez12zd2appzd2ly2698z12zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2064, obj_t BgL_nodez00_2065)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 75 */
{ 
BgL_appzd2lyzd2_bglt BgL_nodez00_1111;
BgL_nodez00_1111 = 
(BgL_appzd2lyzd2_bglt)(BgL_nodez00_2065); 
{ /* ./Bdb/spread-obj.scm 77 */
BgL_nodez00_bglt BgL_arg3194z00_1115;
BgL_arg3194z00_1115 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1111))->BgL_funz00); 
{ /* ./Bdb/spread-obj.scm 77 */
obj_t BgL_method2692z00_1346;
{ /* ./Bdb/spread-obj.scm 77 */
BgL_objectz00_bglt BgL_objz00_1347;
BgL_objz00_1347 = 
(BgL_objectz00_bglt)(BgL_arg3194z00_1115); 
{ /* ./Bdb/spread-obj.scm 77 */
long BgL_objzd2classzd2numz00_1348;
BgL_objzd2classzd2numz00_1348 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1347); 
{ /* ./Bdb/spread-obj.scm 77 */
obj_t BgL_arg2017z00_1349;
{ /* ./Bdb/spread-obj.scm 77 */
int BgL_auxz00_2830;
BgL_auxz00_2830 = 
(int)(((long)1)); 
BgL_arg2017z00_1349 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2830); } 
{ /* ./Bdb/spread-obj.scm 77 */
int BgL_offsetz00_1352;
BgL_offsetz00_1352 = 
(int)(BgL_objzd2classzd2numz00_1348); 
{ /* ./Bdb/spread-obj.scm 77 */
long BgL_offsetz00_1353;
{ /* ./Bdb/spread-obj.scm 77 */
long BgL_auxz00_2834;
BgL_auxz00_2834 = 
(long)(BgL_offsetz00_1352); 
BgL_offsetz00_1353 = 
(BgL_auxz00_2834-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 77 */
long BgL_modz00_1354;
{ /* ./Bdb/spread-obj.scm 77 */
int BgL_arg2028z00_1355;
BgL_arg2028z00_1355 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 77 */
long BgL_n2z00_1363;
BgL_n2z00_1363 = 
(long)(BgL_arg2028z00_1355); 
BgL_modz00_1354 = 
(BgL_offsetz00_1353/BgL_n2z00_1363); } } 
{ /* ./Bdb/spread-obj.scm 77 */
long BgL_restz00_1356;
{ /* ./Bdb/spread-obj.scm 77 */
int BgL_arg2024z00_1357;
BgL_arg2024z00_1357 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 77 */
long BgL_n2z00_1366;
BgL_n2z00_1366 = 
(long)(BgL_arg2024z00_1357); 
BgL_restz00_1356 = 
(BgL_offsetz00_1353%BgL_n2z00_1366); } } 
{ /* ./Bdb/spread-obj.scm 77 */

{ /* ./Bdb/spread-obj.scm 77 */
obj_t BgL_bucketz00_1358;
{ /* ./Bdb/spread-obj.scm 77 */
int BgL_kz00_1368;
BgL_kz00_1368 = 
(int)(BgL_modz00_1354); 
BgL_bucketz00_1358 = 
VECTOR_REF(BgL_arg2017z00_1349,BgL_kz00_1368); } 
{ /* ./Bdb/spread-obj.scm 77 */
int BgL_kz00_1370;
BgL_kz00_1370 = 
(int)(BgL_restz00_1356); 
BgL_method2692z00_1346 = 
VECTOR_REF(BgL_bucketz00_1358,BgL_kz00_1370); } } } } } } } } } } 
PROCEDURE_ENTRY(BgL_method2692z00_1346)(BgL_method2692z00_1346, 
(obj_t)(BgL_arg3194z00_1115), BEOA); } } 
{ /* ./Bdb/spread-obj.scm 78 */
BgL_nodez00_bglt BgL_arg3198z00_1116;
BgL_arg3198z00_1116 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_nodez00_1111))->BgL_argz00); 
{ /* ./Bdb/spread-obj.scm 78 */
obj_t BgL_method2692z00_1373;
{ /* ./Bdb/spread-obj.scm 78 */
BgL_objectz00_bglt BgL_objz00_1374;
BgL_objz00_1374 = 
(BgL_objectz00_bglt)(BgL_arg3198z00_1116); 
{ /* ./Bdb/spread-obj.scm 78 */
long BgL_objzd2classzd2numz00_1375;
BgL_objzd2classzd2numz00_1375 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1374); 
{ /* ./Bdb/spread-obj.scm 78 */
obj_t BgL_arg2017z00_1376;
{ /* ./Bdb/spread-obj.scm 78 */
int BgL_auxz00_2853;
BgL_auxz00_2853 = 
(int)(((long)1)); 
BgL_arg2017z00_1376 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2853); } 
{ /* ./Bdb/spread-obj.scm 78 */
int BgL_offsetz00_1379;
BgL_offsetz00_1379 = 
(int)(BgL_objzd2classzd2numz00_1375); 
{ /* ./Bdb/spread-obj.scm 78 */
long BgL_offsetz00_1380;
{ /* ./Bdb/spread-obj.scm 78 */
long BgL_auxz00_2857;
BgL_auxz00_2857 = 
(long)(BgL_offsetz00_1379); 
BgL_offsetz00_1380 = 
(BgL_auxz00_2857-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 78 */
long BgL_modz00_1381;
{ /* ./Bdb/spread-obj.scm 78 */
int BgL_arg2028z00_1382;
BgL_arg2028z00_1382 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 78 */
long BgL_n2z00_1390;
BgL_n2z00_1390 = 
(long)(BgL_arg2028z00_1382); 
BgL_modz00_1381 = 
(BgL_offsetz00_1380/BgL_n2z00_1390); } } 
{ /* ./Bdb/spread-obj.scm 78 */
long BgL_restz00_1383;
{ /* ./Bdb/spread-obj.scm 78 */
int BgL_arg2024z00_1384;
BgL_arg2024z00_1384 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 78 */
long BgL_n2z00_1393;
BgL_n2z00_1393 = 
(long)(BgL_arg2024z00_1384); 
BgL_restz00_1383 = 
(BgL_offsetz00_1380%BgL_n2z00_1393); } } 
{ /* ./Bdb/spread-obj.scm 78 */

{ /* ./Bdb/spread-obj.scm 78 */
obj_t BgL_bucketz00_1385;
{ /* ./Bdb/spread-obj.scm 78 */
int BgL_kz00_1395;
BgL_kz00_1395 = 
(int)(BgL_modz00_1381); 
BgL_bucketz00_1385 = 
VECTOR_REF(BgL_arg2017z00_1376,BgL_kz00_1395); } 
{ /* ./Bdb/spread-obj.scm 78 */
int BgL_kz00_1397;
BgL_kz00_1397 = 
(int)(BgL_restz00_1383); 
BgL_method2692z00_1373 = 
VECTOR_REF(BgL_bucketz00_1385,BgL_kz00_1397); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1373)(BgL_method2692z00_1373, 
(obj_t)(BgL_arg3198z00_1116), BEOA);} } } } 
}



/* spread-obj-node!-app2696 */
obj_t BGl_spreadzd2objzd2nodez12zd2app2696zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2066, obj_t BgL_nodez00_2067)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 69 */
{ 
BgL_appz00_bglt BgL_nodez00_1105;
BgL_nodez00_1105 = 
(BgL_appz00_bglt)(BgL_nodez00_2067); 
{ /* ./Bdb/spread-obj.scm 70 */
obj_t BgL_arg3184z00_1342;
BgL_arg3184z00_1342 = 
(((BgL_appz00_bglt)CREF(BgL_nodez00_1105))->BgL_argsz00); 
return 
BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2(BgL_arg3184z00_1342);} } } 
}



/* spread-obj-node!-sequence2694 */
obj_t BGl_spreadzd2objzd2nodez12zd2sequence2694zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2068, obj_t BgL_nodez00_2069)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 63 */
{ 
BgL_sequencez00_bglt BgL_nodez00_1099;
BgL_nodez00_1099 = 
(BgL_sequencez00_bglt)(BgL_nodez00_2069); 
{ /* ./Bdb/spread-obj.scm 64 */
obj_t BgL_arg3174z00_1340;
BgL_arg3174z00_1340 = 
(((BgL_sequencez00_bglt)CREF(BgL_nodez00_1099))->BgL_nodesz00); 
return 
BGl_spreadzd2objzd2nodeza2z12zb0zzbdb_spreadzd2objzd2(BgL_arg3174z00_1340);} } } 
}



/* spread-obj-node! */
obj_t BGl_spreadzd2objzd2nodez12z12zzbdb_spreadzd2objzd2(BgL_nodez00_bglt BgL_nodez00_3)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 57 */
{ /* ./Bdb/spread-obj.scm 57 */
obj_t BgL_method2692z00_1990;
{ /* ./Bdb/spread-obj.scm 57 */
BgL_objectz00_bglt BgL_objz00_1991;
BgL_objz00_1991 = 
(BgL_objectz00_bglt)(BgL_nodez00_3); 
{ /* ./Bdb/spread-obj.scm 57 */
long BgL_objzd2classzd2numz00_1992;
BgL_objzd2classzd2numz00_1992 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_1991); 
{ /* ./Bdb/spread-obj.scm 57 */
obj_t BgL_arg2017z00_1993;
{ /* ./Bdb/spread-obj.scm 57 */
int BgL_auxz00_2882;
BgL_auxz00_2882 = 
(int)(((long)1)); 
BgL_arg2017z00_1993 = 
PROCEDURE_REF(BGl_spreadzd2objzd2nodez12zd2envzc0zzbdb_spreadzd2objzd2, BgL_auxz00_2882); } 
{ /* ./Bdb/spread-obj.scm 57 */
int BgL_offsetz00_1996;
BgL_offsetz00_1996 = 
(int)(BgL_objzd2classzd2numz00_1992); 
{ /* ./Bdb/spread-obj.scm 57 */
long BgL_offsetz00_1997;
{ /* ./Bdb/spread-obj.scm 57 */
long BgL_auxz00_2886;
BgL_auxz00_2886 = 
(long)(BgL_offsetz00_1996); 
BgL_offsetz00_1997 = 
(BgL_auxz00_2886-OBJECT_TYPE); } 
{ /* ./Bdb/spread-obj.scm 57 */
long BgL_modz00_1998;
{ /* ./Bdb/spread-obj.scm 57 */
int BgL_arg2028z00_1999;
BgL_arg2028z00_1999 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 57 */
long BgL_n2z00_2007;
BgL_n2z00_2007 = 
(long)(BgL_arg2028z00_1999); 
BgL_modz00_1998 = 
(BgL_offsetz00_1997/BgL_n2z00_2007); } } 
{ /* ./Bdb/spread-obj.scm 57 */
long BgL_restz00_2000;
{ /* ./Bdb/spread-obj.scm 57 */
int BgL_arg2024z00_2001;
BgL_arg2024z00_2001 = 
(int)(((long)8)); 
{ /* ./Bdb/spread-obj.scm 57 */
long BgL_n2z00_2010;
BgL_n2z00_2010 = 
(long)(BgL_arg2024z00_2001); 
BgL_restz00_2000 = 
(BgL_offsetz00_1997%BgL_n2z00_2010); } } 
{ /* ./Bdb/spread-obj.scm 57 */

{ /* ./Bdb/spread-obj.scm 57 */
obj_t BgL_bucketz00_2002;
{ /* ./Bdb/spread-obj.scm 57 */
int BgL_kz00_2012;
BgL_kz00_2012 = 
(int)(BgL_modz00_1998); 
BgL_bucketz00_2002 = 
VECTOR_REF(BgL_arg2017z00_1993,BgL_kz00_2012); } 
{ /* ./Bdb/spread-obj.scm 57 */
int BgL_kz00_2014;
BgL_kz00_2014 = 
(int)(BgL_restz00_2000); 
BgL_method2692z00_1990 = 
VECTOR_REF(BgL_bucketz00_2002,BgL_kz00_2014); } } } } } } } } } } 
return 
PROCEDURE_ENTRY(BgL_method2692z00_1990)(BgL_method2692z00_1990, 
(obj_t)(BgL_nodez00_3), BEOA);} } 
}



/* _spread-obj-node! */
obj_t BGl__spreadzd2objzd2nodez12z12zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2017, obj_t BgL_nodez00_2018)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 57 */
return 
BGl_spreadzd2objzd2nodez12z12zzbdb_spreadzd2objzd2(
(BgL_nodez00_bglt)(BgL_nodez00_2018));} 
}



/* _spread-obj-node!-default2691 */
obj_t BGl__spreadzd2objzd2nodez12zd2default2691zc0zzbdb_spreadzd2objzd2(obj_t BgL_envz00_2070, obj_t BgL_nodez00_2071)
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 15 */
{ /* ./Bdb/spread-obj.scm 58 */
BgL_nodez00_bglt BgL_auxz00_2904;
BgL_auxz00_2904 = 
(BgL_nodez00_bglt)(BgL_nodez00_2071); 
return 
(obj_t)(BgL_auxz00_2904);} } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzbdb_spreadzd2objzd2()
{ AN_OBJECT;
{ /* ./Bdb/spread-obj.scm 15 */
BGl_modulezd2initializa7ationz75zztools_speekz00(((long)23537), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zztools_errorz00(((long)25566), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zzengine_passz00(((long)10268), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zztools_shapez00(((long)30833), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zztools_miscz00(((long)64117), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zztype_envz00(((long)25186), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zztype_cachez00(((long)25848), "bdb_spread-obj"); 
BGl_modulezd2initializa7ationz75zzast_sexpz00(((long)15705), "bdb_spread-obj"); 
return 
BGl_modulezd2initializa7ationz75zzengine_paramz00(((long)14260), "bdb_spread-obj");} 
}

