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

#include <bigloo.h>


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

typedef struct BgL_sfunzf2ginfozf2_bgl {
   bool_t BgL_gzf3zf3;
   obj_t BgL_cfromz00;
   obj_t BgL_cfromza2za2;
   obj_t BgL_ctoz00;
   obj_t BgL_ctoza2za2;
   obj_t BgL_cfunctionz00;
   obj_t BgL_integratorz00;
   obj_t BgL_imarkz00;
   obj_t BgL_ownerz00;
   obj_t BgL_integratedz00;
   obj_t BgL_pluggedzd2inzd2;
   long BgL_markz00;
   obj_t BgL_freezd2markzd2;
   obj_t BgL_thezd2globalzd2;
   obj_t BgL_kapturedz00;
   obj_t BgL_newzd2bodyzd2;
   long BgL_bmarkz00;
   long BgL_umarkz00;
   obj_t BgL_freez00;
   obj_t BgL_boundz00;
} *BgL_sfunzf2ginfozf2_bglt;

typedef struct BgL_svarzf2ginfozf2_bgl {
   bool_t BgL_kapturedzf3zf3;
   long BgL_freezd2markzd2;
   long BgL_markz00;
   bool_t BgL_celledzf3zf3;
} *BgL_svarzf2ginfozf2_bglt;

typedef struct BgL_sexitzf2ginfozf2_bgl {
   bool_t BgL_gzf3zf3;
   bool_t BgL_kapturedzf3zf3;
   long BgL_freezd2markzd2;
   long BgL_markz00;
} *BgL_sexitzf2ginfozf2_bglt;

typedef struct BgL_localzf2ginfozf2_bgl {
   bool_t BgL_escapezf3zf3;
} *BgL_localzf2ginfozf2_bglt;

typedef struct BgL_globalzf2ginfozf2_bgl {
   bool_t BgL_escapezf3zf3;
   obj_t BgL_globalzd2closurezd2;
} *BgL_globalzf2ginfozf2_bglt;


static obj_t BGl__fillzd2globalzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_svarzf2ginfozf2_bglt BGl_makezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, bool_t, long, long, bool_t);
static obj_t BGl_methodzd2initzd2zzglobaliza7e_ginfoza7();
BGL_EXPORTED_DECL bool_t BGl_svarzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t);
static obj_t BGl__globalzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t, obj_t);
BGL_IMPORT obj_t open_input_string(obj_t);
BGL_IMPORT long BGl_classzd2numzd2zz__objectz00(obj_t);
extern obj_t BGl_sfunz00zzast_varz00;
BGL_EXPORTED_DECL BgL_sfunzf2ginfozf2_bglt BGl_wideningzd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t, obj_t, long, long, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_globalzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
static obj_t BGl__sexitzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t, obj_t);
static obj_t BGl__wideningzd2sfunzf2Ginfo4091z20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_objectzd2ze3structz31zz__objectz00(BgL_objectz00_bglt);
static obj_t BGl__makezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_svarz00zzast_varz00;
BGL_IMPORT obj_t BGl_registerzd2classz12zc0zz__objectz00(obj_t, obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__wideningzd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t);
extern obj_t BGl_globalz00zzast_varz00;
BGL_EXPORTED_DECL bool_t BGl_sexitzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t);
static obj_t BGl_objectzd2ze3structzd2globalzf2Ginfo3117z11zzglobaliza7e_ginfoza7(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7 = BUNSPEC;
BGL_EXPORTED_DECL BgL_sfunzf2ginfozf2_bglt BGl_fillzd2sfunzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_sfunzf2ginfozf2_bglt, bool_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t, obj_t, long, long, obj_t, obj_t);
extern obj_t BGl_sexitz00zzast_varz00;
static obj_t BGl_cnstzd2initzd2zzglobaliza7e_ginfoza7();
BGL_EXPORTED_DEF obj_t BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_sfunzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t);
static obj_t BGl_objectzd2ze3structzd2svarzf2Ginfo3130z11zzglobaliza7e_ginfoza7(obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2sexitzf2Ginfo3127za3zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_sexitzf2ginfozf2_bglt BGl_fillzd2sexitzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_sexitzf2ginfozf2_bglt, bool_t, bool_t, long, long);
static obj_t BGl__svarzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t, obj_t);
static obj_t BGl__wideningzd2sexitzf2Ginfo4081z20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzglobaliza7e_ginfoza7();
BGL_IMPORT obj_t make_struct(obj_t, int, obj_t);
BGL_EXPORTED_DECL BgL_svarzf2ginfozf2_bglt BGl_fillzd2svarzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_svarzf2ginfozf2_bglt, bool_t, long, long, bool_t);
BGL_EXPORTED_DECL BgL_svarz00_bglt BGl_allocatezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7();
static obj_t BGl__makezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t);
static obj_t BGl_objectzd2ze3structzd2sexitzf2Ginfo3125z11zzglobaliza7e_ginfoza7(obj_t, obj_t);
static obj_t BGl__fillzd2localzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2localzf2Ginfo3123za3zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7 = BUNSPEC;
extern BgL_sexitz00_bglt BGl_makezd2sexitzd2zzast_varz00(obj_t, bool_t);
static obj_t BGl_toplevelzd2initzd2zzglobaliza7e_ginfoza7();
BGL_EXPORTED_DEF obj_t BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7 = BUNSPEC;
BGL_EXPORTED_DECL BgL_svarzf2ginfozf2_bglt BGl_wideningzd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t, long, long, bool_t);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzglobaliza7e_ginfoza7(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 *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
static obj_t BGl__makezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t);
static obj_t BGl__allocatezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t);
BGL_EXPORTED_DECL BgL_sfunzf2ginfozf2_bglt BGl_makezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(long, obj_t, obj_t, obj_t, bool_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, bool_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t, obj_t, long, long, obj_t, obj_t);
BGL_IMPORT BgL_objectz00_bglt BGl_structzb2objectzd2ze3objectz83zz__objectz00(BgL_objectz00_bglt, obj_t);
extern BgL_globalz00_bglt BGl_makezd2globalzd2zzast_varz00(obj_t, obj_t, BgL_typez00_bglt, BgL_valuez00_bglt, obj_t, obj_t, obj_t, long, obj_t, obj_t, bool_t, bool_t, bool_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t);
BGL_EXPORTED_DECL BgL_localz00_bglt BGl_allocatezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7();
static obj_t BGl__wideningzd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_sexitzf2ginfozf2_bglt BGl_makezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, bool_t, bool_t, bool_t, long, long);
static obj_t BGl__localzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_sexitz00_bglt BGl_allocatezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7();
static obj_t BGl__wideningzd2svarzf2Ginfo4086z20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_localzf2ginfozf2_bglt BGl_wideningzd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t);
BGL_EXPORTED_DECL BgL_localzf2ginfozf2_bglt BGl_makezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, BgL_typez00_bglt, BgL_valuez00_bglt, obj_t, obj_t, obj_t, long, bool_t, long, bool_t);
static obj_t BGl__fillzd2sfunzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2sfunzf2Ginfo3135z11zzglobaliza7e_ginfoza7(obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2svarzf2Ginfo3132za3zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_globalzf2ginfozf2_bglt BGl_wideningzd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t, obj_t);
BGL_EXPORTED_DECL BgL_sexitzf2ginfozf2_bglt BGl_wideningzd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t, bool_t, long, long);
BGL_EXPORTED_DECL bool_t BGl_localzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t);
extern obj_t BGl_localz00zzast_varz00;
BGL_EXPORTED_DECL BgL_localzf2ginfozf2_bglt BGl_fillzd2localzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_localzf2ginfozf2_bglt, bool_t);
BGL_EXPORTED_DECL BgL_globalzf2ginfozf2_bglt BGl_makezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, BgL_typez00_bglt, BgL_valuez00_bglt, obj_t, obj_t, obj_t, long, obj_t, obj_t, bool_t, bool_t, bool_t, obj_t, obj_t, obj_t, bool_t, obj_t);
BGL_EXPORTED_DECL BgL_sfunz00_bglt BGl_allocatezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7();
static obj_t BGl__allocatezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t);
static obj_t BGl_objectzd2ze3structzd2localzf2Ginfo3121z11zzglobaliza7e_ginfoza7(obj_t, obj_t);
static obj_t BGl__makezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2sfunzf2Ginfo3137za3zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t);
static obj_t BGl__fillzd2sexitzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2initzd2zzglobaliza7e_ginfoza7();
extern BgL_sfunz00_bglt BGl_makezd2sfunzd2zzast_varz00(long, obj_t, obj_t, obj_t, bool_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_globalzf2ginfozf2_bglt BGl_fillzd2globalzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_globalzf2ginfozf2_bglt, bool_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7 = BUNSPEC;
static obj_t BGl_requirezd2initializa7ationz75zzglobaliza7e_ginfoza7 = BUNSPEC;
static obj_t BGl__fillzd2svarzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
extern BgL_localz00_bglt BGl_makezd2localzd2zzast_varz00(obj_t, obj_t, BgL_typez00_bglt, BgL_valuez00_bglt, obj_t, obj_t, obj_t, long, bool_t, long);
static obj_t BGl_structzb2objectzd2ze3objectzd2globalzf2Ginfo3119za3zzglobaliza7e_ginfoza7(obj_t, obj_t, obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzglobaliza7e_ginfoza7();
extern BgL_svarz00_bglt BGl_makezd2svarzd2zzast_varz00(obj_t);
BGL_EXPORTED_DECL BgL_globalz00_bglt BGl_allocatezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7();
BGL_IMPORT obj_t BGl_findzd2superzd2classzd2methodzd2zz__objectz00(BgL_objectz00_bglt, obj_t, obj_t);
static obj_t BGl__sfunzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t, obj_t);
static obj_t __cnst[ 5 ] ;


DEFINE_EXPORT_PROCEDURE( BGl_globalzf2Ginfozf3zd2envzd3zzglobaliza7e_ginfoza7, BgL_bgl__globalza7f2ginfoza7f3za701za7za7globaliza7a7e_ginfoza7a74519za7, BGl__globalzf2Ginfozf3z01zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_svarzf2Ginfozf3zd2envzd3zzglobaliza7e_ginfoza7, BgL_bgl__svarza7f2ginfoza7f3za701za7za7globaliza7a7e_ginfoza7a74520za7, BGl__svarzf2Ginfozf3z01zzglobaliza7e_ginfoza7, 0L, 1 );
BGL_IMPORT obj_t BGl_objectzd2ze3structzd2envze3zz__objectz00;
DEFINE_EXPORT_PROCEDURE( BGl_makezd2globalzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__makeza7d2globalza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74521za7, BGl__makezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 18 );
DEFINE_EXPORT_PROCEDURE( BGl_wideningzd2sexitzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__wideningza7d2sexitza7f2ginfo4081za720za7za7globaliza7a7e_ginfoza7a74522za7, BGl__wideningzd2sexitzf2Ginfo4081z20zzglobaliza7e_ginfoza7, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_sexitzf2Ginfozf3zd2envzd3zzglobaliza7e_ginfoza7, BgL_bgl__sexitza7f2ginfoza7f3za701za7za7globaliza7a7e_ginfoza7a74523za7, BGl__sexitzf2Ginfozf3z01zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2globalzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__allocateza7d2globalza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74524za7, BGl__allocatezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 0 );
DEFINE_STATIC_PROCEDURE( BGl_proc4472z00zzglobaliza7e_ginfoza7, BgL_bgl_objectza7d2za7e3structza7d2globalza7f2ginfo3117za711za7za7globaliza7a7e_ginfoza7a74525za7, BGl_objectzd2ze3structzd2globalzf2Ginfo3117z11zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4473z00zzglobaliza7e_ginfoza7, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2globalza7f2ginfo3119za7a3za7za7globaliza7a7e_ginfoza7a74526z00, BGl_structzb2objectzd2ze3objectzd2globalzf2Ginfo3119za3zzglobaliza7e_ginfoza7, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc4474z00zzglobaliza7e_ginfoza7, BgL_bgl_objectza7d2za7e3structza7d2localza7f2ginfo3121za711za7za7globaliza7a7e_ginfoza7a74527za7, BGl_objectzd2ze3structzd2localzf2Ginfo3121z11zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4475z00zzglobaliza7e_ginfoza7, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2localza7f2ginfo3123za7a3za7za7globaliza7a7e_ginfoza7a74528z00, BGl_structzb2objectzd2ze3objectzd2localzf2Ginfo3123za3zzglobaliza7e_ginfoza7, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc4476z00zzglobaliza7e_ginfoza7, BgL_bgl_objectza7d2za7e3structza7d2sexitza7f2ginfo3125za711za7za7globaliza7a7e_ginfoza7a74529za7, BGl_objectzd2ze3structzd2sexitzf2Ginfo3125z11zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4477z00zzglobaliza7e_ginfoza7, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2sexitza7f2ginfo3127za7a3za7za7globaliza7a7e_ginfoza7a74530z00, BGl_structzb2objectzd2ze3objectzd2sexitzf2Ginfo3127za3zzglobaliza7e_ginfoza7, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc4478z00zzglobaliza7e_ginfoza7, BgL_bgl_objectza7d2za7e3structza7d2svarza7f2ginfo3130za711za7za7globaliza7a7e_ginfoza7a74531za7, BGl_objectzd2ze3structzd2svarzf2Ginfo3130z11zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4480z00zzglobaliza7e_ginfoza7, BgL_bgl_objectza7d2za7e3structza7d2sfunza7f2ginfo3135za711za7za7globaliza7a7e_ginfoza7a74532za7, BGl_objectzd2ze3structzd2sfunzf2Ginfo3135z11zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4479z00zzglobaliza7e_ginfoza7, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2svarza7f2ginfo3132za7a3za7za7globaliza7a7e_ginfoza7a74533z00, BGl_structzb2objectzd2ze3objectzd2svarzf2Ginfo3132za3zzglobaliza7e_ginfoza7, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc4481z00zzglobaliza7e_ginfoza7, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2sfunza7f2ginfo3137za7a3za7za7globaliza7a7e_ginfoza7a74534z00, BGl_structzb2objectzd2ze3objectzd2sfunzf2Ginfo3137za3zzglobaliza7e_ginfoza7, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2localzf2Ginfoz12zd2envze0zzglobaliza7e_ginfoza7, BgL_bgl__fillza7d2localza7f2ginfoza712za732za7za7globaliza7a7e_ginfoza7a74535z00, BGl__fillzd2localzf2Ginfoz12z32zzglobaliza7e_ginfoza7, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_wideningzd2svarzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__wideningza7d2svarza7f2ginfo4086za720za7za7globaliza7a7e_ginfoza7a74536za7, BGl__wideningzd2svarzf2Ginfo4086z20zzglobaliza7e_ginfoza7, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2sexitzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__makeza7d2sexitza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74537za7, BGl__makezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 6 );
DEFINE_STRING( BGl_string4482z00zzglobaliza7e_ginfoza7, BgL_bgl_string4482za700za7za7globaliza7a7e_ginfoza7a74538za7, "global/Ginfo local/Ginfo sexit/Ginfo svar/Ginfo sfun/Ginfo ", 59 );
DEFINE_EXPORT_PROCEDURE( BGl_localzf2Ginfozf3zd2envzd3zzglobaliza7e_ginfoza7, BgL_bgl__localza7f2ginfoza7f3za701za7za7globaliza7a7e_ginfoza7a74539za7, BGl__localzf2Ginfozf3z01zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2sexitzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__allocateza7d2sexitza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74540za7, BGl__allocatezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_sfunzf2Ginfozf3zd2envzd3zzglobaliza7e_ginfoza7, BgL_bgl__sfunza7f2ginfoza7f3za701za7za7globaliza7a7e_ginfoza7a74541za7, BGl__sfunzf2Ginfozf3z01zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2sexitzf2Ginfoz12zd2envze0zzglobaliza7e_ginfoza7, BgL_bgl__fillza7d2sexitza7f2ginfoza712za732za7za7globaliza7a7e_ginfoza7a74542z00, BGl__fillzd2sexitzf2Ginfoz12z32zzglobaliza7e_ginfoza7, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2sfunzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__allocateza7d2sfunza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74543za7, BGl__allocatezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2sfunzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__makeza7d2sfunza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74544za7, BGl__makezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 33 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2globalzf2Ginfoz12zd2envze0zzglobaliza7e_ginfoza7, BgL_bgl__fillza7d2globalza7f2ginfoza712za732za7za7globaliza7a7e_ginfoza7a74545z00, BGl__fillzd2globalzf2Ginfoz12z32zzglobaliza7e_ginfoza7, 0L, 3 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2svarzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__makeza7d2svarza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74546za7, BGl__makezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2svarzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__allocateza7d2svarza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74547za7, BGl__allocatezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2svarzf2Ginfoz12zd2envze0zzglobaliza7e_ginfoza7, BgL_bgl__fillza7d2svarza7f2ginfoza712za732za7za7globaliza7a7e_ginfoza7a74548z00, BGl__fillzd2svarzf2Ginfoz12z32zzglobaliza7e_ginfoza7, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2localzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__allocateza7d2localza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74549za7, BGl__allocatezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2localzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__makeza7d2localza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74550za7, BGl__makezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 11 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2sfunzf2Ginfoz12zd2envze0zzglobaliza7e_ginfoza7, BgL_bgl__fillza7d2sfunza7f2ginfoza712za732za7za7globaliza7a7e_ginfoza7a74551z00, BGl__fillzd2sfunzf2Ginfoz12z32zzglobaliza7e_ginfoza7, 0L, 21 );
DEFINE_EXPORT_PROCEDURE( BGl_wideningzd2globalzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__wideningza7d2globalza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74552za7, BGl__wideningzd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 2 );
BGL_IMPORT obj_t BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00;
DEFINE_EXPORT_PROCEDURE( BGl_wideningzd2localzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__wideningza7d2localza7f2ginfoza720za7za7globaliza7a7e_ginfoza7a74553za7, BGl__wideningzd2localzf2Ginfoz20zzglobaliza7e_ginfoza7, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_wideningzd2sfunzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, BgL_bgl__wideningza7d2sfunza7f2ginfo4091za720za7za7globaliza7a7e_ginfoza7a74554za7, BGl__wideningzd2sfunzf2Ginfo4091z20zzglobaliza7e_ginfoza7, 0L, 20 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzglobaliza7e_ginfoza7(long BgL_checksumz00_2603, char * BgL_fromz00_2604)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzglobaliza7e_ginfoza7))
{ 
BGl_requirezd2initializa7ationz75zzglobaliza7e_ginfoza7 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzglobaliza7e_ginfoza7(); 
BGl_cnstzd2initzd2zzglobaliza7e_ginfoza7(); 
BGl_importedzd2moduleszd2initz00zzglobaliza7e_ginfoza7(); 
BGl_objectzd2initzd2zzglobaliza7e_ginfoza7(); 
BGl_methodzd2initzd2zzglobaliza7e_ginfoza7(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 15 */
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "globalize_ginfo"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "globalize_ginfo"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 15 */
{ /* ./Globalize/ginfo.scm 15 */
obj_t BgL_cportz00_2443;
BgL_cportz00_2443 = 
open_input_string(BGl_string4482z00zzglobaliza7e_ginfoza7); 
{ 
long BgL_iz00_2444;
BgL_iz00_2444 = ((long)4); 
BgL_loopz00_2445:
{ /* ./Globalize/ginfo.scm 15 */
bool_t BgL_test4484z00_2446;
BgL_test4484z00_2446 = 
(BgL_iz00_2444==((long)-1)); 
if(BgL_test4484z00_2446)
{ /* ./Globalize/ginfo.scm 15 */
return BUNSPEC;}  else 
{ /* ./Globalize/ginfo.scm 15 */
{ /* ./Globalize/ginfo.scm 15 */
obj_t BgL_arg4486z00_2447;
{ /* ./Globalize/ginfo.scm 15 */
obj_t BgL_list4489z00_2448;
BgL_list4489z00_2448 = 
MAKE_PAIR(BgL_cportz00_2443, BNIL); 
BgL_arg4486z00_2447 = 
BGl_readz00zz__readerz00(BgL_list4489z00_2448); } 
{ /* ./Globalize/ginfo.scm 15 */
int BgL_auxz00_2620;
BgL_auxz00_2620 = 
(int)(BgL_iz00_2444); 
CNST_TABLE_SET(BgL_auxz00_2620, BgL_arg4486z00_2447); } } 
{ /* ./Globalize/ginfo.scm 15 */
int BgL_auxz00_2449;
{ /* ./Globalize/ginfo.scm 15 */
long BgL_auxz00_2623;
BgL_auxz00_2623 = 
(BgL_iz00_2444-((long)1)); 
BgL_auxz00_2449 = 
(int)(BgL_auxz00_2623); } 
{ 
long BgL_iz00_2626;
BgL_iz00_2626 = 
(long)(BgL_auxz00_2449); 
BgL_iz00_2444 = BgL_iz00_2626; 
goto BgL_loopz00_2445;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 15 */
return BUNSPEC;} 
}



/* object-init */
obj_t BGl_objectzd2initzd2zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 15 */
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3139z00_911;obj_t BgL_arg3140z00_912;obj_t BgL_arg3144z00_916;
BgL_arg3139z00_911 = 
CNST_TABLE_REF(((long)0)); 
BgL_arg3140z00_912 = BGl_sfunz00zzast_varz00; 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_v3111z00_917;
{ 
int BgL_auxz00_2629;
BgL_auxz00_2629 = 
(int)(((long)0)); 
BgL_v3111z00_917 = 
create_vector(BgL_auxz00_2629); } 
BgL_arg3144z00_916 = BgL_v3111z00_917; } 
BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3139z00_911, BgL_arg3140z00_912, BFALSE, BGl_allocatezd2sfunzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, ((long)6754), BNIL, BFALSE, BgL_arg3144z00_916); } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_arg3148z00_918;obj_t BgL_arg3149z00_919;obj_t BgL_arg3153z00_923;
BgL_arg3148z00_918 = 
CNST_TABLE_REF(((long)1)); 
BgL_arg3149z00_919 = BGl_svarz00zzast_varz00; 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_v3112z00_924;
{ 
int BgL_auxz00_2634;
BgL_auxz00_2634 = 
(int)(((long)0)); 
BgL_v3112z00_924 = 
create_vector(BgL_auxz00_2634); } 
BgL_arg3153z00_923 = BgL_v3112z00_924; } 
BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3148z00_918, BgL_arg3149z00_919, BFALSE, BGl_allocatezd2svarzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, ((long)34704), BNIL, BFALSE, BgL_arg3153z00_923); } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_arg3157z00_925;obj_t BgL_arg3158z00_926;obj_t BgL_arg3162z00_930;
BgL_arg3157z00_925 = 
CNST_TABLE_REF(((long)2)); 
BgL_arg3158z00_926 = BGl_sexitz00zzast_varz00; 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_v3113z00_931;
{ 
int BgL_auxz00_2639;
BgL_auxz00_2639 = 
(int)(((long)0)); 
BgL_v3113z00_931 = 
create_vector(BgL_auxz00_2639); } 
BgL_arg3162z00_930 = BgL_v3113z00_931; } 
BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3157z00_925, BgL_arg3158z00_926, BFALSE, BGl_allocatezd2sexitzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, ((long)7999), BNIL, BFALSE, BgL_arg3162z00_930); } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_arg3166z00_932;obj_t BgL_arg3167z00_933;obj_t BgL_arg3171z00_937;
BgL_arg3166z00_932 = 
CNST_TABLE_REF(((long)3)); 
BgL_arg3167z00_933 = BGl_localz00zzast_varz00; 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_v3114z00_938;
{ 
int BgL_auxz00_2644;
BgL_auxz00_2644 = 
(int)(((long)0)); 
BgL_v3114z00_938 = 
create_vector(BgL_auxz00_2644); } 
BgL_arg3171z00_937 = BgL_v3114z00_938; } 
BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3166z00_932, BgL_arg3167z00_933, BFALSE, BGl_allocatezd2localzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, ((long)6781), BNIL, BFALSE, BgL_arg3171z00_937); } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_arg3175z00_939;obj_t BgL_arg3176z00_940;obj_t BgL_arg3180z00_944;
BgL_arg3175z00_939 = 
CNST_TABLE_REF(((long)4)); 
BgL_arg3176z00_940 = BGl_globalz00zzast_varz00; 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_v3115z00_945;
{ 
int BgL_auxz00_2649;
BgL_auxz00_2649 = 
(int)(((long)0)); 
BgL_v3115z00_945 = 
create_vector(BgL_auxz00_2649); } 
BgL_arg3180z00_944 = BgL_v3115z00_945; } 
BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3175z00_939, BgL_arg3176z00_940, BFALSE, BGl_allocatezd2globalzf2Ginfozd2envzf2zzglobaliza7e_ginfoza7, ((long)19672), BNIL, BFALSE, BgL_arg3180z00_944); } 
return BUNSPEC;} 
}



/* global/Ginfo? */
BGL_EXPORTED_DEF bool_t BGl_globalzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_obj3057z00_1)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3057z00_1, BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7);} 
}



/* _global/Ginfo? */
obj_t BGl__globalzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2238, obj_t BgL_obj3057z00_2239)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_auxz00_2654;
BgL_auxz00_2654 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3057z00_2239, BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7); 
return 
BBOOL(BgL_auxz00_2654);} } 
}



/* widening-global/Ginfo */
BGL_EXPORTED_DEF BgL_globalzf2ginfozf2_bglt BGl_wideningzd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t BgL_escapezf33020zf3_5, obj_t BgL_globalzd2closure3021zd2_6)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3022z00_1558;
BgL_new3022z00_1558 = 
((BgL_globalzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_globalzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_res4037z00_1564;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3046z00_1559;
BgL_new3046z00_1559 = BgL_new3022z00_1558; 
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_escapezf33044zf3_1562;obj_t BgL_globalzd2closure3045zd2_1563;
BgL_escapezf33044zf3_1562 = BgL_escapezf33020zf3_5; 
BgL_globalzd2closure3045zd2_1563 = BgL_globalzd2closure3021zd2_6; 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_1559))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf33044zf3_1562), BUNSPEC); 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_1559))->BgL_globalzd2closurezd2) = ((obj_t)BgL_globalzd2closure3045zd2_1563), BUNSPEC); 
BgL_res4037z00_1564 = BgL_new3046z00_1559; } } BgL_res4037z00_1564; } 
return BgL_new3022z00_1558;} } 
}



/* _widening-global/Ginfo */
obj_t BGl__wideningzd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2240, obj_t BgL_escapezf33020zf3_2241, obj_t BgL_globalzd2closure3021zd2_2242)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_auxz00_2660;
BgL_auxz00_2660 = 
BGl_wideningzd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(
CBOOL(BgL_escapezf33020zf3_2241), BgL_globalzd2closure3021zd2_2242); 
return 
(obj_t)(BgL_auxz00_2660);} } 
}



/* make-global/Ginfo */
BGL_EXPORTED_DEF BgL_globalzf2ginfozf2_bglt BGl_makezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_id3026z00_7, obj_t BgL_name3027z00_8, BgL_typez00_bglt BgL_type3028z00_9, BgL_valuez00_bglt BgL_value3029z00_10, obj_t BgL_access3030z00_11, obj_t BgL_fastzd2alpha3031zd2_12, obj_t BgL_removable3032z00_13, long BgL_occurrence3033z00_14, obj_t BgL_module3034z00_15, obj_t BgL_import3035z00_16, bool_t BgL_evaluablezf33036zf3_17, bool_t BgL_libraryzf33037zf3_18, bool_t BgL_userzf33038zf3_19, obj_t BgL_pragma3039z00_20, obj_t BgL_src3040z00_21, obj_t BgL_jvmzd2typezd2name3041z00_22, bool_t BgL_escapezf33024zf3_23, obj_t BgL_globalzd2closure3025zd2_24)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalz00_bglt BgL_aux3042z00_1565;
BgL_aux3042z00_1565 = 
BGl_makezd2globalzd2zzast_varz00(BgL_id3026z00_7, BgL_name3027z00_8, BgL_type3028z00_9, BgL_value3029z00_10, BgL_access3030z00_11, BgL_fastzd2alpha3031zd2_12, BgL_removable3032z00_13, BgL_occurrence3033z00_14, BgL_module3034z00_15, BgL_import3035z00_16, BgL_evaluablezf33036zf3_17, BgL_libraryzf33037zf3_18, BgL_userzf33038zf3_19, BgL_pragma3039z00_20, BgL_src3040z00_21, BgL_jvmzd2typezd2name3041z00_22); 
{ /* ./Globalize/ginfo.scm 85 */
long BgL_arg3186z00_1566;
BgL_arg3186z00_1566 = 
BGl_classzd2numzd2zz__objectz00(BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_objz00_1569;
BgL_objz00_1569 = 
(BgL_objectz00_bglt)(BgL_aux3042z00_1565); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1569, BgL_arg3186z00_1566); } } 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_arg3190z00_1567;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_res4039z00_1580;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3022z00_1573;
BgL_new3022z00_1573 = 
((BgL_globalzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_globalzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_res4038z00_1579;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3046z00_1574;
BgL_new3046z00_1574 = BgL_new3022z00_1573; 
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_escapezf33044zf3_1577;obj_t BgL_globalzd2closure3045zd2_1578;
BgL_escapezf33044zf3_1577 = BgL_escapezf33024zf3_23; 
BgL_globalzd2closure3045zd2_1578 = BgL_globalzd2closure3025zd2_24; 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_1574))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf33044zf3_1577), BUNSPEC); 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_1574))->BgL_globalzd2closurezd2) = ((obj_t)BgL_globalzd2closure3045zd2_1578), BUNSPEC); 
BgL_res4038z00_1579 = BgL_new3046z00_1574; } } BgL_res4038z00_1579; } 
BgL_res4039z00_1580 = BgL_new3022z00_1573; } 
BgL_arg3190z00_1567 = BgL_res4039z00_1580; } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_auxz00_2673;BgL_objectz00_bglt BgL_auxz00_2671;
BgL_auxz00_2673 = 
(obj_t)(BgL_arg3190z00_1567); 
BgL_auxz00_2671 = 
(BgL_objectz00_bglt)(BgL_aux3042z00_1565); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2671, BgL_auxz00_2673); } } 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3043z00_1568;
{ 
BgL_globalzf2ginfozf2_bglt BgL_auxz00_2676;
BgL_auxz00_2676 = 
(BgL_globalzf2ginfozf2_bglt)(BgL_aux3042z00_1565); 
BgL_new3043z00_1568 = 
((BgL_globalzf2ginfozf2_bglt)BgL_auxz00_2676); } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_objz00_1581;
BgL_objz00_1581 = 
(obj_t)(BgL_new3043z00_1568); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1581); BUNSPEC; } 
return BgL_new3043z00_1568;} } } 
}



/* _make-global/Ginfo */
obj_t BGl__makezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2243, obj_t BgL_id3026z00_2244, obj_t BgL_name3027z00_2245, obj_t BgL_type3028z00_2246, obj_t BgL_value3029z00_2247, obj_t BgL_access3030z00_2248, obj_t BgL_fastzd2alpha3031zd2_2249, obj_t BgL_removable3032z00_2250, obj_t BgL_occurrence3033z00_2251, obj_t BgL_module3034z00_2252, obj_t BgL_import3035z00_2253, obj_t BgL_evaluablezf33036zf3_2254, obj_t BgL_libraryzf33037zf3_2255, obj_t BgL_userzf33038zf3_2256, obj_t BgL_pragma3039z00_2257, obj_t BgL_src3040z00_2258, obj_t BgL_jvmzd2typezd2name3041z00_2259, obj_t BgL_escapezf33024zf3_2260, obj_t BgL_globalzd2closure3025zd2_2261)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_auxz00_2681;
BgL_auxz00_2681 = 
BGl_makezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(BgL_id3026z00_2244, BgL_name3027z00_2245, 
(BgL_typez00_bglt)(BgL_type3028z00_2246), 
(BgL_valuez00_bglt)(BgL_value3029z00_2247), BgL_access3030z00_2248, BgL_fastzd2alpha3031zd2_2249, BgL_removable3032z00_2250, 
(long)CINT(BgL_occurrence3033z00_2251), BgL_module3034z00_2252, BgL_import3035z00_2253, 
CBOOL(BgL_evaluablezf33036zf3_2254), 
CBOOL(BgL_libraryzf33037zf3_2255), 
CBOOL(BgL_userzf33038zf3_2256), BgL_pragma3039z00_2257, BgL_src3040z00_2258, BgL_jvmzd2typezd2name3041z00_2259, 
CBOOL(BgL_escapezf33024zf3_2260), BgL_globalzd2closure3025zd2_2261); 
return 
(obj_t)(BgL_auxz00_2681);} } 
}



/* fill-global/Ginfo! */
BGL_EXPORTED_DEF BgL_globalzf2ginfozf2_bglt BGl_fillzd2globalzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_globalzf2ginfozf2_bglt BgL_new3046z00_25, bool_t BgL_escapezf33044zf3_26, obj_t BgL_globalzd2closure3045zd2_27)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_escapezf33044zf3_2451;obj_t BgL_globalzd2closure3045zd2_2452;
BgL_escapezf33044zf3_2451 = BgL_escapezf33044zf3_26; 
BgL_globalzd2closure3045zd2_2452 = BgL_globalzd2closure3045zd2_27; 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_25))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf33044zf3_2451), BUNSPEC); 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_25))->BgL_globalzd2closurezd2) = ((obj_t)BgL_globalzd2closure3045zd2_2452), BUNSPEC); 
return BgL_new3046z00_25;} } 
}



/* _fill-global/Ginfo! */
obj_t BGl__fillzd2globalzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2262, obj_t BgL_new3046z00_2263, obj_t BgL_escapezf33044zf3_2264, obj_t BgL_globalzd2closure3045zd2_2265)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_auxz00_2693;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_res4498z00_2458;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3046z00_2453;bool_t BgL_escapezf33044zf3_2454;
BgL_new3046z00_2453 = 
(BgL_globalzf2ginfozf2_bglt)(BgL_new3046z00_2263); 
BgL_escapezf33044zf3_2454 = 
CBOOL(BgL_escapezf33044zf3_2264); 
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_escapezf33044zf3_2456;obj_t BgL_globalzd2closure3045zd2_2457;
BgL_escapezf33044zf3_2456 = BgL_escapezf33044zf3_2454; 
BgL_globalzd2closure3045zd2_2457 = BgL_globalzd2closure3045zd2_2265; 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_2453))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf33044zf3_2456), BUNSPEC); 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_2453))->BgL_globalzd2closurezd2) = ((obj_t)BgL_globalzd2closure3045zd2_2457), BUNSPEC); 
BgL_res4498z00_2458 = BgL_new3046z00_2453; } } 
BgL_auxz00_2693 = BgL_res4498z00_2458; } 
return 
(obj_t)(BgL_auxz00_2693);} } 
}



/* allocate-global/Ginfo */
BGL_EXPORTED_DEF BgL_globalz00_bglt BGl_allocatezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalz00_bglt BgL_new3050z00_2459;
BgL_new3050z00_2459 = 
((BgL_globalz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_globalz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 85 */
long BgL_arg3196z00_2460;
BgL_arg3196z00_2460 = 
BGl_classzd2numzd2zz__objectz00(BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_objz00_2461;
BgL_objz00_2461 = 
(BgL_objectz00_bglt)(BgL_new3050z00_2459); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2461, BgL_arg3196z00_2460); } } 
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_auxz00_2703;
BgL_auxz00_2703 = 
(BgL_objectz00_bglt)(BgL_new3050z00_2459); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2703, BFALSE); } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_objz00_2462;
BgL_objz00_2462 = 
(obj_t)(BgL_new3050z00_2459); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2462); BUNSPEC; } 
return BgL_new3050z00_2459;} } 
}



/* _allocate-global/Ginfo */
obj_t BGl__allocatezd2globalzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2237)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalz00_bglt BgL_auxz00_2708;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalz00_bglt BgL_res4499z00_2467;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalz00_bglt BgL_new3050z00_2463;
BgL_new3050z00_2463 = 
((BgL_globalz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_globalz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 85 */
long BgL_arg3196z00_2464;
BgL_arg3196z00_2464 = 
BGl_classzd2numzd2zz__objectz00(BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_objz00_2465;
BgL_objz00_2465 = 
(BgL_objectz00_bglt)(BgL_new3050z00_2463); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2465, BgL_arg3196z00_2464); } } 
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_auxz00_2713;
BgL_auxz00_2713 = 
(BgL_objectz00_bglt)(BgL_new3050z00_2463); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2713, BFALSE); } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_objz00_2466;
BgL_objz00_2466 = 
(obj_t)(BgL_new3050z00_2463); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2466); BUNSPEC; } 
BgL_res4499z00_2467 = BgL_new3050z00_2463; } 
BgL_auxz00_2708 = BgL_res4499z00_2467; } 
return 
(obj_t)(BgL_auxz00_2708);} } 
}



/* local/Ginfo? */
BGL_EXPORTED_DEF bool_t BGl_localzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_obj2990z00_34)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2990z00_34, BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7);} 
}



/* _local/Ginfo? */
obj_t BGl__localzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2266, obj_t BgL_obj2990z00_2267)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_auxz00_2720;
BgL_auxz00_2720 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2990z00_2267, BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7); 
return 
BBOOL(BgL_auxz00_2720);} } 
}



/* widening-local/Ginfo */
BGL_EXPORTED_DEF BgL_localzf2ginfozf2_bglt BGl_wideningzd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t BgL_escapezf32963zf3_38)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2964z00_1589;
BgL_new2964z00_1589 = 
((BgL_localzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_localzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_res4040z00_1593;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2980z00_1590;
BgL_new2980z00_1590 = BgL_new2964z00_1589; 
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_escapezf32979zf3_1592;
BgL_escapezf32979zf3_1592 = BgL_escapezf32963zf3_38; 
((((BgL_localzf2ginfozf2_bglt)CREF(BgL_new2980z00_1590))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf32979zf3_1592), BUNSPEC); 
BgL_res4040z00_1593 = BgL_new2980z00_1590; } } BgL_res4040z00_1593; } 
return BgL_new2964z00_1589;} } 
}



/* _widening-local/Ginfo */
obj_t BGl__wideningzd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2268, obj_t BgL_escapezf32963zf3_2269)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_auxz00_2725;
BgL_auxz00_2725 = 
BGl_wideningzd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(
CBOOL(BgL_escapezf32963zf3_2269)); 
return 
(obj_t)(BgL_auxz00_2725);} } 
}



/* make-local/Ginfo */
BGL_EXPORTED_DEF BgL_localzf2ginfozf2_bglt BGl_makezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_id2967z00_39, obj_t BgL_name2968z00_40, BgL_typez00_bglt BgL_type2969z00_41, BgL_valuez00_bglt BgL_value2970z00_42, obj_t BgL_access2971z00_43, obj_t BgL_fastzd2alpha2972zd2_44, obj_t BgL_removable2973z00_45, long BgL_occurrence2974z00_46, bool_t BgL_userzf32975zf3_47, long BgL_key2976z00_48, bool_t BgL_escapezf32966zf3_49)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_localz00_bglt BgL_aux2977z00_1594;
BgL_aux2977z00_1594 = 
BGl_makezd2localzd2zzast_varz00(BgL_id2967z00_39, BgL_name2968z00_40, BgL_type2969z00_41, BgL_value2970z00_42, BgL_access2971z00_43, BgL_fastzd2alpha2972zd2_44, BgL_removable2973z00_45, BgL_occurrence2974z00_46, BgL_userzf32975zf3_47, BgL_key2976z00_48); 
{ /* ./Globalize/ginfo.scm 81 */
long BgL_arg3208z00_1595;
BgL_arg3208z00_1595 = 
BGl_classzd2numzd2zz__objectz00(BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_objz00_1598;
BgL_objz00_1598 = 
(BgL_objectz00_bglt)(BgL_aux2977z00_1594); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1598, BgL_arg3208z00_1595); } } 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_arg3213z00_1596;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_res4042z00_1606;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2964z00_1601;
BgL_new2964z00_1601 = 
((BgL_localzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_localzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_res4041z00_1605;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2980z00_1602;
BgL_new2980z00_1602 = BgL_new2964z00_1601; 
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_escapezf32979zf3_1604;
BgL_escapezf32979zf3_1604 = BgL_escapezf32966zf3_49; 
((((BgL_localzf2ginfozf2_bglt)CREF(BgL_new2980z00_1602))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf32979zf3_1604), BUNSPEC); 
BgL_res4041z00_1605 = BgL_new2980z00_1602; } } BgL_res4041z00_1605; } 
BgL_res4042z00_1606 = BgL_new2964z00_1601; } 
BgL_arg3213z00_1596 = BgL_res4042z00_1606; } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_auxz00_2737;BgL_objectz00_bglt BgL_auxz00_2735;
BgL_auxz00_2737 = 
(obj_t)(BgL_arg3213z00_1596); 
BgL_auxz00_2735 = 
(BgL_objectz00_bglt)(BgL_aux2977z00_1594); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2735, BgL_auxz00_2737); } } 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2978z00_1597;
{ 
BgL_localzf2ginfozf2_bglt BgL_auxz00_2740;
BgL_auxz00_2740 = 
(BgL_localzf2ginfozf2_bglt)(BgL_aux2977z00_1594); 
BgL_new2978z00_1597 = 
((BgL_localzf2ginfozf2_bglt)BgL_auxz00_2740); } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_objz00_1607;
BgL_objz00_1607 = 
(obj_t)(BgL_new2978z00_1597); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1607); BUNSPEC; } 
return BgL_new2978z00_1597;} } } 
}



/* _make-local/Ginfo */
obj_t BGl__makezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2270, obj_t BgL_id2967z00_2271, obj_t BgL_name2968z00_2272, obj_t BgL_type2969z00_2273, obj_t BgL_value2970z00_2274, obj_t BgL_access2971z00_2275, obj_t BgL_fastzd2alpha2972zd2_2276, obj_t BgL_removable2973z00_2277, obj_t BgL_occurrence2974z00_2278, obj_t BgL_userzf32975zf3_2279, obj_t BgL_key2976z00_2280, obj_t BgL_escapezf32966zf3_2281)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_auxz00_2745;
BgL_auxz00_2745 = 
BGl_makezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(BgL_id2967z00_2271, BgL_name2968z00_2272, 
(BgL_typez00_bglt)(BgL_type2969z00_2273), 
(BgL_valuez00_bglt)(BgL_value2970z00_2274), BgL_access2971z00_2275, BgL_fastzd2alpha2972zd2_2276, BgL_removable2973z00_2277, 
(long)CINT(BgL_occurrence2974z00_2278), 
CBOOL(BgL_userzf32975zf3_2279), 
(long)CINT(BgL_key2976z00_2280), 
CBOOL(BgL_escapezf32966zf3_2281)); 
return 
(obj_t)(BgL_auxz00_2745);} } 
}



/* fill-local/Ginfo! */
BGL_EXPORTED_DEF BgL_localzf2ginfozf2_bglt BGl_fillzd2localzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_localzf2ginfozf2_bglt BgL_new2980z00_50, bool_t BgL_escapezf32979zf3_51)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_escapezf32979zf3_2469;
BgL_escapezf32979zf3_2469 = BgL_escapezf32979zf3_51; 
((((BgL_localzf2ginfozf2_bglt)CREF(BgL_new2980z00_50))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf32979zf3_2469), BUNSPEC); 
return BgL_new2980z00_50;} } 
}



/* _fill-local/Ginfo! */
obj_t BGl__fillzd2localzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2282, obj_t BgL_new2980z00_2283, obj_t BgL_escapezf32979zf3_2284)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_auxz00_2755;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_res4500z00_2473;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2980z00_2470;bool_t BgL_escapezf32979zf3_2471;
BgL_new2980z00_2470 = 
(BgL_localzf2ginfozf2_bglt)(BgL_new2980z00_2283); 
BgL_escapezf32979zf3_2471 = 
CBOOL(BgL_escapezf32979zf3_2284); 
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_escapezf32979zf3_2472;
BgL_escapezf32979zf3_2472 = BgL_escapezf32979zf3_2471; 
((((BgL_localzf2ginfozf2_bglt)CREF(BgL_new2980z00_2470))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf32979zf3_2472), BUNSPEC); 
BgL_res4500z00_2473 = BgL_new2980z00_2470; } } 
BgL_auxz00_2755 = BgL_res4500z00_2473; } 
return 
(obj_t)(BgL_auxz00_2755);} } 
}



/* allocate-local/Ginfo */
BGL_EXPORTED_DEF BgL_localz00_bglt BGl_allocatezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_localz00_bglt BgL_new2983z00_2474;
BgL_new2983z00_2474 = 
((BgL_localz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_localz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 81 */
long BgL_arg3219z00_2475;
BgL_arg3219z00_2475 = 
BGl_classzd2numzd2zz__objectz00(BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_objz00_2476;
BgL_objz00_2476 = 
(BgL_objectz00_bglt)(BgL_new2983z00_2474); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2476, BgL_arg3219z00_2475); } } 
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_auxz00_2764;
BgL_auxz00_2764 = 
(BgL_objectz00_bglt)(BgL_new2983z00_2474); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2764, BFALSE); } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_objz00_2477;
BgL_objz00_2477 = 
(obj_t)(BgL_new2983z00_2474); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2477); BUNSPEC; } 
return BgL_new2983z00_2474;} } 
}



/* _allocate-local/Ginfo */
obj_t BGl__allocatezd2localzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2236)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_localz00_bglt BgL_auxz00_2769;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localz00_bglt BgL_res4501z00_2482;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localz00_bglt BgL_new2983z00_2478;
BgL_new2983z00_2478 = 
((BgL_localz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_localz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 81 */
long BgL_arg3219z00_2479;
BgL_arg3219z00_2479 = 
BGl_classzd2numzd2zz__objectz00(BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_objz00_2480;
BgL_objz00_2480 = 
(BgL_objectz00_bglt)(BgL_new2983z00_2478); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2480, BgL_arg3219z00_2479); } } 
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_auxz00_2774;
BgL_auxz00_2774 = 
(BgL_objectz00_bglt)(BgL_new2983z00_2478); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2774, BFALSE); } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_objz00_2481;
BgL_objz00_2481 = 
(obj_t)(BgL_new2983z00_2478); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2481); BUNSPEC; } 
BgL_res4501z00_2482 = BgL_new2983z00_2478; } 
BgL_auxz00_2769 = BgL_res4501z00_2482; } 
return 
(obj_t)(BgL_auxz00_2769);} } 
}



/* sexit/Ginfo? */
BGL_EXPORTED_DEF bool_t BGl_sexitzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_obj2943z00_55)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2943z00_55, BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7);} 
}



/* _sexit/Ginfo? */
obj_t BGl__sexitzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2285, obj_t BgL_obj2943z00_2286)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_auxz00_2781;
BgL_auxz00_2781 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2943z00_2286, BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7); 
return 
BBOOL(BgL_auxz00_2781);} } 
}



/* widening-sexit/Ginfo */
BGL_EXPORTED_DEF BgL_sexitzf2ginfozf2_bglt BGl_wideningzd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t BgL_gzf32912zf3_59, bool_t BgL_kapturedzf32913zf3_60, long BgL_freezd2mark2914zd2_61, long BgL_mark2915z00_62)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2916z00_1614;
BgL_new2916z00_1614 = 
((BgL_sexitzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_sexitzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_res4043z00_1624;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2930z00_1615;
BgL_new2930z00_1615 = BgL_new2916z00_1614; 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_gzf32926zf3_1620;bool_t BgL_kapturedzf32927zf3_1621;long BgL_freezd2mark2928zd2_1622;long BgL_mark2929z00_1623;
BgL_gzf32926zf3_1620 = BgL_gzf32912zf3_59; 
BgL_kapturedzf32927zf3_1621 = BgL_kapturedzf32913zf3_60; 
BgL_freezd2mark2928zd2_1622 = BgL_freezd2mark2914zd2_61; 
BgL_mark2929z00_1623 = BgL_mark2915z00_62; 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1615))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32926zf3_1620), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1615))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32927zf3_1621), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1615))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2928zd2_1622), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1615))->BgL_markz00) = ((long)BgL_mark2929z00_1623), BUNSPEC); 
BgL_res4043z00_1624 = BgL_new2930z00_1615; } } BgL_res4043z00_1624; } 
return BgL_new2916z00_1614;} } 
}



/* _widening-sexit/Ginfo4081 */
obj_t BGl__wideningzd2sexitzf2Ginfo4081z20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2287, obj_t BgL_gzf32912zf3_2288, obj_t BgL_kapturedzf32913zf3_2289, obj_t BgL_freezd2mark2914zd2_2290, obj_t BgL_mark2915z00_2291)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_auxz00_2789;
BgL_auxz00_2789 = 
BGl_wideningzd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(
CBOOL(BgL_gzf32912zf3_2288), 
CBOOL(BgL_kapturedzf32913zf3_2289), 
(long)CINT(BgL_freezd2mark2914zd2_2290), 
(long)CINT(BgL_mark2915z00_2291)); 
return 
(obj_t)(BgL_auxz00_2789);} } 
}



/* make-sexit/Ginfo */
BGL_EXPORTED_DEF BgL_sexitzf2ginfozf2_bglt BGl_makezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_handler2922z00_63, bool_t BgL_detachedzf32923zf3_64, bool_t BgL_gzf32918zf3_65, bool_t BgL_kapturedzf32919zf3_66, long BgL_freezd2mark2920zd2_67, long BgL_mark2921z00_68)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitz00_bglt BgL_aux2924z00_1625;
BgL_aux2924z00_1625 = 
BGl_makezd2sexitzd2zzast_varz00(BgL_handler2922z00_63, BgL_detachedzf32923zf3_64); 
{ /* ./Globalize/ginfo.scm 71 */
long BgL_arg3229z00_1626;
BgL_arg3229z00_1626 = 
BGl_classzd2numzd2zz__objectz00(BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_objz00_1629;
BgL_objz00_1629 = 
(BgL_objectz00_bglt)(BgL_aux2924z00_1625); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1629, BgL_arg3229z00_1626); } } 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_arg3233z00_1627;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_res4045z00_1646;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2916z00_1635;
BgL_new2916z00_1635 = 
((BgL_sexitzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_sexitzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_res4044z00_1645;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2930z00_1636;
BgL_new2930z00_1636 = BgL_new2916z00_1635; 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_gzf32926zf3_1641;bool_t BgL_kapturedzf32927zf3_1642;long BgL_freezd2mark2928zd2_1643;long BgL_mark2929z00_1644;
BgL_gzf32926zf3_1641 = BgL_gzf32918zf3_65; 
BgL_kapturedzf32927zf3_1642 = BgL_kapturedzf32919zf3_66; 
BgL_freezd2mark2928zd2_1643 = BgL_freezd2mark2920zd2_67; 
BgL_mark2929z00_1644 = BgL_mark2921z00_68; 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1636))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32926zf3_1641), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1636))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32927zf3_1642), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1636))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2928zd2_1643), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1636))->BgL_markz00) = ((long)BgL_mark2929z00_1644), BUNSPEC); 
BgL_res4044z00_1645 = BgL_new2930z00_1636; } } BgL_res4044z00_1645; } 
BgL_res4045z00_1646 = BgL_new2916z00_1635; } 
BgL_arg3233z00_1627 = BgL_res4045z00_1646; } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_auxz00_2807;BgL_objectz00_bglt BgL_auxz00_2805;
BgL_auxz00_2807 = 
(obj_t)(BgL_arg3233z00_1627); 
BgL_auxz00_2805 = 
(BgL_objectz00_bglt)(BgL_aux2924z00_1625); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2805, BgL_auxz00_2807); } } 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2925z00_1628;
{ 
BgL_sexitzf2ginfozf2_bglt BgL_auxz00_2810;
BgL_auxz00_2810 = 
(BgL_sexitzf2ginfozf2_bglt)(BgL_aux2924z00_1625); 
BgL_new2925z00_1628 = 
((BgL_sexitzf2ginfozf2_bglt)BgL_auxz00_2810); } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_objz00_1647;
BgL_objz00_1647 = 
(obj_t)(BgL_new2925z00_1628); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1647); BUNSPEC; } 
return BgL_new2925z00_1628;} } } 
}



/* _make-sexit/Ginfo */
obj_t BGl__makezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2292, obj_t BgL_handler2922z00_2293, obj_t BgL_detachedzf32923zf3_2294, obj_t BgL_gzf32918zf3_2295, obj_t BgL_kapturedzf32919zf3_2296, obj_t BgL_freezd2mark2920zd2_2297, obj_t BgL_mark2921z00_2298)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_auxz00_2815;
BgL_auxz00_2815 = 
BGl_makezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(BgL_handler2922z00_2293, 
CBOOL(BgL_detachedzf32923zf3_2294), 
CBOOL(BgL_gzf32918zf3_2295), 
CBOOL(BgL_kapturedzf32919zf3_2296), 
(long)CINT(BgL_freezd2mark2920zd2_2297), 
(long)CINT(BgL_mark2921z00_2298)); 
return 
(obj_t)(BgL_auxz00_2815);} } 
}



/* fill-sexit/Ginfo! */
BGL_EXPORTED_DEF BgL_sexitzf2ginfozf2_bglt BGl_fillzd2sexitzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_sexitzf2ginfozf2_bglt BgL_new2930z00_69, bool_t BgL_gzf32926zf3_70, bool_t BgL_kapturedzf32927zf3_71, long BgL_freezd2mark2928zd2_72, long BgL_mark2929z00_73)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_gzf32926zf3_2484;bool_t BgL_kapturedzf32927zf3_2485;long BgL_freezd2mark2928zd2_2486;long BgL_mark2929z00_2487;
BgL_gzf32926zf3_2484 = BgL_gzf32926zf3_70; 
BgL_kapturedzf32927zf3_2485 = BgL_kapturedzf32927zf3_71; 
BgL_freezd2mark2928zd2_2486 = BgL_freezd2mark2928zd2_72; 
BgL_mark2929z00_2487 = BgL_mark2929z00_73; 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_69))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32926zf3_2484), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_69))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32927zf3_2485), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_69))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2928zd2_2486), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_69))->BgL_markz00) = ((long)BgL_mark2929z00_2487), BUNSPEC); 
return BgL_new2930z00_69;} } 
}



/* _fill-sexit/Ginfo! */
obj_t BGl__fillzd2sexitzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2299, obj_t BgL_new2930z00_2300, obj_t BgL_gzf32926zf3_2301, obj_t BgL_kapturedzf32927zf3_2302, obj_t BgL_freezd2mark2928zd2_2303, obj_t BgL_mark2929z00_2304)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_auxz00_2827;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_res4502z00_2497;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2930z00_2488;bool_t BgL_gzf32926zf3_2489;bool_t BgL_kapturedzf32927zf3_2490;long BgL_freezd2mark2928zd2_2491;long BgL_mark2929z00_2492;
BgL_new2930z00_2488 = 
(BgL_sexitzf2ginfozf2_bglt)(BgL_new2930z00_2300); 
BgL_gzf32926zf3_2489 = 
CBOOL(BgL_gzf32926zf3_2301); 
BgL_kapturedzf32927zf3_2490 = 
CBOOL(BgL_kapturedzf32927zf3_2302); 
BgL_freezd2mark2928zd2_2491 = 
(long)CINT(BgL_freezd2mark2928zd2_2303); 
BgL_mark2929z00_2492 = 
(long)CINT(BgL_mark2929z00_2304); 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_gzf32926zf3_2493;bool_t BgL_kapturedzf32927zf3_2494;long BgL_freezd2mark2928zd2_2495;long BgL_mark2929z00_2496;
BgL_gzf32926zf3_2493 = BgL_gzf32926zf3_2489; 
BgL_kapturedzf32927zf3_2494 = BgL_kapturedzf32927zf3_2490; 
BgL_freezd2mark2928zd2_2495 = BgL_freezd2mark2928zd2_2491; 
BgL_mark2929z00_2496 = BgL_mark2929z00_2492; 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_2488))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32926zf3_2493), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_2488))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32927zf3_2494), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_2488))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2928zd2_2495), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_2488))->BgL_markz00) = ((long)BgL_mark2929z00_2496), BUNSPEC); 
BgL_res4502z00_2497 = BgL_new2930z00_2488; } } 
BgL_auxz00_2827 = BgL_res4502z00_2497; } 
return 
(obj_t)(BgL_auxz00_2827);} } 
}



/* allocate-sexit/Ginfo */
BGL_EXPORTED_DEF BgL_sexitz00_bglt BGl_allocatezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitz00_bglt BgL_new2936z00_2498;
BgL_new2936z00_2498 = 
((BgL_sexitz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_sexitz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 71 */
long BgL_arg3239z00_2499;
BgL_arg3239z00_2499 = 
BGl_classzd2numzd2zz__objectz00(BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_objz00_2500;
BgL_objz00_2500 = 
(BgL_objectz00_bglt)(BgL_new2936z00_2498); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2500, BgL_arg3239z00_2499); } } 
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_auxz00_2842;
BgL_auxz00_2842 = 
(BgL_objectz00_bglt)(BgL_new2936z00_2498); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2842, BFALSE); } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_objz00_2501;
BgL_objz00_2501 = 
(obj_t)(BgL_new2936z00_2498); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2501); BUNSPEC; } 
return BgL_new2936z00_2498;} } 
}



/* _allocate-sexit/Ginfo */
obj_t BGl__allocatezd2sexitzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2235)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitz00_bglt BgL_auxz00_2847;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitz00_bglt BgL_res4503z00_2506;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitz00_bglt BgL_new2936z00_2502;
BgL_new2936z00_2502 = 
((BgL_sexitz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_sexitz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 71 */
long BgL_arg3239z00_2503;
BgL_arg3239z00_2503 = 
BGl_classzd2numzd2zz__objectz00(BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_objz00_2504;
BgL_objz00_2504 = 
(BgL_objectz00_bglt)(BgL_new2936z00_2502); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2504, BgL_arg3239z00_2503); } } 
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_auxz00_2852;
BgL_auxz00_2852 = 
(BgL_objectz00_bglt)(BgL_new2936z00_2502); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2852, BFALSE); } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_objz00_2505;
BgL_objz00_2505 = 
(obj_t)(BgL_new2936z00_2502); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2505); BUNSPEC; } 
BgL_res4503z00_2506 = BgL_new2936z00_2502; } 
BgL_auxz00_2847 = BgL_res4503z00_2506; } 
return 
(obj_t)(BgL_auxz00_2847);} } 
}



/* svar/Ginfo? */
BGL_EXPORTED_DEF bool_t BGl_svarzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_obj2896z00_86)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2896z00_86, BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7);} 
}



/* _svar/Ginfo? */
obj_t BGl__svarzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2305, obj_t BgL_obj2896z00_2306)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_auxz00_2859;
BgL_auxz00_2859 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2896z00_2306, BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7); 
return 
BBOOL(BgL_auxz00_2859);} } 
}



/* widening-svar/Ginfo */
BGL_EXPORTED_DEF BgL_svarzf2ginfozf2_bglt BGl_wideningzd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t BgL_kapturedzf32866zf3_90, long BgL_freezd2mark2867zd2_91, long BgL_mark2868z00_92, bool_t BgL_celledzf32869zf3_93)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2870z00_1657;
BgL_new2870z00_1657 = 
((BgL_svarzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_svarzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_res4046z00_1667;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2883z00_1658;
BgL_new2883z00_1658 = BgL_new2870z00_1657; 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_kapturedzf32879zf3_1663;long BgL_freezd2mark2880zd2_1664;long BgL_mark2881z00_1665;bool_t BgL_celledzf32882zf3_1666;
BgL_kapturedzf32879zf3_1663 = BgL_kapturedzf32866zf3_90; 
BgL_freezd2mark2880zd2_1664 = BgL_freezd2mark2867zd2_91; 
BgL_mark2881z00_1665 = BgL_mark2868z00_92; 
BgL_celledzf32882zf3_1666 = BgL_celledzf32869zf3_93; 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1658))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32879zf3_1663), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1658))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2880zd2_1664), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1658))->BgL_markz00) = ((long)BgL_mark2881z00_1665), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1658))->BgL_celledzf3zf3) = ((bool_t)BgL_celledzf32882zf3_1666), BUNSPEC); 
BgL_res4046z00_1667 = BgL_new2883z00_1658; } } BgL_res4046z00_1667; } 
return BgL_new2870z00_1657;} } 
}



/* _widening-svar/Ginfo4086 */
obj_t BGl__wideningzd2svarzf2Ginfo4086z20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2307, obj_t BgL_kapturedzf32866zf3_2308, obj_t BgL_freezd2mark2867zd2_2309, obj_t BgL_mark2868z00_2310, obj_t BgL_celledzf32869zf3_2311)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_auxz00_2867;
BgL_auxz00_2867 = 
BGl_wideningzd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(
CBOOL(BgL_kapturedzf32866zf3_2308), 
(long)CINT(BgL_freezd2mark2867zd2_2309), 
(long)CINT(BgL_mark2868z00_2310), 
CBOOL(BgL_celledzf32869zf3_2311)); 
return 
(obj_t)(BgL_auxz00_2867);} } 
}



/* make-svar/Ginfo */
BGL_EXPORTED_DEF BgL_svarzf2ginfozf2_bglt BGl_makezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_loc2876z00_94, bool_t BgL_kapturedzf32872zf3_95, long BgL_freezd2mark2873zd2_96, long BgL_mark2874z00_97, bool_t BgL_celledzf32875zf3_98)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarz00_bglt BgL_aux2877z00_1668;
BgL_aux2877z00_1668 = 
BGl_makezd2svarzd2zzast_varz00(BgL_loc2876z00_94); 
{ /* ./Globalize/ginfo.scm 61 */
long BgL_arg3255z00_1669;
BgL_arg3255z00_1669 = 
BGl_classzd2numzd2zz__objectz00(BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_objz00_1672;
BgL_objz00_1672 = 
(BgL_objectz00_bglt)(BgL_aux2877z00_1668); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1672, BgL_arg3255z00_1669); } } 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_arg3259z00_1670;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_res4048z00_1689;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2870z00_1678;
BgL_new2870z00_1678 = 
((BgL_svarzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_svarzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_res4047z00_1688;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2883z00_1679;
BgL_new2883z00_1679 = BgL_new2870z00_1678; 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_kapturedzf32879zf3_1684;long BgL_freezd2mark2880zd2_1685;long BgL_mark2881z00_1686;bool_t BgL_celledzf32882zf3_1687;
BgL_kapturedzf32879zf3_1684 = BgL_kapturedzf32872zf3_95; 
BgL_freezd2mark2880zd2_1685 = BgL_freezd2mark2873zd2_96; 
BgL_mark2881z00_1686 = BgL_mark2874z00_97; 
BgL_celledzf32882zf3_1687 = BgL_celledzf32875zf3_98; 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1679))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32879zf3_1684), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1679))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2880zd2_1685), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1679))->BgL_markz00) = ((long)BgL_mark2881z00_1686), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_1679))->BgL_celledzf3zf3) = ((bool_t)BgL_celledzf32882zf3_1687), BUNSPEC); 
BgL_res4047z00_1688 = BgL_new2883z00_1679; } } BgL_res4047z00_1688; } 
BgL_res4048z00_1689 = BgL_new2870z00_1678; } 
BgL_arg3259z00_1670 = BgL_res4048z00_1689; } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_auxz00_2885;BgL_objectz00_bglt BgL_auxz00_2883;
BgL_auxz00_2885 = 
(obj_t)(BgL_arg3259z00_1670); 
BgL_auxz00_2883 = 
(BgL_objectz00_bglt)(BgL_aux2877z00_1668); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2883, BgL_auxz00_2885); } } 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2878z00_1671;
{ 
BgL_svarzf2ginfozf2_bglt BgL_auxz00_2888;
BgL_auxz00_2888 = 
(BgL_svarzf2ginfozf2_bglt)(BgL_aux2877z00_1668); 
BgL_new2878z00_1671 = 
((BgL_svarzf2ginfozf2_bglt)BgL_auxz00_2888); } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_objz00_1690;
BgL_objz00_1690 = 
(obj_t)(BgL_new2878z00_1671); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1690); BUNSPEC; } 
return BgL_new2878z00_1671;} } } 
}



/* _make-svar/Ginfo */
obj_t BGl__makezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2312, obj_t BgL_loc2876z00_2313, obj_t BgL_kapturedzf32872zf3_2314, obj_t BgL_freezd2mark2873zd2_2315, obj_t BgL_mark2874z00_2316, obj_t BgL_celledzf32875zf3_2317)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_auxz00_2893;
BgL_auxz00_2893 = 
BGl_makezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(BgL_loc2876z00_2313, 
CBOOL(BgL_kapturedzf32872zf3_2314), 
(long)CINT(BgL_freezd2mark2873zd2_2315), 
(long)CINT(BgL_mark2874z00_2316), 
CBOOL(BgL_celledzf32875zf3_2317)); 
return 
(obj_t)(BgL_auxz00_2893);} } 
}



/* fill-svar/Ginfo! */
BGL_EXPORTED_DEF BgL_svarzf2ginfozf2_bglt BGl_fillzd2svarzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_svarzf2ginfozf2_bglt BgL_new2883z00_99, bool_t BgL_kapturedzf32879zf3_100, long BgL_freezd2mark2880zd2_101, long BgL_mark2881z00_102, bool_t BgL_celledzf32882zf3_103)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_kapturedzf32879zf3_2508;long BgL_freezd2mark2880zd2_2509;long BgL_mark2881z00_2510;bool_t BgL_celledzf32882zf3_2511;
BgL_kapturedzf32879zf3_2508 = BgL_kapturedzf32879zf3_100; 
BgL_freezd2mark2880zd2_2509 = BgL_freezd2mark2880zd2_101; 
BgL_mark2881z00_2510 = BgL_mark2881z00_102; 
BgL_celledzf32882zf3_2511 = BgL_celledzf32882zf3_103; 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_99))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32879zf3_2508), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_99))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2880zd2_2509), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_99))->BgL_markz00) = ((long)BgL_mark2881z00_2510), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_99))->BgL_celledzf3zf3) = ((bool_t)BgL_celledzf32882zf3_2511), BUNSPEC); 
return BgL_new2883z00_99;} } 
}



/* _fill-svar/Ginfo! */
obj_t BGl__fillzd2svarzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2318, obj_t BgL_new2883z00_2319, obj_t BgL_kapturedzf32879zf3_2320, obj_t BgL_freezd2mark2880zd2_2321, obj_t BgL_mark2881z00_2322, obj_t BgL_celledzf32882zf3_2323)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_auxz00_2904;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_res4504z00_2521;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2883z00_2512;bool_t BgL_kapturedzf32879zf3_2513;long BgL_freezd2mark2880zd2_2514;long BgL_mark2881z00_2515;bool_t BgL_celledzf32882zf3_2516;
BgL_new2883z00_2512 = 
(BgL_svarzf2ginfozf2_bglt)(BgL_new2883z00_2319); 
BgL_kapturedzf32879zf3_2513 = 
CBOOL(BgL_kapturedzf32879zf3_2320); 
BgL_freezd2mark2880zd2_2514 = 
(long)CINT(BgL_freezd2mark2880zd2_2321); 
BgL_mark2881z00_2515 = 
(long)CINT(BgL_mark2881z00_2322); 
BgL_celledzf32882zf3_2516 = 
CBOOL(BgL_celledzf32882zf3_2323); 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_kapturedzf32879zf3_2517;long BgL_freezd2mark2880zd2_2518;long BgL_mark2881z00_2519;bool_t BgL_celledzf32882zf3_2520;
BgL_kapturedzf32879zf3_2517 = BgL_kapturedzf32879zf3_2513; 
BgL_freezd2mark2880zd2_2518 = BgL_freezd2mark2880zd2_2514; 
BgL_mark2881z00_2519 = BgL_mark2881z00_2515; 
BgL_celledzf32882zf3_2520 = BgL_celledzf32882zf3_2516; 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2512))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32879zf3_2517), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2512))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2880zd2_2518), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2512))->BgL_markz00) = ((long)BgL_mark2881z00_2519), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2512))->BgL_celledzf3zf3) = ((bool_t)BgL_celledzf32882zf3_2520), BUNSPEC); 
BgL_res4504z00_2521 = BgL_new2883z00_2512; } } 
BgL_auxz00_2904 = BgL_res4504z00_2521; } 
return 
(obj_t)(BgL_auxz00_2904);} } 
}



/* allocate-svar/Ginfo */
BGL_EXPORTED_DEF BgL_svarz00_bglt BGl_allocatezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarz00_bglt BgL_new2889z00_2522;
BgL_new2889z00_2522 = 
((BgL_svarz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_svarz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 61 */
long BgL_arg3265z00_2523;
BgL_arg3265z00_2523 = 
BGl_classzd2numzd2zz__objectz00(BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_objz00_2524;
BgL_objz00_2524 = 
(BgL_objectz00_bglt)(BgL_new2889z00_2522); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2524, BgL_arg3265z00_2523); } } 
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_auxz00_2919;
BgL_auxz00_2919 = 
(BgL_objectz00_bglt)(BgL_new2889z00_2522); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2919, BFALSE); } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_objz00_2525;
BgL_objz00_2525 = 
(obj_t)(BgL_new2889z00_2522); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2525); BUNSPEC; } 
return BgL_new2889z00_2522;} } 
}



/* _allocate-svar/Ginfo */
obj_t BGl__allocatezd2svarzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2234)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarz00_bglt BgL_auxz00_2924;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarz00_bglt BgL_res4505z00_2530;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarz00_bglt BgL_new2889z00_2526;
BgL_new2889z00_2526 = 
((BgL_svarz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_svarz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 61 */
long BgL_arg3265z00_2527;
BgL_arg3265z00_2527 = 
BGl_classzd2numzd2zz__objectz00(BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_objz00_2528;
BgL_objz00_2528 = 
(BgL_objectz00_bglt)(BgL_new2889z00_2526); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2528, BgL_arg3265z00_2527); } } 
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_auxz00_2929;
BgL_auxz00_2929 = 
(BgL_objectz00_bglt)(BgL_new2889z00_2526); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2929, BFALSE); } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_objz00_2529;
BgL_objz00_2529 = 
(obj_t)(BgL_new2889z00_2526); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2529); BUNSPEC; } 
BgL_res4505z00_2530 = BgL_new2889z00_2526; } 
BgL_auxz00_2924 = BgL_res4505z00_2530; } 
return 
(obj_t)(BgL_auxz00_2924);} } 
}



/* sfun/Ginfo? */
BGL_EXPORTED_DEF bool_t BGl_sfunzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_obj2768z00_116)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2768z00_116, BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7);} 
}



/* _sfun/Ginfo? */
obj_t BGl__sfunzf2Ginfozf3z01zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2324, obj_t BgL_obj2768z00_2325)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_auxz00_2936;
BgL_auxz00_2936 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2768z00_2325, BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7); 
return 
BBOOL(BgL_auxz00_2936);} } 
}



/* widening-sfun/Ginfo */
BGL_EXPORTED_DEF BgL_sfunzf2ginfozf2_bglt BGl_wideningzd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(bool_t BgL_gzf32662zf3_120, obj_t BgL_cfrom2663z00_121, obj_t BgL_cfromza22664za2_122, obj_t BgL_cto2665z00_123, obj_t BgL_ctoza22666za2_124, obj_t BgL_cfunction2667z00_125, obj_t BgL_integrator2668z00_126, obj_t BgL_imark2669z00_127, obj_t BgL_owner2670z00_128, obj_t BgL_integrated2671z00_129, obj_t BgL_pluggedzd2in2672zd2_130, long BgL_mark2673z00_131, obj_t BgL_freezd2mark2674zd2_132, obj_t BgL_thezd2global2675zd2_133, obj_t BgL_kaptured2676z00_134, obj_t BgL_newzd2body2677zd2_135, long BgL_bmark2678z00_136, long BgL_umark2679z00_137, obj_t BgL_free2680z00_138, obj_t BgL_bound2681z00_139)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2682z00_1700;
BgL_new2682z00_1700 = 
((BgL_sfunzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_sfunzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_res4049z00_1742;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2739z00_1701;
BgL_new2739z00_1701 = BgL_new2682z00_1700; 
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_gzf32719zf3_1722;obj_t BgL_cfrom2720z00_1723;obj_t BgL_cfromza22721za2_1724;obj_t BgL_cto2722z00_1725;obj_t BgL_ctoza22723za2_1726;obj_t BgL_cfunction2724z00_1727;obj_t BgL_integrator2725z00_1728;obj_t BgL_imark2726z00_1729;obj_t BgL_owner2727z00_1730;obj_t BgL_integrated2728z00_1731;obj_t BgL_pluggedzd2in2729zd2_1732;long BgL_mark2730z00_1733;obj_t BgL_freezd2mark2731zd2_1734;obj_t BgL_thezd2global2732zd2_1735;obj_t BgL_kaptured2733z00_1736;obj_t BgL_newzd2body2734zd2_1737;long BgL_bmark2735z00_1738;long BgL_umark2736z00_1739;obj_t BgL_free2737z00_1740;obj_t BgL_bound2738z00_1741;
BgL_gzf32719zf3_1722 = BgL_gzf32662zf3_120; 
BgL_cfrom2720z00_1723 = BgL_cfrom2663z00_121; 
BgL_cfromza22721za2_1724 = BgL_cfromza22664za2_122; 
BgL_cto2722z00_1725 = BgL_cto2665z00_123; 
BgL_ctoza22723za2_1726 = BgL_ctoza22666za2_124; 
BgL_cfunction2724z00_1727 = BgL_cfunction2667z00_125; 
BgL_integrator2725z00_1728 = BgL_integrator2668z00_126; 
BgL_imark2726z00_1729 = BgL_imark2669z00_127; 
BgL_owner2727z00_1730 = BgL_owner2670z00_128; 
BgL_integrated2728z00_1731 = BgL_integrated2671z00_129; 
BgL_pluggedzd2in2729zd2_1732 = BgL_pluggedzd2in2672zd2_130; 
BgL_mark2730z00_1733 = BgL_mark2673z00_131; 
BgL_freezd2mark2731zd2_1734 = BgL_freezd2mark2674zd2_132; 
BgL_thezd2global2732zd2_1735 = BgL_thezd2global2675zd2_133; 
BgL_kaptured2733z00_1736 = BgL_kaptured2676z00_134; 
BgL_newzd2body2734zd2_1737 = BgL_newzd2body2677zd2_135; 
BgL_bmark2735z00_1738 = BgL_bmark2678z00_136; 
BgL_umark2736z00_1739 = BgL_umark2679z00_137; 
BgL_free2737z00_1740 = BgL_free2680z00_138; 
BgL_bound2738z00_1741 = BgL_bound2681z00_139; 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32719zf3_1722), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_cfromz00) = ((obj_t)BgL_cfrom2720z00_1723), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_cfromza2za2) = ((obj_t)BgL_cfromza22721za2_1724), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_ctoz00) = ((obj_t)BgL_cto2722z00_1725), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_ctoza2za2) = ((obj_t)BgL_ctoza22723za2_1726), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_cfunctionz00) = ((obj_t)BgL_cfunction2724z00_1727), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_integratorz00) = ((obj_t)BgL_integrator2725z00_1728), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_imarkz00) = ((obj_t)BgL_imark2726z00_1729), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_ownerz00) = ((obj_t)BgL_owner2727z00_1730), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_integratedz00) = ((obj_t)BgL_integrated2728z00_1731), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_pluggedzd2inzd2) = ((obj_t)BgL_pluggedzd2in2729zd2_1732), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_markz00) = ((long)BgL_mark2730z00_1733), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_freezd2markzd2) = ((obj_t)BgL_freezd2mark2731zd2_1734), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_thezd2globalzd2) = ((obj_t)BgL_thezd2global2732zd2_1735), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_kapturedz00) = ((obj_t)BgL_kaptured2733z00_1736), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_newzd2bodyzd2) = ((obj_t)BgL_newzd2body2734zd2_1737), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_bmarkz00) = ((long)BgL_bmark2735z00_1738), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_umarkz00) = ((long)BgL_umark2736z00_1739), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_freez00) = ((obj_t)BgL_free2737z00_1740), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1701))->BgL_boundz00) = ((obj_t)BgL_bound2738z00_1741), BUNSPEC); 
BgL_res4049z00_1742 = BgL_new2739z00_1701; } } BgL_res4049z00_1742; } 
return BgL_new2682z00_1700;} } 
}



/* _widening-sfun/Ginfo4091 */
obj_t BGl__wideningzd2sfunzf2Ginfo4091z20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2326, obj_t BgL_gzf32662zf3_2327, obj_t BgL_cfrom2663z00_2328, obj_t BgL_cfromza22664za2_2329, obj_t BgL_cto2665z00_2330, obj_t BgL_ctoza22666za2_2331, obj_t BgL_cfunction2667z00_2332, obj_t BgL_integrator2668z00_2333, obj_t BgL_imark2669z00_2334, obj_t BgL_owner2670z00_2335, obj_t BgL_integrated2671z00_2336, obj_t BgL_pluggedzd2in2672zd2_2337, obj_t BgL_mark2673z00_2338, obj_t BgL_freezd2mark2674zd2_2339, obj_t BgL_thezd2global2675zd2_2340, obj_t BgL_kaptured2676z00_2341, obj_t BgL_newzd2body2677zd2_2342, obj_t BgL_bmark2678z00_2343, obj_t BgL_umark2679z00_2344, obj_t BgL_free2680z00_2345, obj_t BgL_bound2681z00_2346)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_auxz00_2960;
BgL_auxz00_2960 = 
BGl_wideningzd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(
CBOOL(BgL_gzf32662zf3_2327), BgL_cfrom2663z00_2328, BgL_cfromza22664za2_2329, BgL_cto2665z00_2330, BgL_ctoza22666za2_2331, BgL_cfunction2667z00_2332, BgL_integrator2668z00_2333, BgL_imark2669z00_2334, BgL_owner2670z00_2335, BgL_integrated2671z00_2336, BgL_pluggedzd2in2672zd2_2337, 
(long)CINT(BgL_mark2673z00_2338), BgL_freezd2mark2674zd2_2339, BgL_thezd2global2675zd2_2340, BgL_kaptured2676z00_2341, BgL_newzd2body2677zd2_2342, 
(long)CINT(BgL_bmark2678z00_2343), 
(long)CINT(BgL_umark2679z00_2344), BgL_free2680z00_2345, BgL_bound2681z00_2346); 
return 
(obj_t)(BgL_auxz00_2960);} } 
}



/* make-sfun/Ginfo */
BGL_EXPORTED_DEF BgL_sfunzf2ginfozf2_bglt BGl_makezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(long BgL_arity2704z00_140, obj_t BgL_sidezd2effectzf32705z21_141, obj_t BgL_predicatezd2of2706zd2_142, obj_t BgL_stackzd2allocator2707zd2_143, bool_t BgL_topzf32708zf3_144, obj_t BgL_thezd2closure2709zd2_145, obj_t BgL_effect2710z00_146, obj_t BgL_property2711z00_147, obj_t BgL_args2712z00_148, obj_t BgL_body2713z00_149, obj_t BgL_class2714z00_150, obj_t BgL_dssslzd2keywords2715zd2_151, obj_t BgL_loc2716z00_152, bool_t BgL_gzf32684zf3_153, obj_t BgL_cfrom2685z00_154, obj_t BgL_cfromza22686za2_155, obj_t BgL_cto2687z00_156, obj_t BgL_ctoza22688za2_157, obj_t BgL_cfunction2689z00_158, obj_t BgL_integrator2690z00_159, obj_t BgL_imark2691z00_160, obj_t BgL_owner2692z00_161, obj_t BgL_integrated2693z00_162, obj_t BgL_pluggedzd2in2694zd2_163, long BgL_mark2695z00_164, obj_t BgL_freezd2mark2696zd2_165, obj_t BgL_thezd2global2697zd2_166, obj_t BgL_kaptured2698z00_167, obj_t BgL_newzd2body2699zd2_168, long BgL_bmark2700z00_169, long BgL_umark2701z00_170, obj_t BgL_free2702z00_171, obj_t BgL_bound2703z00_172)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunz00_bglt BgL_aux2717z00_1743;
BgL_aux2717z00_1743 = 
BGl_makezd2sfunzd2zzast_varz00(BgL_arity2704z00_140, BgL_sidezd2effectzf32705z21_141, BgL_predicatezd2of2706zd2_142, BgL_stackzd2allocator2707zd2_143, BgL_topzf32708zf3_144, BgL_thezd2closure2709zd2_145, BgL_effect2710z00_146, BgL_property2711z00_147, BgL_args2712z00_148, BgL_body2713z00_149, BgL_class2714z00_150, BgL_dssslzd2keywords2715zd2_151, BgL_loc2716z00_152); 
{ /* ./Globalize/ginfo.scm 19 */
long BgL_arg3281z00_1744;
BgL_arg3281z00_1744 = 
BGl_classzd2numzd2zz__objectz00(BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_objz00_1747;
BgL_objz00_1747 = 
(BgL_objectz00_bglt)(BgL_aux2717z00_1743); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1747, BgL_arg3281z00_1744); } } 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_arg3285z00_1745;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_res4051z00_1812;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2682z00_1769;
BgL_new2682z00_1769 = 
((BgL_sfunzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_sfunzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_res4050z00_1811;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2739z00_1770;
BgL_new2739z00_1770 = BgL_new2682z00_1769; 
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_gzf32719zf3_1791;obj_t BgL_cfrom2720z00_1792;obj_t BgL_cfromza22721za2_1793;obj_t BgL_cto2722z00_1794;obj_t BgL_ctoza22723za2_1795;obj_t BgL_cfunction2724z00_1796;obj_t BgL_integrator2725z00_1797;obj_t BgL_imark2726z00_1798;obj_t BgL_owner2727z00_1799;obj_t BgL_integrated2728z00_1800;obj_t BgL_pluggedzd2in2729zd2_1801;long BgL_mark2730z00_1802;obj_t BgL_freezd2mark2731zd2_1803;obj_t BgL_thezd2global2732zd2_1804;obj_t BgL_kaptured2733z00_1805;obj_t BgL_newzd2body2734zd2_1806;long BgL_bmark2735z00_1807;long BgL_umark2736z00_1808;obj_t BgL_free2737z00_1809;obj_t BgL_bound2738z00_1810;
BgL_gzf32719zf3_1791 = BgL_gzf32684zf3_153; 
BgL_cfrom2720z00_1792 = BgL_cfrom2685z00_154; 
BgL_cfromza22721za2_1793 = BgL_cfromza22686za2_155; 
BgL_cto2722z00_1794 = BgL_cto2687z00_156; 
BgL_ctoza22723za2_1795 = BgL_ctoza22688za2_157; 
BgL_cfunction2724z00_1796 = BgL_cfunction2689z00_158; 
BgL_integrator2725z00_1797 = BgL_integrator2690z00_159; 
BgL_imark2726z00_1798 = BgL_imark2691z00_160; 
BgL_owner2727z00_1799 = BgL_owner2692z00_161; 
BgL_integrated2728z00_1800 = BgL_integrated2693z00_162; 
BgL_pluggedzd2in2729zd2_1801 = BgL_pluggedzd2in2694zd2_163; 
BgL_mark2730z00_1802 = BgL_mark2695z00_164; 
BgL_freezd2mark2731zd2_1803 = BgL_freezd2mark2696zd2_165; 
BgL_thezd2global2732zd2_1804 = BgL_thezd2global2697zd2_166; 
BgL_kaptured2733z00_1805 = BgL_kaptured2698z00_167; 
BgL_newzd2body2734zd2_1806 = BgL_newzd2body2699zd2_168; 
BgL_bmark2735z00_1807 = BgL_bmark2700z00_169; 
BgL_umark2736z00_1808 = BgL_umark2701z00_170; 
BgL_free2737z00_1809 = BgL_free2702z00_171; 
BgL_bound2738z00_1810 = BgL_bound2703z00_172; 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32719zf3_1791), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_cfromz00) = ((obj_t)BgL_cfrom2720z00_1792), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_cfromza2za2) = ((obj_t)BgL_cfromza22721za2_1793), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_ctoz00) = ((obj_t)BgL_cto2722z00_1794), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_ctoza2za2) = ((obj_t)BgL_ctoza22723za2_1795), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_cfunctionz00) = ((obj_t)BgL_cfunction2724z00_1796), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_integratorz00) = ((obj_t)BgL_integrator2725z00_1797), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_imarkz00) = ((obj_t)BgL_imark2726z00_1798), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_ownerz00) = ((obj_t)BgL_owner2727z00_1799), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_integratedz00) = ((obj_t)BgL_integrated2728z00_1800), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_pluggedzd2inzd2) = ((obj_t)BgL_pluggedzd2in2729zd2_1801), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_markz00) = ((long)BgL_mark2730z00_1802), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_freezd2markzd2) = ((obj_t)BgL_freezd2mark2731zd2_1803), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_thezd2globalzd2) = ((obj_t)BgL_thezd2global2732zd2_1804), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_kapturedz00) = ((obj_t)BgL_kaptured2733z00_1805), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_newzd2bodyzd2) = ((obj_t)BgL_newzd2body2734zd2_1806), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_bmarkz00) = ((long)BgL_bmark2735z00_1807), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_umarkz00) = ((long)BgL_umark2736z00_1808), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_freez00) = ((obj_t)BgL_free2737z00_1809), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_1770))->BgL_boundz00) = ((obj_t)BgL_bound2738z00_1810), BUNSPEC); 
BgL_res4050z00_1811 = BgL_new2739z00_1770; } } BgL_res4050z00_1811; } 
BgL_res4051z00_1812 = BgL_new2682z00_1769; } 
BgL_arg3285z00_1745 = BgL_res4051z00_1812; } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_auxz00_2994;BgL_objectz00_bglt BgL_auxz00_2992;
BgL_auxz00_2994 = 
(obj_t)(BgL_arg3285z00_1745); 
BgL_auxz00_2992 = 
(BgL_objectz00_bglt)(BgL_aux2717z00_1743); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2992, BgL_auxz00_2994); } } 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2718z00_1746;
{ 
BgL_sfunzf2ginfozf2_bglt BgL_auxz00_2997;
BgL_auxz00_2997 = 
(BgL_sfunzf2ginfozf2_bglt)(BgL_aux2717z00_1743); 
BgL_new2718z00_1746 = 
((BgL_sfunzf2ginfozf2_bglt)BgL_auxz00_2997); } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_objz00_1813;
BgL_objz00_1813 = 
(obj_t)(BgL_new2718z00_1746); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1813); BUNSPEC; } 
return BgL_new2718z00_1746;} } } 
}



/* _make-sfun/Ginfo */
obj_t BGl__makezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2347, obj_t BgL_arity2704z00_2348, obj_t BgL_sidezd2effectzf32705z21_2349, obj_t BgL_predicatezd2of2706zd2_2350, obj_t BgL_stackzd2allocator2707zd2_2351, obj_t BgL_topzf32708zf3_2352, obj_t BgL_thezd2closure2709zd2_2353, obj_t BgL_effect2710z00_2354, obj_t BgL_property2711z00_2355, obj_t BgL_args2712z00_2356, obj_t BgL_body2713z00_2357, obj_t BgL_class2714z00_2358, obj_t BgL_dssslzd2keywords2715zd2_2359, obj_t BgL_loc2716z00_2360, obj_t BgL_gzf32684zf3_2361, obj_t BgL_cfrom2685z00_2362, obj_t BgL_cfromza22686za2_2363, obj_t BgL_cto2687z00_2364, obj_t BgL_ctoza22688za2_2365, obj_t BgL_cfunction2689z00_2366, obj_t BgL_integrator2690z00_2367, obj_t BgL_imark2691z00_2368, obj_t BgL_owner2692z00_2369, obj_t BgL_integrated2693z00_2370, obj_t BgL_pluggedzd2in2694zd2_2371, obj_t BgL_mark2695z00_2372, obj_t BgL_freezd2mark2696zd2_2373, obj_t BgL_thezd2global2697zd2_2374, obj_t BgL_kaptured2698z00_2375, obj_t BgL_newzd2body2699zd2_2376, obj_t BgL_bmark2700z00_2377, obj_t BgL_umark2701z00_2378, obj_t BgL_free2702z00_2379, obj_t BgL_bound2703z00_2380)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_auxz00_3002;
BgL_auxz00_3002 = 
BGl_makezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(
(long)CINT(BgL_arity2704z00_2348), BgL_sidezd2effectzf32705z21_2349, BgL_predicatezd2of2706zd2_2350, BgL_stackzd2allocator2707zd2_2351, 
CBOOL(BgL_topzf32708zf3_2352), BgL_thezd2closure2709zd2_2353, BgL_effect2710z00_2354, BgL_property2711z00_2355, BgL_args2712z00_2356, BgL_body2713z00_2357, BgL_class2714z00_2358, BgL_dssslzd2keywords2715zd2_2359, BgL_loc2716z00_2360, 
CBOOL(BgL_gzf32684zf3_2361), BgL_cfrom2685z00_2362, BgL_cfromza22686za2_2363, BgL_cto2687z00_2364, BgL_ctoza22688za2_2365, BgL_cfunction2689z00_2366, BgL_integrator2690z00_2367, BgL_imark2691z00_2368, BgL_owner2692z00_2369, BgL_integrated2693z00_2370, BgL_pluggedzd2in2694zd2_2371, 
(long)CINT(BgL_mark2695z00_2372), BgL_freezd2mark2696zd2_2373, BgL_thezd2global2697zd2_2374, BgL_kaptured2698z00_2375, BgL_newzd2body2699zd2_2376, 
(long)CINT(BgL_bmark2700z00_2377), 
(long)CINT(BgL_umark2701z00_2378), BgL_free2702z00_2379, BgL_bound2703z00_2380); 
return 
(obj_t)(BgL_auxz00_3002);} } 
}



/* fill-sfun/Ginfo! */
BGL_EXPORTED_DEF BgL_sfunzf2ginfozf2_bglt BGl_fillzd2sfunzf2Ginfoz12z32zzglobaliza7e_ginfoza7(BgL_sfunzf2ginfozf2_bglt BgL_new2739z00_173, bool_t BgL_gzf32719zf3_174, obj_t BgL_cfrom2720z00_175, obj_t BgL_cfromza22721za2_176, obj_t BgL_cto2722z00_177, obj_t BgL_ctoza22723za2_178, obj_t BgL_cfunction2724z00_179, obj_t BgL_integrator2725z00_180, obj_t BgL_imark2726z00_181, obj_t BgL_owner2727z00_182, obj_t BgL_integrated2728z00_183, obj_t BgL_pluggedzd2in2729zd2_184, long BgL_mark2730z00_185, obj_t BgL_freezd2mark2731zd2_186, obj_t BgL_thezd2global2732zd2_187, obj_t BgL_kaptured2733z00_188, obj_t BgL_newzd2body2734zd2_189, long BgL_bmark2735z00_190, long BgL_umark2736z00_191, obj_t BgL_free2737z00_192, obj_t BgL_bound2738z00_193)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_gzf32719zf3_2532;obj_t BgL_cfrom2720z00_2533;obj_t BgL_cfromza22721za2_2534;obj_t BgL_cto2722z00_2535;obj_t BgL_ctoza22723za2_2536;obj_t BgL_cfunction2724z00_2537;obj_t BgL_integrator2725z00_2538;obj_t BgL_imark2726z00_2539;obj_t BgL_owner2727z00_2540;obj_t BgL_integrated2728z00_2541;obj_t BgL_pluggedzd2in2729zd2_2542;long BgL_mark2730z00_2543;obj_t BgL_freezd2mark2731zd2_2544;obj_t BgL_thezd2global2732zd2_2545;obj_t BgL_kaptured2733z00_2546;obj_t BgL_newzd2body2734zd2_2547;long BgL_bmark2735z00_2548;long BgL_umark2736z00_2549;obj_t BgL_free2737z00_2550;obj_t BgL_bound2738z00_2551;
BgL_gzf32719zf3_2532 = BgL_gzf32719zf3_174; 
BgL_cfrom2720z00_2533 = BgL_cfrom2720z00_175; 
BgL_cfromza22721za2_2534 = BgL_cfromza22721za2_176; 
BgL_cto2722z00_2535 = BgL_cto2722z00_177; 
BgL_ctoza22723za2_2536 = BgL_ctoza22723za2_178; 
BgL_cfunction2724z00_2537 = BgL_cfunction2724z00_179; 
BgL_integrator2725z00_2538 = BgL_integrator2725z00_180; 
BgL_imark2726z00_2539 = BgL_imark2726z00_181; 
BgL_owner2727z00_2540 = BgL_owner2727z00_182; 
BgL_integrated2728z00_2541 = BgL_integrated2728z00_183; 
BgL_pluggedzd2in2729zd2_2542 = BgL_pluggedzd2in2729zd2_184; 
BgL_mark2730z00_2543 = BgL_mark2730z00_185; 
BgL_freezd2mark2731zd2_2544 = BgL_freezd2mark2731zd2_186; 
BgL_thezd2global2732zd2_2545 = BgL_thezd2global2732zd2_187; 
BgL_kaptured2733z00_2546 = BgL_kaptured2733z00_188; 
BgL_newzd2body2734zd2_2547 = BgL_newzd2body2734zd2_189; 
BgL_bmark2735z00_2548 = BgL_bmark2735z00_190; 
BgL_umark2736z00_2549 = BgL_umark2736z00_191; 
BgL_free2737z00_2550 = BgL_free2737z00_192; 
BgL_bound2738z00_2551 = BgL_bound2738z00_193; 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32719zf3_2532), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_cfromz00) = ((obj_t)BgL_cfrom2720z00_2533), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_cfromza2za2) = ((obj_t)BgL_cfromza22721za2_2534), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_ctoz00) = ((obj_t)BgL_cto2722z00_2535), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_ctoza2za2) = ((obj_t)BgL_ctoza22723za2_2536), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_cfunctionz00) = ((obj_t)BgL_cfunction2724z00_2537), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_integratorz00) = ((obj_t)BgL_integrator2725z00_2538), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_imarkz00) = ((obj_t)BgL_imark2726z00_2539), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_ownerz00) = ((obj_t)BgL_owner2727z00_2540), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_integratedz00) = ((obj_t)BgL_integrated2728z00_2541), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_pluggedzd2inzd2) = ((obj_t)BgL_pluggedzd2in2729zd2_2542), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_markz00) = ((long)BgL_mark2730z00_2543), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_freezd2markzd2) = ((obj_t)BgL_freezd2mark2731zd2_2544), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_thezd2globalzd2) = ((obj_t)BgL_thezd2global2732zd2_2545), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_kapturedz00) = ((obj_t)BgL_kaptured2733z00_2546), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_newzd2bodyzd2) = ((obj_t)BgL_newzd2body2734zd2_2547), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_bmarkz00) = ((long)BgL_bmark2735z00_2548), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_umarkz00) = ((long)BgL_umark2736z00_2549), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_freez00) = ((obj_t)BgL_free2737z00_2550), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_173))->BgL_boundz00) = ((obj_t)BgL_bound2738z00_2551), BUNSPEC); 
return BgL_new2739z00_173;} } 
}



/* _fill-sfun/Ginfo! */
obj_t BGl__fillzd2sfunzf2Ginfoz12z32zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2381, obj_t BgL_new2739z00_2382, obj_t BgL_gzf32719zf3_2383, obj_t BgL_cfrom2720z00_2384, obj_t BgL_cfromza22721za2_2385, obj_t BgL_cto2722z00_2386, obj_t BgL_ctoza22723za2_2387, obj_t BgL_cfunction2724z00_2388, obj_t BgL_integrator2725z00_2389, obj_t BgL_imark2726z00_2390, obj_t BgL_owner2727z00_2391, obj_t BgL_integrated2728z00_2392, obj_t BgL_pluggedzd2in2729zd2_2393, obj_t BgL_mark2730z00_2394, obj_t BgL_freezd2mark2731zd2_2395, obj_t BgL_thezd2global2732zd2_2396, obj_t BgL_kaptured2733z00_2397, obj_t BgL_newzd2body2734zd2_2398, obj_t BgL_bmark2735z00_2399, obj_t BgL_umark2736z00_2400, obj_t BgL_free2737z00_2401, obj_t BgL_bound2738z00_2402)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_auxz00_3031;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_res4506z00_2593;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2739z00_2552;bool_t BgL_gzf32719zf3_2553;long BgL_mark2730z00_2564;long BgL_bmark2735z00_2569;long BgL_umark2736z00_2570;
BgL_new2739z00_2552 = 
(BgL_sfunzf2ginfozf2_bglt)(BgL_new2739z00_2382); 
BgL_gzf32719zf3_2553 = 
CBOOL(BgL_gzf32719zf3_2383); 
BgL_mark2730z00_2564 = 
(long)CINT(BgL_mark2730z00_2394); 
BgL_bmark2735z00_2569 = 
(long)CINT(BgL_bmark2735z00_2399); 
BgL_umark2736z00_2570 = 
(long)CINT(BgL_umark2736z00_2400); 
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_gzf32719zf3_2573;obj_t BgL_cfrom2720z00_2574;obj_t BgL_cfromza22721za2_2575;obj_t BgL_cto2722z00_2576;obj_t BgL_ctoza22723za2_2577;obj_t BgL_cfunction2724z00_2578;obj_t BgL_integrator2725z00_2579;obj_t BgL_imark2726z00_2580;obj_t BgL_owner2727z00_2581;obj_t BgL_integrated2728z00_2582;obj_t BgL_pluggedzd2in2729zd2_2583;long BgL_mark2730z00_2584;obj_t BgL_freezd2mark2731zd2_2585;obj_t BgL_thezd2global2732zd2_2586;obj_t BgL_kaptured2733z00_2587;obj_t BgL_newzd2body2734zd2_2588;long BgL_bmark2735z00_2589;long BgL_umark2736z00_2590;obj_t BgL_free2737z00_2591;obj_t BgL_bound2738z00_2592;
BgL_gzf32719zf3_2573 = BgL_gzf32719zf3_2553; 
BgL_cfrom2720z00_2574 = BgL_cfrom2720z00_2384; 
BgL_cfromza22721za2_2575 = BgL_cfromza22721za2_2385; 
BgL_cto2722z00_2576 = BgL_cto2722z00_2386; 
BgL_ctoza22723za2_2577 = BgL_ctoza22723za2_2387; 
BgL_cfunction2724z00_2578 = BgL_cfunction2724z00_2388; 
BgL_integrator2725z00_2579 = BgL_integrator2725z00_2389; 
BgL_imark2726z00_2580 = BgL_imark2726z00_2390; 
BgL_owner2727z00_2581 = BgL_owner2727z00_2391; 
BgL_integrated2728z00_2582 = BgL_integrated2728z00_2392; 
BgL_pluggedzd2in2729zd2_2583 = BgL_pluggedzd2in2729zd2_2393; 
BgL_mark2730z00_2584 = BgL_mark2730z00_2564; 
BgL_freezd2mark2731zd2_2585 = BgL_freezd2mark2731zd2_2395; 
BgL_thezd2global2732zd2_2586 = BgL_thezd2global2732zd2_2396; 
BgL_kaptured2733z00_2587 = BgL_kaptured2733z00_2397; 
BgL_newzd2body2734zd2_2588 = BgL_newzd2body2734zd2_2398; 
BgL_bmark2735z00_2589 = BgL_bmark2735z00_2569; 
BgL_umark2736z00_2590 = BgL_umark2736z00_2570; 
BgL_free2737z00_2591 = BgL_free2737z00_2401; 
BgL_bound2738z00_2592 = BgL_bound2738z00_2402; 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32719zf3_2573), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_cfromz00) = ((obj_t)BgL_cfrom2720z00_2574), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_cfromza2za2) = ((obj_t)BgL_cfromza22721za2_2575), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_ctoz00) = ((obj_t)BgL_cto2722z00_2576), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_ctoza2za2) = ((obj_t)BgL_ctoza22723za2_2577), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_cfunctionz00) = ((obj_t)BgL_cfunction2724z00_2578), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_integratorz00) = ((obj_t)BgL_integrator2725z00_2579), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_imarkz00) = ((obj_t)BgL_imark2726z00_2580), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_ownerz00) = ((obj_t)BgL_owner2727z00_2581), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_integratedz00) = ((obj_t)BgL_integrated2728z00_2582), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_pluggedzd2inzd2) = ((obj_t)BgL_pluggedzd2in2729zd2_2583), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_markz00) = ((long)BgL_mark2730z00_2584), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_freezd2markzd2) = ((obj_t)BgL_freezd2mark2731zd2_2585), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_thezd2globalzd2) = ((obj_t)BgL_thezd2global2732zd2_2586), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_kapturedz00) = ((obj_t)BgL_kaptured2733z00_2587), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_newzd2bodyzd2) = ((obj_t)BgL_newzd2body2734zd2_2588), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_bmarkz00) = ((long)BgL_bmark2735z00_2589), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_umarkz00) = ((long)BgL_umark2736z00_2590), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_freez00) = ((obj_t)BgL_free2737z00_2591), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2552))->BgL_boundz00) = ((obj_t)BgL_bound2738z00_2592), BUNSPEC); 
BgL_res4506z00_2593 = BgL_new2739z00_2552; } } 
BgL_auxz00_3031 = BgL_res4506z00_2593; } 
return 
(obj_t)(BgL_auxz00_3031);} } 
}



/* allocate-sfun/Ginfo */
BGL_EXPORTED_DEF BgL_sfunz00_bglt BGl_allocatezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunz00_bglt BgL_new2761z00_2594;
BgL_new2761z00_2594 = 
((BgL_sfunz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_sfunz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 19 */
long BgL_arg3291z00_2595;
BgL_arg3291z00_2595 = 
BGl_classzd2numzd2zz__objectz00(BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_objz00_2596;
BgL_objz00_2596 = 
(BgL_objectz00_bglt)(BgL_new2761z00_2594); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2596, BgL_arg3291z00_2595); } } 
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3062;
BgL_auxz00_3062 = 
(BgL_objectz00_bglt)(BgL_new2761z00_2594); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3062, BFALSE); } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_objz00_2597;
BgL_objz00_2597 = 
(obj_t)(BgL_new2761z00_2594); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2597); BUNSPEC; } 
return BgL_new2761z00_2594;} } 
}



/* _allocate-sfun/Ginfo */
obj_t BGl__allocatezd2sfunzf2Ginfoz20zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2233)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunz00_bglt BgL_auxz00_3067;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunz00_bglt BgL_res4507z00_2602;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunz00_bglt BgL_new2761z00_2598;
BgL_new2761z00_2598 = 
((BgL_sfunz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_sfunz00_bgl) ))); 
{ /* ./Globalize/ginfo.scm 19 */
long BgL_arg3291z00_2599;
BgL_arg3291z00_2599 = 
BGl_classzd2numzd2zz__objectz00(BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_objz00_2600;
BgL_objz00_2600 = 
(BgL_objectz00_bglt)(BgL_new2761z00_2598); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2600, BgL_arg3291z00_2599); } } 
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3072;
BgL_auxz00_3072 = 
(BgL_objectz00_bglt)(BgL_new2761z00_2598); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3072, BFALSE); } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_objz00_2601;
BgL_objz00_2601 = 
(obj_t)(BgL_new2761z00_2598); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2601); BUNSPEC; } 
BgL_res4507z00_2602 = BgL_new2761z00_2598; } 
BgL_auxz00_3067 = BgL_res4507z00_2602; } 
return 
(obj_t)(BgL_auxz00_3067);} } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 15 */
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4472z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4473z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4474z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4475z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4476z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4477z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4478z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4479z00zzglobaliza7e_ginfoza7); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4480z00zzglobaliza7e_ginfoza7); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7, BGl_proc4481z00zzglobaliza7e_ginfoza7);} 
}



/* struct+object->object-sfun/Ginfo3137 */
obj_t BGl_structzb2objectzd2ze3objectzd2sfunzf2Ginfo3137za3zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2418, obj_t BgL_oz00_2419, obj_t BgL_sz00_2420)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ 
BgL_sfunzf2ginfozf2_bglt BgL_oz00_1527;obj_t BgL_sz00_1528;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_auxz00_3088;
BgL_oz00_1527 = 
(BgL_sfunzf2ginfozf2_bglt)(BgL_oz00_2419); 
BgL_sz00_1528 = BgL_sz00_2420; 
{ 

{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_old2765z00_1531;obj_t BgL_aux2766z00_1532;
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_nextzd2method3136zd2_1556;
BgL_nextzd2method3136zd2_1556 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1527), BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_test4029z00_1557;
BgL_test4029z00_1557 = 
PROCEDUREP(BgL_nextzd2method3136zd2_1556); 
if(BgL_test4029z00_1557)
{ /* ./Globalize/ginfo.scm 19 */
BgL_old2765z00_1531 = 
PROCEDURE_ENTRY(BgL_nextzd2method3136zd2_1556)(BgL_nextzd2method3136zd2_1556, 
(obj_t)(BgL_oz00_1527), BgL_sz00_1528, BEOA); }  else 
{ /* ./Globalize/ginfo.scm 19 */
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3096;
BgL_auxz00_3096 = 
BGl_structzb2objectzd2ze3objectz83zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1527), BgL_sz00_1528); 
BgL_old2765z00_1531 = 
(obj_t)(BgL_auxz00_3096); } } } } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3100;
BgL_auxz00_3100 = 
(int)(((long)0)); 
BgL_aux2766z00_1532 = 
STRUCT_REF(BgL_sz00_1528, BgL_auxz00_3100); } 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2767z00_1533;
BgL_new2767z00_1533 = 
((BgL_sfunzf2ginfozf2_bglt)(BgL_old2765z00_1531)); 
{ /* ./Globalize/ginfo.scm 19 */
long BgL_arg3978z00_1534;
BgL_arg3978z00_1534 = 
BGl_classzd2numzd2zz__objectz00(BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_objz00_2125;
BgL_objz00_2125 = 
(BgL_objectz00_bglt)(BgL_new2767z00_1533); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2125, BgL_arg3978z00_1534); } } 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_arg3982z00_1535;
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3985z00_1536;obj_t BgL_arg3986z00_1537;obj_t BgL_arg3987z00_1538;obj_t BgL_arg3988z00_1539;obj_t BgL_arg3989z00_1540;obj_t BgL_arg3990z00_1541;obj_t BgL_arg3991z00_1542;obj_t BgL_arg3992z00_1543;obj_t BgL_arg3993z00_1544;obj_t BgL_arg3994z00_1545;obj_t BgL_arg3995z00_1546;obj_t BgL_arg3996z00_1547;obj_t BgL_arg3997z00_1548;obj_t BgL_arg3998z00_1549;obj_t BgL_arg3999z00_1550;obj_t BgL_arg4000z00_1551;obj_t BgL_arg4001z00_1552;obj_t BgL_arg4002z00_1553;obj_t BgL_arg4003z00_1554;obj_t BgL_arg4004z00_1555;
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3107;
BgL_auxz00_3107 = 
(int)(((long)0)); 
BgL_arg3985z00_1536 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3107); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3110;
BgL_auxz00_3110 = 
(int)(((long)1)); 
BgL_arg3986z00_1537 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3110); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3113;
BgL_auxz00_3113 = 
(int)(((long)2)); 
BgL_arg3987z00_1538 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3113); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3116;
BgL_auxz00_3116 = 
(int)(((long)3)); 
BgL_arg3988z00_1539 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3116); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3119;
BgL_auxz00_3119 = 
(int)(((long)4)); 
BgL_arg3989z00_1540 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3119); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3122;
BgL_auxz00_3122 = 
(int)(((long)5)); 
BgL_arg3990z00_1541 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3122); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3125;
BgL_auxz00_3125 = 
(int)(((long)6)); 
BgL_arg3991z00_1542 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3125); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3128;
BgL_auxz00_3128 = 
(int)(((long)7)); 
BgL_arg3992z00_1543 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3128); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3131;
BgL_auxz00_3131 = 
(int)(((long)8)); 
BgL_arg3993z00_1544 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3131); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3134;
BgL_auxz00_3134 = 
(int)(((long)9)); 
BgL_arg3994z00_1545 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3134); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3137;
BgL_auxz00_3137 = 
(int)(((long)10)); 
BgL_arg3995z00_1546 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3137); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3140;
BgL_auxz00_3140 = 
(int)(((long)11)); 
BgL_arg3996z00_1547 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3140); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3143;
BgL_auxz00_3143 = 
(int)(((long)12)); 
BgL_arg3997z00_1548 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3143); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3146;
BgL_auxz00_3146 = 
(int)(((long)13)); 
BgL_arg3998z00_1549 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3146); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3149;
BgL_auxz00_3149 = 
(int)(((long)14)); 
BgL_arg3999z00_1550 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3149); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3152;
BgL_auxz00_3152 = 
(int)(((long)15)); 
BgL_arg4000z00_1551 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3152); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3155;
BgL_auxz00_3155 = 
(int)(((long)16)); 
BgL_arg4001z00_1552 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3155); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3158;
BgL_auxz00_3158 = 
(int)(((long)17)); 
BgL_arg4002z00_1553 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3158); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3161;
BgL_auxz00_3161 = 
(int)(((long)18)); 
BgL_arg4003z00_1554 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3161); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_auxz00_3164;
BgL_auxz00_3164 = 
(int)(((long)19)); 
BgL_arg4004z00_1555 = 
STRUCT_REF(BgL_aux2766z00_1532, BgL_auxz00_3164); } 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_res4066z00_2230;
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_gzf32662zf3_2167;long BgL_mark2673z00_2178;long BgL_bmark2678z00_2183;long BgL_umark2679z00_2184;
BgL_gzf32662zf3_2167 = 
CBOOL(BgL_arg3985z00_1536); 
BgL_mark2673z00_2178 = 
(long)CINT(BgL_arg3996z00_1547); 
BgL_bmark2678z00_2183 = 
(long)CINT(BgL_arg4001z00_1552); 
BgL_umark2679z00_2184 = 
(long)CINT(BgL_arg4002z00_1553); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2682z00_2187;
BgL_new2682z00_2187 = 
((BgL_sfunzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_sfunzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_res4065z00_2229;
{ /* ./Globalize/ginfo.scm 19 */
BgL_sfunzf2ginfozf2_bglt BgL_new2739z00_2188;
BgL_new2739z00_2188 = BgL_new2682z00_2187; 
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_gzf32719zf3_2209;obj_t BgL_cfrom2720z00_2210;obj_t BgL_cfromza22721za2_2211;obj_t BgL_cto2722z00_2212;obj_t BgL_ctoza22723za2_2213;obj_t BgL_cfunction2724z00_2214;obj_t BgL_integrator2725z00_2215;obj_t BgL_imark2726z00_2216;obj_t BgL_owner2727z00_2217;obj_t BgL_integrated2728z00_2218;obj_t BgL_pluggedzd2in2729zd2_2219;long BgL_mark2730z00_2220;obj_t BgL_freezd2mark2731zd2_2221;obj_t BgL_thezd2global2732zd2_2222;obj_t BgL_kaptured2733z00_2223;obj_t BgL_newzd2body2734zd2_2224;long BgL_bmark2735z00_2225;long BgL_umark2736z00_2226;obj_t BgL_free2737z00_2227;obj_t BgL_bound2738z00_2228;
BgL_gzf32719zf3_2209 = BgL_gzf32662zf3_2167; 
BgL_cfrom2720z00_2210 = BgL_arg3986z00_1537; 
BgL_cfromza22721za2_2211 = BgL_arg3987z00_1538; 
BgL_cto2722z00_2212 = BgL_arg3988z00_1539; 
BgL_ctoza22723za2_2213 = BgL_arg3989z00_1540; 
BgL_cfunction2724z00_2214 = BgL_arg3990z00_1541; 
BgL_integrator2725z00_2215 = BgL_arg3991z00_1542; 
BgL_imark2726z00_2216 = BgL_arg3992z00_1543; 
BgL_owner2727z00_2217 = BgL_arg3993z00_1544; 
BgL_integrated2728z00_2218 = BgL_arg3994z00_1545; 
BgL_pluggedzd2in2729zd2_2219 = BgL_arg3995z00_1546; 
BgL_mark2730z00_2220 = BgL_mark2673z00_2178; 
BgL_freezd2mark2731zd2_2221 = BgL_arg3997z00_1548; 
BgL_thezd2global2732zd2_2222 = BgL_arg3998z00_1549; 
BgL_kaptured2733z00_2223 = BgL_arg3999z00_1550; 
BgL_newzd2body2734zd2_2224 = BgL_arg4000z00_1551; 
BgL_bmark2735z00_2225 = BgL_bmark2678z00_2183; 
BgL_umark2736z00_2226 = BgL_umark2679z00_2184; 
BgL_free2737z00_2227 = BgL_arg4003z00_1554; 
BgL_bound2738z00_2228 = BgL_arg4004z00_1555; 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32719zf3_2209), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_cfromz00) = ((obj_t)BgL_cfrom2720z00_2210), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_cfromza2za2) = ((obj_t)BgL_cfromza22721za2_2211), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_ctoz00) = ((obj_t)BgL_cto2722z00_2212), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_ctoza2za2) = ((obj_t)BgL_ctoza22723za2_2213), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_cfunctionz00) = ((obj_t)BgL_cfunction2724z00_2214), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_integratorz00) = ((obj_t)BgL_integrator2725z00_2215), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_imarkz00) = ((obj_t)BgL_imark2726z00_2216), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_ownerz00) = ((obj_t)BgL_owner2727z00_2217), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_integratedz00) = ((obj_t)BgL_integrated2728z00_2218), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_pluggedzd2inzd2) = ((obj_t)BgL_pluggedzd2in2729zd2_2219), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_markz00) = ((long)BgL_mark2730z00_2220), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_freezd2markzd2) = ((obj_t)BgL_freezd2mark2731zd2_2221), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_thezd2globalzd2) = ((obj_t)BgL_thezd2global2732zd2_2222), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_kapturedz00) = ((obj_t)BgL_kaptured2733z00_2223), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_newzd2bodyzd2) = ((obj_t)BgL_newzd2body2734zd2_2224), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_bmarkz00) = ((long)BgL_bmark2735z00_2225), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_umarkz00) = ((long)BgL_umark2736z00_2226), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_freez00) = ((obj_t)BgL_free2737z00_2227), BUNSPEC); 
((((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_new2739z00_2188))->BgL_boundz00) = ((obj_t)BgL_bound2738z00_2228), BUNSPEC); 
BgL_res4065z00_2229 = BgL_new2739z00_2188; } } BgL_res4065z00_2229; } 
BgL_res4066z00_2230 = BgL_new2682z00_2187; } } 
BgL_arg3982z00_1535 = BgL_res4066z00_2230; } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_auxz00_3194;BgL_objectz00_bglt BgL_auxz00_3192;
BgL_auxz00_3194 = 
(obj_t)(BgL_arg3982z00_1535); 
BgL_auxz00_3192 = 
(BgL_objectz00_bglt)(BgL_new2767z00_1533); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3192, BgL_auxz00_3194); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_objz00_2231;
BgL_objz00_2231 = 
(obj_t)(BgL_new2767z00_1533); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2231); BUNSPEC; } 
BgL_auxz00_3088 = BgL_new2767z00_1533; } } } 
return 
(obj_t)(BgL_auxz00_3088);} } } 
}



/* object->struct-sfun/Ginfo3135 */
obj_t BGl_objectzd2ze3structzd2sfunzf2Ginfo3135z11zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2421, obj_t BgL_obj2762z00_2422)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 19 */
{ 
BgL_sfunzf2ginfozf2_bglt BgL_obj2762z00_1479;
BgL_obj2762z00_1479 = 
(BgL_sfunzf2ginfozf2_bglt)(BgL_obj2762z00_2422); 
{ 

{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_res2763z00_1482;
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_nextzd2method3134zd2_1525;
BgL_nextzd2method3134zd2_1525 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2762z00_1479), BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_sfunzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_test3970z00_1526;
BgL_test3970z00_1526 = 
PROCEDUREP(BgL_nextzd2method3134zd2_1525); 
if(BgL_test3970z00_1526)
{ /* ./Globalize/ginfo.scm 19 */
BgL_res2763z00_1482 = 
PROCEDURE_ENTRY(BgL_nextzd2method3134zd2_1525)(BgL_nextzd2method3134zd2_1525, 
(obj_t)(BgL_obj2762z00_1479), BEOA); }  else 
{ /* ./Globalize/ginfo.scm 19 */
BgL_res2763z00_1482 = 
BGl_objectzd2ze3structz31zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2762z00_1479)); } } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_aux2764z00_1483;
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_keyz00_2030;int BgL_lenz00_2031;
BgL_keyz00_2030 = 
CNST_TABLE_REF(((long)0)); 
BgL_lenz00_2031 = 
(int)(((long)20)); 
BgL_aux2764z00_1483 = 
make_struct(BgL_keyz00_2030, BgL_lenz00_2031, BUNSPEC); } 
{ /* ./Globalize/ginfo.scm 19 */
bool_t BgL_arg3862z00_1485;
{ 
obj_t BgL_auxz00_3213;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3214;
BgL_auxz00_3214 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3213 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3214); } 
BgL_arg3862z00_1485 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3213))->BgL_gzf3zf3); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2035;obj_t BgL_oz00_2036;
BgL_kz00_2035 = 
(int)(((long)0)); 
BgL_oz00_2036 = 
BBOOL(BgL_arg3862z00_1485); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2035, BgL_oz00_2036); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3867z00_1487;
{ 
obj_t BgL_auxz00_3221;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3222;
BgL_auxz00_3222 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3221 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3222); } 
BgL_arg3867z00_1487 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3221))->BgL_cfromz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2039;
BgL_kz00_2039 = 
(int)(((long)1)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2039, BgL_arg3867z00_1487); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3872z00_1489;
{ 
obj_t BgL_auxz00_3228;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3229;
BgL_auxz00_3229 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3228 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3229); } 
BgL_arg3872z00_1489 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3228))->BgL_cfromza2za2); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2043;
BgL_kz00_2043 = 
(int)(((long)2)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2043, BgL_arg3872z00_1489); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3877z00_1491;
{ 
obj_t BgL_auxz00_3235;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3236;
BgL_auxz00_3236 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3235 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3236); } 
BgL_arg3877z00_1491 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3235))->BgL_ctoz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2047;
BgL_kz00_2047 = 
(int)(((long)3)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2047, BgL_arg3877z00_1491); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3882z00_1493;
{ 
obj_t BgL_auxz00_3242;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3243;
BgL_auxz00_3243 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3242 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3243); } 
BgL_arg3882z00_1493 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3242))->BgL_ctoza2za2); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2051;
BgL_kz00_2051 = 
(int)(((long)4)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2051, BgL_arg3882z00_1493); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3887z00_1495;
{ 
obj_t BgL_auxz00_3249;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3250;
BgL_auxz00_3250 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3249 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3250); } 
BgL_arg3887z00_1495 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3249))->BgL_cfunctionz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2055;
BgL_kz00_2055 = 
(int)(((long)5)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2055, BgL_arg3887z00_1495); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3892z00_1497;
{ 
obj_t BgL_auxz00_3256;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3257;
BgL_auxz00_3257 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3256 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3257); } 
BgL_arg3892z00_1497 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3256))->BgL_integratorz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2059;
BgL_kz00_2059 = 
(int)(((long)6)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2059, BgL_arg3892z00_1497); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3897z00_1499;
{ 
obj_t BgL_auxz00_3263;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3264;
BgL_auxz00_3264 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3263 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3264); } 
BgL_arg3897z00_1499 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3263))->BgL_imarkz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2063;
BgL_kz00_2063 = 
(int)(((long)7)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2063, BgL_arg3897z00_1499); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3902z00_1501;
{ 
obj_t BgL_auxz00_3270;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3271;
BgL_auxz00_3271 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3270 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3271); } 
BgL_arg3902z00_1501 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3270))->BgL_ownerz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2067;
BgL_kz00_2067 = 
(int)(((long)8)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2067, BgL_arg3902z00_1501); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3907z00_1503;
{ 
obj_t BgL_auxz00_3277;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3278;
BgL_auxz00_3278 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3277 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3278); } 
BgL_arg3907z00_1503 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3277))->BgL_integratedz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2071;
BgL_kz00_2071 = 
(int)(((long)9)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2071, BgL_arg3907z00_1503); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3912z00_1505;
{ 
obj_t BgL_auxz00_3284;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3285;
BgL_auxz00_3285 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3284 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3285); } 
BgL_arg3912z00_1505 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3284))->BgL_pluggedzd2inzd2); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2075;
BgL_kz00_2075 = 
(int)(((long)10)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2075, BgL_arg3912z00_1505); } } 
{ /* ./Globalize/ginfo.scm 19 */
long BgL_arg3917z00_1507;
{ 
obj_t BgL_auxz00_3291;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3292;
BgL_auxz00_3292 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3291 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3292); } 
BgL_arg3917z00_1507 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3291))->BgL_markz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2079;obj_t BgL_oz00_2080;
BgL_kz00_2079 = 
(int)(((long)11)); 
BgL_oz00_2080 = 
BINT(BgL_arg3917z00_1507); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2079, BgL_oz00_2080); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3922z00_1509;
{ 
obj_t BgL_auxz00_3299;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3300;
BgL_auxz00_3300 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3299 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3300); } 
BgL_arg3922z00_1509 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3299))->BgL_freezd2markzd2); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2083;
BgL_kz00_2083 = 
(int)(((long)12)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2083, BgL_arg3922z00_1509); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3927z00_1511;
{ 
obj_t BgL_auxz00_3306;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3307;
BgL_auxz00_3307 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3306 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3307); } 
BgL_arg3927z00_1511 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3306))->BgL_thezd2globalzd2); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2087;
BgL_kz00_2087 = 
(int)(((long)13)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2087, BgL_arg3927z00_1511); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3932z00_1513;
{ 
obj_t BgL_auxz00_3313;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3314;
BgL_auxz00_3314 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3313 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3314); } 
BgL_arg3932z00_1513 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3313))->BgL_kapturedz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2091;
BgL_kz00_2091 = 
(int)(((long)14)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2091, BgL_arg3932z00_1513); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3938z00_1515;
{ 
obj_t BgL_auxz00_3320;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3321;
BgL_auxz00_3321 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3320 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3321); } 
BgL_arg3938z00_1515 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3320))->BgL_newzd2bodyzd2); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2095;
BgL_kz00_2095 = 
(int)(((long)15)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2095, BgL_arg3938z00_1515); } } 
{ /* ./Globalize/ginfo.scm 19 */
long BgL_arg3944z00_1517;
{ 
obj_t BgL_auxz00_3327;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3328;
BgL_auxz00_3328 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3327 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3328); } 
BgL_arg3944z00_1517 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3327))->BgL_bmarkz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2099;obj_t BgL_oz00_2100;
BgL_kz00_2099 = 
(int)(((long)16)); 
BgL_oz00_2100 = 
BINT(BgL_arg3944z00_1517); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2099, BgL_oz00_2100); } } 
{ /* ./Globalize/ginfo.scm 19 */
long BgL_arg3949z00_1519;
{ 
obj_t BgL_auxz00_3335;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3336;
BgL_auxz00_3336 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3335 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3336); } 
BgL_arg3949z00_1519 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3335))->BgL_umarkz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2103;obj_t BgL_oz00_2104;
BgL_kz00_2103 = 
(int)(((long)17)); 
BgL_oz00_2104 = 
BINT(BgL_arg3949z00_1519); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2103, BgL_oz00_2104); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3954z00_1521;
{ 
obj_t BgL_auxz00_3343;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3344;
BgL_auxz00_3344 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3343 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3344); } 
BgL_arg3954z00_1521 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3343))->BgL_freez00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2107;
BgL_kz00_2107 = 
(int)(((long)18)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2107, BgL_arg3954z00_1521); } } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3959z00_1523;
{ 
obj_t BgL_auxz00_3350;
{ /* ./Globalize/ginfo.scm 19 */
BgL_objectz00_bglt BgL_auxz00_3351;
BgL_auxz00_3351 = 
(BgL_objectz00_bglt)(BgL_obj2762z00_1479); 
BgL_auxz00_3350 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3351); } 
BgL_arg3959z00_1523 = 
(((BgL_sfunzf2ginfozf2_bglt)CREF(BgL_auxz00_3350))->BgL_boundz00); } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2111;
BgL_kz00_2111 = 
(int)(((long)19)); 
STRUCT_SET(BgL_aux2764z00_1483, BgL_kz00_2111, BgL_arg3959z00_1523); } } 
{ /* ./Globalize/ginfo.scm 19 */
int BgL_kz00_2114;
BgL_kz00_2114 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2763z00_1482, BgL_kz00_2114, BgL_aux2764z00_1483); } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_arg3964z00_1524;
BgL_arg3964z00_1524 = 
STRUCT_KEY(BgL_res2763z00_1482); 
STRUCT_KEY_SET(BgL_aux2764z00_1483, BgL_arg3964z00_1524); } 
{ /* ./Globalize/ginfo.scm 19 */
obj_t BgL_kz00_2121;
BgL_kz00_2121 = 
CNST_TABLE_REF(((long)0)); 
STRUCT_KEY_SET(BgL_res2763z00_1482, BgL_kz00_2121); } 
return BgL_res2763z00_1482;} } } } } 
}



/* struct+object->object-svar/Ginfo3132 */
obj_t BGl_structzb2objectzd2ze3objectzd2svarzf2Ginfo3132za3zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2423, obj_t BgL_oz00_2424, obj_t BgL_sz00_2425)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ 
BgL_svarzf2ginfozf2_bglt BgL_oz00_1464;obj_t BgL_sz00_1465;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_auxz00_3364;
BgL_oz00_1464 = 
(BgL_svarzf2ginfozf2_bglt)(BgL_oz00_2424); 
BgL_sz00_1465 = BgL_sz00_2425; 
{ 

{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_old2893z00_1468;obj_t BgL_aux2894z00_1469;
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_nextzd2method3131zd2_1477;
BgL_nextzd2method3131zd2_1477 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1464), BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_test3854z00_1478;
BgL_test3854z00_1478 = 
PROCEDUREP(BgL_nextzd2method3131zd2_1477); 
if(BgL_test3854z00_1478)
{ /* ./Globalize/ginfo.scm 61 */
BgL_old2893z00_1468 = 
PROCEDURE_ENTRY(BgL_nextzd2method3131zd2_1477)(BgL_nextzd2method3131zd2_1477, 
(obj_t)(BgL_oz00_1464), BgL_sz00_1465, BEOA); }  else 
{ /* ./Globalize/ginfo.scm 61 */
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_auxz00_3372;
BgL_auxz00_3372 = 
BGl_structzb2objectzd2ze3objectz83zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1464), BgL_sz00_1465); 
BgL_old2893z00_1468 = 
(obj_t)(BgL_auxz00_3372); } } } } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_auxz00_3376;
BgL_auxz00_3376 = 
(int)(((long)0)); 
BgL_aux2894z00_1469 = 
STRUCT_REF(BgL_sz00_1465, BgL_auxz00_3376); } 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2895z00_1470;
BgL_new2895z00_1470 = 
((BgL_svarzf2ginfozf2_bglt)(BgL_old2893z00_1468)); 
{ /* ./Globalize/ginfo.scm 61 */
long BgL_arg3835z00_1471;
BgL_arg3835z00_1471 = 
BGl_classzd2numzd2zz__objectz00(BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_objz00_2002;
BgL_objz00_2002 = 
(BgL_objectz00_bglt)(BgL_new2895z00_1470); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2002, BgL_arg3835z00_1471); } } 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_arg3839z00_1472;
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_arg3842z00_1473;obj_t BgL_arg3843z00_1474;obj_t BgL_arg3844z00_1475;obj_t BgL_arg3845z00_1476;
{ /* ./Globalize/ginfo.scm 61 */
int BgL_auxz00_3383;
BgL_auxz00_3383 = 
(int)(((long)0)); 
BgL_arg3842z00_1473 = 
STRUCT_REF(BgL_aux2894z00_1469, BgL_auxz00_3383); } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_auxz00_3386;
BgL_auxz00_3386 = 
(int)(((long)1)); 
BgL_arg3843z00_1474 = 
STRUCT_REF(BgL_aux2894z00_1469, BgL_auxz00_3386); } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_auxz00_3389;
BgL_auxz00_3389 = 
(int)(((long)2)); 
BgL_arg3844z00_1475 = 
STRUCT_REF(BgL_aux2894z00_1469, BgL_auxz00_3389); } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_auxz00_3392;
BgL_auxz00_3392 = 
(int)(((long)3)); 
BgL_arg3845z00_1476 = 
STRUCT_REF(BgL_aux2894z00_1469, BgL_auxz00_3392); } 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_res4063z00_2027;
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_kapturedzf32866zf3_2012;long BgL_freezd2mark2867zd2_2013;long BgL_mark2868z00_2014;bool_t BgL_celledzf32869zf3_2015;
BgL_kapturedzf32866zf3_2012 = 
CBOOL(BgL_arg3842z00_1473); 
BgL_freezd2mark2867zd2_2013 = 
(long)CINT(BgL_arg3843z00_1474); 
BgL_mark2868z00_2014 = 
(long)CINT(BgL_arg3844z00_1475); 
BgL_celledzf32869zf3_2015 = 
CBOOL(BgL_arg3845z00_1476); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2870z00_2016;
BgL_new2870z00_2016 = 
((BgL_svarzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_svarzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_res4062z00_2026;
{ /* ./Globalize/ginfo.scm 61 */
BgL_svarzf2ginfozf2_bglt BgL_new2883z00_2017;
BgL_new2883z00_2017 = BgL_new2870z00_2016; 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_kapturedzf32879zf3_2022;long BgL_freezd2mark2880zd2_2023;long BgL_mark2881z00_2024;bool_t BgL_celledzf32882zf3_2025;
BgL_kapturedzf32879zf3_2022 = BgL_kapturedzf32866zf3_2012; 
BgL_freezd2mark2880zd2_2023 = BgL_freezd2mark2867zd2_2013; 
BgL_mark2881z00_2024 = BgL_mark2868z00_2014; 
BgL_celledzf32882zf3_2025 = BgL_celledzf32869zf3_2015; 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2017))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32879zf3_2022), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2017))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2880zd2_2023), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2017))->BgL_markz00) = ((long)BgL_mark2881z00_2024), BUNSPEC); 
((((BgL_svarzf2ginfozf2_bglt)CREF(BgL_new2883z00_2017))->BgL_celledzf3zf3) = ((bool_t)BgL_celledzf32882zf3_2025), BUNSPEC); 
BgL_res4062z00_2026 = BgL_new2883z00_2017; } } BgL_res4062z00_2026; } 
BgL_res4063z00_2027 = BgL_new2870z00_2016; } } 
BgL_arg3839z00_1472 = BgL_res4063z00_2027; } } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_auxz00_3406;BgL_objectz00_bglt BgL_auxz00_3404;
BgL_auxz00_3406 = 
(obj_t)(BgL_arg3839z00_1472); 
BgL_auxz00_3404 = 
(BgL_objectz00_bglt)(BgL_new2895z00_1470); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3404, BgL_auxz00_3406); } } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_objz00_2028;
BgL_objz00_2028 = 
(obj_t)(BgL_new2895z00_1470); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2028); BUNSPEC; } 
BgL_auxz00_3364 = BgL_new2895z00_1470; } } } 
return 
(obj_t)(BgL_auxz00_3364);} } } 
}



/* object->struct-svar/Ginfo3130 */
obj_t BGl_objectzd2ze3structzd2svarzf2Ginfo3130z11zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2426, obj_t BgL_obj2890z00_2427)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 61 */
{ 
BgL_svarzf2ginfozf2_bglt BgL_obj2890z00_1448;
BgL_obj2890z00_1448 = 
(BgL_svarzf2ginfozf2_bglt)(BgL_obj2890z00_2427); 
{ 

{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_res2891z00_1451;
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_nextzd2method3129zd2_1462;
BgL_nextzd2method3129zd2_1462 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2890z00_1448), BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_svarzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_test3828z00_1463;
BgL_test3828z00_1463 = 
PROCEDUREP(BgL_nextzd2method3129zd2_1462); 
if(BgL_test3828z00_1463)
{ /* ./Globalize/ginfo.scm 61 */
BgL_res2891z00_1451 = 
PROCEDURE_ENTRY(BgL_nextzd2method3129zd2_1462)(BgL_nextzd2method3129zd2_1462, 
(obj_t)(BgL_obj2890z00_1448), BEOA); }  else 
{ /* ./Globalize/ginfo.scm 61 */
BgL_res2891z00_1451 = 
BGl_objectzd2ze3structz31zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2890z00_1448)); } } } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_aux2892z00_1452;
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_keyz00_1971;int BgL_lenz00_1972;
BgL_keyz00_1971 = 
CNST_TABLE_REF(((long)1)); 
BgL_lenz00_1972 = 
(int)(((long)4)); 
BgL_aux2892z00_1452 = 
make_struct(BgL_keyz00_1971, BgL_lenz00_1972, BUNSPEC); } 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_arg3802z00_1454;
{ 
obj_t BgL_auxz00_3425;
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_auxz00_3426;
BgL_auxz00_3426 = 
(BgL_objectz00_bglt)(BgL_obj2890z00_1448); 
BgL_auxz00_3425 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3426); } 
BgL_arg3802z00_1454 = 
(((BgL_svarzf2ginfozf2_bglt)CREF(BgL_auxz00_3425))->BgL_kapturedzf3zf3); } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_kz00_1976;obj_t BgL_oz00_1977;
BgL_kz00_1976 = 
(int)(((long)0)); 
BgL_oz00_1977 = 
BBOOL(BgL_arg3802z00_1454); 
STRUCT_SET(BgL_aux2892z00_1452, BgL_kz00_1976, BgL_oz00_1977); } } 
{ /* ./Globalize/ginfo.scm 61 */
long BgL_arg3807z00_1456;
{ 
obj_t BgL_auxz00_3433;
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_auxz00_3434;
BgL_auxz00_3434 = 
(BgL_objectz00_bglt)(BgL_obj2890z00_1448); 
BgL_auxz00_3433 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3434); } 
BgL_arg3807z00_1456 = 
(((BgL_svarzf2ginfozf2_bglt)CREF(BgL_auxz00_3433))->BgL_freezd2markzd2); } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_kz00_1980;obj_t BgL_oz00_1981;
BgL_kz00_1980 = 
(int)(((long)1)); 
BgL_oz00_1981 = 
BINT(BgL_arg3807z00_1456); 
STRUCT_SET(BgL_aux2892z00_1452, BgL_kz00_1980, BgL_oz00_1981); } } 
{ /* ./Globalize/ginfo.scm 61 */
long BgL_arg3812z00_1458;
{ 
obj_t BgL_auxz00_3441;
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_auxz00_3442;
BgL_auxz00_3442 = 
(BgL_objectz00_bglt)(BgL_obj2890z00_1448); 
BgL_auxz00_3441 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3442); } 
BgL_arg3812z00_1458 = 
(((BgL_svarzf2ginfozf2_bglt)CREF(BgL_auxz00_3441))->BgL_markz00); } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_kz00_1984;obj_t BgL_oz00_1985;
BgL_kz00_1984 = 
(int)(((long)2)); 
BgL_oz00_1985 = 
BINT(BgL_arg3812z00_1458); 
STRUCT_SET(BgL_aux2892z00_1452, BgL_kz00_1984, BgL_oz00_1985); } } 
{ /* ./Globalize/ginfo.scm 61 */
bool_t BgL_arg3817z00_1460;
{ 
obj_t BgL_auxz00_3449;
{ /* ./Globalize/ginfo.scm 61 */
BgL_objectz00_bglt BgL_auxz00_3450;
BgL_auxz00_3450 = 
(BgL_objectz00_bglt)(BgL_obj2890z00_1448); 
BgL_auxz00_3449 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3450); } 
BgL_arg3817z00_1460 = 
(((BgL_svarzf2ginfozf2_bglt)CREF(BgL_auxz00_3449))->BgL_celledzf3zf3); } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_kz00_1988;obj_t BgL_oz00_1989;
BgL_kz00_1988 = 
(int)(((long)3)); 
BgL_oz00_1989 = 
BBOOL(BgL_arg3817z00_1460); 
STRUCT_SET(BgL_aux2892z00_1452, BgL_kz00_1988, BgL_oz00_1989); } } 
{ /* ./Globalize/ginfo.scm 61 */
int BgL_kz00_1991;
BgL_kz00_1991 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2891z00_1451, BgL_kz00_1991, BgL_aux2892z00_1452); } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_arg3822z00_1461;
BgL_arg3822z00_1461 = 
STRUCT_KEY(BgL_res2891z00_1451); 
STRUCT_KEY_SET(BgL_aux2892z00_1452, BgL_arg3822z00_1461); } 
{ /* ./Globalize/ginfo.scm 61 */
obj_t BgL_kz00_1998;
BgL_kz00_1998 = 
CNST_TABLE_REF(((long)1)); 
STRUCT_KEY_SET(BgL_res2891z00_1451, BgL_kz00_1998); } 
return BgL_res2891z00_1451;} } } } } 
}



/* struct+object->object-sexit/Ginfo3127 */
obj_t BGl_structzb2objectzd2ze3objectzd2sexitzf2Ginfo3127za3zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2428, obj_t BgL_oz00_2429, obj_t BgL_sz00_2430)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ 
BgL_sexitzf2ginfozf2_bglt BgL_oz00_1433;obj_t BgL_sz00_1434;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_auxz00_3464;
BgL_oz00_1433 = 
(BgL_sexitzf2ginfozf2_bglt)(BgL_oz00_2429); 
BgL_sz00_1434 = BgL_sz00_2430; 
{ 

{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_old2940z00_1437;obj_t BgL_aux2941z00_1438;
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_nextzd2method3126zd2_1446;
BgL_nextzd2method3126zd2_1446 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1433), BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_test3794z00_1447;
BgL_test3794z00_1447 = 
PROCEDUREP(BgL_nextzd2method3126zd2_1446); 
if(BgL_test3794z00_1447)
{ /* ./Globalize/ginfo.scm 71 */
BgL_old2940z00_1437 = 
PROCEDURE_ENTRY(BgL_nextzd2method3126zd2_1446)(BgL_nextzd2method3126zd2_1446, 
(obj_t)(BgL_oz00_1433), BgL_sz00_1434, BEOA); }  else 
{ /* ./Globalize/ginfo.scm 71 */
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_auxz00_3472;
BgL_auxz00_3472 = 
BGl_structzb2objectzd2ze3objectz83zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1433), BgL_sz00_1434); 
BgL_old2940z00_1437 = 
(obj_t)(BgL_auxz00_3472); } } } } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_auxz00_3476;
BgL_auxz00_3476 = 
(int)(((long)0)); 
BgL_aux2941z00_1438 = 
STRUCT_REF(BgL_sz00_1434, BgL_auxz00_3476); } 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2942z00_1439;
BgL_new2942z00_1439 = 
((BgL_sexitzf2ginfozf2_bglt)(BgL_old2940z00_1437)); 
{ /* ./Globalize/ginfo.scm 71 */
long BgL_arg3775z00_1440;
BgL_arg3775z00_1440 = 
BGl_classzd2numzd2zz__objectz00(BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_objz00_1943;
BgL_objz00_1943 = 
(BgL_objectz00_bglt)(BgL_new2942z00_1439); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1943, BgL_arg3775z00_1440); } } 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_arg3779z00_1441;
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_arg3782z00_1442;obj_t BgL_arg3783z00_1443;obj_t BgL_arg3784z00_1444;obj_t BgL_arg3785z00_1445;
{ /* ./Globalize/ginfo.scm 71 */
int BgL_auxz00_3483;
BgL_auxz00_3483 = 
(int)(((long)0)); 
BgL_arg3782z00_1442 = 
STRUCT_REF(BgL_aux2941z00_1438, BgL_auxz00_3483); } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_auxz00_3486;
BgL_auxz00_3486 = 
(int)(((long)1)); 
BgL_arg3783z00_1443 = 
STRUCT_REF(BgL_aux2941z00_1438, BgL_auxz00_3486); } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_auxz00_3489;
BgL_auxz00_3489 = 
(int)(((long)2)); 
BgL_arg3784z00_1444 = 
STRUCT_REF(BgL_aux2941z00_1438, BgL_auxz00_3489); } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_auxz00_3492;
BgL_auxz00_3492 = 
(int)(((long)3)); 
BgL_arg3785z00_1445 = 
STRUCT_REF(BgL_aux2941z00_1438, BgL_auxz00_3492); } 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_res4060z00_1968;
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_gzf32912zf3_1953;bool_t BgL_kapturedzf32913zf3_1954;long BgL_freezd2mark2914zd2_1955;long BgL_mark2915z00_1956;
BgL_gzf32912zf3_1953 = 
CBOOL(BgL_arg3782z00_1442); 
BgL_kapturedzf32913zf3_1954 = 
CBOOL(BgL_arg3783z00_1443); 
BgL_freezd2mark2914zd2_1955 = 
(long)CINT(BgL_arg3784z00_1444); 
BgL_mark2915z00_1956 = 
(long)CINT(BgL_arg3785z00_1445); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2916z00_1957;
BgL_new2916z00_1957 = 
((BgL_sexitzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_sexitzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_res4059z00_1967;
{ /* ./Globalize/ginfo.scm 71 */
BgL_sexitzf2ginfozf2_bglt BgL_new2930z00_1958;
BgL_new2930z00_1958 = BgL_new2916z00_1957; 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_gzf32926zf3_1963;bool_t BgL_kapturedzf32927zf3_1964;long BgL_freezd2mark2928zd2_1965;long BgL_mark2929z00_1966;
BgL_gzf32926zf3_1963 = BgL_gzf32912zf3_1953; 
BgL_kapturedzf32927zf3_1964 = BgL_kapturedzf32913zf3_1954; 
BgL_freezd2mark2928zd2_1965 = BgL_freezd2mark2914zd2_1955; 
BgL_mark2929z00_1966 = BgL_mark2915z00_1956; 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1958))->BgL_gzf3zf3) = ((bool_t)BgL_gzf32926zf3_1963), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1958))->BgL_kapturedzf3zf3) = ((bool_t)BgL_kapturedzf32927zf3_1964), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1958))->BgL_freezd2markzd2) = ((long)BgL_freezd2mark2928zd2_1965), BUNSPEC); 
((((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_new2930z00_1958))->BgL_markz00) = ((long)BgL_mark2929z00_1966), BUNSPEC); 
BgL_res4059z00_1967 = BgL_new2930z00_1958; } } BgL_res4059z00_1967; } 
BgL_res4060z00_1968 = BgL_new2916z00_1957; } } 
BgL_arg3779z00_1441 = BgL_res4060z00_1968; } } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_auxz00_3506;BgL_objectz00_bglt BgL_auxz00_3504;
BgL_auxz00_3506 = 
(obj_t)(BgL_arg3779z00_1441); 
BgL_auxz00_3504 = 
(BgL_objectz00_bglt)(BgL_new2942z00_1439); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3504, BgL_auxz00_3506); } } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_objz00_1969;
BgL_objz00_1969 = 
(obj_t)(BgL_new2942z00_1439); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1969); BUNSPEC; } 
BgL_auxz00_3464 = BgL_new2942z00_1439; } } } 
return 
(obj_t)(BgL_auxz00_3464);} } } 
}



/* object->struct-sexit/Ginfo3125 */
obj_t BGl_objectzd2ze3structzd2sexitzf2Ginfo3125z11zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2431, obj_t BgL_obj2937z00_2432)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 71 */
{ 
BgL_sexitzf2ginfozf2_bglt BgL_obj2937z00_1417;
BgL_obj2937z00_1417 = 
(BgL_sexitzf2ginfozf2_bglt)(BgL_obj2937z00_2432); 
{ 

{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_res2938z00_1420;
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_nextzd2method3124zd2_1431;
BgL_nextzd2method3124zd2_1431 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2937z00_1417), BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_sexitzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_test3768z00_1432;
BgL_test3768z00_1432 = 
PROCEDUREP(BgL_nextzd2method3124zd2_1431); 
if(BgL_test3768z00_1432)
{ /* ./Globalize/ginfo.scm 71 */
BgL_res2938z00_1420 = 
PROCEDURE_ENTRY(BgL_nextzd2method3124zd2_1431)(BgL_nextzd2method3124zd2_1431, 
(obj_t)(BgL_obj2937z00_1417), BEOA); }  else 
{ /* ./Globalize/ginfo.scm 71 */
BgL_res2938z00_1420 = 
BGl_objectzd2ze3structz31zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2937z00_1417)); } } } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_aux2939z00_1421;
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_keyz00_1912;int BgL_lenz00_1913;
BgL_keyz00_1912 = 
CNST_TABLE_REF(((long)2)); 
BgL_lenz00_1913 = 
(int)(((long)4)); 
BgL_aux2939z00_1421 = 
make_struct(BgL_keyz00_1912, BgL_lenz00_1913, BUNSPEC); } 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_arg3742z00_1423;
{ 
obj_t BgL_auxz00_3525;
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_auxz00_3526;
BgL_auxz00_3526 = 
(BgL_objectz00_bglt)(BgL_obj2937z00_1417); 
BgL_auxz00_3525 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3526); } 
BgL_arg3742z00_1423 = 
(((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_auxz00_3525))->BgL_gzf3zf3); } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_kz00_1917;obj_t BgL_oz00_1918;
BgL_kz00_1917 = 
(int)(((long)0)); 
BgL_oz00_1918 = 
BBOOL(BgL_arg3742z00_1423); 
STRUCT_SET(BgL_aux2939z00_1421, BgL_kz00_1917, BgL_oz00_1918); } } 
{ /* ./Globalize/ginfo.scm 71 */
bool_t BgL_arg3747z00_1425;
{ 
obj_t BgL_auxz00_3533;
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_auxz00_3534;
BgL_auxz00_3534 = 
(BgL_objectz00_bglt)(BgL_obj2937z00_1417); 
BgL_auxz00_3533 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3534); } 
BgL_arg3747z00_1425 = 
(((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_auxz00_3533))->BgL_kapturedzf3zf3); } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_kz00_1921;obj_t BgL_oz00_1922;
BgL_kz00_1921 = 
(int)(((long)1)); 
BgL_oz00_1922 = 
BBOOL(BgL_arg3747z00_1425); 
STRUCT_SET(BgL_aux2939z00_1421, BgL_kz00_1921, BgL_oz00_1922); } } 
{ /* ./Globalize/ginfo.scm 71 */
long BgL_arg3752z00_1427;
{ 
obj_t BgL_auxz00_3541;
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_auxz00_3542;
BgL_auxz00_3542 = 
(BgL_objectz00_bglt)(BgL_obj2937z00_1417); 
BgL_auxz00_3541 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3542); } 
BgL_arg3752z00_1427 = 
(((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_auxz00_3541))->BgL_freezd2markzd2); } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_kz00_1925;obj_t BgL_oz00_1926;
BgL_kz00_1925 = 
(int)(((long)2)); 
BgL_oz00_1926 = 
BINT(BgL_arg3752z00_1427); 
STRUCT_SET(BgL_aux2939z00_1421, BgL_kz00_1925, BgL_oz00_1926); } } 
{ /* ./Globalize/ginfo.scm 71 */
long BgL_arg3757z00_1429;
{ 
obj_t BgL_auxz00_3549;
{ /* ./Globalize/ginfo.scm 71 */
BgL_objectz00_bglt BgL_auxz00_3550;
BgL_auxz00_3550 = 
(BgL_objectz00_bglt)(BgL_obj2937z00_1417); 
BgL_auxz00_3549 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3550); } 
BgL_arg3757z00_1429 = 
(((BgL_sexitzf2ginfozf2_bglt)CREF(BgL_auxz00_3549))->BgL_markz00); } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_kz00_1929;obj_t BgL_oz00_1930;
BgL_kz00_1929 = 
(int)(((long)3)); 
BgL_oz00_1930 = 
BINT(BgL_arg3757z00_1429); 
STRUCT_SET(BgL_aux2939z00_1421, BgL_kz00_1929, BgL_oz00_1930); } } 
{ /* ./Globalize/ginfo.scm 71 */
int BgL_kz00_1932;
BgL_kz00_1932 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2938z00_1420, BgL_kz00_1932, BgL_aux2939z00_1421); } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_arg3762z00_1430;
BgL_arg3762z00_1430 = 
STRUCT_KEY(BgL_res2938z00_1420); 
STRUCT_KEY_SET(BgL_aux2939z00_1421, BgL_arg3762z00_1430); } 
{ /* ./Globalize/ginfo.scm 71 */
obj_t BgL_kz00_1939;
BgL_kz00_1939 = 
CNST_TABLE_REF(((long)2)); 
STRUCT_KEY_SET(BgL_res2938z00_1420, BgL_kz00_1939); } 
return BgL_res2938z00_1420;} } } } } 
}



/* struct+object->object-local/Ginfo3123 */
obj_t BGl_structzb2objectzd2ze3objectzd2localzf2Ginfo3123za3zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2433, obj_t BgL_oz00_2434, obj_t BgL_sz00_2435)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ 
BgL_localzf2ginfozf2_bglt BgL_oz00_1405;obj_t BgL_sz00_1406;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_auxz00_3564;
BgL_oz00_1405 = 
(BgL_localzf2ginfozf2_bglt)(BgL_oz00_2434); 
BgL_sz00_1406 = BgL_sz00_2435; 
{ 

{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_old2987z00_1409;obj_t BgL_aux2988z00_1410;
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_nextzd2method3122zd2_1415;
BgL_nextzd2method3122zd2_1415 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1405), BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_test3734z00_1416;
BgL_test3734z00_1416 = 
PROCEDUREP(BgL_nextzd2method3122zd2_1415); 
if(BgL_test3734z00_1416)
{ /* ./Globalize/ginfo.scm 81 */
BgL_old2987z00_1409 = 
PROCEDURE_ENTRY(BgL_nextzd2method3122zd2_1415)(BgL_nextzd2method3122zd2_1415, 
(obj_t)(BgL_oz00_1405), BgL_sz00_1406, BEOA); }  else 
{ /* ./Globalize/ginfo.scm 81 */
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_auxz00_3572;
BgL_auxz00_3572 = 
BGl_structzb2objectzd2ze3objectz83zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1405), BgL_sz00_1406); 
BgL_old2987z00_1409 = 
(obj_t)(BgL_auxz00_3572); } } } } 
{ /* ./Globalize/ginfo.scm 81 */
int BgL_auxz00_3576;
BgL_auxz00_3576 = 
(int)(((long)0)); 
BgL_aux2988z00_1410 = 
STRUCT_REF(BgL_sz00_1406, BgL_auxz00_3576); } 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2989z00_1411;
BgL_new2989z00_1411 = 
((BgL_localzf2ginfozf2_bglt)(BgL_old2987z00_1409)); 
{ /* ./Globalize/ginfo.scm 81 */
long BgL_arg3720z00_1412;
BgL_arg3720z00_1412 = 
BGl_classzd2numzd2zz__objectz00(BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_objz00_1899;
BgL_objz00_1899 = 
(BgL_objectz00_bglt)(BgL_new2989z00_1411); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1899, BgL_arg3720z00_1412); } } 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_arg3724z00_1413;
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_arg3728z00_1414;
{ /* ./Globalize/ginfo.scm 81 */
int BgL_auxz00_3583;
BgL_auxz00_3583 = 
(int)(((long)0)); 
BgL_arg3728z00_1414 = 
STRUCT_REF(BgL_aux2988z00_1410, BgL_auxz00_3583); } 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_res4057z00_1909;
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_escapezf32963zf3_1903;
BgL_escapezf32963zf3_1903 = 
CBOOL(BgL_arg3728z00_1414); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2964z00_1904;
BgL_new2964z00_1904 = 
((BgL_localzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_localzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_res4056z00_1908;
{ /* ./Globalize/ginfo.scm 81 */
BgL_localzf2ginfozf2_bglt BgL_new2980z00_1905;
BgL_new2980z00_1905 = BgL_new2964z00_1904; 
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_escapezf32979zf3_1907;
BgL_escapezf32979zf3_1907 = BgL_escapezf32963zf3_1903; 
((((BgL_localzf2ginfozf2_bglt)CREF(BgL_new2980z00_1905))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf32979zf3_1907), BUNSPEC); 
BgL_res4056z00_1908 = BgL_new2980z00_1905; } } BgL_res4056z00_1908; } 
BgL_res4057z00_1909 = BgL_new2964z00_1904; } } 
BgL_arg3724z00_1413 = BgL_res4057z00_1909; } } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_auxz00_3591;BgL_objectz00_bglt BgL_auxz00_3589;
BgL_auxz00_3591 = 
(obj_t)(BgL_arg3724z00_1413); 
BgL_auxz00_3589 = 
(BgL_objectz00_bglt)(BgL_new2989z00_1411); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3589, BgL_auxz00_3591); } } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_objz00_1910;
BgL_objz00_1910 = 
(obj_t)(BgL_new2989z00_1411); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1910); BUNSPEC; } 
BgL_auxz00_3564 = BgL_new2989z00_1411; } } } 
return 
(obj_t)(BgL_auxz00_3564);} } } 
}



/* object->struct-local/Ginfo3121 */
obj_t BGl_objectzd2ze3structzd2localzf2Ginfo3121z11zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2436, obj_t BgL_obj2984z00_2437)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 81 */
{ 
BgL_localzf2ginfozf2_bglt BgL_obj2984z00_1395;
BgL_obj2984z00_1395 = 
(BgL_localzf2ginfozf2_bglt)(BgL_obj2984z00_2437); 
{ 

{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_res2985z00_1398;
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_nextzd2method3120zd2_1403;
BgL_nextzd2method3120zd2_1403 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2984z00_1395), BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_localzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_test3713z00_1404;
BgL_test3713z00_1404 = 
PROCEDUREP(BgL_nextzd2method3120zd2_1403); 
if(BgL_test3713z00_1404)
{ /* ./Globalize/ginfo.scm 81 */
BgL_res2985z00_1398 = 
PROCEDURE_ENTRY(BgL_nextzd2method3120zd2_1403)(BgL_nextzd2method3120zd2_1403, 
(obj_t)(BgL_obj2984z00_1395), BEOA); }  else 
{ /* ./Globalize/ginfo.scm 81 */
BgL_res2985z00_1398 = 
BGl_objectzd2ze3structz31zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj2984z00_1395)); } } } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_aux2986z00_1399;
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_keyz00_1880;int BgL_lenz00_1881;
BgL_keyz00_1880 = 
CNST_TABLE_REF(((long)3)); 
BgL_lenz00_1881 = 
(int)(((long)1)); 
BgL_aux2986z00_1399 = 
make_struct(BgL_keyz00_1880, BgL_lenz00_1881, BUNSPEC); } 
{ /* ./Globalize/ginfo.scm 81 */
bool_t BgL_arg3702z00_1401;
{ 
obj_t BgL_auxz00_3610;
{ /* ./Globalize/ginfo.scm 81 */
BgL_objectz00_bglt BgL_auxz00_3611;
BgL_auxz00_3611 = 
(BgL_objectz00_bglt)(BgL_obj2984z00_1395); 
BgL_auxz00_3610 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3611); } 
BgL_arg3702z00_1401 = 
(((BgL_localzf2ginfozf2_bglt)CREF(BgL_auxz00_3610))->BgL_escapezf3zf3); } 
{ /* ./Globalize/ginfo.scm 81 */
int BgL_kz00_1885;obj_t BgL_oz00_1886;
BgL_kz00_1885 = 
(int)(((long)0)); 
BgL_oz00_1886 = 
BBOOL(BgL_arg3702z00_1401); 
STRUCT_SET(BgL_aux2986z00_1399, BgL_kz00_1885, BgL_oz00_1886); } } 
{ /* ./Globalize/ginfo.scm 81 */
int BgL_kz00_1888;
BgL_kz00_1888 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2985z00_1398, BgL_kz00_1888, BgL_aux2986z00_1399); } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_arg3707z00_1402;
BgL_arg3707z00_1402 = 
STRUCT_KEY(BgL_res2985z00_1398); 
STRUCT_KEY_SET(BgL_aux2986z00_1399, BgL_arg3707z00_1402); } 
{ /* ./Globalize/ginfo.scm 81 */
obj_t BgL_kz00_1895;
BgL_kz00_1895 = 
CNST_TABLE_REF(((long)3)); 
STRUCT_KEY_SET(BgL_res2985z00_1398, BgL_kz00_1895); } 
return BgL_res2985z00_1398;} } } } } 
}



/* struct+object->object-global/Ginfo3119 */
obj_t BGl_structzb2objectzd2ze3objectzd2globalzf2Ginfo3119za3zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2438, obj_t BgL_oz00_2439, obj_t BgL_sz00_2440)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ 
BgL_globalzf2ginfozf2_bglt BgL_oz00_1382;obj_t BgL_sz00_1383;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_auxz00_3625;
BgL_oz00_1382 = 
(BgL_globalzf2ginfozf2_bglt)(BgL_oz00_2439); 
BgL_sz00_1383 = BgL_sz00_2440; 
{ 

{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_old3054z00_1386;obj_t BgL_aux3055z00_1387;
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_nextzd2method3118zd2_1393;
BgL_nextzd2method3118zd2_1393 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1382), BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_test3694z00_1394;
BgL_test3694z00_1394 = 
PROCEDUREP(BgL_nextzd2method3118zd2_1393); 
if(BgL_test3694z00_1394)
{ /* ./Globalize/ginfo.scm 85 */
BgL_old3054z00_1386 = 
PROCEDURE_ENTRY(BgL_nextzd2method3118zd2_1393)(BgL_nextzd2method3118zd2_1393, 
(obj_t)(BgL_oz00_1382), BgL_sz00_1383, BEOA); }  else 
{ /* ./Globalize/ginfo.scm 85 */
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_auxz00_3633;
BgL_auxz00_3633 = 
BGl_structzb2objectzd2ze3objectz83zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_1382), BgL_sz00_1383); 
BgL_old3054z00_1386 = 
(obj_t)(BgL_auxz00_3633); } } } } 
{ /* ./Globalize/ginfo.scm 85 */
int BgL_auxz00_3637;
BgL_auxz00_3637 = 
(int)(((long)0)); 
BgL_aux3055z00_1387 = 
STRUCT_REF(BgL_sz00_1383, BgL_auxz00_3637); } 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3056z00_1388;
BgL_new3056z00_1388 = 
((BgL_globalzf2ginfozf2_bglt)(BgL_old3054z00_1386)); 
{ /* ./Globalize/ginfo.scm 85 */
long BgL_arg3679z00_1389;
BgL_arg3679z00_1389 = 
BGl_classzd2numzd2zz__objectz00(BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_objz00_1862;
BgL_objz00_1862 = 
(BgL_objectz00_bglt)(BgL_new3056z00_1388); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1862, BgL_arg3679z00_1389); } } 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_arg3683z00_1390;
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_arg3686z00_1391;obj_t BgL_arg3687z00_1392;
{ /* ./Globalize/ginfo.scm 85 */
int BgL_auxz00_3644;
BgL_auxz00_3644 = 
(int)(((long)0)); 
BgL_arg3686z00_1391 = 
STRUCT_REF(BgL_aux3055z00_1387, BgL_auxz00_3644); } 
{ /* ./Globalize/ginfo.scm 85 */
int BgL_auxz00_3647;
BgL_auxz00_3647 = 
(int)(((long)1)); 
BgL_arg3687z00_1392 = 
STRUCT_REF(BgL_aux3055z00_1387, BgL_auxz00_3647); } 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_res4054z00_1877;
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_escapezf33020zf3_1868;
BgL_escapezf33020zf3_1868 = 
CBOOL(BgL_arg3686z00_1391); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3022z00_1870;
BgL_new3022z00_1870 = 
((BgL_globalzf2ginfozf2_bglt)BREF( GC_MALLOC (sizeof(struct BgL_globalzf2ginfozf2_bgl)))); 
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_res4053z00_1876;
{ /* ./Globalize/ginfo.scm 85 */
BgL_globalzf2ginfozf2_bglt BgL_new3046z00_1871;
BgL_new3046z00_1871 = BgL_new3022z00_1870; 
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_escapezf33044zf3_1874;obj_t BgL_globalzd2closure3045zd2_1875;
BgL_escapezf33044zf3_1874 = BgL_escapezf33020zf3_1868; 
BgL_globalzd2closure3045zd2_1875 = BgL_arg3687z00_1392; 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_1871))->BgL_escapezf3zf3) = ((bool_t)BgL_escapezf33044zf3_1874), BUNSPEC); 
((((BgL_globalzf2ginfozf2_bglt)CREF(BgL_new3046z00_1871))->BgL_globalzd2closurezd2) = ((obj_t)BgL_globalzd2closure3045zd2_1875), BUNSPEC); 
BgL_res4053z00_1876 = BgL_new3046z00_1871; } } BgL_res4053z00_1876; } 
BgL_res4054z00_1877 = BgL_new3022z00_1870; } } 
BgL_arg3683z00_1390 = BgL_res4054z00_1877; } } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_auxz00_3656;BgL_objectz00_bglt BgL_auxz00_3654;
BgL_auxz00_3656 = 
(obj_t)(BgL_arg3683z00_1390); 
BgL_auxz00_3654 = 
(BgL_objectz00_bglt)(BgL_new3056z00_1388); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3654, BgL_auxz00_3656); } } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_objz00_1878;
BgL_objz00_1878 = 
(obj_t)(BgL_new3056z00_1388); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1878); BUNSPEC; } 
BgL_auxz00_3625 = BgL_new3056z00_1388; } } } 
return 
(obj_t)(BgL_auxz00_3625);} } } 
}



/* object->struct-global/Ginfo3117 */
obj_t BGl_objectzd2ze3structzd2globalzf2Ginfo3117z11zzglobaliza7e_ginfoza7(obj_t BgL_envz00_2441, obj_t BgL_obj3051z00_2442)
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 85 */
{ 
BgL_globalzf2ginfozf2_bglt BgL_obj3051z00_1370;
BgL_obj3051z00_1370 = 
(BgL_globalzf2ginfozf2_bglt)(BgL_obj3051z00_2442); 
{ 

{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_res3052z00_1373;
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_nextzd2method3116zd2_1380;
BgL_nextzd2method3116zd2_1380 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj3051z00_1370), BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_globalzf2Ginfozf2zzglobaliza7e_ginfoza7); 
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_test3672z00_1381;
BgL_test3672z00_1381 = 
PROCEDUREP(BgL_nextzd2method3116zd2_1380); 
if(BgL_test3672z00_1381)
{ /* ./Globalize/ginfo.scm 85 */
BgL_res3052z00_1373 = 
PROCEDURE_ENTRY(BgL_nextzd2method3116zd2_1380)(BgL_nextzd2method3116zd2_1380, 
(obj_t)(BgL_obj3051z00_1370), BEOA); }  else 
{ /* ./Globalize/ginfo.scm 85 */
BgL_res3052z00_1373 = 
BGl_objectzd2ze3structz31zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj3051z00_1370)); } } } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_aux3053z00_1374;
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_keyz00_1839;int BgL_lenz00_1840;
BgL_keyz00_1839 = 
CNST_TABLE_REF(((long)4)); 
BgL_lenz00_1840 = 
(int)(((long)2)); 
BgL_aux3053z00_1374 = 
make_struct(BgL_keyz00_1839, BgL_lenz00_1840, BUNSPEC); } 
{ /* ./Globalize/ginfo.scm 85 */
bool_t BgL_arg3656z00_1376;
{ 
obj_t BgL_auxz00_3675;
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_auxz00_3676;
BgL_auxz00_3676 = 
(BgL_objectz00_bglt)(BgL_obj3051z00_1370); 
BgL_auxz00_3675 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3676); } 
BgL_arg3656z00_1376 = 
(((BgL_globalzf2ginfozf2_bglt)CREF(BgL_auxz00_3675))->BgL_escapezf3zf3); } 
{ /* ./Globalize/ginfo.scm 85 */
int BgL_kz00_1844;obj_t BgL_oz00_1845;
BgL_kz00_1844 = 
(int)(((long)0)); 
BgL_oz00_1845 = 
BBOOL(BgL_arg3656z00_1376); 
STRUCT_SET(BgL_aux3053z00_1374, BgL_kz00_1844, BgL_oz00_1845); } } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_arg3661z00_1378;
{ 
obj_t BgL_auxz00_3683;
{ /* ./Globalize/ginfo.scm 85 */
BgL_objectz00_bglt BgL_auxz00_3684;
BgL_auxz00_3684 = 
(BgL_objectz00_bglt)(BgL_obj3051z00_1370); 
BgL_auxz00_3683 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3684); } 
BgL_arg3661z00_1378 = 
(((BgL_globalzf2ginfozf2_bglt)CREF(BgL_auxz00_3683))->BgL_globalzd2closurezd2); } 
{ /* ./Globalize/ginfo.scm 85 */
int BgL_kz00_1848;
BgL_kz00_1848 = 
(int)(((long)1)); 
STRUCT_SET(BgL_aux3053z00_1374, BgL_kz00_1848, BgL_arg3661z00_1378); } } 
{ /* ./Globalize/ginfo.scm 85 */
int BgL_kz00_1851;
BgL_kz00_1851 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3052z00_1373, BgL_kz00_1851, BgL_aux3053z00_1374); } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_arg3666z00_1379;
BgL_arg3666z00_1379 = 
STRUCT_KEY(BgL_res3052z00_1373); 
STRUCT_KEY_SET(BgL_aux3053z00_1374, BgL_arg3666z00_1379); } 
{ /* ./Globalize/ginfo.scm 85 */
obj_t BgL_kz00_1858;
BgL_kz00_1858 = 
CNST_TABLE_REF(((long)4)); 
STRUCT_KEY_SET(BgL_res3052z00_1373, BgL_kz00_1858); } 
return BgL_res3052z00_1373;} } } } } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzglobaliza7e_ginfoza7()
{ AN_OBJECT;
{ /* ./Globalize/ginfo.scm 15 */
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "globalize_ginfo"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "globalize_ginfo"); 
return 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "globalize_ginfo");} 
}

