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

#include <bigloo.h>


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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


static obj_t BGl__makezd2boxzf3z21zzast_nodez00(obj_t, obj_t);
static obj_t BGl__makezd2boxzd2ref6125z00zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_vrefz00zzast_nodez00 = BUNSPEC;
static obj_t BGl__fillzd2closurez126257zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2setq6170zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__pragmazf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl_methodzd2initzd2zzast_nodez00();
static obj_t BGl_structzb2objectzd2ze3objectzd2boxzd2ref3558z83zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2node3677ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__allocatezd2conditionalzd2zzast_nodez00(obj_t);
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl__fillzd2kwotez126252zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__fillzd2appzd2lyz126237z12zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_externz00_bglt BGl_allocatezd2externzd2zzast_nodez00();
static obj_t BGl__allocatezd2nodezf2effectz20zzast_nodez00(obj_t);
BGL_IMPORT long BGl_classzd2numzd2zz__objectz00(obj_t);
static obj_t BGl__fillzd2setqz126172zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2makezd2box3560z31zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_vallocz00_bglt BGl_fillzd2vallocz12zc0zzast_nodez00(BgL_vallocz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl__atomzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_letzd2funzd2zzast_nodez00 = BUNSPEC;
static obj_t BGl_objectzd2ze3structzd2nodezf2effect3673z11zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_nodez00zzast_nodez00 = BUNSPEC;
static obj_t BGl_structzb2objectzd2ze3objectzd2setfield3627z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2isa6180zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2conditional3590z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2newzd2zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_newz00_bglt BGl_fillzd2newz12zc0zzast_nodez00(BgL_newz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_appzd2lyzd2_bglt BGl_fillzd2appzd2lyz12z12zzast_nodez00(BgL_appzd2lyzd2_bglt, obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DECL BgL_getfieldz00_bglt BGl_allocatezd2getfieldzd2zzast_nodez00();
static obj_t BGl__makezd2node6275zd2zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2new3623z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_castz00_bglt BGl_makezd2castzd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_nodez00_bglt);
static obj_t BGl_structzb2objectzd2ze3objectzd2select3582z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_letzd2varzd2_bglt BGl_makezd2letzd2varz00zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, BgL_nodez00_bglt, bool_t);
static obj_t BGl__fillzd2newz126207zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__failzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__newzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__allocatezd2setzd2exzd2itzd2zzast_nodez00(obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_EXPORTED_DECL BgL_setzd2exzd2itz00_bglt BGl_fillzd2setzd2exzd2itz12zc0zzast_nodez00(BgL_setzd2exzd2itz00_bglt, obj_t, BgL_typez00_bglt, BgL_varz00_bglt, BgL_nodez00_bglt);
static obj_t BGl__makezd2appzd2ly6235z00zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_getfieldz00_bglt BGl_fillzd2getfieldz12zc0zzast_nodez00(BgL_getfieldz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl__fillzd2nodez126277zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_makezd2boxzd2_bglt BGl_allocatezd2makezd2boxz00zzast_nodez00();
BGL_EXPORTED_DECL BgL_atomz00_bglt BGl_makezd2atomzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t);
BGL_EXPORTED_DECL BgL_letzd2funzd2_bglt BGl_allocatezd2letzd2funz00zzast_nodez00();
BGL_EXPORTED_DECL BgL_nodezf2effectzf2_bglt BGl_fillzd2nodezf2effectz12z32zzast_nodez00(BgL_nodezf2effectzf2_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_failz00_bglt BGl_makezd2failzd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
static obj_t BGl__makezd2getfield6215zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2appzd2lyz00zzast_nodez00(obj_t);
static obj_t BGl__allocatezd2valloczd2zzast_nodez00(obj_t);
static obj_t BGl__fillzd2funcallz126232zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_externz00_bglt BGl_makezd2externzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2appzd2zzast_nodez00(obj_t);
static obj_t BGl__allocatezd2selectzd2zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2app3649ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__setqzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2getfield3629ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_atomz00_bglt BGl_fillzd2atomz12zc0zzast_nodez00(BgL_atomz00_bglt, obj_t, BgL_typez00_bglt, obj_t);
BGL_EXPORTED_DECL BgL_vlengthz00_bglt BGl_fillzd2vlengthz12zc0zzast_nodez00(BgL_vlengthz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt);
static obj_t BGl_structzb2objectzd2ze3objectzd2sequence3655z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_vrefzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__fillzd2appz126242zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_letzd2varzd2zzast_nodez00 = BUNSPEC;
BGL_IMPORT obj_t BGl_objectz00zz__objectz00;
BGL_EXPORTED_DEF obj_t BGl_pragmaz00zzast_nodez00 = BUNSPEC;
BGL_IMPORT obj_t BGl_registerzd2classz12zc0zz__objectz00(obj_t, obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_failz00_bglt BGl_fillzd2failz12zc0zzast_nodez00(BgL_failz00_bglt, obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DECL BgL_closurez00_bglt BGl_fillzd2closurez12zc0zzast_nodez00(BgL_closurez00_bglt, obj_t, BgL_typez00_bglt, BgL_variablez00_bglt);
BGL_EXPORTED_DECL BgL_letzd2funzd2_bglt BGl_makezd2letzd2funz00zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, BgL_nodez00_bglt);
BGL_EXPORTED_DEF obj_t BGl_kwotez00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_jumpzd2exzd2itz00_bglt BGl_makezd2jumpzd2exzd2itzd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DECL bool_t BGl_jumpzd2exzd2itzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__funcallzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_newz00_bglt BGl_allocatezd2newzd2zzast_nodez00();
static obj_t BGl_objectzd2ze3structzd2extern3637ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__makezd2setzd2exzd2it6140zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2vsetz12zc0zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_externz00_bglt BGl_fillzd2externz12zc0zzast_nodez00(BgL_externz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2boxzd2ref3556z31zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_kwotez00_bglt BGl_allocatezd2kwotezd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_letzd2varzd2_bglt BGl_allocatezd2letzd2varz00zzast_nodez00();
static obj_t BGl_structzb2objectzd2ze3objectzd2getfield3631z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__fillzd2makezd2boxz126132z12zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2makezd2box6130z00zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2boxzd2setz126120z12zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_setqz00_bglt BGl_fillzd2setqz12zc0zzast_nodez00(BgL_setqz00_bglt, obj_t, BgL_typez00_bglt, BgL_varz00_bglt, BgL_nodez00_bglt);
static obj_t BGl_objectzd2ze3structzd2atom3669ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_pragmaz00_bglt BGl_fillzd2pragmaz12zc0zzast_nodez00(BgL_pragmaz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_newz00_bglt BGl_makezd2newzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2var6260zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_conditionalz00_bglt BGl_makezd2conditionalzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_nodez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DECL BgL_sequencez00_bglt BGl_fillzd2sequencez12zc0zzast_nodez00(BgL_sequencez00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_appz00_bglt BGl_allocatezd2appzd2zzast_nodez00();
static obj_t BGl__fillzd2sequencez126247zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_castz00zzast_nodez00 = BUNSPEC;
static obj_t BGl__fillzd2isaz126182zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_closurezf3zf3zzast_nodez00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_selectzf3zf3zzast_nodez00(obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2cast3598z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2atom6265zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_appzd2lyzd2_bglt BGl_allocatezd2appzd2lyz00zzast_nodez00();
BGL_EXPORTED_DEF obj_t BGl_boxzd2refzd2zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_vallocz00_bglt BGl_allocatezd2valloczd2zzast_nodez00();
static obj_t BGl__fillzd2jumpzd2exzd2itz126137zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_varz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_appz00_bglt BGl_makezd2appzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t);
BGL_EXPORTED_DECL BgL_selectz00_bglt BGl_allocatezd2selectzd2zzast_nodez00();
BGL_EXPORTED_DECL bool_t BGl_vlengthzf3zf3zzast_nodez00(obj_t);
static obj_t BGl_cnstzd2initzd2zzast_nodez00();
static obj_t BGl_structzb2objectzd2ze3objectzd2var3667z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2closure6255zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_atomz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_failz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_funcallz00zzast_nodez00 = BUNSPEC;
static obj_t BGl__allocatezd2closurezd2zzast_nodez00(obj_t);
static obj_t BGl__fillzd2letzd2varz126147z12zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2vlengthzd2zzast_nodez00(obj_t);
static obj_t BGl__vrefzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_boxzd2setz12zc0_bglt BGl_fillzd2boxzd2setz12z12z00zzast_nodez00(BgL_boxzd2setz12zc0_bglt, obj_t, BgL_typez00_bglt, BgL_varz00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DECL BgL_vsetz12z12_bglt BGl_fillzd2vsetz12z12zd2zzast_nodez00(BgL_vsetz12z12_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl__vsetz12zf3ze1zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_setfieldz00_bglt BGl_fillzd2setfieldz12zc0zzast_nodez00(BgL_setfieldz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl_structzb2objectzd2ze3objectzd2jumpzd2exzd2it3566z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2pragma6220zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_boxzd2refzd2_bglt BGl_allocatezd2boxzd2refz00zzast_nodez00();
static obj_t BGl__fillzd2boxzd2setz12z126122z00zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2select6155zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_valloczf3zf3zzast_nodez00(obj_t);
static obj_t BGl__fillzd2varz126262zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2failzd2zzast_nodez00(obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzast_nodez00();
static obj_t BGl__allocatezd2atomzd2zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_kwotez00_bglt BGl_fillzd2kwotez12zc0zzast_nodez00(BgL_kwotez00_bglt, obj_t, BgL_typez00_bglt, obj_t);
BGL_EXPORTED_DECL BgL_funcallz00_bglt BGl_allocatezd2funcallzd2zzast_nodez00();
static obj_t BGl__kwotezf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2vsetz12z126192zd2zzast_nodez00(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_EXPORTED_DEF obj_t BGl_nodezf2effectzf2zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_appzd2lyzf3z21zzast_nodez00(obj_t);
BGL_EXPORTED_DEF obj_t BGl_makezd2boxzd2zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_jumpzd2exzd2itz00_bglt BGl_fillzd2jumpzd2exzd2itz12zc0zzast_nodez00(BgL_jumpzd2exzd2itz00_bglt, obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DECL bool_t BGl_setzd2exzd2itzf3zf3zzast_nodez00(obj_t);
BGL_IMPORT obj_t make_struct(obj_t, int, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2appzd2ly3647z83zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_makezd2boxzd2_bglt BGl_fillzd2makezd2boxz12z12zzast_nodez00(BgL_makezd2boxzd2_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_nodez00_bglt);
BGL_EXPORTED_DECL BgL_setfieldz00_bglt BGl_makezd2setfieldzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
BGL_EXPORTED_DECL BgL_setzd2exzd2itz00_bglt BGl_makezd2setzd2exzd2itzd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_varz00_bglt, BgL_nodez00_bglt);
static obj_t BGl_objectzd2ze3structzd2fail3584ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__allocatezd2jumpzd2exzd2itzd2zzast_nodez00(obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2letzd2var3574z83zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__fillzd2vrefz126197zc0zzast_nodez00(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_EXPORTED_DECL bool_t BGl_newzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__allocatezd2castzd2zzast_nodez00(obj_t);
BGL_EXPORTED_DEF obj_t BGl_getfieldz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_isaz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_varz00_bglt BGl_fillzd2varz12zc0zzast_nodez00(BgL_varz00_bglt, obj_t, BgL_typez00_bglt, BgL_variablez00_bglt);
static obj_t BGl_objectzd2ze3structzd2valloc3617ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_vrefz00_bglt BGl_fillzd2vrefz12zc0zzast_nodez00(BgL_vrefz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl__makezd2fail6160zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2setzd2exzd2it3570z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__fillzd2getfieldz126217zc0zzast_nodez00(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_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl__varzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_isaz00_bglt BGl_fillzd2isaz12zc0zzast_nodez00(BgL_isaz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt);
static obj_t BGl_objectzd2ze3structzd2setfield3625ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2extern3639z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2funcall3641ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_setqz00_bglt BGl_allocatezd2setqzd2zzast_nodez00();
static obj_t BGl_objectzd2ze3structzd2closure3661ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_vlengthz00_bglt BGl_makezd2vlengthzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt);
BGL_EXPORTED_DECL bool_t BGl_conditionalzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__allocatezd2pragmazd2zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_closurez00_bglt BGl_makezd2closurezd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_variablez00_bglt);
static obj_t BGl__isazf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__allocatezd2setfieldzd2zzast_nodez00(obj_t);
static obj_t BGl__fillzd2externz126227zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_vrefz00_bglt BGl_allocatezd2vrefzd2zzast_nodez00();
static obj_t BGl_objectzd2ze3structzd2new3621ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2castz126177zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_selectz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_makezd2boxzf3z21zzast_nodez00(obj_t);
BGL_EXPORTED_DEF obj_t BGl_vallocz00zzast_nodez00 = BUNSPEC;
static obj_t BGl_toplevelzd2initzd2zzast_nodez00();
BGL_EXPORTED_DEF obj_t BGl_appzd2lyzd2zzast_nodez00 = BUNSPEC;
static obj_t BGl__makezd2new6205zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2boxzd2setz123552z23zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2letzd2funz126152z12zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2letzd2fun3578z83zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2isa3602z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_sequencez00_bglt BGl_makezd2sequencezd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_letzd2varzf3z21zzast_nodez00(obj_t);
BGL_EXPORTED_DEF obj_t BGl_boxzd2setz12zc0zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
BGL_EXPORTED_DECL bool_t BGl_externzf3zf3zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2sequence3653ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_setfieldzf3zf3zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_nodez00_bglt BGl_allocatezd2nodezd2zzast_nodez00();
BGL_EXPORTED_DECL bool_t BGl_boxzd2setz12zf3z33zzast_nodez00(obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2vref3615z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_funcallz00_bglt BGl_fillzd2funcallz12zc0zzast_nodez00(BgL_funcallz00_bglt, obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_pragmazf3zf3zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_kwotez00_bglt BGl_makezd2kwotezd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t);
BGL_EXPORTED_DECL bool_t BGl_nodezf2effectzf3z01zzast_nodez00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_castzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__allocatezd2sequencezd2zzast_nodez00(obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2setq3594z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2letzd2fun6150z00zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__closurezf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__conditionalzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2selectz126157zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_pragmaz00_bglt BGl_makezd2pragmazd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2vsetz126190zc0zzast_nodez00(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_objectzd2ze3structzd2letzd2var3572z31zzast_nodez00(obj_t, obj_t);
static obj_t BGl__vlengthzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2vallocz126202zc0zzast_nodez00(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__allocatezd2letzd2funz00zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_jumpzd2exzd2itz00_bglt BGl_allocatezd2jumpzd2exzd2itzd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_pragmaz00_bglt BGl_allocatezd2pragmazd2zzast_nodez00();
static obj_t BGl_structzb2objectzd2ze3objectzd2node3679z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_sequencezf3zf3zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2vlength3604ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__allocatezd2nodezd2zzast_nodez00(obj_t);
BGL_EXPORTED_DEF obj_t BGl_setzd2exzd2itz00zzast_nodez00 = BUNSPEC;
static obj_t BGl_structzb2objectzd2ze3objectzd2funcall3643z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2closure3663z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2nodezf2effect6270z20zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_appz00_bglt BGl_fillzd2appz12zc0zzast_nodez00(BgL_appz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt, obj_t);
static obj_t BGl__makezd2letzd2var6145z00zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__appzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_nodezf2effectzf2_bglt BGl_makezd2nodezf2effectz20zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_letzd2funzf3z21zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_setfieldz00_bglt BGl_allocatezd2setfieldzd2zzast_nodez00();
static obj_t BGl__allocatezd2varzd2zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2conditional3588ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__nodezf2effectzf3z01zzast_nodez00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2letzd2fun3576z31zzast_nodez00(obj_t, obj_t);
static obj_t BGl__allocatezd2vrefzd2zzast_nodez00(obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2nodezf2effect3675za3zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_nodezf3zf3zzast_nodez00(obj_t);
static obj_t BGl__setzd2exzd2itzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2vsetz123609zf1zzast_nodez00(obj_t, obj_t);
static obj_t BGl__makezd2funcall6230zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2letzd2varz00zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2var3665ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_boxzd2refzf3z21zzast_nodez00(obj_t);
BGL_EXPORTED_DEF obj_t BGl_jumpzd2exzd2itz00zzast_nodez00 = BUNSPEC;
static obj_t BGl__allocatezd2setqzd2zzast_nodez00(obj_t);
static obj_t BGl__makezd2kwote6250zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2makezd2box3562z83zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_newz00zzast_nodez00 = BUNSPEC;
static obj_t BGl_objectzd2ze3structzd2cast3596ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2setzd2exzd2it3568ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2pragma3633ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_externz00zzast_nodez00 = BUNSPEC;
static obj_t BGl__fillzd2failz126162zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_conditionalz00zzast_nodez00 = BUNSPEC;
static obj_t BGl__getfieldzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_castz00_bglt BGl_allocatezd2castzd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_boxzd2setz12zc0_bglt BGl_makezd2boxzd2setz12z12zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_varz00_bglt, BgL_nodez00_bglt);
static obj_t BGl__castzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_sequencez00zzast_nodez00 = BUNSPEC;
static obj_t BGl_objectzd2ze3structzd2select3580ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_vsetz12zf3ze1zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2appzd2ly3645z31zzast_nodez00(obj_t, obj_t);
static obj_t BGl__makezd2cast6175zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_varzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__makezd2conditional6165zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2sequence6245zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_getfieldzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__selectzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2boxzd2refz126127z12zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_atomz00_bglt BGl_allocatezd2atomzd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_sequencez00_bglt BGl_allocatezd2sequencezd2zzast_nodez00();
BGL_EXPORTED_DECL bool_t BGl_isazf3zf3zzast_nodez00(obj_t);
static obj_t BGl__makezd2jumpzd2exzd2it6135zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2app3651z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_boxzd2refzd2_bglt BGl_fillzd2boxzd2refz12z12zzast_nodez00(BgL_boxzd2refzd2_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt);
BGL_EXPORTED_DECL BgL_failz00_bglt BGl_allocatezd2failzd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_vsetz12z12_bglt BGl_makezd2vsetz12zc0zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt, BgL_typez00_bglt);
BGL_EXPORTED_DEF obj_t BGl_appz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_kwotezf3zf3zzast_nodez00(obj_t);
static obj_t BGl__letzd2varzf3z21zzast_nodez00(obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2valloc3619z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2isazd2zzast_nodez00(obj_t);
static obj_t BGl__allocatezd2boxzd2setz12z12zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2kwote3657ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_varz00_bglt BGl_allocatezd2varzd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_setzd2exzd2itz00_bglt BGl_allocatezd2setzd2exzd2itzd2zzast_nodez00();
static obj_t BGl_structzb2objectzd2ze3objectzd2vlength3606z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2app6240zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__fillzd2setfieldz126212zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_setqz00_bglt BGl_makezd2setqzd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_varz00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DEF obj_t BGl_closurez00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_letzd2funzd2_bglt BGl_fillzd2letzd2funz12z12zzast_nodez00(BgL_letzd2funzd2_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, BgL_nodez00_bglt);
BGL_EXPORTED_DEF obj_t BGl_vlengthz00zzast_nodez00 = BUNSPEC;
static obj_t BGl__fillzd2atomz126267zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_getfieldz00_bglt BGl_makezd2getfieldzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl_structzb2objectzd2ze3objectzd2atom3671z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_castz00_bglt BGl_fillzd2castz12zc0zzast_nodez00(BgL_castz00_bglt, obj_t, BgL_typez00_bglt, BgL_nodez00_bglt);
static obj_t BGl__allocatezd2boxzd2refz00zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_vrefz00_bglt BGl_makezd2vrefzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt, BgL_typez00_bglt);
BGL_EXPORTED_DEF obj_t BGl_setfieldz00zzast_nodez00 = BUNSPEC;
static obj_t BGl_structzb2objectzd2ze3objectzd2vsetz123611z43zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_varz00_bglt BGl_makezd2varzd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_variablez00_bglt);
static obj_t BGl__valloczf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__makezd2setfield6210zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2funcallzd2zzast_nodez00(obj_t);
static obj_t BGl__makezd2extern6225zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_makezd2boxzd2_bglt BGl_makezd2makezd2boxz00zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_nodez00_bglt);
static obj_t BGl_structzb2objectzd2ze3objectzd2boxzd2setz123554z91zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__appzd2lyzf3z21zzast_nodez00(obj_t, obj_t);
static obj_t BGl__nodezf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__makezd2vlength6185zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_closurez00_bglt BGl_allocatezd2closurezd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_vlengthz00_bglt BGl_allocatezd2vlengthzd2zzast_nodez00();
static obj_t BGl__sequencezf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__allocatezd2getfieldzd2zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2isa3600ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2pragmaz126222zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__jumpzd2exzd2itzf3zf3zzast_nodez00(obj_t, obj_t);
static obj_t BGl_objectzd2initzd2zzast_nodez00();
BGL_EXPORTED_DECL BgL_nodez00_bglt BGl_makezd2nodezd2zzast_nodez00(obj_t, BgL_typez00_bglt);
BGL_EXPORTED_DECL bool_t BGl_atomzf3zf3zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_selectz00_bglt BGl_makezd2selectzd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_nodez00_bglt, obj_t, BgL_typez00_bglt);
static obj_t BGl__allocatezd2externzd2zzast_nodez00(obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_vallocz00_bglt BGl_makezd2valloczd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
BGL_EXPORTED_DECL BgL_appzd2lyzd2_bglt BGl_makezd2appzd2lyz00zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
BGL_EXPORTED_DECL BgL_conditionalz00_bglt BGl_allocatezd2conditionalzd2zzast_nodez00();
static obj_t BGl__allocatezd2makezd2boxz00zzast_nodez00(obj_t);
BGL_EXPORTED_DECL BgL_isaz00_bglt BGl_allocatezd2isazd2zzast_nodez00();
BGL_EXPORTED_DECL bool_t BGl_failzf3zf3zzast_nodez00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_funcallzf3zf3zzast_nodez00(obj_t);
static obj_t BGl_objectzd2ze3structzd2jumpzd2exzd2it3564ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_funcallz00_bglt BGl_makezd2funcallzd2zzast_nodez00(obj_t, BgL_typez00_bglt, BgL_nodez00_bglt, obj_t, obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2pragma3635z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__letzd2funzf3z21zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_nodez00_bglt BGl_fillzd2nodez12zc0zzast_nodez00(BgL_nodez00_bglt, obj_t, BgL_typez00_bglt);
static obj_t BGl_structzb2objectzd2ze3objectzd2kwote3659z51zzast_nodez00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_isaz00_bglt BGl_makezd2isazd2zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, obj_t, BgL_typez00_bglt);
static obj_t BGl__makezd2valloc6200zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzast_nodez00();
static obj_t BGl_objectzd2ze3structzd2vref3613ze3zzast_nodez00(obj_t, obj_t);
static obj_t BGl__fillzd2nodezf2effectz126272z32zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_boxzd2refzd2_bglt BGl_makezd2boxzd2refz00zzast_nodez00(obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_varz00_bglt);
static obj_t BGl__fillzd2vlengthz126187zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__boxzd2setz12zf3z33zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_letzd2varzd2_bglt BGl_fillzd2letzd2varz12z12zzast_nodez00(BgL_letzd2varzd2_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, obj_t, BgL_nodez00_bglt, bool_t);
static obj_t BGl__setfieldzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_appzf3zf3zzast_nodez00(obj_t);
static obj_t BGl__fillzd2setzd2exzd2itz126142zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__fillzd2conditionalz126167zc0zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_vsetz12z12zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_setqzf3zf3zzast_nodez00(obj_t);
static obj_t BGl_structzb2objectzd2ze3objectzd2fail3586z51zzast_nodez00(obj_t, obj_t, obj_t);
static obj_t BGl__boxzd2refzf3z21zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_conditionalz00_bglt BGl_fillzd2conditionalz12zc0zzast_nodez00(BgL_conditionalz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_nodez00_bglt, BgL_nodez00_bglt, BgL_nodez00_bglt);
static obj_t BGl_objectzd2ze3structzd2setq3592ze3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_selectz00_bglt BGl_fillzd2selectz12zc0zzast_nodez00(BgL_selectz00_bglt, obj_t, BgL_typez00_bglt, obj_t, obj_t, BgL_nodez00_bglt, obj_t, BgL_typez00_bglt);
static obj_t BGl__allocatezd2kwotezd2zzast_nodez00(obj_t);
static obj_t BGl__externzf3zf3zzast_nodez00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_setqz00zzast_nodez00 = BUNSPEC;
BGL_EXPORTED_DECL BgL_vsetz12z12_bglt BGl_allocatezd2vsetz12zc0zzast_nodez00();
BGL_EXPORTED_DECL BgL_boxzd2setz12zc0_bglt BGl_allocatezd2boxzd2setz12z12zzast_nodez00();
static obj_t BGl__makezd2vref6195zd2zzast_nodez00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_nodezf2effectzf2_bglt BGl_allocatezd2nodezf2effectz20zzast_nodez00();
static obj_t __cnst[ 32 ] ;


DEFINE_STRING( BGl_string8017z00zzast_nodez00, BgL_bgl_string8017za700za7za7ast_nodeza7008108z00, "box-set! box-ref make-box jump-ex-it set-ex-it let-var let-fun select fail conditional setq cast isa vlength vset! vref valloc new setfield getfield pragma extern funcall app-ly app sequence kwote closure var atom node/effect node ", 231 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2setfieldzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2setfieldza7d2za7za7ast_nodeza7008109za7, BGl__allocatezd2setfieldzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2vlengthz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2vlengthza7126187za7c0za7za7ast_nodeza7008110z00, BGl__fillzd2vlengthz126187zc0zzast_nodez00, 0L, 9 );
DEFINE_EXPORT_PROCEDURE( BGl_selectzf3zd2envz21zzast_nodez00, BgL_bgl__selectza7f3za7f3za7za7ast_nodeza7008111za7, BGl__selectzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_valloczf3zd2envz21zzast_nodez00, BgL_bgl__vallocza7f3za7f3za7za7ast_nodeza7008112za7, BGl__valloczf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2varz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2varza7126262za7c0za7za7ast_nodeza7008113z00, BGl__fillzd2varz126262zc0zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2sequencez12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2sequenceza7126247za7c0za7za7ast_nodeza7008114z00, BGl__fillzd2sequencez126247zc0zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2conditionalzd2envz00zzast_nodez00, BgL_bgl__makeza7d2conditional6165za7d2za7za7ast_nodeza7008115za7, BGl__makezd2conditional6165zd2zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2closurezd2envz00zzast_nodez00, BgL_bgl__allocateza7d2closureza7d2za7za7ast_nodeza7008116za7, BGl__allocatezd2closurezd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2sequencezd2envz00zzast_nodez00, BgL_bgl__allocateza7d2sequenceza7d2za7za7ast_nodeza7008117za7, BGl__allocatezd2sequencezd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2funcallzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2funcallza7d2za7za7ast_nodeza7008118za7, BGl__allocatezd2funcallzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_vrefzf3zd2envz21zzast_nodez00, BgL_bgl__vrefza7f3za7f3za7za7ast_nodeza7008119za7, BGl__vrefzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2castz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2castza7126177za7c0za7za7ast_nodeza7008120z00, BGl__fillzd2castz126177zc0zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2kwotezd2envz00zzast_nodez00, BgL_bgl__makeza7d2kwote6250za7d2za7za7ast_nodeza7008121za7, BGl__makezd2kwote6250zd2zzast_nodez00, 0L, 3 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2externzd2envz00zzast_nodez00, BgL_bgl__makeza7d2extern6225za7d2za7za7ast_nodeza7008122za7, BGl__makezd2extern6225zd2zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2getfieldzd2envz00zzast_nodez00, BgL_bgl__makeza7d2getfield6215za7d2za7za7ast_nodeza7008123za7, BGl__makezd2getfield6215zd2zzast_nodez00, 0L, 9 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2pragmaz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2pragmaza7126222za7c0za7za7ast_nodeza7008124z00, BGl__fillzd2pragmaz126222zc0zzast_nodez00, 0L, 8 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2newzd2envz00zzast_nodez00, BgL_bgl__makeza7d2new6205za7d2za7za7ast_nodeza7008125za7, BGl__makezd2new6205zd2zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2castzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2castza7d2za7za7ast_nodeza7008126za7, BGl__allocatezd2castzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_letzd2varzf3zd2envzf3zzast_nodez00, BgL_bgl__letza7d2varza7f3za721za7za7ast_nodeza7008127z00, BGl__letzd2varzf3z21zzast_nodez00, 0L, 1 );
BGL_IMPORT obj_t BGl_objectzd2ze3structzd2envze3zz__objectz00;
DEFINE_EXPORT_PROCEDURE( BGl_makezd2failzd2envz00zzast_nodez00, BgL_bgl__makeza7d2fail6160za7d2za7za7ast_nodeza7008128za7, BGl__makezd2fail6160zd2zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2setfieldzd2envz00zzast_nodez00, BgL_bgl__makeza7d2setfield6210za7d2za7za7ast_nodeza7008129za7, BGl__makezd2setfield6210zd2zzast_nodez00, 0L, 9 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2newzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2newza7d2za7za7ast_nodeza7008130za7, BGl__allocatezd2newzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2pragmazd2envz00zzast_nodez00, BgL_bgl__allocateza7d2pragmaza7d2za7za7ast_nodeza7008131za7, BGl__allocatezd2pragmazd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2boxzf3zd2envzf3zzast_nodez00, BgL_bgl__makeza7d2boxza7f3za721za7za7ast_nodeza7008132z00, BGl__makezd2boxzf3z21zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_kwotezf3zd2envz21zzast_nodez00, BgL_bgl__kwoteza7f3za7f3za7za7ast_nodeza7008133za7, BGl__kwotezf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2boxzd2setz12z12zd2envzd2zzast_nodez00, BgL_bgl__fillza7d2boxza7d2setza712za7126122za700za7za7ast_nodeza7008134z00, BGl__fillzd2boxzd2setz12z126122z00zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_failzf3zd2envz21zzast_nodez00, BgL_bgl__failza7f3za7f3za7za7ast_nodeza7008135za7, BGl__failzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2sequencezd2envz00zzast_nodez00, BgL_bgl__makeza7d2sequence6245za7d2za7za7ast_nodeza7008136za7, BGl__makezd2sequence6245zd2zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_atomzf3zd2envz21zzast_nodez00, BgL_bgl__atomza7f3za7f3za7za7ast_nodeza7008137za7, BGl__atomzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2vlengthzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2vlengthza7d2za7za7ast_nodeza7008138za7, BGl__allocatezd2vlengthzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_setfieldzf3zd2envz21zzast_nodez00, BgL_bgl__setfieldza7f3za7f3za7za7ast_nodeza7008139za7, BGl__setfieldzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_appzd2lyzf3zd2envzf3zzast_nodez00, BgL_bgl__appza7d2lyza7f3za721za7za7ast_nodeza7008140z00, BGl__appzd2lyzf3z21zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2kwotezd2envz00zzast_nodez00, BgL_bgl__allocateza7d2kwoteza7d2za7za7ast_nodeza7008141za7, BGl__allocatezd2kwotezd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2appzd2lyz12zd2envzc0zzast_nodez00, BgL_bgl__fillza7d2appza7d2lyza7126237za712za7za7ast_nodeza7008142za7, BGl__fillzd2appzd2lyz126237z12zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_nodezf3zd2envz21zzast_nodez00, BgL_bgl__nodeza7f3za7f3za7za7ast_nodeza7008143za7, BGl__nodezf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2boxzd2setz12zd2envzc0zzast_nodez00, BgL_bgl__makeza7d2boxza7d2setza7126120za712za7za7ast_nodeza7008144za7, BGl__makezd2boxzd2setz126120z12zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_letzd2funzf3zd2envzf3zzast_nodez00, BgL_bgl__letza7d2funza7f3za721za7za7ast_nodeza7008145z00, BGl__letzd2funzf3z21zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2vallocz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2vallocza7126202za7c0za7za7ast_nodeza7008146z00, BGl__fillzd2vallocz126202zc0zzast_nodez00, 0L, 10 );
DEFINE_EXPORT_PROCEDURE( BGl_conditionalzf3zd2envz21zzast_nodez00, BgL_bgl__conditionalza7f3za7f3za7za7ast_nodeza7008147za7, BGl__conditionalzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2varzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2varza7d2za7za7ast_nodeza7008148za7, BGl__allocatezd2varzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2selectz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2selectza7126157za7c0za7za7ast_nodeza7008149z00, BGl__fillzd2selectz126157zc0zzast_nodez00, 0L, 8 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2vsetz12zd2envz12zzast_nodez00, BgL_bgl__allocateza7d2vsetza712za7c0za7za7ast_nodeza7008150z00, BGl__allocatezd2vsetz12zc0zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_boxzd2refzf3zd2envzf3zzast_nodez00, BgL_bgl__boxza7d2refza7f3za721za7za7ast_nodeza7008151z00, BGl__boxzd2refzf3z21zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2atomzd2envz00zzast_nodez00, BgL_bgl__makeza7d2atom6265za7d2za7za7ast_nodeza7008152za7, BGl__makezd2atom6265zd2zzast_nodez00, 0L, 3 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2funcallzd2envz00zzast_nodez00, BgL_bgl__makeza7d2funcall6230za7d2za7za7ast_nodeza7008153za7, BGl__makezd2funcall6230zd2zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2failzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2failza7d2za7za7ast_nodeza7008154za7, BGl__allocatezd2failzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2letzd2funz12zd2envzc0zzast_nodez00, BgL_bgl__fillza7d2letza7d2funza7126152za712za7za7ast_nodeza7008155za7, BGl__fillzd2letzd2funz126152z12zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_setqzf3zd2envz21zzast_nodez00, BgL_bgl__setqza7f3za7f3za7za7ast_nodeza7008156za7, BGl__setqzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2appzd2envz00zzast_nodez00, BgL_bgl__makeza7d2app6240za7d2za7za7ast_nodeza7008157za7, BGl__makezd2app6240zd2zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_nodezf2effectzf3zd2envzd3zzast_nodez00, BgL_bgl__nodeza7f2effectza7f3za701za7za7ast_nodeza7008158z00, BGl__nodezf2effectzf3z01zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2jumpzd2exzd2itz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2jumpza7d2exza7d2itza7126137za7c0za7za7ast_nodeza7008159z00, BGl__fillzd2jumpzd2exzd2itz126137zc0zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2jumpzd2exzd2itzd2envz00zzast_nodez00, BgL_bgl__makeza7d2jumpza7d2exza7d2it6135za7d2za7za7ast_nodeza7008160za7, BGl__makezd2jumpzd2exzd2it6135zd2zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2jumpzd2exzd2itzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2jumpza7d2exza7d2itza7d2za7za7ast_nodeza7008161za7, BGl__allocatezd2jumpzd2exzd2itzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_pragmazf3zd2envz21zzast_nodez00, BgL_bgl__pragmaza7f3za7f3za7za7ast_nodeza7008162za7, BGl__pragmazf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2nodezf2effectzd2envzf2zzast_nodez00, BgL_bgl__makeza7d2nodeza7f2effect6270za720za7za7ast_nodeza7008163z00, BGl__makezd2nodezf2effect6270z20zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2boxzd2refzd2envzd2zzast_nodez00, BgL_bgl__allocateza7d2boxza7d2refza700za7za7ast_nodeza7008164z00, BGl__allocatezd2boxzd2refz00zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2nodezf2effectzd2envzf2zzast_nodez00, BgL_bgl__allocateza7d2nodeza7f2effectza720za7za7ast_nodeza7008165z00, BGl__allocatezd2nodezf2effectz20zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2valloczd2envz00zzast_nodez00, BgL_bgl__allocateza7d2vallocza7d2za7za7ast_nodeza7008166za7, BGl__allocatezd2valloczd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2selectzd2envz00zzast_nodez00, BgL_bgl__makeza7d2select6155za7d2za7za7ast_nodeza7008167za7, BGl__makezd2select6155zd2zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2letzd2varzd2envzd2zzast_nodez00, BgL_bgl__makeza7d2letza7d2var6145za700za7za7ast_nodeza7008168z00, BGl__makezd2letzd2var6145z00zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2setfieldz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2setfieldza7126212za7c0za7za7ast_nodeza7008169z00, BGl__fillzd2setfieldz126212zc0zzast_nodez00, 0L, 10 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2vsetz12z12zd2envz00zzast_nodez00, BgL_bgl__fillza7d2vsetza712za7126192za7d2za7za7ast_nodeza7008170za7, BGl__fillzd2vsetz12z126192zd2zzast_nodez00, 0L, 11 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2nodezf2effectz12zd2envze0zzast_nodez00, BgL_bgl__fillza7d2nodeza7f2effectza7126272za732za7za7ast_nodeza7008171za7, BGl__fillzd2nodezf2effectz126272z32zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2closurezd2envz00zzast_nodez00, BgL_bgl__makeza7d2closure6255za7d2za7za7ast_nodeza7008172za7, BGl__makezd2closure6255zd2zzast_nodez00, 0L, 3 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2pragmazd2envz00zzast_nodez00, BgL_bgl__makeza7d2pragma6220za7d2za7za7ast_nodeza7008173za7, BGl__makezd2pragma6220zd2zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2setqzd2envz00zzast_nodez00, BgL_bgl__makeza7d2setq6170za7d2za7za7ast_nodeza7008174za7, BGl__makezd2setq6170zd2zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_varzf3zd2envz21zzast_nodez00, BgL_bgl__varza7f3za7f3za7za7ast_nodeza7008175za7, BGl__varzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2setqz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2setqza7126172za7c0za7za7ast_nodeza7008176z00, BGl__fillzd2setqz126172zc0zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2letzd2varz12zd2envzc0zzast_nodez00, BgL_bgl__fillza7d2letza7d2varza7126147za712za7za7ast_nodeza7008177za7, BGl__fillzd2letzd2varz126147z12zzast_nodez00, 0L, 8 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2isazd2envz00zzast_nodez00, BgL_bgl__allocateza7d2isaza7d2za7za7ast_nodeza7008178za7, BGl__allocatezd2isazd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2nodezd2envz00zzast_nodez00, BgL_bgl__makeza7d2node6275za7d2za7za7ast_nodeza7008179za7, BGl__makezd2node6275zd2zzast_nodez00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2makezd2boxz12zd2envzc0zzast_nodez00, BgL_bgl__fillza7d2makeza7d2boxza7126132za712za7za7ast_nodeza7008180za7, BGl__fillzd2makezd2boxz126132z12zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2setzd2exzd2itzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2setza7d2exza7d2itza7d2za7za7ast_nodeza7008181za7, BGl__allocatezd2setzd2exzd2itzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2vlengthzd2envz00zzast_nodez00, BgL_bgl__makeza7d2vlength6185za7d2za7za7ast_nodeza7008182za7, BGl__makezd2vlength6185zd2zzast_nodez00, 0L, 8 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2vrefzd2envz00zzast_nodez00, BgL_bgl__makeza7d2vref6195za7d2za7za7ast_nodeza7008183za7, BGl__makezd2vref6195zd2zzast_nodez00, 0L, 10 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2letzd2funzd2envzd2zzast_nodez00, BgL_bgl__makeza7d2letza7d2fun6150za700za7za7ast_nodeza7008184z00, BGl__makezd2letzd2fun6150z00zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2appzd2lyzd2envzd2zzast_nodez00, BgL_bgl__allocateza7d2appza7d2lyza700za7za7ast_nodeza7008185z00, BGl__allocatezd2appzd2lyz00zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2atomzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2atomza7d2za7za7ast_nodeza7008186za7, BGl__allocatezd2atomzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2makezd2boxzd2envzd2zzast_nodez00, BgL_bgl__allocateza7d2makeza7d2boxza700za7za7ast_nodeza7008187z00, BGl__allocatezd2makezd2boxz00zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2isazd2envz00zzast_nodez00, BgL_bgl__makeza7d2isa6180za7d2za7za7ast_nodeza7008188za7, BGl__makezd2isa6180zd2zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2externzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2externza7d2za7za7ast_nodeza7008189za7, BGl__allocatezd2externzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2externz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2externza7126227za7c0za7za7ast_nodeza7008190z00, BGl__fillzd2externz126227zc0zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2getfieldzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2getfieldza7d2za7za7ast_nodeza7008191za7, BGl__allocatezd2getfieldzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2newz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2newza7126207za7c0za7za7ast_nodeza7008192z00, BGl__fillzd2newz126207zc0zzast_nodez00, 0L, 7 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2nodez12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2nodeza7126277za7c0za7za7ast_nodeza7008193z00, BGl__fillzd2nodez126277zc0zzast_nodez00, 0L, 3 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2conditionalz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2conditionalza7126167za7c0za7za7ast_nodeza7008194z00, BGl__fillzd2conditionalz126167zc0zzast_nodez00, 0L, 8 );
DEFINE_EXPORT_PROCEDURE( BGl_jumpzd2exzd2itzf3zd2envz21zzast_nodez00, BgL_bgl__jumpza7d2exza7d2itza7f3za7f3za7za7ast_nodeza7008195za7, BGl__jumpzd2exzd2itzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_isazf3zd2envz21zzast_nodez00, BgL_bgl__isaza7f3za7f3za7za7ast_nodeza7008196za7, BGl__isazf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_vlengthzf3zd2envz21zzast_nodez00, BgL_bgl__vlengthza7f3za7f3za7za7ast_nodeza7008197za7, BGl__vlengthzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_closurezf3zd2envz21zzast_nodez00, BgL_bgl__closureza7f3za7f3za7za7ast_nodeza7008198za7, BGl__closurezf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2setzd2exzd2itz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2setza7d2exza7d2itza7126142za7c0za7za7ast_nodeza7008199z00, BGl__fillzd2setzd2exzd2itz126142zc0zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_sequencezf3zd2envz21zzast_nodez00, BgL_bgl__sequenceza7f3za7f3za7za7ast_nodeza7008200za7, BGl__sequencezf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2atomz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2atomza7126267za7c0za7za7ast_nodeza7008201z00, BGl__fillzd2atomz126267zc0zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2failz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2failza7126162za7c0za7za7ast_nodeza7008202z00, BGl__fillzd2failz126162zc0zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2setzd2exzd2itzd2envz00zzast_nodez00, BgL_bgl__makeza7d2setza7d2exza7d2it6140za7d2za7za7ast_nodeza7008203za7, BGl__makezd2setzd2exzd2it6140zd2zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_appzf3zd2envz21zzast_nodez00, BgL_bgl__appza7f3za7f3za7za7ast_nodeza7008204za7, BGl__appzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2appz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2appza7126242za7c0za7za7ast_nodeza7008205z00, BGl__fillzd2appz126242zc0zzast_nodez00, 0L, 7 );
DEFINE_STATIC_PROCEDURE( BGl_proc8000z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2appza7d2ly3647za783za7za7ast_nodeza7008206za7, BGl_structzb2objectzd2ze3objectzd2appzd2ly3647z83zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc8001z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2app3649za7e3za7za7ast_nodeza7008207za7, BGl_objectzd2ze3structzd2app3649ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc8002z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2app3651za751za7za7ast_nodeza7008208z00, BGl_structzb2objectzd2ze3objectzd2app3651z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc8003z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2sequence3653za7e3za7za7ast_nodeza7008209za7, BGl_objectzd2ze3structzd2sequence3653ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc8004z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2sequence3655za751za7za7ast_nodeza7008210z00, BGl_structzb2objectzd2ze3objectzd2sequence3655z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc8005z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2kwote3657za7e3za7za7ast_nodeza7008211za7, BGl_objectzd2ze3structzd2kwote3657ze3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2appzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2appza7d2za7za7ast_nodeza7008212za7, BGl__allocatezd2appzd2zzast_nodez00, 0L, 0 );
DEFINE_STATIC_PROCEDURE( BGl_proc8006z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2kwote3659za751za7za7ast_nodeza7008213z00, BGl_structzb2objectzd2ze3objectzd2kwote3659z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc8007z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2closure3661za7e3za7za7ast_nodeza7008214za7, BGl_objectzd2ze3structzd2closure3661ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc8008z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2closure3663za751za7za7ast_nodeza7008215z00, BGl_structzb2objectzd2ze3objectzd2closure3663z51zzast_nodez00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2boxzd2refzd2envzd2zzast_nodez00, BgL_bgl__makeza7d2boxza7d2ref6125za700za7za7ast_nodeza7008216z00, BGl__makezd2boxzd2ref6125z00zzast_nodez00, 0L, 5 );
DEFINE_STATIC_PROCEDURE( BGl_proc8010z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2var3667za751za7za7ast_nodeza7008217z00, BGl_structzb2objectzd2ze3objectzd2var3667z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc8009z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2var3665za7e3za7za7ast_nodeza7008218za7, BGl_objectzd2ze3structzd2var3665ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc8011z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2atom3669za7e3za7za7ast_nodeza7008219za7, BGl_objectzd2ze3structzd2atom3669ze3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_vsetz12zf3zd2envz33zzast_nodez00, BgL_bgl__vsetza712za7f3za7e1za7za7ast_nodeza7008220z00, BGl__vsetz12zf3ze1zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2boxzd2refz12zd2envzc0zzast_nodez00, BgL_bgl__fillza7d2boxza7d2refza7126127za712za7za7ast_nodeza7008221za7, BGl__fillzd2boxzd2refz126127z12zzast_nodez00, 0L, 6 );
DEFINE_STATIC_PROCEDURE( BGl_proc8012z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2atom3671za751za7za7ast_nodeza7008222z00, BGl_structzb2objectzd2ze3objectzd2atom3671z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc8013z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2nodeza7f2effect3673za711za7za7ast_nodeza7008223z00, BGl_objectzd2ze3structzd2nodezf2effect3673z11zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc8014z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2nodeza7f2effect3675za7a3za7za7ast_nodeza7008224za7, BGl_structzb2objectzd2ze3objectzd2nodezf2effect3675za3zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc8015z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2node3677za7e3za7za7ast_nodeza7008225za7, BGl_objectzd2ze3structzd2node3677ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc8016z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2node3679za751za7za7ast_nodeza7008226z00, BGl_structzb2objectzd2ze3objectzd2node3679z51zzast_nodez00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2boxzd2setz12zd2envzc0zzast_nodez00, BgL_bgl__allocateza7d2boxza7d2setza712za712za7za7ast_nodeza7008227za7, BGl__allocatezd2boxzd2setz12z12zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2makezd2boxzd2envzd2zzast_nodez00, BgL_bgl__makeza7d2makeza7d2box6130za700za7za7ast_nodeza7008228z00, BGl__makezd2makezd2box6130z00zzast_nodez00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2setqzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2setqza7d2za7za7ast_nodeza7008229za7, BGl__allocatezd2setqzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2funcallz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2funcallza7126232za7c0za7za7ast_nodeza7008230z00, BGl__fillzd2funcallz126232zc0zzast_nodez00, 0L, 6 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2selectzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2selectza7d2za7za7ast_nodeza7008231za7, BGl__allocatezd2selectzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2castzd2envz00zzast_nodez00, BgL_bgl__makeza7d2cast6175za7d2za7za7ast_nodeza7008232za7, BGl__makezd2cast6175zd2zzast_nodez00, 0L, 3 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2valloczd2envz00zzast_nodez00, BgL_bgl__makeza7d2valloc6200za7d2za7za7ast_nodeza7008233za7, BGl__makezd2valloc6200zd2zzast_nodez00, 0L, 9 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2nodezd2envz00zzast_nodez00, BgL_bgl__allocateza7d2nodeza7d2za7za7ast_nodeza7008234za7, BGl__allocatezd2nodezd2zzast_nodez00, 0L, 0 );
DEFINE_STATIC_PROCEDURE( BGl_proc7953z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2boxza7d2setza7123552za723za7za7ast_nodeza7008235za7, BGl_objectzd2ze3structzd2boxzd2setz123552z23zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7954z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2boxza7d2setza7123554za791za7za7ast_nodeza7008236z00, BGl_structzb2objectzd2ze3objectzd2boxzd2setz123554z91zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7955z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2boxza7d2ref3556za731za7za7ast_nodeza7008237z00, BGl_objectzd2ze3structzd2boxzd2ref3556z31zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7956z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2boxza7d2ref3558za783za7za7ast_nodeza7008238za7, BGl_structzb2objectzd2ze3objectzd2boxzd2ref3558z83zzast_nodez00, 0L, 2 );
BGL_IMPORT obj_t BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00;
DEFINE_STATIC_PROCEDURE( BGl_proc7957z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2makeza7d2box3560za731za7za7ast_nodeza7008239z00, BGl_objectzd2ze3structzd2makezd2box3560z31zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7958z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2makeza7d2box3562za783za7za7ast_nodeza7008240za7, BGl_structzb2objectzd2ze3objectzd2makezd2box3562z83zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7960z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2jumpza7d2exza7d2it3566za751za7za7ast_nodeza7008241z00, BGl_structzb2objectzd2ze3objectzd2jumpzd2exzd2it3566z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7959z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2jumpza7d2exza7d2it3564za7e3za7za7ast_nodeza7008242za7, BGl_objectzd2ze3structzd2jumpzd2exzd2it3564ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7961z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2setza7d2exza7d2it3568za7e3za7za7ast_nodeza7008243za7, BGl_objectzd2ze3structzd2setzd2exzd2it3568ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7962z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2setza7d2exza7d2it3570za751za7za7ast_nodeza7008244z00, BGl_structzb2objectzd2ze3objectzd2setzd2exzd2it3570z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7963z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2letza7d2var3572za731za7za7ast_nodeza7008245z00, BGl_objectzd2ze3structzd2letzd2var3572z31zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7964z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2letza7d2var3574za783za7za7ast_nodeza7008246za7, BGl_structzb2objectzd2ze3objectzd2letzd2var3574z83zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7965z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2letza7d2fun3576za731za7za7ast_nodeza7008247z00, BGl_objectzd2ze3structzd2letzd2fun3576z31zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7966z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2letza7d2fun3578za783za7za7ast_nodeza7008248za7, BGl_structzb2objectzd2ze3objectzd2letzd2fun3578z83zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7967z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2select3580za7e3za7za7ast_nodeza7008249za7, BGl_objectzd2ze3structzd2select3580ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7968z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2select3582za751za7za7ast_nodeza7008250z00, BGl_structzb2objectzd2ze3objectzd2select3582z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7970z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2fail3586za751za7za7ast_nodeza7008251z00, BGl_structzb2objectzd2ze3objectzd2fail3586z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7969z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2fail3584za7e3za7za7ast_nodeza7008252za7, BGl_objectzd2ze3structzd2fail3584ze3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2letzd2varzd2envzd2zzast_nodez00, BgL_bgl__allocateza7d2letza7d2varza700za7za7ast_nodeza7008253z00, BGl__allocatezd2letzd2varz00zzast_nodez00, 0L, 0 );
DEFINE_STATIC_PROCEDURE( BGl_proc7971z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2conditional3588za7e3za7za7ast_nodeza7008254za7, BGl_objectzd2ze3structzd2conditional3588ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7972z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2conditional3590za751za7za7ast_nodeza7008255z00, BGl_structzb2objectzd2ze3objectzd2conditional3590z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7973z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2setq3592za7e3za7za7ast_nodeza7008256za7, BGl_objectzd2ze3structzd2setq3592ze3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2isaz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2isaza7126182za7c0za7za7ast_nodeza7008257z00, BGl__fillzd2isaz126182zc0zzast_nodez00, 0L, 8 );
DEFINE_STATIC_PROCEDURE( BGl_proc7974z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2setq3594za751za7za7ast_nodeza7008258z00, BGl_structzb2objectzd2ze3objectzd2setq3594z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7975z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2cast3596za7e3za7za7ast_nodeza7008259za7, BGl_objectzd2ze3structzd2cast3596ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7976z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2cast3598za751za7za7ast_nodeza7008260z00, BGl_structzb2objectzd2ze3objectzd2cast3598z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7977z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2isa3600za7e3za7za7ast_nodeza7008261za7, BGl_objectzd2ze3structzd2isa3600ze3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_funcallzf3zd2envz21zzast_nodez00, BgL_bgl__funcallza7f3za7f3za7za7ast_nodeza7008262za7, BGl__funcallzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7978z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2isa3602za751za7za7ast_nodeza7008263z00, BGl_structzb2objectzd2ze3objectzd2isa3602z51zzast_nodez00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_externzf3zd2envz21zzast_nodez00, BgL_bgl__externza7f3za7f3za7za7ast_nodeza7008264za7, BGl__externzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2vrefzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2vrefza7d2za7za7ast_nodeza7008265za7, BGl__allocatezd2vrefzd2zzast_nodez00, 0L, 0 );
DEFINE_STATIC_PROCEDURE( BGl_proc7980z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2vlength3606za751za7za7ast_nodeza7008266z00, BGl_structzb2objectzd2ze3objectzd2vlength3606z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7979z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2vlength3604za7e3za7za7ast_nodeza7008267za7, BGl_objectzd2ze3structzd2vlength3604ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7981z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2vsetza7123609za7f1za7za7ast_nodeza7008268z00, BGl_objectzd2ze3structzd2vsetz123609zf1zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7982z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2vsetza7123611za743za7za7ast_nodeza7008269za7, BGl_structzb2objectzd2ze3objectzd2vsetz123611z43zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7983z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2vref3613za7e3za7za7ast_nodeza7008270za7, BGl_objectzd2ze3structzd2vref3613ze3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2getfieldz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2getfieldza7126217za7c0za7za7ast_nodeza7008271z00, BGl__fillzd2getfieldz126217zc0zzast_nodez00, 0L, 10 );
DEFINE_STATIC_PROCEDURE( BGl_proc7984z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2vref3615za751za7za7ast_nodeza7008272z00, BGl_structzb2objectzd2ze3objectzd2vref3615z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7985z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2valloc3617za7e3za7za7ast_nodeza7008273za7, BGl_objectzd2ze3structzd2valloc3617ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7986z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2valloc3619za751za7za7ast_nodeza7008274z00, BGl_structzb2objectzd2ze3objectzd2valloc3619z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7987z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2new3621za7e3za7za7ast_nodeza7008275za7, BGl_objectzd2ze3structzd2new3621ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7988z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2new3623za751za7za7ast_nodeza7008276z00, BGl_structzb2objectzd2ze3objectzd2new3623z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7990z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2setfield3627za751za7za7ast_nodeza7008277z00, BGl_structzb2objectzd2ze3objectzd2setfield3627z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7989z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2setfield3625za7e3za7za7ast_nodeza7008278za7, BGl_objectzd2ze3structzd2setfield3625ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7991z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2getfield3629za7e3za7za7ast_nodeza7008279za7, BGl_objectzd2ze3structzd2getfield3629ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7992z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2getfield3631za751za7za7ast_nodeza7008280z00, BGl_structzb2objectzd2ze3objectzd2getfield3631z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7993z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2pragma3633za7e3za7za7ast_nodeza7008281za7, BGl_objectzd2ze3structzd2pragma3633ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7994z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2pragma3635za751za7za7ast_nodeza7008282z00, BGl_structzb2objectzd2ze3objectzd2pragma3635z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7995z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2extern3637za7e3za7za7ast_nodeza7008283za7, BGl_objectzd2ze3structzd2extern3637ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7996z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2extern3639za751za7za7ast_nodeza7008284z00, BGl_structzb2objectzd2ze3objectzd2extern3639z51zzast_nodez00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc7997z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2funcall3641za7e3za7za7ast_nodeza7008285za7, BGl_objectzd2ze3structzd2funcall3641ze3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7998z00zzast_nodez00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2funcall3643za751za7za7ast_nodeza7008286z00, BGl_structzb2objectzd2ze3objectzd2funcall3643z51zzast_nodez00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_getfieldzf3zd2envz21zzast_nodez00, BgL_bgl__getfieldza7f3za7f3za7za7ast_nodeza7008287za7, BGl__getfieldzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc7999z00zzast_nodez00, BgL_bgl_objectza7d2za7e3structza7d2appza7d2ly3645za731za7za7ast_nodeza7008288z00, BGl_objectzd2ze3structzd2appzd2ly3645z31zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_newzf3zd2envz21zzast_nodez00, BgL_bgl__newza7f3za7f3za7za7ast_nodeza7008289za7, BGl__newzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2kwotez12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2kwoteza7126252za7c0za7za7ast_nodeza7008290z00, BGl__fillzd2kwotez126252zc0zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_setzd2exzd2itzf3zd2envz21zzast_nodez00, BgL_bgl__setza7d2exza7d2itza7f3za7f3za7za7ast_nodeza7008291za7, BGl__setzd2exzd2itzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2varzd2envz00zzast_nodez00, BgL_bgl__makeza7d2var6260za7d2za7za7ast_nodeza7008292za7, BGl__makezd2var6260zd2zzast_nodez00, 0L, 3 );
DEFINE_EXPORT_PROCEDURE( BGl_boxzd2setz12zf3zd2envze1zzast_nodez00, BgL_bgl__boxza7d2setza712za7f3za733za7za7ast_nodeza7008293za7, BGl__boxzd2setz12zf3z33zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2appzd2lyzd2envzd2zzast_nodez00, BgL_bgl__makeza7d2appza7d2ly6235za700za7za7ast_nodeza7008294z00, BGl__makezd2appzd2ly6235z00zzast_nodez00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2conditionalzd2envz00zzast_nodez00, BgL_bgl__allocateza7d2conditionalza7d2za7za7ast_nodeza7008295za7, BGl__allocatezd2conditionalzd2zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2vrefz12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2vrefza7126197za7c0za7za7ast_nodeza7008296z00, BGl__fillzd2vrefz126197zc0zzast_nodez00, 0L, 11 );
DEFINE_EXPORT_PROCEDURE( BGl_castzf3zd2envz21zzast_nodez00, BgL_bgl__castza7f3za7f3za7za7ast_nodeza7008297za7, BGl__castzf3zf3zzast_nodez00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2vsetz12zd2envz12zzast_nodez00, BgL_bgl__makeza7d2vsetza7126190za7c0za7za7ast_nodeza7008298z00, BGl__makezd2vsetz126190zc0zzast_nodez00, 0L, 10 );
DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2letzd2funzd2envzd2zzast_nodez00, BgL_bgl__allocateza7d2letza7d2funza700za7za7ast_nodeza7008299z00, BGl__allocatezd2letzd2funz00zzast_nodez00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2closurez12zd2envz12zzast_nodez00, BgL_bgl__fillza7d2closureza7126257za7c0za7za7ast_nodeza7008300z00, BGl__fillzd2closurez126257zc0zzast_nodez00, 0L, 4 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long BgL_checksumz00_6540, char * BgL_fromz00_6541)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzast_nodez00))
{ 
BGl_requirezd2initializa7ationz75zzast_nodez00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzast_nodez00(); 
BGl_cnstzd2initzd2zzast_nodez00(); 
BGl_importedzd2moduleszd2initz00zzast_nodez00(); 
BGl_objectzd2initzd2zzast_nodez00(); 
BGl_methodzd2initzd2zzast_nodez00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 14 */
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "ast_node"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "ast_node"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 14 */
{ /* ./Ast/node.scm 14 */
obj_t BgL_cportz00_5609;
BgL_cportz00_5609 = 
open_input_string(BGl_string8017z00zzast_nodez00); 
{ 
long BgL_iz00_5610;
BgL_iz00_5610 = ((long)31); 
BgL_loopz00_5611:
{ /* ./Ast/node.scm 14 */
bool_t BgL_test8019z00_5612;
BgL_test8019z00_5612 = 
(BgL_iz00_5610==((long)-1)); 
if(BgL_test8019z00_5612)
{ /* ./Ast/node.scm 14 */
return BUNSPEC;}  else 
{ /* ./Ast/node.scm 14 */
{ /* ./Ast/node.scm 14 */
obj_t BgL_arg8021z00_5613;
{ /* ./Ast/node.scm 14 */
obj_t BgL_list8024z00_5614;
BgL_list8024z00_5614 = 
MAKE_PAIR(BgL_cportz00_5609, BNIL); 
BgL_arg8021z00_5613 = 
BGl_readz00zz__readerz00(BgL_list8024z00_5614); } 
{ /* ./Ast/node.scm 14 */
int BgL_auxz00_6557;
BgL_auxz00_6557 = 
(int)(BgL_iz00_5610); 
CNST_TABLE_SET(BgL_auxz00_6557, BgL_arg8021z00_5613); } } 
{ /* ./Ast/node.scm 14 */
int BgL_auxz00_5615;
{ /* ./Ast/node.scm 14 */
long BgL_auxz00_6560;
BgL_auxz00_6560 = 
(BgL_iz00_5610-((long)1)); 
BgL_auxz00_5615 = 
(int)(BgL_auxz00_6560); } 
{ 
long BgL_iz00_6563;
BgL_iz00_6563 = 
(long)(BgL_auxz00_5615); 
BgL_iz00_5610 = BgL_iz00_6563; 
goto BgL_loopz00_5611;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 14 */
return BUNSPEC;} 
}



/* object-init */
obj_t BGl_objectzd2initzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 14 */
{ /* ./Ast/node.scm 19 */
obj_t BgL_arg3681z00_934;obj_t BgL_arg3682z00_935;obj_t BgL_arg3686z00_939;
BgL_arg3681z00_934 = 
CNST_TABLE_REF(((long)0)); 
BgL_arg3682z00_935 = BGl_objectz00zz__objectz00; 
{ /* ./Ast/node.scm 19 */
obj_t BgL_v3519z00_940;
{ 
int BgL_auxz00_6566;
BgL_auxz00_6566 = 
(int)(((long)0)); 
BgL_v3519z00_940 = 
create_vector(BgL_auxz00_6566); } 
BgL_arg3686z00_939 = BgL_v3519z00_940; } 
BGl_nodez00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3681z00_934, BgL_arg3682z00_935, BFALSE, BGl_allocatezd2nodezd2envz00zzast_nodez00, ((long)16715), BNIL, BFALSE, BgL_arg3686z00_939); } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_arg3690z00_941;obj_t BgL_arg3691z00_942;obj_t BgL_arg3697z00_946;
BgL_arg3690z00_941 = 
CNST_TABLE_REF(((long)1)); 
BgL_arg3691z00_942 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 27 */
obj_t BgL_v3520z00_947;
{ 
int BgL_auxz00_6571;
BgL_auxz00_6571 = 
(int)(((long)0)); 
BgL_v3520z00_947 = 
create_vector(BgL_auxz00_6571); } 
BgL_arg3697z00_946 = BgL_v3520z00_947; } 
BGl_nodezf2effectzf2zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3690z00_941, BgL_arg3691z00_942, BFALSE, BGl_allocatezd2nodezf2effectzd2envzf2zzast_nodez00, ((long)60821), BNIL, BFALSE, BgL_arg3697z00_946); } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_arg3701z00_948;obj_t BgL_arg3702z00_949;obj_t BgL_arg3706z00_953;
BgL_arg3701z00_948 = 
CNST_TABLE_REF(((long)2)); 
BgL_arg3702z00_949 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 36 */
obj_t BgL_v3521z00_954;
{ 
int BgL_auxz00_6576;
BgL_auxz00_6576 = 
(int)(((long)0)); 
BgL_v3521z00_954 = 
create_vector(BgL_auxz00_6576); } 
BgL_arg3706z00_953 = BgL_v3521z00_954; } 
BGl_atomz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3701z00_948, BgL_arg3702z00_949, BFALSE, BGl_allocatezd2atomzd2envz00zzast_nodez00, ((long)50053), BNIL, BFALSE, BgL_arg3706z00_953); } 
{ /* ./Ast/node.scm 41 */
obj_t BgL_arg3710z00_955;obj_t BgL_arg3712z00_956;obj_t BgL_arg3717z00_960;
BgL_arg3710z00_955 = 
CNST_TABLE_REF(((long)3)); 
BgL_arg3712z00_956 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 41 */
obj_t BgL_v3522z00_961;
{ 
int BgL_auxz00_6581;
BgL_auxz00_6581 = 
(int)(((long)0)); 
BgL_v3522z00_961 = 
create_vector(BgL_auxz00_6581); } 
BgL_arg3717z00_960 = BgL_v3522z00_961; } 
BGl_varz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3710z00_955, BgL_arg3712z00_956, BFALSE, BGl_allocatezd2varzd2envz00zzast_nodez00, ((long)31217), BNIL, BFALSE, BgL_arg3717z00_960); } 
{ /* ./Ast/node.scm 46 */
obj_t BgL_arg3721z00_962;obj_t BgL_arg3722z00_963;obj_t BgL_arg3726z00_967;
BgL_arg3721z00_962 = 
CNST_TABLE_REF(((long)4)); 
BgL_arg3722z00_963 = BGl_varz00zzast_nodez00; 
{ /* ./Ast/node.scm 46 */
obj_t BgL_v3523z00_968;
{ 
int BgL_auxz00_6586;
BgL_auxz00_6586 = 
(int)(((long)0)); 
BgL_v3523z00_968 = 
create_vector(BgL_auxz00_6586); } 
BgL_arg3726z00_967 = BgL_v3523z00_968; } 
BGl_closurez00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3721z00_962, BgL_arg3722z00_963, BFALSE, BGl_allocatezd2closurezd2envz00zzast_nodez00, ((long)43829), BNIL, BFALSE, BgL_arg3726z00_967); } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_arg3730z00_969;obj_t BgL_arg3731z00_970;obj_t BgL_arg3735z00_974;
BgL_arg3730z00_969 = 
CNST_TABLE_REF(((long)5)); 
BgL_arg3731z00_970 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 49 */
obj_t BgL_v3524z00_975;
{ 
int BgL_auxz00_6591;
BgL_auxz00_6591 = 
(int)(((long)0)); 
BgL_v3524z00_975 = 
create_vector(BgL_auxz00_6591); } 
BgL_arg3735z00_974 = BgL_v3524z00_975; } 
BGl_kwotez00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3730z00_969, BgL_arg3731z00_970, BFALSE, BGl_allocatezd2kwotezd2envz00zzast_nodez00, ((long)52742), BNIL, BFALSE, BgL_arg3735z00_974); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_arg3739z00_976;obj_t BgL_arg3740z00_977;obj_t BgL_arg3744z00_981;
BgL_arg3739z00_976 = 
CNST_TABLE_REF(((long)6)); 
BgL_arg3740z00_977 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 54 */
obj_t BgL_v3525z00_982;
{ 
int BgL_auxz00_6596;
BgL_auxz00_6596 = 
(int)(((long)0)); 
BgL_v3525z00_982 = 
create_vector(BgL_auxz00_6596); } 
BgL_arg3744z00_981 = BgL_v3525z00_982; } 
BGl_sequencez00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3739z00_976, BgL_arg3740z00_977, BFALSE, BGl_allocatezd2sequencezd2envz00zzast_nodez00, ((long)63129), BNIL, BFALSE, BgL_arg3744z00_981); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_arg3748z00_983;obj_t BgL_arg3749z00_984;obj_t BgL_arg3753z00_988;
BgL_arg3748z00_983 = 
CNST_TABLE_REF(((long)7)); 
BgL_arg3749z00_984 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 58 */
obj_t BgL_v3526z00_989;
{ 
int BgL_auxz00_6601;
BgL_auxz00_6601 = 
(int)(((long)0)); 
BgL_v3526z00_989 = 
create_vector(BgL_auxz00_6601); } 
BgL_arg3753z00_988 = BgL_v3526z00_989; } 
BGl_appz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3748z00_983, BgL_arg3749z00_984, BFALSE, BGl_allocatezd2appzd2envz00zzast_nodez00, ((long)44930), BNIL, BFALSE, BgL_arg3753z00_988); } 
{ /* ./Ast/node.scm 65 */
obj_t BgL_arg3757z00_990;obj_t BgL_arg3758z00_991;obj_t BgL_arg3762z00_995;
BgL_arg3757z00_990 = 
CNST_TABLE_REF(((long)8)); 
BgL_arg3758z00_991 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 65 */
obj_t BgL_v3527z00_996;
{ 
int BgL_auxz00_6606;
BgL_auxz00_6606 = 
(int)(((long)0)); 
BgL_v3527z00_996 = 
create_vector(BgL_auxz00_6606); } 
BgL_arg3762z00_995 = BgL_v3527z00_996; } 
BGl_appzd2lyzd2zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3757z00_990, BgL_arg3758z00_991, BFALSE, BGl_allocatezd2appzd2lyzd2envzd2zzast_nodez00, ((long)62372), BNIL, BFALSE, BgL_arg3762z00_995); } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_arg3766z00_997;obj_t BgL_arg3767z00_998;obj_t BgL_arg3771z00_1002;
BgL_arg3766z00_997 = 
CNST_TABLE_REF(((long)9)); 
BgL_arg3767z00_998 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 72 */
obj_t BgL_v3528z00_1003;
{ 
int BgL_auxz00_6611;
BgL_auxz00_6611 = 
(int)(((long)0)); 
BgL_v3528z00_1003 = 
create_vector(BgL_auxz00_6611); } 
BgL_arg3771z00_1002 = BgL_v3528z00_1003; } 
BGl_funcallz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3766z00_997, BgL_arg3767z00_998, BFALSE, BGl_allocatezd2funcallzd2envz00zzast_nodez00, ((long)62970), BNIL, BFALSE, BgL_arg3771z00_1002); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_arg3775z00_1004;obj_t BgL_arg3777z00_1005;obj_t BgL_arg3781z00_1009;
BgL_arg3775z00_1004 = 
CNST_TABLE_REF(((long)10)); 
BgL_arg3777z00_1005 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 82 */
obj_t BgL_v3529z00_1010;
{ 
int BgL_auxz00_6616;
BgL_auxz00_6616 = 
(int)(((long)0)); 
BgL_v3529z00_1010 = 
create_vector(BgL_auxz00_6616); } 
BgL_arg3781z00_1009 = BgL_v3529z00_1010; } 
BGl_externz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3775z00_1004, BgL_arg3777z00_1005, BFALSE, BGl_allocatezd2externzd2envz00zzast_nodez00, ((long)62066), BNIL, BFALSE, BgL_arg3781z00_1009); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg3785z00_1011;obj_t BgL_arg3786z00_1012;obj_t BgL_arg3791z00_1016;
BgL_arg3785z00_1011 = 
CNST_TABLE_REF(((long)11)); 
BgL_arg3786z00_1012 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 89 */
obj_t BgL_v3530z00_1017;
{ 
int BgL_auxz00_6621;
BgL_auxz00_6621 = 
(int)(((long)0)); 
BgL_v3530z00_1017 = 
create_vector(BgL_auxz00_6621); } 
BgL_arg3791z00_1016 = BgL_v3530z00_1017; } 
BGl_pragmaz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3785z00_1011, BgL_arg3786z00_1012, BFALSE, BGl_allocatezd2pragmazd2envz00zzast_nodez00, ((long)64102), BNIL, BFALSE, BgL_arg3791z00_1016); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg3795z00_1018;obj_t BgL_arg3796z00_1019;obj_t BgL_arg3800z00_1023;
BgL_arg3795z00_1018 = 
CNST_TABLE_REF(((long)12)); 
BgL_arg3796z00_1019 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 93 */
obj_t BgL_v3531z00_1024;
{ 
int BgL_auxz00_6626;
BgL_auxz00_6626 = 
(int)(((long)0)); 
BgL_v3531z00_1024 = 
create_vector(BgL_auxz00_6626); } 
BgL_arg3800z00_1023 = BgL_v3531z00_1024; } 
BGl_getfieldz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3795z00_1018, BgL_arg3796z00_1019, BFALSE, BGl_allocatezd2getfieldzd2envz00zzast_nodez00, ((long)47457), BNIL, BFALSE, BgL_arg3800z00_1023); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg3804z00_1025;obj_t BgL_arg3805z00_1026;obj_t BgL_arg3809z00_1030;
BgL_arg3804z00_1025 = 
CNST_TABLE_REF(((long)13)); 
BgL_arg3805z00_1026 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 102 */
obj_t BgL_v3532z00_1031;
{ 
int BgL_auxz00_6631;
BgL_auxz00_6631 = 
(int)(((long)0)); 
BgL_v3532z00_1031 = 
create_vector(BgL_auxz00_6631); } 
BgL_arg3809z00_1030 = BgL_v3532z00_1031; } 
BGl_setfieldz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3804z00_1025, BgL_arg3805z00_1026, BFALSE, BGl_allocatezd2setfieldzd2envz00zzast_nodez00, ((long)33685), BNIL, BFALSE, BgL_arg3809z00_1030); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_arg3813z00_1032;obj_t BgL_arg3814z00_1033;obj_t BgL_arg3818z00_1037;
BgL_arg3813z00_1032 = 
CNST_TABLE_REF(((long)14)); 
BgL_arg3814z00_1033 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 111 */
obj_t BgL_v3533z00_1038;
{ 
int BgL_auxz00_6636;
BgL_auxz00_6636 = 
(int)(((long)0)); 
BgL_v3533z00_1038 = 
create_vector(BgL_auxz00_6636); } 
BgL_arg3818z00_1037 = BgL_v3533z00_1038; } 
BGl_newz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3813z00_1032, BgL_arg3814z00_1033, BFALSE, BGl_allocatezd2newzd2envz00zzast_nodez00, ((long)9938), BNIL, BFALSE, BgL_arg3818z00_1037); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg3822z00_1039;obj_t BgL_arg3823z00_1040;obj_t BgL_arg3827z00_1044;
BgL_arg3822z00_1039 = 
CNST_TABLE_REF(((long)15)); 
BgL_arg3823z00_1040 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 114 */
obj_t BgL_v3534z00_1045;
{ 
int BgL_auxz00_6641;
BgL_auxz00_6641 = 
(int)(((long)0)); 
BgL_v3534z00_1045 = 
create_vector(BgL_auxz00_6641); } 
BgL_arg3827z00_1044 = BgL_v3534z00_1045; } 
BGl_vallocz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3822z00_1039, BgL_arg3823z00_1040, BFALSE, BGl_allocatezd2valloczd2envz00zzast_nodez00, ((long)11057), BNIL, BFALSE, BgL_arg3827z00_1044); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg3832z00_1046;obj_t BgL_arg3833z00_1047;obj_t BgL_arg3837z00_1051;
BgL_arg3832z00_1046 = 
CNST_TABLE_REF(((long)16)); 
BgL_arg3833z00_1047 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 123 */
obj_t BgL_v3535z00_1052;
{ 
int BgL_auxz00_6646;
BgL_auxz00_6646 = 
(int)(((long)0)); 
BgL_v3535z00_1052 = 
create_vector(BgL_auxz00_6646); } 
BgL_arg3837z00_1051 = BgL_v3535z00_1052; } 
BGl_vrefz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3832z00_1046, BgL_arg3833z00_1047, BFALSE, BGl_allocatezd2vrefzd2envz00zzast_nodez00, ((long)29514), BNIL, BFALSE, BgL_arg3837z00_1051); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg3841z00_1053;obj_t BgL_arg3842z00_1054;obj_t BgL_arg3846z00_1058;
BgL_arg3841z00_1053 = 
CNST_TABLE_REF(((long)17)); 
BgL_arg3842z00_1054 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 134 */
obj_t BgL_v3536z00_1059;
{ 
int BgL_auxz00_6651;
BgL_auxz00_6651 = 
(int)(((long)0)); 
BgL_v3536z00_1059 = 
create_vector(BgL_auxz00_6651); } 
BgL_arg3846z00_1058 = BgL_v3536z00_1059; } 
BGl_vsetz12z12zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3841z00_1053, BgL_arg3842z00_1054, BFALSE, BGl_allocatezd2vsetz12zd2envz12zzast_nodez00, ((long)12442), BNIL, BFALSE, BgL_arg3846z00_1058); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg3850z00_1060;obj_t BgL_arg3851z00_1061;obj_t BgL_arg3856z00_1065;
BgL_arg3850z00_1060 = 
CNST_TABLE_REF(((long)18)); 
BgL_arg3851z00_1061 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 145 */
obj_t BgL_v3537z00_1066;
{ 
int BgL_auxz00_6656;
BgL_auxz00_6656 = 
(int)(((long)0)); 
BgL_v3537z00_1066 = 
create_vector(BgL_auxz00_6656); } 
BgL_arg3856z00_1065 = BgL_v3537z00_1066; } 
BGl_vlengthz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3850z00_1060, BgL_arg3851z00_1061, BFALSE, BGl_allocatezd2vlengthzd2envz00zzast_nodez00, ((long)43088), BNIL, BFALSE, BgL_arg3856z00_1065); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_arg3860z00_1067;obj_t BgL_arg3861z00_1068;obj_t BgL_arg3865z00_1072;
BgL_arg3860z00_1067 = 
CNST_TABLE_REF(((long)19)); 
BgL_arg3861z00_1068 = BGl_externz00zzast_nodez00; 
{ /* ./Ast/node.scm 152 */
obj_t BgL_v3538z00_1073;
{ 
int BgL_auxz00_6661;
BgL_auxz00_6661 = 
(int)(((long)0)); 
BgL_v3538z00_1073 = 
create_vector(BgL_auxz00_6661); } 
BgL_arg3865z00_1072 = BgL_v3538z00_1073; } 
BGl_isaz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3860z00_1067, BgL_arg3861z00_1068, BFALSE, BGl_allocatezd2isazd2envz00zzast_nodez00, ((long)43121), BNIL, BFALSE, BgL_arg3865z00_1072); } 
{ /* ./Ast/node.scm 156 */
obj_t BgL_arg3869z00_1074;obj_t BgL_arg3870z00_1075;obj_t BgL_arg3874z00_1079;
BgL_arg3869z00_1074 = 
CNST_TABLE_REF(((long)20)); 
BgL_arg3870z00_1075 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 156 */
obj_t BgL_v3539z00_1080;
{ 
int BgL_auxz00_6666;
BgL_auxz00_6666 = 
(int)(((long)0)); 
BgL_v3539z00_1080 = 
create_vector(BgL_auxz00_6666); } 
BgL_arg3874z00_1079 = BgL_v3539z00_1080; } 
BGl_castz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3869z00_1074, BgL_arg3870z00_1075, BFALSE, BGl_allocatezd2castzd2envz00zzast_nodez00, ((long)1951), BNIL, BFALSE, BgL_arg3874z00_1079); } 
{ /* ./Ast/node.scm 161 */
obj_t BgL_arg3879z00_1081;obj_t BgL_arg3880z00_1082;obj_t BgL_arg3885z00_1086;
BgL_arg3879z00_1081 = 
CNST_TABLE_REF(((long)21)); 
BgL_arg3880z00_1082 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 161 */
obj_t BgL_v3540z00_1087;
{ 
int BgL_auxz00_6671;
BgL_auxz00_6671 = 
(int)(((long)0)); 
BgL_v3540z00_1087 = 
create_vector(BgL_auxz00_6671); } 
BgL_arg3885z00_1086 = BgL_v3540z00_1087; } 
BGl_setqz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3879z00_1081, BgL_arg3880z00_1082, BFALSE, BGl_allocatezd2setqzd2envz00zzast_nodez00, ((long)18828), BNIL, BFALSE, BgL_arg3885z00_1086); } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_arg3889z00_1088;obj_t BgL_arg3890z00_1089;obj_t BgL_arg3894z00_1093;
BgL_arg3889z00_1088 = 
CNST_TABLE_REF(((long)22)); 
BgL_arg3890z00_1089 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 168 */
obj_t BgL_v3541z00_1094;
{ 
int BgL_auxz00_6676;
BgL_auxz00_6676 = 
(int)(((long)0)); 
BgL_v3541z00_1094 = 
create_vector(BgL_auxz00_6676); } 
BgL_arg3894z00_1093 = BgL_v3541z00_1094; } 
BGl_conditionalz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3889z00_1088, BgL_arg3890z00_1089, BFALSE, BGl_allocatezd2conditionalzd2envz00zzast_nodez00, ((long)49513), BNIL, BFALSE, BgL_arg3894z00_1093); } 
{ /* ./Ast/node.scm 177 */
obj_t BgL_arg3898z00_1095;obj_t BgL_arg3899z00_1096;obj_t BgL_arg3903z00_1100;
BgL_arg3898z00_1095 = 
CNST_TABLE_REF(((long)23)); 
BgL_arg3899z00_1096 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 177 */
obj_t BgL_v3542z00_1101;
{ 
int BgL_auxz00_6681;
BgL_auxz00_6681 = 
(int)(((long)0)); 
BgL_v3542z00_1101 = 
create_vector(BgL_auxz00_6681); } 
BgL_arg3903z00_1100 = BgL_v3542z00_1101; } 
BGl_failz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3898z00_1095, BgL_arg3899z00_1096, BFALSE, BGl_allocatezd2failzd2envz00zzast_nodez00, ((long)10126), BNIL, BFALSE, BgL_arg3903z00_1100); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_arg3907z00_1102;obj_t BgL_arg3908z00_1103;obj_t BgL_arg3912z00_1107;
BgL_arg3907z00_1102 = 
CNST_TABLE_REF(((long)24)); 
BgL_arg3908z00_1103 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 184 */
obj_t BgL_v3543z00_1108;
{ 
int BgL_auxz00_6686;
BgL_auxz00_6686 = 
(int)(((long)0)); 
BgL_v3543z00_1108 = 
create_vector(BgL_auxz00_6686); } 
BgL_arg3912z00_1107 = BgL_v3543z00_1108; } 
BGl_selectz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3907z00_1102, BgL_arg3908z00_1103, BFALSE, BGl_allocatezd2selectzd2envz00zzast_nodez00, ((long)17537), BNIL, BFALSE, BgL_arg3912z00_1107); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_arg3916z00_1109;obj_t BgL_arg3917z00_1110;obj_t BgL_arg3921z00_1114;
BgL_arg3916z00_1109 = 
CNST_TABLE_REF(((long)25)); 
BgL_arg3917z00_1110 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 193 */
obj_t BgL_v3544z00_1115;
{ 
int BgL_auxz00_6691;
BgL_auxz00_6691 = 
(int)(((long)0)); 
BgL_v3544z00_1115 = 
create_vector(BgL_auxz00_6691); } 
BgL_arg3921z00_1114 = BgL_v3544z00_1115; } 
BGl_letzd2funzd2zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3916z00_1109, BgL_arg3917z00_1110, BFALSE, BGl_allocatezd2letzd2funzd2envzd2zzast_nodez00, ((long)61726), BNIL, BFALSE, BgL_arg3921z00_1114); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_arg3925z00_1116;obj_t BgL_arg3926z00_1117;obj_t BgL_arg3930z00_1121;
BgL_arg3925z00_1116 = 
CNST_TABLE_REF(((long)26)); 
BgL_arg3926z00_1117 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 200 */
obj_t BgL_v3545z00_1122;
{ 
int BgL_auxz00_6696;
BgL_auxz00_6696 = 
(int)(((long)0)); 
BgL_v3545z00_1122 = 
create_vector(BgL_auxz00_6696); } 
BgL_arg3930z00_1121 = BgL_v3545z00_1122; } 
BGl_letzd2varzd2zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3925z00_1116, BgL_arg3926z00_1117, BFALSE, BGl_allocatezd2letzd2varzd2envzd2zzast_nodez00, ((long)6658), BNIL, BFALSE, BgL_arg3930z00_1121); } 
{ /* ./Ast/node.scm 209 */
obj_t BgL_arg3934z00_1123;obj_t BgL_arg3935z00_1124;obj_t BgL_arg3940z00_1128;
BgL_arg3934z00_1123 = 
CNST_TABLE_REF(((long)27)); 
BgL_arg3935z00_1124 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 209 */
obj_t BgL_v3546z00_1129;
{ 
int BgL_auxz00_6701;
BgL_auxz00_6701 = 
(int)(((long)0)); 
BgL_v3546z00_1129 = 
create_vector(BgL_auxz00_6701); } 
BgL_arg3940z00_1128 = BgL_v3546z00_1129; } 
BGl_setzd2exzd2itz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3934z00_1123, BgL_arg3935z00_1124, BFALSE, BGl_allocatezd2setzd2exzd2itzd2envz00zzast_nodez00, ((long)41486), BNIL, BFALSE, BgL_arg3940z00_1128); } 
{ /* ./Ast/node.scm 216 */
obj_t BgL_arg3944z00_1130;obj_t BgL_arg3945z00_1131;obj_t BgL_arg3950z00_1135;
BgL_arg3944z00_1130 = 
CNST_TABLE_REF(((long)28)); 
BgL_arg3945z00_1131 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 216 */
obj_t BgL_v3547z00_1136;
{ 
int BgL_auxz00_6706;
BgL_auxz00_6706 = 
(int)(((long)0)); 
BgL_v3547z00_1136 = 
create_vector(BgL_auxz00_6706); } 
BgL_arg3950z00_1135 = BgL_v3547z00_1136; } 
BGl_jumpzd2exzd2itz00zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3944z00_1130, BgL_arg3945z00_1131, BFALSE, BGl_allocatezd2jumpzd2exzd2itzd2envz00zzast_nodez00, ((long)25675), BNIL, BFALSE, BgL_arg3950z00_1135); } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_arg3954z00_1137;obj_t BgL_arg3955z00_1138;obj_t BgL_arg3959z00_1142;
BgL_arg3954z00_1137 = 
CNST_TABLE_REF(((long)29)); 
BgL_arg3955z00_1138 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 223 */
obj_t BgL_v3548z00_1143;
{ 
int BgL_auxz00_6711;
BgL_auxz00_6711 = 
(int)(((long)0)); 
BgL_v3548z00_1143 = 
create_vector(BgL_auxz00_6711); } 
BgL_arg3959z00_1142 = BgL_v3548z00_1143; } 
BGl_makezd2boxzd2zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3954z00_1137, BgL_arg3955z00_1138, BFALSE, BGl_allocatezd2makezd2boxzd2envzd2zzast_nodez00, ((long)10195), BNIL, BFALSE, BgL_arg3959z00_1142); } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_arg3963z00_1144;obj_t BgL_arg3964z00_1145;obj_t BgL_arg3968z00_1149;
BgL_arg3963z00_1144 = 
CNST_TABLE_REF(((long)30)); 
BgL_arg3964z00_1145 = BGl_nodezf2effectzf2zzast_nodez00; 
{ /* ./Ast/node.scm 227 */
obj_t BgL_v3549z00_1150;
{ 
int BgL_auxz00_6716;
BgL_auxz00_6716 = 
(int)(((long)0)); 
BgL_v3549z00_1150 = 
create_vector(BgL_auxz00_6716); } 
BgL_arg3968z00_1149 = BgL_v3549z00_1150; } 
BGl_boxzd2refzd2zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3963z00_1144, BgL_arg3964z00_1145, BFALSE, BGl_allocatezd2boxzd2refzd2envzd2zzast_nodez00, ((long)46341), BNIL, BFALSE, BgL_arg3968z00_1149); } 
{ /* ./Ast/node.scm 231 */
obj_t BgL_arg3972z00_1151;obj_t BgL_arg3973z00_1152;obj_t BgL_arg3978z00_1156;
BgL_arg3972z00_1151 = 
CNST_TABLE_REF(((long)31)); 
BgL_arg3973z00_1152 = BGl_nodez00zzast_nodez00; 
{ /* ./Ast/node.scm 231 */
obj_t BgL_v3550z00_1157;
{ 
int BgL_auxz00_6721;
BgL_auxz00_6721 = 
(int)(((long)0)); 
BgL_v3550z00_1157 = 
create_vector(BgL_auxz00_6721); } 
BgL_arg3978z00_1156 = BgL_v3550z00_1157; } 
BGl_boxzd2setz12zc0zzast_nodez00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg3972z00_1151, BgL_arg3973z00_1152, BFALSE, BGl_allocatezd2boxzd2setz12zd2envzc0zzast_nodez00, ((long)20354), BNIL, BFALSE, BgL_arg3978z00_1156); } 
return BUNSPEC;} 
}



/* box-set!? */
BGL_EXPORTED_DEF bool_t BGl_boxzd2setz12zf3z33zzast_nodez00(obj_t BgL_obj3518z00_1)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3518z00_1, BGl_boxzd2setz12zc0zzast_nodez00);} 
}



/* _box-set!? */
obj_t BGl__boxzd2setz12zf3z33zzast_nodez00(obj_t BgL_envz00_4860, obj_t BgL_obj3518z00_4861)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ /* ./Ast/node.scm 231 */
bool_t BgL_auxz00_6726;
BgL_auxz00_6726 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3518z00_4861, BGl_boxzd2setz12zc0zzast_nodez00); 
return 
BBOOL(BgL_auxz00_6726);} } 
}



/* make-box-set! */
BGL_EXPORTED_DEF BgL_boxzd2setz12zc0_bglt BGl_makezd2boxzd2setz12z12zzast_nodez00(obj_t BgL_loc3483z00_5, BgL_typez00_bglt BgL_type3484z00_6, BgL_varz00_bglt BgL_var3485z00_7, BgL_nodez00_bglt BgL_value3486z00_8)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_new3487z00_2504;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_res6023z00_2510;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_new3499z00_2505;
BgL_new3499z00_2505 = 
((BgL_boxzd2setz12zc0_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_boxzd2setz12zc0_bgl) ))); 
{ /* ./Ast/node.scm 231 */
long BgL_arg3985z00_2506;
BgL_arg3985z00_2506 = 
BGl_classzd2numzd2zz__objectz00(BGl_boxzd2setz12zc0zzast_nodez00); 
{ /* ./Ast/node.scm 231 */
BgL_objectz00_bglt BgL_objz00_2507;
BgL_objz00_2507 = 
(BgL_objectz00_bglt)(BgL_new3499z00_2505); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2507, BgL_arg3985z00_2506); } } 
{ /* ./Ast/node.scm 231 */
BgL_objectz00_bglt BgL_auxz00_6733;
BgL_auxz00_6733 = 
(BgL_objectz00_bglt)(BgL_new3499z00_2505); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6733, BFALSE); } 
{ /* ./Ast/node.scm 231 */
obj_t BgL_objz00_2509;
BgL_objz00_2509 = 
(obj_t)(BgL_new3499z00_2505); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2509); BUNSPEC; } 
BgL_res6023z00_2510 = BgL_new3499z00_2505; } 
BgL_new3487z00_2504 = BgL_res6023z00_2510; } 
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_res6024z00_2520;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_new3493z00_2511;
BgL_new3493z00_2511 = BgL_new3487z00_2504; 
{ /* ./Ast/node.scm 231 */
obj_t BgL_loc3489z00_2516;BgL_typez00_bglt BgL_type3490z00_2517;BgL_varz00_bglt BgL_var3491z00_2518;BgL_nodez00_bglt BgL_value3492z00_2519;
BgL_loc3489z00_2516 = BgL_loc3483z00_5; 
BgL_type3490z00_2517 = BgL_type3484z00_6; 
BgL_var3491z00_2518 = BgL_var3485z00_7; 
BgL_value3492z00_2519 = BgL_value3486z00_8; 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_2511))->BgL_locz00) = ((obj_t)BgL_loc3489z00_2516), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_2511))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3490z00_2517), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_2511))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3491z00_2518), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_2511))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3492z00_2519), BUNSPEC); 
BgL_res6024z00_2520 = BgL_new3493z00_2511; } } BgL_res6024z00_2520; } 
return BgL_new3487z00_2504;} } 
}



/* _make-box-set!6120 */
obj_t BGl__makezd2boxzd2setz126120z12zzast_nodez00(obj_t BgL_envz00_4862, obj_t BgL_loc3483z00_4863, obj_t BgL_type3484z00_4864, obj_t BgL_var3485z00_4865, obj_t BgL_value3486z00_4866)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_auxz00_6742;
BgL_auxz00_6742 = 
BGl_makezd2boxzd2setz12z12zzast_nodez00(BgL_loc3483z00_4863, 
(BgL_typez00_bglt)(BgL_type3484z00_4864), 
(BgL_varz00_bglt)(BgL_var3485z00_4865), 
(BgL_nodez00_bglt)(BgL_value3486z00_4866)); 
return 
(obj_t)(BgL_auxz00_6742);} } 
}



/* fill-box-set!! */
BGL_EXPORTED_DEF BgL_boxzd2setz12zc0_bglt BGl_fillzd2boxzd2setz12z12z00zzast_nodez00(BgL_boxzd2setz12zc0_bglt BgL_new3493z00_9, obj_t BgL_loc3489z00_10, BgL_typez00_bglt BgL_type3490z00_11, BgL_varz00_bglt BgL_var3491z00_12, BgL_nodez00_bglt BgL_value3492z00_13)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ /* ./Ast/node.scm 231 */
obj_t BgL_loc3489z00_5617;BgL_typez00_bglt BgL_type3490z00_5618;BgL_varz00_bglt BgL_var3491z00_5619;BgL_nodez00_bglt BgL_value3492z00_5620;
BgL_loc3489z00_5617 = BgL_loc3489z00_10; 
BgL_type3490z00_5618 = BgL_type3490z00_11; 
BgL_var3491z00_5619 = BgL_var3491z00_12; 
BgL_value3492z00_5620 = BgL_value3492z00_13; 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_9))->BgL_locz00) = ((obj_t)BgL_loc3489z00_5617), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_9))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3490z00_5618), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_9))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3491z00_5619), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_9))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3492z00_5620), BUNSPEC); 
return BgL_new3493z00_9;} } 
}



/* _fill-box-set!!6122 */
obj_t BGl__fillzd2boxzd2setz12z126122z00zzast_nodez00(obj_t BgL_envz00_4867, obj_t BgL_new3493z00_4868, obj_t BgL_loc3489z00_4869, obj_t BgL_type3490z00_4870, obj_t BgL_var3491z00_4871, obj_t BgL_value3492z00_4872)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_auxz00_6752;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_res8033z00_5630;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_new3493z00_5621;BgL_typez00_bglt BgL_type3490z00_5623;BgL_varz00_bglt BgL_var3491z00_5624;BgL_nodez00_bglt BgL_value3492z00_5625;
BgL_new3493z00_5621 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_new3493z00_4868); 
BgL_type3490z00_5623 = 
(BgL_typez00_bglt)(BgL_type3490z00_4870); 
BgL_var3491z00_5624 = 
(BgL_varz00_bglt)(BgL_var3491z00_4871); 
BgL_value3492z00_5625 = 
(BgL_nodez00_bglt)(BgL_value3492z00_4872); 
{ /* ./Ast/node.scm 231 */
obj_t BgL_loc3489z00_5626;BgL_typez00_bglt BgL_type3490z00_5627;BgL_varz00_bglt BgL_var3491z00_5628;BgL_nodez00_bglt BgL_value3492z00_5629;
BgL_loc3489z00_5626 = BgL_loc3489z00_4869; 
BgL_type3490z00_5627 = BgL_type3490z00_5623; 
BgL_var3491z00_5628 = BgL_var3491z00_5624; 
BgL_value3492z00_5629 = BgL_value3492z00_5625; 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_5621))->BgL_locz00) = ((obj_t)BgL_loc3489z00_5626), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_5621))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3490z00_5627), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_5621))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3491z00_5628), BUNSPEC); 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_new3493z00_5621))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3492z00_5629), BUNSPEC); 
BgL_res8033z00_5630 = BgL_new3493z00_5621; } } 
BgL_auxz00_6752 = BgL_res8033z00_5630; } 
return 
(obj_t)(BgL_auxz00_6752);} } 
}



/* allocate-box-set! */
BGL_EXPORTED_DEF BgL_boxzd2setz12zc0_bglt BGl_allocatezd2boxzd2setz12z12zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_new3499z00_5631;
BgL_new3499z00_5631 = 
((BgL_boxzd2setz12zc0_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_boxzd2setz12zc0_bgl) ))); 
{ /* ./Ast/node.scm 231 */
long BgL_arg3985z00_5632;
BgL_arg3985z00_5632 = 
BGl_classzd2numzd2zz__objectz00(BGl_boxzd2setz12zc0zzast_nodez00); 
{ /* ./Ast/node.scm 231 */
BgL_objectz00_bglt BgL_objz00_5633;
BgL_objz00_5633 = 
(BgL_objectz00_bglt)(BgL_new3499z00_5631); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5633, BgL_arg3985z00_5632); } } 
{ /* ./Ast/node.scm 231 */
BgL_objectz00_bglt BgL_auxz00_6766;
BgL_auxz00_6766 = 
(BgL_objectz00_bglt)(BgL_new3499z00_5631); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6766, BFALSE); } 
{ /* ./Ast/node.scm 231 */
obj_t BgL_objz00_5634;
BgL_objz00_5634 = 
(obj_t)(BgL_new3499z00_5631); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5634); BUNSPEC; } 
return BgL_new3499z00_5631;} } 
}



/* _allocate-box-set! */
obj_t BGl__allocatezd2boxzd2setz12z12zzast_nodez00(obj_t BgL_envz00_4859)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_auxz00_6771;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_res8034z00_5639;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_new3499z00_5635;
BgL_new3499z00_5635 = 
((BgL_boxzd2setz12zc0_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_boxzd2setz12zc0_bgl) ))); 
{ /* ./Ast/node.scm 231 */
long BgL_arg3985z00_5636;
BgL_arg3985z00_5636 = 
BGl_classzd2numzd2zz__objectz00(BGl_boxzd2setz12zc0zzast_nodez00); 
{ /* ./Ast/node.scm 231 */
BgL_objectz00_bglt BgL_objz00_5637;
BgL_objz00_5637 = 
(BgL_objectz00_bglt)(BgL_new3499z00_5635); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5637, BgL_arg3985z00_5636); } } 
{ /* ./Ast/node.scm 231 */
BgL_objectz00_bglt BgL_auxz00_6776;
BgL_auxz00_6776 = 
(BgL_objectz00_bglt)(BgL_new3499z00_5635); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6776, BFALSE); } 
{ /* ./Ast/node.scm 231 */
obj_t BgL_objz00_5638;
BgL_objz00_5638 = 
(obj_t)(BgL_new3499z00_5635); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5638); BUNSPEC; } 
BgL_res8034z00_5639 = BgL_new3499z00_5635; } 
BgL_auxz00_6771 = BgL_res8034z00_5639; } 
return 
(obj_t)(BgL_auxz00_6771);} } 
}



/* box-ref? */
BGL_EXPORTED_DEF bool_t BGl_boxzd2refzf3z21zzast_nodez00(obj_t BgL_obj3471z00_20)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3471z00_20, BGl_boxzd2refzd2zzast_nodez00);} 
}



/* _box-ref? */
obj_t BGl__boxzd2refzf3z21zzast_nodez00(obj_t BgL_envz00_4873, obj_t BgL_obj3471z00_4874)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ /* ./Ast/node.scm 227 */
bool_t BgL_auxz00_6783;
BgL_auxz00_6783 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3471z00_4874, BGl_boxzd2refzd2zzast_nodez00); 
return 
BBOOL(BgL_auxz00_6783);} } 
}



/* make-box-ref */
BGL_EXPORTED_DEF BgL_boxzd2refzd2_bglt BGl_makezd2boxzd2refz00zzast_nodez00(obj_t BgL_loc3429z00_24, BgL_typez00_bglt BgL_type3430z00_25, obj_t BgL_sidezd2effectzf33431z21_26, obj_t BgL_key3432z00_27, BgL_varz00_bglt BgL_var3433z00_28)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_new3434z00_2530;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_res6025z00_2536;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_new3448z00_2531;
BgL_new3448z00_2531 = 
((BgL_boxzd2refzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_boxzd2refzd2_bgl) ))); 
{ /* ./Ast/node.scm 227 */
long BgL_arg3994z00_2532;
BgL_arg3994z00_2532 = 
BGl_classzd2numzd2zz__objectz00(BGl_boxzd2refzd2zzast_nodez00); 
{ /* ./Ast/node.scm 227 */
BgL_objectz00_bglt BgL_objz00_2533;
BgL_objz00_2533 = 
(BgL_objectz00_bglt)(BgL_new3448z00_2531); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2533, BgL_arg3994z00_2532); } } 
{ /* ./Ast/node.scm 227 */
BgL_objectz00_bglt BgL_auxz00_6790;
BgL_auxz00_6790 = 
(BgL_objectz00_bglt)(BgL_new3448z00_2531); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6790, BFALSE); } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_objz00_2535;
BgL_objz00_2535 = 
(obj_t)(BgL_new3448z00_2531); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2535); BUNSPEC; } 
BgL_res6025z00_2536 = BgL_new3448z00_2531; } 
BgL_new3434z00_2530 = BgL_res6025z00_2536; } 
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_res6026z00_2548;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_new3441z00_2537;
BgL_new3441z00_2537 = BgL_new3434z00_2530; 
{ /* ./Ast/node.scm 227 */
obj_t BgL_loc3436z00_2543;BgL_typez00_bglt BgL_type3437z00_2544;obj_t BgL_sidezd2effectzf33438z21_2545;obj_t BgL_key3439z00_2546;BgL_varz00_bglt BgL_var3440z00_2547;
BgL_loc3436z00_2543 = BgL_loc3429z00_24; 
BgL_type3437z00_2544 = BgL_type3430z00_25; 
BgL_sidezd2effectzf33438z21_2545 = BgL_sidezd2effectzf33431z21_26; 
BgL_key3439z00_2546 = BgL_key3432z00_27; 
BgL_var3440z00_2547 = BgL_var3433z00_28; 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_2537))->BgL_locz00) = ((obj_t)BgL_loc3436z00_2543), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_2537))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3437z00_2544), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_2537))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33438z21_2545), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_2537))->BgL_keyz00) = ((obj_t)BgL_key3439z00_2546), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_2537))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3440z00_2547), BUNSPEC); 
BgL_res6026z00_2548 = BgL_new3441z00_2537; } } BgL_res6026z00_2548; } 
return BgL_new3434z00_2530;} } 
}



/* _make-box-ref6125 */
obj_t BGl__makezd2boxzd2ref6125z00zzast_nodez00(obj_t BgL_envz00_4875, obj_t BgL_loc3429z00_4876, obj_t BgL_type3430z00_4877, obj_t BgL_sidezd2effectzf33431z21_4878, obj_t BgL_key3432z00_4879, obj_t BgL_var3433z00_4880)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_auxz00_6800;
BgL_auxz00_6800 = 
BGl_makezd2boxzd2refz00zzast_nodez00(BgL_loc3429z00_4876, 
(BgL_typez00_bglt)(BgL_type3430z00_4877), BgL_sidezd2effectzf33431z21_4878, BgL_key3432z00_4879, 
(BgL_varz00_bglt)(BgL_var3433z00_4880)); 
return 
(obj_t)(BgL_auxz00_6800);} } 
}



/* fill-box-ref! */
BGL_EXPORTED_DEF BgL_boxzd2refzd2_bglt BGl_fillzd2boxzd2refz12z12zzast_nodez00(BgL_boxzd2refzd2_bglt BgL_new3441z00_29, obj_t BgL_loc3436z00_30, BgL_typez00_bglt BgL_type3437z00_31, obj_t BgL_sidezd2effectzf33438z21_32, obj_t BgL_key3439z00_33, BgL_varz00_bglt BgL_var3440z00_34)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ /* ./Ast/node.scm 227 */
obj_t BgL_loc3436z00_5641;BgL_typez00_bglt BgL_type3437z00_5642;obj_t BgL_sidezd2effectzf33438z21_5643;obj_t BgL_key3439z00_5644;BgL_varz00_bglt BgL_var3440z00_5645;
BgL_loc3436z00_5641 = BgL_loc3436z00_30; 
BgL_type3437z00_5642 = BgL_type3437z00_31; 
BgL_sidezd2effectzf33438z21_5643 = BgL_sidezd2effectzf33438z21_32; 
BgL_key3439z00_5644 = BgL_key3439z00_33; 
BgL_var3440z00_5645 = BgL_var3440z00_34; 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_29))->BgL_locz00) = ((obj_t)BgL_loc3436z00_5641), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_29))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3437z00_5642), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_29))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33438z21_5643), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_29))->BgL_keyz00) = ((obj_t)BgL_key3439z00_5644), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_29))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3440z00_5645), BUNSPEC); 
return BgL_new3441z00_29;} } 
}



/* _fill-box-ref!6127 */
obj_t BGl__fillzd2boxzd2refz126127z12zzast_nodez00(obj_t BgL_envz00_4881, obj_t BgL_new3441z00_4882, obj_t BgL_loc3436z00_4883, obj_t BgL_type3437z00_4884, obj_t BgL_sidezd2effectzf33438z21_4885, obj_t BgL_key3439z00_4886, obj_t BgL_var3440z00_4887)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_auxz00_6810;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_res8035z00_5657;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_new3441z00_5646;BgL_typez00_bglt BgL_type3437z00_5648;BgL_varz00_bglt BgL_var3440z00_5651;
BgL_new3441z00_5646 = 
(BgL_boxzd2refzd2_bglt)(BgL_new3441z00_4882); 
BgL_type3437z00_5648 = 
(BgL_typez00_bglt)(BgL_type3437z00_4884); 
BgL_var3440z00_5651 = 
(BgL_varz00_bglt)(BgL_var3440z00_4887); 
{ /* ./Ast/node.scm 227 */
obj_t BgL_loc3436z00_5652;BgL_typez00_bglt BgL_type3437z00_5653;obj_t BgL_sidezd2effectzf33438z21_5654;obj_t BgL_key3439z00_5655;BgL_varz00_bglt BgL_var3440z00_5656;
BgL_loc3436z00_5652 = BgL_loc3436z00_4883; 
BgL_type3437z00_5653 = BgL_type3437z00_5648; 
BgL_sidezd2effectzf33438z21_5654 = BgL_sidezd2effectzf33438z21_4885; 
BgL_key3439z00_5655 = BgL_key3439z00_4886; 
BgL_var3440z00_5656 = BgL_var3440z00_5651; 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_5646))->BgL_locz00) = ((obj_t)BgL_loc3436z00_5652), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_5646))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3437z00_5653), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_5646))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33438z21_5654), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_5646))->BgL_keyz00) = ((obj_t)BgL_key3439z00_5655), BUNSPEC); 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_new3441z00_5646))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3440z00_5656), BUNSPEC); 
BgL_res8035z00_5657 = BgL_new3441z00_5646; } } 
BgL_auxz00_6810 = BgL_res8035z00_5657; } 
return 
(obj_t)(BgL_auxz00_6810);} } 
}



/* allocate-box-ref */
BGL_EXPORTED_DEF BgL_boxzd2refzd2_bglt BGl_allocatezd2boxzd2refz00zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_new3448z00_5658;
BgL_new3448z00_5658 = 
((BgL_boxzd2refzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_boxzd2refzd2_bgl) ))); 
{ /* ./Ast/node.scm 227 */
long BgL_arg3994z00_5659;
BgL_arg3994z00_5659 = 
BGl_classzd2numzd2zz__objectz00(BGl_boxzd2refzd2zzast_nodez00); 
{ /* ./Ast/node.scm 227 */
BgL_objectz00_bglt BgL_objz00_5660;
BgL_objz00_5660 = 
(BgL_objectz00_bglt)(BgL_new3448z00_5658); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5660, BgL_arg3994z00_5659); } } 
{ /* ./Ast/node.scm 227 */
BgL_objectz00_bglt BgL_auxz00_6824;
BgL_auxz00_6824 = 
(BgL_objectz00_bglt)(BgL_new3448z00_5658); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6824, BFALSE); } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_objz00_5661;
BgL_objz00_5661 = 
(obj_t)(BgL_new3448z00_5658); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5661); BUNSPEC; } 
return BgL_new3448z00_5658;} } 
}



/* _allocate-box-ref */
obj_t BGl__allocatezd2boxzd2refz00zzast_nodez00(obj_t BgL_envz00_4858)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_auxz00_6829;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_res8036z00_5666;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_new3448z00_5662;
BgL_new3448z00_5662 = 
((BgL_boxzd2refzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_boxzd2refzd2_bgl) ))); 
{ /* ./Ast/node.scm 227 */
long BgL_arg3994z00_5663;
BgL_arg3994z00_5663 = 
BGl_classzd2numzd2zz__objectz00(BGl_boxzd2refzd2zzast_nodez00); 
{ /* ./Ast/node.scm 227 */
BgL_objectz00_bglt BgL_objz00_5664;
BgL_objz00_5664 = 
(BgL_objectz00_bglt)(BgL_new3448z00_5662); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5664, BgL_arg3994z00_5663); } } 
{ /* ./Ast/node.scm 227 */
BgL_objectz00_bglt BgL_auxz00_6834;
BgL_auxz00_6834 = 
(BgL_objectz00_bglt)(BgL_new3448z00_5662); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6834, BFALSE); } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_objz00_5665;
BgL_objz00_5665 = 
(obj_t)(BgL_new3448z00_5662); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5665); BUNSPEC; } 
BgL_res8036z00_5666 = BgL_new3448z00_5662; } 
BgL_auxz00_6829 = BgL_res8036z00_5666; } 
return 
(obj_t)(BgL_auxz00_6829);} } 
}



/* make-box? */
BGL_EXPORTED_DEF bool_t BGl_makezd2boxzf3z21zzast_nodez00(obj_t BgL_obj3415z00_38)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3415z00_38, BGl_makezd2boxzd2zzast_nodez00);} 
}



/* _make-box? */
obj_t BGl__makezd2boxzf3z21zzast_nodez00(obj_t BgL_envz00_4888, obj_t BgL_obj3415z00_4889)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ /* ./Ast/node.scm 223 */
bool_t BgL_auxz00_6841;
BgL_auxz00_6841 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3415z00_4889, BGl_makezd2boxzd2zzast_nodez00); 
return 
BBOOL(BgL_auxz00_6841);} } 
}



/* make-make-box */
BGL_EXPORTED_DEF BgL_makezd2boxzd2_bglt BGl_makezd2makezd2boxz00zzast_nodez00(obj_t BgL_loc3373z00_42, BgL_typez00_bglt BgL_type3374z00_43, obj_t BgL_sidezd2effectzf33375z21_44, obj_t BgL_key3376z00_45, BgL_nodez00_bglt BgL_value3377z00_46)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_new3378z00_2559;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_res6027z00_2565;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_new3392z00_2560;
BgL_new3392z00_2560 = 
((BgL_makezd2boxzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_makezd2boxzd2_bgl) ))); 
{ /* ./Ast/node.scm 223 */
long BgL_arg4003z00_2561;
BgL_arg4003z00_2561 = 
BGl_classzd2numzd2zz__objectz00(BGl_makezd2boxzd2zzast_nodez00); 
{ /* ./Ast/node.scm 223 */
BgL_objectz00_bglt BgL_objz00_2562;
BgL_objz00_2562 = 
(BgL_objectz00_bglt)(BgL_new3392z00_2560); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2562, BgL_arg4003z00_2561); } } 
{ /* ./Ast/node.scm 223 */
BgL_objectz00_bglt BgL_auxz00_6848;
BgL_auxz00_6848 = 
(BgL_objectz00_bglt)(BgL_new3392z00_2560); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6848, BFALSE); } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_objz00_2564;
BgL_objz00_2564 = 
(obj_t)(BgL_new3392z00_2560); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2564); BUNSPEC; } 
BgL_res6027z00_2565 = BgL_new3392z00_2560; } 
BgL_new3378z00_2559 = BgL_res6027z00_2565; } 
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_res6028z00_2577;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_new3385z00_2566;
BgL_new3385z00_2566 = BgL_new3378z00_2559; 
{ /* ./Ast/node.scm 223 */
obj_t BgL_loc3380z00_2572;BgL_typez00_bglt BgL_type3381z00_2573;obj_t BgL_sidezd2effectzf33382z21_2574;obj_t BgL_key3383z00_2575;BgL_nodez00_bglt BgL_value3384z00_2576;
BgL_loc3380z00_2572 = BgL_loc3373z00_42; 
BgL_type3381z00_2573 = BgL_type3374z00_43; 
BgL_sidezd2effectzf33382z21_2574 = BgL_sidezd2effectzf33375z21_44; 
BgL_key3383z00_2575 = BgL_key3376z00_45; 
BgL_value3384z00_2576 = BgL_value3377z00_46; 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_2566))->BgL_locz00) = ((obj_t)BgL_loc3380z00_2572), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_2566))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3381z00_2573), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_2566))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33382z21_2574), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_2566))->BgL_keyz00) = ((obj_t)BgL_key3383z00_2575), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_2566))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3384z00_2576), BUNSPEC); 
BgL_res6028z00_2577 = BgL_new3385z00_2566; } } BgL_res6028z00_2577; } 
return BgL_new3378z00_2559;} } 
}



/* _make-make-box6130 */
obj_t BGl__makezd2makezd2box6130z00zzast_nodez00(obj_t BgL_envz00_4890, obj_t BgL_loc3373z00_4891, obj_t BgL_type3374z00_4892, obj_t BgL_sidezd2effectzf33375z21_4893, obj_t BgL_key3376z00_4894, obj_t BgL_value3377z00_4895)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_auxz00_6858;
BgL_auxz00_6858 = 
BGl_makezd2makezd2boxz00zzast_nodez00(BgL_loc3373z00_4891, 
(BgL_typez00_bglt)(BgL_type3374z00_4892), BgL_sidezd2effectzf33375z21_4893, BgL_key3376z00_4894, 
(BgL_nodez00_bglt)(BgL_value3377z00_4895)); 
return 
(obj_t)(BgL_auxz00_6858);} } 
}



/* fill-make-box! */
BGL_EXPORTED_DEF BgL_makezd2boxzd2_bglt BGl_fillzd2makezd2boxz12z12zzast_nodez00(BgL_makezd2boxzd2_bglt BgL_new3385z00_47, obj_t BgL_loc3380z00_48, BgL_typez00_bglt BgL_type3381z00_49, obj_t BgL_sidezd2effectzf33382z21_50, obj_t BgL_key3383z00_51, BgL_nodez00_bglt BgL_value3384z00_52)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ /* ./Ast/node.scm 223 */
obj_t BgL_loc3380z00_5668;BgL_typez00_bglt BgL_type3381z00_5669;obj_t BgL_sidezd2effectzf33382z21_5670;obj_t BgL_key3383z00_5671;BgL_nodez00_bglt BgL_value3384z00_5672;
BgL_loc3380z00_5668 = BgL_loc3380z00_48; 
BgL_type3381z00_5669 = BgL_type3381z00_49; 
BgL_sidezd2effectzf33382z21_5670 = BgL_sidezd2effectzf33382z21_50; 
BgL_key3383z00_5671 = BgL_key3383z00_51; 
BgL_value3384z00_5672 = BgL_value3384z00_52; 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_47))->BgL_locz00) = ((obj_t)BgL_loc3380z00_5668), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_47))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3381z00_5669), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_47))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33382z21_5670), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_47))->BgL_keyz00) = ((obj_t)BgL_key3383z00_5671), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_47))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3384z00_5672), BUNSPEC); 
return BgL_new3385z00_47;} } 
}



/* _fill-make-box!6132 */
obj_t BGl__fillzd2makezd2boxz126132z12zzast_nodez00(obj_t BgL_envz00_4896, obj_t BgL_new3385z00_4897, obj_t BgL_loc3380z00_4898, obj_t BgL_type3381z00_4899, obj_t BgL_sidezd2effectzf33382z21_4900, obj_t BgL_key3383z00_4901, obj_t BgL_value3384z00_4902)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_auxz00_6868;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_res8037z00_5684;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_new3385z00_5673;BgL_typez00_bglt BgL_type3381z00_5675;BgL_nodez00_bglt BgL_value3384z00_5678;
BgL_new3385z00_5673 = 
(BgL_makezd2boxzd2_bglt)(BgL_new3385z00_4897); 
BgL_type3381z00_5675 = 
(BgL_typez00_bglt)(BgL_type3381z00_4899); 
BgL_value3384z00_5678 = 
(BgL_nodez00_bglt)(BgL_value3384z00_4902); 
{ /* ./Ast/node.scm 223 */
obj_t BgL_loc3380z00_5679;BgL_typez00_bglt BgL_type3381z00_5680;obj_t BgL_sidezd2effectzf33382z21_5681;obj_t BgL_key3383z00_5682;BgL_nodez00_bglt BgL_value3384z00_5683;
BgL_loc3380z00_5679 = BgL_loc3380z00_4898; 
BgL_type3381z00_5680 = BgL_type3381z00_5675; 
BgL_sidezd2effectzf33382z21_5681 = BgL_sidezd2effectzf33382z21_4900; 
BgL_key3383z00_5682 = BgL_key3383z00_4901; 
BgL_value3384z00_5683 = BgL_value3384z00_5678; 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_5673))->BgL_locz00) = ((obj_t)BgL_loc3380z00_5679), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_5673))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3381z00_5680), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_5673))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33382z21_5681), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_5673))->BgL_keyz00) = ((obj_t)BgL_key3383z00_5682), BUNSPEC); 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_new3385z00_5673))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3384z00_5683), BUNSPEC); 
BgL_res8037z00_5684 = BgL_new3385z00_5673; } } 
BgL_auxz00_6868 = BgL_res8037z00_5684; } 
return 
(obj_t)(BgL_auxz00_6868);} } 
}



/* allocate-make-box */
BGL_EXPORTED_DEF BgL_makezd2boxzd2_bglt BGl_allocatezd2makezd2boxz00zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_new3392z00_5685;
BgL_new3392z00_5685 = 
((BgL_makezd2boxzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_makezd2boxzd2_bgl) ))); 
{ /* ./Ast/node.scm 223 */
long BgL_arg4003z00_5686;
BgL_arg4003z00_5686 = 
BGl_classzd2numzd2zz__objectz00(BGl_makezd2boxzd2zzast_nodez00); 
{ /* ./Ast/node.scm 223 */
BgL_objectz00_bglt BgL_objz00_5687;
BgL_objz00_5687 = 
(BgL_objectz00_bglt)(BgL_new3392z00_5685); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5687, BgL_arg4003z00_5686); } } 
{ /* ./Ast/node.scm 223 */
BgL_objectz00_bglt BgL_auxz00_6882;
BgL_auxz00_6882 = 
(BgL_objectz00_bglt)(BgL_new3392z00_5685); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6882, BFALSE); } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_objz00_5688;
BgL_objz00_5688 = 
(obj_t)(BgL_new3392z00_5685); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5688); BUNSPEC; } 
return BgL_new3392z00_5685;} } 
}



/* _allocate-make-box */
obj_t BGl__allocatezd2makezd2boxz00zzast_nodez00(obj_t BgL_envz00_4857)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_auxz00_6887;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_res8038z00_5693;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_new3392z00_5689;
BgL_new3392z00_5689 = 
((BgL_makezd2boxzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_makezd2boxzd2_bgl) ))); 
{ /* ./Ast/node.scm 223 */
long BgL_arg4003z00_5690;
BgL_arg4003z00_5690 = 
BGl_classzd2numzd2zz__objectz00(BGl_makezd2boxzd2zzast_nodez00); 
{ /* ./Ast/node.scm 223 */
BgL_objectz00_bglt BgL_objz00_5691;
BgL_objz00_5691 = 
(BgL_objectz00_bglt)(BgL_new3392z00_5689); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5691, BgL_arg4003z00_5690); } } 
{ /* ./Ast/node.scm 223 */
BgL_objectz00_bglt BgL_auxz00_6892;
BgL_auxz00_6892 = 
(BgL_objectz00_bglt)(BgL_new3392z00_5689); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6892, BFALSE); } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_objz00_5692;
BgL_objz00_5692 = 
(obj_t)(BgL_new3392z00_5689); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5692); BUNSPEC; } 
BgL_res8038z00_5693 = BgL_new3392z00_5689; } 
BgL_auxz00_6887 = BgL_res8038z00_5693; } 
return 
(obj_t)(BgL_auxz00_6887);} } 
}



/* jump-ex-it? */
BGL_EXPORTED_DEF bool_t BGl_jumpzd2exzd2itzf3zf3zzast_nodez00(obj_t BgL_obj3359z00_56)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3359z00_56, BGl_jumpzd2exzd2itz00zzast_nodez00);} 
}



/* _jump-ex-it? */
obj_t BGl__jumpzd2exzd2itzf3zf3zzast_nodez00(obj_t BgL_envz00_4903, obj_t BgL_obj3359z00_4904)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ /* ./Ast/node.scm 216 */
bool_t BgL_auxz00_6899;
BgL_auxz00_6899 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3359z00_4904, BGl_jumpzd2exzd2itz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_6899);} } 
}



/* make-jump-ex-it */
BGL_EXPORTED_DEF BgL_jumpzd2exzd2itz00_bglt BGl_makezd2jumpzd2exzd2itzd2zzast_nodez00(obj_t BgL_loc3324z00_60, BgL_typez00_bglt BgL_type3325z00_61, BgL_nodez00_bglt BgL_exit3326z00_62, BgL_nodez00_bglt BgL_value3327z00_63)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_new3328z00_2588;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_res6029z00_2594;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_new3340z00_2589;
BgL_new3340z00_2589 = 
((BgL_jumpzd2exzd2itz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_jumpzd2exzd2itz00_bgl) ))); 
{ /* ./Ast/node.scm 216 */
long BgL_arg4012z00_2590;
BgL_arg4012z00_2590 = 
BGl_classzd2numzd2zz__objectz00(BGl_jumpzd2exzd2itz00zzast_nodez00); 
{ /* ./Ast/node.scm 216 */
BgL_objectz00_bglt BgL_objz00_2591;
BgL_objz00_2591 = 
(BgL_objectz00_bglt)(BgL_new3340z00_2589); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2591, BgL_arg4012z00_2590); } } 
{ /* ./Ast/node.scm 216 */
BgL_objectz00_bglt BgL_auxz00_6906;
BgL_auxz00_6906 = 
(BgL_objectz00_bglt)(BgL_new3340z00_2589); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6906, BFALSE); } 
{ /* ./Ast/node.scm 216 */
obj_t BgL_objz00_2593;
BgL_objz00_2593 = 
(obj_t)(BgL_new3340z00_2589); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2593); BUNSPEC; } 
BgL_res6029z00_2594 = BgL_new3340z00_2589; } 
BgL_new3328z00_2588 = BgL_res6029z00_2594; } 
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_res6030z00_2604;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_new3334z00_2595;
BgL_new3334z00_2595 = BgL_new3328z00_2588; 
{ /* ./Ast/node.scm 216 */
obj_t BgL_loc3330z00_2600;BgL_typez00_bglt BgL_type3331z00_2601;BgL_nodez00_bglt BgL_exit3332z00_2602;BgL_nodez00_bglt BgL_value3333z00_2603;
BgL_loc3330z00_2600 = BgL_loc3324z00_60; 
BgL_type3331z00_2601 = BgL_type3325z00_61; 
BgL_exit3332z00_2602 = BgL_exit3326z00_62; 
BgL_value3333z00_2603 = BgL_value3327z00_63; 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_2595))->BgL_locz00) = ((obj_t)BgL_loc3330z00_2600), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_2595))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3331z00_2601), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_2595))->BgL_exitz00) = ((BgL_nodez00_bglt)BgL_exit3332z00_2602), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_2595))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3333z00_2603), BUNSPEC); 
BgL_res6030z00_2604 = BgL_new3334z00_2595; } } BgL_res6030z00_2604; } 
return BgL_new3328z00_2588;} } 
}



/* _make-jump-ex-it6135 */
obj_t BGl__makezd2jumpzd2exzd2it6135zd2zzast_nodez00(obj_t BgL_envz00_4905, obj_t BgL_loc3324z00_4906, obj_t BgL_type3325z00_4907, obj_t BgL_exit3326z00_4908, obj_t BgL_value3327z00_4909)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_auxz00_6915;
BgL_auxz00_6915 = 
BGl_makezd2jumpzd2exzd2itzd2zzast_nodez00(BgL_loc3324z00_4906, 
(BgL_typez00_bglt)(BgL_type3325z00_4907), 
(BgL_nodez00_bglt)(BgL_exit3326z00_4908), 
(BgL_nodez00_bglt)(BgL_value3327z00_4909)); 
return 
(obj_t)(BgL_auxz00_6915);} } 
}



/* fill-jump-ex-it! */
BGL_EXPORTED_DEF BgL_jumpzd2exzd2itz00_bglt BGl_fillzd2jumpzd2exzd2itz12zc0zzast_nodez00(BgL_jumpzd2exzd2itz00_bglt BgL_new3334z00_64, obj_t BgL_loc3330z00_65, BgL_typez00_bglt BgL_type3331z00_66, BgL_nodez00_bglt BgL_exit3332z00_67, BgL_nodez00_bglt BgL_value3333z00_68)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ /* ./Ast/node.scm 216 */
obj_t BgL_loc3330z00_5695;BgL_typez00_bglt BgL_type3331z00_5696;BgL_nodez00_bglt BgL_exit3332z00_5697;BgL_nodez00_bglt BgL_value3333z00_5698;
BgL_loc3330z00_5695 = BgL_loc3330z00_65; 
BgL_type3331z00_5696 = BgL_type3331z00_66; 
BgL_exit3332z00_5697 = BgL_exit3332z00_67; 
BgL_value3333z00_5698 = BgL_value3333z00_68; 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_64))->BgL_locz00) = ((obj_t)BgL_loc3330z00_5695), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_64))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3331z00_5696), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_64))->BgL_exitz00) = ((BgL_nodez00_bglt)BgL_exit3332z00_5697), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_64))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3333z00_5698), BUNSPEC); 
return BgL_new3334z00_64;} } 
}



/* _fill-jump-ex-it!6137 */
obj_t BGl__fillzd2jumpzd2exzd2itz126137zc0zzast_nodez00(obj_t BgL_envz00_4910, obj_t BgL_new3334z00_4911, obj_t BgL_loc3330z00_4912, obj_t BgL_type3331z00_4913, obj_t BgL_exit3332z00_4914, obj_t BgL_value3333z00_4915)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_auxz00_6925;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_res8039z00_5708;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_new3334z00_5699;BgL_typez00_bglt BgL_type3331z00_5701;BgL_nodez00_bglt BgL_exit3332z00_5702;BgL_nodez00_bglt BgL_value3333z00_5703;
BgL_new3334z00_5699 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_new3334z00_4911); 
BgL_type3331z00_5701 = 
(BgL_typez00_bglt)(BgL_type3331z00_4913); 
BgL_exit3332z00_5702 = 
(BgL_nodez00_bglt)(BgL_exit3332z00_4914); 
BgL_value3333z00_5703 = 
(BgL_nodez00_bglt)(BgL_value3333z00_4915); 
{ /* ./Ast/node.scm 216 */
obj_t BgL_loc3330z00_5704;BgL_typez00_bglt BgL_type3331z00_5705;BgL_nodez00_bglt BgL_exit3332z00_5706;BgL_nodez00_bglt BgL_value3333z00_5707;
BgL_loc3330z00_5704 = BgL_loc3330z00_4912; 
BgL_type3331z00_5705 = BgL_type3331z00_5701; 
BgL_exit3332z00_5706 = BgL_exit3332z00_5702; 
BgL_value3333z00_5707 = BgL_value3333z00_5703; 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_5699))->BgL_locz00) = ((obj_t)BgL_loc3330z00_5704), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_5699))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3331z00_5705), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_5699))->BgL_exitz00) = ((BgL_nodez00_bglt)BgL_exit3332z00_5706), BUNSPEC); 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_new3334z00_5699))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value3333z00_5707), BUNSPEC); 
BgL_res8039z00_5708 = BgL_new3334z00_5699; } } 
BgL_auxz00_6925 = BgL_res8039z00_5708; } 
return 
(obj_t)(BgL_auxz00_6925);} } 
}



/* allocate-jump-ex-it */
BGL_EXPORTED_DEF BgL_jumpzd2exzd2itz00_bglt BGl_allocatezd2jumpzd2exzd2itzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_new3340z00_5709;
BgL_new3340z00_5709 = 
((BgL_jumpzd2exzd2itz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_jumpzd2exzd2itz00_bgl) ))); 
{ /* ./Ast/node.scm 216 */
long BgL_arg4012z00_5710;
BgL_arg4012z00_5710 = 
BGl_classzd2numzd2zz__objectz00(BGl_jumpzd2exzd2itz00zzast_nodez00); 
{ /* ./Ast/node.scm 216 */
BgL_objectz00_bglt BgL_objz00_5711;
BgL_objz00_5711 = 
(BgL_objectz00_bglt)(BgL_new3340z00_5709); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5711, BgL_arg4012z00_5710); } } 
{ /* ./Ast/node.scm 216 */
BgL_objectz00_bglt BgL_auxz00_6939;
BgL_auxz00_6939 = 
(BgL_objectz00_bglt)(BgL_new3340z00_5709); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6939, BFALSE); } 
{ /* ./Ast/node.scm 216 */
obj_t BgL_objz00_5712;
BgL_objz00_5712 = 
(obj_t)(BgL_new3340z00_5709); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5712); BUNSPEC; } 
return BgL_new3340z00_5709;} } 
}



/* _allocate-jump-ex-it */
obj_t BGl__allocatezd2jumpzd2exzd2itzd2zzast_nodez00(obj_t BgL_envz00_4856)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_auxz00_6944;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_res8040z00_5717;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_new3340z00_5713;
BgL_new3340z00_5713 = 
((BgL_jumpzd2exzd2itz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_jumpzd2exzd2itz00_bgl) ))); 
{ /* ./Ast/node.scm 216 */
long BgL_arg4012z00_5714;
BgL_arg4012z00_5714 = 
BGl_classzd2numzd2zz__objectz00(BGl_jumpzd2exzd2itz00zzast_nodez00); 
{ /* ./Ast/node.scm 216 */
BgL_objectz00_bglt BgL_objz00_5715;
BgL_objz00_5715 = 
(BgL_objectz00_bglt)(BgL_new3340z00_5713); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5715, BgL_arg4012z00_5714); } } 
{ /* ./Ast/node.scm 216 */
BgL_objectz00_bglt BgL_auxz00_6949;
BgL_auxz00_6949 = 
(BgL_objectz00_bglt)(BgL_new3340z00_5713); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6949, BFALSE); } 
{ /* ./Ast/node.scm 216 */
obj_t BgL_objz00_5716;
BgL_objz00_5716 = 
(obj_t)(BgL_new3340z00_5713); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5716); BUNSPEC; } 
BgL_res8040z00_5717 = BgL_new3340z00_5713; } 
BgL_auxz00_6944 = BgL_res8040z00_5717; } 
return 
(obj_t)(BgL_auxz00_6944);} } 
}



/* set-ex-it? */
BGL_EXPORTED_DEF bool_t BGl_setzd2exzd2itzf3zf3zzast_nodez00(obj_t BgL_obj3312z00_75)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3312z00_75, BGl_setzd2exzd2itz00zzast_nodez00);} 
}



/* _set-ex-it? */
obj_t BGl__setzd2exzd2itzf3zf3zzast_nodez00(obj_t BgL_envz00_4916, obj_t BgL_obj3312z00_4917)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ /* ./Ast/node.scm 209 */
bool_t BgL_auxz00_6956;
BgL_auxz00_6956 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3312z00_4917, BGl_setzd2exzd2itz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_6956);} } 
}



/* make-set-ex-it */
BGL_EXPORTED_DEF BgL_setzd2exzd2itz00_bglt BGl_makezd2setzd2exzd2itzd2zzast_nodez00(obj_t BgL_loc3277z00_79, BgL_typez00_bglt BgL_type3278z00_80, BgL_varz00_bglt BgL_var3279z00_81, BgL_nodez00_bglt BgL_body3280z00_82)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_new3281z00_2614;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_res6031z00_2620;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_new3293z00_2615;
BgL_new3293z00_2615 = 
((BgL_setzd2exzd2itz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setzd2exzd2itz00_bgl) ))); 
{ /* ./Ast/node.scm 209 */
long BgL_arg4021z00_2616;
BgL_arg4021z00_2616 = 
BGl_classzd2numzd2zz__objectz00(BGl_setzd2exzd2itz00zzast_nodez00); 
{ /* ./Ast/node.scm 209 */
BgL_objectz00_bglt BgL_objz00_2617;
BgL_objz00_2617 = 
(BgL_objectz00_bglt)(BgL_new3293z00_2615); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2617, BgL_arg4021z00_2616); } } 
{ /* ./Ast/node.scm 209 */
BgL_objectz00_bglt BgL_auxz00_6963;
BgL_auxz00_6963 = 
(BgL_objectz00_bglt)(BgL_new3293z00_2615); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6963, BFALSE); } 
{ /* ./Ast/node.scm 209 */
obj_t BgL_objz00_2619;
BgL_objz00_2619 = 
(obj_t)(BgL_new3293z00_2615); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2619); BUNSPEC; } 
BgL_res6031z00_2620 = BgL_new3293z00_2615; } 
BgL_new3281z00_2614 = BgL_res6031z00_2620; } 
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_res6032z00_2630;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_new3287z00_2621;
BgL_new3287z00_2621 = BgL_new3281z00_2614; 
{ /* ./Ast/node.scm 209 */
obj_t BgL_loc3283z00_2626;BgL_typez00_bglt BgL_type3284z00_2627;BgL_varz00_bglt BgL_var3285z00_2628;BgL_nodez00_bglt BgL_body3286z00_2629;
BgL_loc3283z00_2626 = BgL_loc3277z00_79; 
BgL_type3284z00_2627 = BgL_type3278z00_80; 
BgL_var3285z00_2628 = BgL_var3279z00_81; 
BgL_body3286z00_2629 = BgL_body3280z00_82; 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_2621))->BgL_locz00) = ((obj_t)BgL_loc3283z00_2626), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_2621))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3284z00_2627), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_2621))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3285z00_2628), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_2621))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3286z00_2629), BUNSPEC); 
BgL_res6032z00_2630 = BgL_new3287z00_2621; } } BgL_res6032z00_2630; } 
return BgL_new3281z00_2614;} } 
}



/* _make-set-ex-it6140 */
obj_t BGl__makezd2setzd2exzd2it6140zd2zzast_nodez00(obj_t BgL_envz00_4918, obj_t BgL_loc3277z00_4919, obj_t BgL_type3278z00_4920, obj_t BgL_var3279z00_4921, obj_t BgL_body3280z00_4922)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_auxz00_6972;
BgL_auxz00_6972 = 
BGl_makezd2setzd2exzd2itzd2zzast_nodez00(BgL_loc3277z00_4919, 
(BgL_typez00_bglt)(BgL_type3278z00_4920), 
(BgL_varz00_bglt)(BgL_var3279z00_4921), 
(BgL_nodez00_bglt)(BgL_body3280z00_4922)); 
return 
(obj_t)(BgL_auxz00_6972);} } 
}



/* fill-set-ex-it! */
BGL_EXPORTED_DEF BgL_setzd2exzd2itz00_bglt BGl_fillzd2setzd2exzd2itz12zc0zzast_nodez00(BgL_setzd2exzd2itz00_bglt BgL_new3287z00_83, obj_t BgL_loc3283z00_84, BgL_typez00_bglt BgL_type3284z00_85, BgL_varz00_bglt BgL_var3285z00_86, BgL_nodez00_bglt BgL_body3286z00_87)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ /* ./Ast/node.scm 209 */
obj_t BgL_loc3283z00_5719;BgL_typez00_bglt BgL_type3284z00_5720;BgL_varz00_bglt BgL_var3285z00_5721;BgL_nodez00_bglt BgL_body3286z00_5722;
BgL_loc3283z00_5719 = BgL_loc3283z00_84; 
BgL_type3284z00_5720 = BgL_type3284z00_85; 
BgL_var3285z00_5721 = BgL_var3285z00_86; 
BgL_body3286z00_5722 = BgL_body3286z00_87; 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_83))->BgL_locz00) = ((obj_t)BgL_loc3283z00_5719), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_83))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3284z00_5720), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_83))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3285z00_5721), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_83))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3286z00_5722), BUNSPEC); 
return BgL_new3287z00_83;} } 
}



/* _fill-set-ex-it!6142 */
obj_t BGl__fillzd2setzd2exzd2itz126142zc0zzast_nodez00(obj_t BgL_envz00_4923, obj_t BgL_new3287z00_4924, obj_t BgL_loc3283z00_4925, obj_t BgL_type3284z00_4926, obj_t BgL_var3285z00_4927, obj_t BgL_body3286z00_4928)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_auxz00_6982;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_res8041z00_5732;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_new3287z00_5723;BgL_typez00_bglt BgL_type3284z00_5725;BgL_varz00_bglt BgL_var3285z00_5726;BgL_nodez00_bglt BgL_body3286z00_5727;
BgL_new3287z00_5723 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_new3287z00_4924); 
BgL_type3284z00_5725 = 
(BgL_typez00_bglt)(BgL_type3284z00_4926); 
BgL_var3285z00_5726 = 
(BgL_varz00_bglt)(BgL_var3285z00_4927); 
BgL_body3286z00_5727 = 
(BgL_nodez00_bglt)(BgL_body3286z00_4928); 
{ /* ./Ast/node.scm 209 */
obj_t BgL_loc3283z00_5728;BgL_typez00_bglt BgL_type3284z00_5729;BgL_varz00_bglt BgL_var3285z00_5730;BgL_nodez00_bglt BgL_body3286z00_5731;
BgL_loc3283z00_5728 = BgL_loc3283z00_4925; 
BgL_type3284z00_5729 = BgL_type3284z00_5725; 
BgL_var3285z00_5730 = BgL_var3285z00_5726; 
BgL_body3286z00_5731 = BgL_body3286z00_5727; 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_5723))->BgL_locz00) = ((obj_t)BgL_loc3283z00_5728), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_5723))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3284z00_5729), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_5723))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var3285z00_5730), BUNSPEC); 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_new3287z00_5723))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3286z00_5731), BUNSPEC); 
BgL_res8041z00_5732 = BgL_new3287z00_5723; } } 
BgL_auxz00_6982 = BgL_res8041z00_5732; } 
return 
(obj_t)(BgL_auxz00_6982);} } 
}



/* allocate-set-ex-it */
BGL_EXPORTED_DEF BgL_setzd2exzd2itz00_bglt BGl_allocatezd2setzd2exzd2itzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_new3293z00_5733;
BgL_new3293z00_5733 = 
((BgL_setzd2exzd2itz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setzd2exzd2itz00_bgl) ))); 
{ /* ./Ast/node.scm 209 */
long BgL_arg4021z00_5734;
BgL_arg4021z00_5734 = 
BGl_classzd2numzd2zz__objectz00(BGl_setzd2exzd2itz00zzast_nodez00); 
{ /* ./Ast/node.scm 209 */
BgL_objectz00_bglt BgL_objz00_5735;
BgL_objz00_5735 = 
(BgL_objectz00_bglt)(BgL_new3293z00_5733); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5735, BgL_arg4021z00_5734); } } 
{ /* ./Ast/node.scm 209 */
BgL_objectz00_bglt BgL_auxz00_6996;
BgL_auxz00_6996 = 
(BgL_objectz00_bglt)(BgL_new3293z00_5733); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_6996, BFALSE); } 
{ /* ./Ast/node.scm 209 */
obj_t BgL_objz00_5736;
BgL_objz00_5736 = 
(obj_t)(BgL_new3293z00_5733); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5736); BUNSPEC; } 
return BgL_new3293z00_5733;} } 
}



/* _allocate-set-ex-it */
obj_t BGl__allocatezd2setzd2exzd2itzd2zzast_nodez00(obj_t BgL_envz00_4855)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_auxz00_7001;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_res8042z00_5741;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_new3293z00_5737;
BgL_new3293z00_5737 = 
((BgL_setzd2exzd2itz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setzd2exzd2itz00_bgl) ))); 
{ /* ./Ast/node.scm 209 */
long BgL_arg4021z00_5738;
BgL_arg4021z00_5738 = 
BGl_classzd2numzd2zz__objectz00(BGl_setzd2exzd2itz00zzast_nodez00); 
{ /* ./Ast/node.scm 209 */
BgL_objectz00_bglt BgL_objz00_5739;
BgL_objz00_5739 = 
(BgL_objectz00_bglt)(BgL_new3293z00_5737); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5739, BgL_arg4021z00_5738); } } 
{ /* ./Ast/node.scm 209 */
BgL_objectz00_bglt BgL_auxz00_7006;
BgL_auxz00_7006 = 
(BgL_objectz00_bglt)(BgL_new3293z00_5737); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7006, BFALSE); } 
{ /* ./Ast/node.scm 209 */
obj_t BgL_objz00_5740;
BgL_objz00_5740 = 
(obj_t)(BgL_new3293z00_5737); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5740); BUNSPEC; } 
BgL_res8042z00_5741 = BgL_new3293z00_5737; } 
BgL_auxz00_7001 = BgL_res8042z00_5741; } 
return 
(obj_t)(BgL_auxz00_7001);} } 
}



/* let-var? */
BGL_EXPORTED_DEF bool_t BGl_letzd2varzf3z21zzast_nodez00(obj_t BgL_obj3266z00_94)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3266z00_94, BGl_letzd2varzd2zzast_nodez00);} 
}



/* _let-var? */
obj_t BGl__letzd2varzf3z21zzast_nodez00(obj_t BgL_envz00_4929, obj_t BgL_obj3266z00_4930)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ /* ./Ast/node.scm 200 */
bool_t BgL_auxz00_7013;
BgL_auxz00_7013 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3266z00_4930, BGl_letzd2varzd2zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7013);} } 
}



/* make-let-var */
BGL_EXPORTED_DEF BgL_letzd2varzd2_bglt BGl_makezd2letzd2varz00zzast_nodez00(obj_t BgL_loc3210z00_98, BgL_typez00_bglt BgL_type3211z00_99, obj_t BgL_sidezd2effectzf33212z21_100, obj_t BgL_key3213z00_101, obj_t BgL_bindings3214z00_102, BgL_nodez00_bglt BgL_body3215z00_103, bool_t BgL_removablezf33216zf3_104)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_new3217z00_2640;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_res6033z00_2646;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_new3235z00_2641;
BgL_new3235z00_2641 = 
((BgL_letzd2varzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_letzd2varzd2_bgl) ))); 
{ /* ./Ast/node.scm 200 */
long BgL_arg4030z00_2642;
BgL_arg4030z00_2642 = 
BGl_classzd2numzd2zz__objectz00(BGl_letzd2varzd2zzast_nodez00); 
{ /* ./Ast/node.scm 200 */
BgL_objectz00_bglt BgL_objz00_2643;
BgL_objz00_2643 = 
(BgL_objectz00_bglt)(BgL_new3235z00_2641); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2643, BgL_arg4030z00_2642); } } 
{ /* ./Ast/node.scm 200 */
BgL_objectz00_bglt BgL_auxz00_7020;
BgL_auxz00_7020 = 
(BgL_objectz00_bglt)(BgL_new3235z00_2641); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7020, BFALSE); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_objz00_2645;
BgL_objz00_2645 = 
(obj_t)(BgL_new3235z00_2641); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2645); BUNSPEC; } 
BgL_res6033z00_2646 = BgL_new3235z00_2641; } 
BgL_new3217z00_2640 = BgL_res6033z00_2646; } 
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_res6034z00_2662;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_new3226z00_2647;
BgL_new3226z00_2647 = BgL_new3217z00_2640; 
{ /* ./Ast/node.scm 200 */
obj_t BgL_loc3219z00_2655;BgL_typez00_bglt BgL_type3220z00_2656;obj_t BgL_sidezd2effectzf33221z21_2657;obj_t BgL_key3222z00_2658;obj_t BgL_bindings3223z00_2659;BgL_nodez00_bglt BgL_body3224z00_2660;bool_t BgL_removablezf33225zf3_2661;
BgL_loc3219z00_2655 = BgL_loc3210z00_98; 
BgL_type3220z00_2656 = BgL_type3211z00_99; 
BgL_sidezd2effectzf33221z21_2657 = BgL_sidezd2effectzf33212z21_100; 
BgL_key3222z00_2658 = BgL_key3213z00_101; 
BgL_bindings3223z00_2659 = BgL_bindings3214z00_102; 
BgL_body3224z00_2660 = BgL_body3215z00_103; 
BgL_removablezf33225zf3_2661 = BgL_removablezf33216zf3_104; 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_2647))->BgL_locz00) = ((obj_t)BgL_loc3219z00_2655), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_2647))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3220z00_2656), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_2647))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33221z21_2657), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_2647))->BgL_keyz00) = ((obj_t)BgL_key3222z00_2658), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_2647))->BgL_bindingsz00) = ((obj_t)BgL_bindings3223z00_2659), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_2647))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3224z00_2660), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_2647))->BgL_removablezf3zf3) = ((bool_t)BgL_removablezf33225zf3_2661), BUNSPEC); 
BgL_res6034z00_2662 = BgL_new3226z00_2647; } } BgL_res6034z00_2662; } 
return BgL_new3217z00_2640;} } 
}



/* _make-let-var6145 */
obj_t BGl__makezd2letzd2var6145z00zzast_nodez00(obj_t BgL_envz00_4931, obj_t BgL_loc3210z00_4932, obj_t BgL_type3211z00_4933, obj_t BgL_sidezd2effectzf33212z21_4934, obj_t BgL_key3213z00_4935, obj_t BgL_bindings3214z00_4936, obj_t BgL_body3215z00_4937, obj_t BgL_removablezf33216zf3_4938)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_auxz00_7032;
BgL_auxz00_7032 = 
BGl_makezd2letzd2varz00zzast_nodez00(BgL_loc3210z00_4932, 
(BgL_typez00_bglt)(BgL_type3211z00_4933), BgL_sidezd2effectzf33212z21_4934, BgL_key3213z00_4935, BgL_bindings3214z00_4936, 
(BgL_nodez00_bglt)(BgL_body3215z00_4937), 
CBOOL(BgL_removablezf33216zf3_4938)); 
return 
(obj_t)(BgL_auxz00_7032);} } 
}



/* fill-let-var! */
BGL_EXPORTED_DEF BgL_letzd2varzd2_bglt BGl_fillzd2letzd2varz12z12zzast_nodez00(BgL_letzd2varzd2_bglt BgL_new3226z00_105, obj_t BgL_loc3219z00_106, BgL_typez00_bglt BgL_type3220z00_107, obj_t BgL_sidezd2effectzf33221z21_108, obj_t BgL_key3222z00_109, obj_t BgL_bindings3223z00_110, BgL_nodez00_bglt BgL_body3224z00_111, bool_t BgL_removablezf33225zf3_112)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ /* ./Ast/node.scm 200 */
obj_t BgL_loc3219z00_5743;BgL_typez00_bglt BgL_type3220z00_5744;obj_t BgL_sidezd2effectzf33221z21_5745;obj_t BgL_key3222z00_5746;obj_t BgL_bindings3223z00_5747;BgL_nodez00_bglt BgL_body3224z00_5748;bool_t BgL_removablezf33225zf3_5749;
BgL_loc3219z00_5743 = BgL_loc3219z00_106; 
BgL_type3220z00_5744 = BgL_type3220z00_107; 
BgL_sidezd2effectzf33221z21_5745 = BgL_sidezd2effectzf33221z21_108; 
BgL_key3222z00_5746 = BgL_key3222z00_109; 
BgL_bindings3223z00_5747 = BgL_bindings3223z00_110; 
BgL_body3224z00_5748 = BgL_body3224z00_111; 
BgL_removablezf33225zf3_5749 = BgL_removablezf33225zf3_112; 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_105))->BgL_locz00) = ((obj_t)BgL_loc3219z00_5743), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_105))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3220z00_5744), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_105))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33221z21_5745), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_105))->BgL_keyz00) = ((obj_t)BgL_key3222z00_5746), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_105))->BgL_bindingsz00) = ((obj_t)BgL_bindings3223z00_5747), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_105))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3224z00_5748), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_105))->BgL_removablezf3zf3) = ((bool_t)BgL_removablezf33225zf3_5749), BUNSPEC); 
return BgL_new3226z00_105;} } 
}



/* _fill-let-var!6147 */
obj_t BGl__fillzd2letzd2varz126147z12zzast_nodez00(obj_t BgL_envz00_4939, obj_t BgL_new3226z00_4940, obj_t BgL_loc3219z00_4941, obj_t BgL_type3220z00_4942, obj_t BgL_sidezd2effectzf33221z21_4943, obj_t BgL_key3222z00_4944, obj_t BgL_bindings3223z00_4945, obj_t BgL_body3224z00_4946, obj_t BgL_removablezf33225zf3_4947)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_auxz00_7045;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_res8043z00_5765;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_new3226z00_5750;BgL_typez00_bglt BgL_type3220z00_5752;BgL_nodez00_bglt BgL_body3224z00_5756;bool_t BgL_removablezf33225zf3_5757;
BgL_new3226z00_5750 = 
(BgL_letzd2varzd2_bglt)(BgL_new3226z00_4940); 
BgL_type3220z00_5752 = 
(BgL_typez00_bglt)(BgL_type3220z00_4942); 
BgL_body3224z00_5756 = 
(BgL_nodez00_bglt)(BgL_body3224z00_4946); 
BgL_removablezf33225zf3_5757 = 
CBOOL(BgL_removablezf33225zf3_4947); 
{ /* ./Ast/node.scm 200 */
obj_t BgL_loc3219z00_5758;BgL_typez00_bglt BgL_type3220z00_5759;obj_t BgL_sidezd2effectzf33221z21_5760;obj_t BgL_key3222z00_5761;obj_t BgL_bindings3223z00_5762;BgL_nodez00_bglt BgL_body3224z00_5763;bool_t BgL_removablezf33225zf3_5764;
BgL_loc3219z00_5758 = BgL_loc3219z00_4941; 
BgL_type3220z00_5759 = BgL_type3220z00_5752; 
BgL_sidezd2effectzf33221z21_5760 = BgL_sidezd2effectzf33221z21_4943; 
BgL_key3222z00_5761 = BgL_key3222z00_4944; 
BgL_bindings3223z00_5762 = BgL_bindings3223z00_4945; 
BgL_body3224z00_5763 = BgL_body3224z00_5756; 
BgL_removablezf33225zf3_5764 = BgL_removablezf33225zf3_5757; 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_5750))->BgL_locz00) = ((obj_t)BgL_loc3219z00_5758), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_5750))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3220z00_5759), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_5750))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33221z21_5760), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_5750))->BgL_keyz00) = ((obj_t)BgL_key3222z00_5761), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_5750))->BgL_bindingsz00) = ((obj_t)BgL_bindings3223z00_5762), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_5750))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3224z00_5763), BUNSPEC); 
((((BgL_letzd2varzd2_bglt)CREF(BgL_new3226z00_5750))->BgL_removablezf3zf3) = ((bool_t)BgL_removablezf33225zf3_5764), BUNSPEC); 
BgL_res8043z00_5765 = BgL_new3226z00_5750; } } 
BgL_auxz00_7045 = BgL_res8043z00_5765; } 
return 
(obj_t)(BgL_auxz00_7045);} } 
}



/* allocate-let-var */
BGL_EXPORTED_DEF BgL_letzd2varzd2_bglt BGl_allocatezd2letzd2varz00zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_new3235z00_5766;
BgL_new3235z00_5766 = 
((BgL_letzd2varzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_letzd2varzd2_bgl) ))); 
{ /* ./Ast/node.scm 200 */
long BgL_arg4030z00_5767;
BgL_arg4030z00_5767 = 
BGl_classzd2numzd2zz__objectz00(BGl_letzd2varzd2zzast_nodez00); 
{ /* ./Ast/node.scm 200 */
BgL_objectz00_bglt BgL_objz00_5768;
BgL_objz00_5768 = 
(BgL_objectz00_bglt)(BgL_new3235z00_5766); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5768, BgL_arg4030z00_5767); } } 
{ /* ./Ast/node.scm 200 */
BgL_objectz00_bglt BgL_auxz00_7062;
BgL_auxz00_7062 = 
(BgL_objectz00_bglt)(BgL_new3235z00_5766); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7062, BFALSE); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_objz00_5769;
BgL_objz00_5769 = 
(obj_t)(BgL_new3235z00_5766); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5769); BUNSPEC; } 
return BgL_new3235z00_5766;} } 
}



/* _allocate-let-var */
obj_t BGl__allocatezd2letzd2varz00zzast_nodez00(obj_t BgL_envz00_4854)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_auxz00_7067;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_res8044z00_5774;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_new3235z00_5770;
BgL_new3235z00_5770 = 
((BgL_letzd2varzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_letzd2varzd2_bgl) ))); 
{ /* ./Ast/node.scm 200 */
long BgL_arg4030z00_5771;
BgL_arg4030z00_5771 = 
BGl_classzd2numzd2zz__objectz00(BGl_letzd2varzd2zzast_nodez00); 
{ /* ./Ast/node.scm 200 */
BgL_objectz00_bglt BgL_objz00_5772;
BgL_objz00_5772 = 
(BgL_objectz00_bglt)(BgL_new3235z00_5770); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5772, BgL_arg4030z00_5771); } } 
{ /* ./Ast/node.scm 200 */
BgL_objectz00_bglt BgL_auxz00_7072;
BgL_auxz00_7072 = 
(BgL_objectz00_bglt)(BgL_new3235z00_5770); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7072, BFALSE); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_objz00_5773;
BgL_objz00_5773 = 
(obj_t)(BgL_new3235z00_5770); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5773); BUNSPEC; } 
BgL_res8044z00_5774 = BgL_new3235z00_5770; } 
BgL_auxz00_7067 = BgL_res8044z00_5774; } 
return 
(obj_t)(BgL_auxz00_7067);} } 
}



/* let-fun? */
BGL_EXPORTED_DEF bool_t BGl_letzd2funzf3z21zzast_nodez00(obj_t BgL_obj3190z00_122)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3190z00_122, BGl_letzd2funzd2zzast_nodez00);} 
}



/* _let-fun? */
obj_t BGl__letzd2funzf3z21zzast_nodez00(obj_t BgL_envz00_4948, obj_t BgL_obj3190z00_4949)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ /* ./Ast/node.scm 193 */
bool_t BgL_auxz00_7079;
BgL_auxz00_7079 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3190z00_4949, BGl_letzd2funzd2zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7079);} } 
}



/* make-let-fun */
BGL_EXPORTED_DEF BgL_letzd2funzd2_bglt BGl_makezd2letzd2funz00zzast_nodez00(obj_t BgL_loc3141z00_126, BgL_typez00_bglt BgL_type3142z00_127, obj_t BgL_sidezd2effectzf33143z21_128, obj_t BgL_key3144z00_129, obj_t BgL_locals3145z00_130, BgL_nodez00_bglt BgL_body3146z00_131)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_new3147z00_2675;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_res6035z00_2681;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_new3163z00_2676;
BgL_new3163z00_2676 = 
((BgL_letzd2funzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_letzd2funzd2_bgl) ))); 
{ /* ./Ast/node.scm 193 */
long BgL_arg4039z00_2677;
BgL_arg4039z00_2677 = 
BGl_classzd2numzd2zz__objectz00(BGl_letzd2funzd2zzast_nodez00); 
{ /* ./Ast/node.scm 193 */
BgL_objectz00_bglt BgL_objz00_2678;
BgL_objz00_2678 = 
(BgL_objectz00_bglt)(BgL_new3163z00_2676); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2678, BgL_arg4039z00_2677); } } 
{ /* ./Ast/node.scm 193 */
BgL_objectz00_bglt BgL_auxz00_7086;
BgL_auxz00_7086 = 
(BgL_objectz00_bglt)(BgL_new3163z00_2676); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7086, BFALSE); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_objz00_2680;
BgL_objz00_2680 = 
(obj_t)(BgL_new3163z00_2676); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2680); BUNSPEC; } 
BgL_res6035z00_2681 = BgL_new3163z00_2676; } 
BgL_new3147z00_2675 = BgL_res6035z00_2681; } 
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_res6036z00_2695;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_new3155z00_2682;
BgL_new3155z00_2682 = BgL_new3147z00_2675; 
{ /* ./Ast/node.scm 193 */
obj_t BgL_loc3149z00_2689;BgL_typez00_bglt BgL_type3150z00_2690;obj_t BgL_sidezd2effectzf33151z21_2691;obj_t BgL_key3152z00_2692;obj_t BgL_locals3153z00_2693;BgL_nodez00_bglt BgL_body3154z00_2694;
BgL_loc3149z00_2689 = BgL_loc3141z00_126; 
BgL_type3150z00_2690 = BgL_type3142z00_127; 
BgL_sidezd2effectzf33151z21_2691 = BgL_sidezd2effectzf33143z21_128; 
BgL_key3152z00_2692 = BgL_key3144z00_129; 
BgL_locals3153z00_2693 = BgL_locals3145z00_130; 
BgL_body3154z00_2694 = BgL_body3146z00_131; 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_2682))->BgL_locz00) = ((obj_t)BgL_loc3149z00_2689), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_2682))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3150z00_2690), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_2682))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33151z21_2691), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_2682))->BgL_keyz00) = ((obj_t)BgL_key3152z00_2692), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_2682))->BgL_localsz00) = ((obj_t)BgL_locals3153z00_2693), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_2682))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3154z00_2694), BUNSPEC); 
BgL_res6036z00_2695 = BgL_new3155z00_2682; } } BgL_res6036z00_2695; } 
return BgL_new3147z00_2675;} } 
}



/* _make-let-fun6150 */
obj_t BGl__makezd2letzd2fun6150z00zzast_nodez00(obj_t BgL_envz00_4950, obj_t BgL_loc3141z00_4951, obj_t BgL_type3142z00_4952, obj_t BgL_sidezd2effectzf33143z21_4953, obj_t BgL_key3144z00_4954, obj_t BgL_locals3145z00_4955, obj_t BgL_body3146z00_4956)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_auxz00_7097;
BgL_auxz00_7097 = 
BGl_makezd2letzd2funz00zzast_nodez00(BgL_loc3141z00_4951, 
(BgL_typez00_bglt)(BgL_type3142z00_4952), BgL_sidezd2effectzf33143z21_4953, BgL_key3144z00_4954, BgL_locals3145z00_4955, 
(BgL_nodez00_bglt)(BgL_body3146z00_4956)); 
return 
(obj_t)(BgL_auxz00_7097);} } 
}



/* fill-let-fun! */
BGL_EXPORTED_DEF BgL_letzd2funzd2_bglt BGl_fillzd2letzd2funz12z12zzast_nodez00(BgL_letzd2funzd2_bglt BgL_new3155z00_132, obj_t BgL_loc3149z00_133, BgL_typez00_bglt BgL_type3150z00_134, obj_t BgL_sidezd2effectzf33151z21_135, obj_t BgL_key3152z00_136, obj_t BgL_locals3153z00_137, BgL_nodez00_bglt BgL_body3154z00_138)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ /* ./Ast/node.scm 193 */
obj_t BgL_loc3149z00_5776;BgL_typez00_bglt BgL_type3150z00_5777;obj_t BgL_sidezd2effectzf33151z21_5778;obj_t BgL_key3152z00_5779;obj_t BgL_locals3153z00_5780;BgL_nodez00_bglt BgL_body3154z00_5781;
BgL_loc3149z00_5776 = BgL_loc3149z00_133; 
BgL_type3150z00_5777 = BgL_type3150z00_134; 
BgL_sidezd2effectzf33151z21_5778 = BgL_sidezd2effectzf33151z21_135; 
BgL_key3152z00_5779 = BgL_key3152z00_136; 
BgL_locals3153z00_5780 = BgL_locals3153z00_137; 
BgL_body3154z00_5781 = BgL_body3154z00_138; 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_132))->BgL_locz00) = ((obj_t)BgL_loc3149z00_5776), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_132))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3150z00_5777), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_132))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33151z21_5778), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_132))->BgL_keyz00) = ((obj_t)BgL_key3152z00_5779), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_132))->BgL_localsz00) = ((obj_t)BgL_locals3153z00_5780), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_132))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3154z00_5781), BUNSPEC); 
return BgL_new3155z00_132;} } 
}



/* _fill-let-fun!6152 */
obj_t BGl__fillzd2letzd2funz126152z12zzast_nodez00(obj_t BgL_envz00_4957, obj_t BgL_new3155z00_4958, obj_t BgL_loc3149z00_4959, obj_t BgL_type3150z00_4960, obj_t BgL_sidezd2effectzf33151z21_4961, obj_t BgL_key3152z00_4962, obj_t BgL_locals3153z00_4963, obj_t BgL_body3154z00_4964)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_auxz00_7108;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_res8045z00_5795;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_new3155z00_5782;BgL_typez00_bglt BgL_type3150z00_5784;BgL_nodez00_bglt BgL_body3154z00_5788;
BgL_new3155z00_5782 = 
(BgL_letzd2funzd2_bglt)(BgL_new3155z00_4958); 
BgL_type3150z00_5784 = 
(BgL_typez00_bglt)(BgL_type3150z00_4960); 
BgL_body3154z00_5788 = 
(BgL_nodez00_bglt)(BgL_body3154z00_4964); 
{ /* ./Ast/node.scm 193 */
obj_t BgL_loc3149z00_5789;BgL_typez00_bglt BgL_type3150z00_5790;obj_t BgL_sidezd2effectzf33151z21_5791;obj_t BgL_key3152z00_5792;obj_t BgL_locals3153z00_5793;BgL_nodez00_bglt BgL_body3154z00_5794;
BgL_loc3149z00_5789 = BgL_loc3149z00_4959; 
BgL_type3150z00_5790 = BgL_type3150z00_5784; 
BgL_sidezd2effectzf33151z21_5791 = BgL_sidezd2effectzf33151z21_4961; 
BgL_key3152z00_5792 = BgL_key3152z00_4962; 
BgL_locals3153z00_5793 = BgL_locals3153z00_4963; 
BgL_body3154z00_5794 = BgL_body3154z00_5788; 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_5782))->BgL_locz00) = ((obj_t)BgL_loc3149z00_5789), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_5782))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3150z00_5790), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_5782))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33151z21_5791), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_5782))->BgL_keyz00) = ((obj_t)BgL_key3152z00_5792), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_5782))->BgL_localsz00) = ((obj_t)BgL_locals3153z00_5793), BUNSPEC); 
((((BgL_letzd2funzd2_bglt)CREF(BgL_new3155z00_5782))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_body3154z00_5794), BUNSPEC); 
BgL_res8045z00_5795 = BgL_new3155z00_5782; } } 
BgL_auxz00_7108 = BgL_res8045z00_5795; } 
return 
(obj_t)(BgL_auxz00_7108);} } 
}



/* allocate-let-fun */
BGL_EXPORTED_DEF BgL_letzd2funzd2_bglt BGl_allocatezd2letzd2funz00zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_new3163z00_5796;
BgL_new3163z00_5796 = 
((BgL_letzd2funzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_letzd2funzd2_bgl) ))); 
{ /* ./Ast/node.scm 193 */
long BgL_arg4039z00_5797;
BgL_arg4039z00_5797 = 
BGl_classzd2numzd2zz__objectz00(BGl_letzd2funzd2zzast_nodez00); 
{ /* ./Ast/node.scm 193 */
BgL_objectz00_bglt BgL_objz00_5798;
BgL_objz00_5798 = 
(BgL_objectz00_bglt)(BgL_new3163z00_5796); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5798, BgL_arg4039z00_5797); } } 
{ /* ./Ast/node.scm 193 */
BgL_objectz00_bglt BgL_auxz00_7123;
BgL_auxz00_7123 = 
(BgL_objectz00_bglt)(BgL_new3163z00_5796); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7123, BFALSE); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_objz00_5799;
BgL_objz00_5799 = 
(obj_t)(BgL_new3163z00_5796); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5799); BUNSPEC; } 
return BgL_new3163z00_5796;} } 
}



/* _allocate-let-fun */
obj_t BGl__allocatezd2letzd2funz00zzast_nodez00(obj_t BgL_envz00_4853)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_auxz00_7128;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_res8046z00_5804;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_new3163z00_5800;
BgL_new3163z00_5800 = 
((BgL_letzd2funzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_letzd2funzd2_bgl) ))); 
{ /* ./Ast/node.scm 193 */
long BgL_arg4039z00_5801;
BgL_arg4039z00_5801 = 
BGl_classzd2numzd2zz__objectz00(BGl_letzd2funzd2zzast_nodez00); 
{ /* ./Ast/node.scm 193 */
BgL_objectz00_bglt BgL_objz00_5802;
BgL_objz00_5802 = 
(BgL_objectz00_bglt)(BgL_new3163z00_5800); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5802, BgL_arg4039z00_5801); } } 
{ /* ./Ast/node.scm 193 */
BgL_objectz00_bglt BgL_auxz00_7133;
BgL_auxz00_7133 = 
(BgL_objectz00_bglt)(BgL_new3163z00_5800); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7133, BFALSE); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_objz00_5803;
BgL_objz00_5803 = 
(obj_t)(BgL_new3163z00_5800); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5803); BUNSPEC; } 
BgL_res8046z00_5804 = BgL_new3163z00_5800; } 
BgL_auxz00_7128 = BgL_res8046z00_5804; } 
return 
(obj_t)(BgL_auxz00_7128);} } 
}



/* select? */
BGL_EXPORTED_DEF bool_t BGl_selectzf3zf3zzast_nodez00(obj_t BgL_obj3121z00_145)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3121z00_145, BGl_selectz00zzast_nodez00);} 
}



/* _select? */
obj_t BGl__selectzf3zf3zzast_nodez00(obj_t BgL_envz00_4965, obj_t BgL_obj3121z00_4966)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ /* ./Ast/node.scm 184 */
bool_t BgL_auxz00_7140;
BgL_auxz00_7140 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3121z00_4966, BGl_selectz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7140);} } 
}



/* make-select */
BGL_EXPORTED_DEF BgL_selectz00_bglt BGl_makezd2selectzd2zzast_nodez00(obj_t BgL_loc3065z00_149, BgL_typez00_bglt BgL_type3066z00_150, obj_t BgL_sidezd2effectzf33067z21_151, obj_t BgL_key3068z00_152, BgL_nodez00_bglt BgL_test3069z00_153, obj_t BgL_clauses3070z00_154, BgL_typez00_bglt BgL_itemzd2type3071zd2_155)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_new3072z00_2707;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_res6037z00_2713;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_new3090z00_2708;
BgL_new3090z00_2708 = 
((BgL_selectz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_selectz00_bgl) ))); 
{ /* ./Ast/node.scm 184 */
long BgL_arg4048z00_2709;
BgL_arg4048z00_2709 = 
BGl_classzd2numzd2zz__objectz00(BGl_selectz00zzast_nodez00); 
{ /* ./Ast/node.scm 184 */
BgL_objectz00_bglt BgL_objz00_2710;
BgL_objz00_2710 = 
(BgL_objectz00_bglt)(BgL_new3090z00_2708); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2710, BgL_arg4048z00_2709); } } 
{ /* ./Ast/node.scm 184 */
BgL_objectz00_bglt BgL_auxz00_7147;
BgL_auxz00_7147 = 
(BgL_objectz00_bglt)(BgL_new3090z00_2708); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7147, BFALSE); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_objz00_2712;
BgL_objz00_2712 = 
(obj_t)(BgL_new3090z00_2708); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2712); BUNSPEC; } 
BgL_res6037z00_2713 = BgL_new3090z00_2708; } 
BgL_new3072z00_2707 = BgL_res6037z00_2713; } 
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_res6038z00_2729;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_new3081z00_2714;
BgL_new3081z00_2714 = BgL_new3072z00_2707; 
{ /* ./Ast/node.scm 184 */
obj_t BgL_loc3074z00_2722;BgL_typez00_bglt BgL_type3075z00_2723;obj_t BgL_sidezd2effectzf33076z21_2724;obj_t BgL_key3077z00_2725;BgL_nodez00_bglt BgL_test3078z00_2726;obj_t BgL_clauses3079z00_2727;BgL_typez00_bglt BgL_itemzd2type3080zd2_2728;
BgL_loc3074z00_2722 = BgL_loc3065z00_149; 
BgL_type3075z00_2723 = BgL_type3066z00_150; 
BgL_sidezd2effectzf33076z21_2724 = BgL_sidezd2effectzf33067z21_151; 
BgL_key3077z00_2725 = BgL_key3068z00_152; 
BgL_test3078z00_2726 = BgL_test3069z00_153; 
BgL_clauses3079z00_2727 = BgL_clauses3070z00_154; 
BgL_itemzd2type3080zd2_2728 = BgL_itemzd2type3071zd2_155; 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_2714))->BgL_locz00) = ((obj_t)BgL_loc3074z00_2722), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_2714))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3075z00_2723), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_2714))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33076z21_2724), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_2714))->BgL_keyz00) = ((obj_t)BgL_key3077z00_2725), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_2714))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_test3078z00_2726), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_2714))->BgL_clausesz00) = ((obj_t)BgL_clauses3079z00_2727), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_2714))->BgL_itemzd2typezd2) = ((BgL_typez00_bglt)BgL_itemzd2type3080zd2_2728), BUNSPEC); 
BgL_res6038z00_2729 = BgL_new3081z00_2714; } } BgL_res6038z00_2729; } 
return BgL_new3072z00_2707;} } 
}



/* _make-select6155 */
obj_t BGl__makezd2select6155zd2zzast_nodez00(obj_t BgL_envz00_4967, obj_t BgL_loc3065z00_4968, obj_t BgL_type3066z00_4969, obj_t BgL_sidezd2effectzf33067z21_4970, obj_t BgL_key3068z00_4971, obj_t BgL_test3069z00_4972, obj_t BgL_clauses3070z00_4973, obj_t BgL_itemzd2type3071zd2_4974)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_auxz00_7159;
BgL_auxz00_7159 = 
BGl_makezd2selectzd2zzast_nodez00(BgL_loc3065z00_4968, 
(BgL_typez00_bglt)(BgL_type3066z00_4969), BgL_sidezd2effectzf33067z21_4970, BgL_key3068z00_4971, 
(BgL_nodez00_bglt)(BgL_test3069z00_4972), BgL_clauses3070z00_4973, 
(BgL_typez00_bglt)(BgL_itemzd2type3071zd2_4974)); 
return 
(obj_t)(BgL_auxz00_7159);} } 
}



/* fill-select! */
BGL_EXPORTED_DEF BgL_selectz00_bglt BGl_fillzd2selectz12zc0zzast_nodez00(BgL_selectz00_bglt BgL_new3081z00_156, obj_t BgL_loc3074z00_157, BgL_typez00_bglt BgL_type3075z00_158, obj_t BgL_sidezd2effectzf33076z21_159, obj_t BgL_key3077z00_160, BgL_nodez00_bglt BgL_test3078z00_161, obj_t BgL_clauses3079z00_162, BgL_typez00_bglt BgL_itemzd2type3080zd2_163)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ /* ./Ast/node.scm 184 */
obj_t BgL_loc3074z00_5806;BgL_typez00_bglt BgL_type3075z00_5807;obj_t BgL_sidezd2effectzf33076z21_5808;obj_t BgL_key3077z00_5809;BgL_nodez00_bglt BgL_test3078z00_5810;obj_t BgL_clauses3079z00_5811;BgL_typez00_bglt BgL_itemzd2type3080zd2_5812;
BgL_loc3074z00_5806 = BgL_loc3074z00_157; 
BgL_type3075z00_5807 = BgL_type3075z00_158; 
BgL_sidezd2effectzf33076z21_5808 = BgL_sidezd2effectzf33076z21_159; 
BgL_key3077z00_5809 = BgL_key3077z00_160; 
BgL_test3078z00_5810 = BgL_test3078z00_161; 
BgL_clauses3079z00_5811 = BgL_clauses3079z00_162; 
BgL_itemzd2type3080zd2_5812 = BgL_itemzd2type3080zd2_163; 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_156))->BgL_locz00) = ((obj_t)BgL_loc3074z00_5806), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_156))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3075z00_5807), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_156))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33076z21_5808), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_156))->BgL_keyz00) = ((obj_t)BgL_key3077z00_5809), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_156))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_test3078z00_5810), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_156))->BgL_clausesz00) = ((obj_t)BgL_clauses3079z00_5811), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_156))->BgL_itemzd2typezd2) = ((BgL_typez00_bglt)BgL_itemzd2type3080zd2_5812), BUNSPEC); 
return BgL_new3081z00_156;} } 
}



/* _fill-select!6157 */
obj_t BGl__fillzd2selectz126157zc0zzast_nodez00(obj_t BgL_envz00_4975, obj_t BgL_new3081z00_4976, obj_t BgL_loc3074z00_4977, obj_t BgL_type3075z00_4978, obj_t BgL_sidezd2effectzf33076z21_4979, obj_t BgL_key3077z00_4980, obj_t BgL_test3078z00_4981, obj_t BgL_clauses3079z00_4982, obj_t BgL_itemzd2type3080zd2_4983)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_auxz00_7172;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_res8047z00_5828;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_new3081z00_5813;BgL_typez00_bglt BgL_type3075z00_5815;BgL_nodez00_bglt BgL_test3078z00_5818;BgL_typez00_bglt BgL_itemzd2type3080zd2_5820;
BgL_new3081z00_5813 = 
(BgL_selectz00_bglt)(BgL_new3081z00_4976); 
BgL_type3075z00_5815 = 
(BgL_typez00_bglt)(BgL_type3075z00_4978); 
BgL_test3078z00_5818 = 
(BgL_nodez00_bglt)(BgL_test3078z00_4981); 
BgL_itemzd2type3080zd2_5820 = 
(BgL_typez00_bglt)(BgL_itemzd2type3080zd2_4983); 
{ /* ./Ast/node.scm 184 */
obj_t BgL_loc3074z00_5821;BgL_typez00_bglt BgL_type3075z00_5822;obj_t BgL_sidezd2effectzf33076z21_5823;obj_t BgL_key3077z00_5824;BgL_nodez00_bglt BgL_test3078z00_5825;obj_t BgL_clauses3079z00_5826;BgL_typez00_bglt BgL_itemzd2type3080zd2_5827;
BgL_loc3074z00_5821 = BgL_loc3074z00_4977; 
BgL_type3075z00_5822 = BgL_type3075z00_5815; 
BgL_sidezd2effectzf33076z21_5823 = BgL_sidezd2effectzf33076z21_4979; 
BgL_key3077z00_5824 = BgL_key3077z00_4980; 
BgL_test3078z00_5825 = BgL_test3078z00_5818; 
BgL_clauses3079z00_5826 = BgL_clauses3079z00_4982; 
BgL_itemzd2type3080zd2_5827 = BgL_itemzd2type3080zd2_5820; 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_5813))->BgL_locz00) = ((obj_t)BgL_loc3074z00_5821), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_5813))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3075z00_5822), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_5813))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf33076z21_5823), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_5813))->BgL_keyz00) = ((obj_t)BgL_key3077z00_5824), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_5813))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_test3078z00_5825), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_5813))->BgL_clausesz00) = ((obj_t)BgL_clauses3079z00_5826), BUNSPEC); 
((((BgL_selectz00_bglt)CREF(BgL_new3081z00_5813))->BgL_itemzd2typezd2) = ((BgL_typez00_bglt)BgL_itemzd2type3080zd2_5827), BUNSPEC); 
BgL_res8047z00_5828 = BgL_new3081z00_5813; } } 
BgL_auxz00_7172 = BgL_res8047z00_5828; } 
return 
(obj_t)(BgL_auxz00_7172);} } 
}



/* allocate-select */
BGL_EXPORTED_DEF BgL_selectz00_bglt BGl_allocatezd2selectzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_new3090z00_5829;
BgL_new3090z00_5829 = 
((BgL_selectz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_selectz00_bgl) ))); 
{ /* ./Ast/node.scm 184 */
long BgL_arg4048z00_5830;
BgL_arg4048z00_5830 = 
BGl_classzd2numzd2zz__objectz00(BGl_selectz00zzast_nodez00); 
{ /* ./Ast/node.scm 184 */
BgL_objectz00_bglt BgL_objz00_5831;
BgL_objz00_5831 = 
(BgL_objectz00_bglt)(BgL_new3090z00_5829); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5831, BgL_arg4048z00_5830); } } 
{ /* ./Ast/node.scm 184 */
BgL_objectz00_bglt BgL_auxz00_7189;
BgL_auxz00_7189 = 
(BgL_objectz00_bglt)(BgL_new3090z00_5829); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7189, BFALSE); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_objz00_5832;
BgL_objz00_5832 = 
(obj_t)(BgL_new3090z00_5829); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5832); BUNSPEC; } 
return BgL_new3090z00_5829;} } 
}



/* _allocate-select */
obj_t BGl__allocatezd2selectzd2zzast_nodez00(obj_t BgL_envz00_4852)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_auxz00_7194;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_res8048z00_5837;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_new3090z00_5833;
BgL_new3090z00_5833 = 
((BgL_selectz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_selectz00_bgl) ))); 
{ /* ./Ast/node.scm 184 */
long BgL_arg4048z00_5834;
BgL_arg4048z00_5834 = 
BGl_classzd2numzd2zz__objectz00(BGl_selectz00zzast_nodez00); 
{ /* ./Ast/node.scm 184 */
BgL_objectz00_bglt BgL_objz00_5835;
BgL_objz00_5835 = 
(BgL_objectz00_bglt)(BgL_new3090z00_5833); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5835, BgL_arg4048z00_5834); } } 
{ /* ./Ast/node.scm 184 */
BgL_objectz00_bglt BgL_auxz00_7199;
BgL_auxz00_7199 = 
(BgL_objectz00_bglt)(BgL_new3090z00_5833); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7199, BFALSE); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_objz00_5836;
BgL_objz00_5836 = 
(obj_t)(BgL_new3090z00_5833); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5836); BUNSPEC; } 
BgL_res8048z00_5837 = BgL_new3090z00_5833; } 
BgL_auxz00_7194 = BgL_res8048z00_5837; } 
return 
(obj_t)(BgL_auxz00_7194);} } 
}



/* fail? */
BGL_EXPORTED_DEF bool_t BGl_failzf3zf3zzast_nodez00(obj_t BgL_obj3048z00_169)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3048z00_169, BGl_failz00zzast_nodez00);} 
}



/* _fail? */
obj_t BGl__failzf3zf3zzast_nodez00(obj_t BgL_envz00_4984, obj_t BgL_obj3048z00_4985)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ /* ./Ast/node.scm 177 */
bool_t BgL_auxz00_7206;
BgL_auxz00_7206 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj3048z00_4985, BGl_failz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7206);} } 
}



/* make-fail */
BGL_EXPORTED_DEF BgL_failz00_bglt BGl_makezd2failzd2zzast_nodez00(obj_t BgL_loc3006z00_173, BgL_typez00_bglt BgL_type3007z00_174, BgL_nodez00_bglt BgL_proc3008z00_175, BgL_nodez00_bglt BgL_msg3009z00_176, BgL_nodez00_bglt BgL_obj3010z00_177)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_new3011z00_2742;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_res6039z00_2748;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_new3025z00_2743;
BgL_new3025z00_2743 = 
((BgL_failz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_failz00_bgl) ))); 
{ /* ./Ast/node.scm 177 */
long BgL_arg4057z00_2744;
BgL_arg4057z00_2744 = 
BGl_classzd2numzd2zz__objectz00(BGl_failz00zzast_nodez00); 
{ /* ./Ast/node.scm 177 */
BgL_objectz00_bglt BgL_objz00_2745;
BgL_objz00_2745 = 
(BgL_objectz00_bglt)(BgL_new3025z00_2743); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2745, BgL_arg4057z00_2744); } } 
{ /* ./Ast/node.scm 177 */
BgL_objectz00_bglt BgL_auxz00_7213;
BgL_auxz00_7213 = 
(BgL_objectz00_bglt)(BgL_new3025z00_2743); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7213, BFALSE); } 
{ /* ./Ast/node.scm 177 */
obj_t BgL_objz00_2747;
BgL_objz00_2747 = 
(obj_t)(BgL_new3025z00_2743); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2747); BUNSPEC; } 
BgL_res6039z00_2748 = BgL_new3025z00_2743; } 
BgL_new3011z00_2742 = BgL_res6039z00_2748; } 
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_res6040z00_2760;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_new3018z00_2749;
BgL_new3018z00_2749 = BgL_new3011z00_2742; 
{ /* ./Ast/node.scm 177 */
obj_t BgL_loc3013z00_2755;BgL_typez00_bglt BgL_type3014z00_2756;BgL_nodez00_bglt BgL_proc3015z00_2757;BgL_nodez00_bglt BgL_msg3016z00_2758;BgL_nodez00_bglt BgL_obj3017z00_2759;
BgL_loc3013z00_2755 = BgL_loc3006z00_173; 
BgL_type3014z00_2756 = BgL_type3007z00_174; 
BgL_proc3015z00_2757 = BgL_proc3008z00_175; 
BgL_msg3016z00_2758 = BgL_msg3009z00_176; 
BgL_obj3017z00_2759 = BgL_obj3010z00_177; 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_2749))->BgL_locz00) = ((obj_t)BgL_loc3013z00_2755), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_2749))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3014z00_2756), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_2749))->BgL_procz00) = ((BgL_nodez00_bglt)BgL_proc3015z00_2757), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_2749))->BgL_msgz00) = ((BgL_nodez00_bglt)BgL_msg3016z00_2758), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_2749))->BgL_objz00) = ((BgL_nodez00_bglt)BgL_obj3017z00_2759), BUNSPEC); 
BgL_res6040z00_2760 = BgL_new3018z00_2749; } } BgL_res6040z00_2760; } 
return BgL_new3011z00_2742;} } 
}



/* _make-fail6160 */
obj_t BGl__makezd2fail6160zd2zzast_nodez00(obj_t BgL_envz00_4986, obj_t BgL_loc3006z00_4987, obj_t BgL_type3007z00_4988, obj_t BgL_proc3008z00_4989, obj_t BgL_msg3009z00_4990, obj_t BgL_obj3010z00_4991)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_auxz00_7223;
BgL_auxz00_7223 = 
BGl_makezd2failzd2zzast_nodez00(BgL_loc3006z00_4987, 
(BgL_typez00_bglt)(BgL_type3007z00_4988), 
(BgL_nodez00_bglt)(BgL_proc3008z00_4989), 
(BgL_nodez00_bglt)(BgL_msg3009z00_4990), 
(BgL_nodez00_bglt)(BgL_obj3010z00_4991)); 
return 
(obj_t)(BgL_auxz00_7223);} } 
}



/* fill-fail! */
BGL_EXPORTED_DEF BgL_failz00_bglt BGl_fillzd2failz12zc0zzast_nodez00(BgL_failz00_bglt BgL_new3018z00_178, obj_t BgL_loc3013z00_179, BgL_typez00_bglt BgL_type3014z00_180, BgL_nodez00_bglt BgL_proc3015z00_181, BgL_nodez00_bglt BgL_msg3016z00_182, BgL_nodez00_bglt BgL_obj3017z00_183)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ /* ./Ast/node.scm 177 */
obj_t BgL_loc3013z00_5839;BgL_typez00_bglt BgL_type3014z00_5840;BgL_nodez00_bglt BgL_proc3015z00_5841;BgL_nodez00_bglt BgL_msg3016z00_5842;BgL_nodez00_bglt BgL_obj3017z00_5843;
BgL_loc3013z00_5839 = BgL_loc3013z00_179; 
BgL_type3014z00_5840 = BgL_type3014z00_180; 
BgL_proc3015z00_5841 = BgL_proc3015z00_181; 
BgL_msg3016z00_5842 = BgL_msg3016z00_182; 
BgL_obj3017z00_5843 = BgL_obj3017z00_183; 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_178))->BgL_locz00) = ((obj_t)BgL_loc3013z00_5839), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_178))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3014z00_5840), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_178))->BgL_procz00) = ((BgL_nodez00_bglt)BgL_proc3015z00_5841), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_178))->BgL_msgz00) = ((BgL_nodez00_bglt)BgL_msg3016z00_5842), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_178))->BgL_objz00) = ((BgL_nodez00_bglt)BgL_obj3017z00_5843), BUNSPEC); 
return BgL_new3018z00_178;} } 
}



/* _fill-fail!6162 */
obj_t BGl__fillzd2failz126162zc0zzast_nodez00(obj_t BgL_envz00_4992, obj_t BgL_new3018z00_4993, obj_t BgL_loc3013z00_4994, obj_t BgL_type3014z00_4995, obj_t BgL_proc3015z00_4996, obj_t BgL_msg3016z00_4997, obj_t BgL_obj3017z00_4998)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_auxz00_7235;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_res8049z00_5855;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_new3018z00_5844;BgL_typez00_bglt BgL_type3014z00_5846;BgL_nodez00_bglt BgL_proc3015z00_5847;BgL_nodez00_bglt BgL_msg3016z00_5848;BgL_nodez00_bglt BgL_obj3017z00_5849;
BgL_new3018z00_5844 = 
(BgL_failz00_bglt)(BgL_new3018z00_4993); 
BgL_type3014z00_5846 = 
(BgL_typez00_bglt)(BgL_type3014z00_4995); 
BgL_proc3015z00_5847 = 
(BgL_nodez00_bglt)(BgL_proc3015z00_4996); 
BgL_msg3016z00_5848 = 
(BgL_nodez00_bglt)(BgL_msg3016z00_4997); 
BgL_obj3017z00_5849 = 
(BgL_nodez00_bglt)(BgL_obj3017z00_4998); 
{ /* ./Ast/node.scm 177 */
obj_t BgL_loc3013z00_5850;BgL_typez00_bglt BgL_type3014z00_5851;BgL_nodez00_bglt BgL_proc3015z00_5852;BgL_nodez00_bglt BgL_msg3016z00_5853;BgL_nodez00_bglt BgL_obj3017z00_5854;
BgL_loc3013z00_5850 = BgL_loc3013z00_4994; 
BgL_type3014z00_5851 = BgL_type3014z00_5846; 
BgL_proc3015z00_5852 = BgL_proc3015z00_5847; 
BgL_msg3016z00_5853 = BgL_msg3016z00_5848; 
BgL_obj3017z00_5854 = BgL_obj3017z00_5849; 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_5844))->BgL_locz00) = ((obj_t)BgL_loc3013z00_5850), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_5844))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type3014z00_5851), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_5844))->BgL_procz00) = ((BgL_nodez00_bglt)BgL_proc3015z00_5852), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_5844))->BgL_msgz00) = ((BgL_nodez00_bglt)BgL_msg3016z00_5853), BUNSPEC); 
((((BgL_failz00_bglt)CREF(BgL_new3018z00_5844))->BgL_objz00) = ((BgL_nodez00_bglt)BgL_obj3017z00_5854), BUNSPEC); 
BgL_res8049z00_5855 = BgL_new3018z00_5844; } } 
BgL_auxz00_7235 = BgL_res8049z00_5855; } 
return 
(obj_t)(BgL_auxz00_7235);} } 
}



/* allocate-fail */
BGL_EXPORTED_DEF BgL_failz00_bglt BGl_allocatezd2failzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_new3025z00_5856;
BgL_new3025z00_5856 = 
((BgL_failz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_failz00_bgl) ))); 
{ /* ./Ast/node.scm 177 */
long BgL_arg4057z00_5857;
BgL_arg4057z00_5857 = 
BGl_classzd2numzd2zz__objectz00(BGl_failz00zzast_nodez00); 
{ /* ./Ast/node.scm 177 */
BgL_objectz00_bglt BgL_objz00_5858;
BgL_objz00_5858 = 
(BgL_objectz00_bglt)(BgL_new3025z00_5856); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5858, BgL_arg4057z00_5857); } } 
{ /* ./Ast/node.scm 177 */
BgL_objectz00_bglt BgL_auxz00_7251;
BgL_auxz00_7251 = 
(BgL_objectz00_bglt)(BgL_new3025z00_5856); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7251, BFALSE); } 
{ /* ./Ast/node.scm 177 */
obj_t BgL_objz00_5859;
BgL_objz00_5859 = 
(obj_t)(BgL_new3025z00_5856); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5859); BUNSPEC; } 
return BgL_new3025z00_5856;} } 
}



/* _allocate-fail */
obj_t BGl__allocatezd2failzd2zzast_nodez00(obj_t BgL_envz00_4851)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_auxz00_7256;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_res8050z00_5864;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_new3025z00_5860;
BgL_new3025z00_5860 = 
((BgL_failz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_failz00_bgl) ))); 
{ /* ./Ast/node.scm 177 */
long BgL_arg4057z00_5861;
BgL_arg4057z00_5861 = 
BGl_classzd2numzd2zz__objectz00(BGl_failz00zzast_nodez00); 
{ /* ./Ast/node.scm 177 */
BgL_objectz00_bglt BgL_objz00_5862;
BgL_objz00_5862 = 
(BgL_objectz00_bglt)(BgL_new3025z00_5860); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5862, BgL_arg4057z00_5861); } } 
{ /* ./Ast/node.scm 177 */
BgL_objectz00_bglt BgL_auxz00_7261;
BgL_auxz00_7261 = 
(BgL_objectz00_bglt)(BgL_new3025z00_5860); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7261, BFALSE); } 
{ /* ./Ast/node.scm 177 */
obj_t BgL_objz00_5863;
BgL_objz00_5863 = 
(obj_t)(BgL_new3025z00_5860); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5863); BUNSPEC; } 
BgL_res8050z00_5864 = BgL_new3025z00_5860; } 
BgL_auxz00_7256 = BgL_res8050z00_5864; } 
return 
(obj_t)(BgL_auxz00_7256);} } 
}



/* conditional? */
BGL_EXPORTED_DEF bool_t BGl_conditionalzf3zf3zzast_nodez00(obj_t BgL_obj2992z00_193)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2992z00_193, BGl_conditionalz00zzast_nodez00);} 
}



/* _conditional? */
obj_t BGl__conditionalzf3zf3zzast_nodez00(obj_t BgL_envz00_4999, obj_t BgL_obj2992z00_5000)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ /* ./Ast/node.scm 168 */
bool_t BgL_auxz00_7268;
BgL_auxz00_7268 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2992z00_5000, BGl_conditionalz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7268);} } 
}



/* make-conditional */
BGL_EXPORTED_DEF BgL_conditionalz00_bglt BGl_makezd2conditionalzd2zzast_nodez00(obj_t BgL_loc2936z00_197, BgL_typez00_bglt BgL_type2937z00_198, obj_t BgL_sidezd2effectzf32938z21_199, obj_t BgL_key2939z00_200, BgL_nodez00_bglt BgL_test2940z00_201, BgL_nodez00_bglt BgL_true2941z00_202, BgL_nodez00_bglt BgL_false2942z00_203)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_new2943z00_2771;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_res6041z00_2777;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_new2961z00_2772;
BgL_new2961z00_2772 = 
((BgL_conditionalz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_conditionalz00_bgl) ))); 
{ /* ./Ast/node.scm 168 */
long BgL_arg4066z00_2773;
BgL_arg4066z00_2773 = 
BGl_classzd2numzd2zz__objectz00(BGl_conditionalz00zzast_nodez00); 
{ /* ./Ast/node.scm 168 */
BgL_objectz00_bglt BgL_objz00_2774;
BgL_objz00_2774 = 
(BgL_objectz00_bglt)(BgL_new2961z00_2772); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2774, BgL_arg4066z00_2773); } } 
{ /* ./Ast/node.scm 168 */
BgL_objectz00_bglt BgL_auxz00_7275;
BgL_auxz00_7275 = 
(BgL_objectz00_bglt)(BgL_new2961z00_2772); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7275, BFALSE); } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_objz00_2776;
BgL_objz00_2776 = 
(obj_t)(BgL_new2961z00_2772); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2776); BUNSPEC; } 
BgL_res6041z00_2777 = BgL_new2961z00_2772; } 
BgL_new2943z00_2771 = BgL_res6041z00_2777; } 
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_res6042z00_2793;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_new2952z00_2778;
BgL_new2952z00_2778 = BgL_new2943z00_2771; 
{ /* ./Ast/node.scm 168 */
obj_t BgL_loc2945z00_2786;BgL_typez00_bglt BgL_type2946z00_2787;obj_t BgL_sidezd2effectzf32947z21_2788;obj_t BgL_key2948z00_2789;BgL_nodez00_bglt BgL_test2949z00_2790;BgL_nodez00_bglt BgL_true2950z00_2791;BgL_nodez00_bglt BgL_false2951z00_2792;
BgL_loc2945z00_2786 = BgL_loc2936z00_197; 
BgL_type2946z00_2787 = BgL_type2937z00_198; 
BgL_sidezd2effectzf32947z21_2788 = BgL_sidezd2effectzf32938z21_199; 
BgL_key2948z00_2789 = BgL_key2939z00_200; 
BgL_test2949z00_2790 = BgL_test2940z00_201; 
BgL_true2950z00_2791 = BgL_true2941z00_202; 
BgL_false2951z00_2792 = BgL_false2942z00_203; 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_2778))->BgL_locz00) = ((obj_t)BgL_loc2945z00_2786), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_2778))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2946z00_2787), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_2778))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32947z21_2788), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_2778))->BgL_keyz00) = ((obj_t)BgL_key2948z00_2789), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_2778))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_test2949z00_2790), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_2778))->BgL_truez00) = ((BgL_nodez00_bglt)BgL_true2950z00_2791), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_2778))->BgL_falsez00) = ((BgL_nodez00_bglt)BgL_false2951z00_2792), BUNSPEC); 
BgL_res6042z00_2793 = BgL_new2952z00_2778; } } BgL_res6042z00_2793; } 
return BgL_new2943z00_2771;} } 
}



/* _make-conditional6165 */
obj_t BGl__makezd2conditional6165zd2zzast_nodez00(obj_t BgL_envz00_5001, obj_t BgL_loc2936z00_5002, obj_t BgL_type2937z00_5003, obj_t BgL_sidezd2effectzf32938z21_5004, obj_t BgL_key2939z00_5005, obj_t BgL_test2940z00_5006, obj_t BgL_true2941z00_5007, obj_t BgL_false2942z00_5008)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_auxz00_7287;
BgL_auxz00_7287 = 
BGl_makezd2conditionalzd2zzast_nodez00(BgL_loc2936z00_5002, 
(BgL_typez00_bglt)(BgL_type2937z00_5003), BgL_sidezd2effectzf32938z21_5004, BgL_key2939z00_5005, 
(BgL_nodez00_bglt)(BgL_test2940z00_5006), 
(BgL_nodez00_bglt)(BgL_true2941z00_5007), 
(BgL_nodez00_bglt)(BgL_false2942z00_5008)); 
return 
(obj_t)(BgL_auxz00_7287);} } 
}



/* fill-conditional! */
BGL_EXPORTED_DEF BgL_conditionalz00_bglt BGl_fillzd2conditionalz12zc0zzast_nodez00(BgL_conditionalz00_bglt BgL_new2952z00_204, obj_t BgL_loc2945z00_205, BgL_typez00_bglt BgL_type2946z00_206, obj_t BgL_sidezd2effectzf32947z21_207, obj_t BgL_key2948z00_208, BgL_nodez00_bglt BgL_test2949z00_209, BgL_nodez00_bglt BgL_true2950z00_210, BgL_nodez00_bglt BgL_false2951z00_211)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ /* ./Ast/node.scm 168 */
obj_t BgL_loc2945z00_5866;BgL_typez00_bglt BgL_type2946z00_5867;obj_t BgL_sidezd2effectzf32947z21_5868;obj_t BgL_key2948z00_5869;BgL_nodez00_bglt BgL_test2949z00_5870;BgL_nodez00_bglt BgL_true2950z00_5871;BgL_nodez00_bglt BgL_false2951z00_5872;
BgL_loc2945z00_5866 = BgL_loc2945z00_205; 
BgL_type2946z00_5867 = BgL_type2946z00_206; 
BgL_sidezd2effectzf32947z21_5868 = BgL_sidezd2effectzf32947z21_207; 
BgL_key2948z00_5869 = BgL_key2948z00_208; 
BgL_test2949z00_5870 = BgL_test2949z00_209; 
BgL_true2950z00_5871 = BgL_true2950z00_210; 
BgL_false2951z00_5872 = BgL_false2951z00_211; 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_204))->BgL_locz00) = ((obj_t)BgL_loc2945z00_5866), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_204))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2946z00_5867), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_204))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32947z21_5868), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_204))->BgL_keyz00) = ((obj_t)BgL_key2948z00_5869), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_204))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_test2949z00_5870), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_204))->BgL_truez00) = ((BgL_nodez00_bglt)BgL_true2950z00_5871), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_204))->BgL_falsez00) = ((BgL_nodez00_bglt)BgL_false2951z00_5872), BUNSPEC); 
return BgL_new2952z00_204;} } 
}



/* _fill-conditional!6167 */
obj_t BGl__fillzd2conditionalz126167zc0zzast_nodez00(obj_t BgL_envz00_5009, obj_t BgL_new2952z00_5010, obj_t BgL_loc2945z00_5011, obj_t BgL_type2946z00_5012, obj_t BgL_sidezd2effectzf32947z21_5013, obj_t BgL_key2948z00_5014, obj_t BgL_test2949z00_5015, obj_t BgL_true2950z00_5016, obj_t BgL_false2951z00_5017)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_auxz00_7301;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_res8051z00_5888;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_new2952z00_5873;BgL_typez00_bglt BgL_type2946z00_5875;BgL_nodez00_bglt BgL_test2949z00_5878;BgL_nodez00_bglt BgL_true2950z00_5879;BgL_nodez00_bglt BgL_false2951z00_5880;
BgL_new2952z00_5873 = 
(BgL_conditionalz00_bglt)(BgL_new2952z00_5010); 
BgL_type2946z00_5875 = 
(BgL_typez00_bglt)(BgL_type2946z00_5012); 
BgL_test2949z00_5878 = 
(BgL_nodez00_bglt)(BgL_test2949z00_5015); 
BgL_true2950z00_5879 = 
(BgL_nodez00_bglt)(BgL_true2950z00_5016); 
BgL_false2951z00_5880 = 
(BgL_nodez00_bglt)(BgL_false2951z00_5017); 
{ /* ./Ast/node.scm 168 */
obj_t BgL_loc2945z00_5881;BgL_typez00_bglt BgL_type2946z00_5882;obj_t BgL_sidezd2effectzf32947z21_5883;obj_t BgL_key2948z00_5884;BgL_nodez00_bglt BgL_test2949z00_5885;BgL_nodez00_bglt BgL_true2950z00_5886;BgL_nodez00_bglt BgL_false2951z00_5887;
BgL_loc2945z00_5881 = BgL_loc2945z00_5011; 
BgL_type2946z00_5882 = BgL_type2946z00_5875; 
BgL_sidezd2effectzf32947z21_5883 = BgL_sidezd2effectzf32947z21_5013; 
BgL_key2948z00_5884 = BgL_key2948z00_5014; 
BgL_test2949z00_5885 = BgL_test2949z00_5878; 
BgL_true2950z00_5886 = BgL_true2950z00_5879; 
BgL_false2951z00_5887 = BgL_false2951z00_5880; 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_5873))->BgL_locz00) = ((obj_t)BgL_loc2945z00_5881), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_5873))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2946z00_5882), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_5873))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32947z21_5883), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_5873))->BgL_keyz00) = ((obj_t)BgL_key2948z00_5884), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_5873))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_test2949z00_5885), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_5873))->BgL_truez00) = ((BgL_nodez00_bglt)BgL_true2950z00_5886), BUNSPEC); 
((((BgL_conditionalz00_bglt)CREF(BgL_new2952z00_5873))->BgL_falsez00) = ((BgL_nodez00_bglt)BgL_false2951z00_5887), BUNSPEC); 
BgL_res8051z00_5888 = BgL_new2952z00_5873; } } 
BgL_auxz00_7301 = BgL_res8051z00_5888; } 
return 
(obj_t)(BgL_auxz00_7301);} } 
}



/* allocate-conditional */
BGL_EXPORTED_DEF BgL_conditionalz00_bglt BGl_allocatezd2conditionalzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_new2961z00_5889;
BgL_new2961z00_5889 = 
((BgL_conditionalz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_conditionalz00_bgl) ))); 
{ /* ./Ast/node.scm 168 */
long BgL_arg4066z00_5890;
BgL_arg4066z00_5890 = 
BGl_classzd2numzd2zz__objectz00(BGl_conditionalz00zzast_nodez00); 
{ /* ./Ast/node.scm 168 */
BgL_objectz00_bglt BgL_objz00_5891;
BgL_objz00_5891 = 
(BgL_objectz00_bglt)(BgL_new2961z00_5889); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5891, BgL_arg4066z00_5890); } } 
{ /* ./Ast/node.scm 168 */
BgL_objectz00_bglt BgL_auxz00_7319;
BgL_auxz00_7319 = 
(BgL_objectz00_bglt)(BgL_new2961z00_5889); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7319, BFALSE); } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_objz00_5892;
BgL_objz00_5892 = 
(obj_t)(BgL_new2961z00_5889); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5892); BUNSPEC; } 
return BgL_new2961z00_5889;} } 
}



/* _allocate-conditional */
obj_t BGl__allocatezd2conditionalzd2zzast_nodez00(obj_t BgL_envz00_4850)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_auxz00_7324;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_res8052z00_5897;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_new2961z00_5893;
BgL_new2961z00_5893 = 
((BgL_conditionalz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_conditionalz00_bgl) ))); 
{ /* ./Ast/node.scm 168 */
long BgL_arg4066z00_5894;
BgL_arg4066z00_5894 = 
BGl_classzd2numzd2zz__objectz00(BGl_conditionalz00zzast_nodez00); 
{ /* ./Ast/node.scm 168 */
BgL_objectz00_bglt BgL_objz00_5895;
BgL_objz00_5895 = 
(BgL_objectz00_bglt)(BgL_new2961z00_5893); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5895, BgL_arg4066z00_5894); } } 
{ /* ./Ast/node.scm 168 */
BgL_objectz00_bglt BgL_auxz00_7329;
BgL_auxz00_7329 = 
(BgL_objectz00_bglt)(BgL_new2961z00_5893); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7329, BFALSE); } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_objz00_5896;
BgL_objz00_5896 = 
(obj_t)(BgL_new2961z00_5893); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5896); BUNSPEC; } 
BgL_res8052z00_5897 = BgL_new2961z00_5893; } 
BgL_auxz00_7324 = BgL_res8052z00_5897; } 
return 
(obj_t)(BgL_auxz00_7324);} } 
}



/* setq? */
BGL_EXPORTED_DEF bool_t BGl_setqzf3zf3zzast_nodez00(obj_t BgL_obj2916z00_221)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2916z00_221, BGl_setqz00zzast_nodez00);} 
}



/* _setq? */
obj_t BGl__setqzf3zf3zzast_nodez00(obj_t BgL_envz00_5018, obj_t BgL_obj2916z00_5019)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ /* ./Ast/node.scm 161 */
bool_t BgL_auxz00_7336;
BgL_auxz00_7336 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2916z00_5019, BGl_setqz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7336);} } 
}



/* make-setq */
BGL_EXPORTED_DEF BgL_setqz00_bglt BGl_makezd2setqzd2zzast_nodez00(obj_t BgL_loc2881z00_225, BgL_typez00_bglt BgL_type2882z00_226, BgL_varz00_bglt BgL_var2883z00_227, BgL_nodez00_bglt BgL_value2884z00_228)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_new2885z00_2806;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_res6043z00_2812;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_new2897z00_2807;
BgL_new2897z00_2807 = 
((BgL_setqz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setqz00_bgl) ))); 
{ /* ./Ast/node.scm 161 */
long BgL_arg4075z00_2808;
BgL_arg4075z00_2808 = 
BGl_classzd2numzd2zz__objectz00(BGl_setqz00zzast_nodez00); 
{ /* ./Ast/node.scm 161 */
BgL_objectz00_bglt BgL_objz00_2809;
BgL_objz00_2809 = 
(BgL_objectz00_bglt)(BgL_new2897z00_2807); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2809, BgL_arg4075z00_2808); } } 
{ /* ./Ast/node.scm 161 */
BgL_objectz00_bglt BgL_auxz00_7343;
BgL_auxz00_7343 = 
(BgL_objectz00_bglt)(BgL_new2897z00_2807); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7343, BFALSE); } 
{ /* ./Ast/node.scm 161 */
obj_t BgL_objz00_2811;
BgL_objz00_2811 = 
(obj_t)(BgL_new2897z00_2807); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2811); BUNSPEC; } 
BgL_res6043z00_2812 = BgL_new2897z00_2807; } 
BgL_new2885z00_2806 = BgL_res6043z00_2812; } 
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_res6044z00_2822;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_new2891z00_2813;
BgL_new2891z00_2813 = BgL_new2885z00_2806; 
{ /* ./Ast/node.scm 161 */
obj_t BgL_loc2887z00_2818;BgL_typez00_bglt BgL_type2888z00_2819;BgL_varz00_bglt BgL_var2889z00_2820;BgL_nodez00_bglt BgL_value2890z00_2821;
BgL_loc2887z00_2818 = BgL_loc2881z00_225; 
BgL_type2888z00_2819 = BgL_type2882z00_226; 
BgL_var2889z00_2820 = BgL_var2883z00_227; 
BgL_value2890z00_2821 = BgL_value2884z00_228; 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_2813))->BgL_locz00) = ((obj_t)BgL_loc2887z00_2818), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_2813))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2888z00_2819), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_2813))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var2889z00_2820), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_2813))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value2890z00_2821), BUNSPEC); 
BgL_res6044z00_2822 = BgL_new2891z00_2813; } } BgL_res6044z00_2822; } 
return BgL_new2885z00_2806;} } 
}



/* _make-setq6170 */
obj_t BGl__makezd2setq6170zd2zzast_nodez00(obj_t BgL_envz00_5020, obj_t BgL_loc2881z00_5021, obj_t BgL_type2882z00_5022, obj_t BgL_var2883z00_5023, obj_t BgL_value2884z00_5024)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_auxz00_7352;
BgL_auxz00_7352 = 
BGl_makezd2setqzd2zzast_nodez00(BgL_loc2881z00_5021, 
(BgL_typez00_bglt)(BgL_type2882z00_5022), 
(BgL_varz00_bglt)(BgL_var2883z00_5023), 
(BgL_nodez00_bglt)(BgL_value2884z00_5024)); 
return 
(obj_t)(BgL_auxz00_7352);} } 
}



/* fill-setq! */
BGL_EXPORTED_DEF BgL_setqz00_bglt BGl_fillzd2setqz12zc0zzast_nodez00(BgL_setqz00_bglt BgL_new2891z00_229, obj_t BgL_loc2887z00_230, BgL_typez00_bglt BgL_type2888z00_231, BgL_varz00_bglt BgL_var2889z00_232, BgL_nodez00_bglt BgL_value2890z00_233)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ /* ./Ast/node.scm 161 */
obj_t BgL_loc2887z00_5899;BgL_typez00_bglt BgL_type2888z00_5900;BgL_varz00_bglt BgL_var2889z00_5901;BgL_nodez00_bglt BgL_value2890z00_5902;
BgL_loc2887z00_5899 = BgL_loc2887z00_230; 
BgL_type2888z00_5900 = BgL_type2888z00_231; 
BgL_var2889z00_5901 = BgL_var2889z00_232; 
BgL_value2890z00_5902 = BgL_value2890z00_233; 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_229))->BgL_locz00) = ((obj_t)BgL_loc2887z00_5899), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_229))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2888z00_5900), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_229))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var2889z00_5901), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_229))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value2890z00_5902), BUNSPEC); 
return BgL_new2891z00_229;} } 
}



/* _fill-setq!6172 */
obj_t BGl__fillzd2setqz126172zc0zzast_nodez00(obj_t BgL_envz00_5025, obj_t BgL_new2891z00_5026, obj_t BgL_loc2887z00_5027, obj_t BgL_type2888z00_5028, obj_t BgL_var2889z00_5029, obj_t BgL_value2890z00_5030)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_auxz00_7362;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_res8053z00_5912;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_new2891z00_5903;BgL_typez00_bglt BgL_type2888z00_5905;BgL_varz00_bglt BgL_var2889z00_5906;BgL_nodez00_bglt BgL_value2890z00_5907;
BgL_new2891z00_5903 = 
(BgL_setqz00_bglt)(BgL_new2891z00_5026); 
BgL_type2888z00_5905 = 
(BgL_typez00_bglt)(BgL_type2888z00_5028); 
BgL_var2889z00_5906 = 
(BgL_varz00_bglt)(BgL_var2889z00_5029); 
BgL_value2890z00_5907 = 
(BgL_nodez00_bglt)(BgL_value2890z00_5030); 
{ /* ./Ast/node.scm 161 */
obj_t BgL_loc2887z00_5908;BgL_typez00_bglt BgL_type2888z00_5909;BgL_varz00_bglt BgL_var2889z00_5910;BgL_nodez00_bglt BgL_value2890z00_5911;
BgL_loc2887z00_5908 = BgL_loc2887z00_5027; 
BgL_type2888z00_5909 = BgL_type2888z00_5905; 
BgL_var2889z00_5910 = BgL_var2889z00_5906; 
BgL_value2890z00_5911 = BgL_value2890z00_5907; 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_5903))->BgL_locz00) = ((obj_t)BgL_loc2887z00_5908), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_5903))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2888z00_5909), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_5903))->BgL_varz00) = ((BgL_varz00_bglt)BgL_var2889z00_5910), BUNSPEC); 
((((BgL_setqz00_bglt)CREF(BgL_new2891z00_5903))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_value2890z00_5911), BUNSPEC); 
BgL_res8053z00_5912 = BgL_new2891z00_5903; } } 
BgL_auxz00_7362 = BgL_res8053z00_5912; } 
return 
(obj_t)(BgL_auxz00_7362);} } 
}



/* allocate-setq */
BGL_EXPORTED_DEF BgL_setqz00_bglt BGl_allocatezd2setqzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_new2897z00_5913;
BgL_new2897z00_5913 = 
((BgL_setqz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setqz00_bgl) ))); 
{ /* ./Ast/node.scm 161 */
long BgL_arg4075z00_5914;
BgL_arg4075z00_5914 = 
BGl_classzd2numzd2zz__objectz00(BGl_setqz00zzast_nodez00); 
{ /* ./Ast/node.scm 161 */
BgL_objectz00_bglt BgL_objz00_5915;
BgL_objz00_5915 = 
(BgL_objectz00_bglt)(BgL_new2897z00_5913); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5915, BgL_arg4075z00_5914); } } 
{ /* ./Ast/node.scm 161 */
BgL_objectz00_bglt BgL_auxz00_7376;
BgL_auxz00_7376 = 
(BgL_objectz00_bglt)(BgL_new2897z00_5913); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7376, BFALSE); } 
{ /* ./Ast/node.scm 161 */
obj_t BgL_objz00_5916;
BgL_objz00_5916 = 
(obj_t)(BgL_new2897z00_5913); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5916); BUNSPEC; } 
return BgL_new2897z00_5913;} } 
}



/* _allocate-setq */
obj_t BGl__allocatezd2setqzd2zzast_nodez00(obj_t BgL_envz00_4849)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_auxz00_7381;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_res8054z00_5921;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_new2897z00_5917;
BgL_new2897z00_5917 = 
((BgL_setqz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setqz00_bgl) ))); 
{ /* ./Ast/node.scm 161 */
long BgL_arg4075z00_5918;
BgL_arg4075z00_5918 = 
BGl_classzd2numzd2zz__objectz00(BGl_setqz00zzast_nodez00); 
{ /* ./Ast/node.scm 161 */
BgL_objectz00_bglt BgL_objz00_5919;
BgL_objz00_5919 = 
(BgL_objectz00_bglt)(BgL_new2897z00_5917); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5919, BgL_arg4075z00_5918); } } 
{ /* ./Ast/node.scm 161 */
BgL_objectz00_bglt BgL_auxz00_7386;
BgL_auxz00_7386 = 
(BgL_objectz00_bglt)(BgL_new2897z00_5917); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7386, BFALSE); } 
{ /* ./Ast/node.scm 161 */
obj_t BgL_objz00_5920;
BgL_objz00_5920 = 
(obj_t)(BgL_new2897z00_5917); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5920); BUNSPEC; } 
BgL_res8054z00_5921 = BgL_new2897z00_5917; } 
BgL_auxz00_7381 = BgL_res8054z00_5921; } 
return 
(obj_t)(BgL_auxz00_7381);} } 
}



/* cast? */
BGL_EXPORTED_DEF bool_t BGl_castzf3zf3zzast_nodez00(obj_t BgL_obj2870z00_240)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2870z00_240, BGl_castz00zzast_nodez00);} 
}



/* _cast? */
obj_t BGl__castzf3zf3zzast_nodez00(obj_t BgL_envz00_5031, obj_t BgL_obj2870z00_5032)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ /* ./Ast/node.scm 156 */
bool_t BgL_auxz00_7393;
BgL_auxz00_7393 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2870z00_5032, BGl_castz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7393);} } 
}



/* make-cast */
BGL_EXPORTED_DEF BgL_castz00_bglt BGl_makezd2castzd2zzast_nodez00(obj_t BgL_loc2842z00_244, BgL_typez00_bglt BgL_type2843z00_245, BgL_nodez00_bglt BgL_arg2844z00_246)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_new2845z00_2832;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_res6045z00_2838;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_new2855z00_2833;
BgL_new2855z00_2833 = 
((BgL_castz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_castz00_bgl) ))); 
{ /* ./Ast/node.scm 156 */
long BgL_arg4084z00_2834;
BgL_arg4084z00_2834 = 
BGl_classzd2numzd2zz__objectz00(BGl_castz00zzast_nodez00); 
{ /* ./Ast/node.scm 156 */
BgL_objectz00_bglt BgL_objz00_2835;
BgL_objz00_2835 = 
(BgL_objectz00_bglt)(BgL_new2855z00_2833); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2835, BgL_arg4084z00_2834); } } 
{ /* ./Ast/node.scm 156 */
BgL_objectz00_bglt BgL_auxz00_7400;
BgL_auxz00_7400 = 
(BgL_objectz00_bglt)(BgL_new2855z00_2833); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7400, BFALSE); } 
{ /* ./Ast/node.scm 156 */
obj_t BgL_objz00_2837;
BgL_objz00_2837 = 
(obj_t)(BgL_new2855z00_2833); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2837); BUNSPEC; } 
BgL_res6045z00_2838 = BgL_new2855z00_2833; } 
BgL_new2845z00_2832 = BgL_res6045z00_2838; } 
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_res6046z00_2846;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_new2850z00_2839;
BgL_new2850z00_2839 = BgL_new2845z00_2832; 
{ /* ./Ast/node.scm 156 */
obj_t BgL_loc2847z00_2843;BgL_typez00_bglt BgL_type2848z00_2844;BgL_nodez00_bglt BgL_arg2849z00_2845;
BgL_loc2847z00_2843 = BgL_loc2842z00_244; 
BgL_type2848z00_2844 = BgL_type2843z00_245; 
BgL_arg2849z00_2845 = BgL_arg2844z00_246; 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_2839))->BgL_locz00) = ((obj_t)BgL_loc2847z00_2843), BUNSPEC); 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_2839))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2848z00_2844), BUNSPEC); 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_2839))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_arg2849z00_2845), BUNSPEC); 
BgL_res6046z00_2846 = BgL_new2850z00_2839; } } BgL_res6046z00_2846; } 
return BgL_new2845z00_2832;} } 
}



/* _make-cast6175 */
obj_t BGl__makezd2cast6175zd2zzast_nodez00(obj_t BgL_envz00_5033, obj_t BgL_loc2842z00_5034, obj_t BgL_type2843z00_5035, obj_t BgL_arg2844z00_5036)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_auxz00_7408;
BgL_auxz00_7408 = 
BGl_makezd2castzd2zzast_nodez00(BgL_loc2842z00_5034, 
(BgL_typez00_bglt)(BgL_type2843z00_5035), 
(BgL_nodez00_bglt)(BgL_arg2844z00_5036)); 
return 
(obj_t)(BgL_auxz00_7408);} } 
}



/* fill-cast! */
BGL_EXPORTED_DEF BgL_castz00_bglt BGl_fillzd2castz12zc0zzast_nodez00(BgL_castz00_bglt BgL_new2850z00_247, obj_t BgL_loc2847z00_248, BgL_typez00_bglt BgL_type2848z00_249, BgL_nodez00_bglt BgL_arg2849z00_250)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ /* ./Ast/node.scm 156 */
obj_t BgL_loc2847z00_5923;BgL_typez00_bglt BgL_type2848z00_5924;BgL_nodez00_bglt BgL_arg2849z00_5925;
BgL_loc2847z00_5923 = BgL_loc2847z00_248; 
BgL_type2848z00_5924 = BgL_type2848z00_249; 
BgL_arg2849z00_5925 = BgL_arg2849z00_250; 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_247))->BgL_locz00) = ((obj_t)BgL_loc2847z00_5923), BUNSPEC); 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_247))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2848z00_5924), BUNSPEC); 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_247))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_arg2849z00_5925), BUNSPEC); 
return BgL_new2850z00_247;} } 
}



/* _fill-cast!6177 */
obj_t BGl__fillzd2castz126177zc0zzast_nodez00(obj_t BgL_envz00_5037, obj_t BgL_new2850z00_5038, obj_t BgL_loc2847z00_5039, obj_t BgL_type2848z00_5040, obj_t BgL_arg2849z00_5041)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_auxz00_7416;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_res8055z00_5933;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_new2850z00_5926;BgL_typez00_bglt BgL_type2848z00_5928;BgL_nodez00_bglt BgL_arg2849z00_5929;
BgL_new2850z00_5926 = 
(BgL_castz00_bglt)(BgL_new2850z00_5038); 
BgL_type2848z00_5928 = 
(BgL_typez00_bglt)(BgL_type2848z00_5040); 
BgL_arg2849z00_5929 = 
(BgL_nodez00_bglt)(BgL_arg2849z00_5041); 
{ /* ./Ast/node.scm 156 */
obj_t BgL_loc2847z00_5930;BgL_typez00_bglt BgL_type2848z00_5931;BgL_nodez00_bglt BgL_arg2849z00_5932;
BgL_loc2847z00_5930 = BgL_loc2847z00_5039; 
BgL_type2848z00_5931 = BgL_type2848z00_5928; 
BgL_arg2849z00_5932 = BgL_arg2849z00_5929; 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_5926))->BgL_locz00) = ((obj_t)BgL_loc2847z00_5930), BUNSPEC); 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_5926))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2848z00_5931), BUNSPEC); 
((((BgL_castz00_bglt)CREF(BgL_new2850z00_5926))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_arg2849z00_5932), BUNSPEC); 
BgL_res8055z00_5933 = BgL_new2850z00_5926; } } 
BgL_auxz00_7416 = BgL_res8055z00_5933; } 
return 
(obj_t)(BgL_auxz00_7416);} } 
}



/* allocate-cast */
BGL_EXPORTED_DEF BgL_castz00_bglt BGl_allocatezd2castzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_new2855z00_5934;
BgL_new2855z00_5934 = 
((BgL_castz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_castz00_bgl) ))); 
{ /* ./Ast/node.scm 156 */
long BgL_arg4084z00_5935;
BgL_arg4084z00_5935 = 
BGl_classzd2numzd2zz__objectz00(BGl_castz00zzast_nodez00); 
{ /* ./Ast/node.scm 156 */
BgL_objectz00_bglt BgL_objz00_5936;
BgL_objz00_5936 = 
(BgL_objectz00_bglt)(BgL_new2855z00_5934); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5936, BgL_arg4084z00_5935); } } 
{ /* ./Ast/node.scm 156 */
BgL_objectz00_bglt BgL_auxz00_7428;
BgL_auxz00_7428 = 
(BgL_objectz00_bglt)(BgL_new2855z00_5934); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7428, BFALSE); } 
{ /* ./Ast/node.scm 156 */
obj_t BgL_objz00_5937;
BgL_objz00_5937 = 
(obj_t)(BgL_new2855z00_5934); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5937); BUNSPEC; } 
return BgL_new2855z00_5934;} } 
}



/* _allocate-cast */
obj_t BGl__allocatezd2castzd2zzast_nodez00(obj_t BgL_envz00_4848)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_auxz00_7433;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_res8056z00_5942;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_new2855z00_5938;
BgL_new2855z00_5938 = 
((BgL_castz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_castz00_bgl) ))); 
{ /* ./Ast/node.scm 156 */
long BgL_arg4084z00_5939;
BgL_arg4084z00_5939 = 
BGl_classzd2numzd2zz__objectz00(BGl_castz00zzast_nodez00); 
{ /* ./Ast/node.scm 156 */
BgL_objectz00_bglt BgL_objz00_5940;
BgL_objz00_5940 = 
(BgL_objectz00_bglt)(BgL_new2855z00_5938); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5940, BgL_arg4084z00_5939); } } 
{ /* ./Ast/node.scm 156 */
BgL_objectz00_bglt BgL_auxz00_7438;
BgL_auxz00_7438 = 
(BgL_objectz00_bglt)(BgL_new2855z00_5938); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7438, BFALSE); } 
{ /* ./Ast/node.scm 156 */
obj_t BgL_objz00_5941;
BgL_objz00_5941 = 
(obj_t)(BgL_new2855z00_5938); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5941); BUNSPEC; } 
BgL_res8056z00_5942 = BgL_new2855z00_5938; } 
BgL_auxz00_7433 = BgL_res8056z00_5942; } 
return 
(obj_t)(BgL_auxz00_7433);} } 
}



/* isa? */
BGL_EXPORTED_DEF bool_t BGl_isazf3zf3zzast_nodez00(obj_t BgL_obj2834z00_254)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2834z00_254, BGl_isaz00zzast_nodez00);} 
}



/* _isa? */
obj_t BGl__isazf3zf3zzast_nodez00(obj_t BgL_envz00_5042, obj_t BgL_obj2834z00_5043)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ /* ./Ast/node.scm 152 */
bool_t BgL_auxz00_7445;
BgL_auxz00_7445 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2834z00_5043, BGl_isaz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7445);} } 
}



/* make-isa */
BGL_EXPORTED_DEF BgL_isaz00_bglt BGl_makezd2isazd2zzast_nodez00(obj_t BgL_loc2778z00_258, BgL_typez00_bglt BgL_type2779z00_259, obj_t BgL_sidezd2effectzf32780z21_260, obj_t BgL_key2781z00_261, obj_t BgL_exprza22782za2_262, obj_t BgL_effect2783z00_263, BgL_typez00_bglt BgL_class2784z00_264)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_new2785z00_2855;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_res6047z00_2861;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_new2803z00_2856;
BgL_new2803z00_2856 = 
((BgL_isaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_isaz00_bgl) ))); 
{ /* ./Ast/node.scm 152 */
long BgL_arg4093z00_2857;
BgL_arg4093z00_2857 = 
BGl_classzd2numzd2zz__objectz00(BGl_isaz00zzast_nodez00); 
{ /* ./Ast/node.scm 152 */
BgL_objectz00_bglt BgL_objz00_2858;
BgL_objz00_2858 = 
(BgL_objectz00_bglt)(BgL_new2803z00_2856); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2858, BgL_arg4093z00_2857); } } 
{ /* ./Ast/node.scm 152 */
BgL_objectz00_bglt BgL_auxz00_7452;
BgL_auxz00_7452 = 
(BgL_objectz00_bglt)(BgL_new2803z00_2856); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7452, BFALSE); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_objz00_2860;
BgL_objz00_2860 = 
(obj_t)(BgL_new2803z00_2856); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2860); BUNSPEC; } 
BgL_res6047z00_2861 = BgL_new2803z00_2856; } 
BgL_new2785z00_2855 = BgL_res6047z00_2861; } 
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_res6048z00_2877;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_new2794z00_2862;
BgL_new2794z00_2862 = BgL_new2785z00_2855; 
{ /* ./Ast/node.scm 152 */
obj_t BgL_loc2787z00_2870;BgL_typez00_bglt BgL_type2788z00_2871;obj_t BgL_sidezd2effectzf32789z21_2872;obj_t BgL_key2790z00_2873;obj_t BgL_exprza22791za2_2874;obj_t BgL_effect2792z00_2875;BgL_typez00_bglt BgL_class2793z00_2876;
BgL_loc2787z00_2870 = BgL_loc2778z00_258; 
BgL_type2788z00_2871 = BgL_type2779z00_259; 
BgL_sidezd2effectzf32789z21_2872 = BgL_sidezd2effectzf32780z21_260; 
BgL_key2790z00_2873 = BgL_key2781z00_261; 
BgL_exprza22791za2_2874 = BgL_exprza22782za2_262; 
BgL_effect2792z00_2875 = BgL_effect2783z00_263; 
BgL_class2793z00_2876 = BgL_class2784z00_264; 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_2862))->BgL_locz00) = ((obj_t)BgL_loc2787z00_2870), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_2862))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2788z00_2871), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_2862))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32789z21_2872), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_2862))->BgL_keyz00) = ((obj_t)BgL_key2790z00_2873), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_2862))->BgL_exprza2za2) = ((obj_t)BgL_exprza22791za2_2874), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_2862))->BgL_effectz00) = ((obj_t)BgL_effect2792z00_2875), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_2862))->BgL_classz00) = ((BgL_typez00_bglt)BgL_class2793z00_2876), BUNSPEC); 
BgL_res6048z00_2877 = BgL_new2794z00_2862; } } BgL_res6048z00_2877; } 
return BgL_new2785z00_2855;} } 
}



/* _make-isa6180 */
obj_t BGl__makezd2isa6180zd2zzast_nodez00(obj_t BgL_envz00_5044, obj_t BgL_loc2778z00_5045, obj_t BgL_type2779z00_5046, obj_t BgL_sidezd2effectzf32780z21_5047, obj_t BgL_key2781z00_5048, obj_t BgL_exprza22782za2_5049, obj_t BgL_effect2783z00_5050, obj_t BgL_class2784z00_5051)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_auxz00_7464;
BgL_auxz00_7464 = 
BGl_makezd2isazd2zzast_nodez00(BgL_loc2778z00_5045, 
(BgL_typez00_bglt)(BgL_type2779z00_5046), BgL_sidezd2effectzf32780z21_5047, BgL_key2781z00_5048, BgL_exprza22782za2_5049, BgL_effect2783z00_5050, 
(BgL_typez00_bglt)(BgL_class2784z00_5051)); 
return 
(obj_t)(BgL_auxz00_7464);} } 
}



/* fill-isa! */
BGL_EXPORTED_DEF BgL_isaz00_bglt BGl_fillzd2isaz12zc0zzast_nodez00(BgL_isaz00_bglt BgL_new2794z00_265, obj_t BgL_loc2787z00_266, BgL_typez00_bglt BgL_type2788z00_267, obj_t BgL_sidezd2effectzf32789z21_268, obj_t BgL_key2790z00_269, obj_t BgL_exprza22791za2_270, obj_t BgL_effect2792z00_271, BgL_typez00_bglt BgL_class2793z00_272)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ /* ./Ast/node.scm 152 */
obj_t BgL_loc2787z00_5944;BgL_typez00_bglt BgL_type2788z00_5945;obj_t BgL_sidezd2effectzf32789z21_5946;obj_t BgL_key2790z00_5947;obj_t BgL_exprza22791za2_5948;obj_t BgL_effect2792z00_5949;BgL_typez00_bglt BgL_class2793z00_5950;
BgL_loc2787z00_5944 = BgL_loc2787z00_266; 
BgL_type2788z00_5945 = BgL_type2788z00_267; 
BgL_sidezd2effectzf32789z21_5946 = BgL_sidezd2effectzf32789z21_268; 
BgL_key2790z00_5947 = BgL_key2790z00_269; 
BgL_exprza22791za2_5948 = BgL_exprza22791za2_270; 
BgL_effect2792z00_5949 = BgL_effect2792z00_271; 
BgL_class2793z00_5950 = BgL_class2793z00_272; 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_265))->BgL_locz00) = ((obj_t)BgL_loc2787z00_5944), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_265))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2788z00_5945), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_265))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32789z21_5946), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_265))->BgL_keyz00) = ((obj_t)BgL_key2790z00_5947), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_265))->BgL_exprza2za2) = ((obj_t)BgL_exprza22791za2_5948), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_265))->BgL_effectz00) = ((obj_t)BgL_effect2792z00_5949), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_265))->BgL_classz00) = ((BgL_typez00_bglt)BgL_class2793z00_5950), BUNSPEC); 
return BgL_new2794z00_265;} } 
}



/* _fill-isa!6182 */
obj_t BGl__fillzd2isaz126182zc0zzast_nodez00(obj_t BgL_envz00_5052, obj_t BgL_new2794z00_5053, obj_t BgL_loc2787z00_5054, obj_t BgL_type2788z00_5055, obj_t BgL_sidezd2effectzf32789z21_5056, obj_t BgL_key2790z00_5057, obj_t BgL_exprza22791za2_5058, obj_t BgL_effect2792z00_5059, obj_t BgL_class2793z00_5060)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_auxz00_7476;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_res8057z00_5966;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_new2794z00_5951;BgL_typez00_bglt BgL_type2788z00_5953;BgL_typez00_bglt BgL_class2793z00_5958;
BgL_new2794z00_5951 = 
(BgL_isaz00_bglt)(BgL_new2794z00_5053); 
BgL_type2788z00_5953 = 
(BgL_typez00_bglt)(BgL_type2788z00_5055); 
BgL_class2793z00_5958 = 
(BgL_typez00_bglt)(BgL_class2793z00_5060); 
{ /* ./Ast/node.scm 152 */
obj_t BgL_loc2787z00_5959;BgL_typez00_bglt BgL_type2788z00_5960;obj_t BgL_sidezd2effectzf32789z21_5961;obj_t BgL_key2790z00_5962;obj_t BgL_exprza22791za2_5963;obj_t BgL_effect2792z00_5964;BgL_typez00_bglt BgL_class2793z00_5965;
BgL_loc2787z00_5959 = BgL_loc2787z00_5054; 
BgL_type2788z00_5960 = BgL_type2788z00_5953; 
BgL_sidezd2effectzf32789z21_5961 = BgL_sidezd2effectzf32789z21_5056; 
BgL_key2790z00_5962 = BgL_key2790z00_5057; 
BgL_exprza22791za2_5963 = BgL_exprza22791za2_5058; 
BgL_effect2792z00_5964 = BgL_effect2792z00_5059; 
BgL_class2793z00_5965 = BgL_class2793z00_5958; 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_5951))->BgL_locz00) = ((obj_t)BgL_loc2787z00_5959), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_5951))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2788z00_5960), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_5951))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32789z21_5961), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_5951))->BgL_keyz00) = ((obj_t)BgL_key2790z00_5962), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_5951))->BgL_exprza2za2) = ((obj_t)BgL_exprza22791za2_5963), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_5951))->BgL_effectz00) = ((obj_t)BgL_effect2792z00_5964), BUNSPEC); 
((((BgL_isaz00_bglt)CREF(BgL_new2794z00_5951))->BgL_classz00) = ((BgL_typez00_bglt)BgL_class2793z00_5965), BUNSPEC); 
BgL_res8057z00_5966 = BgL_new2794z00_5951; } } 
BgL_auxz00_7476 = BgL_res8057z00_5966; } 
return 
(obj_t)(BgL_auxz00_7476);} } 
}



/* allocate-isa */
BGL_EXPORTED_DEF BgL_isaz00_bglt BGl_allocatezd2isazd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_new2803z00_5967;
BgL_new2803z00_5967 = 
((BgL_isaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_isaz00_bgl) ))); 
{ /* ./Ast/node.scm 152 */
long BgL_arg4093z00_5968;
BgL_arg4093z00_5968 = 
BGl_classzd2numzd2zz__objectz00(BGl_isaz00zzast_nodez00); 
{ /* ./Ast/node.scm 152 */
BgL_objectz00_bglt BgL_objz00_5969;
BgL_objz00_5969 = 
(BgL_objectz00_bglt)(BgL_new2803z00_5967); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5969, BgL_arg4093z00_5968); } } 
{ /* ./Ast/node.scm 152 */
BgL_objectz00_bglt BgL_auxz00_7492;
BgL_auxz00_7492 = 
(BgL_objectz00_bglt)(BgL_new2803z00_5967); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7492, BFALSE); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_objz00_5970;
BgL_objz00_5970 = 
(obj_t)(BgL_new2803z00_5967); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5970); BUNSPEC; } 
return BgL_new2803z00_5967;} } 
}



/* _allocate-isa */
obj_t BGl__allocatezd2isazd2zzast_nodez00(obj_t BgL_envz00_4847)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_auxz00_7497;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_res8058z00_5975;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_new2803z00_5971;
BgL_new2803z00_5971 = 
((BgL_isaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_isaz00_bgl) ))); 
{ /* ./Ast/node.scm 152 */
long BgL_arg4093z00_5972;
BgL_arg4093z00_5972 = 
BGl_classzd2numzd2zz__objectz00(BGl_isaz00zzast_nodez00); 
{ /* ./Ast/node.scm 152 */
BgL_objectz00_bglt BgL_objz00_5973;
BgL_objz00_5973 = 
(BgL_objectz00_bglt)(BgL_new2803z00_5971); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_5973, BgL_arg4093z00_5972); } } 
{ /* ./Ast/node.scm 152 */
BgL_objectz00_bglt BgL_auxz00_7502;
BgL_auxz00_7502 = 
(BgL_objectz00_bglt)(BgL_new2803z00_5971); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7502, BFALSE); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_objz00_5974;
BgL_objz00_5974 = 
(obj_t)(BgL_new2803z00_5971); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_5974); BUNSPEC; } 
BgL_res8058z00_5975 = BgL_new2803z00_5971; } 
BgL_auxz00_7497 = BgL_res8058z00_5975; } 
return 
(obj_t)(BgL_auxz00_7497);} } 
}



/* vlength? */
BGL_EXPORTED_DEF bool_t BGl_vlengthzf3zf3zzast_nodez00(obj_t BgL_obj2759z00_274)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2759z00_274, BGl_vlengthz00zzast_nodez00);} 
}



/* _vlength? */
obj_t BGl__vlengthzf3zf3zzast_nodez00(obj_t BgL_envz00_5061, obj_t BgL_obj2759z00_5062)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ /* ./Ast/node.scm 145 */
bool_t BgL_auxz00_7509;
BgL_auxz00_7509 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2759z00_5062, BGl_vlengthz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7509);} } 
}



/* make-vlength */
BGL_EXPORTED_DEF BgL_vlengthz00_bglt BGl_makezd2vlengthzd2zzast_nodez00(obj_t BgL_loc2696z00_278, BgL_typez00_bglt BgL_type2697z00_279, obj_t BgL_sidezd2effectzf32698z21_280, obj_t BgL_key2699z00_281, obj_t BgL_exprza22700za2_282, obj_t BgL_effect2701z00_283, obj_t BgL_czd2format2702zd2_284, BgL_typez00_bglt BgL_vtype2703z00_285)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_new2704z00_2890;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_res6049z00_2896;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_new2724z00_2891;
BgL_new2724z00_2891 = 
((BgL_vlengthz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vlengthz00_bgl) ))); 
{ /* ./Ast/node.scm 145 */
long BgL_arg4102z00_2892;
BgL_arg4102z00_2892 = 
BGl_classzd2numzd2zz__objectz00(BGl_vlengthz00zzast_nodez00); 
{ /* ./Ast/node.scm 145 */
BgL_objectz00_bglt BgL_objz00_2893;
BgL_objz00_2893 = 
(BgL_objectz00_bglt)(BgL_new2724z00_2891); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2893, BgL_arg4102z00_2892); } } 
{ /* ./Ast/node.scm 145 */
BgL_objectz00_bglt BgL_auxz00_7516;
BgL_auxz00_7516 = 
(BgL_objectz00_bglt)(BgL_new2724z00_2891); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7516, BFALSE); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_objz00_2895;
BgL_objz00_2895 = 
(obj_t)(BgL_new2724z00_2891); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2895); BUNSPEC; } 
BgL_res6049z00_2896 = BgL_new2724z00_2891; } 
BgL_new2704z00_2890 = BgL_res6049z00_2896; } 
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_res6050z00_2914;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_new2714z00_2897;
BgL_new2714z00_2897 = BgL_new2704z00_2890; 
{ /* ./Ast/node.scm 145 */
obj_t BgL_loc2706z00_2906;BgL_typez00_bglt BgL_type2707z00_2907;obj_t BgL_sidezd2effectzf32708z21_2908;obj_t BgL_key2709z00_2909;obj_t BgL_exprza22710za2_2910;obj_t BgL_effect2711z00_2911;obj_t BgL_czd2format2712zd2_2912;BgL_typez00_bglt BgL_vtype2713z00_2913;
BgL_loc2706z00_2906 = BgL_loc2696z00_278; 
BgL_type2707z00_2907 = BgL_type2697z00_279; 
BgL_sidezd2effectzf32708z21_2908 = BgL_sidezd2effectzf32698z21_280; 
BgL_key2709z00_2909 = BgL_key2699z00_281; 
BgL_exprza22710za2_2910 = BgL_exprza22700za2_282; 
BgL_effect2711z00_2911 = BgL_effect2701z00_283; 
BgL_czd2format2712zd2_2912 = BgL_czd2format2702zd2_284; 
BgL_vtype2713z00_2913 = BgL_vtype2703z00_285; 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_locz00) = ((obj_t)BgL_loc2706z00_2906), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2707z00_2907), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32708z21_2908), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_keyz00) = ((obj_t)BgL_key2709z00_2909), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_exprza2za2) = ((obj_t)BgL_exprza22710za2_2910), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_effectz00) = ((obj_t)BgL_effect2711z00_2911), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2712zd2_2912), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_2897))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2713z00_2913), BUNSPEC); 
BgL_res6050z00_2914 = BgL_new2714z00_2897; } } BgL_res6050z00_2914; } 
return BgL_new2704z00_2890;} } 
}



/* _make-vlength6185 */
obj_t BGl__makezd2vlength6185zd2zzast_nodez00(obj_t BgL_envz00_5063, obj_t BgL_loc2696z00_5064, obj_t BgL_type2697z00_5065, obj_t BgL_sidezd2effectzf32698z21_5066, obj_t BgL_key2699z00_5067, obj_t BgL_exprza22700za2_5068, obj_t BgL_effect2701z00_5069, obj_t BgL_czd2format2702zd2_5070, obj_t BgL_vtype2703z00_5071)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_auxz00_7529;
BgL_auxz00_7529 = 
BGl_makezd2vlengthzd2zzast_nodez00(BgL_loc2696z00_5064, 
(BgL_typez00_bglt)(BgL_type2697z00_5065), BgL_sidezd2effectzf32698z21_5066, BgL_key2699z00_5067, BgL_exprza22700za2_5068, BgL_effect2701z00_5069, BgL_czd2format2702zd2_5070, 
(BgL_typez00_bglt)(BgL_vtype2703z00_5071)); 
return 
(obj_t)(BgL_auxz00_7529);} } 
}



/* fill-vlength! */
BGL_EXPORTED_DEF BgL_vlengthz00_bglt BGl_fillzd2vlengthz12zc0zzast_nodez00(BgL_vlengthz00_bglt BgL_new2714z00_286, obj_t BgL_loc2706z00_287, BgL_typez00_bglt BgL_type2707z00_288, obj_t BgL_sidezd2effectzf32708z21_289, obj_t BgL_key2709z00_290, obj_t BgL_exprza22710za2_291, obj_t BgL_effect2711z00_292, obj_t BgL_czd2format2712zd2_293, BgL_typez00_bglt BgL_vtype2713z00_294)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ /* ./Ast/node.scm 145 */
obj_t BgL_loc2706z00_5977;BgL_typez00_bglt BgL_type2707z00_5978;obj_t BgL_sidezd2effectzf32708z21_5979;obj_t BgL_key2709z00_5980;obj_t BgL_exprza22710za2_5981;obj_t BgL_effect2711z00_5982;obj_t BgL_czd2format2712zd2_5983;BgL_typez00_bglt BgL_vtype2713z00_5984;
BgL_loc2706z00_5977 = BgL_loc2706z00_287; 
BgL_type2707z00_5978 = BgL_type2707z00_288; 
BgL_sidezd2effectzf32708z21_5979 = BgL_sidezd2effectzf32708z21_289; 
BgL_key2709z00_5980 = BgL_key2709z00_290; 
BgL_exprza22710za2_5981 = BgL_exprza22710za2_291; 
BgL_effect2711z00_5982 = BgL_effect2711z00_292; 
BgL_czd2format2712zd2_5983 = BgL_czd2format2712zd2_293; 
BgL_vtype2713z00_5984 = BgL_vtype2713z00_294; 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_locz00) = ((obj_t)BgL_loc2706z00_5977), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2707z00_5978), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32708z21_5979), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_keyz00) = ((obj_t)BgL_key2709z00_5980), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_exprza2za2) = ((obj_t)BgL_exprza22710za2_5981), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_effectz00) = ((obj_t)BgL_effect2711z00_5982), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2712zd2_5983), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_286))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2713z00_5984), BUNSPEC); 
return BgL_new2714z00_286;} } 
}



/* _fill-vlength!6187 */
obj_t BGl__fillzd2vlengthz126187zc0zzast_nodez00(obj_t BgL_envz00_5072, obj_t BgL_new2714z00_5073, obj_t BgL_loc2706z00_5074, obj_t BgL_type2707z00_5075, obj_t BgL_sidezd2effectzf32708z21_5076, obj_t BgL_key2709z00_5077, obj_t BgL_exprza22710za2_5078, obj_t BgL_effect2711z00_5079, obj_t BgL_czd2format2712zd2_5080, obj_t BgL_vtype2713z00_5081)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_auxz00_7542;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_res8059z00_6002;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_new2714z00_5985;BgL_typez00_bglt BgL_type2707z00_5987;BgL_typez00_bglt BgL_vtype2713z00_5993;
BgL_new2714z00_5985 = 
(BgL_vlengthz00_bglt)(BgL_new2714z00_5073); 
BgL_type2707z00_5987 = 
(BgL_typez00_bglt)(BgL_type2707z00_5075); 
BgL_vtype2713z00_5993 = 
(BgL_typez00_bglt)(BgL_vtype2713z00_5081); 
{ /* ./Ast/node.scm 145 */
obj_t BgL_loc2706z00_5994;BgL_typez00_bglt BgL_type2707z00_5995;obj_t BgL_sidezd2effectzf32708z21_5996;obj_t BgL_key2709z00_5997;obj_t BgL_exprza22710za2_5998;obj_t BgL_effect2711z00_5999;obj_t BgL_czd2format2712zd2_6000;BgL_typez00_bglt BgL_vtype2713z00_6001;
BgL_loc2706z00_5994 = BgL_loc2706z00_5074; 
BgL_type2707z00_5995 = BgL_type2707z00_5987; 
BgL_sidezd2effectzf32708z21_5996 = BgL_sidezd2effectzf32708z21_5076; 
BgL_key2709z00_5997 = BgL_key2709z00_5077; 
BgL_exprza22710za2_5998 = BgL_exprza22710za2_5078; 
BgL_effect2711z00_5999 = BgL_effect2711z00_5079; 
BgL_czd2format2712zd2_6000 = BgL_czd2format2712zd2_5080; 
BgL_vtype2713z00_6001 = BgL_vtype2713z00_5993; 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_locz00) = ((obj_t)BgL_loc2706z00_5994), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2707z00_5995), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32708z21_5996), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_keyz00) = ((obj_t)BgL_key2709z00_5997), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_exprza2za2) = ((obj_t)BgL_exprza22710za2_5998), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_effectz00) = ((obj_t)BgL_effect2711z00_5999), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2712zd2_6000), BUNSPEC); 
((((BgL_vlengthz00_bglt)CREF(BgL_new2714z00_5985))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2713z00_6001), BUNSPEC); 
BgL_res8059z00_6002 = BgL_new2714z00_5985; } } 
BgL_auxz00_7542 = BgL_res8059z00_6002; } 
return 
(obj_t)(BgL_auxz00_7542);} } 
}



/* allocate-vlength */
BGL_EXPORTED_DEF BgL_vlengthz00_bglt BGl_allocatezd2vlengthzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_new2724z00_6003;
BgL_new2724z00_6003 = 
((BgL_vlengthz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vlengthz00_bgl) ))); 
{ /* ./Ast/node.scm 145 */
long BgL_arg4102z00_6004;
BgL_arg4102z00_6004 = 
BGl_classzd2numzd2zz__objectz00(BGl_vlengthz00zzast_nodez00); 
{ /* ./Ast/node.scm 145 */
BgL_objectz00_bglt BgL_objz00_6005;
BgL_objz00_6005 = 
(BgL_objectz00_bglt)(BgL_new2724z00_6003); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6005, BgL_arg4102z00_6004); } } 
{ /* ./Ast/node.scm 145 */
BgL_objectz00_bglt BgL_auxz00_7559;
BgL_auxz00_7559 = 
(BgL_objectz00_bglt)(BgL_new2724z00_6003); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7559, BFALSE); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_objz00_6006;
BgL_objz00_6006 = 
(obj_t)(BgL_new2724z00_6003); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6006); BUNSPEC; } 
return BgL_new2724z00_6003;} } 
}



/* _allocate-vlength */
obj_t BGl__allocatezd2vlengthzd2zzast_nodez00(obj_t BgL_envz00_4846)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_auxz00_7564;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_res8060z00_6011;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_new2724z00_6007;
BgL_new2724z00_6007 = 
((BgL_vlengthz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vlengthz00_bgl) ))); 
{ /* ./Ast/node.scm 145 */
long BgL_arg4102z00_6008;
BgL_arg4102z00_6008 = 
BGl_classzd2numzd2zz__objectz00(BGl_vlengthz00zzast_nodez00); 
{ /* ./Ast/node.scm 145 */
BgL_objectz00_bglt BgL_objz00_6009;
BgL_objz00_6009 = 
(BgL_objectz00_bglt)(BgL_new2724z00_6007); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6009, BgL_arg4102z00_6008); } } 
{ /* ./Ast/node.scm 145 */
BgL_objectz00_bglt BgL_auxz00_7569;
BgL_auxz00_7569 = 
(BgL_objectz00_bglt)(BgL_new2724z00_6007); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7569, BFALSE); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_objz00_6010;
BgL_objz00_6010 = 
(obj_t)(BgL_new2724z00_6007); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6010); BUNSPEC; } 
BgL_res8060z00_6011 = BgL_new2724z00_6007; } 
BgL_auxz00_7564 = BgL_res8060z00_6011; } 
return 
(obj_t)(BgL_auxz00_7564);} } 
}



/* vset!? */
BGL_EXPORTED_DEF bool_t BGl_vsetz12zf3ze1zzast_nodez00(obj_t BgL_obj2674z00_297)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2674z00_297, BGl_vsetz12z12zzast_nodez00);} 
}



/* _vset!? */
obj_t BGl__vsetz12zf3ze1zzast_nodez00(obj_t BgL_envz00_5082, obj_t BgL_obj2674z00_5083)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ /* ./Ast/node.scm 134 */
bool_t BgL_auxz00_7576;
BgL_auxz00_7576 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2674z00_5083, BGl_vsetz12z12zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7576);} } 
}



/* make-vset! */
BGL_EXPORTED_DEF BgL_vsetz12z12_bglt BGl_makezd2vsetz12zc0zzast_nodez00(obj_t BgL_loc2597z00_301, BgL_typez00_bglt BgL_type2598z00_302, obj_t BgL_sidezd2effectzf32599z21_303, obj_t BgL_key2600z00_304, obj_t BgL_exprza22601za2_305, obj_t BgL_effect2602z00_306, obj_t BgL_czd2format2603zd2_307, BgL_typez00_bglt BgL_ftype2604z00_308, BgL_typez00_bglt BgL_otype2605z00_309, BgL_typez00_bglt BgL_vtype2606z00_310)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_new2607z00_2928;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_res6051z00_2934;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_new2631z00_2929;
BgL_new2631z00_2929 = 
((BgL_vsetz12z12_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vsetz12z12_bgl) ))); 
{ /* ./Ast/node.scm 134 */
long BgL_arg4111z00_2930;
BgL_arg4111z00_2930 = 
BGl_classzd2numzd2zz__objectz00(BGl_vsetz12z12zzast_nodez00); 
{ /* ./Ast/node.scm 134 */
BgL_objectz00_bglt BgL_objz00_2931;
BgL_objz00_2931 = 
(BgL_objectz00_bglt)(BgL_new2631z00_2929); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2931, BgL_arg4111z00_2930); } } 
{ /* ./Ast/node.scm 134 */
BgL_objectz00_bglt BgL_auxz00_7583;
BgL_auxz00_7583 = 
(BgL_objectz00_bglt)(BgL_new2631z00_2929); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7583, BFALSE); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_objz00_2933;
BgL_objz00_2933 = 
(obj_t)(BgL_new2631z00_2929); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2933); BUNSPEC; } 
BgL_res6051z00_2934 = BgL_new2631z00_2929; } 
BgL_new2607z00_2928 = BgL_res6051z00_2934; } 
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_res6052z00_2956;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_new2619z00_2935;
BgL_new2619z00_2935 = BgL_new2607z00_2928; 
{ /* ./Ast/node.scm 134 */
obj_t BgL_loc2609z00_2946;BgL_typez00_bglt BgL_type2610z00_2947;obj_t BgL_sidezd2effectzf32611z21_2948;obj_t BgL_key2612z00_2949;obj_t BgL_exprza22613za2_2950;obj_t BgL_effect2614z00_2951;obj_t BgL_czd2format2615zd2_2952;BgL_typez00_bglt BgL_ftype2616z00_2953;BgL_typez00_bglt BgL_otype2617z00_2954;BgL_typez00_bglt BgL_vtype2618z00_2955;
BgL_loc2609z00_2946 = BgL_loc2597z00_301; 
BgL_type2610z00_2947 = BgL_type2598z00_302; 
BgL_sidezd2effectzf32611z21_2948 = BgL_sidezd2effectzf32599z21_303; 
BgL_key2612z00_2949 = BgL_key2600z00_304; 
BgL_exprza22613za2_2950 = BgL_exprza22601za2_305; 
BgL_effect2614z00_2951 = BgL_effect2602z00_306; 
BgL_czd2format2615zd2_2952 = BgL_czd2format2603zd2_307; 
BgL_ftype2616z00_2953 = BgL_ftype2604z00_308; 
BgL_otype2617z00_2954 = BgL_otype2605z00_309; 
BgL_vtype2618z00_2955 = BgL_vtype2606z00_310; 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_locz00) = ((obj_t)BgL_loc2609z00_2946), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2610z00_2947), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32611z21_2948), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_keyz00) = ((obj_t)BgL_key2612z00_2949), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_exprza2za2) = ((obj_t)BgL_exprza22613za2_2950), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_effectz00) = ((obj_t)BgL_effect2614z00_2951), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2615zd2_2952), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2616z00_2953), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2617z00_2954), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_2935))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2618z00_2955), BUNSPEC); 
BgL_res6052z00_2956 = BgL_new2619z00_2935; } } BgL_res6052z00_2956; } 
return BgL_new2607z00_2928;} } 
}



/* _make-vset!6190 */
obj_t BGl__makezd2vsetz126190zc0zzast_nodez00(obj_t BgL_envz00_5084, obj_t BgL_loc2597z00_5085, obj_t BgL_type2598z00_5086, obj_t BgL_sidezd2effectzf32599z21_5087, obj_t BgL_key2600z00_5088, obj_t BgL_exprza22601za2_5089, obj_t BgL_effect2602z00_5090, obj_t BgL_czd2format2603zd2_5091, obj_t BgL_ftype2604z00_5092, obj_t BgL_otype2605z00_5093, obj_t BgL_vtype2606z00_5094)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_auxz00_7598;
BgL_auxz00_7598 = 
BGl_makezd2vsetz12zc0zzast_nodez00(BgL_loc2597z00_5085, 
(BgL_typez00_bglt)(BgL_type2598z00_5086), BgL_sidezd2effectzf32599z21_5087, BgL_key2600z00_5088, BgL_exprza22601za2_5089, BgL_effect2602z00_5090, BgL_czd2format2603zd2_5091, 
(BgL_typez00_bglt)(BgL_ftype2604z00_5092), 
(BgL_typez00_bglt)(BgL_otype2605z00_5093), 
(BgL_typez00_bglt)(BgL_vtype2606z00_5094)); 
return 
(obj_t)(BgL_auxz00_7598);} } 
}



/* fill-vset!! */
BGL_EXPORTED_DEF BgL_vsetz12z12_bglt BGl_fillzd2vsetz12z12zd2zzast_nodez00(BgL_vsetz12z12_bglt BgL_new2619z00_311, obj_t BgL_loc2609z00_312, BgL_typez00_bglt BgL_type2610z00_313, obj_t BgL_sidezd2effectzf32611z21_314, obj_t BgL_key2612z00_315, obj_t BgL_exprza22613za2_316, obj_t BgL_effect2614z00_317, obj_t BgL_czd2format2615zd2_318, BgL_typez00_bglt BgL_ftype2616z00_319, BgL_typez00_bglt BgL_otype2617z00_320, BgL_typez00_bglt BgL_vtype2618z00_321)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ /* ./Ast/node.scm 134 */
obj_t BgL_loc2609z00_6013;BgL_typez00_bglt BgL_type2610z00_6014;obj_t BgL_sidezd2effectzf32611z21_6015;obj_t BgL_key2612z00_6016;obj_t BgL_exprza22613za2_6017;obj_t BgL_effect2614z00_6018;obj_t BgL_czd2format2615zd2_6019;BgL_typez00_bglt BgL_ftype2616z00_6020;BgL_typez00_bglt BgL_otype2617z00_6021;BgL_typez00_bglt BgL_vtype2618z00_6022;
BgL_loc2609z00_6013 = BgL_loc2609z00_312; 
BgL_type2610z00_6014 = BgL_type2610z00_313; 
BgL_sidezd2effectzf32611z21_6015 = BgL_sidezd2effectzf32611z21_314; 
BgL_key2612z00_6016 = BgL_key2612z00_315; 
BgL_exprza22613za2_6017 = BgL_exprza22613za2_316; 
BgL_effect2614z00_6018 = BgL_effect2614z00_317; 
BgL_czd2format2615zd2_6019 = BgL_czd2format2615zd2_318; 
BgL_ftype2616z00_6020 = BgL_ftype2616z00_319; 
BgL_otype2617z00_6021 = BgL_otype2617z00_320; 
BgL_vtype2618z00_6022 = BgL_vtype2618z00_321; 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_locz00) = ((obj_t)BgL_loc2609z00_6013), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2610z00_6014), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32611z21_6015), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_keyz00) = ((obj_t)BgL_key2612z00_6016), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_exprza2za2) = ((obj_t)BgL_exprza22613za2_6017), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_effectz00) = ((obj_t)BgL_effect2614z00_6018), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2615zd2_6019), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2616z00_6020), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2617z00_6021), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_311))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2618z00_6022), BUNSPEC); 
return BgL_new2619z00_311;} } 
}



/* _fill-vset!!6192 */
obj_t BGl__fillzd2vsetz12z126192zd2zzast_nodez00(obj_t BgL_envz00_5095, obj_t BgL_new2619z00_5096, obj_t BgL_loc2609z00_5097, obj_t BgL_type2610z00_5098, obj_t BgL_sidezd2effectzf32611z21_5099, obj_t BgL_key2612z00_5100, obj_t BgL_exprza22613za2_5101, obj_t BgL_effect2614z00_5102, obj_t BgL_czd2format2615zd2_5103, obj_t BgL_ftype2616z00_5104, obj_t BgL_otype2617z00_5105, obj_t BgL_vtype2618z00_5106)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_auxz00_7615;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_res8061z00_6044;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_new2619z00_6023;BgL_typez00_bglt BgL_type2610z00_6025;BgL_typez00_bglt BgL_ftype2616z00_6031;BgL_typez00_bglt BgL_otype2617z00_6032;BgL_typez00_bglt BgL_vtype2618z00_6033;
BgL_new2619z00_6023 = 
(BgL_vsetz12z12_bglt)(BgL_new2619z00_5096); 
BgL_type2610z00_6025 = 
(BgL_typez00_bglt)(BgL_type2610z00_5098); 
BgL_ftype2616z00_6031 = 
(BgL_typez00_bglt)(BgL_ftype2616z00_5104); 
BgL_otype2617z00_6032 = 
(BgL_typez00_bglt)(BgL_otype2617z00_5105); 
BgL_vtype2618z00_6033 = 
(BgL_typez00_bglt)(BgL_vtype2618z00_5106); 
{ /* ./Ast/node.scm 134 */
obj_t BgL_loc2609z00_6034;BgL_typez00_bglt BgL_type2610z00_6035;obj_t BgL_sidezd2effectzf32611z21_6036;obj_t BgL_key2612z00_6037;obj_t BgL_exprza22613za2_6038;obj_t BgL_effect2614z00_6039;obj_t BgL_czd2format2615zd2_6040;BgL_typez00_bglt BgL_ftype2616z00_6041;BgL_typez00_bglt BgL_otype2617z00_6042;BgL_typez00_bglt BgL_vtype2618z00_6043;
BgL_loc2609z00_6034 = BgL_loc2609z00_5097; 
BgL_type2610z00_6035 = BgL_type2610z00_6025; 
BgL_sidezd2effectzf32611z21_6036 = BgL_sidezd2effectzf32611z21_5099; 
BgL_key2612z00_6037 = BgL_key2612z00_5100; 
BgL_exprza22613za2_6038 = BgL_exprza22613za2_5101; 
BgL_effect2614z00_6039 = BgL_effect2614z00_5102; 
BgL_czd2format2615zd2_6040 = BgL_czd2format2615zd2_5103; 
BgL_ftype2616z00_6041 = BgL_ftype2616z00_6031; 
BgL_otype2617z00_6042 = BgL_otype2617z00_6032; 
BgL_vtype2618z00_6043 = BgL_vtype2618z00_6033; 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_locz00) = ((obj_t)BgL_loc2609z00_6034), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2610z00_6035), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32611z21_6036), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_keyz00) = ((obj_t)BgL_key2612z00_6037), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_exprza2za2) = ((obj_t)BgL_exprza22613za2_6038), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_effectz00) = ((obj_t)BgL_effect2614z00_6039), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2615zd2_6040), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2616z00_6041), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2617z00_6042), BUNSPEC); 
((((BgL_vsetz12z12_bglt)CREF(BgL_new2619z00_6023))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2618z00_6043), BUNSPEC); 
BgL_res8061z00_6044 = BgL_new2619z00_6023; } } 
BgL_auxz00_7615 = BgL_res8061z00_6044; } 
return 
(obj_t)(BgL_auxz00_7615);} } 
}



/* allocate-vset! */
BGL_EXPORTED_DEF BgL_vsetz12z12_bglt BGl_allocatezd2vsetz12zc0zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_new2631z00_6045;
BgL_new2631z00_6045 = 
((BgL_vsetz12z12_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vsetz12z12_bgl) ))); 
{ /* ./Ast/node.scm 134 */
long BgL_arg4111z00_6046;
BgL_arg4111z00_6046 = 
BGl_classzd2numzd2zz__objectz00(BGl_vsetz12z12zzast_nodez00); 
{ /* ./Ast/node.scm 134 */
BgL_objectz00_bglt BgL_objz00_6047;
BgL_objz00_6047 = 
(BgL_objectz00_bglt)(BgL_new2631z00_6045); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6047, BgL_arg4111z00_6046); } } 
{ /* ./Ast/node.scm 134 */
BgL_objectz00_bglt BgL_auxz00_7636;
BgL_auxz00_7636 = 
(BgL_objectz00_bglt)(BgL_new2631z00_6045); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7636, BFALSE); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_objz00_6048;
BgL_objz00_6048 = 
(obj_t)(BgL_new2631z00_6045); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6048); BUNSPEC; } 
return BgL_new2631z00_6045;} } 
}



/* _allocate-vset! */
obj_t BGl__allocatezd2vsetz12zc0zzast_nodez00(obj_t BgL_envz00_4845)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_auxz00_7641;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_res8062z00_6053;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_new2631z00_6049;
BgL_new2631z00_6049 = 
((BgL_vsetz12z12_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vsetz12z12_bgl) ))); 
{ /* ./Ast/node.scm 134 */
long BgL_arg4111z00_6050;
BgL_arg4111z00_6050 = 
BGl_classzd2numzd2zz__objectz00(BGl_vsetz12z12zzast_nodez00); 
{ /* ./Ast/node.scm 134 */
BgL_objectz00_bglt BgL_objz00_6051;
BgL_objz00_6051 = 
(BgL_objectz00_bglt)(BgL_new2631z00_6049); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6051, BgL_arg4111z00_6050); } } 
{ /* ./Ast/node.scm 134 */
BgL_objectz00_bglt BgL_auxz00_7646;
BgL_auxz00_7646 = 
(BgL_objectz00_bglt)(BgL_new2631z00_6049); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7646, BFALSE); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_objz00_6052;
BgL_objz00_6052 = 
(obj_t)(BgL_new2631z00_6049); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6052); BUNSPEC; } 
BgL_res8062z00_6053 = BgL_new2631z00_6049; } 
BgL_auxz00_7641 = BgL_res8062z00_6053; } 
return 
(obj_t)(BgL_auxz00_7641);} } 
}



/* vref? */
BGL_EXPORTED_DEF bool_t BGl_vrefzf3zf3zzast_nodez00(obj_t BgL_obj2574z00_328)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2574z00_328, BGl_vrefz00zzast_nodez00);} 
}



/* _vref? */
obj_t BGl__vrefzf3zf3zzast_nodez00(obj_t BgL_envz00_5107, obj_t BgL_obj2574z00_5108)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ /* ./Ast/node.scm 123 */
bool_t BgL_auxz00_7653;
BgL_auxz00_7653 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2574z00_5108, BGl_vrefz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7653);} } 
}



/* make-vref */
BGL_EXPORTED_DEF BgL_vrefz00_bglt BGl_makezd2vrefzd2zzast_nodez00(obj_t BgL_loc2497z00_332, BgL_typez00_bglt BgL_type2498z00_333, obj_t BgL_sidezd2effectzf32499z21_334, obj_t BgL_key2500z00_335, obj_t BgL_exprza22501za2_336, obj_t BgL_effect2502z00_337, obj_t BgL_czd2format2503zd2_338, BgL_typez00_bglt BgL_ftype2504z00_339, BgL_typez00_bglt BgL_otype2505z00_340, BgL_typez00_bglt BgL_vtype2506z00_341)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_new2507z00_2972;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_res6053z00_2978;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_new2531z00_2973;
BgL_new2531z00_2973 = 
((BgL_vrefz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vrefz00_bgl) ))); 
{ /* ./Ast/node.scm 123 */
long BgL_arg4120z00_2974;
BgL_arg4120z00_2974 = 
BGl_classzd2numzd2zz__objectz00(BGl_vrefz00zzast_nodez00); 
{ /* ./Ast/node.scm 123 */
BgL_objectz00_bglt BgL_objz00_2975;
BgL_objz00_2975 = 
(BgL_objectz00_bglt)(BgL_new2531z00_2973); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2975, BgL_arg4120z00_2974); } } 
{ /* ./Ast/node.scm 123 */
BgL_objectz00_bglt BgL_auxz00_7660;
BgL_auxz00_7660 = 
(BgL_objectz00_bglt)(BgL_new2531z00_2973); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7660, BFALSE); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_objz00_2977;
BgL_objz00_2977 = 
(obj_t)(BgL_new2531z00_2973); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2977); BUNSPEC; } 
BgL_res6053z00_2978 = BgL_new2531z00_2973; } 
BgL_new2507z00_2972 = BgL_res6053z00_2978; } 
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_res6054z00_3000;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_new2519z00_2979;
BgL_new2519z00_2979 = BgL_new2507z00_2972; 
{ /* ./Ast/node.scm 123 */
obj_t BgL_loc2509z00_2990;BgL_typez00_bglt BgL_type2510z00_2991;obj_t BgL_sidezd2effectzf32511z21_2992;obj_t BgL_key2512z00_2993;obj_t BgL_exprza22513za2_2994;obj_t BgL_effect2514z00_2995;obj_t BgL_czd2format2515zd2_2996;BgL_typez00_bglt BgL_ftype2516z00_2997;BgL_typez00_bglt BgL_otype2517z00_2998;BgL_typez00_bglt BgL_vtype2518z00_2999;
BgL_loc2509z00_2990 = BgL_loc2497z00_332; 
BgL_type2510z00_2991 = BgL_type2498z00_333; 
BgL_sidezd2effectzf32511z21_2992 = BgL_sidezd2effectzf32499z21_334; 
BgL_key2512z00_2993 = BgL_key2500z00_335; 
BgL_exprza22513za2_2994 = BgL_exprza22501za2_336; 
BgL_effect2514z00_2995 = BgL_effect2502z00_337; 
BgL_czd2format2515zd2_2996 = BgL_czd2format2503zd2_338; 
BgL_ftype2516z00_2997 = BgL_ftype2504z00_339; 
BgL_otype2517z00_2998 = BgL_otype2505z00_340; 
BgL_vtype2518z00_2999 = BgL_vtype2506z00_341; 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_locz00) = ((obj_t)BgL_loc2509z00_2990), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2510z00_2991), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32511z21_2992), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_keyz00) = ((obj_t)BgL_key2512z00_2993), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_exprza2za2) = ((obj_t)BgL_exprza22513za2_2994), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_effectz00) = ((obj_t)BgL_effect2514z00_2995), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2515zd2_2996), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2516z00_2997), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2517z00_2998), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_2979))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2518z00_2999), BUNSPEC); 
BgL_res6054z00_3000 = BgL_new2519z00_2979; } } BgL_res6054z00_3000; } 
return BgL_new2507z00_2972;} } 
}



/* _make-vref6195 */
obj_t BGl__makezd2vref6195zd2zzast_nodez00(obj_t BgL_envz00_5109, obj_t BgL_loc2497z00_5110, obj_t BgL_type2498z00_5111, obj_t BgL_sidezd2effectzf32499z21_5112, obj_t BgL_key2500z00_5113, obj_t BgL_exprza22501za2_5114, obj_t BgL_effect2502z00_5115, obj_t BgL_czd2format2503zd2_5116, obj_t BgL_ftype2504z00_5117, obj_t BgL_otype2505z00_5118, obj_t BgL_vtype2506z00_5119)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_auxz00_7675;
BgL_auxz00_7675 = 
BGl_makezd2vrefzd2zzast_nodez00(BgL_loc2497z00_5110, 
(BgL_typez00_bglt)(BgL_type2498z00_5111), BgL_sidezd2effectzf32499z21_5112, BgL_key2500z00_5113, BgL_exprza22501za2_5114, BgL_effect2502z00_5115, BgL_czd2format2503zd2_5116, 
(BgL_typez00_bglt)(BgL_ftype2504z00_5117), 
(BgL_typez00_bglt)(BgL_otype2505z00_5118), 
(BgL_typez00_bglt)(BgL_vtype2506z00_5119)); 
return 
(obj_t)(BgL_auxz00_7675);} } 
}



/* fill-vref! */
BGL_EXPORTED_DEF BgL_vrefz00_bglt BGl_fillzd2vrefz12zc0zzast_nodez00(BgL_vrefz00_bglt BgL_new2519z00_342, obj_t BgL_loc2509z00_343, BgL_typez00_bglt BgL_type2510z00_344, obj_t BgL_sidezd2effectzf32511z21_345, obj_t BgL_key2512z00_346, obj_t BgL_exprza22513za2_347, obj_t BgL_effect2514z00_348, obj_t BgL_czd2format2515zd2_349, BgL_typez00_bglt BgL_ftype2516z00_350, BgL_typez00_bglt BgL_otype2517z00_351, BgL_typez00_bglt BgL_vtype2518z00_352)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ /* ./Ast/node.scm 123 */
obj_t BgL_loc2509z00_6055;BgL_typez00_bglt BgL_type2510z00_6056;obj_t BgL_sidezd2effectzf32511z21_6057;obj_t BgL_key2512z00_6058;obj_t BgL_exprza22513za2_6059;obj_t BgL_effect2514z00_6060;obj_t BgL_czd2format2515zd2_6061;BgL_typez00_bglt BgL_ftype2516z00_6062;BgL_typez00_bglt BgL_otype2517z00_6063;BgL_typez00_bglt BgL_vtype2518z00_6064;
BgL_loc2509z00_6055 = BgL_loc2509z00_343; 
BgL_type2510z00_6056 = BgL_type2510z00_344; 
BgL_sidezd2effectzf32511z21_6057 = BgL_sidezd2effectzf32511z21_345; 
BgL_key2512z00_6058 = BgL_key2512z00_346; 
BgL_exprza22513za2_6059 = BgL_exprza22513za2_347; 
BgL_effect2514z00_6060 = BgL_effect2514z00_348; 
BgL_czd2format2515zd2_6061 = BgL_czd2format2515zd2_349; 
BgL_ftype2516z00_6062 = BgL_ftype2516z00_350; 
BgL_otype2517z00_6063 = BgL_otype2517z00_351; 
BgL_vtype2518z00_6064 = BgL_vtype2518z00_352; 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_locz00) = ((obj_t)BgL_loc2509z00_6055), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2510z00_6056), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32511z21_6057), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_keyz00) = ((obj_t)BgL_key2512z00_6058), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_exprza2za2) = ((obj_t)BgL_exprza22513za2_6059), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_effectz00) = ((obj_t)BgL_effect2514z00_6060), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2515zd2_6061), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2516z00_6062), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2517z00_6063), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_342))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2518z00_6064), BUNSPEC); 
return BgL_new2519z00_342;} } 
}



/* _fill-vref!6197 */
obj_t BGl__fillzd2vrefz126197zc0zzast_nodez00(obj_t BgL_envz00_5120, obj_t BgL_new2519z00_5121, obj_t BgL_loc2509z00_5122, obj_t BgL_type2510z00_5123, obj_t BgL_sidezd2effectzf32511z21_5124, obj_t BgL_key2512z00_5125, obj_t BgL_exprza22513za2_5126, obj_t BgL_effect2514z00_5127, obj_t BgL_czd2format2515zd2_5128, obj_t BgL_ftype2516z00_5129, obj_t BgL_otype2517z00_5130, obj_t BgL_vtype2518z00_5131)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_auxz00_7692;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_res8063z00_6086;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_new2519z00_6065;BgL_typez00_bglt BgL_type2510z00_6067;BgL_typez00_bglt BgL_ftype2516z00_6073;BgL_typez00_bglt BgL_otype2517z00_6074;BgL_typez00_bglt BgL_vtype2518z00_6075;
BgL_new2519z00_6065 = 
(BgL_vrefz00_bglt)(BgL_new2519z00_5121); 
BgL_type2510z00_6067 = 
(BgL_typez00_bglt)(BgL_type2510z00_5123); 
BgL_ftype2516z00_6073 = 
(BgL_typez00_bglt)(BgL_ftype2516z00_5129); 
BgL_otype2517z00_6074 = 
(BgL_typez00_bglt)(BgL_otype2517z00_5130); 
BgL_vtype2518z00_6075 = 
(BgL_typez00_bglt)(BgL_vtype2518z00_5131); 
{ /* ./Ast/node.scm 123 */
obj_t BgL_loc2509z00_6076;BgL_typez00_bglt BgL_type2510z00_6077;obj_t BgL_sidezd2effectzf32511z21_6078;obj_t BgL_key2512z00_6079;obj_t BgL_exprza22513za2_6080;obj_t BgL_effect2514z00_6081;obj_t BgL_czd2format2515zd2_6082;BgL_typez00_bglt BgL_ftype2516z00_6083;BgL_typez00_bglt BgL_otype2517z00_6084;BgL_typez00_bglt BgL_vtype2518z00_6085;
BgL_loc2509z00_6076 = BgL_loc2509z00_5122; 
BgL_type2510z00_6077 = BgL_type2510z00_6067; 
BgL_sidezd2effectzf32511z21_6078 = BgL_sidezd2effectzf32511z21_5124; 
BgL_key2512z00_6079 = BgL_key2512z00_5125; 
BgL_exprza22513za2_6080 = BgL_exprza22513za2_5126; 
BgL_effect2514z00_6081 = BgL_effect2514z00_5127; 
BgL_czd2format2515zd2_6082 = BgL_czd2format2515zd2_5128; 
BgL_ftype2516z00_6083 = BgL_ftype2516z00_6073; 
BgL_otype2517z00_6084 = BgL_otype2517z00_6074; 
BgL_vtype2518z00_6085 = BgL_vtype2518z00_6075; 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_locz00) = ((obj_t)BgL_loc2509z00_6076), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2510z00_6077), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32511z21_6078), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_keyz00) = ((obj_t)BgL_key2512z00_6079), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_exprza2za2) = ((obj_t)BgL_exprza22513za2_6080), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_effectz00) = ((obj_t)BgL_effect2514z00_6081), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_czd2formatzd2) = ((obj_t)BgL_czd2format2515zd2_6082), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2516z00_6083), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2517z00_6084), BUNSPEC); 
((((BgL_vrefz00_bglt)CREF(BgL_new2519z00_6065))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_vtype2518z00_6085), BUNSPEC); 
BgL_res8063z00_6086 = BgL_new2519z00_6065; } } 
BgL_auxz00_7692 = BgL_res8063z00_6086; } 
return 
(obj_t)(BgL_auxz00_7692);} } 
}



/* allocate-vref */
BGL_EXPORTED_DEF BgL_vrefz00_bglt BGl_allocatezd2vrefzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_new2531z00_6087;
BgL_new2531z00_6087 = 
((BgL_vrefz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vrefz00_bgl) ))); 
{ /* ./Ast/node.scm 123 */
long BgL_arg4120z00_6088;
BgL_arg4120z00_6088 = 
BGl_classzd2numzd2zz__objectz00(BGl_vrefz00zzast_nodez00); 
{ /* ./Ast/node.scm 123 */
BgL_objectz00_bglt BgL_objz00_6089;
BgL_objz00_6089 = 
(BgL_objectz00_bglt)(BgL_new2531z00_6087); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6089, BgL_arg4120z00_6088); } } 
{ /* ./Ast/node.scm 123 */
BgL_objectz00_bglt BgL_auxz00_7713;
BgL_auxz00_7713 = 
(BgL_objectz00_bglt)(BgL_new2531z00_6087); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7713, BFALSE); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_objz00_6090;
BgL_objz00_6090 = 
(obj_t)(BgL_new2531z00_6087); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6090); BUNSPEC; } 
return BgL_new2531z00_6087;} } 
}



/* _allocate-vref */
obj_t BGl__allocatezd2vrefzd2zzast_nodez00(obj_t BgL_envz00_4844)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_auxz00_7718;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_res8064z00_6095;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_new2531z00_6091;
BgL_new2531z00_6091 = 
((BgL_vrefz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vrefz00_bgl) ))); 
{ /* ./Ast/node.scm 123 */
long BgL_arg4120z00_6092;
BgL_arg4120z00_6092 = 
BGl_classzd2numzd2zz__objectz00(BGl_vrefz00zzast_nodez00); 
{ /* ./Ast/node.scm 123 */
BgL_objectz00_bglt BgL_objz00_6093;
BgL_objz00_6093 = 
(BgL_objectz00_bglt)(BgL_new2531z00_6091); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6093, BgL_arg4120z00_6092); } } 
{ /* ./Ast/node.scm 123 */
BgL_objectz00_bglt BgL_auxz00_7723;
BgL_auxz00_7723 = 
(BgL_objectz00_bglt)(BgL_new2531z00_6091); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7723, BFALSE); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_objz00_6094;
BgL_objz00_6094 = 
(obj_t)(BgL_new2531z00_6091); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6094); BUNSPEC; } 
BgL_res8064z00_6095 = BgL_new2531z00_6091; } 
BgL_auxz00_7718 = BgL_res8064z00_6095; } 
return 
(obj_t)(BgL_auxz00_7718);} } 
}



/* valloc? */
BGL_EXPORTED_DEF bool_t BGl_valloczf3zf3zzast_nodez00(obj_t BgL_obj2474z00_359)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2474z00_359, BGl_vallocz00zzast_nodez00);} 
}



/* _valloc? */
obj_t BGl__valloczf3zf3zzast_nodez00(obj_t BgL_envz00_5132, obj_t BgL_obj2474z00_5133)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ /* ./Ast/node.scm 114 */
bool_t BgL_auxz00_7730;
BgL_auxz00_7730 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2474z00_5133, BGl_vallocz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7730);} } 
}



/* make-valloc */
BGL_EXPORTED_DEF BgL_vallocz00_bglt BGl_makezd2valloczd2zzast_nodez00(obj_t BgL_loc2404z00_363, BgL_typez00_bglt BgL_type2405z00_364, obj_t BgL_sidezd2effectzf32406z21_365, obj_t BgL_key2407z00_366, obj_t BgL_exprza22408za2_367, obj_t BgL_effect2409z00_368, obj_t BgL_czd2heapzd2format2410z00_369, BgL_typez00_bglt BgL_ftype2411z00_370, BgL_typez00_bglt BgL_otype2412z00_371)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_new2413z00_3016;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_res6055z00_3022;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_new2435z00_3017;
BgL_new2435z00_3017 = 
((BgL_vallocz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vallocz00_bgl) ))); 
{ /* ./Ast/node.scm 114 */
long BgL_arg4129z00_3018;
BgL_arg4129z00_3018 = 
BGl_classzd2numzd2zz__objectz00(BGl_vallocz00zzast_nodez00); 
{ /* ./Ast/node.scm 114 */
BgL_objectz00_bglt BgL_objz00_3019;
BgL_objz00_3019 = 
(BgL_objectz00_bglt)(BgL_new2435z00_3017); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3019, BgL_arg4129z00_3018); } } 
{ /* ./Ast/node.scm 114 */
BgL_objectz00_bglt BgL_auxz00_7737;
BgL_auxz00_7737 = 
(BgL_objectz00_bglt)(BgL_new2435z00_3017); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7737, BFALSE); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_objz00_3021;
BgL_objz00_3021 = 
(obj_t)(BgL_new2435z00_3017); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3021); BUNSPEC; } 
BgL_res6055z00_3022 = BgL_new2435z00_3017; } 
BgL_new2413z00_3016 = BgL_res6055z00_3022; } 
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_res6056z00_3042;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_new2424z00_3023;
BgL_new2424z00_3023 = BgL_new2413z00_3016; 
{ /* ./Ast/node.scm 114 */
obj_t BgL_loc2415z00_3033;BgL_typez00_bglt BgL_type2416z00_3034;obj_t BgL_sidezd2effectzf32417z21_3035;obj_t BgL_key2418z00_3036;obj_t BgL_exprza22419za2_3037;obj_t BgL_effect2420z00_3038;obj_t BgL_czd2heapzd2format2421z00_3039;BgL_typez00_bglt BgL_ftype2422z00_3040;BgL_typez00_bglt BgL_otype2423z00_3041;
BgL_loc2415z00_3033 = BgL_loc2404z00_363; 
BgL_type2416z00_3034 = BgL_type2405z00_364; 
BgL_sidezd2effectzf32417z21_3035 = BgL_sidezd2effectzf32406z21_365; 
BgL_key2418z00_3036 = BgL_key2407z00_366; 
BgL_exprza22419za2_3037 = BgL_exprza22408za2_367; 
BgL_effect2420z00_3038 = BgL_effect2409z00_368; 
BgL_czd2heapzd2format2421z00_3039 = BgL_czd2heapzd2format2410z00_369; 
BgL_ftype2422z00_3040 = BgL_ftype2411z00_370; 
BgL_otype2423z00_3041 = BgL_otype2412z00_371; 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_locz00) = ((obj_t)BgL_loc2415z00_3033), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2416z00_3034), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32417z21_3035), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_keyz00) = ((obj_t)BgL_key2418z00_3036), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_exprza2za2) = ((obj_t)BgL_exprza22419za2_3037), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_effectz00) = ((obj_t)BgL_effect2420z00_3038), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_czd2heapzd2formatz00) = ((obj_t)BgL_czd2heapzd2format2421z00_3039), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2422z00_3040), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_3023))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2423z00_3041), BUNSPEC); 
BgL_res6056z00_3042 = BgL_new2424z00_3023; } } BgL_res6056z00_3042; } 
return BgL_new2413z00_3016;} } 
}



/* _make-valloc6200 */
obj_t BGl__makezd2valloc6200zd2zzast_nodez00(obj_t BgL_envz00_5134, obj_t BgL_loc2404z00_5135, obj_t BgL_type2405z00_5136, obj_t BgL_sidezd2effectzf32406z21_5137, obj_t BgL_key2407z00_5138, obj_t BgL_exprza22408za2_5139, obj_t BgL_effect2409z00_5140, obj_t BgL_czd2heapzd2format2410z00_5141, obj_t BgL_ftype2411z00_5142, obj_t BgL_otype2412z00_5143)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_auxz00_7751;
BgL_auxz00_7751 = 
BGl_makezd2valloczd2zzast_nodez00(BgL_loc2404z00_5135, 
(BgL_typez00_bglt)(BgL_type2405z00_5136), BgL_sidezd2effectzf32406z21_5137, BgL_key2407z00_5138, BgL_exprza22408za2_5139, BgL_effect2409z00_5140, BgL_czd2heapzd2format2410z00_5141, 
(BgL_typez00_bglt)(BgL_ftype2411z00_5142), 
(BgL_typez00_bglt)(BgL_otype2412z00_5143)); 
return 
(obj_t)(BgL_auxz00_7751);} } 
}



/* fill-valloc! */
BGL_EXPORTED_DEF BgL_vallocz00_bglt BGl_fillzd2vallocz12zc0zzast_nodez00(BgL_vallocz00_bglt BgL_new2424z00_372, obj_t BgL_loc2415z00_373, BgL_typez00_bglt BgL_type2416z00_374, obj_t BgL_sidezd2effectzf32417z21_375, obj_t BgL_key2418z00_376, obj_t BgL_exprza22419za2_377, obj_t BgL_effect2420z00_378, obj_t BgL_czd2heapzd2format2421z00_379, BgL_typez00_bglt BgL_ftype2422z00_380, BgL_typez00_bglt BgL_otype2423z00_381)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ /* ./Ast/node.scm 114 */
obj_t BgL_loc2415z00_6097;BgL_typez00_bglt BgL_type2416z00_6098;obj_t BgL_sidezd2effectzf32417z21_6099;obj_t BgL_key2418z00_6100;obj_t BgL_exprza22419za2_6101;obj_t BgL_effect2420z00_6102;obj_t BgL_czd2heapzd2format2421z00_6103;BgL_typez00_bglt BgL_ftype2422z00_6104;BgL_typez00_bglt BgL_otype2423z00_6105;
BgL_loc2415z00_6097 = BgL_loc2415z00_373; 
BgL_type2416z00_6098 = BgL_type2416z00_374; 
BgL_sidezd2effectzf32417z21_6099 = BgL_sidezd2effectzf32417z21_375; 
BgL_key2418z00_6100 = BgL_key2418z00_376; 
BgL_exprza22419za2_6101 = BgL_exprza22419za2_377; 
BgL_effect2420z00_6102 = BgL_effect2420z00_378; 
BgL_czd2heapzd2format2421z00_6103 = BgL_czd2heapzd2format2421z00_379; 
BgL_ftype2422z00_6104 = BgL_ftype2422z00_380; 
BgL_otype2423z00_6105 = BgL_otype2423z00_381; 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_locz00) = ((obj_t)BgL_loc2415z00_6097), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2416z00_6098), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32417z21_6099), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_keyz00) = ((obj_t)BgL_key2418z00_6100), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_exprza2za2) = ((obj_t)BgL_exprza22419za2_6101), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_effectz00) = ((obj_t)BgL_effect2420z00_6102), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_czd2heapzd2formatz00) = ((obj_t)BgL_czd2heapzd2format2421z00_6103), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2422z00_6104), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_372))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2423z00_6105), BUNSPEC); 
return BgL_new2424z00_372;} } 
}



/* _fill-valloc!6202 */
obj_t BGl__fillzd2vallocz126202zc0zzast_nodez00(obj_t BgL_envz00_5144, obj_t BgL_new2424z00_5145, obj_t BgL_loc2415z00_5146, obj_t BgL_type2416z00_5147, obj_t BgL_sidezd2effectzf32417z21_5148, obj_t BgL_key2418z00_5149, obj_t BgL_exprza22419za2_5150, obj_t BgL_effect2420z00_5151, obj_t BgL_czd2heapzd2format2421z00_5152, obj_t BgL_ftype2422z00_5153, obj_t BgL_otype2423z00_5154)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_auxz00_7766;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_res8065z00_6125;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_new2424z00_6106;BgL_typez00_bglt BgL_type2416z00_6108;BgL_typez00_bglt BgL_ftype2422z00_6114;BgL_typez00_bglt BgL_otype2423z00_6115;
BgL_new2424z00_6106 = 
(BgL_vallocz00_bglt)(BgL_new2424z00_5145); 
BgL_type2416z00_6108 = 
(BgL_typez00_bglt)(BgL_type2416z00_5147); 
BgL_ftype2422z00_6114 = 
(BgL_typez00_bglt)(BgL_ftype2422z00_5153); 
BgL_otype2423z00_6115 = 
(BgL_typez00_bglt)(BgL_otype2423z00_5154); 
{ /* ./Ast/node.scm 114 */
obj_t BgL_loc2415z00_6116;BgL_typez00_bglt BgL_type2416z00_6117;obj_t BgL_sidezd2effectzf32417z21_6118;obj_t BgL_key2418z00_6119;obj_t BgL_exprza22419za2_6120;obj_t BgL_effect2420z00_6121;obj_t BgL_czd2heapzd2format2421z00_6122;BgL_typez00_bglt BgL_ftype2422z00_6123;BgL_typez00_bglt BgL_otype2423z00_6124;
BgL_loc2415z00_6116 = BgL_loc2415z00_5146; 
BgL_type2416z00_6117 = BgL_type2416z00_6108; 
BgL_sidezd2effectzf32417z21_6118 = BgL_sidezd2effectzf32417z21_5148; 
BgL_key2418z00_6119 = BgL_key2418z00_5149; 
BgL_exprza22419za2_6120 = BgL_exprza22419za2_5150; 
BgL_effect2420z00_6121 = BgL_effect2420z00_5151; 
BgL_czd2heapzd2format2421z00_6122 = BgL_czd2heapzd2format2421z00_5152; 
BgL_ftype2422z00_6123 = BgL_ftype2422z00_6114; 
BgL_otype2423z00_6124 = BgL_otype2423z00_6115; 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_locz00) = ((obj_t)BgL_loc2415z00_6116), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2416z00_6117), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32417z21_6118), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_keyz00) = ((obj_t)BgL_key2418z00_6119), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_exprza2za2) = ((obj_t)BgL_exprza22419za2_6120), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_effectz00) = ((obj_t)BgL_effect2420z00_6121), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_czd2heapzd2formatz00) = ((obj_t)BgL_czd2heapzd2format2421z00_6122), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2422z00_6123), BUNSPEC); 
((((BgL_vallocz00_bglt)CREF(BgL_new2424z00_6106))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2423z00_6124), BUNSPEC); 
BgL_res8065z00_6125 = BgL_new2424z00_6106; } } 
BgL_auxz00_7766 = BgL_res8065z00_6125; } 
return 
(obj_t)(BgL_auxz00_7766);} } 
}



/* allocate-valloc */
BGL_EXPORTED_DEF BgL_vallocz00_bglt BGl_allocatezd2valloczd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_new2435z00_6126;
BgL_new2435z00_6126 = 
((BgL_vallocz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vallocz00_bgl) ))); 
{ /* ./Ast/node.scm 114 */
long BgL_arg4129z00_6127;
BgL_arg4129z00_6127 = 
BGl_classzd2numzd2zz__objectz00(BGl_vallocz00zzast_nodez00); 
{ /* ./Ast/node.scm 114 */
BgL_objectz00_bglt BgL_objz00_6128;
BgL_objz00_6128 = 
(BgL_objectz00_bglt)(BgL_new2435z00_6126); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6128, BgL_arg4129z00_6127); } } 
{ /* ./Ast/node.scm 114 */
BgL_objectz00_bglt BgL_auxz00_7785;
BgL_auxz00_7785 = 
(BgL_objectz00_bglt)(BgL_new2435z00_6126); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7785, BFALSE); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_objz00_6129;
BgL_objz00_6129 = 
(obj_t)(BgL_new2435z00_6126); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6129); BUNSPEC; } 
return BgL_new2435z00_6126;} } 
}



/* _allocate-valloc */
obj_t BGl__allocatezd2valloczd2zzast_nodez00(obj_t BgL_envz00_4843)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_auxz00_7790;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_res8066z00_6134;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_new2435z00_6130;
BgL_new2435z00_6130 = 
((BgL_vallocz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_vallocz00_bgl) ))); 
{ /* ./Ast/node.scm 114 */
long BgL_arg4129z00_6131;
BgL_arg4129z00_6131 = 
BGl_classzd2numzd2zz__objectz00(BGl_vallocz00zzast_nodez00); 
{ /* ./Ast/node.scm 114 */
BgL_objectz00_bglt BgL_objz00_6132;
BgL_objz00_6132 = 
(BgL_objectz00_bglt)(BgL_new2435z00_6130); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6132, BgL_arg4129z00_6131); } } 
{ /* ./Ast/node.scm 114 */
BgL_objectz00_bglt BgL_auxz00_7795;
BgL_auxz00_7795 = 
(BgL_objectz00_bglt)(BgL_new2435z00_6130); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7795, BFALSE); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_objz00_6133;
BgL_objz00_6133 = 
(obj_t)(BgL_new2435z00_6130); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6133); BUNSPEC; } 
BgL_res8066z00_6134 = BgL_new2435z00_6130; } 
BgL_auxz00_7790 = BgL_res8066z00_6134; } 
return 
(obj_t)(BgL_auxz00_7790);} } 
}



/* new? */
BGL_EXPORTED_DEF bool_t BGl_newzf3zf3zzast_nodez00(obj_t BgL_obj2384z00_385)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2384z00_385, BGl_newz00zzast_nodez00);} 
}



/* _new? */
obj_t BGl__newzf3zf3zzast_nodez00(obj_t BgL_envz00_5155, obj_t BgL_obj2384z00_5156)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ /* ./Ast/node.scm 111 */
bool_t BgL_auxz00_7802;
BgL_auxz00_7802 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2384z00_5156, BGl_newz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7802);} } 
}



/* make-new */
BGL_EXPORTED_DEF BgL_newz00_bglt BGl_makezd2newzd2zzast_nodez00(obj_t BgL_loc2335z00_389, BgL_typez00_bglt BgL_type2336z00_390, obj_t BgL_sidezd2effectzf32337z21_391, obj_t BgL_key2338z00_392, obj_t BgL_exprza22339za2_393, obj_t BgL_effect2340z00_394)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_new2341z00_3057;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_res6057z00_3063;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_new2357z00_3058;
BgL_new2357z00_3058 = 
((BgL_newz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_newz00_bgl) ))); 
{ /* ./Ast/node.scm 111 */
long BgL_arg4138z00_3059;
BgL_arg4138z00_3059 = 
BGl_classzd2numzd2zz__objectz00(BGl_newz00zzast_nodez00); 
{ /* ./Ast/node.scm 111 */
BgL_objectz00_bglt BgL_objz00_3060;
BgL_objz00_3060 = 
(BgL_objectz00_bglt)(BgL_new2357z00_3058); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3060, BgL_arg4138z00_3059); } } 
{ /* ./Ast/node.scm 111 */
BgL_objectz00_bglt BgL_auxz00_7809;
BgL_auxz00_7809 = 
(BgL_objectz00_bglt)(BgL_new2357z00_3058); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7809, BFALSE); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_objz00_3062;
BgL_objz00_3062 = 
(obj_t)(BgL_new2357z00_3058); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3062); BUNSPEC; } 
BgL_res6057z00_3063 = BgL_new2357z00_3058; } 
BgL_new2341z00_3057 = BgL_res6057z00_3063; } 
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_res6058z00_3077;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_new2349z00_3064;
BgL_new2349z00_3064 = BgL_new2341z00_3057; 
{ /* ./Ast/node.scm 111 */
obj_t BgL_loc2343z00_3071;BgL_typez00_bglt BgL_type2344z00_3072;obj_t BgL_sidezd2effectzf32345z21_3073;obj_t BgL_key2346z00_3074;obj_t BgL_exprza22347za2_3075;obj_t BgL_effect2348z00_3076;
BgL_loc2343z00_3071 = BgL_loc2335z00_389; 
BgL_type2344z00_3072 = BgL_type2336z00_390; 
BgL_sidezd2effectzf32345z21_3073 = BgL_sidezd2effectzf32337z21_391; 
BgL_key2346z00_3074 = BgL_key2338z00_392; 
BgL_exprza22347za2_3075 = BgL_exprza22339za2_393; 
BgL_effect2348z00_3076 = BgL_effect2340z00_394; 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_3064))->BgL_locz00) = ((obj_t)BgL_loc2343z00_3071), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_3064))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2344z00_3072), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_3064))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32345z21_3073), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_3064))->BgL_keyz00) = ((obj_t)BgL_key2346z00_3074), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_3064))->BgL_exprza2za2) = ((obj_t)BgL_exprza22347za2_3075), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_3064))->BgL_effectz00) = ((obj_t)BgL_effect2348z00_3076), BUNSPEC); 
BgL_res6058z00_3077 = BgL_new2349z00_3064; } } BgL_res6058z00_3077; } 
return BgL_new2341z00_3057;} } 
}



/* _make-new6205 */
obj_t BGl__makezd2new6205zd2zzast_nodez00(obj_t BgL_envz00_5157, obj_t BgL_loc2335z00_5158, obj_t BgL_type2336z00_5159, obj_t BgL_sidezd2effectzf32337z21_5160, obj_t BgL_key2338z00_5161, obj_t BgL_exprza22339za2_5162, obj_t BgL_effect2340z00_5163)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_auxz00_7820;
BgL_auxz00_7820 = 
BGl_makezd2newzd2zzast_nodez00(BgL_loc2335z00_5158, 
(BgL_typez00_bglt)(BgL_type2336z00_5159), BgL_sidezd2effectzf32337z21_5160, BgL_key2338z00_5161, BgL_exprza22339za2_5162, BgL_effect2340z00_5163); 
return 
(obj_t)(BgL_auxz00_7820);} } 
}



/* fill-new! */
BGL_EXPORTED_DEF BgL_newz00_bglt BGl_fillzd2newz12zc0zzast_nodez00(BgL_newz00_bglt BgL_new2349z00_395, obj_t BgL_loc2343z00_396, BgL_typez00_bglt BgL_type2344z00_397, obj_t BgL_sidezd2effectzf32345z21_398, obj_t BgL_key2346z00_399, obj_t BgL_exprza22347za2_400, obj_t BgL_effect2348z00_401)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ /* ./Ast/node.scm 111 */
obj_t BgL_loc2343z00_6136;BgL_typez00_bglt BgL_type2344z00_6137;obj_t BgL_sidezd2effectzf32345z21_6138;obj_t BgL_key2346z00_6139;obj_t BgL_exprza22347za2_6140;obj_t BgL_effect2348z00_6141;
BgL_loc2343z00_6136 = BgL_loc2343z00_396; 
BgL_type2344z00_6137 = BgL_type2344z00_397; 
BgL_sidezd2effectzf32345z21_6138 = BgL_sidezd2effectzf32345z21_398; 
BgL_key2346z00_6139 = BgL_key2346z00_399; 
BgL_exprza22347za2_6140 = BgL_exprza22347za2_400; 
BgL_effect2348z00_6141 = BgL_effect2348z00_401; 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_395))->BgL_locz00) = ((obj_t)BgL_loc2343z00_6136), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_395))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2344z00_6137), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_395))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32345z21_6138), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_395))->BgL_keyz00) = ((obj_t)BgL_key2346z00_6139), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_395))->BgL_exprza2za2) = ((obj_t)BgL_exprza22347za2_6140), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_395))->BgL_effectz00) = ((obj_t)BgL_effect2348z00_6141), BUNSPEC); 
return BgL_new2349z00_395;} } 
}



/* _fill-new!6207 */
obj_t BGl__fillzd2newz126207zc0zzast_nodez00(obj_t BgL_envz00_5164, obj_t BgL_new2349z00_5165, obj_t BgL_loc2343z00_5166, obj_t BgL_type2344z00_5167, obj_t BgL_sidezd2effectzf32345z21_5168, obj_t BgL_key2346z00_5169, obj_t BgL_exprza22347za2_5170, obj_t BgL_effect2348z00_5171)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_auxz00_7830;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_res8067z00_6155;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_new2349z00_6142;BgL_typez00_bglt BgL_type2344z00_6144;
BgL_new2349z00_6142 = 
(BgL_newz00_bglt)(BgL_new2349z00_5165); 
BgL_type2344z00_6144 = 
(BgL_typez00_bglt)(BgL_type2344z00_5167); 
{ /* ./Ast/node.scm 111 */
obj_t BgL_loc2343z00_6149;BgL_typez00_bglt BgL_type2344z00_6150;obj_t BgL_sidezd2effectzf32345z21_6151;obj_t BgL_key2346z00_6152;obj_t BgL_exprza22347za2_6153;obj_t BgL_effect2348z00_6154;
BgL_loc2343z00_6149 = BgL_loc2343z00_5166; 
BgL_type2344z00_6150 = BgL_type2344z00_6144; 
BgL_sidezd2effectzf32345z21_6151 = BgL_sidezd2effectzf32345z21_5168; 
BgL_key2346z00_6152 = BgL_key2346z00_5169; 
BgL_exprza22347za2_6153 = BgL_exprza22347za2_5170; 
BgL_effect2348z00_6154 = BgL_effect2348z00_5171; 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_6142))->BgL_locz00) = ((obj_t)BgL_loc2343z00_6149), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_6142))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2344z00_6150), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_6142))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32345z21_6151), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_6142))->BgL_keyz00) = ((obj_t)BgL_key2346z00_6152), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_6142))->BgL_exprza2za2) = ((obj_t)BgL_exprza22347za2_6153), BUNSPEC); 
((((BgL_newz00_bglt)CREF(BgL_new2349z00_6142))->BgL_effectz00) = ((obj_t)BgL_effect2348z00_6154), BUNSPEC); 
BgL_res8067z00_6155 = BgL_new2349z00_6142; } } 
BgL_auxz00_7830 = BgL_res8067z00_6155; } 
return 
(obj_t)(BgL_auxz00_7830);} } 
}



/* allocate-new */
BGL_EXPORTED_DEF BgL_newz00_bglt BGl_allocatezd2newzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_new2357z00_6156;
BgL_new2357z00_6156 = 
((BgL_newz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_newz00_bgl) ))); 
{ /* ./Ast/node.scm 111 */
long BgL_arg4138z00_6157;
BgL_arg4138z00_6157 = 
BGl_classzd2numzd2zz__objectz00(BGl_newz00zzast_nodez00); 
{ /* ./Ast/node.scm 111 */
BgL_objectz00_bglt BgL_objz00_6158;
BgL_objz00_6158 = 
(BgL_objectz00_bglt)(BgL_new2357z00_6156); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6158, BgL_arg4138z00_6157); } } 
{ /* ./Ast/node.scm 111 */
BgL_objectz00_bglt BgL_auxz00_7844;
BgL_auxz00_7844 = 
(BgL_objectz00_bglt)(BgL_new2357z00_6156); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7844, BFALSE); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_objz00_6159;
BgL_objz00_6159 = 
(obj_t)(BgL_new2357z00_6156); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6159); BUNSPEC; } 
return BgL_new2357z00_6156;} } 
}



/* _allocate-new */
obj_t BGl__allocatezd2newzd2zzast_nodez00(obj_t BgL_envz00_4842)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_auxz00_7849;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_res8068z00_6164;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_new2357z00_6160;
BgL_new2357z00_6160 = 
((BgL_newz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_newz00_bgl) ))); 
{ /* ./Ast/node.scm 111 */
long BgL_arg4138z00_6161;
BgL_arg4138z00_6161 = 
BGl_classzd2numzd2zz__objectz00(BGl_newz00zzast_nodez00); 
{ /* ./Ast/node.scm 111 */
BgL_objectz00_bglt BgL_objz00_6162;
BgL_objz00_6162 = 
(BgL_objectz00_bglt)(BgL_new2357z00_6160); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6162, BgL_arg4138z00_6161); } } 
{ /* ./Ast/node.scm 111 */
BgL_objectz00_bglt BgL_auxz00_7854;
BgL_auxz00_7854 = 
(BgL_objectz00_bglt)(BgL_new2357z00_6160); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7854, BFALSE); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_objz00_6163;
BgL_objz00_6163 = 
(obj_t)(BgL_new2357z00_6160); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6163); BUNSPEC; } 
BgL_res8068z00_6164 = BgL_new2357z00_6160; } 
BgL_auxz00_7849 = BgL_res8068z00_6164; } 
return 
(obj_t)(BgL_auxz00_7849);} } 
}



/* setfield? */
BGL_EXPORTED_DEF bool_t BGl_setfieldzf3zf3zzast_nodez00(obj_t BgL_obj2318z00_402)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2318z00_402, BGl_setfieldz00zzast_nodez00);} 
}



/* _setfield? */
obj_t BGl__setfieldzf3zf3zzast_nodez00(obj_t BgL_envz00_5172, obj_t BgL_obj2318z00_5173)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ /* ./Ast/node.scm 102 */
bool_t BgL_auxz00_7861;
BgL_auxz00_7861 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2318z00_5173, BGl_setfieldz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7861);} } 
}



/* make-setfield */
BGL_EXPORTED_DEF BgL_setfieldz00_bglt BGl_makezd2setfieldzd2zzast_nodez00(obj_t BgL_loc2248z00_406, BgL_typez00_bglt BgL_type2249z00_407, obj_t BgL_sidezd2effectzf32250z21_408, obj_t BgL_key2251z00_409, obj_t BgL_exprza22252za2_410, obj_t BgL_effect2253z00_411, obj_t BgL_fname2254z00_412, BgL_typez00_bglt BgL_ftype2255z00_413, BgL_typez00_bglt BgL_otype2256z00_414)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_new2257z00_3089;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_res6059z00_3095;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_new2279z00_3090;
BgL_new2279z00_3090 = 
((BgL_setfieldz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setfieldz00_bgl) ))); 
{ /* ./Ast/node.scm 102 */
long BgL_arg4147z00_3091;
BgL_arg4147z00_3091 = 
BGl_classzd2numzd2zz__objectz00(BGl_setfieldz00zzast_nodez00); 
{ /* ./Ast/node.scm 102 */
BgL_objectz00_bglt BgL_objz00_3092;
BgL_objz00_3092 = 
(BgL_objectz00_bglt)(BgL_new2279z00_3090); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3092, BgL_arg4147z00_3091); } } 
{ /* ./Ast/node.scm 102 */
BgL_objectz00_bglt BgL_auxz00_7868;
BgL_auxz00_7868 = 
(BgL_objectz00_bglt)(BgL_new2279z00_3090); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7868, BFALSE); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_objz00_3094;
BgL_objz00_3094 = 
(obj_t)(BgL_new2279z00_3090); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3094); BUNSPEC; } 
BgL_res6059z00_3095 = BgL_new2279z00_3090; } 
BgL_new2257z00_3089 = BgL_res6059z00_3095; } 
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_res6060z00_3115;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_new2268z00_3096;
BgL_new2268z00_3096 = BgL_new2257z00_3089; 
{ /* ./Ast/node.scm 102 */
obj_t BgL_loc2259z00_3106;BgL_typez00_bglt BgL_type2260z00_3107;obj_t BgL_sidezd2effectzf32261z21_3108;obj_t BgL_key2262z00_3109;obj_t BgL_exprza22263za2_3110;obj_t BgL_effect2264z00_3111;obj_t BgL_fname2265z00_3112;BgL_typez00_bglt BgL_ftype2266z00_3113;BgL_typez00_bglt BgL_otype2267z00_3114;
BgL_loc2259z00_3106 = BgL_loc2248z00_406; 
BgL_type2260z00_3107 = BgL_type2249z00_407; 
BgL_sidezd2effectzf32261z21_3108 = BgL_sidezd2effectzf32250z21_408; 
BgL_key2262z00_3109 = BgL_key2251z00_409; 
BgL_exprza22263za2_3110 = BgL_exprza22252za2_410; 
BgL_effect2264z00_3111 = BgL_effect2253z00_411; 
BgL_fname2265z00_3112 = BgL_fname2254z00_412; 
BgL_ftype2266z00_3113 = BgL_ftype2255z00_413; 
BgL_otype2267z00_3114 = BgL_otype2256z00_414; 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_locz00) = ((obj_t)BgL_loc2259z00_3106), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2260z00_3107), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32261z21_3108), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_keyz00) = ((obj_t)BgL_key2262z00_3109), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_exprza2za2) = ((obj_t)BgL_exprza22263za2_3110), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_effectz00) = ((obj_t)BgL_effect2264z00_3111), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_fnamez00) = ((obj_t)BgL_fname2265z00_3112), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2266z00_3113), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_3096))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2267z00_3114), BUNSPEC); 
BgL_res6060z00_3115 = BgL_new2268z00_3096; } } BgL_res6060z00_3115; } 
return BgL_new2257z00_3089;} } 
}



/* _make-setfield6210 */
obj_t BGl__makezd2setfield6210zd2zzast_nodez00(obj_t BgL_envz00_5174, obj_t BgL_loc2248z00_5175, obj_t BgL_type2249z00_5176, obj_t BgL_sidezd2effectzf32250z21_5177, obj_t BgL_key2251z00_5178, obj_t BgL_exprza22252za2_5179, obj_t BgL_effect2253z00_5180, obj_t BgL_fname2254z00_5181, obj_t BgL_ftype2255z00_5182, obj_t BgL_otype2256z00_5183)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_auxz00_7882;
BgL_auxz00_7882 = 
BGl_makezd2setfieldzd2zzast_nodez00(BgL_loc2248z00_5175, 
(BgL_typez00_bglt)(BgL_type2249z00_5176), BgL_sidezd2effectzf32250z21_5177, BgL_key2251z00_5178, BgL_exprza22252za2_5179, BgL_effect2253z00_5180, BgL_fname2254z00_5181, 
(BgL_typez00_bglt)(BgL_ftype2255z00_5182), 
(BgL_typez00_bglt)(BgL_otype2256z00_5183)); 
return 
(obj_t)(BgL_auxz00_7882);} } 
}



/* fill-setfield! */
BGL_EXPORTED_DEF BgL_setfieldz00_bglt BGl_fillzd2setfieldz12zc0zzast_nodez00(BgL_setfieldz00_bglt BgL_new2268z00_415, obj_t BgL_loc2259z00_416, BgL_typez00_bglt BgL_type2260z00_417, obj_t BgL_sidezd2effectzf32261z21_418, obj_t BgL_key2262z00_419, obj_t BgL_exprza22263za2_420, obj_t BgL_effect2264z00_421, obj_t BgL_fname2265z00_422, BgL_typez00_bglt BgL_ftype2266z00_423, BgL_typez00_bglt BgL_otype2267z00_424)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ /* ./Ast/node.scm 102 */
obj_t BgL_loc2259z00_6166;BgL_typez00_bglt BgL_type2260z00_6167;obj_t BgL_sidezd2effectzf32261z21_6168;obj_t BgL_key2262z00_6169;obj_t BgL_exprza22263za2_6170;obj_t BgL_effect2264z00_6171;obj_t BgL_fname2265z00_6172;BgL_typez00_bglt BgL_ftype2266z00_6173;BgL_typez00_bglt BgL_otype2267z00_6174;
BgL_loc2259z00_6166 = BgL_loc2259z00_416; 
BgL_type2260z00_6167 = BgL_type2260z00_417; 
BgL_sidezd2effectzf32261z21_6168 = BgL_sidezd2effectzf32261z21_418; 
BgL_key2262z00_6169 = BgL_key2262z00_419; 
BgL_exprza22263za2_6170 = BgL_exprza22263za2_420; 
BgL_effect2264z00_6171 = BgL_effect2264z00_421; 
BgL_fname2265z00_6172 = BgL_fname2265z00_422; 
BgL_ftype2266z00_6173 = BgL_ftype2266z00_423; 
BgL_otype2267z00_6174 = BgL_otype2267z00_424; 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_locz00) = ((obj_t)BgL_loc2259z00_6166), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2260z00_6167), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32261z21_6168), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_keyz00) = ((obj_t)BgL_key2262z00_6169), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_exprza2za2) = ((obj_t)BgL_exprza22263za2_6170), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_effectz00) = ((obj_t)BgL_effect2264z00_6171), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_fnamez00) = ((obj_t)BgL_fname2265z00_6172), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2266z00_6173), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_415))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2267z00_6174), BUNSPEC); 
return BgL_new2268z00_415;} } 
}



/* _fill-setfield!6212 */
obj_t BGl__fillzd2setfieldz126212zc0zzast_nodez00(obj_t BgL_envz00_5184, obj_t BgL_new2268z00_5185, obj_t BgL_loc2259z00_5186, obj_t BgL_type2260z00_5187, obj_t BgL_sidezd2effectzf32261z21_5188, obj_t BgL_key2262z00_5189, obj_t BgL_exprza22263za2_5190, obj_t BgL_effect2264z00_5191, obj_t BgL_fname2265z00_5192, obj_t BgL_ftype2266z00_5193, obj_t BgL_otype2267z00_5194)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_auxz00_7897;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_res8069z00_6194;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_new2268z00_6175;BgL_typez00_bglt BgL_type2260z00_6177;BgL_typez00_bglt BgL_ftype2266z00_6183;BgL_typez00_bglt BgL_otype2267z00_6184;
BgL_new2268z00_6175 = 
(BgL_setfieldz00_bglt)(BgL_new2268z00_5185); 
BgL_type2260z00_6177 = 
(BgL_typez00_bglt)(BgL_type2260z00_5187); 
BgL_ftype2266z00_6183 = 
(BgL_typez00_bglt)(BgL_ftype2266z00_5193); 
BgL_otype2267z00_6184 = 
(BgL_typez00_bglt)(BgL_otype2267z00_5194); 
{ /* ./Ast/node.scm 102 */
obj_t BgL_loc2259z00_6185;BgL_typez00_bglt BgL_type2260z00_6186;obj_t BgL_sidezd2effectzf32261z21_6187;obj_t BgL_key2262z00_6188;obj_t BgL_exprza22263za2_6189;obj_t BgL_effect2264z00_6190;obj_t BgL_fname2265z00_6191;BgL_typez00_bglt BgL_ftype2266z00_6192;BgL_typez00_bglt BgL_otype2267z00_6193;
BgL_loc2259z00_6185 = BgL_loc2259z00_5186; 
BgL_type2260z00_6186 = BgL_type2260z00_6177; 
BgL_sidezd2effectzf32261z21_6187 = BgL_sidezd2effectzf32261z21_5188; 
BgL_key2262z00_6188 = BgL_key2262z00_5189; 
BgL_exprza22263za2_6189 = BgL_exprza22263za2_5190; 
BgL_effect2264z00_6190 = BgL_effect2264z00_5191; 
BgL_fname2265z00_6191 = BgL_fname2265z00_5192; 
BgL_ftype2266z00_6192 = BgL_ftype2266z00_6183; 
BgL_otype2267z00_6193 = BgL_otype2267z00_6184; 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_locz00) = ((obj_t)BgL_loc2259z00_6185), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2260z00_6186), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32261z21_6187), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_keyz00) = ((obj_t)BgL_key2262z00_6188), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_exprza2za2) = ((obj_t)BgL_exprza22263za2_6189), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_effectz00) = ((obj_t)BgL_effect2264z00_6190), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_fnamez00) = ((obj_t)BgL_fname2265z00_6191), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2266z00_6192), BUNSPEC); 
((((BgL_setfieldz00_bglt)CREF(BgL_new2268z00_6175))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2267z00_6193), BUNSPEC); 
BgL_res8069z00_6194 = BgL_new2268z00_6175; } } 
BgL_auxz00_7897 = BgL_res8069z00_6194; } 
return 
(obj_t)(BgL_auxz00_7897);} } 
}



/* allocate-setfield */
BGL_EXPORTED_DEF BgL_setfieldz00_bglt BGl_allocatezd2setfieldzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_new2279z00_6195;
BgL_new2279z00_6195 = 
((BgL_setfieldz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setfieldz00_bgl) ))); 
{ /* ./Ast/node.scm 102 */
long BgL_arg4147z00_6196;
BgL_arg4147z00_6196 = 
BGl_classzd2numzd2zz__objectz00(BGl_setfieldz00zzast_nodez00); 
{ /* ./Ast/node.scm 102 */
BgL_objectz00_bglt BgL_objz00_6197;
BgL_objz00_6197 = 
(BgL_objectz00_bglt)(BgL_new2279z00_6195); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6197, BgL_arg4147z00_6196); } } 
{ /* ./Ast/node.scm 102 */
BgL_objectz00_bglt BgL_auxz00_7916;
BgL_auxz00_7916 = 
(BgL_objectz00_bglt)(BgL_new2279z00_6195); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7916, BFALSE); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_objz00_6198;
BgL_objz00_6198 = 
(obj_t)(BgL_new2279z00_6195); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6198); BUNSPEC; } 
return BgL_new2279z00_6195;} } 
}



/* _allocate-setfield */
obj_t BGl__allocatezd2setfieldzd2zzast_nodez00(obj_t BgL_envz00_4841)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_auxz00_7921;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_res8070z00_6203;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_new2279z00_6199;
BgL_new2279z00_6199 = 
((BgL_setfieldz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_setfieldz00_bgl) ))); 
{ /* ./Ast/node.scm 102 */
long BgL_arg4147z00_6200;
BgL_arg4147z00_6200 = 
BGl_classzd2numzd2zz__objectz00(BGl_setfieldz00zzast_nodez00); 
{ /* ./Ast/node.scm 102 */
BgL_objectz00_bglt BgL_objz00_6201;
BgL_objz00_6201 = 
(BgL_objectz00_bglt)(BgL_new2279z00_6199); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6201, BgL_arg4147z00_6200); } } 
{ /* ./Ast/node.scm 102 */
BgL_objectz00_bglt BgL_auxz00_7926;
BgL_auxz00_7926 = 
(BgL_objectz00_bglt)(BgL_new2279z00_6199); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7926, BFALSE); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_objz00_6202;
BgL_objz00_6202 = 
(obj_t)(BgL_new2279z00_6199); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6202); BUNSPEC; } 
BgL_res8070z00_6203 = BgL_new2279z00_6199; } 
BgL_auxz00_7921 = BgL_res8070z00_6203; } 
return 
(obj_t)(BgL_auxz00_7921);} } 
}



/* getfield? */
BGL_EXPORTED_DEF bool_t BGl_getfieldzf3zf3zzast_nodez00(obj_t BgL_obj2228z00_428)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2228z00_428, BGl_getfieldz00zzast_nodez00);} 
}



/* _getfield? */
obj_t BGl__getfieldzf3zf3zzast_nodez00(obj_t BgL_envz00_5195, obj_t BgL_obj2228z00_5196)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ /* ./Ast/node.scm 93 */
bool_t BgL_auxz00_7933;
BgL_auxz00_7933 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2228z00_5196, BGl_getfieldz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_7933);} } 
}



/* make-getfield */
BGL_EXPORTED_DEF BgL_getfieldz00_bglt BGl_makezd2getfieldzd2zzast_nodez00(obj_t BgL_loc2158z00_432, BgL_typez00_bglt BgL_type2159z00_433, obj_t BgL_sidezd2effectzf32160z21_434, obj_t BgL_key2161z00_435, obj_t BgL_exprza22162za2_436, obj_t BgL_effect2163z00_437, obj_t BgL_fname2164z00_438, BgL_typez00_bglt BgL_ftype2165z00_439, BgL_typez00_bglt BgL_otype2166z00_440)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_new2167z00_3130;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_res6061z00_3136;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_new2189z00_3131;
BgL_new2189z00_3131 = 
((BgL_getfieldz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_getfieldz00_bgl) ))); 
{ /* ./Ast/node.scm 93 */
long BgL_arg4156z00_3132;
BgL_arg4156z00_3132 = 
BGl_classzd2numzd2zz__objectz00(BGl_getfieldz00zzast_nodez00); 
{ /* ./Ast/node.scm 93 */
BgL_objectz00_bglt BgL_objz00_3133;
BgL_objz00_3133 = 
(BgL_objectz00_bglt)(BgL_new2189z00_3131); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3133, BgL_arg4156z00_3132); } } 
{ /* ./Ast/node.scm 93 */
BgL_objectz00_bglt BgL_auxz00_7940;
BgL_auxz00_7940 = 
(BgL_objectz00_bglt)(BgL_new2189z00_3131); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7940, BFALSE); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_objz00_3135;
BgL_objz00_3135 = 
(obj_t)(BgL_new2189z00_3131); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3135); BUNSPEC; } 
BgL_res6061z00_3136 = BgL_new2189z00_3131; } 
BgL_new2167z00_3130 = BgL_res6061z00_3136; } 
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_res6062z00_3156;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_new2178z00_3137;
BgL_new2178z00_3137 = BgL_new2167z00_3130; 
{ /* ./Ast/node.scm 93 */
obj_t BgL_loc2169z00_3147;BgL_typez00_bglt BgL_type2170z00_3148;obj_t BgL_sidezd2effectzf32171z21_3149;obj_t BgL_key2172z00_3150;obj_t BgL_exprza22173za2_3151;obj_t BgL_effect2174z00_3152;obj_t BgL_fname2175z00_3153;BgL_typez00_bglt BgL_ftype2176z00_3154;BgL_typez00_bglt BgL_otype2177z00_3155;
BgL_loc2169z00_3147 = BgL_loc2158z00_432; 
BgL_type2170z00_3148 = BgL_type2159z00_433; 
BgL_sidezd2effectzf32171z21_3149 = BgL_sidezd2effectzf32160z21_434; 
BgL_key2172z00_3150 = BgL_key2161z00_435; 
BgL_exprza22173za2_3151 = BgL_exprza22162za2_436; 
BgL_effect2174z00_3152 = BgL_effect2163z00_437; 
BgL_fname2175z00_3153 = BgL_fname2164z00_438; 
BgL_ftype2176z00_3154 = BgL_ftype2165z00_439; 
BgL_otype2177z00_3155 = BgL_otype2166z00_440; 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_locz00) = ((obj_t)BgL_loc2169z00_3147), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2170z00_3148), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32171z21_3149), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_keyz00) = ((obj_t)BgL_key2172z00_3150), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_exprza2za2) = ((obj_t)BgL_exprza22173za2_3151), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_effectz00) = ((obj_t)BgL_effect2174z00_3152), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_fnamez00) = ((obj_t)BgL_fname2175z00_3153), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2176z00_3154), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_3137))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2177z00_3155), BUNSPEC); 
BgL_res6062z00_3156 = BgL_new2178z00_3137; } } BgL_res6062z00_3156; } 
return BgL_new2167z00_3130;} } 
}



/* _make-getfield6215 */
obj_t BGl__makezd2getfield6215zd2zzast_nodez00(obj_t BgL_envz00_5197, obj_t BgL_loc2158z00_5198, obj_t BgL_type2159z00_5199, obj_t BgL_sidezd2effectzf32160z21_5200, obj_t BgL_key2161z00_5201, obj_t BgL_exprza22162za2_5202, obj_t BgL_effect2163z00_5203, obj_t BgL_fname2164z00_5204, obj_t BgL_ftype2165z00_5205, obj_t BgL_otype2166z00_5206)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_auxz00_7954;
BgL_auxz00_7954 = 
BGl_makezd2getfieldzd2zzast_nodez00(BgL_loc2158z00_5198, 
(BgL_typez00_bglt)(BgL_type2159z00_5199), BgL_sidezd2effectzf32160z21_5200, BgL_key2161z00_5201, BgL_exprza22162za2_5202, BgL_effect2163z00_5203, BgL_fname2164z00_5204, 
(BgL_typez00_bglt)(BgL_ftype2165z00_5205), 
(BgL_typez00_bglt)(BgL_otype2166z00_5206)); 
return 
(obj_t)(BgL_auxz00_7954);} } 
}



/* fill-getfield! */
BGL_EXPORTED_DEF BgL_getfieldz00_bglt BGl_fillzd2getfieldz12zc0zzast_nodez00(BgL_getfieldz00_bglt BgL_new2178z00_441, obj_t BgL_loc2169z00_442, BgL_typez00_bglt BgL_type2170z00_443, obj_t BgL_sidezd2effectzf32171z21_444, obj_t BgL_key2172z00_445, obj_t BgL_exprza22173za2_446, obj_t BgL_effect2174z00_447, obj_t BgL_fname2175z00_448, BgL_typez00_bglt BgL_ftype2176z00_449, BgL_typez00_bglt BgL_otype2177z00_450)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ /* ./Ast/node.scm 93 */
obj_t BgL_loc2169z00_6205;BgL_typez00_bglt BgL_type2170z00_6206;obj_t BgL_sidezd2effectzf32171z21_6207;obj_t BgL_key2172z00_6208;obj_t BgL_exprza22173za2_6209;obj_t BgL_effect2174z00_6210;obj_t BgL_fname2175z00_6211;BgL_typez00_bglt BgL_ftype2176z00_6212;BgL_typez00_bglt BgL_otype2177z00_6213;
BgL_loc2169z00_6205 = BgL_loc2169z00_442; 
BgL_type2170z00_6206 = BgL_type2170z00_443; 
BgL_sidezd2effectzf32171z21_6207 = BgL_sidezd2effectzf32171z21_444; 
BgL_key2172z00_6208 = BgL_key2172z00_445; 
BgL_exprza22173za2_6209 = BgL_exprza22173za2_446; 
BgL_effect2174z00_6210 = BgL_effect2174z00_447; 
BgL_fname2175z00_6211 = BgL_fname2175z00_448; 
BgL_ftype2176z00_6212 = BgL_ftype2176z00_449; 
BgL_otype2177z00_6213 = BgL_otype2177z00_450; 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_locz00) = ((obj_t)BgL_loc2169z00_6205), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2170z00_6206), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32171z21_6207), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_keyz00) = ((obj_t)BgL_key2172z00_6208), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_exprza2za2) = ((obj_t)BgL_exprza22173za2_6209), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_effectz00) = ((obj_t)BgL_effect2174z00_6210), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_fnamez00) = ((obj_t)BgL_fname2175z00_6211), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2176z00_6212), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_441))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2177z00_6213), BUNSPEC); 
return BgL_new2178z00_441;} } 
}



/* _fill-getfield!6217 */
obj_t BGl__fillzd2getfieldz126217zc0zzast_nodez00(obj_t BgL_envz00_5207, obj_t BgL_new2178z00_5208, obj_t BgL_loc2169z00_5209, obj_t BgL_type2170z00_5210, obj_t BgL_sidezd2effectzf32171z21_5211, obj_t BgL_key2172z00_5212, obj_t BgL_exprza22173za2_5213, obj_t BgL_effect2174z00_5214, obj_t BgL_fname2175z00_5215, obj_t BgL_ftype2176z00_5216, obj_t BgL_otype2177z00_5217)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_auxz00_7969;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_res8071z00_6233;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_new2178z00_6214;BgL_typez00_bglt BgL_type2170z00_6216;BgL_typez00_bglt BgL_ftype2176z00_6222;BgL_typez00_bglt BgL_otype2177z00_6223;
BgL_new2178z00_6214 = 
(BgL_getfieldz00_bglt)(BgL_new2178z00_5208); 
BgL_type2170z00_6216 = 
(BgL_typez00_bglt)(BgL_type2170z00_5210); 
BgL_ftype2176z00_6222 = 
(BgL_typez00_bglt)(BgL_ftype2176z00_5216); 
BgL_otype2177z00_6223 = 
(BgL_typez00_bglt)(BgL_otype2177z00_5217); 
{ /* ./Ast/node.scm 93 */
obj_t BgL_loc2169z00_6224;BgL_typez00_bglt BgL_type2170z00_6225;obj_t BgL_sidezd2effectzf32171z21_6226;obj_t BgL_key2172z00_6227;obj_t BgL_exprza22173za2_6228;obj_t BgL_effect2174z00_6229;obj_t BgL_fname2175z00_6230;BgL_typez00_bglt BgL_ftype2176z00_6231;BgL_typez00_bglt BgL_otype2177z00_6232;
BgL_loc2169z00_6224 = BgL_loc2169z00_5209; 
BgL_type2170z00_6225 = BgL_type2170z00_6216; 
BgL_sidezd2effectzf32171z21_6226 = BgL_sidezd2effectzf32171z21_5211; 
BgL_key2172z00_6227 = BgL_key2172z00_5212; 
BgL_exprza22173za2_6228 = BgL_exprza22173za2_5213; 
BgL_effect2174z00_6229 = BgL_effect2174z00_5214; 
BgL_fname2175z00_6230 = BgL_fname2175z00_5215; 
BgL_ftype2176z00_6231 = BgL_ftype2176z00_6222; 
BgL_otype2177z00_6232 = BgL_otype2177z00_6223; 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_locz00) = ((obj_t)BgL_loc2169z00_6224), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2170z00_6225), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32171z21_6226), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_keyz00) = ((obj_t)BgL_key2172z00_6227), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_exprza2za2) = ((obj_t)BgL_exprza22173za2_6228), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_effectz00) = ((obj_t)BgL_effect2174z00_6229), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_fnamez00) = ((obj_t)BgL_fname2175z00_6230), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_ftype2176z00_6231), BUNSPEC); 
((((BgL_getfieldz00_bglt)CREF(BgL_new2178z00_6214))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_otype2177z00_6232), BUNSPEC); 
BgL_res8071z00_6233 = BgL_new2178z00_6214; } } 
BgL_auxz00_7969 = BgL_res8071z00_6233; } 
return 
(obj_t)(BgL_auxz00_7969);} } 
}



/* allocate-getfield */
BGL_EXPORTED_DEF BgL_getfieldz00_bglt BGl_allocatezd2getfieldzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_new2189z00_6234;
BgL_new2189z00_6234 = 
((BgL_getfieldz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_getfieldz00_bgl) ))); 
{ /* ./Ast/node.scm 93 */
long BgL_arg4156z00_6235;
BgL_arg4156z00_6235 = 
BGl_classzd2numzd2zz__objectz00(BGl_getfieldz00zzast_nodez00); 
{ /* ./Ast/node.scm 93 */
BgL_objectz00_bglt BgL_objz00_6236;
BgL_objz00_6236 = 
(BgL_objectz00_bglt)(BgL_new2189z00_6234); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6236, BgL_arg4156z00_6235); } } 
{ /* ./Ast/node.scm 93 */
BgL_objectz00_bglt BgL_auxz00_7988;
BgL_auxz00_7988 = 
(BgL_objectz00_bglt)(BgL_new2189z00_6234); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7988, BFALSE); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_objz00_6237;
BgL_objz00_6237 = 
(obj_t)(BgL_new2189z00_6234); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6237); BUNSPEC; } 
return BgL_new2189z00_6234;} } 
}



/* _allocate-getfield */
obj_t BGl__allocatezd2getfieldzd2zzast_nodez00(obj_t BgL_envz00_4840)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_auxz00_7993;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_res8072z00_6242;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_new2189z00_6238;
BgL_new2189z00_6238 = 
((BgL_getfieldz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_getfieldz00_bgl) ))); 
{ /* ./Ast/node.scm 93 */
long BgL_arg4156z00_6239;
BgL_arg4156z00_6239 = 
BGl_classzd2numzd2zz__objectz00(BGl_getfieldz00zzast_nodez00); 
{ /* ./Ast/node.scm 93 */
BgL_objectz00_bglt BgL_objz00_6240;
BgL_objz00_6240 = 
(BgL_objectz00_bglt)(BgL_new2189z00_6238); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6240, BgL_arg4156z00_6239); } } 
{ /* ./Ast/node.scm 93 */
BgL_objectz00_bglt BgL_auxz00_7998;
BgL_auxz00_7998 = 
(BgL_objectz00_bglt)(BgL_new2189z00_6238); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_7998, BFALSE); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_objz00_6241;
BgL_objz00_6241 = 
(obj_t)(BgL_new2189z00_6238); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6241); BUNSPEC; } 
BgL_res8072z00_6242 = BgL_new2189z00_6238; } 
BgL_auxz00_7993 = BgL_res8072z00_6242; } 
return 
(obj_t)(BgL_auxz00_7993);} } 
}



/* pragma? */
BGL_EXPORTED_DEF bool_t BGl_pragmazf3zf3zzast_nodez00(obj_t BgL_obj2138z00_454)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2138z00_454, BGl_pragmaz00zzast_nodez00);} 
}



/* _pragma? */
obj_t BGl__pragmazf3zf3zzast_nodez00(obj_t BgL_envz00_5218, obj_t BgL_obj2138z00_5219)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ /* ./Ast/node.scm 89 */
bool_t BgL_auxz00_8005;
BgL_auxz00_8005 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2138z00_5219, BGl_pragmaz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8005);} } 
}



/* make-pragma */
BGL_EXPORTED_DEF BgL_pragmaz00_bglt BGl_makezd2pragmazd2zzast_nodez00(obj_t BgL_loc2082z00_458, BgL_typez00_bglt BgL_type2083z00_459, obj_t BgL_sidezd2effectzf32084z21_460, obj_t BgL_key2085z00_461, obj_t BgL_exprza22086za2_462, obj_t BgL_effect2087z00_463, obj_t BgL_format2088z00_464)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_new2089z00_3171;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_res6063z00_3177;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_new2107z00_3172;
BgL_new2107z00_3172 = 
((BgL_pragmaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_pragmaz00_bgl) ))); 
{ /* ./Ast/node.scm 89 */
long BgL_arg4165z00_3173;
BgL_arg4165z00_3173 = 
BGl_classzd2numzd2zz__objectz00(BGl_pragmaz00zzast_nodez00); 
{ /* ./Ast/node.scm 89 */
BgL_objectz00_bglt BgL_objz00_3174;
BgL_objz00_3174 = 
(BgL_objectz00_bglt)(BgL_new2107z00_3172); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3174, BgL_arg4165z00_3173); } } 
{ /* ./Ast/node.scm 89 */
BgL_objectz00_bglt BgL_auxz00_8012;
BgL_auxz00_8012 = 
(BgL_objectz00_bglt)(BgL_new2107z00_3172); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8012, BFALSE); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_objz00_3176;
BgL_objz00_3176 = 
(obj_t)(BgL_new2107z00_3172); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3176); BUNSPEC; } 
BgL_res6063z00_3177 = BgL_new2107z00_3172; } 
BgL_new2089z00_3171 = BgL_res6063z00_3177; } 
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_res6064z00_3193;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_new2098z00_3178;
BgL_new2098z00_3178 = BgL_new2089z00_3171; 
{ /* ./Ast/node.scm 89 */
obj_t BgL_loc2091z00_3186;BgL_typez00_bglt BgL_type2092z00_3187;obj_t BgL_sidezd2effectzf32093z21_3188;obj_t BgL_key2094z00_3189;obj_t BgL_exprza22095za2_3190;obj_t BgL_effect2096z00_3191;obj_t BgL_format2097z00_3192;
BgL_loc2091z00_3186 = BgL_loc2082z00_458; 
BgL_type2092z00_3187 = BgL_type2083z00_459; 
BgL_sidezd2effectzf32093z21_3188 = BgL_sidezd2effectzf32084z21_460; 
BgL_key2094z00_3189 = BgL_key2085z00_461; 
BgL_exprza22095za2_3190 = BgL_exprza22086za2_462; 
BgL_effect2096z00_3191 = BgL_effect2087z00_463; 
BgL_format2097z00_3192 = BgL_format2088z00_464; 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_3178))->BgL_locz00) = ((obj_t)BgL_loc2091z00_3186), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_3178))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2092z00_3187), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_3178))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32093z21_3188), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_3178))->BgL_keyz00) = ((obj_t)BgL_key2094z00_3189), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_3178))->BgL_exprza2za2) = ((obj_t)BgL_exprza22095za2_3190), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_3178))->BgL_effectz00) = ((obj_t)BgL_effect2096z00_3191), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_3178))->BgL_formatz00) = ((obj_t)BgL_format2097z00_3192), BUNSPEC); 
BgL_res6064z00_3193 = BgL_new2098z00_3178; } } BgL_res6064z00_3193; } 
return BgL_new2089z00_3171;} } 
}



/* _make-pragma6220 */
obj_t BGl__makezd2pragma6220zd2zzast_nodez00(obj_t BgL_envz00_5220, obj_t BgL_loc2082z00_5221, obj_t BgL_type2083z00_5222, obj_t BgL_sidezd2effectzf32084z21_5223, obj_t BgL_key2085z00_5224, obj_t BgL_exprza22086za2_5225, obj_t BgL_effect2087z00_5226, obj_t BgL_format2088z00_5227)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_auxz00_8024;
BgL_auxz00_8024 = 
BGl_makezd2pragmazd2zzast_nodez00(BgL_loc2082z00_5221, 
(BgL_typez00_bglt)(BgL_type2083z00_5222), BgL_sidezd2effectzf32084z21_5223, BgL_key2085z00_5224, BgL_exprza22086za2_5225, BgL_effect2087z00_5226, BgL_format2088z00_5227); 
return 
(obj_t)(BgL_auxz00_8024);} } 
}



/* fill-pragma! */
BGL_EXPORTED_DEF BgL_pragmaz00_bglt BGl_fillzd2pragmaz12zc0zzast_nodez00(BgL_pragmaz00_bglt BgL_new2098z00_465, obj_t BgL_loc2091z00_466, BgL_typez00_bglt BgL_type2092z00_467, obj_t BgL_sidezd2effectzf32093z21_468, obj_t BgL_key2094z00_469, obj_t BgL_exprza22095za2_470, obj_t BgL_effect2096z00_471, obj_t BgL_format2097z00_472)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ /* ./Ast/node.scm 89 */
obj_t BgL_loc2091z00_6244;BgL_typez00_bglt BgL_type2092z00_6245;obj_t BgL_sidezd2effectzf32093z21_6246;obj_t BgL_key2094z00_6247;obj_t BgL_exprza22095za2_6248;obj_t BgL_effect2096z00_6249;obj_t BgL_format2097z00_6250;
BgL_loc2091z00_6244 = BgL_loc2091z00_466; 
BgL_type2092z00_6245 = BgL_type2092z00_467; 
BgL_sidezd2effectzf32093z21_6246 = BgL_sidezd2effectzf32093z21_468; 
BgL_key2094z00_6247 = BgL_key2094z00_469; 
BgL_exprza22095za2_6248 = BgL_exprza22095za2_470; 
BgL_effect2096z00_6249 = BgL_effect2096z00_471; 
BgL_format2097z00_6250 = BgL_format2097z00_472; 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_465))->BgL_locz00) = ((obj_t)BgL_loc2091z00_6244), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_465))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2092z00_6245), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_465))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32093z21_6246), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_465))->BgL_keyz00) = ((obj_t)BgL_key2094z00_6247), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_465))->BgL_exprza2za2) = ((obj_t)BgL_exprza22095za2_6248), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_465))->BgL_effectz00) = ((obj_t)BgL_effect2096z00_6249), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_465))->BgL_formatz00) = ((obj_t)BgL_format2097z00_6250), BUNSPEC); 
return BgL_new2098z00_465;} } 
}



/* _fill-pragma!6222 */
obj_t BGl__fillzd2pragmaz126222zc0zzast_nodez00(obj_t BgL_envz00_5228, obj_t BgL_new2098z00_5229, obj_t BgL_loc2091z00_5230, obj_t BgL_type2092z00_5231, obj_t BgL_sidezd2effectzf32093z21_5232, obj_t BgL_key2094z00_5233, obj_t BgL_exprza22095za2_5234, obj_t BgL_effect2096z00_5235, obj_t BgL_format2097z00_5236)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_auxz00_8035;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_res8073z00_6266;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_new2098z00_6251;BgL_typez00_bglt BgL_type2092z00_6253;
BgL_new2098z00_6251 = 
(BgL_pragmaz00_bglt)(BgL_new2098z00_5229); 
BgL_type2092z00_6253 = 
(BgL_typez00_bglt)(BgL_type2092z00_5231); 
{ /* ./Ast/node.scm 89 */
obj_t BgL_loc2091z00_6259;BgL_typez00_bglt BgL_type2092z00_6260;obj_t BgL_sidezd2effectzf32093z21_6261;obj_t BgL_key2094z00_6262;obj_t BgL_exprza22095za2_6263;obj_t BgL_effect2096z00_6264;obj_t BgL_format2097z00_6265;
BgL_loc2091z00_6259 = BgL_loc2091z00_5230; 
BgL_type2092z00_6260 = BgL_type2092z00_6253; 
BgL_sidezd2effectzf32093z21_6261 = BgL_sidezd2effectzf32093z21_5232; 
BgL_key2094z00_6262 = BgL_key2094z00_5233; 
BgL_exprza22095za2_6263 = BgL_exprza22095za2_5234; 
BgL_effect2096z00_6264 = BgL_effect2096z00_5235; 
BgL_format2097z00_6265 = BgL_format2097z00_5236; 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_6251))->BgL_locz00) = ((obj_t)BgL_loc2091z00_6259), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_6251))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2092z00_6260), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_6251))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32093z21_6261), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_6251))->BgL_keyz00) = ((obj_t)BgL_key2094z00_6262), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_6251))->BgL_exprza2za2) = ((obj_t)BgL_exprza22095za2_6263), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_6251))->BgL_effectz00) = ((obj_t)BgL_effect2096z00_6264), BUNSPEC); 
((((BgL_pragmaz00_bglt)CREF(BgL_new2098z00_6251))->BgL_formatz00) = ((obj_t)BgL_format2097z00_6265), BUNSPEC); 
BgL_res8073z00_6266 = BgL_new2098z00_6251; } } 
BgL_auxz00_8035 = BgL_res8073z00_6266; } 
return 
(obj_t)(BgL_auxz00_8035);} } 
}



/* allocate-pragma */
BGL_EXPORTED_DEF BgL_pragmaz00_bglt BGl_allocatezd2pragmazd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_new2107z00_6267;
BgL_new2107z00_6267 = 
((BgL_pragmaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_pragmaz00_bgl) ))); 
{ /* ./Ast/node.scm 89 */
long BgL_arg4165z00_6268;
BgL_arg4165z00_6268 = 
BGl_classzd2numzd2zz__objectz00(BGl_pragmaz00zzast_nodez00); 
{ /* ./Ast/node.scm 89 */
BgL_objectz00_bglt BgL_objz00_6269;
BgL_objz00_6269 = 
(BgL_objectz00_bglt)(BgL_new2107z00_6267); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6269, BgL_arg4165z00_6268); } } 
{ /* ./Ast/node.scm 89 */
BgL_objectz00_bglt BgL_auxz00_8050;
BgL_auxz00_8050 = 
(BgL_objectz00_bglt)(BgL_new2107z00_6267); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8050, BFALSE); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_objz00_6270;
BgL_objz00_6270 = 
(obj_t)(BgL_new2107z00_6267); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6270); BUNSPEC; } 
return BgL_new2107z00_6267;} } 
}



/* _allocate-pragma */
obj_t BGl__allocatezd2pragmazd2zzast_nodez00(obj_t BgL_envz00_4839)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_auxz00_8055;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_res8074z00_6275;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_new2107z00_6271;
BgL_new2107z00_6271 = 
((BgL_pragmaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_pragmaz00_bgl) ))); 
{ /* ./Ast/node.scm 89 */
long BgL_arg4165z00_6272;
BgL_arg4165z00_6272 = 
BGl_classzd2numzd2zz__objectz00(BGl_pragmaz00zzast_nodez00); 
{ /* ./Ast/node.scm 89 */
BgL_objectz00_bglt BgL_objz00_6273;
BgL_objz00_6273 = 
(BgL_objectz00_bglt)(BgL_new2107z00_6271); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6273, BgL_arg4165z00_6272); } } 
{ /* ./Ast/node.scm 89 */
BgL_objectz00_bglt BgL_auxz00_8060;
BgL_auxz00_8060 = 
(BgL_objectz00_bglt)(BgL_new2107z00_6271); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8060, BFALSE); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_objz00_6274;
BgL_objz00_6274 = 
(obj_t)(BgL_new2107z00_6271); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6274); BUNSPEC; } 
BgL_res8074z00_6275 = BgL_new2107z00_6271; } 
BgL_auxz00_8055 = BgL_res8074z00_6275; } 
return 
(obj_t)(BgL_auxz00_8055);} } 
}



/* extern? */
BGL_EXPORTED_DEF bool_t BGl_externzf3zf3zzast_nodez00(obj_t BgL_obj2064z00_474)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2064z00_474, BGl_externz00zzast_nodez00);} 
}



/* _extern? */
obj_t BGl__externzf3zf3zzast_nodez00(obj_t BgL_envz00_5237, obj_t BgL_obj2064z00_5238)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ /* ./Ast/node.scm 82 */
bool_t BgL_auxz00_8067;
BgL_auxz00_8067 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2064z00_5238, BGl_externz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8067);} } 
}



/* make-extern */
BGL_EXPORTED_DEF BgL_externz00_bglt BGl_makezd2externzd2zzast_nodez00(obj_t BgL_loc2015z00_478, BgL_typez00_bglt BgL_type2016z00_479, obj_t BgL_sidezd2effectzf32017z21_480, obj_t BgL_key2018z00_481, obj_t BgL_exprza22019za2_482, obj_t BgL_effect2020z00_483)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_new2021z00_3206;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_res6065z00_3212;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_new2037z00_3207;
BgL_new2037z00_3207 = 
((BgL_externz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_externz00_bgl) ))); 
{ /* ./Ast/node.scm 82 */
long BgL_arg4174z00_3208;
BgL_arg4174z00_3208 = 
BGl_classzd2numzd2zz__objectz00(BGl_externz00zzast_nodez00); 
{ /* ./Ast/node.scm 82 */
BgL_objectz00_bglt BgL_objz00_3209;
BgL_objz00_3209 = 
(BgL_objectz00_bglt)(BgL_new2037z00_3207); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3209, BgL_arg4174z00_3208); } } 
{ /* ./Ast/node.scm 82 */
BgL_objectz00_bglt BgL_auxz00_8074;
BgL_auxz00_8074 = 
(BgL_objectz00_bglt)(BgL_new2037z00_3207); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8074, BFALSE); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_objz00_3211;
BgL_objz00_3211 = 
(obj_t)(BgL_new2037z00_3207); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3211); BUNSPEC; } 
BgL_res6065z00_3212 = BgL_new2037z00_3207; } 
BgL_new2021z00_3206 = BgL_res6065z00_3212; } 
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_res6066z00_3226;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_new2029z00_3213;
BgL_new2029z00_3213 = BgL_new2021z00_3206; 
{ /* ./Ast/node.scm 82 */
obj_t BgL_loc2023z00_3220;BgL_typez00_bglt BgL_type2024z00_3221;obj_t BgL_sidezd2effectzf32025z21_3222;obj_t BgL_key2026z00_3223;obj_t BgL_exprza22027za2_3224;obj_t BgL_effect2028z00_3225;
BgL_loc2023z00_3220 = BgL_loc2015z00_478; 
BgL_type2024z00_3221 = BgL_type2016z00_479; 
BgL_sidezd2effectzf32025z21_3222 = BgL_sidezd2effectzf32017z21_480; 
BgL_key2026z00_3223 = BgL_key2018z00_481; 
BgL_exprza22027za2_3224 = BgL_exprza22019za2_482; 
BgL_effect2028z00_3225 = BgL_effect2020z00_483; 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_3213))->BgL_locz00) = ((obj_t)BgL_loc2023z00_3220), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_3213))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2024z00_3221), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_3213))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32025z21_3222), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_3213))->BgL_keyz00) = ((obj_t)BgL_key2026z00_3223), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_3213))->BgL_exprza2za2) = ((obj_t)BgL_exprza22027za2_3224), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_3213))->BgL_effectz00) = ((obj_t)BgL_effect2028z00_3225), BUNSPEC); 
BgL_res6066z00_3226 = BgL_new2029z00_3213; } } BgL_res6066z00_3226; } 
return BgL_new2021z00_3206;} } 
}



/* _make-extern6225 */
obj_t BGl__makezd2extern6225zd2zzast_nodez00(obj_t BgL_envz00_5239, obj_t BgL_loc2015z00_5240, obj_t BgL_type2016z00_5241, obj_t BgL_sidezd2effectzf32017z21_5242, obj_t BgL_key2018z00_5243, obj_t BgL_exprza22019za2_5244, obj_t BgL_effect2020z00_5245)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_auxz00_8085;
BgL_auxz00_8085 = 
BGl_makezd2externzd2zzast_nodez00(BgL_loc2015z00_5240, 
(BgL_typez00_bglt)(BgL_type2016z00_5241), BgL_sidezd2effectzf32017z21_5242, BgL_key2018z00_5243, BgL_exprza22019za2_5244, BgL_effect2020z00_5245); 
return 
(obj_t)(BgL_auxz00_8085);} } 
}



/* fill-extern! */
BGL_EXPORTED_DEF BgL_externz00_bglt BGl_fillzd2externz12zc0zzast_nodez00(BgL_externz00_bglt BgL_new2029z00_484, obj_t BgL_loc2023z00_485, BgL_typez00_bglt BgL_type2024z00_486, obj_t BgL_sidezd2effectzf32025z21_487, obj_t BgL_key2026z00_488, obj_t BgL_exprza22027za2_489, obj_t BgL_effect2028z00_490)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ /* ./Ast/node.scm 82 */
obj_t BgL_loc2023z00_6277;BgL_typez00_bglt BgL_type2024z00_6278;obj_t BgL_sidezd2effectzf32025z21_6279;obj_t BgL_key2026z00_6280;obj_t BgL_exprza22027za2_6281;obj_t BgL_effect2028z00_6282;
BgL_loc2023z00_6277 = BgL_loc2023z00_485; 
BgL_type2024z00_6278 = BgL_type2024z00_486; 
BgL_sidezd2effectzf32025z21_6279 = BgL_sidezd2effectzf32025z21_487; 
BgL_key2026z00_6280 = BgL_key2026z00_488; 
BgL_exprza22027za2_6281 = BgL_exprza22027za2_489; 
BgL_effect2028z00_6282 = BgL_effect2028z00_490; 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_484))->BgL_locz00) = ((obj_t)BgL_loc2023z00_6277), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_484))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2024z00_6278), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_484))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32025z21_6279), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_484))->BgL_keyz00) = ((obj_t)BgL_key2026z00_6280), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_484))->BgL_exprza2za2) = ((obj_t)BgL_exprza22027za2_6281), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_484))->BgL_effectz00) = ((obj_t)BgL_effect2028z00_6282), BUNSPEC); 
return BgL_new2029z00_484;} } 
}



/* _fill-extern!6227 */
obj_t BGl__fillzd2externz126227zc0zzast_nodez00(obj_t BgL_envz00_5246, obj_t BgL_new2029z00_5247, obj_t BgL_loc2023z00_5248, obj_t BgL_type2024z00_5249, obj_t BgL_sidezd2effectzf32025z21_5250, obj_t BgL_key2026z00_5251, obj_t BgL_exprza22027za2_5252, obj_t BgL_effect2028z00_5253)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_auxz00_8095;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_res8075z00_6296;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_new2029z00_6283;BgL_typez00_bglt BgL_type2024z00_6285;
BgL_new2029z00_6283 = 
(BgL_externz00_bglt)(BgL_new2029z00_5247); 
BgL_type2024z00_6285 = 
(BgL_typez00_bglt)(BgL_type2024z00_5249); 
{ /* ./Ast/node.scm 82 */
obj_t BgL_loc2023z00_6290;BgL_typez00_bglt BgL_type2024z00_6291;obj_t BgL_sidezd2effectzf32025z21_6292;obj_t BgL_key2026z00_6293;obj_t BgL_exprza22027za2_6294;obj_t BgL_effect2028z00_6295;
BgL_loc2023z00_6290 = BgL_loc2023z00_5248; 
BgL_type2024z00_6291 = BgL_type2024z00_6285; 
BgL_sidezd2effectzf32025z21_6292 = BgL_sidezd2effectzf32025z21_5250; 
BgL_key2026z00_6293 = BgL_key2026z00_5251; 
BgL_exprza22027za2_6294 = BgL_exprza22027za2_5252; 
BgL_effect2028z00_6295 = BgL_effect2028z00_5253; 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_6283))->BgL_locz00) = ((obj_t)BgL_loc2023z00_6290), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_6283))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type2024z00_6291), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_6283))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf32025z21_6292), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_6283))->BgL_keyz00) = ((obj_t)BgL_key2026z00_6293), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_6283))->BgL_exprza2za2) = ((obj_t)BgL_exprza22027za2_6294), BUNSPEC); 
((((BgL_externz00_bglt)CREF(BgL_new2029z00_6283))->BgL_effectz00) = ((obj_t)BgL_effect2028z00_6295), BUNSPEC); 
BgL_res8075z00_6296 = BgL_new2029z00_6283; } } 
BgL_auxz00_8095 = BgL_res8075z00_6296; } 
return 
(obj_t)(BgL_auxz00_8095);} } 
}



/* allocate-extern */
BGL_EXPORTED_DEF BgL_externz00_bglt BGl_allocatezd2externzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_new2037z00_6297;
BgL_new2037z00_6297 = 
((BgL_externz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_externz00_bgl) ))); 
{ /* ./Ast/node.scm 82 */
long BgL_arg4174z00_6298;
BgL_arg4174z00_6298 = 
BGl_classzd2numzd2zz__objectz00(BGl_externz00zzast_nodez00); 
{ /* ./Ast/node.scm 82 */
BgL_objectz00_bglt BgL_objz00_6299;
BgL_objz00_6299 = 
(BgL_objectz00_bglt)(BgL_new2037z00_6297); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6299, BgL_arg4174z00_6298); } } 
{ /* ./Ast/node.scm 82 */
BgL_objectz00_bglt BgL_auxz00_8109;
BgL_auxz00_8109 = 
(BgL_objectz00_bglt)(BgL_new2037z00_6297); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8109, BFALSE); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_objz00_6300;
BgL_objz00_6300 = 
(obj_t)(BgL_new2037z00_6297); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6300); BUNSPEC; } 
return BgL_new2037z00_6297;} } 
}



/* _allocate-extern */
obj_t BGl__allocatezd2externzd2zzast_nodez00(obj_t BgL_envz00_4838)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_auxz00_8114;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_res8076z00_6305;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_new2037z00_6301;
BgL_new2037z00_6301 = 
((BgL_externz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_externz00_bgl) ))); 
{ /* ./Ast/node.scm 82 */
long BgL_arg4174z00_6302;
BgL_arg4174z00_6302 = 
BGl_classzd2numzd2zz__objectz00(BGl_externz00zzast_nodez00); 
{ /* ./Ast/node.scm 82 */
BgL_objectz00_bglt BgL_objz00_6303;
BgL_objz00_6303 = 
(BgL_objectz00_bglt)(BgL_new2037z00_6301); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6303, BgL_arg4174z00_6302); } } 
{ /* ./Ast/node.scm 82 */
BgL_objectz00_bglt BgL_auxz00_8119;
BgL_auxz00_8119 = 
(BgL_objectz00_bglt)(BgL_new2037z00_6301); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8119, BFALSE); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_objz00_6304;
BgL_objz00_6304 = 
(obj_t)(BgL_new2037z00_6301); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6304); BUNSPEC; } 
BgL_res8076z00_6305 = BgL_new2037z00_6301; } 
BgL_auxz00_8114 = BgL_res8076z00_6305; } 
return 
(obj_t)(BgL_auxz00_8114);} } 
}



/* funcall? */
BGL_EXPORTED_DEF bool_t BGl_funcallzf3zf3zzast_nodez00(obj_t BgL_obj1998z00_497)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1998z00_497, BGl_funcallz00zzast_nodez00);} 
}



/* _funcall? */
obj_t BGl__funcallzf3zf3zzast_nodez00(obj_t BgL_envz00_5254, obj_t BgL_obj1998z00_5255)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ /* ./Ast/node.scm 72 */
bool_t BgL_auxz00_8126;
BgL_auxz00_8126 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1998z00_5255, BGl_funcallz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8126);} } 
}



/* make-funcall */
BGL_EXPORTED_DEF BgL_funcallz00_bglt BGl_makezd2funcallzd2zzast_nodez00(obj_t BgL_loc1956z00_501, BgL_typez00_bglt BgL_type1957z00_502, BgL_nodez00_bglt BgL_fun1958z00_503, obj_t BgL_args1959z00_504, obj_t BgL_strength1960z00_505)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_new1961z00_3238;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_res6067z00_3244;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_new1975z00_3239;
BgL_new1975z00_3239 = 
((BgL_funcallz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_funcallz00_bgl) ))); 
{ /* ./Ast/node.scm 72 */
long BgL_arg4183z00_3240;
BgL_arg4183z00_3240 = 
BGl_classzd2numzd2zz__objectz00(BGl_funcallz00zzast_nodez00); 
{ /* ./Ast/node.scm 72 */
BgL_objectz00_bglt BgL_objz00_3241;
BgL_objz00_3241 = 
(BgL_objectz00_bglt)(BgL_new1975z00_3239); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3241, BgL_arg4183z00_3240); } } 
{ /* ./Ast/node.scm 72 */
BgL_objectz00_bglt BgL_auxz00_8133;
BgL_auxz00_8133 = 
(BgL_objectz00_bglt)(BgL_new1975z00_3239); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8133, BFALSE); } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_objz00_3243;
BgL_objz00_3243 = 
(obj_t)(BgL_new1975z00_3239); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3243); BUNSPEC; } 
BgL_res6067z00_3244 = BgL_new1975z00_3239; } 
BgL_new1961z00_3238 = BgL_res6067z00_3244; } 
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_res6068z00_3256;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_new1968z00_3245;
BgL_new1968z00_3245 = BgL_new1961z00_3238; 
{ /* ./Ast/node.scm 72 */
obj_t BgL_loc1963z00_3251;BgL_typez00_bglt BgL_type1964z00_3252;BgL_nodez00_bglt BgL_fun1965z00_3253;obj_t BgL_args1966z00_3254;obj_t BgL_strength1967z00_3255;
BgL_loc1963z00_3251 = BgL_loc1956z00_501; 
BgL_type1964z00_3252 = BgL_type1957z00_502; 
BgL_fun1965z00_3253 = BgL_fun1958z00_503; 
BgL_args1966z00_3254 = BgL_args1959z00_504; 
BgL_strength1967z00_3255 = BgL_strength1960z00_505; 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_3245))->BgL_locz00) = ((obj_t)BgL_loc1963z00_3251), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_3245))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1964z00_3252), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_3245))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_fun1965z00_3253), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_3245))->BgL_argsz00) = ((obj_t)BgL_args1966z00_3254), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_3245))->BgL_strengthz00) = ((obj_t)BgL_strength1967z00_3255), BUNSPEC); 
BgL_res6068z00_3256 = BgL_new1968z00_3245; } } BgL_res6068z00_3256; } 
return BgL_new1961z00_3238;} } 
}



/* _make-funcall6230 */
obj_t BGl__makezd2funcall6230zd2zzast_nodez00(obj_t BgL_envz00_5256, obj_t BgL_loc1956z00_5257, obj_t BgL_type1957z00_5258, obj_t BgL_fun1958z00_5259, obj_t BgL_args1959z00_5260, obj_t BgL_strength1960z00_5261)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_auxz00_8143;
BgL_auxz00_8143 = 
BGl_makezd2funcallzd2zzast_nodez00(BgL_loc1956z00_5257, 
(BgL_typez00_bglt)(BgL_type1957z00_5258), 
(BgL_nodez00_bglt)(BgL_fun1958z00_5259), BgL_args1959z00_5260, BgL_strength1960z00_5261); 
return 
(obj_t)(BgL_auxz00_8143);} } 
}



/* fill-funcall! */
BGL_EXPORTED_DEF BgL_funcallz00_bglt BGl_fillzd2funcallz12zc0zzast_nodez00(BgL_funcallz00_bglt BgL_new1968z00_506, obj_t BgL_loc1963z00_507, BgL_typez00_bglt BgL_type1964z00_508, BgL_nodez00_bglt BgL_fun1965z00_509, obj_t BgL_args1966z00_510, obj_t BgL_strength1967z00_511)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ /* ./Ast/node.scm 72 */
obj_t BgL_loc1963z00_6307;BgL_typez00_bglt BgL_type1964z00_6308;BgL_nodez00_bglt BgL_fun1965z00_6309;obj_t BgL_args1966z00_6310;obj_t BgL_strength1967z00_6311;
BgL_loc1963z00_6307 = BgL_loc1963z00_507; 
BgL_type1964z00_6308 = BgL_type1964z00_508; 
BgL_fun1965z00_6309 = BgL_fun1965z00_509; 
BgL_args1966z00_6310 = BgL_args1966z00_510; 
BgL_strength1967z00_6311 = BgL_strength1967z00_511; 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_506))->BgL_locz00) = ((obj_t)BgL_loc1963z00_6307), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_506))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1964z00_6308), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_506))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_fun1965z00_6309), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_506))->BgL_argsz00) = ((obj_t)BgL_args1966z00_6310), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_506))->BgL_strengthz00) = ((obj_t)BgL_strength1967z00_6311), BUNSPEC); 
return BgL_new1968z00_506;} } 
}



/* _fill-funcall!6232 */
obj_t BGl__fillzd2funcallz126232zc0zzast_nodez00(obj_t BgL_envz00_5262, obj_t BgL_new1968z00_5263, obj_t BgL_loc1963z00_5264, obj_t BgL_type1964z00_5265, obj_t BgL_fun1965z00_5266, obj_t BgL_args1966z00_5267, obj_t BgL_strength1967z00_5268)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_auxz00_8153;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_res8077z00_6323;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_new1968z00_6312;BgL_typez00_bglt BgL_type1964z00_6314;BgL_nodez00_bglt BgL_fun1965z00_6315;
BgL_new1968z00_6312 = 
(BgL_funcallz00_bglt)(BgL_new1968z00_5263); 
BgL_type1964z00_6314 = 
(BgL_typez00_bglt)(BgL_type1964z00_5265); 
BgL_fun1965z00_6315 = 
(BgL_nodez00_bglt)(BgL_fun1965z00_5266); 
{ /* ./Ast/node.scm 72 */
obj_t BgL_loc1963z00_6318;BgL_typez00_bglt BgL_type1964z00_6319;BgL_nodez00_bglt BgL_fun1965z00_6320;obj_t BgL_args1966z00_6321;obj_t BgL_strength1967z00_6322;
BgL_loc1963z00_6318 = BgL_loc1963z00_5264; 
BgL_type1964z00_6319 = BgL_type1964z00_6314; 
BgL_fun1965z00_6320 = BgL_fun1965z00_6315; 
BgL_args1966z00_6321 = BgL_args1966z00_5267; 
BgL_strength1967z00_6322 = BgL_strength1967z00_5268; 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_6312))->BgL_locz00) = ((obj_t)BgL_loc1963z00_6318), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_6312))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1964z00_6319), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_6312))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_fun1965z00_6320), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_6312))->BgL_argsz00) = ((obj_t)BgL_args1966z00_6321), BUNSPEC); 
((((BgL_funcallz00_bglt)CREF(BgL_new1968z00_6312))->BgL_strengthz00) = ((obj_t)BgL_strength1967z00_6322), BUNSPEC); 
BgL_res8077z00_6323 = BgL_new1968z00_6312; } } 
BgL_auxz00_8153 = BgL_res8077z00_6323; } 
return 
(obj_t)(BgL_auxz00_8153);} } 
}



/* allocate-funcall */
BGL_EXPORTED_DEF BgL_funcallz00_bglt BGl_allocatezd2funcallzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_new1975z00_6324;
BgL_new1975z00_6324 = 
((BgL_funcallz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_funcallz00_bgl) ))); 
{ /* ./Ast/node.scm 72 */
long BgL_arg4183z00_6325;
BgL_arg4183z00_6325 = 
BGl_classzd2numzd2zz__objectz00(BGl_funcallz00zzast_nodez00); 
{ /* ./Ast/node.scm 72 */
BgL_objectz00_bglt BgL_objz00_6326;
BgL_objz00_6326 = 
(BgL_objectz00_bglt)(BgL_new1975z00_6324); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6326, BgL_arg4183z00_6325); } } 
{ /* ./Ast/node.scm 72 */
BgL_objectz00_bglt BgL_auxz00_8167;
BgL_auxz00_8167 = 
(BgL_objectz00_bglt)(BgL_new1975z00_6324); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8167, BFALSE); } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_objz00_6327;
BgL_objz00_6327 = 
(obj_t)(BgL_new1975z00_6324); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6327); BUNSPEC; } 
return BgL_new1975z00_6324;} } 
}



/* _allocate-funcall */
obj_t BGl__allocatezd2funcallzd2zzast_nodez00(obj_t BgL_envz00_4837)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_auxz00_8172;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_res8078z00_6332;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_new1975z00_6328;
BgL_new1975z00_6328 = 
((BgL_funcallz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_funcallz00_bgl) ))); 
{ /* ./Ast/node.scm 72 */
long BgL_arg4183z00_6329;
BgL_arg4183z00_6329 = 
BGl_classzd2numzd2zz__objectz00(BGl_funcallz00zzast_nodez00); 
{ /* ./Ast/node.scm 72 */
BgL_objectz00_bglt BgL_objz00_6330;
BgL_objz00_6330 = 
(BgL_objectz00_bglt)(BgL_new1975z00_6328); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6330, BgL_arg4183z00_6329); } } 
{ /* ./Ast/node.scm 72 */
BgL_objectz00_bglt BgL_auxz00_8177;
BgL_auxz00_8177 = 
(BgL_objectz00_bglt)(BgL_new1975z00_6328); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8177, BFALSE); } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_objz00_6331;
BgL_objz00_6331 = 
(obj_t)(BgL_new1975z00_6328); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6331); BUNSPEC; } 
BgL_res8078z00_6332 = BgL_new1975z00_6328; } 
BgL_auxz00_8172 = BgL_res8078z00_6332; } 
return 
(obj_t)(BgL_auxz00_8172);} } 
}



/* app-ly? */
BGL_EXPORTED_DEF bool_t BGl_appzd2lyzf3z21zzast_nodez00(obj_t BgL_obj1942z00_521)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1942z00_521, BGl_appzd2lyzd2zzast_nodez00);} 
}



/* _app-ly? */
obj_t BGl__appzd2lyzf3z21zzast_nodez00(obj_t BgL_envz00_5269, obj_t BgL_obj1942z00_5270)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ /* ./Ast/node.scm 65 */
bool_t BgL_auxz00_8184;
BgL_auxz00_8184 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1942z00_5270, BGl_appzd2lyzd2zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8184);} } 
}



/* make-app-ly */
BGL_EXPORTED_DEF BgL_appzd2lyzd2_bglt BGl_makezd2appzd2lyz00zzast_nodez00(obj_t BgL_loc1904z00_525, BgL_typez00_bglt BgL_type1905z00_526, BgL_nodez00_bglt BgL_fun1906z00_527, BgL_nodez00_bglt BgL_arg1908z00_528)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_new1909z00_3267;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_res6069z00_3273;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_new1922z00_3268;
BgL_new1922z00_3268 = 
((BgL_appzd2lyzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_appzd2lyzd2_bgl) ))); 
{ /* ./Ast/node.scm 65 */
long BgL_arg4192z00_3269;
BgL_arg4192z00_3269 = 
BGl_classzd2numzd2zz__objectz00(BGl_appzd2lyzd2zzast_nodez00); 
{ /* ./Ast/node.scm 65 */
BgL_objectz00_bglt BgL_objz00_3270;
BgL_objz00_3270 = 
(BgL_objectz00_bglt)(BgL_new1922z00_3268); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3270, BgL_arg4192z00_3269); } } 
{ /* ./Ast/node.scm 65 */
BgL_objectz00_bglt BgL_auxz00_8191;
BgL_auxz00_8191 = 
(BgL_objectz00_bglt)(BgL_new1922z00_3268); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8191, BFALSE); } 
{ /* ./Ast/node.scm 65 */
obj_t BgL_objz00_3272;
BgL_objz00_3272 = 
(obj_t)(BgL_new1922z00_3268); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3272); BUNSPEC; } 
BgL_res6069z00_3273 = BgL_new1922z00_3268; } 
BgL_new1909z00_3267 = BgL_res6069z00_3273; } 
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_res6070z00_3283;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_new1916z00_3274;
BgL_new1916z00_3274 = BgL_new1909z00_3267; 
{ /* ./Ast/node.scm 65 */
obj_t BgL_loc1911z00_3279;BgL_typez00_bglt BgL_type1912z00_3280;BgL_nodez00_bglt BgL_fun1913z00_3281;BgL_nodez00_bglt BgL_arg1915z00_3282;
BgL_loc1911z00_3279 = BgL_loc1904z00_525; 
BgL_type1912z00_3280 = BgL_type1905z00_526; 
BgL_fun1913z00_3281 = BgL_fun1906z00_527; 
BgL_arg1915z00_3282 = BgL_arg1908z00_528; 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_3274))->BgL_locz00) = ((obj_t)BgL_loc1911z00_3279), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_3274))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1912z00_3280), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_3274))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_fun1913z00_3281), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_3274))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_arg1915z00_3282), BUNSPEC); 
BgL_res6070z00_3283 = BgL_new1916z00_3274; } } BgL_res6070z00_3283; } 
return BgL_new1909z00_3267;} } 
}



/* _make-app-ly6235 */
obj_t BGl__makezd2appzd2ly6235z00zzast_nodez00(obj_t BgL_envz00_5271, obj_t BgL_loc1904z00_5272, obj_t BgL_type1905z00_5273, obj_t BgL_fun1906z00_5274, obj_t BgL_arg1908z00_5275)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_auxz00_8200;
BgL_auxz00_8200 = 
BGl_makezd2appzd2lyz00zzast_nodez00(BgL_loc1904z00_5272, 
(BgL_typez00_bglt)(BgL_type1905z00_5273), 
(BgL_nodez00_bglt)(BgL_fun1906z00_5274), 
(BgL_nodez00_bglt)(BgL_arg1908z00_5275)); 
return 
(obj_t)(BgL_auxz00_8200);} } 
}



/* fill-app-ly! */
BGL_EXPORTED_DEF BgL_appzd2lyzd2_bglt BGl_fillzd2appzd2lyz12z12zzast_nodez00(BgL_appzd2lyzd2_bglt BgL_new1916z00_529, obj_t BgL_loc1911z00_530, BgL_typez00_bglt BgL_type1912z00_531, BgL_nodez00_bglt BgL_fun1913z00_532, BgL_nodez00_bglt BgL_arg1915z00_533)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ /* ./Ast/node.scm 65 */
obj_t BgL_loc1911z00_6334;BgL_typez00_bglt BgL_type1912z00_6335;BgL_nodez00_bglt BgL_fun1913z00_6336;BgL_nodez00_bglt BgL_arg1915z00_6337;
BgL_loc1911z00_6334 = BgL_loc1911z00_530; 
BgL_type1912z00_6335 = BgL_type1912z00_531; 
BgL_fun1913z00_6336 = BgL_fun1913z00_532; 
BgL_arg1915z00_6337 = BgL_arg1915z00_533; 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_529))->BgL_locz00) = ((obj_t)BgL_loc1911z00_6334), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_529))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1912z00_6335), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_529))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_fun1913z00_6336), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_529))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_arg1915z00_6337), BUNSPEC); 
return BgL_new1916z00_529;} } 
}



/* _fill-app-ly!6237 */
obj_t BGl__fillzd2appzd2lyz126237z12zzast_nodez00(obj_t BgL_envz00_5276, obj_t BgL_new1916z00_5277, obj_t BgL_loc1911z00_5278, obj_t BgL_type1912z00_5279, obj_t BgL_fun1913z00_5280, obj_t BgL_arg1915z00_5281)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_auxz00_8210;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_res8079z00_6347;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_new1916z00_6338;BgL_typez00_bglt BgL_type1912z00_6340;BgL_nodez00_bglt BgL_fun1913z00_6341;BgL_nodez00_bglt BgL_arg1915z00_6342;
BgL_new1916z00_6338 = 
(BgL_appzd2lyzd2_bglt)(BgL_new1916z00_5277); 
BgL_type1912z00_6340 = 
(BgL_typez00_bglt)(BgL_type1912z00_5279); 
BgL_fun1913z00_6341 = 
(BgL_nodez00_bglt)(BgL_fun1913z00_5280); 
BgL_arg1915z00_6342 = 
(BgL_nodez00_bglt)(BgL_arg1915z00_5281); 
{ /* ./Ast/node.scm 65 */
obj_t BgL_loc1911z00_6343;BgL_typez00_bglt BgL_type1912z00_6344;BgL_nodez00_bglt BgL_fun1913z00_6345;BgL_nodez00_bglt BgL_arg1915z00_6346;
BgL_loc1911z00_6343 = BgL_loc1911z00_5278; 
BgL_type1912z00_6344 = BgL_type1912z00_6340; 
BgL_fun1913z00_6345 = BgL_fun1913z00_6341; 
BgL_arg1915z00_6346 = BgL_arg1915z00_6342; 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_6338))->BgL_locz00) = ((obj_t)BgL_loc1911z00_6343), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_6338))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1912z00_6344), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_6338))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_fun1913z00_6345), BUNSPEC); 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_new1916z00_6338))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_arg1915z00_6346), BUNSPEC); 
BgL_res8079z00_6347 = BgL_new1916z00_6338; } } 
BgL_auxz00_8210 = BgL_res8079z00_6347; } 
return 
(obj_t)(BgL_auxz00_8210);} } 
}



/* allocate-app-ly */
BGL_EXPORTED_DEF BgL_appzd2lyzd2_bglt BGl_allocatezd2appzd2lyz00zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_new1922z00_6348;
BgL_new1922z00_6348 = 
((BgL_appzd2lyzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_appzd2lyzd2_bgl) ))); 
{ /* ./Ast/node.scm 65 */
long BgL_arg4192z00_6349;
BgL_arg4192z00_6349 = 
BGl_classzd2numzd2zz__objectz00(BGl_appzd2lyzd2zzast_nodez00); 
{ /* ./Ast/node.scm 65 */
BgL_objectz00_bglt BgL_objz00_6350;
BgL_objz00_6350 = 
(BgL_objectz00_bglt)(BgL_new1922z00_6348); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6350, BgL_arg4192z00_6349); } } 
{ /* ./Ast/node.scm 65 */
BgL_objectz00_bglt BgL_auxz00_8224;
BgL_auxz00_8224 = 
(BgL_objectz00_bglt)(BgL_new1922z00_6348); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8224, BFALSE); } 
{ /* ./Ast/node.scm 65 */
obj_t BgL_objz00_6351;
BgL_objz00_6351 = 
(obj_t)(BgL_new1922z00_6348); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6351); BUNSPEC; } 
return BgL_new1922z00_6348;} } 
}



/* _allocate-app-ly */
obj_t BGl__allocatezd2appzd2lyz00zzast_nodez00(obj_t BgL_envz00_4836)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_auxz00_8229;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_res8080z00_6356;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_new1922z00_6352;
BgL_new1922z00_6352 = 
((BgL_appzd2lyzd2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_appzd2lyzd2_bgl) ))); 
{ /* ./Ast/node.scm 65 */
long BgL_arg4192z00_6353;
BgL_arg4192z00_6353 = 
BGl_classzd2numzd2zz__objectz00(BGl_appzd2lyzd2zzast_nodez00); 
{ /* ./Ast/node.scm 65 */
BgL_objectz00_bglt BgL_objz00_6354;
BgL_objz00_6354 = 
(BgL_objectz00_bglt)(BgL_new1922z00_6352); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6354, BgL_arg4192z00_6353); } } 
{ /* ./Ast/node.scm 65 */
BgL_objectz00_bglt BgL_auxz00_8234;
BgL_auxz00_8234 = 
(BgL_objectz00_bglt)(BgL_new1922z00_6352); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8234, BFALSE); } 
{ /* ./Ast/node.scm 65 */
obj_t BgL_objz00_6355;
BgL_objz00_6355 = 
(obj_t)(BgL_new1922z00_6352); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6355); BUNSPEC; } 
BgL_res8080z00_6356 = BgL_new1922z00_6352; } 
BgL_auxz00_8229 = BgL_res8080z00_6356; } 
return 
(obj_t)(BgL_auxz00_8229);} } 
}



/* app? */
BGL_EXPORTED_DEF bool_t BGl_appzf3zf3zzast_nodez00(obj_t BgL_obj1893z00_540)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1893z00_540, BGl_appz00zzast_nodez00);} 
}



/* _app? */
obj_t BGl__appzf3zf3zzast_nodez00(obj_t BgL_envz00_5282, obj_t BgL_obj1893z00_5283)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ /* ./Ast/node.scm 58 */
bool_t BgL_auxz00_8241;
BgL_auxz00_8241 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1893z00_5283, BGl_appz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8241);} } 
}



/* make-app */
BGL_EXPORTED_DEF BgL_appz00_bglt BGl_makezd2appzd2zzast_nodez00(obj_t BgL_loc1844z00_544, BgL_typez00_bglt BgL_type1845z00_545, obj_t BgL_sidezd2effectzf31846z21_546, obj_t BgL_key1847z00_547, BgL_varz00_bglt BgL_fun1848z00_548, obj_t BgL_args1849z00_549)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_new1850z00_3293;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_res6071z00_3299;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_new1866z00_3294;
BgL_new1866z00_3294 = 
((BgL_appz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_appz00_bgl) ))); 
{ /* ./Ast/node.scm 58 */
long BgL_arg4201z00_3295;
BgL_arg4201z00_3295 = 
BGl_classzd2numzd2zz__objectz00(BGl_appz00zzast_nodez00); 
{ /* ./Ast/node.scm 58 */
BgL_objectz00_bglt BgL_objz00_3296;
BgL_objz00_3296 = 
(BgL_objectz00_bglt)(BgL_new1866z00_3294); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3296, BgL_arg4201z00_3295); } } 
{ /* ./Ast/node.scm 58 */
BgL_objectz00_bglt BgL_auxz00_8248;
BgL_auxz00_8248 = 
(BgL_objectz00_bglt)(BgL_new1866z00_3294); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8248, BFALSE); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_objz00_3298;
BgL_objz00_3298 = 
(obj_t)(BgL_new1866z00_3294); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3298); BUNSPEC; } 
BgL_res6071z00_3299 = BgL_new1866z00_3294; } 
BgL_new1850z00_3293 = BgL_res6071z00_3299; } 
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_res6072z00_3313;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_new1858z00_3300;
BgL_new1858z00_3300 = BgL_new1850z00_3293; 
{ /* ./Ast/node.scm 58 */
obj_t BgL_loc1852z00_3307;BgL_typez00_bglt BgL_type1853z00_3308;obj_t BgL_sidezd2effectzf31854z21_3309;obj_t BgL_key1855z00_3310;BgL_varz00_bglt BgL_fun1856z00_3311;obj_t BgL_args1857z00_3312;
BgL_loc1852z00_3307 = BgL_loc1844z00_544; 
BgL_type1853z00_3308 = BgL_type1845z00_545; 
BgL_sidezd2effectzf31854z21_3309 = BgL_sidezd2effectzf31846z21_546; 
BgL_key1855z00_3310 = BgL_key1847z00_547; 
BgL_fun1856z00_3311 = BgL_fun1848z00_548; 
BgL_args1857z00_3312 = BgL_args1849z00_549; 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_3300))->BgL_locz00) = ((obj_t)BgL_loc1852z00_3307), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_3300))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1853z00_3308), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_3300))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31854z21_3309), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_3300))->BgL_keyz00) = ((obj_t)BgL_key1855z00_3310), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_3300))->BgL_funz00) = ((BgL_varz00_bglt)BgL_fun1856z00_3311), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_3300))->BgL_argsz00) = ((obj_t)BgL_args1857z00_3312), BUNSPEC); 
BgL_res6072z00_3313 = BgL_new1858z00_3300; } } BgL_res6072z00_3313; } 
return BgL_new1850z00_3293;} } 
}



/* _make-app6240 */
obj_t BGl__makezd2app6240zd2zzast_nodez00(obj_t BgL_envz00_5284, obj_t BgL_loc1844z00_5285, obj_t BgL_type1845z00_5286, obj_t BgL_sidezd2effectzf31846z21_5287, obj_t BgL_key1847z00_5288, obj_t BgL_fun1848z00_5289, obj_t BgL_args1849z00_5290)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_auxz00_8259;
BgL_auxz00_8259 = 
BGl_makezd2appzd2zzast_nodez00(BgL_loc1844z00_5285, 
(BgL_typez00_bglt)(BgL_type1845z00_5286), BgL_sidezd2effectzf31846z21_5287, BgL_key1847z00_5288, 
(BgL_varz00_bglt)(BgL_fun1848z00_5289), BgL_args1849z00_5290); 
return 
(obj_t)(BgL_auxz00_8259);} } 
}



/* fill-app! */
BGL_EXPORTED_DEF BgL_appz00_bglt BGl_fillzd2appz12zc0zzast_nodez00(BgL_appz00_bglt BgL_new1858z00_550, obj_t BgL_loc1852z00_551, BgL_typez00_bglt BgL_type1853z00_552, obj_t BgL_sidezd2effectzf31854z21_553, obj_t BgL_key1855z00_554, BgL_varz00_bglt BgL_fun1856z00_555, obj_t BgL_args1857z00_556)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ /* ./Ast/node.scm 58 */
obj_t BgL_loc1852z00_6358;BgL_typez00_bglt BgL_type1853z00_6359;obj_t BgL_sidezd2effectzf31854z21_6360;obj_t BgL_key1855z00_6361;BgL_varz00_bglt BgL_fun1856z00_6362;obj_t BgL_args1857z00_6363;
BgL_loc1852z00_6358 = BgL_loc1852z00_551; 
BgL_type1853z00_6359 = BgL_type1853z00_552; 
BgL_sidezd2effectzf31854z21_6360 = BgL_sidezd2effectzf31854z21_553; 
BgL_key1855z00_6361 = BgL_key1855z00_554; 
BgL_fun1856z00_6362 = BgL_fun1856z00_555; 
BgL_args1857z00_6363 = BgL_args1857z00_556; 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_550))->BgL_locz00) = ((obj_t)BgL_loc1852z00_6358), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_550))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1853z00_6359), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_550))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31854z21_6360), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_550))->BgL_keyz00) = ((obj_t)BgL_key1855z00_6361), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_550))->BgL_funz00) = ((BgL_varz00_bglt)BgL_fun1856z00_6362), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_550))->BgL_argsz00) = ((obj_t)BgL_args1857z00_6363), BUNSPEC); 
return BgL_new1858z00_550;} } 
}



/* _fill-app!6242 */
obj_t BGl__fillzd2appz126242zc0zzast_nodez00(obj_t BgL_envz00_5291, obj_t BgL_new1858z00_5292, obj_t BgL_loc1852z00_5293, obj_t BgL_type1853z00_5294, obj_t BgL_sidezd2effectzf31854z21_5295, obj_t BgL_key1855z00_5296, obj_t BgL_fun1856z00_5297, obj_t BgL_args1857z00_5298)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_auxz00_8270;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_res8081z00_6377;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_new1858z00_6364;BgL_typez00_bglt BgL_type1853z00_6366;BgL_varz00_bglt BgL_fun1856z00_6369;
BgL_new1858z00_6364 = 
(BgL_appz00_bglt)(BgL_new1858z00_5292); 
BgL_type1853z00_6366 = 
(BgL_typez00_bglt)(BgL_type1853z00_5294); 
BgL_fun1856z00_6369 = 
(BgL_varz00_bglt)(BgL_fun1856z00_5297); 
{ /* ./Ast/node.scm 58 */
obj_t BgL_loc1852z00_6371;BgL_typez00_bglt BgL_type1853z00_6372;obj_t BgL_sidezd2effectzf31854z21_6373;obj_t BgL_key1855z00_6374;BgL_varz00_bglt BgL_fun1856z00_6375;obj_t BgL_args1857z00_6376;
BgL_loc1852z00_6371 = BgL_loc1852z00_5293; 
BgL_type1853z00_6372 = BgL_type1853z00_6366; 
BgL_sidezd2effectzf31854z21_6373 = BgL_sidezd2effectzf31854z21_5295; 
BgL_key1855z00_6374 = BgL_key1855z00_5296; 
BgL_fun1856z00_6375 = BgL_fun1856z00_6369; 
BgL_args1857z00_6376 = BgL_args1857z00_5298; 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_6364))->BgL_locz00) = ((obj_t)BgL_loc1852z00_6371), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_6364))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1853z00_6372), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_6364))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31854z21_6373), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_6364))->BgL_keyz00) = ((obj_t)BgL_key1855z00_6374), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_6364))->BgL_funz00) = ((BgL_varz00_bglt)BgL_fun1856z00_6375), BUNSPEC); 
((((BgL_appz00_bglt)CREF(BgL_new1858z00_6364))->BgL_argsz00) = ((obj_t)BgL_args1857z00_6376), BUNSPEC); 
BgL_res8081z00_6377 = BgL_new1858z00_6364; } } 
BgL_auxz00_8270 = BgL_res8081z00_6377; } 
return 
(obj_t)(BgL_auxz00_8270);} } 
}



/* allocate-app */
BGL_EXPORTED_DEF BgL_appz00_bglt BGl_allocatezd2appzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_new1866z00_6378;
BgL_new1866z00_6378 = 
((BgL_appz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_appz00_bgl) ))); 
{ /* ./Ast/node.scm 58 */
long BgL_arg4201z00_6379;
BgL_arg4201z00_6379 = 
BGl_classzd2numzd2zz__objectz00(BGl_appz00zzast_nodez00); 
{ /* ./Ast/node.scm 58 */
BgL_objectz00_bglt BgL_objz00_6380;
BgL_objz00_6380 = 
(BgL_objectz00_bglt)(BgL_new1866z00_6378); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6380, BgL_arg4201z00_6379); } } 
{ /* ./Ast/node.scm 58 */
BgL_objectz00_bglt BgL_auxz00_8285;
BgL_auxz00_8285 = 
(BgL_objectz00_bglt)(BgL_new1866z00_6378); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8285, BFALSE); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_objz00_6381;
BgL_objz00_6381 = 
(obj_t)(BgL_new1866z00_6378); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6381); BUNSPEC; } 
return BgL_new1866z00_6378;} } 
}



/* _allocate-app */
obj_t BGl__allocatezd2appzd2zzast_nodez00(obj_t BgL_envz00_4835)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_auxz00_8290;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_res8082z00_6386;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_new1866z00_6382;
BgL_new1866z00_6382 = 
((BgL_appz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_appz00_bgl) ))); 
{ /* ./Ast/node.scm 58 */
long BgL_arg4201z00_6383;
BgL_arg4201z00_6383 = 
BGl_classzd2numzd2zz__objectz00(BGl_appz00zzast_nodez00); 
{ /* ./Ast/node.scm 58 */
BgL_objectz00_bglt BgL_objz00_6384;
BgL_objz00_6384 = 
(BgL_objectz00_bglt)(BgL_new1866z00_6382); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6384, BgL_arg4201z00_6383); } } 
{ /* ./Ast/node.scm 58 */
BgL_objectz00_bglt BgL_auxz00_8295;
BgL_auxz00_8295 = 
(BgL_objectz00_bglt)(BgL_new1866z00_6382); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8295, BFALSE); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_objz00_6385;
BgL_objz00_6385 = 
(obj_t)(BgL_new1866z00_6382); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6385); BUNSPEC; } 
BgL_res8082z00_6386 = BgL_new1866z00_6382; } 
BgL_auxz00_8290 = BgL_res8082z00_6386; } 
return 
(obj_t)(BgL_auxz00_8290);} } 
}



/* sequence? */
BGL_EXPORTED_DEF bool_t BGl_sequencezf3zf3zzast_nodez00(obj_t BgL_obj1827z00_563)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1827z00_563, BGl_sequencez00zzast_nodez00);} 
}



/* _sequence? */
obj_t BGl__sequencezf3zf3zzast_nodez00(obj_t BgL_envz00_5299, obj_t BgL_obj1827z00_5300)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ /* ./Ast/node.scm 54 */
bool_t BgL_auxz00_8302;
BgL_auxz00_8302 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1827z00_5300, BGl_sequencez00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8302);} } 
}



/* make-sequence */
BGL_EXPORTED_DEF BgL_sequencez00_bglt BGl_makezd2sequencezd2zzast_nodez00(obj_t BgL_loc1785z00_567, BgL_typez00_bglt BgL_type1786z00_568, obj_t BgL_sidezd2effectzf31787z21_569, obj_t BgL_key1788z00_570, obj_t BgL_nodes1789z00_571)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_new1790z00_3325;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_res6073z00_3331;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_new1804z00_3326;
BgL_new1804z00_3326 = 
((BgL_sequencez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_sequencez00_bgl) ))); 
{ /* ./Ast/node.scm 54 */
long BgL_arg4210z00_3327;
BgL_arg4210z00_3327 = 
BGl_classzd2numzd2zz__objectz00(BGl_sequencez00zzast_nodez00); 
{ /* ./Ast/node.scm 54 */
BgL_objectz00_bglt BgL_objz00_3328;
BgL_objz00_3328 = 
(BgL_objectz00_bglt)(BgL_new1804z00_3326); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3328, BgL_arg4210z00_3327); } } 
{ /* ./Ast/node.scm 54 */
BgL_objectz00_bglt BgL_auxz00_8309;
BgL_auxz00_8309 = 
(BgL_objectz00_bglt)(BgL_new1804z00_3326); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8309, BFALSE); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_objz00_3330;
BgL_objz00_3330 = 
(obj_t)(BgL_new1804z00_3326); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3330); BUNSPEC; } 
BgL_res6073z00_3331 = BgL_new1804z00_3326; } 
BgL_new1790z00_3325 = BgL_res6073z00_3331; } 
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_res6074z00_3343;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_new1797z00_3332;
BgL_new1797z00_3332 = BgL_new1790z00_3325; 
{ /* ./Ast/node.scm 54 */
obj_t BgL_loc1792z00_3338;BgL_typez00_bglt BgL_type1793z00_3339;obj_t BgL_sidezd2effectzf31794z21_3340;obj_t BgL_key1795z00_3341;obj_t BgL_nodes1796z00_3342;
BgL_loc1792z00_3338 = BgL_loc1785z00_567; 
BgL_type1793z00_3339 = BgL_type1786z00_568; 
BgL_sidezd2effectzf31794z21_3340 = BgL_sidezd2effectzf31787z21_569; 
BgL_key1795z00_3341 = BgL_key1788z00_570; 
BgL_nodes1796z00_3342 = BgL_nodes1789z00_571; 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_3332))->BgL_locz00) = ((obj_t)BgL_loc1792z00_3338), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_3332))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1793z00_3339), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_3332))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31794z21_3340), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_3332))->BgL_keyz00) = ((obj_t)BgL_key1795z00_3341), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_3332))->BgL_nodesz00) = ((obj_t)BgL_nodes1796z00_3342), BUNSPEC); 
BgL_res6074z00_3343 = BgL_new1797z00_3332; } } BgL_res6074z00_3343; } 
return BgL_new1790z00_3325;} } 
}



/* _make-sequence6245 */
obj_t BGl__makezd2sequence6245zd2zzast_nodez00(obj_t BgL_envz00_5301, obj_t BgL_loc1785z00_5302, obj_t BgL_type1786z00_5303, obj_t BgL_sidezd2effectzf31787z21_5304, obj_t BgL_key1788z00_5305, obj_t BgL_nodes1789z00_5306)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_auxz00_8319;
BgL_auxz00_8319 = 
BGl_makezd2sequencezd2zzast_nodez00(BgL_loc1785z00_5302, 
(BgL_typez00_bglt)(BgL_type1786z00_5303), BgL_sidezd2effectzf31787z21_5304, BgL_key1788z00_5305, BgL_nodes1789z00_5306); 
return 
(obj_t)(BgL_auxz00_8319);} } 
}



/* fill-sequence! */
BGL_EXPORTED_DEF BgL_sequencez00_bglt BGl_fillzd2sequencez12zc0zzast_nodez00(BgL_sequencez00_bglt BgL_new1797z00_572, obj_t BgL_loc1792z00_573, BgL_typez00_bglt BgL_type1793z00_574, obj_t BgL_sidezd2effectzf31794z21_575, obj_t BgL_key1795z00_576, obj_t BgL_nodes1796z00_577)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ /* ./Ast/node.scm 54 */
obj_t BgL_loc1792z00_6388;BgL_typez00_bglt BgL_type1793z00_6389;obj_t BgL_sidezd2effectzf31794z21_6390;obj_t BgL_key1795z00_6391;obj_t BgL_nodes1796z00_6392;
BgL_loc1792z00_6388 = BgL_loc1792z00_573; 
BgL_type1793z00_6389 = BgL_type1793z00_574; 
BgL_sidezd2effectzf31794z21_6390 = BgL_sidezd2effectzf31794z21_575; 
BgL_key1795z00_6391 = BgL_key1795z00_576; 
BgL_nodes1796z00_6392 = BgL_nodes1796z00_577; 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_572))->BgL_locz00) = ((obj_t)BgL_loc1792z00_6388), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_572))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1793z00_6389), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_572))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31794z21_6390), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_572))->BgL_keyz00) = ((obj_t)BgL_key1795z00_6391), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_572))->BgL_nodesz00) = ((obj_t)BgL_nodes1796z00_6392), BUNSPEC); 
return BgL_new1797z00_572;} } 
}



/* _fill-sequence!6247 */
obj_t BGl__fillzd2sequencez126247zc0zzast_nodez00(obj_t BgL_envz00_5307, obj_t BgL_new1797z00_5308, obj_t BgL_loc1792z00_5309, obj_t BgL_type1793z00_5310, obj_t BgL_sidezd2effectzf31794z21_5311, obj_t BgL_key1795z00_5312, obj_t BgL_nodes1796z00_5313)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_auxz00_8328;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_res8083z00_6404;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_new1797z00_6393;BgL_typez00_bglt BgL_type1793z00_6395;
BgL_new1797z00_6393 = 
(BgL_sequencez00_bglt)(BgL_new1797z00_5308); 
BgL_type1793z00_6395 = 
(BgL_typez00_bglt)(BgL_type1793z00_5310); 
{ /* ./Ast/node.scm 54 */
obj_t BgL_loc1792z00_6399;BgL_typez00_bglt BgL_type1793z00_6400;obj_t BgL_sidezd2effectzf31794z21_6401;obj_t BgL_key1795z00_6402;obj_t BgL_nodes1796z00_6403;
BgL_loc1792z00_6399 = BgL_loc1792z00_5309; 
BgL_type1793z00_6400 = BgL_type1793z00_6395; 
BgL_sidezd2effectzf31794z21_6401 = BgL_sidezd2effectzf31794z21_5311; 
BgL_key1795z00_6402 = BgL_key1795z00_5312; 
BgL_nodes1796z00_6403 = BgL_nodes1796z00_5313; 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_6393))->BgL_locz00) = ((obj_t)BgL_loc1792z00_6399), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_6393))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1793z00_6400), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_6393))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31794z21_6401), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_6393))->BgL_keyz00) = ((obj_t)BgL_key1795z00_6402), BUNSPEC); 
((((BgL_sequencez00_bglt)CREF(BgL_new1797z00_6393))->BgL_nodesz00) = ((obj_t)BgL_nodes1796z00_6403), BUNSPEC); 
BgL_res8083z00_6404 = BgL_new1797z00_6393; } } 
BgL_auxz00_8328 = BgL_res8083z00_6404; } 
return 
(obj_t)(BgL_auxz00_8328);} } 
}



/* allocate-sequence */
BGL_EXPORTED_DEF BgL_sequencez00_bglt BGl_allocatezd2sequencezd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_new1804z00_6405;
BgL_new1804z00_6405 = 
((BgL_sequencez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_sequencez00_bgl) ))); 
{ /* ./Ast/node.scm 54 */
long BgL_arg4210z00_6406;
BgL_arg4210z00_6406 = 
BGl_classzd2numzd2zz__objectz00(BGl_sequencez00zzast_nodez00); 
{ /* ./Ast/node.scm 54 */
BgL_objectz00_bglt BgL_objz00_6407;
BgL_objz00_6407 = 
(BgL_objectz00_bglt)(BgL_new1804z00_6405); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6407, BgL_arg4210z00_6406); } } 
{ /* ./Ast/node.scm 54 */
BgL_objectz00_bglt BgL_auxz00_8341;
BgL_auxz00_8341 = 
(BgL_objectz00_bglt)(BgL_new1804z00_6405); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8341, BFALSE); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_objz00_6408;
BgL_objz00_6408 = 
(obj_t)(BgL_new1804z00_6405); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6408); BUNSPEC; } 
return BgL_new1804z00_6405;} } 
}



/* _allocate-sequence */
obj_t BGl__allocatezd2sequencezd2zzast_nodez00(obj_t BgL_envz00_4834)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_auxz00_8346;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_res8084z00_6413;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_new1804z00_6409;
BgL_new1804z00_6409 = 
((BgL_sequencez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_sequencez00_bgl) ))); 
{ /* ./Ast/node.scm 54 */
long BgL_arg4210z00_6410;
BgL_arg4210z00_6410 = 
BGl_classzd2numzd2zz__objectz00(BGl_sequencez00zzast_nodez00); 
{ /* ./Ast/node.scm 54 */
BgL_objectz00_bglt BgL_objz00_6411;
BgL_objz00_6411 = 
(BgL_objectz00_bglt)(BgL_new1804z00_6409); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6411, BgL_arg4210z00_6410); } } 
{ /* ./Ast/node.scm 54 */
BgL_objectz00_bglt BgL_auxz00_8351;
BgL_auxz00_8351 = 
(BgL_objectz00_bglt)(BgL_new1804z00_6409); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8351, BFALSE); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_objz00_6412;
BgL_objz00_6412 = 
(obj_t)(BgL_new1804z00_6409); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6412); BUNSPEC; } 
BgL_res8084z00_6413 = BgL_new1804z00_6409; } 
BgL_auxz00_8346 = BgL_res8084z00_6413; } 
return 
(obj_t)(BgL_auxz00_8346);} } 
}



/* kwote? */
BGL_EXPORTED_DEF bool_t BGl_kwotezf3zf3zzast_nodez00(obj_t BgL_obj1773z00_579)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1773z00_579, BGl_kwotez00zzast_nodez00);} 
}



/* _kwote? */
obj_t BGl__kwotezf3zf3zzast_nodez00(obj_t BgL_envz00_5314, obj_t BgL_obj1773z00_5315)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ /* ./Ast/node.scm 49 */
bool_t BgL_auxz00_8358;
BgL_auxz00_8358 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1773z00_5315, BGl_kwotez00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8358);} } 
}



/* make-kwote */
BGL_EXPORTED_DEF BgL_kwotez00_bglt BGl_makezd2kwotezd2zzast_nodez00(obj_t BgL_loc1745z00_583, BgL_typez00_bglt BgL_type1746z00_584, obj_t BgL_value1747z00_585)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_new1748z00_3354;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_res6075z00_3360;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_new1758z00_3355;
BgL_new1758z00_3355 = 
((BgL_kwotez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_kwotez00_bgl) ))); 
{ /* ./Ast/node.scm 49 */
long BgL_arg4219z00_3356;
BgL_arg4219z00_3356 = 
BGl_classzd2numzd2zz__objectz00(BGl_kwotez00zzast_nodez00); 
{ /* ./Ast/node.scm 49 */
BgL_objectz00_bglt BgL_objz00_3357;
BgL_objz00_3357 = 
(BgL_objectz00_bglt)(BgL_new1758z00_3355); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3357, BgL_arg4219z00_3356); } } 
{ /* ./Ast/node.scm 49 */
BgL_objectz00_bglt BgL_auxz00_8365;
BgL_auxz00_8365 = 
(BgL_objectz00_bglt)(BgL_new1758z00_3355); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8365, BFALSE); } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_objz00_3359;
BgL_objz00_3359 = 
(obj_t)(BgL_new1758z00_3355); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3359); BUNSPEC; } 
BgL_res6075z00_3360 = BgL_new1758z00_3355; } 
BgL_new1748z00_3354 = BgL_res6075z00_3360; } 
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_res6076z00_3368;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_new1753z00_3361;
BgL_new1753z00_3361 = BgL_new1748z00_3354; 
{ /* ./Ast/node.scm 49 */
obj_t BgL_loc1750z00_3365;BgL_typez00_bglt BgL_type1751z00_3366;obj_t BgL_value1752z00_3367;
BgL_loc1750z00_3365 = BgL_loc1745z00_583; 
BgL_type1751z00_3366 = BgL_type1746z00_584; 
BgL_value1752z00_3367 = BgL_value1747z00_585; 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_3361))->BgL_locz00) = ((obj_t)BgL_loc1750z00_3365), BUNSPEC); 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_3361))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1751z00_3366), BUNSPEC); 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_3361))->BgL_valuez00) = ((obj_t)BgL_value1752z00_3367), BUNSPEC); 
BgL_res6076z00_3368 = BgL_new1753z00_3361; } } BgL_res6076z00_3368; } 
return BgL_new1748z00_3354;} } 
}



/* _make-kwote6250 */
obj_t BGl__makezd2kwote6250zd2zzast_nodez00(obj_t BgL_envz00_5316, obj_t BgL_loc1745z00_5317, obj_t BgL_type1746z00_5318, obj_t BgL_value1747z00_5319)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_auxz00_8373;
BgL_auxz00_8373 = 
BGl_makezd2kwotezd2zzast_nodez00(BgL_loc1745z00_5317, 
(BgL_typez00_bglt)(BgL_type1746z00_5318), BgL_value1747z00_5319); 
return 
(obj_t)(BgL_auxz00_8373);} } 
}



/* fill-kwote! */
BGL_EXPORTED_DEF BgL_kwotez00_bglt BGl_fillzd2kwotez12zc0zzast_nodez00(BgL_kwotez00_bglt BgL_new1753z00_586, obj_t BgL_loc1750z00_587, BgL_typez00_bglt BgL_type1751z00_588, obj_t BgL_value1752z00_589)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ /* ./Ast/node.scm 49 */
obj_t BgL_loc1750z00_6415;BgL_typez00_bglt BgL_type1751z00_6416;obj_t BgL_value1752z00_6417;
BgL_loc1750z00_6415 = BgL_loc1750z00_587; 
BgL_type1751z00_6416 = BgL_type1751z00_588; 
BgL_value1752z00_6417 = BgL_value1752z00_589; 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_586))->BgL_locz00) = ((obj_t)BgL_loc1750z00_6415), BUNSPEC); 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_586))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1751z00_6416), BUNSPEC); 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_586))->BgL_valuez00) = ((obj_t)BgL_value1752z00_6417), BUNSPEC); 
return BgL_new1753z00_586;} } 
}



/* _fill-kwote!6252 */
obj_t BGl__fillzd2kwotez126252zc0zzast_nodez00(obj_t BgL_envz00_5320, obj_t BgL_new1753z00_5321, obj_t BgL_loc1750z00_5322, obj_t BgL_type1751z00_5323, obj_t BgL_value1752z00_5324)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_auxz00_8380;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_res8085z00_6425;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_new1753z00_6418;BgL_typez00_bglt BgL_type1751z00_6420;
BgL_new1753z00_6418 = 
(BgL_kwotez00_bglt)(BgL_new1753z00_5321); 
BgL_type1751z00_6420 = 
(BgL_typez00_bglt)(BgL_type1751z00_5323); 
{ /* ./Ast/node.scm 49 */
obj_t BgL_loc1750z00_6422;BgL_typez00_bglt BgL_type1751z00_6423;obj_t BgL_value1752z00_6424;
BgL_loc1750z00_6422 = BgL_loc1750z00_5322; 
BgL_type1751z00_6423 = BgL_type1751z00_6420; 
BgL_value1752z00_6424 = BgL_value1752z00_5324; 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_6418))->BgL_locz00) = ((obj_t)BgL_loc1750z00_6422), BUNSPEC); 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_6418))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1751z00_6423), BUNSPEC); 
((((BgL_kwotez00_bglt)CREF(BgL_new1753z00_6418))->BgL_valuez00) = ((obj_t)BgL_value1752z00_6424), BUNSPEC); 
BgL_res8085z00_6425 = BgL_new1753z00_6418; } } 
BgL_auxz00_8380 = BgL_res8085z00_6425; } 
return 
(obj_t)(BgL_auxz00_8380);} } 
}



/* allocate-kwote */
BGL_EXPORTED_DEF BgL_kwotez00_bglt BGl_allocatezd2kwotezd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_new1758z00_6426;
BgL_new1758z00_6426 = 
((BgL_kwotez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_kwotez00_bgl) ))); 
{ /* ./Ast/node.scm 49 */
long BgL_arg4219z00_6427;
BgL_arg4219z00_6427 = 
BGl_classzd2numzd2zz__objectz00(BGl_kwotez00zzast_nodez00); 
{ /* ./Ast/node.scm 49 */
BgL_objectz00_bglt BgL_objz00_6428;
BgL_objz00_6428 = 
(BgL_objectz00_bglt)(BgL_new1758z00_6426); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6428, BgL_arg4219z00_6427); } } 
{ /* ./Ast/node.scm 49 */
BgL_objectz00_bglt BgL_auxz00_8391;
BgL_auxz00_8391 = 
(BgL_objectz00_bglt)(BgL_new1758z00_6426); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8391, BFALSE); } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_objz00_6429;
BgL_objz00_6429 = 
(obj_t)(BgL_new1758z00_6426); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6429); BUNSPEC; } 
return BgL_new1758z00_6426;} } 
}



/* _allocate-kwote */
obj_t BGl__allocatezd2kwotezd2zzast_nodez00(obj_t BgL_envz00_4833)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_auxz00_8396;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_res8086z00_6434;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_new1758z00_6430;
BgL_new1758z00_6430 = 
((BgL_kwotez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_kwotez00_bgl) ))); 
{ /* ./Ast/node.scm 49 */
long BgL_arg4219z00_6431;
BgL_arg4219z00_6431 = 
BGl_classzd2numzd2zz__objectz00(BGl_kwotez00zzast_nodez00); 
{ /* ./Ast/node.scm 49 */
BgL_objectz00_bglt BgL_objz00_6432;
BgL_objz00_6432 = 
(BgL_objectz00_bglt)(BgL_new1758z00_6430); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6432, BgL_arg4219z00_6431); } } 
{ /* ./Ast/node.scm 49 */
BgL_objectz00_bglt BgL_auxz00_8401;
BgL_auxz00_8401 = 
(BgL_objectz00_bglt)(BgL_new1758z00_6430); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8401, BFALSE); } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_objz00_6433;
BgL_objz00_6433 = 
(obj_t)(BgL_new1758z00_6430); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6433); BUNSPEC; } 
BgL_res8086z00_6434 = BgL_new1758z00_6430; } 
BgL_auxz00_8396 = BgL_res8086z00_6434; } 
return 
(obj_t)(BgL_auxz00_8396);} } 
}



/* closure? */
BGL_EXPORTED_DEF bool_t BGl_closurezf3zf3zzast_nodez00(obj_t BgL_obj1739z00_591)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1739z00_591, BGl_closurez00zzast_nodez00);} 
}



/* _closure? */
obj_t BGl__closurezf3zf3zzast_nodez00(obj_t BgL_envz00_5325, obj_t BgL_obj1739z00_5326)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ /* ./Ast/node.scm 46 */
bool_t BgL_auxz00_8408;
BgL_auxz00_8408 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1739z00_5326, BGl_closurez00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8408);} } 
}



/* make-closure */
BGL_EXPORTED_DEF BgL_closurez00_bglt BGl_makezd2closurezd2zzast_nodez00(obj_t BgL_loc1711z00_595, BgL_typez00_bglt BgL_type1712z00_596, BgL_variablez00_bglt BgL_variable1713z00_597)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_new1714z00_3377;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_res6077z00_3383;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_new1724z00_3378;
BgL_new1724z00_3378 = 
((BgL_closurez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_closurez00_bgl) ))); 
{ /* ./Ast/node.scm 46 */
long BgL_arg4228z00_3379;
BgL_arg4228z00_3379 = 
BGl_classzd2numzd2zz__objectz00(BGl_closurez00zzast_nodez00); 
{ /* ./Ast/node.scm 46 */
BgL_objectz00_bglt BgL_objz00_3380;
BgL_objz00_3380 = 
(BgL_objectz00_bglt)(BgL_new1724z00_3378); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3380, BgL_arg4228z00_3379); } } 
{ /* ./Ast/node.scm 46 */
BgL_objectz00_bglt BgL_auxz00_8415;
BgL_auxz00_8415 = 
(BgL_objectz00_bglt)(BgL_new1724z00_3378); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8415, BFALSE); } 
{ /* ./Ast/node.scm 46 */
obj_t BgL_objz00_3382;
BgL_objz00_3382 = 
(obj_t)(BgL_new1724z00_3378); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3382); BUNSPEC; } 
BgL_res6077z00_3383 = BgL_new1724z00_3378; } 
BgL_new1714z00_3377 = BgL_res6077z00_3383; } 
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_res6078z00_3391;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_new1719z00_3384;
BgL_new1719z00_3384 = BgL_new1714z00_3377; 
{ /* ./Ast/node.scm 46 */
obj_t BgL_loc1716z00_3388;BgL_typez00_bglt BgL_type1717z00_3389;BgL_variablez00_bglt BgL_variable1718z00_3390;
BgL_loc1716z00_3388 = BgL_loc1711z00_595; 
BgL_type1717z00_3389 = BgL_type1712z00_596; 
BgL_variable1718z00_3390 = BgL_variable1713z00_597; 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_3384))->BgL_locz00) = ((obj_t)BgL_loc1716z00_3388), BUNSPEC); 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_3384))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1717z00_3389), BUNSPEC); 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_3384))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_variable1718z00_3390), BUNSPEC); 
BgL_res6078z00_3391 = BgL_new1719z00_3384; } } BgL_res6078z00_3391; } 
return BgL_new1714z00_3377;} } 
}



/* _make-closure6255 */
obj_t BGl__makezd2closure6255zd2zzast_nodez00(obj_t BgL_envz00_5327, obj_t BgL_loc1711z00_5328, obj_t BgL_type1712z00_5329, obj_t BgL_variable1713z00_5330)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_auxz00_8423;
BgL_auxz00_8423 = 
BGl_makezd2closurezd2zzast_nodez00(BgL_loc1711z00_5328, 
(BgL_typez00_bglt)(BgL_type1712z00_5329), 
(BgL_variablez00_bglt)(BgL_variable1713z00_5330)); 
return 
(obj_t)(BgL_auxz00_8423);} } 
}



/* fill-closure! */
BGL_EXPORTED_DEF BgL_closurez00_bglt BGl_fillzd2closurez12zc0zzast_nodez00(BgL_closurez00_bglt BgL_new1719z00_598, obj_t BgL_loc1716z00_599, BgL_typez00_bglt BgL_type1717z00_600, BgL_variablez00_bglt BgL_variable1718z00_601)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ /* ./Ast/node.scm 46 */
obj_t BgL_loc1716z00_6436;BgL_typez00_bglt BgL_type1717z00_6437;BgL_variablez00_bglt BgL_variable1718z00_6438;
BgL_loc1716z00_6436 = BgL_loc1716z00_599; 
BgL_type1717z00_6437 = BgL_type1717z00_600; 
BgL_variable1718z00_6438 = BgL_variable1718z00_601; 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_598))->BgL_locz00) = ((obj_t)BgL_loc1716z00_6436), BUNSPEC); 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_598))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1717z00_6437), BUNSPEC); 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_598))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_variable1718z00_6438), BUNSPEC); 
return BgL_new1719z00_598;} } 
}



/* _fill-closure!6257 */
obj_t BGl__fillzd2closurez126257zc0zzast_nodez00(obj_t BgL_envz00_5331, obj_t BgL_new1719z00_5332, obj_t BgL_loc1716z00_5333, obj_t BgL_type1717z00_5334, obj_t BgL_variable1718z00_5335)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_auxz00_8431;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_res8087z00_6446;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_new1719z00_6439;BgL_typez00_bglt BgL_type1717z00_6441;BgL_variablez00_bglt BgL_variable1718z00_6442;
BgL_new1719z00_6439 = 
(BgL_closurez00_bglt)(BgL_new1719z00_5332); 
BgL_type1717z00_6441 = 
(BgL_typez00_bglt)(BgL_type1717z00_5334); 
BgL_variable1718z00_6442 = 
(BgL_variablez00_bglt)(BgL_variable1718z00_5335); 
{ /* ./Ast/node.scm 46 */
obj_t BgL_loc1716z00_6443;BgL_typez00_bglt BgL_type1717z00_6444;BgL_variablez00_bglt BgL_variable1718z00_6445;
BgL_loc1716z00_6443 = BgL_loc1716z00_5333; 
BgL_type1717z00_6444 = BgL_type1717z00_6441; 
BgL_variable1718z00_6445 = BgL_variable1718z00_6442; 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_6439))->BgL_locz00) = ((obj_t)BgL_loc1716z00_6443), BUNSPEC); 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_6439))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1717z00_6444), BUNSPEC); 
((((BgL_closurez00_bglt)CREF(BgL_new1719z00_6439))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_variable1718z00_6445), BUNSPEC); 
BgL_res8087z00_6446 = BgL_new1719z00_6439; } } 
BgL_auxz00_8431 = BgL_res8087z00_6446; } 
return 
(obj_t)(BgL_auxz00_8431);} } 
}



/* allocate-closure */
BGL_EXPORTED_DEF BgL_closurez00_bglt BGl_allocatezd2closurezd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_new1724z00_6447;
BgL_new1724z00_6447 = 
((BgL_closurez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_closurez00_bgl) ))); 
{ /* ./Ast/node.scm 46 */
long BgL_arg4228z00_6448;
BgL_arg4228z00_6448 = 
BGl_classzd2numzd2zz__objectz00(BGl_closurez00zzast_nodez00); 
{ /* ./Ast/node.scm 46 */
BgL_objectz00_bglt BgL_objz00_6449;
BgL_objz00_6449 = 
(BgL_objectz00_bglt)(BgL_new1724z00_6447); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6449, BgL_arg4228z00_6448); } } 
{ /* ./Ast/node.scm 46 */
BgL_objectz00_bglt BgL_auxz00_8443;
BgL_auxz00_8443 = 
(BgL_objectz00_bglt)(BgL_new1724z00_6447); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8443, BFALSE); } 
{ /* ./Ast/node.scm 46 */
obj_t BgL_objz00_6450;
BgL_objz00_6450 = 
(obj_t)(BgL_new1724z00_6447); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6450); BUNSPEC; } 
return BgL_new1724z00_6447;} } 
}



/* _allocate-closure */
obj_t BGl__allocatezd2closurezd2zzast_nodez00(obj_t BgL_envz00_4832)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_auxz00_8448;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_res8088z00_6455;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_new1724z00_6451;
BgL_new1724z00_6451 = 
((BgL_closurez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_closurez00_bgl) ))); 
{ /* ./Ast/node.scm 46 */
long BgL_arg4228z00_6452;
BgL_arg4228z00_6452 = 
BGl_classzd2numzd2zz__objectz00(BGl_closurez00zzast_nodez00); 
{ /* ./Ast/node.scm 46 */
BgL_objectz00_bglt BgL_objz00_6453;
BgL_objz00_6453 = 
(BgL_objectz00_bglt)(BgL_new1724z00_6451); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6453, BgL_arg4228z00_6452); } } 
{ /* ./Ast/node.scm 46 */
BgL_objectz00_bglt BgL_auxz00_8453;
BgL_auxz00_8453 = 
(BgL_objectz00_bglt)(BgL_new1724z00_6451); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8453, BFALSE); } 
{ /* ./Ast/node.scm 46 */
obj_t BgL_objz00_6454;
BgL_objz00_6454 = 
(obj_t)(BgL_new1724z00_6451); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6454); BUNSPEC; } 
BgL_res8088z00_6455 = BgL_new1724z00_6451; } 
BgL_auxz00_8448 = BgL_res8088z00_6455; } 
return 
(obj_t)(BgL_auxz00_8448);} } 
}



/* var? */
BGL_EXPORTED_DEF bool_t BGl_varzf3zf3zzast_nodez00(obj_t BgL_obj1703z00_602)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1703z00_602, BGl_varz00zzast_nodez00);} 
}



/* _var? */
obj_t BGl__varzf3zf3zzast_nodez00(obj_t BgL_envz00_5336, obj_t BgL_obj1703z00_5337)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
bool_t BgL_auxz00_8460;
BgL_auxz00_8460 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1703z00_5337, BGl_varz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8460);} } 
}



/* make-var */
BGL_EXPORTED_DEF BgL_varz00_bglt BGl_makezd2varzd2zzast_nodez00(obj_t BgL_loc1675z00_606, BgL_typez00_bglt BgL_type1676z00_607, BgL_variablez00_bglt BgL_variable1677z00_608)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_new1678z00_3400;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_res6079z00_3406;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_new1688z00_3401;
BgL_new1688z00_3401 = 
((BgL_varz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_varz00_bgl) ))); 
{ /* ./Ast/node.scm 41 */
long BgL_arg4237z00_3402;
BgL_arg4237z00_3402 = 
BGl_classzd2numzd2zz__objectz00(BGl_varz00zzast_nodez00); 
{ /* ./Ast/node.scm 41 */
BgL_objectz00_bglt BgL_objz00_3403;
BgL_objz00_3403 = 
(BgL_objectz00_bglt)(BgL_new1688z00_3401); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3403, BgL_arg4237z00_3402); } } 
{ /* ./Ast/node.scm 41 */
BgL_objectz00_bglt BgL_auxz00_8467;
BgL_auxz00_8467 = 
(BgL_objectz00_bglt)(BgL_new1688z00_3401); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8467, BFALSE); } 
{ /* ./Ast/node.scm 41 */
obj_t BgL_objz00_3405;
BgL_objz00_3405 = 
(obj_t)(BgL_new1688z00_3401); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3405); BUNSPEC; } 
BgL_res6079z00_3406 = BgL_new1688z00_3401; } 
BgL_new1678z00_3400 = BgL_res6079z00_3406; } 
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_res6080z00_3414;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_new1683z00_3407;
BgL_new1683z00_3407 = BgL_new1678z00_3400; 
{ /* ./Ast/node.scm 41 */
obj_t BgL_loc1680z00_3411;BgL_typez00_bglt BgL_type1681z00_3412;BgL_variablez00_bglt BgL_variable1682z00_3413;
BgL_loc1680z00_3411 = BgL_loc1675z00_606; 
BgL_type1681z00_3412 = BgL_type1676z00_607; 
BgL_variable1682z00_3413 = BgL_variable1677z00_608; 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_3407))->BgL_locz00) = ((obj_t)BgL_loc1680z00_3411), BUNSPEC); 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_3407))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1681z00_3412), BUNSPEC); 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_3407))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_variable1682z00_3413), BUNSPEC); 
BgL_res6080z00_3414 = BgL_new1683z00_3407; } } BgL_res6080z00_3414; } 
return BgL_new1678z00_3400;} } 
}



/* _make-var6260 */
obj_t BGl__makezd2var6260zd2zzast_nodez00(obj_t BgL_envz00_5338, obj_t BgL_loc1675z00_5339, obj_t BgL_type1676z00_5340, obj_t BgL_variable1677z00_5341)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_auxz00_8475;
BgL_auxz00_8475 = 
BGl_makezd2varzd2zzast_nodez00(BgL_loc1675z00_5339, 
(BgL_typez00_bglt)(BgL_type1676z00_5340), 
(BgL_variablez00_bglt)(BgL_variable1677z00_5341)); 
return 
(obj_t)(BgL_auxz00_8475);} } 
}



/* fill-var! */
BGL_EXPORTED_DEF BgL_varz00_bglt BGl_fillzd2varz12zc0zzast_nodez00(BgL_varz00_bglt BgL_new1683z00_609, obj_t BgL_loc1680z00_610, BgL_typez00_bglt BgL_type1681z00_611, BgL_variablez00_bglt BgL_variable1682z00_612)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
obj_t BgL_loc1680z00_6457;BgL_typez00_bglt BgL_type1681z00_6458;BgL_variablez00_bglt BgL_variable1682z00_6459;
BgL_loc1680z00_6457 = BgL_loc1680z00_610; 
BgL_type1681z00_6458 = BgL_type1681z00_611; 
BgL_variable1682z00_6459 = BgL_variable1682z00_612; 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_609))->BgL_locz00) = ((obj_t)BgL_loc1680z00_6457), BUNSPEC); 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_609))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1681z00_6458), BUNSPEC); 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_609))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_variable1682z00_6459), BUNSPEC); 
return BgL_new1683z00_609;} } 
}



/* _fill-var!6262 */
obj_t BGl__fillzd2varz126262zc0zzast_nodez00(obj_t BgL_envz00_5342, obj_t BgL_new1683z00_5343, obj_t BgL_loc1680z00_5344, obj_t BgL_type1681z00_5345, obj_t BgL_variable1682z00_5346)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_auxz00_8483;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_res8089z00_6467;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_new1683z00_6460;BgL_typez00_bglt BgL_type1681z00_6462;BgL_variablez00_bglt BgL_variable1682z00_6463;
BgL_new1683z00_6460 = 
(BgL_varz00_bglt)(BgL_new1683z00_5343); 
BgL_type1681z00_6462 = 
(BgL_typez00_bglt)(BgL_type1681z00_5345); 
BgL_variable1682z00_6463 = 
(BgL_variablez00_bglt)(BgL_variable1682z00_5346); 
{ /* ./Ast/node.scm 41 */
obj_t BgL_loc1680z00_6464;BgL_typez00_bglt BgL_type1681z00_6465;BgL_variablez00_bglt BgL_variable1682z00_6466;
BgL_loc1680z00_6464 = BgL_loc1680z00_5344; 
BgL_type1681z00_6465 = BgL_type1681z00_6462; 
BgL_variable1682z00_6466 = BgL_variable1682z00_6463; 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_6460))->BgL_locz00) = ((obj_t)BgL_loc1680z00_6464), BUNSPEC); 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_6460))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1681z00_6465), BUNSPEC); 
((((BgL_varz00_bglt)CREF(BgL_new1683z00_6460))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_variable1682z00_6466), BUNSPEC); 
BgL_res8089z00_6467 = BgL_new1683z00_6460; } } 
BgL_auxz00_8483 = BgL_res8089z00_6467; } 
return 
(obj_t)(BgL_auxz00_8483);} } 
}



/* allocate-var */
BGL_EXPORTED_DEF BgL_varz00_bglt BGl_allocatezd2varzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_new1688z00_6468;
BgL_new1688z00_6468 = 
((BgL_varz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_varz00_bgl) ))); 
{ /* ./Ast/node.scm 41 */
long BgL_arg4237z00_6469;
BgL_arg4237z00_6469 = 
BGl_classzd2numzd2zz__objectz00(BGl_varz00zzast_nodez00); 
{ /* ./Ast/node.scm 41 */
BgL_objectz00_bglt BgL_objz00_6470;
BgL_objz00_6470 = 
(BgL_objectz00_bglt)(BgL_new1688z00_6468); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6470, BgL_arg4237z00_6469); } } 
{ /* ./Ast/node.scm 41 */
BgL_objectz00_bglt BgL_auxz00_8495;
BgL_auxz00_8495 = 
(BgL_objectz00_bglt)(BgL_new1688z00_6468); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8495, BFALSE); } 
{ /* ./Ast/node.scm 41 */
obj_t BgL_objz00_6471;
BgL_objz00_6471 = 
(obj_t)(BgL_new1688z00_6468); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6471); BUNSPEC; } 
return BgL_new1688z00_6468;} } 
}



/* _allocate-var */
obj_t BGl__allocatezd2varzd2zzast_nodez00(obj_t BgL_envz00_4831)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_auxz00_8500;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_res8090z00_6476;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_new1688z00_6472;
BgL_new1688z00_6472 = 
((BgL_varz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_varz00_bgl) ))); 
{ /* ./Ast/node.scm 41 */
long BgL_arg4237z00_6473;
BgL_arg4237z00_6473 = 
BGl_classzd2numzd2zz__objectz00(BGl_varz00zzast_nodez00); 
{ /* ./Ast/node.scm 41 */
BgL_objectz00_bglt BgL_objz00_6474;
BgL_objz00_6474 = 
(BgL_objectz00_bglt)(BgL_new1688z00_6472); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6474, BgL_arg4237z00_6473); } } 
{ /* ./Ast/node.scm 41 */
BgL_objectz00_bglt BgL_auxz00_8505;
BgL_auxz00_8505 = 
(BgL_objectz00_bglt)(BgL_new1688z00_6472); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8505, BFALSE); } 
{ /* ./Ast/node.scm 41 */
obj_t BgL_objz00_6475;
BgL_objz00_6475 = 
(obj_t)(BgL_new1688z00_6472); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6475); BUNSPEC; } 
BgL_res8090z00_6476 = BgL_new1688z00_6472; } 
BgL_auxz00_8500 = BgL_res8090z00_6476; } 
return 
(obj_t)(BgL_auxz00_8500);} } 
}



/* atom? */
BGL_EXPORTED_DEF bool_t BGl_atomzf3zf3zzast_nodez00(obj_t BgL_obj1667z00_616)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1667z00_616, BGl_atomz00zzast_nodez00);} 
}



/* _atom? */
obj_t BGl__atomzf3zf3zzast_nodez00(obj_t BgL_envz00_5347, obj_t BgL_obj1667z00_5348)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ /* ./Ast/node.scm 36 */
bool_t BgL_auxz00_8512;
BgL_auxz00_8512 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1667z00_5348, BGl_atomz00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8512);} } 
}



/* make-atom */
BGL_EXPORTED_DEF BgL_atomz00_bglt BGl_makezd2atomzd2zzast_nodez00(obj_t BgL_loc1639z00_620, BgL_typez00_bglt BgL_type1640z00_621, obj_t BgL_value1641z00_622)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_new1642z00_3423;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_res6081z00_3429;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_new1652z00_3424;
BgL_new1652z00_3424 = 
((BgL_atomz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_atomz00_bgl) ))); 
{ /* ./Ast/node.scm 36 */
long BgL_arg4246z00_3425;
BgL_arg4246z00_3425 = 
BGl_classzd2numzd2zz__objectz00(BGl_atomz00zzast_nodez00); 
{ /* ./Ast/node.scm 36 */
BgL_objectz00_bglt BgL_objz00_3426;
BgL_objz00_3426 = 
(BgL_objectz00_bglt)(BgL_new1652z00_3424); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3426, BgL_arg4246z00_3425); } } 
{ /* ./Ast/node.scm 36 */
BgL_objectz00_bglt BgL_auxz00_8519;
BgL_auxz00_8519 = 
(BgL_objectz00_bglt)(BgL_new1652z00_3424); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8519, BFALSE); } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_objz00_3428;
BgL_objz00_3428 = 
(obj_t)(BgL_new1652z00_3424); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3428); BUNSPEC; } 
BgL_res6081z00_3429 = BgL_new1652z00_3424; } 
BgL_new1642z00_3423 = BgL_res6081z00_3429; } 
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_res6082z00_3437;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_new1647z00_3430;
BgL_new1647z00_3430 = BgL_new1642z00_3423; 
{ /* ./Ast/node.scm 36 */
obj_t BgL_loc1644z00_3434;BgL_typez00_bglt BgL_type1645z00_3435;obj_t BgL_value1646z00_3436;
BgL_loc1644z00_3434 = BgL_loc1639z00_620; 
BgL_type1645z00_3435 = BgL_type1640z00_621; 
BgL_value1646z00_3436 = BgL_value1641z00_622; 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_3430))->BgL_locz00) = ((obj_t)BgL_loc1644z00_3434), BUNSPEC); 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_3430))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1645z00_3435), BUNSPEC); 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_3430))->BgL_valuez00) = ((obj_t)BgL_value1646z00_3436), BUNSPEC); 
BgL_res6082z00_3437 = BgL_new1647z00_3430; } } BgL_res6082z00_3437; } 
return BgL_new1642z00_3423;} } 
}



/* _make-atom6265 */
obj_t BGl__makezd2atom6265zd2zzast_nodez00(obj_t BgL_envz00_5349, obj_t BgL_loc1639z00_5350, obj_t BgL_type1640z00_5351, obj_t BgL_value1641z00_5352)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_auxz00_8527;
BgL_auxz00_8527 = 
BGl_makezd2atomzd2zzast_nodez00(BgL_loc1639z00_5350, 
(BgL_typez00_bglt)(BgL_type1640z00_5351), BgL_value1641z00_5352); 
return 
(obj_t)(BgL_auxz00_8527);} } 
}



/* fill-atom! */
BGL_EXPORTED_DEF BgL_atomz00_bglt BGl_fillzd2atomz12zc0zzast_nodez00(BgL_atomz00_bglt BgL_new1647z00_623, obj_t BgL_loc1644z00_624, BgL_typez00_bglt BgL_type1645z00_625, obj_t BgL_value1646z00_626)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ /* ./Ast/node.scm 36 */
obj_t BgL_loc1644z00_6478;BgL_typez00_bglt BgL_type1645z00_6479;obj_t BgL_value1646z00_6480;
BgL_loc1644z00_6478 = BgL_loc1644z00_624; 
BgL_type1645z00_6479 = BgL_type1645z00_625; 
BgL_value1646z00_6480 = BgL_value1646z00_626; 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_623))->BgL_locz00) = ((obj_t)BgL_loc1644z00_6478), BUNSPEC); 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_623))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1645z00_6479), BUNSPEC); 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_623))->BgL_valuez00) = ((obj_t)BgL_value1646z00_6480), BUNSPEC); 
return BgL_new1647z00_623;} } 
}



/* _fill-atom!6267 */
obj_t BGl__fillzd2atomz126267zc0zzast_nodez00(obj_t BgL_envz00_5353, obj_t BgL_new1647z00_5354, obj_t BgL_loc1644z00_5355, obj_t BgL_type1645z00_5356, obj_t BgL_value1646z00_5357)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_auxz00_8534;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_res8091z00_6488;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_new1647z00_6481;BgL_typez00_bglt BgL_type1645z00_6483;
BgL_new1647z00_6481 = 
(BgL_atomz00_bglt)(BgL_new1647z00_5354); 
BgL_type1645z00_6483 = 
(BgL_typez00_bglt)(BgL_type1645z00_5356); 
{ /* ./Ast/node.scm 36 */
obj_t BgL_loc1644z00_6485;BgL_typez00_bglt BgL_type1645z00_6486;obj_t BgL_value1646z00_6487;
BgL_loc1644z00_6485 = BgL_loc1644z00_5355; 
BgL_type1645z00_6486 = BgL_type1645z00_6483; 
BgL_value1646z00_6487 = BgL_value1646z00_5357; 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_6481))->BgL_locz00) = ((obj_t)BgL_loc1644z00_6485), BUNSPEC); 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_6481))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1645z00_6486), BUNSPEC); 
((((BgL_atomz00_bglt)CREF(BgL_new1647z00_6481))->BgL_valuez00) = ((obj_t)BgL_value1646z00_6487), BUNSPEC); 
BgL_res8091z00_6488 = BgL_new1647z00_6481; } } 
BgL_auxz00_8534 = BgL_res8091z00_6488; } 
return 
(obj_t)(BgL_auxz00_8534);} } 
}



/* allocate-atom */
BGL_EXPORTED_DEF BgL_atomz00_bglt BGl_allocatezd2atomzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_new1652z00_6489;
BgL_new1652z00_6489 = 
((BgL_atomz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_atomz00_bgl) ))); 
{ /* ./Ast/node.scm 36 */
long BgL_arg4246z00_6490;
BgL_arg4246z00_6490 = 
BGl_classzd2numzd2zz__objectz00(BGl_atomz00zzast_nodez00); 
{ /* ./Ast/node.scm 36 */
BgL_objectz00_bglt BgL_objz00_6491;
BgL_objz00_6491 = 
(BgL_objectz00_bglt)(BgL_new1652z00_6489); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6491, BgL_arg4246z00_6490); } } 
{ /* ./Ast/node.scm 36 */
BgL_objectz00_bglt BgL_auxz00_8545;
BgL_auxz00_8545 = 
(BgL_objectz00_bglt)(BgL_new1652z00_6489); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8545, BFALSE); } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_objz00_6492;
BgL_objz00_6492 = 
(obj_t)(BgL_new1652z00_6489); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6492); BUNSPEC; } 
return BgL_new1652z00_6489;} } 
}



/* _allocate-atom */
obj_t BGl__allocatezd2atomzd2zzast_nodez00(obj_t BgL_envz00_4830)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_auxz00_8550;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_res8092z00_6497;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_new1652z00_6493;
BgL_new1652z00_6493 = 
((BgL_atomz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_atomz00_bgl) ))); 
{ /* ./Ast/node.scm 36 */
long BgL_arg4246z00_6494;
BgL_arg4246z00_6494 = 
BGl_classzd2numzd2zz__objectz00(BGl_atomz00zzast_nodez00); 
{ /* ./Ast/node.scm 36 */
BgL_objectz00_bglt BgL_objz00_6495;
BgL_objz00_6495 = 
(BgL_objectz00_bglt)(BgL_new1652z00_6493); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6495, BgL_arg4246z00_6494); } } 
{ /* ./Ast/node.scm 36 */
BgL_objectz00_bglt BgL_auxz00_8555;
BgL_auxz00_8555 = 
(BgL_objectz00_bglt)(BgL_new1652z00_6493); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8555, BFALSE); } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_objz00_6496;
BgL_objz00_6496 = 
(obj_t)(BgL_new1652z00_6493); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6496); BUNSPEC; } 
BgL_res8092z00_6497 = BgL_new1652z00_6493; } 
BgL_auxz00_8550 = BgL_res8092z00_6497; } 
return 
(obj_t)(BgL_auxz00_8550);} } 
}



/* node/effect? */
BGL_EXPORTED_DEF bool_t BGl_nodezf2effectzf3z01zzast_nodez00(obj_t BgL_obj1631z00_630)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1631z00_630, BGl_nodezf2effectzf2zzast_nodez00);} 
}



/* _node/effect? */
obj_t BGl__nodezf2effectzf3z01zzast_nodez00(obj_t BgL_envz00_5358, obj_t BgL_obj1631z00_5359)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ /* ./Ast/node.scm 27 */
bool_t BgL_auxz00_8562;
BgL_auxz00_8562 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1631z00_5359, BGl_nodezf2effectzf2zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8562);} } 
}



/* make-node/effect */
BGL_EXPORTED_DEF BgL_nodezf2effectzf2_bglt BGl_makezd2nodezf2effectz20zzast_nodez00(obj_t BgL_loc1596z00_634, BgL_typez00_bglt BgL_type1597z00_635, obj_t BgL_sidezd2effectzf31598z21_636, obj_t BgL_key1599z00_637)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_new1600z00_3446;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_res6083z00_3452;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_new1612z00_3447;
BgL_new1612z00_3447 = 
((BgL_nodezf2effectzf2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_nodezf2effectzf2_bgl) ))); 
{ /* ./Ast/node.scm 27 */
long BgL_arg4255z00_3448;
BgL_arg4255z00_3448 = 
BGl_classzd2numzd2zz__objectz00(BGl_nodezf2effectzf2zzast_nodez00); 
{ /* ./Ast/node.scm 27 */
BgL_objectz00_bglt BgL_objz00_3449;
BgL_objz00_3449 = 
(BgL_objectz00_bglt)(BgL_new1612z00_3447); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3449, BgL_arg4255z00_3448); } } 
{ /* ./Ast/node.scm 27 */
BgL_objectz00_bglt BgL_auxz00_8569;
BgL_auxz00_8569 = 
(BgL_objectz00_bglt)(BgL_new1612z00_3447); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8569, BFALSE); } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_objz00_3451;
BgL_objz00_3451 = 
(obj_t)(BgL_new1612z00_3447); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3451); BUNSPEC; } 
BgL_res6083z00_3452 = BgL_new1612z00_3447; } 
BgL_new1600z00_3446 = BgL_res6083z00_3452; } 
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_res6084z00_3462;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_new1606z00_3453;
BgL_new1606z00_3453 = BgL_new1600z00_3446; 
{ /* ./Ast/node.scm 27 */
obj_t BgL_loc1602z00_3458;BgL_typez00_bglt BgL_type1603z00_3459;obj_t BgL_sidezd2effectzf31604z21_3460;obj_t BgL_key1605z00_3461;
BgL_loc1602z00_3458 = BgL_loc1596z00_634; 
BgL_type1603z00_3459 = BgL_type1597z00_635; 
BgL_sidezd2effectzf31604z21_3460 = BgL_sidezd2effectzf31598z21_636; 
BgL_key1605z00_3461 = BgL_key1599z00_637; 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_3453))->BgL_locz00) = ((obj_t)BgL_loc1602z00_3458), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_3453))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1603z00_3459), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_3453))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31604z21_3460), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_3453))->BgL_keyz00) = ((obj_t)BgL_key1605z00_3461), BUNSPEC); 
BgL_res6084z00_3462 = BgL_new1606z00_3453; } } BgL_res6084z00_3462; } 
return BgL_new1600z00_3446;} } 
}



/* _make-node/effect6270 */
obj_t BGl__makezd2nodezf2effect6270z20zzast_nodez00(obj_t BgL_envz00_5360, obj_t BgL_loc1596z00_5361, obj_t BgL_type1597z00_5362, obj_t BgL_sidezd2effectzf31598z21_5363, obj_t BgL_key1599z00_5364)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_auxz00_8578;
BgL_auxz00_8578 = 
BGl_makezd2nodezf2effectz20zzast_nodez00(BgL_loc1596z00_5361, 
(BgL_typez00_bglt)(BgL_type1597z00_5362), BgL_sidezd2effectzf31598z21_5363, BgL_key1599z00_5364); 
return 
(obj_t)(BgL_auxz00_8578);} } 
}



/* fill-node/effect! */
BGL_EXPORTED_DEF BgL_nodezf2effectzf2_bglt BGl_fillzd2nodezf2effectz12z32zzast_nodez00(BgL_nodezf2effectzf2_bglt BgL_new1606z00_638, obj_t BgL_loc1602z00_639, BgL_typez00_bglt BgL_type1603z00_640, obj_t BgL_sidezd2effectzf31604z21_641, obj_t BgL_key1605z00_642)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ /* ./Ast/node.scm 27 */
obj_t BgL_loc1602z00_6499;BgL_typez00_bglt BgL_type1603z00_6500;obj_t BgL_sidezd2effectzf31604z21_6501;obj_t BgL_key1605z00_6502;
BgL_loc1602z00_6499 = BgL_loc1602z00_639; 
BgL_type1603z00_6500 = BgL_type1603z00_640; 
BgL_sidezd2effectzf31604z21_6501 = BgL_sidezd2effectzf31604z21_641; 
BgL_key1605z00_6502 = BgL_key1605z00_642; 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_638))->BgL_locz00) = ((obj_t)BgL_loc1602z00_6499), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_638))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1603z00_6500), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_638))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31604z21_6501), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_638))->BgL_keyz00) = ((obj_t)BgL_key1605z00_6502), BUNSPEC); 
return BgL_new1606z00_638;} } 
}



/* _fill-node/effect!6272 */
obj_t BGl__fillzd2nodezf2effectz126272z32zzast_nodez00(obj_t BgL_envz00_5365, obj_t BgL_new1606z00_5366, obj_t BgL_loc1602z00_5367, obj_t BgL_type1603z00_5368, obj_t BgL_sidezd2effectzf31604z21_5369, obj_t BgL_key1605z00_5370)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_auxz00_8586;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_res8093z00_6512;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_new1606z00_6503;BgL_typez00_bglt BgL_type1603z00_6505;
BgL_new1606z00_6503 = 
(BgL_nodezf2effectzf2_bglt)(BgL_new1606z00_5366); 
BgL_type1603z00_6505 = 
(BgL_typez00_bglt)(BgL_type1603z00_5368); 
{ /* ./Ast/node.scm 27 */
obj_t BgL_loc1602z00_6508;BgL_typez00_bglt BgL_type1603z00_6509;obj_t BgL_sidezd2effectzf31604z21_6510;obj_t BgL_key1605z00_6511;
BgL_loc1602z00_6508 = BgL_loc1602z00_5367; 
BgL_type1603z00_6509 = BgL_type1603z00_6505; 
BgL_sidezd2effectzf31604z21_6510 = BgL_sidezd2effectzf31604z21_5369; 
BgL_key1605z00_6511 = BgL_key1605z00_5370; 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_6503))->BgL_locz00) = ((obj_t)BgL_loc1602z00_6508), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_6503))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1603z00_6509), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_6503))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_sidezd2effectzf31604z21_6510), BUNSPEC); 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_new1606z00_6503))->BgL_keyz00) = ((obj_t)BgL_key1605z00_6511), BUNSPEC); 
BgL_res8093z00_6512 = BgL_new1606z00_6503; } } 
BgL_auxz00_8586 = BgL_res8093z00_6512; } 
return 
(obj_t)(BgL_auxz00_8586);} } 
}



/* allocate-node/effect */
BGL_EXPORTED_DEF BgL_nodezf2effectzf2_bglt BGl_allocatezd2nodezf2effectz20zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_new1612z00_6513;
BgL_new1612z00_6513 = 
((BgL_nodezf2effectzf2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_nodezf2effectzf2_bgl) ))); 
{ /* ./Ast/node.scm 27 */
long BgL_arg4255z00_6514;
BgL_arg4255z00_6514 = 
BGl_classzd2numzd2zz__objectz00(BGl_nodezf2effectzf2zzast_nodez00); 
{ /* ./Ast/node.scm 27 */
BgL_objectz00_bglt BgL_objz00_6515;
BgL_objz00_6515 = 
(BgL_objectz00_bglt)(BgL_new1612z00_6513); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6515, BgL_arg4255z00_6514); } } 
{ /* ./Ast/node.scm 27 */
BgL_objectz00_bglt BgL_auxz00_8598;
BgL_auxz00_8598 = 
(BgL_objectz00_bglt)(BgL_new1612z00_6513); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8598, BFALSE); } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_objz00_6516;
BgL_objz00_6516 = 
(obj_t)(BgL_new1612z00_6513); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6516); BUNSPEC; } 
return BgL_new1612z00_6513;} } 
}



/* _allocate-node/effect */
obj_t BGl__allocatezd2nodezf2effectz20zzast_nodez00(obj_t BgL_envz00_4829)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_auxz00_8603;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_res8094z00_6521;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_new1612z00_6517;
BgL_new1612z00_6517 = 
((BgL_nodezf2effectzf2_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_nodezf2effectzf2_bgl) ))); 
{ /* ./Ast/node.scm 27 */
long BgL_arg4255z00_6518;
BgL_arg4255z00_6518 = 
BGl_classzd2numzd2zz__objectz00(BGl_nodezf2effectzf2zzast_nodez00); 
{ /* ./Ast/node.scm 27 */
BgL_objectz00_bglt BgL_objz00_6519;
BgL_objz00_6519 = 
(BgL_objectz00_bglt)(BgL_new1612z00_6517); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6519, BgL_arg4255z00_6518); } } 
{ /* ./Ast/node.scm 27 */
BgL_objectz00_bglt BgL_auxz00_8608;
BgL_auxz00_8608 = 
(BgL_objectz00_bglt)(BgL_new1612z00_6517); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8608, BFALSE); } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_objz00_6520;
BgL_objz00_6520 = 
(obj_t)(BgL_new1612z00_6517); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6520); BUNSPEC; } 
BgL_res8094z00_6521 = BgL_new1612z00_6517; } 
BgL_auxz00_8603 = BgL_res8094z00_6521; } 
return 
(obj_t)(BgL_auxz00_8603);} } 
}



/* node? */
BGL_EXPORTED_DEF bool_t BGl_nodezf3zf3zzast_nodez00(obj_t BgL_obj1585z00_649)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1585z00_649, BGl_nodez00zzast_nodez00);} 
}



/* _node? */
obj_t BGl__nodezf3zf3zzast_nodez00(obj_t BgL_envz00_5371, obj_t BgL_obj1585z00_5372)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ /* ./Ast/node.scm 19 */
bool_t BgL_auxz00_8615;
BgL_auxz00_8615 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1585z00_5372, BGl_nodez00zzast_nodez00); 
return 
BBOOL(BgL_auxz00_8615);} } 
}



/* make-node */
BGL_EXPORTED_DEF BgL_nodez00_bglt BGl_makezd2nodezd2zzast_nodez00(obj_t BgL_loc1564z00_653, BgL_typez00_bglt BgL_type1565z00_654)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_new1566z00_3472;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_res6085z00_3478;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_new1574z00_3473;
BgL_new1574z00_3473 = 
((BgL_nodez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_nodez00_bgl) ))); 
{ /* ./Ast/node.scm 19 */
long BgL_arg4264z00_3474;
BgL_arg4264z00_3474 = 
BGl_classzd2numzd2zz__objectz00(BGl_nodez00zzast_nodez00); 
{ /* ./Ast/node.scm 19 */
BgL_objectz00_bglt BgL_objz00_3475;
BgL_objz00_3475 = 
(BgL_objectz00_bglt)(BgL_new1574z00_3473); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3475, BgL_arg4264z00_3474); } } 
{ /* ./Ast/node.scm 19 */
BgL_objectz00_bglt BgL_auxz00_8622;
BgL_auxz00_8622 = 
(BgL_objectz00_bglt)(BgL_new1574z00_3473); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8622, BFALSE); } 
{ /* ./Ast/node.scm 19 */
obj_t BgL_objz00_3477;
BgL_objz00_3477 = 
(obj_t)(BgL_new1574z00_3473); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3477); BUNSPEC; } 
BgL_res6085z00_3478 = BgL_new1574z00_3473; } 
BgL_new1566z00_3472 = BgL_res6085z00_3478; } 
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_res6086z00_3484;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_new1570z00_3479;
BgL_new1570z00_3479 = BgL_new1566z00_3472; 
{ /* ./Ast/node.scm 19 */
obj_t BgL_loc1568z00_3482;BgL_typez00_bglt BgL_type1569z00_3483;
BgL_loc1568z00_3482 = BgL_loc1564z00_653; 
BgL_type1569z00_3483 = BgL_type1565z00_654; 
((((BgL_nodez00_bglt)CREF(BgL_new1570z00_3479))->BgL_locz00) = ((obj_t)BgL_loc1568z00_3482), BUNSPEC); 
((((BgL_nodez00_bglt)CREF(BgL_new1570z00_3479))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1569z00_3483), BUNSPEC); 
BgL_res6086z00_3484 = BgL_new1570z00_3479; } } BgL_res6086z00_3484; } 
return BgL_new1566z00_3472;} } 
}



/* _make-node6275 */
obj_t BGl__makezd2node6275zd2zzast_nodez00(obj_t BgL_envz00_5373, obj_t BgL_loc1564z00_5374, obj_t BgL_type1565z00_5375)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_auxz00_8629;
BgL_auxz00_8629 = 
BGl_makezd2nodezd2zzast_nodez00(BgL_loc1564z00_5374, 
(BgL_typez00_bglt)(BgL_type1565z00_5375)); 
return 
(obj_t)(BgL_auxz00_8629);} } 
}



/* fill-node! */
BGL_EXPORTED_DEF BgL_nodez00_bglt BGl_fillzd2nodez12zc0zzast_nodez00(BgL_nodez00_bglt BgL_new1570z00_655, obj_t BgL_loc1568z00_656, BgL_typez00_bglt BgL_type1569z00_657)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ /* ./Ast/node.scm 19 */
obj_t BgL_loc1568z00_6523;BgL_typez00_bglt BgL_type1569z00_6524;
BgL_loc1568z00_6523 = BgL_loc1568z00_656; 
BgL_type1569z00_6524 = BgL_type1569z00_657; 
((((BgL_nodez00_bglt)CREF(BgL_new1570z00_655))->BgL_locz00) = ((obj_t)BgL_loc1568z00_6523), BUNSPEC); 
((((BgL_nodez00_bglt)CREF(BgL_new1570z00_655))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1569z00_6524), BUNSPEC); 
return BgL_new1570z00_655;} } 
}



/* _fill-node!6277 */
obj_t BGl__fillzd2nodez126277zc0zzast_nodez00(obj_t BgL_envz00_5376, obj_t BgL_new1570z00_5377, obj_t BgL_loc1568z00_5378, obj_t BgL_type1569z00_5379)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_auxz00_8635;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_res8095z00_6530;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_new1570z00_6525;BgL_typez00_bglt BgL_type1569z00_6527;
BgL_new1570z00_6525 = 
(BgL_nodez00_bglt)(BgL_new1570z00_5377); 
BgL_type1569z00_6527 = 
(BgL_typez00_bglt)(BgL_type1569z00_5379); 
{ /* ./Ast/node.scm 19 */
obj_t BgL_loc1568z00_6528;BgL_typez00_bglt BgL_type1569z00_6529;
BgL_loc1568z00_6528 = BgL_loc1568z00_5378; 
BgL_type1569z00_6529 = BgL_type1569z00_6527; 
((((BgL_nodez00_bglt)CREF(BgL_new1570z00_6525))->BgL_locz00) = ((obj_t)BgL_loc1568z00_6528), BUNSPEC); 
((((BgL_nodez00_bglt)CREF(BgL_new1570z00_6525))->BgL_typez00) = ((BgL_typez00_bglt)BgL_type1569z00_6529), BUNSPEC); 
BgL_res8095z00_6530 = BgL_new1570z00_6525; } } 
BgL_auxz00_8635 = BgL_res8095z00_6530; } 
return 
(obj_t)(BgL_auxz00_8635);} } 
}



/* allocate-node */
BGL_EXPORTED_DEF BgL_nodez00_bglt BGl_allocatezd2nodezd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_new1574z00_6531;
BgL_new1574z00_6531 = 
((BgL_nodez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_nodez00_bgl) ))); 
{ /* ./Ast/node.scm 19 */
long BgL_arg4264z00_6532;
BgL_arg4264z00_6532 = 
BGl_classzd2numzd2zz__objectz00(BGl_nodez00zzast_nodez00); 
{ /* ./Ast/node.scm 19 */
BgL_objectz00_bglt BgL_objz00_6533;
BgL_objz00_6533 = 
(BgL_objectz00_bglt)(BgL_new1574z00_6531); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6533, BgL_arg4264z00_6532); } } 
{ /* ./Ast/node.scm 19 */
BgL_objectz00_bglt BgL_auxz00_8645;
BgL_auxz00_8645 = 
(BgL_objectz00_bglt)(BgL_new1574z00_6531); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8645, BFALSE); } 
{ /* ./Ast/node.scm 19 */
obj_t BgL_objz00_6534;
BgL_objz00_6534 = 
(obj_t)(BgL_new1574z00_6531); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6534); BUNSPEC; } 
return BgL_new1574z00_6531;} } 
}



/* _allocate-node */
obj_t BGl__allocatezd2nodezd2zzast_nodez00(obj_t BgL_envz00_4828)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_auxz00_8650;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_res8096z00_6539;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_new1574z00_6535;
BgL_new1574z00_6535 = 
((BgL_nodez00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_nodez00_bgl) ))); 
{ /* ./Ast/node.scm 19 */
long BgL_arg4264z00_6536;
BgL_arg4264z00_6536 = 
BGl_classzd2numzd2zz__objectz00(BGl_nodez00zzast_nodez00); 
{ /* ./Ast/node.scm 19 */
BgL_objectz00_bglt BgL_objz00_6537;
BgL_objz00_6537 = 
(BgL_objectz00_bglt)(BgL_new1574z00_6535); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_6537, BgL_arg4264z00_6536); } } 
{ /* ./Ast/node.scm 19 */
BgL_objectz00_bglt BgL_auxz00_8655;
BgL_auxz00_8655 = 
(BgL_objectz00_bglt)(BgL_new1574z00_6535); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8655, BFALSE); } 
{ /* ./Ast/node.scm 19 */
obj_t BgL_objz00_6538;
BgL_objz00_6538 = 
(obj_t)(BgL_new1574z00_6535); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_6538); BUNSPEC; } 
BgL_res8096z00_6539 = BgL_new1574z00_6535; } 
BgL_auxz00_8650 = BgL_res8096z00_6539; } 
return 
(obj_t)(BgL_auxz00_8650);} } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 14 */
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc7953z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc7954z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_boxzd2refzd2zzast_nodez00, BGl_proc7955z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_boxzd2refzd2zzast_nodez00, BGl_proc7956z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_makezd2boxzd2zzast_nodez00, BGl_proc7957z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_makezd2boxzd2zzast_nodez00, BGl_proc7958z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc7959z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc7960z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc7961z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc7962z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc7963z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc7964z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc7965z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc7966z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_selectz00zzast_nodez00, BGl_proc7967z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_selectz00zzast_nodez00, BGl_proc7968z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_failz00zzast_nodez00, BGl_proc7969z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_failz00zzast_nodez00, BGl_proc7970z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_conditionalz00zzast_nodez00, BGl_proc7971z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_conditionalz00zzast_nodez00, BGl_proc7972z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_setqz00zzast_nodez00, BGl_proc7973z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_setqz00zzast_nodez00, BGl_proc7974z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_castz00zzast_nodez00, BGl_proc7975z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_castz00zzast_nodez00, BGl_proc7976z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_isaz00zzast_nodez00, BGl_proc7977z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_isaz00zzast_nodez00, BGl_proc7978z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_vlengthz00zzast_nodez00, BGl_proc7979z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_vlengthz00zzast_nodez00, BGl_proc7980z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_vsetz12z12zzast_nodez00, BGl_proc7981z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_vsetz12z12zzast_nodez00, BGl_proc7982z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_vrefz00zzast_nodez00, BGl_proc7983z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_vrefz00zzast_nodez00, BGl_proc7984z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_vallocz00zzast_nodez00, BGl_proc7985z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_vallocz00zzast_nodez00, BGl_proc7986z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_newz00zzast_nodez00, BGl_proc7987z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_newz00zzast_nodez00, BGl_proc7988z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_setfieldz00zzast_nodez00, BGl_proc7989z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_setfieldz00zzast_nodez00, BGl_proc7990z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_getfieldz00zzast_nodez00, BGl_proc7991z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_getfieldz00zzast_nodez00, BGl_proc7992z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_pragmaz00zzast_nodez00, BGl_proc7993z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_pragmaz00zzast_nodez00, BGl_proc7994z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_externz00zzast_nodez00, BGl_proc7995z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_externz00zzast_nodez00, BGl_proc7996z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_funcallz00zzast_nodez00, BGl_proc7997z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_funcallz00zzast_nodez00, BGl_proc7998z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc7999z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc8000z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_appz00zzast_nodez00, BGl_proc8001z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_appz00zzast_nodez00, BGl_proc8002z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_sequencez00zzast_nodez00, BGl_proc8003z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_sequencez00zzast_nodez00, BGl_proc8004z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_kwotez00zzast_nodez00, BGl_proc8005z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_kwotez00zzast_nodez00, BGl_proc8006z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_closurez00zzast_nodez00, BGl_proc8007z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_closurez00zzast_nodez00, BGl_proc8008z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_varz00zzast_nodez00, BGl_proc8009z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_varz00zzast_nodez00, BGl_proc8010z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_atomz00zzast_nodez00, BGl_proc8011z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_atomz00zzast_nodez00, BGl_proc8012z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_nodezf2effectzf2zzast_nodez00, BGl_proc8013z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_nodezf2effectzf2zzast_nodez00, BGl_proc8014z00zzast_nodez00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_nodez00zzast_nodez00, BGl_proc8015z00zzast_nodez00); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_nodez00zzast_nodez00, BGl_proc8016z00zzast_nodez00);} 
}



/* struct+object->object-node3679 */
obj_t BGl_structzb2objectzd2ze3objectzd2node3679z51zzast_nodez00(obj_t BgL_envz00_5444, obj_t BgL_oz00_5445, obj_t BgL_sz00_5446)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ 
BgL_nodez00_bglt BgL_oz00_2495;obj_t BgL_sz00_2496;
{ /* ./Ast/node.scm 19 */
BgL_nodez00_bglt BgL_auxz00_8725;
BgL_oz00_2495 = 
(BgL_nodez00_bglt)(BgL_oz00_5445); 
BgL_sz00_2496 = BgL_sz00_5446; 
{ /* ./Ast/node.scm 19 */
obj_t BgL_arg6011z00_2499;
{ /* ./Ast/node.scm 19 */
int BgL_auxz00_8726;
BgL_auxz00_8726 = 
(int)(((long)0)); 
BgL_arg6011z00_2499 = 
STRUCT_REF(BgL_sz00_2496, BgL_auxz00_8726); } 
{ /* ./Ast/node.scm 19 */
BgL_objectz00_bglt BgL_auxz00_8729;
BgL_auxz00_8729 = 
(BgL_objectz00_bglt)(BgL_oz00_2495); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8729, BgL_arg6011z00_2499); } } 
{ /* ./Ast/node.scm 19 */
obj_t BgL_v1579z00_2500;
{ /* ./Ast/node.scm 19 */
int BgL_auxz00_8732;
BgL_auxz00_8732 = 
(int)(((long)1)); 
BgL_v1579z00_2500 = 
STRUCT_REF(BgL_sz00_2496, BgL_auxz00_8732); } 
((((BgL_nodez00_bglt)CREF(BgL_oz00_2495))->BgL_locz00) = ((obj_t)BgL_v1579z00_2500), BUNSPEC); } 
{ /* ./Ast/node.scm 19 */
BgL_typez00_bglt BgL_v1583z00_2501;
{ /* ./Ast/node.scm 19 */
obj_t BgL_auxz00_8736;
{ /* ./Ast/node.scm 19 */
int BgL_auxz00_8737;
BgL_auxz00_8737 = 
(int)(((long)2)); 
BgL_auxz00_8736 = 
STRUCT_REF(BgL_sz00_2496, BgL_auxz00_8737); } 
BgL_v1583z00_2501 = 
(BgL_typez00_bglt)(BgL_auxz00_8736); } 
((((BgL_nodez00_bglt)CREF(BgL_oz00_2495))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1583z00_2501), BUNSPEC); } 
BgL_auxz00_8725 = BgL_oz00_2495; 
return 
(obj_t)(BgL_auxz00_8725);} } } 
}



/* object->struct-node3677 */
obj_t BGl_objectzd2ze3structzd2node3677ze3zzast_nodez00(obj_t BgL_envz00_5447, obj_t BgL_obj1575z00_5448)
{ AN_OBJECT;
{ /* ./Ast/node.scm 19 */
{ 
BgL_nodez00_bglt BgL_obj1575z00_2485;
BgL_obj1575z00_2485 = 
(BgL_nodez00_bglt)(BgL_obj1575z00_5448); 
{ /* ./Ast/node.scm 19 */
obj_t BgL_res1576z00_2488;
{ /* ./Ast/node.scm 19 */
obj_t BgL_keyz00_4808;int BgL_lenz00_4809;
BgL_keyz00_4808 = 
CNST_TABLE_REF(((long)0)); 
BgL_lenz00_4809 = 
(int)(((long)3)); 
BgL_res1576z00_2488 = 
make_struct(BgL_keyz00_4808, BgL_lenz00_4809, BUNSPEC); } 
{ /* ./Ast/node.scm 19 */
int BgL_kz00_4812;
BgL_kz00_4812 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1576z00_2488, BgL_kz00_4812, BFALSE); } 
{ /* ./Ast/node.scm 19 */
obj_t BgL_arg5995z00_2490;
BgL_arg5995z00_2490 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1575z00_2485))->BgL_locz00); 
{ /* ./Ast/node.scm 19 */
int BgL_kz00_4816;
BgL_kz00_4816 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1576z00_2488, BgL_kz00_4816, BgL_arg5995z00_2490); } } 
{ /* ./Ast/node.scm 19 */
BgL_typez00_bglt BgL_arg6000z00_2492;
BgL_arg6000z00_2492 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1575z00_2485))->BgL_typez00); 
{ /* ./Ast/node.scm 19 */
int BgL_kz00_4820;obj_t BgL_oz00_4821;
BgL_kz00_4820 = 
(int)(((long)2)); 
BgL_oz00_4821 = 
(obj_t)(BgL_arg6000z00_2492); 
STRUCT_SET(BgL_res1576z00_2488, BgL_kz00_4820, BgL_oz00_4821); } } 
return BgL_res1576z00_2488;} } } 
}



/* struct+object->object-node/effect3675 */
obj_t BGl_structzb2objectzd2ze3objectzd2nodezf2effect3675za3zzast_nodez00(obj_t BgL_envz00_5449, obj_t BgL_oz00_5450, obj_t BgL_sz00_5451)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ 
BgL_nodezf2effectzf2_bglt BgL_oz00_2474;obj_t BgL_sz00_2475;
{ /* ./Ast/node.scm 27 */
BgL_nodezf2effectzf2_bglt BgL_auxz00_8757;
BgL_oz00_2474 = 
(BgL_nodezf2effectzf2_bglt)(BgL_oz00_5450); 
BgL_sz00_2475 = BgL_sz00_5451; 
{ /* ./Ast/node.scm 27 */
obj_t BgL_arg5979z00_2478;
{ /* ./Ast/node.scm 27 */
int BgL_auxz00_8758;
BgL_auxz00_8758 = 
(int)(((long)0)); 
BgL_arg5979z00_2478 = 
STRUCT_REF(BgL_sz00_2475, BgL_auxz00_8758); } 
{ /* ./Ast/node.scm 27 */
BgL_objectz00_bglt BgL_auxz00_8761;
BgL_auxz00_8761 = 
(BgL_objectz00_bglt)(BgL_oz00_2474); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8761, BgL_arg5979z00_2478); } } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_v1617z00_2479;
{ /* ./Ast/node.scm 27 */
int BgL_auxz00_8764;
BgL_auxz00_8764 = 
(int)(((long)1)); 
BgL_v1617z00_2479 = 
STRUCT_REF(BgL_sz00_2475, BgL_auxz00_8764); } 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_oz00_2474))->BgL_locz00) = ((obj_t)BgL_v1617z00_2479), BUNSPEC); } 
{ /* ./Ast/node.scm 27 */
BgL_typez00_bglt BgL_v1621z00_2480;
{ /* ./Ast/node.scm 27 */
obj_t BgL_auxz00_8768;
{ /* ./Ast/node.scm 27 */
int BgL_auxz00_8769;
BgL_auxz00_8769 = 
(int)(((long)2)); 
BgL_auxz00_8768 = 
STRUCT_REF(BgL_sz00_2475, BgL_auxz00_8769); } 
BgL_v1621z00_2480 = 
(BgL_typez00_bglt)(BgL_auxz00_8768); } 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_oz00_2474))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1621z00_2480), BUNSPEC); } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_v1625z00_2481;
{ /* ./Ast/node.scm 27 */
int BgL_auxz00_8774;
BgL_auxz00_8774 = 
(int)(((long)3)); 
BgL_v1625z00_2481 = 
STRUCT_REF(BgL_sz00_2475, BgL_auxz00_8774); } 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_oz00_2474))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v1625z00_2481), BUNSPEC); } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_v1629z00_2482;
{ /* ./Ast/node.scm 27 */
int BgL_auxz00_8778;
BgL_auxz00_8778 = 
(int)(((long)4)); 
BgL_v1629z00_2482 = 
STRUCT_REF(BgL_sz00_2475, BgL_auxz00_8778); } 
((((BgL_nodezf2effectzf2_bglt)CREF(BgL_oz00_2474))->BgL_keyz00) = ((obj_t)BgL_v1629z00_2482), BUNSPEC); } 
BgL_auxz00_8757 = BgL_oz00_2474; 
return 
(obj_t)(BgL_auxz00_8757);} } } 
}



/* object->struct-node/effect3673 */
obj_t BGl_objectzd2ze3structzd2nodezf2effect3673z11zzast_nodez00(obj_t BgL_envz00_5452, obj_t BgL_obj1613z00_5453)
{ AN_OBJECT;
{ /* ./Ast/node.scm 27 */
{ 
BgL_nodezf2effectzf2_bglt BgL_obj1613z00_2460;
BgL_obj1613z00_2460 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj1613z00_5453); 
{ /* ./Ast/node.scm 27 */
obj_t BgL_res1614z00_2463;
{ /* ./Ast/node.scm 27 */
obj_t BgL_keyz00_4776;int BgL_lenz00_4777;
BgL_keyz00_4776 = 
CNST_TABLE_REF(((long)1)); 
BgL_lenz00_4777 = 
(int)(((long)5)); 
BgL_res1614z00_2463 = 
make_struct(BgL_keyz00_4776, BgL_lenz00_4777, BUNSPEC); } 
{ /* ./Ast/node.scm 27 */
int BgL_kz00_4780;
BgL_kz00_4780 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1614z00_2463, BgL_kz00_4780, BFALSE); } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_arg5953z00_2465;
{ /* ./Ast/node.scm 27 */
BgL_nodez00_bglt BgL_obj1560z00_4782;
BgL_obj1560z00_4782 = 
(BgL_nodez00_bglt)(BgL_obj1613z00_2460); 
BgL_arg5953z00_2465 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4782))->BgL_locz00); } 
{ /* ./Ast/node.scm 27 */
int BgL_kz00_4784;
BgL_kz00_4784 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1614z00_2463, BgL_kz00_4784, BgL_arg5953z00_2465); } } 
{ /* ./Ast/node.scm 27 */
BgL_typez00_bglt BgL_arg5958z00_2467;
{ /* ./Ast/node.scm 27 */
BgL_nodez00_bglt BgL_obj1561z00_4786;
BgL_obj1561z00_4786 = 
(BgL_nodez00_bglt)(BgL_obj1613z00_2460); 
BgL_arg5958z00_2467 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4786))->BgL_typez00); } 
{ /* ./Ast/node.scm 27 */
int BgL_kz00_4788;obj_t BgL_oz00_4789;
BgL_kz00_4788 = 
(int)(((long)2)); 
BgL_oz00_4789 = 
(obj_t)(BgL_arg5958z00_2467); 
STRUCT_SET(BgL_res1614z00_2463, BgL_kz00_4788, BgL_oz00_4789); } } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_arg5963z00_2469;
BgL_arg5963z00_2469 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1613z00_2460))->BgL_sidezd2effectzf3z21); 
{ /* ./Ast/node.scm 27 */
int BgL_kz00_4792;
BgL_kz00_4792 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res1614z00_2463, BgL_kz00_4792, BgL_arg5963z00_2469); } } 
{ /* ./Ast/node.scm 27 */
obj_t BgL_arg5968z00_2471;
BgL_arg5968z00_2471 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1613z00_2460))->BgL_keyz00); 
{ /* ./Ast/node.scm 27 */
int BgL_kz00_4796;
BgL_kz00_4796 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res1614z00_2463, BgL_kz00_4796, BgL_arg5968z00_2471); } } 
return BgL_res1614z00_2463;} } } 
}



/* struct+object->object-atom3671 */
obj_t BGl_structzb2objectzd2ze3objectzd2atom3671z51zzast_nodez00(obj_t BgL_envz00_5454, obj_t BgL_oz00_5455, obj_t BgL_sz00_5456)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ 
BgL_atomz00_bglt BgL_oz00_2450;obj_t BgL_sz00_2451;
{ /* ./Ast/node.scm 36 */
BgL_atomz00_bglt BgL_auxz00_8805;
BgL_oz00_2450 = 
(BgL_atomz00_bglt)(BgL_oz00_5455); 
BgL_sz00_2451 = BgL_sz00_5456; 
{ /* ./Ast/node.scm 36 */
obj_t BgL_arg5938z00_2454;
{ /* ./Ast/node.scm 36 */
int BgL_auxz00_8806;
BgL_auxz00_8806 = 
(int)(((long)0)); 
BgL_arg5938z00_2454 = 
STRUCT_REF(BgL_sz00_2451, BgL_auxz00_8806); } 
{ /* ./Ast/node.scm 36 */
BgL_objectz00_bglt BgL_auxz00_8809;
BgL_auxz00_8809 = 
(BgL_objectz00_bglt)(BgL_oz00_2450); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8809, BgL_arg5938z00_2454); } } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_v1657z00_2455;
{ /* ./Ast/node.scm 36 */
int BgL_auxz00_8812;
BgL_auxz00_8812 = 
(int)(((long)1)); 
BgL_v1657z00_2455 = 
STRUCT_REF(BgL_sz00_2451, BgL_auxz00_8812); } 
((((BgL_atomz00_bglt)CREF(BgL_oz00_2450))->BgL_locz00) = ((obj_t)BgL_v1657z00_2455), BUNSPEC); } 
{ /* ./Ast/node.scm 36 */
BgL_typez00_bglt BgL_v1661z00_2456;
{ /* ./Ast/node.scm 36 */
obj_t BgL_auxz00_8816;
{ /* ./Ast/node.scm 36 */
int BgL_auxz00_8817;
BgL_auxz00_8817 = 
(int)(((long)2)); 
BgL_auxz00_8816 = 
STRUCT_REF(BgL_sz00_2451, BgL_auxz00_8817); } 
BgL_v1661z00_2456 = 
(BgL_typez00_bglt)(BgL_auxz00_8816); } 
((((BgL_atomz00_bglt)CREF(BgL_oz00_2450))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1661z00_2456), BUNSPEC); } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_v1665z00_2457;
{ /* ./Ast/node.scm 36 */
int BgL_auxz00_8822;
BgL_auxz00_8822 = 
(int)(((long)3)); 
BgL_v1665z00_2457 = 
STRUCT_REF(BgL_sz00_2451, BgL_auxz00_8822); } 
((((BgL_atomz00_bglt)CREF(BgL_oz00_2450))->BgL_valuez00) = ((obj_t)BgL_v1665z00_2457), BUNSPEC); } 
BgL_auxz00_8805 = BgL_oz00_2450; 
return 
(obj_t)(BgL_auxz00_8805);} } } 
}



/* object->struct-atom3669 */
obj_t BGl_objectzd2ze3structzd2atom3669ze3zzast_nodez00(obj_t BgL_envz00_5457, obj_t BgL_obj1653z00_5458)
{ AN_OBJECT;
{ /* ./Ast/node.scm 36 */
{ 
BgL_atomz00_bglt BgL_obj1653z00_2438;
BgL_obj1653z00_2438 = 
(BgL_atomz00_bglt)(BgL_obj1653z00_5458); 
{ /* ./Ast/node.scm 36 */
obj_t BgL_res1654z00_2441;
{ /* ./Ast/node.scm 36 */
obj_t BgL_keyz00_4750;int BgL_lenz00_4751;
BgL_keyz00_4750 = 
CNST_TABLE_REF(((long)2)); 
BgL_lenz00_4751 = 
(int)(((long)4)); 
BgL_res1654z00_2441 = 
make_struct(BgL_keyz00_4750, BgL_lenz00_4751, BUNSPEC); } 
{ /* ./Ast/node.scm 36 */
int BgL_kz00_4754;
BgL_kz00_4754 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1654z00_2441, BgL_kz00_4754, BFALSE); } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_arg5917z00_2443;
{ /* ./Ast/node.scm 36 */
BgL_nodez00_bglt BgL_obj1560z00_4756;
BgL_obj1560z00_4756 = 
(BgL_nodez00_bglt)(BgL_obj1653z00_2438); 
BgL_arg5917z00_2443 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4756))->BgL_locz00); } 
{ /* ./Ast/node.scm 36 */
int BgL_kz00_4758;
BgL_kz00_4758 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1654z00_2441, BgL_kz00_4758, BgL_arg5917z00_2443); } } 
{ /* ./Ast/node.scm 36 */
BgL_typez00_bglt BgL_arg5922z00_2445;
{ /* ./Ast/node.scm 36 */
BgL_nodez00_bglt BgL_obj1561z00_4760;
BgL_obj1561z00_4760 = 
(BgL_nodez00_bglt)(BgL_obj1653z00_2438); 
BgL_arg5922z00_2445 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4760))->BgL_typez00); } 
{ /* ./Ast/node.scm 36 */
int BgL_kz00_4762;obj_t BgL_oz00_4763;
BgL_kz00_4762 = 
(int)(((long)2)); 
BgL_oz00_4763 = 
(obj_t)(BgL_arg5922z00_2445); 
STRUCT_SET(BgL_res1654z00_2441, BgL_kz00_4762, BgL_oz00_4763); } } 
{ /* ./Ast/node.scm 36 */
obj_t BgL_arg5927z00_2447;
BgL_arg5927z00_2447 = 
(((BgL_atomz00_bglt)CREF(BgL_obj1653z00_2438))->BgL_valuez00); 
{ /* ./Ast/node.scm 36 */
int BgL_kz00_4766;
BgL_kz00_4766 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res1654z00_2441, BgL_kz00_4766, BgL_arg5927z00_2447); } } 
return BgL_res1654z00_2441;} } } 
}



/* struct+object->object-var3667 */
obj_t BGl_structzb2objectzd2ze3objectzd2var3667z51zzast_nodez00(obj_t BgL_envz00_5459, obj_t BgL_oz00_5460, obj_t BgL_sz00_5461)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ 
BgL_varz00_bglt BgL_oz00_2428;obj_t BgL_sz00_2429;
{ /* ./Ast/node.scm 41 */
BgL_varz00_bglt BgL_auxz00_8846;
BgL_oz00_2428 = 
(BgL_varz00_bglt)(BgL_oz00_5460); 
BgL_sz00_2429 = BgL_sz00_5461; 
{ /* ./Ast/node.scm 41 */
obj_t BgL_arg5902z00_2432;
{ /* ./Ast/node.scm 41 */
int BgL_auxz00_8847;
BgL_auxz00_8847 = 
(int)(((long)0)); 
BgL_arg5902z00_2432 = 
STRUCT_REF(BgL_sz00_2429, BgL_auxz00_8847); } 
{ /* ./Ast/node.scm 41 */
BgL_objectz00_bglt BgL_auxz00_8850;
BgL_auxz00_8850 = 
(BgL_objectz00_bglt)(BgL_oz00_2428); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8850, BgL_arg5902z00_2432); } } 
{ /* ./Ast/node.scm 41 */
obj_t BgL_v1693z00_2433;
{ /* ./Ast/node.scm 41 */
int BgL_auxz00_8853;
BgL_auxz00_8853 = 
(int)(((long)1)); 
BgL_v1693z00_2433 = 
STRUCT_REF(BgL_sz00_2429, BgL_auxz00_8853); } 
((((BgL_varz00_bglt)CREF(BgL_oz00_2428))->BgL_locz00) = ((obj_t)BgL_v1693z00_2433), BUNSPEC); } 
{ /* ./Ast/node.scm 41 */
BgL_typez00_bglt BgL_v1697z00_2434;
{ /* ./Ast/node.scm 41 */
obj_t BgL_auxz00_8857;
{ /* ./Ast/node.scm 41 */
int BgL_auxz00_8858;
BgL_auxz00_8858 = 
(int)(((long)2)); 
BgL_auxz00_8857 = 
STRUCT_REF(BgL_sz00_2429, BgL_auxz00_8858); } 
BgL_v1697z00_2434 = 
(BgL_typez00_bglt)(BgL_auxz00_8857); } 
((((BgL_varz00_bglt)CREF(BgL_oz00_2428))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1697z00_2434), BUNSPEC); } 
{ /* ./Ast/node.scm 41 */
BgL_variablez00_bglt BgL_v1701z00_2435;
{ /* ./Ast/node.scm 41 */
obj_t BgL_auxz00_8863;
{ /* ./Ast/node.scm 41 */
int BgL_auxz00_8864;
BgL_auxz00_8864 = 
(int)(((long)3)); 
BgL_auxz00_8863 = 
STRUCT_REF(BgL_sz00_2429, BgL_auxz00_8864); } 
BgL_v1701z00_2435 = 
(BgL_variablez00_bglt)(BgL_auxz00_8863); } 
((((BgL_varz00_bglt)CREF(BgL_oz00_2428))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_v1701z00_2435), BUNSPEC); } 
BgL_auxz00_8846 = BgL_oz00_2428; 
return 
(obj_t)(BgL_auxz00_8846);} } } 
}



/* object->struct-var3665 */
obj_t BGl_objectzd2ze3structzd2var3665ze3zzast_nodez00(obj_t BgL_envz00_5462, obj_t BgL_obj1689z00_5463)
{ AN_OBJECT;
{ /* ./Ast/node.scm 41 */
{ 
BgL_varz00_bglt BgL_obj1689z00_2416;
BgL_obj1689z00_2416 = 
(BgL_varz00_bglt)(BgL_obj1689z00_5463); 
{ /* ./Ast/node.scm 41 */
obj_t BgL_res1690z00_2419;
{ /* ./Ast/node.scm 41 */
obj_t BgL_keyz00_4724;int BgL_lenz00_4725;
BgL_keyz00_4724 = 
CNST_TABLE_REF(((long)3)); 
BgL_lenz00_4725 = 
(int)(((long)4)); 
BgL_res1690z00_2419 = 
make_struct(BgL_keyz00_4724, BgL_lenz00_4725, BUNSPEC); } 
{ /* ./Ast/node.scm 41 */
int BgL_kz00_4728;
BgL_kz00_4728 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1690z00_2419, BgL_kz00_4728, BFALSE); } 
{ /* ./Ast/node.scm 41 */
obj_t BgL_arg5881z00_2421;
{ /* ./Ast/node.scm 41 */
BgL_nodez00_bglt BgL_obj1560z00_4730;
BgL_obj1560z00_4730 = 
(BgL_nodez00_bglt)(BgL_obj1689z00_2416); 
BgL_arg5881z00_2421 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4730))->BgL_locz00); } 
{ /* ./Ast/node.scm 41 */
int BgL_kz00_4732;
BgL_kz00_4732 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1690z00_2419, BgL_kz00_4732, BgL_arg5881z00_2421); } } 
{ /* ./Ast/node.scm 41 */
BgL_typez00_bglt BgL_arg5886z00_2423;
{ /* ./Ast/node.scm 41 */
BgL_nodez00_bglt BgL_obj1561z00_4734;
BgL_obj1561z00_4734 = 
(BgL_nodez00_bglt)(BgL_obj1689z00_2416); 
BgL_arg5886z00_2423 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4734))->BgL_typez00); } 
{ /* ./Ast/node.scm 41 */
int BgL_kz00_4736;obj_t BgL_oz00_4737;
BgL_kz00_4736 = 
(int)(((long)2)); 
BgL_oz00_4737 = 
(obj_t)(BgL_arg5886z00_2423); 
STRUCT_SET(BgL_res1690z00_2419, BgL_kz00_4736, BgL_oz00_4737); } } 
{ /* ./Ast/node.scm 41 */
BgL_variablez00_bglt BgL_arg5891z00_2425;
BgL_arg5891z00_2425 = 
(((BgL_varz00_bglt)CREF(BgL_obj1689z00_2416))->BgL_variablez00); 
{ /* ./Ast/node.scm 41 */
int BgL_kz00_4740;obj_t BgL_oz00_4741;
BgL_kz00_4740 = 
(int)(((long)3)); 
BgL_oz00_4741 = 
(obj_t)(BgL_arg5891z00_2425); 
STRUCT_SET(BgL_res1690z00_2419, BgL_kz00_4740, BgL_oz00_4741); } } 
return BgL_res1690z00_2419;} } } 
}



/* struct+object->object-closure3663 */
obj_t BGl_structzb2objectzd2ze3objectzd2closure3663z51zzast_nodez00(obj_t BgL_envz00_5464, obj_t BgL_oz00_5465, obj_t BgL_sz00_5466)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ 
BgL_closurez00_bglt BgL_oz00_2406;obj_t BgL_sz00_2407;
{ /* ./Ast/node.scm 46 */
BgL_closurez00_bglt BgL_auxz00_8890;
BgL_oz00_2406 = 
(BgL_closurez00_bglt)(BgL_oz00_5465); 
BgL_sz00_2407 = BgL_sz00_5466; 
{ /* ./Ast/node.scm 46 */
obj_t BgL_arg5866z00_2410;
{ /* ./Ast/node.scm 46 */
int BgL_auxz00_8891;
BgL_auxz00_8891 = 
(int)(((long)0)); 
BgL_arg5866z00_2410 = 
STRUCT_REF(BgL_sz00_2407, BgL_auxz00_8891); } 
{ /* ./Ast/node.scm 46 */
BgL_objectz00_bglt BgL_auxz00_8894;
BgL_auxz00_8894 = 
(BgL_objectz00_bglt)(BgL_oz00_2406); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8894, BgL_arg5866z00_2410); } } 
{ /* ./Ast/node.scm 46 */
obj_t BgL_v1729z00_2411;
{ /* ./Ast/node.scm 46 */
int BgL_auxz00_8897;
BgL_auxz00_8897 = 
(int)(((long)1)); 
BgL_v1729z00_2411 = 
STRUCT_REF(BgL_sz00_2407, BgL_auxz00_8897); } 
((((BgL_closurez00_bglt)CREF(BgL_oz00_2406))->BgL_locz00) = ((obj_t)BgL_v1729z00_2411), BUNSPEC); } 
{ /* ./Ast/node.scm 46 */
BgL_typez00_bglt BgL_v1733z00_2412;
{ /* ./Ast/node.scm 46 */
obj_t BgL_auxz00_8901;
{ /* ./Ast/node.scm 46 */
int BgL_auxz00_8902;
BgL_auxz00_8902 = 
(int)(((long)2)); 
BgL_auxz00_8901 = 
STRUCT_REF(BgL_sz00_2407, BgL_auxz00_8902); } 
BgL_v1733z00_2412 = 
(BgL_typez00_bglt)(BgL_auxz00_8901); } 
((((BgL_closurez00_bglt)CREF(BgL_oz00_2406))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1733z00_2412), BUNSPEC); } 
{ /* ./Ast/node.scm 46 */
BgL_variablez00_bglt BgL_v1737z00_2413;
{ /* ./Ast/node.scm 46 */
obj_t BgL_auxz00_8907;
{ /* ./Ast/node.scm 46 */
int BgL_auxz00_8908;
BgL_auxz00_8908 = 
(int)(((long)3)); 
BgL_auxz00_8907 = 
STRUCT_REF(BgL_sz00_2407, BgL_auxz00_8908); } 
BgL_v1737z00_2413 = 
(BgL_variablez00_bglt)(BgL_auxz00_8907); } 
((((BgL_closurez00_bglt)CREF(BgL_oz00_2406))->BgL_variablez00) = ((BgL_variablez00_bglt)BgL_v1737z00_2413), BUNSPEC); } 
BgL_auxz00_8890 = BgL_oz00_2406; 
return 
(obj_t)(BgL_auxz00_8890);} } } 
}



/* object->struct-closure3661 */
obj_t BGl_objectzd2ze3structzd2closure3661ze3zzast_nodez00(obj_t BgL_envz00_5467, obj_t BgL_obj1725z00_5468)
{ AN_OBJECT;
{ /* ./Ast/node.scm 46 */
{ 
BgL_closurez00_bglt BgL_obj1725z00_2394;
BgL_obj1725z00_2394 = 
(BgL_closurez00_bglt)(BgL_obj1725z00_5468); 
{ /* ./Ast/node.scm 46 */
obj_t BgL_res1726z00_2397;
{ /* ./Ast/node.scm 46 */
obj_t BgL_keyz00_4698;int BgL_lenz00_4699;
BgL_keyz00_4698 = 
CNST_TABLE_REF(((long)4)); 
BgL_lenz00_4699 = 
(int)(((long)4)); 
BgL_res1726z00_2397 = 
make_struct(BgL_keyz00_4698, BgL_lenz00_4699, BUNSPEC); } 
{ /* ./Ast/node.scm 46 */
int BgL_kz00_4702;
BgL_kz00_4702 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1726z00_2397, BgL_kz00_4702, BFALSE); } 
{ /* ./Ast/node.scm 46 */
obj_t BgL_arg5845z00_2399;
{ /* ./Ast/node.scm 46 */
BgL_nodez00_bglt BgL_obj1560z00_4704;
BgL_obj1560z00_4704 = 
(BgL_nodez00_bglt)(BgL_obj1725z00_2394); 
BgL_arg5845z00_2399 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4704))->BgL_locz00); } 
{ /* ./Ast/node.scm 46 */
int BgL_kz00_4706;
BgL_kz00_4706 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1726z00_2397, BgL_kz00_4706, BgL_arg5845z00_2399); } } 
{ /* ./Ast/node.scm 46 */
BgL_typez00_bglt BgL_arg5850z00_2401;
{ /* ./Ast/node.scm 46 */
BgL_nodez00_bglt BgL_obj1561z00_4708;
BgL_obj1561z00_4708 = 
(BgL_nodez00_bglt)(BgL_obj1725z00_2394); 
BgL_arg5850z00_2401 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4708))->BgL_typez00); } 
{ /* ./Ast/node.scm 46 */
int BgL_kz00_4710;obj_t BgL_oz00_4711;
BgL_kz00_4710 = 
(int)(((long)2)); 
BgL_oz00_4711 = 
(obj_t)(BgL_arg5850z00_2401); 
STRUCT_SET(BgL_res1726z00_2397, BgL_kz00_4710, BgL_oz00_4711); } } 
{ /* ./Ast/node.scm 46 */
BgL_variablez00_bglt BgL_arg5855z00_2403;
{ /* ./Ast/node.scm 46 */
BgL_varz00_bglt BgL_obj1672z00_4712;
BgL_obj1672z00_4712 = 
(BgL_varz00_bglt)(BgL_obj1725z00_2394); 
BgL_arg5855z00_2403 = 
(((BgL_varz00_bglt)CREF(BgL_obj1672z00_4712))->BgL_variablez00); } 
{ /* ./Ast/node.scm 46 */
int BgL_kz00_4714;obj_t BgL_oz00_4715;
BgL_kz00_4714 = 
(int)(((long)3)); 
BgL_oz00_4715 = 
(obj_t)(BgL_arg5855z00_2403); 
STRUCT_SET(BgL_res1726z00_2397, BgL_kz00_4714, BgL_oz00_4715); } } 
return BgL_res1726z00_2397;} } } 
}



/* struct+object->object-kwote3659 */
obj_t BGl_structzb2objectzd2ze3objectzd2kwote3659z51zzast_nodez00(obj_t BgL_envz00_5469, obj_t BgL_oz00_5470, obj_t BgL_sz00_5471)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ 
BgL_kwotez00_bglt BgL_oz00_2384;obj_t BgL_sz00_2385;
{ /* ./Ast/node.scm 49 */
BgL_kwotez00_bglt BgL_auxz00_8935;
BgL_oz00_2384 = 
(BgL_kwotez00_bglt)(BgL_oz00_5470); 
BgL_sz00_2385 = BgL_sz00_5471; 
{ /* ./Ast/node.scm 49 */
obj_t BgL_arg5830z00_2388;
{ /* ./Ast/node.scm 49 */
int BgL_auxz00_8936;
BgL_auxz00_8936 = 
(int)(((long)0)); 
BgL_arg5830z00_2388 = 
STRUCT_REF(BgL_sz00_2385, BgL_auxz00_8936); } 
{ /* ./Ast/node.scm 49 */
BgL_objectz00_bglt BgL_auxz00_8939;
BgL_auxz00_8939 = 
(BgL_objectz00_bglt)(BgL_oz00_2384); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8939, BgL_arg5830z00_2388); } } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_v1763z00_2389;
{ /* ./Ast/node.scm 49 */
int BgL_auxz00_8942;
BgL_auxz00_8942 = 
(int)(((long)1)); 
BgL_v1763z00_2389 = 
STRUCT_REF(BgL_sz00_2385, BgL_auxz00_8942); } 
((((BgL_kwotez00_bglt)CREF(BgL_oz00_2384))->BgL_locz00) = ((obj_t)BgL_v1763z00_2389), BUNSPEC); } 
{ /* ./Ast/node.scm 49 */
BgL_typez00_bglt BgL_v1767z00_2390;
{ /* ./Ast/node.scm 49 */
obj_t BgL_auxz00_8946;
{ /* ./Ast/node.scm 49 */
int BgL_auxz00_8947;
BgL_auxz00_8947 = 
(int)(((long)2)); 
BgL_auxz00_8946 = 
STRUCT_REF(BgL_sz00_2385, BgL_auxz00_8947); } 
BgL_v1767z00_2390 = 
(BgL_typez00_bglt)(BgL_auxz00_8946); } 
((((BgL_kwotez00_bglt)CREF(BgL_oz00_2384))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1767z00_2390), BUNSPEC); } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_v1771z00_2391;
{ /* ./Ast/node.scm 49 */
int BgL_auxz00_8952;
BgL_auxz00_8952 = 
(int)(((long)3)); 
BgL_v1771z00_2391 = 
STRUCT_REF(BgL_sz00_2385, BgL_auxz00_8952); } 
((((BgL_kwotez00_bglt)CREF(BgL_oz00_2384))->BgL_valuez00) = ((obj_t)BgL_v1771z00_2391), BUNSPEC); } 
BgL_auxz00_8935 = BgL_oz00_2384; 
return 
(obj_t)(BgL_auxz00_8935);} } } 
}



/* object->struct-kwote3657 */
obj_t BGl_objectzd2ze3structzd2kwote3657ze3zzast_nodez00(obj_t BgL_envz00_5472, obj_t BgL_obj1759z00_5473)
{ AN_OBJECT;
{ /* ./Ast/node.scm 49 */
{ 
BgL_kwotez00_bglt BgL_obj1759z00_2372;
BgL_obj1759z00_2372 = 
(BgL_kwotez00_bglt)(BgL_obj1759z00_5473); 
{ /* ./Ast/node.scm 49 */
obj_t BgL_res1760z00_2375;
{ /* ./Ast/node.scm 49 */
obj_t BgL_keyz00_4672;int BgL_lenz00_4673;
BgL_keyz00_4672 = 
CNST_TABLE_REF(((long)5)); 
BgL_lenz00_4673 = 
(int)(((long)4)); 
BgL_res1760z00_2375 = 
make_struct(BgL_keyz00_4672, BgL_lenz00_4673, BUNSPEC); } 
{ /* ./Ast/node.scm 49 */
int BgL_kz00_4676;
BgL_kz00_4676 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1760z00_2375, BgL_kz00_4676, BFALSE); } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_arg5809z00_2377;
{ /* ./Ast/node.scm 49 */
BgL_nodez00_bglt BgL_obj1560z00_4678;
BgL_obj1560z00_4678 = 
(BgL_nodez00_bglt)(BgL_obj1759z00_2372); 
BgL_arg5809z00_2377 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4678))->BgL_locz00); } 
{ /* ./Ast/node.scm 49 */
int BgL_kz00_4680;
BgL_kz00_4680 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1760z00_2375, BgL_kz00_4680, BgL_arg5809z00_2377); } } 
{ /* ./Ast/node.scm 49 */
BgL_typez00_bglt BgL_arg5814z00_2379;
{ /* ./Ast/node.scm 49 */
BgL_nodez00_bglt BgL_obj1561z00_4682;
BgL_obj1561z00_4682 = 
(BgL_nodez00_bglt)(BgL_obj1759z00_2372); 
BgL_arg5814z00_2379 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4682))->BgL_typez00); } 
{ /* ./Ast/node.scm 49 */
int BgL_kz00_4684;obj_t BgL_oz00_4685;
BgL_kz00_4684 = 
(int)(((long)2)); 
BgL_oz00_4685 = 
(obj_t)(BgL_arg5814z00_2379); 
STRUCT_SET(BgL_res1760z00_2375, BgL_kz00_4684, BgL_oz00_4685); } } 
{ /* ./Ast/node.scm 49 */
obj_t BgL_arg5819z00_2381;
BgL_arg5819z00_2381 = 
(((BgL_kwotez00_bglt)CREF(BgL_obj1759z00_2372))->BgL_valuez00); 
{ /* ./Ast/node.scm 49 */
int BgL_kz00_4688;
BgL_kz00_4688 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res1760z00_2375, BgL_kz00_4688, BgL_arg5819z00_2381); } } 
return BgL_res1760z00_2375;} } } 
}



/* struct+object->object-sequence3655 */
obj_t BGl_structzb2objectzd2ze3objectzd2sequence3655z51zzast_nodez00(obj_t BgL_envz00_5474, obj_t BgL_oz00_5475, obj_t BgL_sz00_5476)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ 
BgL_sequencez00_bglt BgL_oz00_2360;obj_t BgL_sz00_2361;
{ /* ./Ast/node.scm 54 */
BgL_sequencez00_bglt BgL_auxz00_8976;
BgL_oz00_2360 = 
(BgL_sequencez00_bglt)(BgL_oz00_5475); 
BgL_sz00_2361 = BgL_sz00_5476; 
{ /* ./Ast/node.scm 54 */
obj_t BgL_arg5792z00_2364;
{ /* ./Ast/node.scm 54 */
int BgL_auxz00_8977;
BgL_auxz00_8977 = 
(int)(((long)0)); 
BgL_arg5792z00_2364 = 
STRUCT_REF(BgL_sz00_2361, BgL_auxz00_8977); } 
{ /* ./Ast/node.scm 54 */
BgL_objectz00_bglt BgL_auxz00_8980;
BgL_auxz00_8980 = 
(BgL_objectz00_bglt)(BgL_oz00_2360); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_8980, BgL_arg5792z00_2364); } } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_v1809z00_2365;
{ /* ./Ast/node.scm 54 */
int BgL_auxz00_8983;
BgL_auxz00_8983 = 
(int)(((long)1)); 
BgL_v1809z00_2365 = 
STRUCT_REF(BgL_sz00_2361, BgL_auxz00_8983); } 
((((BgL_sequencez00_bglt)CREF(BgL_oz00_2360))->BgL_locz00) = ((obj_t)BgL_v1809z00_2365), BUNSPEC); } 
{ /* ./Ast/node.scm 54 */
BgL_typez00_bglt BgL_v1813z00_2366;
{ /* ./Ast/node.scm 54 */
obj_t BgL_auxz00_8987;
{ /* ./Ast/node.scm 54 */
int BgL_auxz00_8988;
BgL_auxz00_8988 = 
(int)(((long)2)); 
BgL_auxz00_8987 = 
STRUCT_REF(BgL_sz00_2361, BgL_auxz00_8988); } 
BgL_v1813z00_2366 = 
(BgL_typez00_bglt)(BgL_auxz00_8987); } 
((((BgL_sequencez00_bglt)CREF(BgL_oz00_2360))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1813z00_2366), BUNSPEC); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_v1817z00_2367;
{ /* ./Ast/node.scm 54 */
int BgL_auxz00_8993;
BgL_auxz00_8993 = 
(int)(((long)3)); 
BgL_v1817z00_2367 = 
STRUCT_REF(BgL_sz00_2361, BgL_auxz00_8993); } 
((((BgL_sequencez00_bglt)CREF(BgL_oz00_2360))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v1817z00_2367), BUNSPEC); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_v1821z00_2368;
{ /* ./Ast/node.scm 54 */
int BgL_auxz00_8997;
BgL_auxz00_8997 = 
(int)(((long)4)); 
BgL_v1821z00_2368 = 
STRUCT_REF(BgL_sz00_2361, BgL_auxz00_8997); } 
((((BgL_sequencez00_bglt)CREF(BgL_oz00_2360))->BgL_keyz00) = ((obj_t)BgL_v1821z00_2368), BUNSPEC); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_v1825z00_2369;
{ /* ./Ast/node.scm 54 */
int BgL_auxz00_9001;
BgL_auxz00_9001 = 
(int)(((long)5)); 
BgL_v1825z00_2369 = 
STRUCT_REF(BgL_sz00_2361, BgL_auxz00_9001); } 
((((BgL_sequencez00_bglt)CREF(BgL_oz00_2360))->BgL_nodesz00) = ((obj_t)BgL_v1825z00_2369), BUNSPEC); } 
BgL_auxz00_8976 = BgL_oz00_2360; 
return 
(obj_t)(BgL_auxz00_8976);} } } 
}



/* object->struct-sequence3653 */
obj_t BGl_objectzd2ze3structzd2sequence3653ze3zzast_nodez00(obj_t BgL_envz00_5477, obj_t BgL_obj1805z00_5478)
{ AN_OBJECT;
{ /* ./Ast/node.scm 54 */
{ 
BgL_sequencez00_bglt BgL_obj1805z00_2344;
BgL_obj1805z00_2344 = 
(BgL_sequencez00_bglt)(BgL_obj1805z00_5478); 
{ /* ./Ast/node.scm 54 */
obj_t BgL_res1806z00_2347;
{ /* ./Ast/node.scm 54 */
obj_t BgL_keyz00_4634;int BgL_lenz00_4635;
BgL_keyz00_4634 = 
CNST_TABLE_REF(((long)6)); 
BgL_lenz00_4635 = 
(int)(((long)6)); 
BgL_res1806z00_2347 = 
make_struct(BgL_keyz00_4634, BgL_lenz00_4635, BUNSPEC); } 
{ /* ./Ast/node.scm 54 */
int BgL_kz00_4638;
BgL_kz00_4638 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1806z00_2347, BgL_kz00_4638, BFALSE); } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_arg5761z00_2349;
{ /* ./Ast/node.scm 54 */
BgL_nodez00_bglt BgL_obj1560z00_4640;
BgL_obj1560z00_4640 = 
(BgL_nodez00_bglt)(BgL_obj1805z00_2344); 
BgL_arg5761z00_2349 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4640))->BgL_locz00); } 
{ /* ./Ast/node.scm 54 */
int BgL_kz00_4642;
BgL_kz00_4642 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1806z00_2347, BgL_kz00_4642, BgL_arg5761z00_2349); } } 
{ /* ./Ast/node.scm 54 */
BgL_typez00_bglt BgL_arg5766z00_2351;
{ /* ./Ast/node.scm 54 */
BgL_nodez00_bglt BgL_obj1561z00_4644;
BgL_obj1561z00_4644 = 
(BgL_nodez00_bglt)(BgL_obj1805z00_2344); 
BgL_arg5766z00_2351 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4644))->BgL_typez00); } 
{ /* ./Ast/node.scm 54 */
int BgL_kz00_4646;obj_t BgL_oz00_4647;
BgL_kz00_4646 = 
(int)(((long)2)); 
BgL_oz00_4647 = 
(obj_t)(BgL_arg5766z00_2351); 
STRUCT_SET(BgL_res1806z00_2347, BgL_kz00_4646, BgL_oz00_4647); } } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_arg5771z00_2353;
{ /* ./Ast/node.scm 54 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4648;
BgL_obj1590z00_4648 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj1805z00_2344); 
BgL_arg5771z00_2353 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4648))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 54 */
int BgL_kz00_4650;
BgL_kz00_4650 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res1806z00_2347, BgL_kz00_4650, BgL_arg5771z00_2353); } } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_arg5776z00_2355;
{ /* ./Ast/node.scm 54 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4652;
BgL_obj1593z00_4652 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj1805z00_2344); 
BgL_arg5776z00_2355 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4652))->BgL_keyz00); } 
{ /* ./Ast/node.scm 54 */
int BgL_kz00_4654;
BgL_kz00_4654 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res1806z00_2347, BgL_kz00_4654, BgL_arg5776z00_2355); } } 
{ /* ./Ast/node.scm 54 */
obj_t BgL_arg5781z00_2357;
BgL_arg5781z00_2357 = 
(((BgL_sequencez00_bglt)CREF(BgL_obj1805z00_2344))->BgL_nodesz00); 
{ /* ./Ast/node.scm 54 */
int BgL_kz00_4658;
BgL_kz00_4658 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res1806z00_2347, BgL_kz00_4658, BgL_arg5781z00_2357); } } 
return BgL_res1806z00_2347;} } } 
}



/* struct+object->object-app3651 */
obj_t BGl_structzb2objectzd2ze3objectzd2app3651z51zzast_nodez00(obj_t BgL_envz00_5479, obj_t BgL_oz00_5480, obj_t BgL_sz00_5481)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ 
BgL_appz00_bglt BgL_oz00_2331;obj_t BgL_sz00_2332;
{ /* ./Ast/node.scm 58 */
BgL_appz00_bglt BgL_auxz00_9033;
BgL_oz00_2331 = 
(BgL_appz00_bglt)(BgL_oz00_5480); 
BgL_sz00_2332 = BgL_sz00_5481; 
{ /* ./Ast/node.scm 58 */
obj_t BgL_arg5743z00_2335;
{ /* ./Ast/node.scm 58 */
int BgL_auxz00_9034;
BgL_auxz00_9034 = 
(int)(((long)0)); 
BgL_arg5743z00_2335 = 
STRUCT_REF(BgL_sz00_2332, BgL_auxz00_9034); } 
{ /* ./Ast/node.scm 58 */
BgL_objectz00_bglt BgL_auxz00_9037;
BgL_auxz00_9037 = 
(BgL_objectz00_bglt)(BgL_oz00_2331); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9037, BgL_arg5743z00_2335); } } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_v1871z00_2336;
{ /* ./Ast/node.scm 58 */
int BgL_auxz00_9040;
BgL_auxz00_9040 = 
(int)(((long)1)); 
BgL_v1871z00_2336 = 
STRUCT_REF(BgL_sz00_2332, BgL_auxz00_9040); } 
((((BgL_appz00_bglt)CREF(BgL_oz00_2331))->BgL_locz00) = ((obj_t)BgL_v1871z00_2336), BUNSPEC); } 
{ /* ./Ast/node.scm 58 */
BgL_typez00_bglt BgL_v1875z00_2337;
{ /* ./Ast/node.scm 58 */
obj_t BgL_auxz00_9044;
{ /* ./Ast/node.scm 58 */
int BgL_auxz00_9045;
BgL_auxz00_9045 = 
(int)(((long)2)); 
BgL_auxz00_9044 = 
STRUCT_REF(BgL_sz00_2332, BgL_auxz00_9045); } 
BgL_v1875z00_2337 = 
(BgL_typez00_bglt)(BgL_auxz00_9044); } 
((((BgL_appz00_bglt)CREF(BgL_oz00_2331))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1875z00_2337), BUNSPEC); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_v1879z00_2338;
{ /* ./Ast/node.scm 58 */
int BgL_auxz00_9050;
BgL_auxz00_9050 = 
(int)(((long)3)); 
BgL_v1879z00_2338 = 
STRUCT_REF(BgL_sz00_2332, BgL_auxz00_9050); } 
((((BgL_appz00_bglt)CREF(BgL_oz00_2331))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v1879z00_2338), BUNSPEC); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_v1883z00_2339;
{ /* ./Ast/node.scm 58 */
int BgL_auxz00_9054;
BgL_auxz00_9054 = 
(int)(((long)4)); 
BgL_v1883z00_2339 = 
STRUCT_REF(BgL_sz00_2332, BgL_auxz00_9054); } 
((((BgL_appz00_bglt)CREF(BgL_oz00_2331))->BgL_keyz00) = ((obj_t)BgL_v1883z00_2339), BUNSPEC); } 
{ /* ./Ast/node.scm 58 */
BgL_varz00_bglt BgL_v1887z00_2340;
{ /* ./Ast/node.scm 58 */
obj_t BgL_auxz00_9058;
{ /* ./Ast/node.scm 58 */
int BgL_auxz00_9059;
BgL_auxz00_9059 = 
(int)(((long)5)); 
BgL_auxz00_9058 = 
STRUCT_REF(BgL_sz00_2332, BgL_auxz00_9059); } 
BgL_v1887z00_2340 = 
(BgL_varz00_bglt)(BgL_auxz00_9058); } 
((((BgL_appz00_bglt)CREF(BgL_oz00_2331))->BgL_funz00) = ((BgL_varz00_bglt)BgL_v1887z00_2340), BUNSPEC); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_v1891z00_2341;
{ /* ./Ast/node.scm 58 */
int BgL_auxz00_9064;
BgL_auxz00_9064 = 
(int)(((long)6)); 
BgL_v1891z00_2341 = 
STRUCT_REF(BgL_sz00_2332, BgL_auxz00_9064); } 
((((BgL_appz00_bglt)CREF(BgL_oz00_2331))->BgL_argsz00) = ((obj_t)BgL_v1891z00_2341), BUNSPEC); } 
BgL_auxz00_9033 = BgL_oz00_2331; 
return 
(obj_t)(BgL_auxz00_9033);} } } 
}



/* object->struct-app3649 */
obj_t BGl_objectzd2ze3structzd2app3649ze3zzast_nodez00(obj_t BgL_envz00_5482, obj_t BgL_obj1867z00_5483)
{ AN_OBJECT;
{ /* ./Ast/node.scm 58 */
{ 
BgL_appz00_bglt BgL_obj1867z00_2313;
BgL_obj1867z00_2313 = 
(BgL_appz00_bglt)(BgL_obj1867z00_5483); 
{ /* ./Ast/node.scm 58 */
obj_t BgL_res1868z00_2316;
{ /* ./Ast/node.scm 58 */
obj_t BgL_keyz00_4590;int BgL_lenz00_4591;
BgL_keyz00_4590 = 
CNST_TABLE_REF(((long)7)); 
BgL_lenz00_4591 = 
(int)(((long)7)); 
BgL_res1868z00_2316 = 
make_struct(BgL_keyz00_4590, BgL_lenz00_4591, BUNSPEC); } 
{ /* ./Ast/node.scm 58 */
int BgL_kz00_4594;
BgL_kz00_4594 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1868z00_2316, BgL_kz00_4594, BFALSE); } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_arg5707z00_2318;
{ /* ./Ast/node.scm 58 */
BgL_nodez00_bglt BgL_obj1560z00_4596;
BgL_obj1560z00_4596 = 
(BgL_nodez00_bglt)(BgL_obj1867z00_2313); 
BgL_arg5707z00_2318 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4596))->BgL_locz00); } 
{ /* ./Ast/node.scm 58 */
int BgL_kz00_4598;
BgL_kz00_4598 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1868z00_2316, BgL_kz00_4598, BgL_arg5707z00_2318); } } 
{ /* ./Ast/node.scm 58 */
BgL_typez00_bglt BgL_arg5712z00_2320;
{ /* ./Ast/node.scm 58 */
BgL_nodez00_bglt BgL_obj1561z00_4600;
BgL_obj1561z00_4600 = 
(BgL_nodez00_bglt)(BgL_obj1867z00_2313); 
BgL_arg5712z00_2320 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4600))->BgL_typez00); } 
{ /* ./Ast/node.scm 58 */
int BgL_kz00_4602;obj_t BgL_oz00_4603;
BgL_kz00_4602 = 
(int)(((long)2)); 
BgL_oz00_4603 = 
(obj_t)(BgL_arg5712z00_2320); 
STRUCT_SET(BgL_res1868z00_2316, BgL_kz00_4602, BgL_oz00_4603); } } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_arg5717z00_2322;
{ /* ./Ast/node.scm 58 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4604;
BgL_obj1590z00_4604 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj1867z00_2313); 
BgL_arg5717z00_2322 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4604))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 58 */
int BgL_kz00_4606;
BgL_kz00_4606 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res1868z00_2316, BgL_kz00_4606, BgL_arg5717z00_2322); } } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_arg5722z00_2324;
{ /* ./Ast/node.scm 58 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4608;
BgL_obj1593z00_4608 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj1867z00_2313); 
BgL_arg5722z00_2324 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4608))->BgL_keyz00); } 
{ /* ./Ast/node.scm 58 */
int BgL_kz00_4610;
BgL_kz00_4610 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res1868z00_2316, BgL_kz00_4610, BgL_arg5722z00_2324); } } 
{ /* ./Ast/node.scm 58 */
BgL_varz00_bglt BgL_arg5727z00_2326;
BgL_arg5727z00_2326 = 
(((BgL_appz00_bglt)CREF(BgL_obj1867z00_2313))->BgL_funz00); 
{ /* ./Ast/node.scm 58 */
int BgL_kz00_4614;obj_t BgL_oz00_4615;
BgL_kz00_4614 = 
(int)(((long)5)); 
BgL_oz00_4615 = 
(obj_t)(BgL_arg5727z00_2326); 
STRUCT_SET(BgL_res1868z00_2316, BgL_kz00_4614, BgL_oz00_4615); } } 
{ /* ./Ast/node.scm 58 */
obj_t BgL_arg5732z00_2328;
BgL_arg5732z00_2328 = 
(((BgL_appz00_bglt)CREF(BgL_obj1867z00_2313))->BgL_argsz00); 
{ /* ./Ast/node.scm 58 */
int BgL_kz00_4618;
BgL_kz00_4618 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res1868z00_2316, BgL_kz00_4618, BgL_arg5732z00_2328); } } 
return BgL_res1868z00_2316;} } } 
}



/* struct+object->object-app-ly3647 */
obj_t BGl_structzb2objectzd2ze3objectzd2appzd2ly3647z83zzast_nodez00(obj_t BgL_envz00_5484, obj_t BgL_oz00_5485, obj_t BgL_sz00_5486)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ 
BgL_appzd2lyzd2_bglt BgL_oz00_2302;obj_t BgL_sz00_2303;
{ /* ./Ast/node.scm 65 */
BgL_appzd2lyzd2_bglt BgL_auxz00_9100;
BgL_oz00_2302 = 
(BgL_appzd2lyzd2_bglt)(BgL_oz00_5485); 
BgL_sz00_2303 = BgL_sz00_5486; 
{ /* ./Ast/node.scm 65 */
obj_t BgL_arg5691z00_2306;
{ /* ./Ast/node.scm 65 */
int BgL_auxz00_9101;
BgL_auxz00_9101 = 
(int)(((long)0)); 
BgL_arg5691z00_2306 = 
STRUCT_REF(BgL_sz00_2303, BgL_auxz00_9101); } 
{ /* ./Ast/node.scm 65 */
BgL_objectz00_bglt BgL_auxz00_9104;
BgL_auxz00_9104 = 
(BgL_objectz00_bglt)(BgL_oz00_2302); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9104, BgL_arg5691z00_2306); } } 
{ /* ./Ast/node.scm 65 */
obj_t BgL_v1927z00_2307;
{ /* ./Ast/node.scm 65 */
int BgL_auxz00_9107;
BgL_auxz00_9107 = 
(int)(((long)1)); 
BgL_v1927z00_2307 = 
STRUCT_REF(BgL_sz00_2303, BgL_auxz00_9107); } 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_oz00_2302))->BgL_locz00) = ((obj_t)BgL_v1927z00_2307), BUNSPEC); } 
{ /* ./Ast/node.scm 65 */
BgL_typez00_bglt BgL_v1931z00_2308;
{ /* ./Ast/node.scm 65 */
obj_t BgL_auxz00_9111;
{ /* ./Ast/node.scm 65 */
int BgL_auxz00_9112;
BgL_auxz00_9112 = 
(int)(((long)2)); 
BgL_auxz00_9111 = 
STRUCT_REF(BgL_sz00_2303, BgL_auxz00_9112); } 
BgL_v1931z00_2308 = 
(BgL_typez00_bglt)(BgL_auxz00_9111); } 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_oz00_2302))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1931z00_2308), BUNSPEC); } 
{ /* ./Ast/node.scm 65 */
BgL_nodez00_bglt BgL_v1935z00_2309;
{ /* ./Ast/node.scm 65 */
obj_t BgL_auxz00_9117;
{ /* ./Ast/node.scm 65 */
int BgL_auxz00_9118;
BgL_auxz00_9118 = 
(int)(((long)3)); 
BgL_auxz00_9117 = 
STRUCT_REF(BgL_sz00_2303, BgL_auxz00_9118); } 
BgL_v1935z00_2309 = 
(BgL_nodez00_bglt)(BgL_auxz00_9117); } 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_oz00_2302))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_v1935z00_2309), BUNSPEC); } 
{ /* ./Ast/node.scm 65 */
BgL_nodez00_bglt BgL_v1939z00_2310;
{ /* ./Ast/node.scm 65 */
obj_t BgL_auxz00_9123;
{ /* ./Ast/node.scm 65 */
int BgL_auxz00_9124;
BgL_auxz00_9124 = 
(int)(((long)4)); 
BgL_auxz00_9123 = 
STRUCT_REF(BgL_sz00_2303, BgL_auxz00_9124); } 
BgL_v1939z00_2310 = 
(BgL_nodez00_bglt)(BgL_auxz00_9123); } 
((((BgL_appzd2lyzd2_bglt)CREF(BgL_oz00_2302))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_v1939z00_2310), BUNSPEC); } 
BgL_auxz00_9100 = BgL_oz00_2302; 
return 
(obj_t)(BgL_auxz00_9100);} } } 
}



/* object->struct-app-ly3645 */
obj_t BGl_objectzd2ze3structzd2appzd2ly3645z31zzast_nodez00(obj_t BgL_envz00_5487, obj_t BgL_obj1923z00_5488)
{ AN_OBJECT;
{ /* ./Ast/node.scm 65 */
{ 
BgL_appzd2lyzd2_bglt BgL_obj1923z00_2288;
BgL_obj1923z00_2288 = 
(BgL_appzd2lyzd2_bglt)(BgL_obj1923z00_5488); 
{ /* ./Ast/node.scm 65 */
obj_t BgL_res1924z00_2291;
{ /* ./Ast/node.scm 65 */
obj_t BgL_keyz00_4558;int BgL_lenz00_4559;
BgL_keyz00_4558 = 
CNST_TABLE_REF(((long)8)); 
BgL_lenz00_4559 = 
(int)(((long)5)); 
BgL_res1924z00_2291 = 
make_struct(BgL_keyz00_4558, BgL_lenz00_4559, BUNSPEC); } 
{ /* ./Ast/node.scm 65 */
int BgL_kz00_4562;
BgL_kz00_4562 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1924z00_2291, BgL_kz00_4562, BFALSE); } 
{ /* ./Ast/node.scm 65 */
obj_t BgL_arg5665z00_2293;
{ /* ./Ast/node.scm 65 */
BgL_nodez00_bglt BgL_obj1560z00_4564;
BgL_obj1560z00_4564 = 
(BgL_nodez00_bglt)(BgL_obj1923z00_2288); 
BgL_arg5665z00_2293 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4564))->BgL_locz00); } 
{ /* ./Ast/node.scm 65 */
int BgL_kz00_4566;
BgL_kz00_4566 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1924z00_2291, BgL_kz00_4566, BgL_arg5665z00_2293); } } 
{ /* ./Ast/node.scm 65 */
BgL_typez00_bglt BgL_arg5670z00_2295;
{ /* ./Ast/node.scm 65 */
BgL_nodez00_bglt BgL_obj1561z00_4568;
BgL_obj1561z00_4568 = 
(BgL_nodez00_bglt)(BgL_obj1923z00_2288); 
BgL_arg5670z00_2295 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4568))->BgL_typez00); } 
{ /* ./Ast/node.scm 65 */
int BgL_kz00_4570;obj_t BgL_oz00_4571;
BgL_kz00_4570 = 
(int)(((long)2)); 
BgL_oz00_4571 = 
(obj_t)(BgL_arg5670z00_2295); 
STRUCT_SET(BgL_res1924z00_2291, BgL_kz00_4570, BgL_oz00_4571); } } 
{ /* ./Ast/node.scm 65 */
BgL_nodez00_bglt BgL_arg5675z00_2297;
BgL_arg5675z00_2297 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_obj1923z00_2288))->BgL_funz00); 
{ /* ./Ast/node.scm 65 */
int BgL_kz00_4574;obj_t BgL_oz00_4575;
BgL_kz00_4574 = 
(int)(((long)3)); 
BgL_oz00_4575 = 
(obj_t)(BgL_arg5675z00_2297); 
STRUCT_SET(BgL_res1924z00_2291, BgL_kz00_4574, BgL_oz00_4575); } } 
{ /* ./Ast/node.scm 65 */
BgL_nodez00_bglt BgL_arg5680z00_2299;
BgL_arg5680z00_2299 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_obj1923z00_2288))->BgL_argz00); 
{ /* ./Ast/node.scm 65 */
int BgL_kz00_4578;obj_t BgL_oz00_4579;
BgL_kz00_4578 = 
(int)(((long)4)); 
BgL_oz00_4579 = 
(obj_t)(BgL_arg5680z00_2299); 
STRUCT_SET(BgL_res1924z00_2291, BgL_kz00_4578, BgL_oz00_4579); } } 
return BgL_res1924z00_2291;} } } 
}



/* struct+object->object-funcall3643 */
obj_t BGl_structzb2objectzd2ze3objectzd2funcall3643z51zzast_nodez00(obj_t BgL_envz00_5489, obj_t BgL_oz00_5490, obj_t BgL_sz00_5491)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ 
BgL_funcallz00_bglt BgL_oz00_2276;obj_t BgL_sz00_2277;
{ /* ./Ast/node.scm 72 */
BgL_funcallz00_bglt BgL_auxz00_9154;
BgL_oz00_2276 = 
(BgL_funcallz00_bglt)(BgL_oz00_5490); 
BgL_sz00_2277 = BgL_sz00_5491; 
{ /* ./Ast/node.scm 72 */
obj_t BgL_arg5648z00_2280;
{ /* ./Ast/node.scm 72 */
int BgL_auxz00_9155;
BgL_auxz00_9155 = 
(int)(((long)0)); 
BgL_arg5648z00_2280 = 
STRUCT_REF(BgL_sz00_2277, BgL_auxz00_9155); } 
{ /* ./Ast/node.scm 72 */
BgL_objectz00_bglt BgL_auxz00_9158;
BgL_auxz00_9158 = 
(BgL_objectz00_bglt)(BgL_oz00_2276); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9158, BgL_arg5648z00_2280); } } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_v1980z00_2281;
{ /* ./Ast/node.scm 72 */
int BgL_auxz00_9161;
BgL_auxz00_9161 = 
(int)(((long)1)); 
BgL_v1980z00_2281 = 
STRUCT_REF(BgL_sz00_2277, BgL_auxz00_9161); } 
((((BgL_funcallz00_bglt)CREF(BgL_oz00_2276))->BgL_locz00) = ((obj_t)BgL_v1980z00_2281), BUNSPEC); } 
{ /* ./Ast/node.scm 72 */
BgL_typez00_bglt BgL_v1984z00_2282;
{ /* ./Ast/node.scm 72 */
obj_t BgL_auxz00_9165;
{ /* ./Ast/node.scm 72 */
int BgL_auxz00_9166;
BgL_auxz00_9166 = 
(int)(((long)2)); 
BgL_auxz00_9165 = 
STRUCT_REF(BgL_sz00_2277, BgL_auxz00_9166); } 
BgL_v1984z00_2282 = 
(BgL_typez00_bglt)(BgL_auxz00_9165); } 
((((BgL_funcallz00_bglt)CREF(BgL_oz00_2276))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v1984z00_2282), BUNSPEC); } 
{ /* ./Ast/node.scm 72 */
BgL_nodez00_bglt BgL_v1988z00_2283;
{ /* ./Ast/node.scm 72 */
obj_t BgL_auxz00_9171;
{ /* ./Ast/node.scm 72 */
int BgL_auxz00_9172;
BgL_auxz00_9172 = 
(int)(((long)3)); 
BgL_auxz00_9171 = 
STRUCT_REF(BgL_sz00_2277, BgL_auxz00_9172); } 
BgL_v1988z00_2283 = 
(BgL_nodez00_bglt)(BgL_auxz00_9171); } 
((((BgL_funcallz00_bglt)CREF(BgL_oz00_2276))->BgL_funz00) = ((BgL_nodez00_bglt)BgL_v1988z00_2283), BUNSPEC); } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_v1992z00_2284;
{ /* ./Ast/node.scm 72 */
int BgL_auxz00_9177;
BgL_auxz00_9177 = 
(int)(((long)4)); 
BgL_v1992z00_2284 = 
STRUCT_REF(BgL_sz00_2277, BgL_auxz00_9177); } 
((((BgL_funcallz00_bglt)CREF(BgL_oz00_2276))->BgL_argsz00) = ((obj_t)BgL_v1992z00_2284), BUNSPEC); } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_v1996z00_2285;
{ /* ./Ast/node.scm 72 */
int BgL_auxz00_9181;
BgL_auxz00_9181 = 
(int)(((long)5)); 
BgL_v1996z00_2285 = 
STRUCT_REF(BgL_sz00_2277, BgL_auxz00_9181); } 
((((BgL_funcallz00_bglt)CREF(BgL_oz00_2276))->BgL_strengthz00) = ((obj_t)BgL_v1996z00_2285), BUNSPEC); } 
BgL_auxz00_9154 = BgL_oz00_2276; 
return 
(obj_t)(BgL_auxz00_9154);} } } 
}



/* object->struct-funcall3641 */
obj_t BGl_objectzd2ze3structzd2funcall3641ze3zzast_nodez00(obj_t BgL_envz00_5492, obj_t BgL_obj1976z00_5493)
{ AN_OBJECT;
{ /* ./Ast/node.scm 72 */
{ 
BgL_funcallz00_bglt BgL_obj1976z00_2260;
BgL_obj1976z00_2260 = 
(BgL_funcallz00_bglt)(BgL_obj1976z00_5493); 
{ /* ./Ast/node.scm 72 */
obj_t BgL_res1977z00_2263;
{ /* ./Ast/node.scm 72 */
obj_t BgL_keyz00_4520;int BgL_lenz00_4521;
BgL_keyz00_4520 = 
CNST_TABLE_REF(((long)9)); 
BgL_lenz00_4521 = 
(int)(((long)6)); 
BgL_res1977z00_2263 = 
make_struct(BgL_keyz00_4520, BgL_lenz00_4521, BUNSPEC); } 
{ /* ./Ast/node.scm 72 */
int BgL_kz00_4524;
BgL_kz00_4524 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1977z00_2263, BgL_kz00_4524, BFALSE); } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_arg5617z00_2265;
{ /* ./Ast/node.scm 72 */
BgL_nodez00_bglt BgL_obj1560z00_4526;
BgL_obj1560z00_4526 = 
(BgL_nodez00_bglt)(BgL_obj1976z00_2260); 
BgL_arg5617z00_2265 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4526))->BgL_locz00); } 
{ /* ./Ast/node.scm 72 */
int BgL_kz00_4528;
BgL_kz00_4528 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1977z00_2263, BgL_kz00_4528, BgL_arg5617z00_2265); } } 
{ /* ./Ast/node.scm 72 */
BgL_typez00_bglt BgL_arg5622z00_2267;
{ /* ./Ast/node.scm 72 */
BgL_nodez00_bglt BgL_obj1561z00_4530;
BgL_obj1561z00_4530 = 
(BgL_nodez00_bglt)(BgL_obj1976z00_2260); 
BgL_arg5622z00_2267 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4530))->BgL_typez00); } 
{ /* ./Ast/node.scm 72 */
int BgL_kz00_4532;obj_t BgL_oz00_4533;
BgL_kz00_4532 = 
(int)(((long)2)); 
BgL_oz00_4533 = 
(obj_t)(BgL_arg5622z00_2267); 
STRUCT_SET(BgL_res1977z00_2263, BgL_kz00_4532, BgL_oz00_4533); } } 
{ /* ./Ast/node.scm 72 */
BgL_nodez00_bglt BgL_arg5627z00_2269;
BgL_arg5627z00_2269 = 
(((BgL_funcallz00_bglt)CREF(BgL_obj1976z00_2260))->BgL_funz00); 
{ /* ./Ast/node.scm 72 */
int BgL_kz00_4536;obj_t BgL_oz00_4537;
BgL_kz00_4536 = 
(int)(((long)3)); 
BgL_oz00_4537 = 
(obj_t)(BgL_arg5627z00_2269); 
STRUCT_SET(BgL_res1977z00_2263, BgL_kz00_4536, BgL_oz00_4537); } } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_arg5632z00_2271;
BgL_arg5632z00_2271 = 
(((BgL_funcallz00_bglt)CREF(BgL_obj1976z00_2260))->BgL_argsz00); 
{ /* ./Ast/node.scm 72 */
int BgL_kz00_4540;
BgL_kz00_4540 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res1977z00_2263, BgL_kz00_4540, BgL_arg5632z00_2271); } } 
{ /* ./Ast/node.scm 72 */
obj_t BgL_arg5637z00_2273;
BgL_arg5637z00_2273 = 
(((BgL_funcallz00_bglt)CREF(BgL_obj1976z00_2260))->BgL_strengthz00); 
{ /* ./Ast/node.scm 72 */
int BgL_kz00_4544;
BgL_kz00_4544 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res1977z00_2263, BgL_kz00_4544, BgL_arg5637z00_2273); } } 
return BgL_res1977z00_2263;} } } 
}



/* struct+object->object-extern3639 */
obj_t BGl_structzb2objectzd2ze3objectzd2extern3639z51zzast_nodez00(obj_t BgL_envz00_5494, obj_t BgL_oz00_5495, obj_t BgL_sz00_5496)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ 
BgL_externz00_bglt BgL_oz00_2247;obj_t BgL_sz00_2248;
{ /* ./Ast/node.scm 82 */
BgL_externz00_bglt BgL_auxz00_9212;
BgL_oz00_2247 = 
(BgL_externz00_bglt)(BgL_oz00_5495); 
BgL_sz00_2248 = BgL_sz00_5496; 
{ /* ./Ast/node.scm 82 */
obj_t BgL_arg5599z00_2251;
{ /* ./Ast/node.scm 82 */
int BgL_auxz00_9213;
BgL_auxz00_9213 = 
(int)(((long)0)); 
BgL_arg5599z00_2251 = 
STRUCT_REF(BgL_sz00_2248, BgL_auxz00_9213); } 
{ /* ./Ast/node.scm 82 */
BgL_objectz00_bglt BgL_auxz00_9216;
BgL_auxz00_9216 = 
(BgL_objectz00_bglt)(BgL_oz00_2247); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9216, BgL_arg5599z00_2251); } } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_v2042z00_2252;
{ /* ./Ast/node.scm 82 */
int BgL_auxz00_9219;
BgL_auxz00_9219 = 
(int)(((long)1)); 
BgL_v2042z00_2252 = 
STRUCT_REF(BgL_sz00_2248, BgL_auxz00_9219); } 
((((BgL_externz00_bglt)CREF(BgL_oz00_2247))->BgL_locz00) = ((obj_t)BgL_v2042z00_2252), BUNSPEC); } 
{ /* ./Ast/node.scm 82 */
BgL_typez00_bglt BgL_v2046z00_2253;
{ /* ./Ast/node.scm 82 */
obj_t BgL_auxz00_9223;
{ /* ./Ast/node.scm 82 */
int BgL_auxz00_9224;
BgL_auxz00_9224 = 
(int)(((long)2)); 
BgL_auxz00_9223 = 
STRUCT_REF(BgL_sz00_2248, BgL_auxz00_9224); } 
BgL_v2046z00_2253 = 
(BgL_typez00_bglt)(BgL_auxz00_9223); } 
((((BgL_externz00_bglt)CREF(BgL_oz00_2247))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2046z00_2253), BUNSPEC); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_v2050z00_2254;
{ /* ./Ast/node.scm 82 */
int BgL_auxz00_9229;
BgL_auxz00_9229 = 
(int)(((long)3)); 
BgL_v2050z00_2254 = 
STRUCT_REF(BgL_sz00_2248, BgL_auxz00_9229); } 
((((BgL_externz00_bglt)CREF(BgL_oz00_2247))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2050z00_2254), BUNSPEC); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_v2054z00_2255;
{ /* ./Ast/node.scm 82 */
int BgL_auxz00_9233;
BgL_auxz00_9233 = 
(int)(((long)4)); 
BgL_v2054z00_2255 = 
STRUCT_REF(BgL_sz00_2248, BgL_auxz00_9233); } 
((((BgL_externz00_bglt)CREF(BgL_oz00_2247))->BgL_keyz00) = ((obj_t)BgL_v2054z00_2255), BUNSPEC); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_v2058z00_2256;
{ /* ./Ast/node.scm 82 */
int BgL_auxz00_9237;
BgL_auxz00_9237 = 
(int)(((long)5)); 
BgL_v2058z00_2256 = 
STRUCT_REF(BgL_sz00_2248, BgL_auxz00_9237); } 
((((BgL_externz00_bglt)CREF(BgL_oz00_2247))->BgL_exprza2za2) = ((obj_t)BgL_v2058z00_2256), BUNSPEC); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_v2062z00_2257;
{ /* ./Ast/node.scm 82 */
int BgL_auxz00_9241;
BgL_auxz00_9241 = 
(int)(((long)6)); 
BgL_v2062z00_2257 = 
STRUCT_REF(BgL_sz00_2248, BgL_auxz00_9241); } 
((((BgL_externz00_bglt)CREF(BgL_oz00_2247))->BgL_effectz00) = ((obj_t)BgL_v2062z00_2257), BUNSPEC); } 
BgL_auxz00_9212 = BgL_oz00_2247; 
return 
(obj_t)(BgL_auxz00_9212);} } } 
}



/* object->struct-extern3637 */
obj_t BGl_objectzd2ze3structzd2extern3637ze3zzast_nodez00(obj_t BgL_envz00_5497, obj_t BgL_obj2038z00_5498)
{ AN_OBJECT;
{ /* ./Ast/node.scm 82 */
{ 
BgL_externz00_bglt BgL_obj2038z00_2229;
BgL_obj2038z00_2229 = 
(BgL_externz00_bglt)(BgL_obj2038z00_5498); 
{ /* ./Ast/node.scm 82 */
obj_t BgL_res2039z00_2232;
{ /* ./Ast/node.scm 82 */
obj_t BgL_keyz00_4476;int BgL_lenz00_4477;
BgL_keyz00_4476 = 
CNST_TABLE_REF(((long)10)); 
BgL_lenz00_4477 = 
(int)(((long)7)); 
BgL_res2039z00_2232 = 
make_struct(BgL_keyz00_4476, BgL_lenz00_4477, BUNSPEC); } 
{ /* ./Ast/node.scm 82 */
int BgL_kz00_4480;
BgL_kz00_4480 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2039z00_2232, BgL_kz00_4480, BFALSE); } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_arg5563z00_2234;
{ /* ./Ast/node.scm 82 */
BgL_nodez00_bglt BgL_obj1560z00_4482;
BgL_obj1560z00_4482 = 
(BgL_nodez00_bglt)(BgL_obj2038z00_2229); 
BgL_arg5563z00_2234 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4482))->BgL_locz00); } 
{ /* ./Ast/node.scm 82 */
int BgL_kz00_4484;
BgL_kz00_4484 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2039z00_2232, BgL_kz00_4484, BgL_arg5563z00_2234); } } 
{ /* ./Ast/node.scm 82 */
BgL_typez00_bglt BgL_arg5568z00_2236;
{ /* ./Ast/node.scm 82 */
BgL_nodez00_bglt BgL_obj1561z00_4486;
BgL_obj1561z00_4486 = 
(BgL_nodez00_bglt)(BgL_obj2038z00_2229); 
BgL_arg5568z00_2236 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4486))->BgL_typez00); } 
{ /* ./Ast/node.scm 82 */
int BgL_kz00_4488;obj_t BgL_oz00_4489;
BgL_kz00_4488 = 
(int)(((long)2)); 
BgL_oz00_4489 = 
(obj_t)(BgL_arg5568z00_2236); 
STRUCT_SET(BgL_res2039z00_2232, BgL_kz00_4488, BgL_oz00_4489); } } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_arg5573z00_2238;
{ /* ./Ast/node.scm 82 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4490;
BgL_obj1590z00_4490 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2038z00_2229); 
BgL_arg5573z00_2238 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4490))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 82 */
int BgL_kz00_4492;
BgL_kz00_4492 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2039z00_2232, BgL_kz00_4492, BgL_arg5573z00_2238); } } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_arg5578z00_2240;
{ /* ./Ast/node.scm 82 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4494;
BgL_obj1593z00_4494 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2038z00_2229); 
BgL_arg5578z00_2240 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4494))->BgL_keyz00); } 
{ /* ./Ast/node.scm 82 */
int BgL_kz00_4496;
BgL_kz00_4496 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2039z00_2232, BgL_kz00_4496, BgL_arg5578z00_2240); } } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_arg5583z00_2242;
BgL_arg5583z00_2242 = 
(((BgL_externz00_bglt)CREF(BgL_obj2038z00_2229))->BgL_exprza2za2); 
{ /* ./Ast/node.scm 82 */
int BgL_kz00_4500;
BgL_kz00_4500 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2039z00_2232, BgL_kz00_4500, BgL_arg5583z00_2242); } } 
{ /* ./Ast/node.scm 82 */
obj_t BgL_arg5588z00_2244;
BgL_arg5588z00_2244 = 
(((BgL_externz00_bglt)CREF(BgL_obj2038z00_2229))->BgL_effectz00); 
{ /* ./Ast/node.scm 82 */
int BgL_kz00_4504;
BgL_kz00_4504 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2039z00_2232, BgL_kz00_4504, BgL_arg5588z00_2244); } } 
return BgL_res2039z00_2232;} } } 
}



/* struct+object->object-pragma3635 */
obj_t BGl_structzb2objectzd2ze3objectzd2pragma3635z51zzast_nodez00(obj_t BgL_envz00_5499, obj_t BgL_oz00_5500, obj_t BgL_sz00_5501)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ 
BgL_pragmaz00_bglt BgL_oz00_2215;obj_t BgL_sz00_2216;
{ /* ./Ast/node.scm 89 */
BgL_pragmaz00_bglt BgL_auxz00_9276;
BgL_oz00_2215 = 
(BgL_pragmaz00_bglt)(BgL_oz00_5500); 
BgL_sz00_2216 = BgL_sz00_5501; 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg5544z00_2219;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9277;
BgL_auxz00_9277 = 
(int)(((long)0)); 
BgL_arg5544z00_2219 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9277); } 
{ /* ./Ast/node.scm 89 */
BgL_objectz00_bglt BgL_auxz00_9280;
BgL_auxz00_9280 = 
(BgL_objectz00_bglt)(BgL_oz00_2215); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9280, BgL_arg5544z00_2219); } } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_v2112z00_2220;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9283;
BgL_auxz00_9283 = 
(int)(((long)1)); 
BgL_v2112z00_2220 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9283); } 
((((BgL_pragmaz00_bglt)CREF(BgL_oz00_2215))->BgL_locz00) = ((obj_t)BgL_v2112z00_2220), BUNSPEC); } 
{ /* ./Ast/node.scm 89 */
BgL_typez00_bglt BgL_v2116z00_2221;
{ /* ./Ast/node.scm 89 */
obj_t BgL_auxz00_9287;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9288;
BgL_auxz00_9288 = 
(int)(((long)2)); 
BgL_auxz00_9287 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9288); } 
BgL_v2116z00_2221 = 
(BgL_typez00_bglt)(BgL_auxz00_9287); } 
((((BgL_pragmaz00_bglt)CREF(BgL_oz00_2215))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2116z00_2221), BUNSPEC); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_v2120z00_2222;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9293;
BgL_auxz00_9293 = 
(int)(((long)3)); 
BgL_v2120z00_2222 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9293); } 
((((BgL_pragmaz00_bglt)CREF(BgL_oz00_2215))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2120z00_2222), BUNSPEC); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_v2124z00_2223;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9297;
BgL_auxz00_9297 = 
(int)(((long)4)); 
BgL_v2124z00_2223 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9297); } 
((((BgL_pragmaz00_bglt)CREF(BgL_oz00_2215))->BgL_keyz00) = ((obj_t)BgL_v2124z00_2223), BUNSPEC); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_v2128z00_2224;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9301;
BgL_auxz00_9301 = 
(int)(((long)5)); 
BgL_v2128z00_2224 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9301); } 
((((BgL_pragmaz00_bglt)CREF(BgL_oz00_2215))->BgL_exprza2za2) = ((obj_t)BgL_v2128z00_2224), BUNSPEC); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_v2132z00_2225;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9305;
BgL_auxz00_9305 = 
(int)(((long)6)); 
BgL_v2132z00_2225 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9305); } 
((((BgL_pragmaz00_bglt)CREF(BgL_oz00_2215))->BgL_effectz00) = ((obj_t)BgL_v2132z00_2225), BUNSPEC); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_v2136z00_2226;
{ /* ./Ast/node.scm 89 */
int BgL_auxz00_9309;
BgL_auxz00_9309 = 
(int)(((long)7)); 
BgL_v2136z00_2226 = 
STRUCT_REF(BgL_sz00_2216, BgL_auxz00_9309); } 
((((BgL_pragmaz00_bglt)CREF(BgL_oz00_2215))->BgL_formatz00) = ((obj_t)BgL_v2136z00_2226), BUNSPEC); } 
BgL_auxz00_9276 = BgL_oz00_2215; 
return 
(obj_t)(BgL_auxz00_9276);} } } 
}



/* object->struct-pragma3633 */
obj_t BGl_objectzd2ze3structzd2pragma3633ze3zzast_nodez00(obj_t BgL_envz00_5502, obj_t BgL_obj2108z00_5503)
{ AN_OBJECT;
{ /* ./Ast/node.scm 89 */
{ 
BgL_pragmaz00_bglt BgL_obj2108z00_2195;
BgL_obj2108z00_2195 = 
(BgL_pragmaz00_bglt)(BgL_obj2108z00_5503); 
{ /* ./Ast/node.scm 89 */
obj_t BgL_res2109z00_2198;
{ /* ./Ast/node.scm 89 */
obj_t BgL_keyz00_4426;int BgL_lenz00_4427;
BgL_keyz00_4426 = 
CNST_TABLE_REF(((long)11)); 
BgL_lenz00_4427 = 
(int)(((long)8)); 
BgL_res2109z00_2198 = 
make_struct(BgL_keyz00_4426, BgL_lenz00_4427, BUNSPEC); } 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4430;
BgL_kz00_4430 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4430, BFALSE); } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg5503z00_2200;
{ /* ./Ast/node.scm 89 */
BgL_nodez00_bglt BgL_obj1560z00_4432;
BgL_obj1560z00_4432 = 
(BgL_nodez00_bglt)(BgL_obj2108z00_2195); 
BgL_arg5503z00_2200 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4432))->BgL_locz00); } 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4434;
BgL_kz00_4434 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4434, BgL_arg5503z00_2200); } } 
{ /* ./Ast/node.scm 89 */
BgL_typez00_bglt BgL_arg5508z00_2202;
{ /* ./Ast/node.scm 89 */
BgL_nodez00_bglt BgL_obj1561z00_4436;
BgL_obj1561z00_4436 = 
(BgL_nodez00_bglt)(BgL_obj2108z00_2195); 
BgL_arg5508z00_2202 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4436))->BgL_typez00); } 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4438;obj_t BgL_oz00_4439;
BgL_kz00_4438 = 
(int)(((long)2)); 
BgL_oz00_4439 = 
(obj_t)(BgL_arg5508z00_2202); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4438, BgL_oz00_4439); } } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg5513z00_2204;
{ /* ./Ast/node.scm 89 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4440;
BgL_obj1590z00_4440 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2108z00_2195); 
BgL_arg5513z00_2204 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4440))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4442;
BgL_kz00_4442 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4442, BgL_arg5513z00_2204); } } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg5518z00_2206;
{ /* ./Ast/node.scm 89 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4444;
BgL_obj1593z00_4444 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2108z00_2195); 
BgL_arg5518z00_2206 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4444))->BgL_keyz00); } 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4446;
BgL_kz00_4446 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4446, BgL_arg5518z00_2206); } } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg5523z00_2208;
{ /* ./Ast/node.scm 89 */
BgL_externz00_bglt BgL_obj2009z00_4448;
BgL_obj2009z00_4448 = 
(BgL_externz00_bglt)(BgL_obj2108z00_2195); 
BgL_arg5523z00_2208 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4448))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4450;
BgL_kz00_4450 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4450, BgL_arg5523z00_2208); } } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg5528z00_2210;
{ /* ./Ast/node.scm 89 */
BgL_externz00_bglt BgL_obj2012z00_4452;
BgL_obj2012z00_4452 = 
(BgL_externz00_bglt)(BgL_obj2108z00_2195); 
BgL_arg5528z00_2210 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4452))->BgL_effectz00); } 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4454;
BgL_kz00_4454 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4454, BgL_arg5528z00_2210); } } 
{ /* ./Ast/node.scm 89 */
obj_t BgL_arg5533z00_2212;
BgL_arg5533z00_2212 = 
(((BgL_pragmaz00_bglt)CREF(BgL_obj2108z00_2195))->BgL_formatz00); 
{ /* ./Ast/node.scm 89 */
int BgL_kz00_4458;
BgL_kz00_4458 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res2109z00_2198, BgL_kz00_4458, BgL_arg5533z00_2212); } } 
return BgL_res2109z00_2198;} } } 
}



/* struct+object->object-getfield3631 */
obj_t BGl_structzb2objectzd2ze3objectzd2getfield3631z51zzast_nodez00(obj_t BgL_envz00_5504, obj_t BgL_oz00_5505, obj_t BgL_sz00_5506)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ 
BgL_getfieldz00_bglt BgL_oz00_2179;obj_t BgL_sz00_2180;
{ /* ./Ast/node.scm 93 */
BgL_getfieldz00_bglt BgL_auxz00_9349;
BgL_oz00_2179 = 
(BgL_getfieldz00_bglt)(BgL_oz00_5505); 
BgL_sz00_2180 = BgL_sz00_5506; 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg5482z00_2183;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9350;
BgL_auxz00_9350 = 
(int)(((long)0)); 
BgL_arg5482z00_2183 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9350); } 
{ /* ./Ast/node.scm 93 */
BgL_objectz00_bglt BgL_auxz00_9353;
BgL_auxz00_9353 = 
(BgL_objectz00_bglt)(BgL_oz00_2179); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9353, BgL_arg5482z00_2183); } } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_v2194z00_2184;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9356;
BgL_auxz00_9356 = 
(int)(((long)1)); 
BgL_v2194z00_2184 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9356); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_locz00) = ((obj_t)BgL_v2194z00_2184), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
BgL_typez00_bglt BgL_v2198z00_2185;
{ /* ./Ast/node.scm 93 */
obj_t BgL_auxz00_9360;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9361;
BgL_auxz00_9361 = 
(int)(((long)2)); 
BgL_auxz00_9360 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9361); } 
BgL_v2198z00_2185 = 
(BgL_typez00_bglt)(BgL_auxz00_9360); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2198z00_2185), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_v2202z00_2186;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9366;
BgL_auxz00_9366 = 
(int)(((long)3)); 
BgL_v2202z00_2186 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9366); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2202z00_2186), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_v2206z00_2187;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9370;
BgL_auxz00_9370 = 
(int)(((long)4)); 
BgL_v2206z00_2187 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9370); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_keyz00) = ((obj_t)BgL_v2206z00_2187), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_v2210z00_2188;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9374;
BgL_auxz00_9374 = 
(int)(((long)5)); 
BgL_v2210z00_2188 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9374); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_exprza2za2) = ((obj_t)BgL_v2210z00_2188), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_v2214z00_2189;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9378;
BgL_auxz00_9378 = 
(int)(((long)6)); 
BgL_v2214z00_2189 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9378); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_effectz00) = ((obj_t)BgL_v2214z00_2189), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_v2218z00_2190;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9382;
BgL_auxz00_9382 = 
(int)(((long)7)); 
BgL_v2218z00_2190 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9382); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_fnamez00) = ((obj_t)BgL_v2218z00_2190), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
BgL_typez00_bglt BgL_v2222z00_2191;
{ /* ./Ast/node.scm 93 */
obj_t BgL_auxz00_9386;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9387;
BgL_auxz00_9387 = 
(int)(((long)8)); 
BgL_auxz00_9386 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9387); } 
BgL_v2222z00_2191 = 
(BgL_typez00_bglt)(BgL_auxz00_9386); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_v2222z00_2191), BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
BgL_typez00_bglt BgL_v2226z00_2192;
{ /* ./Ast/node.scm 93 */
obj_t BgL_auxz00_9392;
{ /* ./Ast/node.scm 93 */
int BgL_auxz00_9393;
BgL_auxz00_9393 = 
(int)(((long)9)); 
BgL_auxz00_9392 = 
STRUCT_REF(BgL_sz00_2180, BgL_auxz00_9393); } 
BgL_v2226z00_2192 = 
(BgL_typez00_bglt)(BgL_auxz00_9392); } 
((((BgL_getfieldz00_bglt)CREF(BgL_oz00_2179))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_v2226z00_2192), BUNSPEC); } 
BgL_auxz00_9349 = BgL_oz00_2179; 
return 
(obj_t)(BgL_auxz00_9349);} } } 
}



/* object->struct-getfield3629 */
obj_t BGl_objectzd2ze3structzd2getfield3629ze3zzast_nodez00(obj_t BgL_envz00_5507, obj_t BgL_obj2190z00_5508)
{ AN_OBJECT;
{ /* ./Ast/node.scm 93 */
{ 
BgL_getfieldz00_bglt BgL_obj2190z00_2155;
BgL_obj2190z00_2155 = 
(BgL_getfieldz00_bglt)(BgL_obj2190z00_5508); 
{ /* ./Ast/node.scm 93 */
obj_t BgL_res2191z00_2158;
{ /* ./Ast/node.scm 93 */
obj_t BgL_keyz00_4364;int BgL_lenz00_4365;
BgL_keyz00_4364 = 
CNST_TABLE_REF(((long)12)); 
BgL_lenz00_4365 = 
(int)(((long)10)); 
BgL_res2191z00_2158 = 
make_struct(BgL_keyz00_4364, BgL_lenz00_4365, BUNSPEC); } 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4368;
BgL_kz00_4368 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4368, BFALSE); } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg5431z00_2160;
{ /* ./Ast/node.scm 93 */
BgL_nodez00_bglt BgL_obj1560z00_4370;
BgL_obj1560z00_4370 = 
(BgL_nodez00_bglt)(BgL_obj2190z00_2155); 
BgL_arg5431z00_2160 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4370))->BgL_locz00); } 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4372;
BgL_kz00_4372 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4372, BgL_arg5431z00_2160); } } 
{ /* ./Ast/node.scm 93 */
BgL_typez00_bglt BgL_arg5436z00_2162;
{ /* ./Ast/node.scm 93 */
BgL_nodez00_bglt BgL_obj1561z00_4374;
BgL_obj1561z00_4374 = 
(BgL_nodez00_bglt)(BgL_obj2190z00_2155); 
BgL_arg5436z00_2162 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4374))->BgL_typez00); } 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4376;obj_t BgL_oz00_4377;
BgL_kz00_4376 = 
(int)(((long)2)); 
BgL_oz00_4377 = 
(obj_t)(BgL_arg5436z00_2162); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4376, BgL_oz00_4377); } } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg5441z00_2164;
{ /* ./Ast/node.scm 93 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4378;
BgL_obj1590z00_4378 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2190z00_2155); 
BgL_arg5441z00_2164 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4378))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4380;
BgL_kz00_4380 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4380, BgL_arg5441z00_2164); } } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg5446z00_2166;
{ /* ./Ast/node.scm 93 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4382;
BgL_obj1593z00_4382 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2190z00_2155); 
BgL_arg5446z00_2166 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4382))->BgL_keyz00); } 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4384;
BgL_kz00_4384 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4384, BgL_arg5446z00_2166); } } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg5451z00_2168;
{ /* ./Ast/node.scm 93 */
BgL_externz00_bglt BgL_obj2009z00_4386;
BgL_obj2009z00_4386 = 
(BgL_externz00_bglt)(BgL_obj2190z00_2155); 
BgL_arg5451z00_2168 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4386))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4388;
BgL_kz00_4388 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4388, BgL_arg5451z00_2168); } } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg5456z00_2170;
{ /* ./Ast/node.scm 93 */
BgL_externz00_bglt BgL_obj2012z00_4390;
BgL_obj2012z00_4390 = 
(BgL_externz00_bglt)(BgL_obj2190z00_2155); 
BgL_arg5456z00_2170 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4390))->BgL_effectz00); } 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4392;
BgL_kz00_4392 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4392, BgL_arg5456z00_2170); } } 
{ /* ./Ast/node.scm 93 */
obj_t BgL_arg5461z00_2172;
BgL_arg5461z00_2172 = 
(((BgL_getfieldz00_bglt)CREF(BgL_obj2190z00_2155))->BgL_fnamez00); 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4396;
BgL_kz00_4396 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4396, BgL_arg5461z00_2172); } } 
{ /* ./Ast/node.scm 93 */
BgL_typez00_bglt BgL_arg5466z00_2174;
BgL_arg5466z00_2174 = 
(((BgL_getfieldz00_bglt)CREF(BgL_obj2190z00_2155))->BgL_ftypez00); 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4400;obj_t BgL_oz00_4401;
BgL_kz00_4400 = 
(int)(((long)8)); 
BgL_oz00_4401 = 
(obj_t)(BgL_arg5466z00_2174); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4400, BgL_oz00_4401); } } 
{ /* ./Ast/node.scm 93 */
BgL_typez00_bglt BgL_arg5471z00_2176;
BgL_arg5471z00_2176 = 
(((BgL_getfieldz00_bglt)CREF(BgL_obj2190z00_2155))->BgL_otypez00); 
{ /* ./Ast/node.scm 93 */
int BgL_kz00_4404;obj_t BgL_oz00_4405;
BgL_kz00_4404 = 
(int)(((long)9)); 
BgL_oz00_4405 = 
(obj_t)(BgL_arg5471z00_2176); 
STRUCT_SET(BgL_res2191z00_2158, BgL_kz00_4404, BgL_oz00_4405); } } 
return BgL_res2191z00_2158;} } } 
}



/* struct+object->object-setfield3627 */
obj_t BGl_structzb2objectzd2ze3objectzd2setfield3627z51zzast_nodez00(obj_t BgL_envz00_5509, obj_t BgL_oz00_5510, obj_t BgL_sz00_5511)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ 
BgL_setfieldz00_bglt BgL_oz00_2139;obj_t BgL_sz00_2140;
{ /* ./Ast/node.scm 102 */
BgL_setfieldz00_bglt BgL_auxz00_9442;
BgL_oz00_2139 = 
(BgL_setfieldz00_bglt)(BgL_oz00_5510); 
BgL_sz00_2140 = BgL_sz00_5511; 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg5410z00_2143;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9443;
BgL_auxz00_9443 = 
(int)(((long)0)); 
BgL_arg5410z00_2143 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9443); } 
{ /* ./Ast/node.scm 102 */
BgL_objectz00_bglt BgL_auxz00_9446;
BgL_auxz00_9446 = 
(BgL_objectz00_bglt)(BgL_oz00_2139); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9446, BgL_arg5410z00_2143); } } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_v2284z00_2144;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9449;
BgL_auxz00_9449 = 
(int)(((long)1)); 
BgL_v2284z00_2144 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9449); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_locz00) = ((obj_t)BgL_v2284z00_2144), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
BgL_typez00_bglt BgL_v2288z00_2145;
{ /* ./Ast/node.scm 102 */
obj_t BgL_auxz00_9453;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9454;
BgL_auxz00_9454 = 
(int)(((long)2)); 
BgL_auxz00_9453 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9454); } 
BgL_v2288z00_2145 = 
(BgL_typez00_bglt)(BgL_auxz00_9453); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2288z00_2145), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_v2292z00_2146;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9459;
BgL_auxz00_9459 = 
(int)(((long)3)); 
BgL_v2292z00_2146 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9459); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2292z00_2146), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_v2296z00_2147;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9463;
BgL_auxz00_9463 = 
(int)(((long)4)); 
BgL_v2296z00_2147 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9463); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_keyz00) = ((obj_t)BgL_v2296z00_2147), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_v2300z00_2148;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9467;
BgL_auxz00_9467 = 
(int)(((long)5)); 
BgL_v2300z00_2148 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9467); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_exprza2za2) = ((obj_t)BgL_v2300z00_2148), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_v2304z00_2149;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9471;
BgL_auxz00_9471 = 
(int)(((long)6)); 
BgL_v2304z00_2149 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9471); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_effectz00) = ((obj_t)BgL_v2304z00_2149), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_v2308z00_2150;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9475;
BgL_auxz00_9475 = 
(int)(((long)7)); 
BgL_v2308z00_2150 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9475); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_fnamez00) = ((obj_t)BgL_v2308z00_2150), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
BgL_typez00_bglt BgL_v2312z00_2151;
{ /* ./Ast/node.scm 102 */
obj_t BgL_auxz00_9479;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9480;
BgL_auxz00_9480 = 
(int)(((long)8)); 
BgL_auxz00_9479 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9480); } 
BgL_v2312z00_2151 = 
(BgL_typez00_bglt)(BgL_auxz00_9479); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_v2312z00_2151), BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
BgL_typez00_bglt BgL_v2316z00_2152;
{ /* ./Ast/node.scm 102 */
obj_t BgL_auxz00_9485;
{ /* ./Ast/node.scm 102 */
int BgL_auxz00_9486;
BgL_auxz00_9486 = 
(int)(((long)9)); 
BgL_auxz00_9485 = 
STRUCT_REF(BgL_sz00_2140, BgL_auxz00_9486); } 
BgL_v2316z00_2152 = 
(BgL_typez00_bglt)(BgL_auxz00_9485); } 
((((BgL_setfieldz00_bglt)CREF(BgL_oz00_2139))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_v2316z00_2152), BUNSPEC); } 
BgL_auxz00_9442 = BgL_oz00_2139; 
return 
(obj_t)(BgL_auxz00_9442);} } } 
}



/* object->struct-setfield3625 */
obj_t BGl_objectzd2ze3structzd2setfield3625ze3zzast_nodez00(obj_t BgL_envz00_5512, obj_t BgL_obj2280z00_5513)
{ AN_OBJECT;
{ /* ./Ast/node.scm 102 */
{ 
BgL_setfieldz00_bglt BgL_obj2280z00_2115;
BgL_obj2280z00_2115 = 
(BgL_setfieldz00_bglt)(BgL_obj2280z00_5513); 
{ /* ./Ast/node.scm 102 */
obj_t BgL_res2281z00_2118;
{ /* ./Ast/node.scm 102 */
obj_t BgL_keyz00_4302;int BgL_lenz00_4303;
BgL_keyz00_4302 = 
CNST_TABLE_REF(((long)13)); 
BgL_lenz00_4303 = 
(int)(((long)10)); 
BgL_res2281z00_2118 = 
make_struct(BgL_keyz00_4302, BgL_lenz00_4303, BUNSPEC); } 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4306;
BgL_kz00_4306 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4306, BFALSE); } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg5359z00_2120;
{ /* ./Ast/node.scm 102 */
BgL_nodez00_bglt BgL_obj1560z00_4308;
BgL_obj1560z00_4308 = 
(BgL_nodez00_bglt)(BgL_obj2280z00_2115); 
BgL_arg5359z00_2120 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4308))->BgL_locz00); } 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4310;
BgL_kz00_4310 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4310, BgL_arg5359z00_2120); } } 
{ /* ./Ast/node.scm 102 */
BgL_typez00_bglt BgL_arg5364z00_2122;
{ /* ./Ast/node.scm 102 */
BgL_nodez00_bglt BgL_obj1561z00_4312;
BgL_obj1561z00_4312 = 
(BgL_nodez00_bglt)(BgL_obj2280z00_2115); 
BgL_arg5364z00_2122 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4312))->BgL_typez00); } 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4314;obj_t BgL_oz00_4315;
BgL_kz00_4314 = 
(int)(((long)2)); 
BgL_oz00_4315 = 
(obj_t)(BgL_arg5364z00_2122); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4314, BgL_oz00_4315); } } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg5369z00_2124;
{ /* ./Ast/node.scm 102 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4316;
BgL_obj1590z00_4316 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2280z00_2115); 
BgL_arg5369z00_2124 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4316))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4318;
BgL_kz00_4318 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4318, BgL_arg5369z00_2124); } } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg5374z00_2126;
{ /* ./Ast/node.scm 102 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4320;
BgL_obj1593z00_4320 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2280z00_2115); 
BgL_arg5374z00_2126 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4320))->BgL_keyz00); } 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4322;
BgL_kz00_4322 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4322, BgL_arg5374z00_2126); } } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg5379z00_2128;
{ /* ./Ast/node.scm 102 */
BgL_externz00_bglt BgL_obj2009z00_4324;
BgL_obj2009z00_4324 = 
(BgL_externz00_bglt)(BgL_obj2280z00_2115); 
BgL_arg5379z00_2128 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4324))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4326;
BgL_kz00_4326 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4326, BgL_arg5379z00_2128); } } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg5384z00_2130;
{ /* ./Ast/node.scm 102 */
BgL_externz00_bglt BgL_obj2012z00_4328;
BgL_obj2012z00_4328 = 
(BgL_externz00_bglt)(BgL_obj2280z00_2115); 
BgL_arg5384z00_2130 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4328))->BgL_effectz00); } 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4330;
BgL_kz00_4330 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4330, BgL_arg5384z00_2130); } } 
{ /* ./Ast/node.scm 102 */
obj_t BgL_arg5389z00_2132;
BgL_arg5389z00_2132 = 
(((BgL_setfieldz00_bglt)CREF(BgL_obj2280z00_2115))->BgL_fnamez00); 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4334;
BgL_kz00_4334 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4334, BgL_arg5389z00_2132); } } 
{ /* ./Ast/node.scm 102 */
BgL_typez00_bglt BgL_arg5394z00_2134;
BgL_arg5394z00_2134 = 
(((BgL_setfieldz00_bglt)CREF(BgL_obj2280z00_2115))->BgL_ftypez00); 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4338;obj_t BgL_oz00_4339;
BgL_kz00_4338 = 
(int)(((long)8)); 
BgL_oz00_4339 = 
(obj_t)(BgL_arg5394z00_2134); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4338, BgL_oz00_4339); } } 
{ /* ./Ast/node.scm 102 */
BgL_typez00_bglt BgL_arg5399z00_2136;
BgL_arg5399z00_2136 = 
(((BgL_setfieldz00_bglt)CREF(BgL_obj2280z00_2115))->BgL_otypez00); 
{ /* ./Ast/node.scm 102 */
int BgL_kz00_4342;obj_t BgL_oz00_4343;
BgL_kz00_4342 = 
(int)(((long)9)); 
BgL_oz00_4343 = 
(obj_t)(BgL_arg5399z00_2136); 
STRUCT_SET(BgL_res2281z00_2118, BgL_kz00_4342, BgL_oz00_4343); } } 
return BgL_res2281z00_2118;} } } 
}



/* struct+object->object-new3623 */
obj_t BGl_structzb2objectzd2ze3objectzd2new3623z51zzast_nodez00(obj_t BgL_envz00_5514, obj_t BgL_oz00_5515, obj_t BgL_sz00_5516)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ 
BgL_newz00_bglt BgL_oz00_2102;obj_t BgL_sz00_2103;
{ /* ./Ast/node.scm 111 */
BgL_newz00_bglt BgL_auxz00_9535;
BgL_oz00_2102 = 
(BgL_newz00_bglt)(BgL_oz00_5515); 
BgL_sz00_2103 = BgL_sz00_5516; 
{ /* ./Ast/node.scm 111 */
obj_t BgL_arg5341z00_2106;
{ /* ./Ast/node.scm 111 */
int BgL_auxz00_9536;
BgL_auxz00_9536 = 
(int)(((long)0)); 
BgL_arg5341z00_2106 = 
STRUCT_REF(BgL_sz00_2103, BgL_auxz00_9536); } 
{ /* ./Ast/node.scm 111 */
BgL_objectz00_bglt BgL_auxz00_9539;
BgL_auxz00_9539 = 
(BgL_objectz00_bglt)(BgL_oz00_2102); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9539, BgL_arg5341z00_2106); } } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_v2362z00_2107;
{ /* ./Ast/node.scm 111 */
int BgL_auxz00_9542;
BgL_auxz00_9542 = 
(int)(((long)1)); 
BgL_v2362z00_2107 = 
STRUCT_REF(BgL_sz00_2103, BgL_auxz00_9542); } 
((((BgL_newz00_bglt)CREF(BgL_oz00_2102))->BgL_locz00) = ((obj_t)BgL_v2362z00_2107), BUNSPEC); } 
{ /* ./Ast/node.scm 111 */
BgL_typez00_bglt BgL_v2366z00_2108;
{ /* ./Ast/node.scm 111 */
obj_t BgL_auxz00_9546;
{ /* ./Ast/node.scm 111 */
int BgL_auxz00_9547;
BgL_auxz00_9547 = 
(int)(((long)2)); 
BgL_auxz00_9546 = 
STRUCT_REF(BgL_sz00_2103, BgL_auxz00_9547); } 
BgL_v2366z00_2108 = 
(BgL_typez00_bglt)(BgL_auxz00_9546); } 
((((BgL_newz00_bglt)CREF(BgL_oz00_2102))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2366z00_2108), BUNSPEC); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_v2370z00_2109;
{ /* ./Ast/node.scm 111 */
int BgL_auxz00_9552;
BgL_auxz00_9552 = 
(int)(((long)3)); 
BgL_v2370z00_2109 = 
STRUCT_REF(BgL_sz00_2103, BgL_auxz00_9552); } 
((((BgL_newz00_bglt)CREF(BgL_oz00_2102))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2370z00_2109), BUNSPEC); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_v2374z00_2110;
{ /* ./Ast/node.scm 111 */
int BgL_auxz00_9556;
BgL_auxz00_9556 = 
(int)(((long)4)); 
BgL_v2374z00_2110 = 
STRUCT_REF(BgL_sz00_2103, BgL_auxz00_9556); } 
((((BgL_newz00_bglt)CREF(BgL_oz00_2102))->BgL_keyz00) = ((obj_t)BgL_v2374z00_2110), BUNSPEC); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_v2378z00_2111;
{ /* ./Ast/node.scm 111 */
int BgL_auxz00_9560;
BgL_auxz00_9560 = 
(int)(((long)5)); 
BgL_v2378z00_2111 = 
STRUCT_REF(BgL_sz00_2103, BgL_auxz00_9560); } 
((((BgL_newz00_bglt)CREF(BgL_oz00_2102))->BgL_exprza2za2) = ((obj_t)BgL_v2378z00_2111), BUNSPEC); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_v2382z00_2112;
{ /* ./Ast/node.scm 111 */
int BgL_auxz00_9564;
BgL_auxz00_9564 = 
(int)(((long)6)); 
BgL_v2382z00_2112 = 
STRUCT_REF(BgL_sz00_2103, BgL_auxz00_9564); } 
((((BgL_newz00_bglt)CREF(BgL_oz00_2102))->BgL_effectz00) = ((obj_t)BgL_v2382z00_2112), BUNSPEC); } 
BgL_auxz00_9535 = BgL_oz00_2102; 
return 
(obj_t)(BgL_auxz00_9535);} } } 
}



/* object->struct-new3621 */
obj_t BGl_objectzd2ze3structzd2new3621ze3zzast_nodez00(obj_t BgL_envz00_5517, obj_t BgL_obj2358z00_5518)
{ AN_OBJECT;
{ /* ./Ast/node.scm 111 */
{ 
BgL_newz00_bglt BgL_obj2358z00_2084;
BgL_obj2358z00_2084 = 
(BgL_newz00_bglt)(BgL_obj2358z00_5518); 
{ /* ./Ast/node.scm 111 */
obj_t BgL_res2359z00_2087;
{ /* ./Ast/node.scm 111 */
obj_t BgL_keyz00_4258;int BgL_lenz00_4259;
BgL_keyz00_4258 = 
CNST_TABLE_REF(((long)14)); 
BgL_lenz00_4259 = 
(int)(((long)7)); 
BgL_res2359z00_2087 = 
make_struct(BgL_keyz00_4258, BgL_lenz00_4259, BUNSPEC); } 
{ /* ./Ast/node.scm 111 */
int BgL_kz00_4262;
BgL_kz00_4262 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2359z00_2087, BgL_kz00_4262, BFALSE); } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_arg5305z00_2089;
{ /* ./Ast/node.scm 111 */
BgL_nodez00_bglt BgL_obj1560z00_4264;
BgL_obj1560z00_4264 = 
(BgL_nodez00_bglt)(BgL_obj2358z00_2084); 
BgL_arg5305z00_2089 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4264))->BgL_locz00); } 
{ /* ./Ast/node.scm 111 */
int BgL_kz00_4266;
BgL_kz00_4266 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2359z00_2087, BgL_kz00_4266, BgL_arg5305z00_2089); } } 
{ /* ./Ast/node.scm 111 */
BgL_typez00_bglt BgL_arg5310z00_2091;
{ /* ./Ast/node.scm 111 */
BgL_nodez00_bglt BgL_obj1561z00_4268;
BgL_obj1561z00_4268 = 
(BgL_nodez00_bglt)(BgL_obj2358z00_2084); 
BgL_arg5310z00_2091 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4268))->BgL_typez00); } 
{ /* ./Ast/node.scm 111 */
int BgL_kz00_4270;obj_t BgL_oz00_4271;
BgL_kz00_4270 = 
(int)(((long)2)); 
BgL_oz00_4271 = 
(obj_t)(BgL_arg5310z00_2091); 
STRUCT_SET(BgL_res2359z00_2087, BgL_kz00_4270, BgL_oz00_4271); } } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_arg5315z00_2093;
{ /* ./Ast/node.scm 111 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4272;
BgL_obj1590z00_4272 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2358z00_2084); 
BgL_arg5315z00_2093 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4272))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 111 */
int BgL_kz00_4274;
BgL_kz00_4274 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2359z00_2087, BgL_kz00_4274, BgL_arg5315z00_2093); } } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_arg5320z00_2095;
{ /* ./Ast/node.scm 111 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4276;
BgL_obj1593z00_4276 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2358z00_2084); 
BgL_arg5320z00_2095 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4276))->BgL_keyz00); } 
{ /* ./Ast/node.scm 111 */
int BgL_kz00_4278;
BgL_kz00_4278 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2359z00_2087, BgL_kz00_4278, BgL_arg5320z00_2095); } } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_arg5325z00_2097;
{ /* ./Ast/node.scm 111 */
BgL_externz00_bglt BgL_obj2009z00_4280;
BgL_obj2009z00_4280 = 
(BgL_externz00_bglt)(BgL_obj2358z00_2084); 
BgL_arg5325z00_2097 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4280))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 111 */
int BgL_kz00_4282;
BgL_kz00_4282 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2359z00_2087, BgL_kz00_4282, BgL_arg5325z00_2097); } } 
{ /* ./Ast/node.scm 111 */
obj_t BgL_arg5330z00_2099;
{ /* ./Ast/node.scm 111 */
BgL_externz00_bglt BgL_obj2012z00_4284;
BgL_obj2012z00_4284 = 
(BgL_externz00_bglt)(BgL_obj2358z00_2084); 
BgL_arg5330z00_2099 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4284))->BgL_effectz00); } 
{ /* ./Ast/node.scm 111 */
int BgL_kz00_4286;
BgL_kz00_4286 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2359z00_2087, BgL_kz00_4286, BgL_arg5330z00_2099); } } 
return BgL_res2359z00_2087;} } } 
}



/* struct+object->object-valloc3619 */
obj_t BGl_structzb2objectzd2ze3objectzd2valloc3619z51zzast_nodez00(obj_t BgL_envz00_5519, obj_t BgL_oz00_5520, obj_t BgL_sz00_5521)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ 
BgL_vallocz00_bglt BgL_oz00_2068;obj_t BgL_sz00_2069;
{ /* ./Ast/node.scm 114 */
BgL_vallocz00_bglt BgL_auxz00_9601;
BgL_oz00_2068 = 
(BgL_vallocz00_bglt)(BgL_oz00_5520); 
BgL_sz00_2069 = BgL_sz00_5521; 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg5284z00_2072;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9602;
BgL_auxz00_9602 = 
(int)(((long)0)); 
BgL_arg5284z00_2072 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9602); } 
{ /* ./Ast/node.scm 114 */
BgL_objectz00_bglt BgL_auxz00_9605;
BgL_auxz00_9605 = 
(BgL_objectz00_bglt)(BgL_oz00_2068); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9605, BgL_arg5284z00_2072); } } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_v2440z00_2073;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9608;
BgL_auxz00_9608 = 
(int)(((long)1)); 
BgL_v2440z00_2073 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9608); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_locz00) = ((obj_t)BgL_v2440z00_2073), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
BgL_typez00_bglt BgL_v2444z00_2074;
{ /* ./Ast/node.scm 114 */
obj_t BgL_auxz00_9612;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9613;
BgL_auxz00_9613 = 
(int)(((long)2)); 
BgL_auxz00_9612 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9613); } 
BgL_v2444z00_2074 = 
(BgL_typez00_bglt)(BgL_auxz00_9612); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2444z00_2074), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_v2448z00_2075;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9618;
BgL_auxz00_9618 = 
(int)(((long)3)); 
BgL_v2448z00_2075 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9618); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2448z00_2075), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_v2452z00_2076;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9622;
BgL_auxz00_9622 = 
(int)(((long)4)); 
BgL_v2452z00_2076 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9622); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_keyz00) = ((obj_t)BgL_v2452z00_2076), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_v2456z00_2077;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9626;
BgL_auxz00_9626 = 
(int)(((long)5)); 
BgL_v2456z00_2077 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9626); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_exprza2za2) = ((obj_t)BgL_v2456z00_2077), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_v2460z00_2078;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9630;
BgL_auxz00_9630 = 
(int)(((long)6)); 
BgL_v2460z00_2078 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9630); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_effectz00) = ((obj_t)BgL_v2460z00_2078), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_v2464z00_2079;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9634;
BgL_auxz00_9634 = 
(int)(((long)7)); 
BgL_v2464z00_2079 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9634); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_czd2heapzd2formatz00) = ((obj_t)BgL_v2464z00_2079), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
BgL_typez00_bglt BgL_v2468z00_2080;
{ /* ./Ast/node.scm 114 */
obj_t BgL_auxz00_9638;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9639;
BgL_auxz00_9639 = 
(int)(((long)8)); 
BgL_auxz00_9638 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9639); } 
BgL_v2468z00_2080 = 
(BgL_typez00_bglt)(BgL_auxz00_9638); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_v2468z00_2080), BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
BgL_typez00_bglt BgL_v2472z00_2081;
{ /* ./Ast/node.scm 114 */
obj_t BgL_auxz00_9644;
{ /* ./Ast/node.scm 114 */
int BgL_auxz00_9645;
BgL_auxz00_9645 = 
(int)(((long)9)); 
BgL_auxz00_9644 = 
STRUCT_REF(BgL_sz00_2069, BgL_auxz00_9645); } 
BgL_v2472z00_2081 = 
(BgL_typez00_bglt)(BgL_auxz00_9644); } 
((((BgL_vallocz00_bglt)CREF(BgL_oz00_2068))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_v2472z00_2081), BUNSPEC); } 
BgL_auxz00_9601 = BgL_oz00_2068; 
return 
(obj_t)(BgL_auxz00_9601);} } } 
}



/* object->struct-valloc3617 */
obj_t BGl_objectzd2ze3structzd2valloc3617ze3zzast_nodez00(obj_t BgL_envz00_5522, obj_t BgL_obj2436z00_5523)
{ AN_OBJECT;
{ /* ./Ast/node.scm 114 */
{ 
BgL_vallocz00_bglt BgL_obj2436z00_2044;
BgL_obj2436z00_2044 = 
(BgL_vallocz00_bglt)(BgL_obj2436z00_5523); 
{ /* ./Ast/node.scm 114 */
obj_t BgL_res2437z00_2047;
{ /* ./Ast/node.scm 114 */
obj_t BgL_keyz00_4196;int BgL_lenz00_4197;
BgL_keyz00_4196 = 
CNST_TABLE_REF(((long)15)); 
BgL_lenz00_4197 = 
(int)(((long)10)); 
BgL_res2437z00_2047 = 
make_struct(BgL_keyz00_4196, BgL_lenz00_4197, BUNSPEC); } 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4200;
BgL_kz00_4200 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4200, BFALSE); } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg5232z00_2049;
{ /* ./Ast/node.scm 114 */
BgL_nodez00_bglt BgL_obj1560z00_4202;
BgL_obj1560z00_4202 = 
(BgL_nodez00_bglt)(BgL_obj2436z00_2044); 
BgL_arg5232z00_2049 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4202))->BgL_locz00); } 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4204;
BgL_kz00_4204 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4204, BgL_arg5232z00_2049); } } 
{ /* ./Ast/node.scm 114 */
BgL_typez00_bglt BgL_arg5237z00_2051;
{ /* ./Ast/node.scm 114 */
BgL_nodez00_bglt BgL_obj1561z00_4206;
BgL_obj1561z00_4206 = 
(BgL_nodez00_bglt)(BgL_obj2436z00_2044); 
BgL_arg5237z00_2051 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4206))->BgL_typez00); } 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4208;obj_t BgL_oz00_4209;
BgL_kz00_4208 = 
(int)(((long)2)); 
BgL_oz00_4209 = 
(obj_t)(BgL_arg5237z00_2051); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4208, BgL_oz00_4209); } } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg5242z00_2053;
{ /* ./Ast/node.scm 114 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4210;
BgL_obj1590z00_4210 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2436z00_2044); 
BgL_arg5242z00_2053 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4210))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4212;
BgL_kz00_4212 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4212, BgL_arg5242z00_2053); } } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg5247z00_2055;
{ /* ./Ast/node.scm 114 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4214;
BgL_obj1593z00_4214 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2436z00_2044); 
BgL_arg5247z00_2055 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4214))->BgL_keyz00); } 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4216;
BgL_kz00_4216 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4216, BgL_arg5247z00_2055); } } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg5253z00_2057;
{ /* ./Ast/node.scm 114 */
BgL_externz00_bglt BgL_obj2009z00_4218;
BgL_obj2009z00_4218 = 
(BgL_externz00_bglt)(BgL_obj2436z00_2044); 
BgL_arg5253z00_2057 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4218))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4220;
BgL_kz00_4220 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4220, BgL_arg5253z00_2057); } } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg5258z00_2059;
{ /* ./Ast/node.scm 114 */
BgL_externz00_bglt BgL_obj2012z00_4222;
BgL_obj2012z00_4222 = 
(BgL_externz00_bglt)(BgL_obj2436z00_2044); 
BgL_arg5258z00_2059 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4222))->BgL_effectz00); } 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4224;
BgL_kz00_4224 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4224, BgL_arg5258z00_2059); } } 
{ /* ./Ast/node.scm 114 */
obj_t BgL_arg5263z00_2061;
BgL_arg5263z00_2061 = 
(((BgL_vallocz00_bglt)CREF(BgL_obj2436z00_2044))->BgL_czd2heapzd2formatz00); 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4228;
BgL_kz00_4228 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4228, BgL_arg5263z00_2061); } } 
{ /* ./Ast/node.scm 114 */
BgL_typez00_bglt BgL_arg5268z00_2063;
BgL_arg5268z00_2063 = 
(((BgL_vallocz00_bglt)CREF(BgL_obj2436z00_2044))->BgL_ftypez00); 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4232;obj_t BgL_oz00_4233;
BgL_kz00_4232 = 
(int)(((long)8)); 
BgL_oz00_4233 = 
(obj_t)(BgL_arg5268z00_2063); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4232, BgL_oz00_4233); } } 
{ /* ./Ast/node.scm 114 */
BgL_typez00_bglt BgL_arg5273z00_2065;
BgL_arg5273z00_2065 = 
(((BgL_vallocz00_bglt)CREF(BgL_obj2436z00_2044))->BgL_otypez00); 
{ /* ./Ast/node.scm 114 */
int BgL_kz00_4236;obj_t BgL_oz00_4237;
BgL_kz00_4236 = 
(int)(((long)9)); 
BgL_oz00_4237 = 
(obj_t)(BgL_arg5273z00_2065); 
STRUCT_SET(BgL_res2437z00_2047, BgL_kz00_4236, BgL_oz00_4237); } } 
return BgL_res2437z00_2047;} } } 
}



/* struct+object->object-vref3615 */
obj_t BGl_structzb2objectzd2ze3objectzd2vref3615z51zzast_nodez00(obj_t BgL_envz00_5524, obj_t BgL_oz00_5525, obj_t BgL_sz00_5526)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ 
BgL_vrefz00_bglt BgL_oz00_2027;obj_t BgL_sz00_2028;
{ /* ./Ast/node.scm 123 */
BgL_vrefz00_bglt BgL_auxz00_9694;
BgL_oz00_2027 = 
(BgL_vrefz00_bglt)(BgL_oz00_5525); 
BgL_sz00_2028 = BgL_sz00_5526; 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg5210z00_2031;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9695;
BgL_auxz00_9695 = 
(int)(((long)0)); 
BgL_arg5210z00_2031 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9695); } 
{ /* ./Ast/node.scm 123 */
BgL_objectz00_bglt BgL_auxz00_9698;
BgL_auxz00_9698 = 
(BgL_objectz00_bglt)(BgL_oz00_2027); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9698, BgL_arg5210z00_2031); } } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_v2536z00_2032;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9701;
BgL_auxz00_9701 = 
(int)(((long)1)); 
BgL_v2536z00_2032 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9701); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_locz00) = ((obj_t)BgL_v2536z00_2032), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_v2540z00_2033;
{ /* ./Ast/node.scm 123 */
obj_t BgL_auxz00_9705;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9706;
BgL_auxz00_9706 = 
(int)(((long)2)); 
BgL_auxz00_9705 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9706); } 
BgL_v2540z00_2033 = 
(BgL_typez00_bglt)(BgL_auxz00_9705); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2540z00_2033), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_v2544z00_2034;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9711;
BgL_auxz00_9711 = 
(int)(((long)3)); 
BgL_v2544z00_2034 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9711); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2544z00_2034), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_v2548z00_2035;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9715;
BgL_auxz00_9715 = 
(int)(((long)4)); 
BgL_v2548z00_2035 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9715); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_keyz00) = ((obj_t)BgL_v2548z00_2035), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_v2552z00_2036;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9719;
BgL_auxz00_9719 = 
(int)(((long)5)); 
BgL_v2552z00_2036 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9719); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_exprza2za2) = ((obj_t)BgL_v2552z00_2036), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_v2556z00_2037;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9723;
BgL_auxz00_9723 = 
(int)(((long)6)); 
BgL_v2556z00_2037 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9723); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_effectz00) = ((obj_t)BgL_v2556z00_2037), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_v2560z00_2038;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9727;
BgL_auxz00_9727 = 
(int)(((long)7)); 
BgL_v2560z00_2038 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9727); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_czd2formatzd2) = ((obj_t)BgL_v2560z00_2038), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_v2564z00_2039;
{ /* ./Ast/node.scm 123 */
obj_t BgL_auxz00_9731;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9732;
BgL_auxz00_9732 = 
(int)(((long)8)); 
BgL_auxz00_9731 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9732); } 
BgL_v2564z00_2039 = 
(BgL_typez00_bglt)(BgL_auxz00_9731); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_v2564z00_2039), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_v2568z00_2040;
{ /* ./Ast/node.scm 123 */
obj_t BgL_auxz00_9737;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9738;
BgL_auxz00_9738 = 
(int)(((long)9)); 
BgL_auxz00_9737 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9738); } 
BgL_v2568z00_2040 = 
(BgL_typez00_bglt)(BgL_auxz00_9737); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_v2568z00_2040), BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_v2572z00_2041;
{ /* ./Ast/node.scm 123 */
obj_t BgL_auxz00_9743;
{ /* ./Ast/node.scm 123 */
int BgL_auxz00_9744;
BgL_auxz00_9744 = 
(int)(((long)10)); 
BgL_auxz00_9743 = 
STRUCT_REF(BgL_sz00_2028, BgL_auxz00_9744); } 
BgL_v2572z00_2041 = 
(BgL_typez00_bglt)(BgL_auxz00_9743); } 
((((BgL_vrefz00_bglt)CREF(BgL_oz00_2027))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_v2572z00_2041), BUNSPEC); } 
BgL_auxz00_9694 = BgL_oz00_2027; 
return 
(obj_t)(BgL_auxz00_9694);} } } 
}



/* object->struct-vref3613 */
obj_t BGl_objectzd2ze3structzd2vref3613ze3zzast_nodez00(obj_t BgL_envz00_5527, obj_t BgL_obj2532z00_5528)
{ AN_OBJECT;
{ /* ./Ast/node.scm 123 */
{ 
BgL_vrefz00_bglt BgL_obj2532z00_2001;
BgL_obj2532z00_2001 = 
(BgL_vrefz00_bglt)(BgL_obj2532z00_5528); 
{ /* ./Ast/node.scm 123 */
obj_t BgL_res2533z00_2004;
{ /* ./Ast/node.scm 123 */
obj_t BgL_keyz00_4128;int BgL_lenz00_4129;
BgL_keyz00_4128 = 
CNST_TABLE_REF(((long)16)); 
BgL_lenz00_4129 = 
(int)(((long)11)); 
BgL_res2533z00_2004 = 
make_struct(BgL_keyz00_4128, BgL_lenz00_4129, BUNSPEC); } 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4132;
BgL_kz00_4132 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4132, BFALSE); } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg5154z00_2006;
{ /* ./Ast/node.scm 123 */
BgL_nodez00_bglt BgL_obj1560z00_4134;
BgL_obj1560z00_4134 = 
(BgL_nodez00_bglt)(BgL_obj2532z00_2001); 
BgL_arg5154z00_2006 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4134))->BgL_locz00); } 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4136;
BgL_kz00_4136 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4136, BgL_arg5154z00_2006); } } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_arg5159z00_2008;
{ /* ./Ast/node.scm 123 */
BgL_nodez00_bglt BgL_obj1561z00_4138;
BgL_obj1561z00_4138 = 
(BgL_nodez00_bglt)(BgL_obj2532z00_2001); 
BgL_arg5159z00_2008 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4138))->BgL_typez00); } 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4140;obj_t BgL_oz00_4141;
BgL_kz00_4140 = 
(int)(((long)2)); 
BgL_oz00_4141 = 
(obj_t)(BgL_arg5159z00_2008); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4140, BgL_oz00_4141); } } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg5164z00_2010;
{ /* ./Ast/node.scm 123 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4142;
BgL_obj1590z00_4142 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2532z00_2001); 
BgL_arg5164z00_2010 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4142))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4144;
BgL_kz00_4144 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4144, BgL_arg5164z00_2010); } } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg5169z00_2012;
{ /* ./Ast/node.scm 123 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4146;
BgL_obj1593z00_4146 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2532z00_2001); 
BgL_arg5169z00_2012 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4146))->BgL_keyz00); } 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4148;
BgL_kz00_4148 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4148, BgL_arg5169z00_2012); } } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg5174z00_2014;
{ /* ./Ast/node.scm 123 */
BgL_externz00_bglt BgL_obj2009z00_4150;
BgL_obj2009z00_4150 = 
(BgL_externz00_bglt)(BgL_obj2532z00_2001); 
BgL_arg5174z00_2014 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4150))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4152;
BgL_kz00_4152 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4152, BgL_arg5174z00_2014); } } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg5179z00_2016;
{ /* ./Ast/node.scm 123 */
BgL_externz00_bglt BgL_obj2012z00_4154;
BgL_obj2012z00_4154 = 
(BgL_externz00_bglt)(BgL_obj2532z00_2001); 
BgL_arg5179z00_2016 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4154))->BgL_effectz00); } 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4156;
BgL_kz00_4156 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4156, BgL_arg5179z00_2016); } } 
{ /* ./Ast/node.scm 123 */
obj_t BgL_arg5184z00_2018;
BgL_arg5184z00_2018 = 
(((BgL_vrefz00_bglt)CREF(BgL_obj2532z00_2001))->BgL_czd2formatzd2); 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4160;
BgL_kz00_4160 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4160, BgL_arg5184z00_2018); } } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_arg5189z00_2020;
BgL_arg5189z00_2020 = 
(((BgL_vrefz00_bglt)CREF(BgL_obj2532z00_2001))->BgL_ftypez00); 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4164;obj_t BgL_oz00_4165;
BgL_kz00_4164 = 
(int)(((long)8)); 
BgL_oz00_4165 = 
(obj_t)(BgL_arg5189z00_2020); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4164, BgL_oz00_4165); } } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_arg5194z00_2022;
BgL_arg5194z00_2022 = 
(((BgL_vrefz00_bglt)CREF(BgL_obj2532z00_2001))->BgL_otypez00); 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4168;obj_t BgL_oz00_4169;
BgL_kz00_4168 = 
(int)(((long)9)); 
BgL_oz00_4169 = 
(obj_t)(BgL_arg5194z00_2022); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4168, BgL_oz00_4169); } } 
{ /* ./Ast/node.scm 123 */
BgL_typez00_bglt BgL_arg5199z00_2024;
BgL_arg5199z00_2024 = 
(((BgL_vrefz00_bglt)CREF(BgL_obj2532z00_2001))->BgL_vtypez00); 
{ /* ./Ast/node.scm 123 */
int BgL_kz00_4172;obj_t BgL_oz00_4173;
BgL_kz00_4172 = 
(int)(((long)10)); 
BgL_oz00_4173 = 
(obj_t)(BgL_arg5199z00_2024); 
STRUCT_SET(BgL_res2533z00_2004, BgL_kz00_4172, BgL_oz00_4173); } } 
return BgL_res2533z00_2004;} } } 
}



/* struct+object->object-vset!3611 */
obj_t BGl_structzb2objectzd2ze3objectzd2vsetz123611z43zzast_nodez00(obj_t BgL_envz00_5529, obj_t BgL_oz00_5530, obj_t BgL_sz00_5531)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ 
BgL_vsetz12z12_bglt BgL_oz00_1984;obj_t BgL_sz00_1985;
{ /* ./Ast/node.scm 134 */
BgL_vsetz12z12_bglt BgL_auxz00_9797;
BgL_oz00_1984 = 
(BgL_vsetz12z12_bglt)(BgL_oz00_5530); 
BgL_sz00_1985 = BgL_sz00_5531; 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg5132z00_1988;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9798;
BgL_auxz00_9798 = 
(int)(((long)0)); 
BgL_arg5132z00_1988 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9798); } 
{ /* ./Ast/node.scm 134 */
BgL_objectz00_bglt BgL_auxz00_9801;
BgL_auxz00_9801 = 
(BgL_objectz00_bglt)(BgL_oz00_1984); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9801, BgL_arg5132z00_1988); } } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_v2636z00_1989;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9804;
BgL_auxz00_9804 = 
(int)(((long)1)); 
BgL_v2636z00_1989 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9804); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_locz00) = ((obj_t)BgL_v2636z00_1989), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_v2640z00_1990;
{ /* ./Ast/node.scm 134 */
obj_t BgL_auxz00_9808;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9809;
BgL_auxz00_9809 = 
(int)(((long)2)); 
BgL_auxz00_9808 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9809); } 
BgL_v2640z00_1990 = 
(BgL_typez00_bglt)(BgL_auxz00_9808); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2640z00_1990), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_v2644z00_1991;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9814;
BgL_auxz00_9814 = 
(int)(((long)3)); 
BgL_v2644z00_1991 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9814); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2644z00_1991), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_v2648z00_1992;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9818;
BgL_auxz00_9818 = 
(int)(((long)4)); 
BgL_v2648z00_1992 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9818); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_keyz00) = ((obj_t)BgL_v2648z00_1992), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_v2652z00_1993;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9822;
BgL_auxz00_9822 = 
(int)(((long)5)); 
BgL_v2652z00_1993 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9822); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_exprza2za2) = ((obj_t)BgL_v2652z00_1993), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_v2656z00_1994;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9826;
BgL_auxz00_9826 = 
(int)(((long)6)); 
BgL_v2656z00_1994 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9826); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_effectz00) = ((obj_t)BgL_v2656z00_1994), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_v2660z00_1995;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9830;
BgL_auxz00_9830 = 
(int)(((long)7)); 
BgL_v2660z00_1995 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9830); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_czd2formatzd2) = ((obj_t)BgL_v2660z00_1995), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_v2664z00_1996;
{ /* ./Ast/node.scm 134 */
obj_t BgL_auxz00_9834;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9835;
BgL_auxz00_9835 = 
(int)(((long)8)); 
BgL_auxz00_9834 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9835); } 
BgL_v2664z00_1996 = 
(BgL_typez00_bglt)(BgL_auxz00_9834); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_ftypez00) = ((BgL_typez00_bglt)BgL_v2664z00_1996), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_v2668z00_1997;
{ /* ./Ast/node.scm 134 */
obj_t BgL_auxz00_9840;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9841;
BgL_auxz00_9841 = 
(int)(((long)9)); 
BgL_auxz00_9840 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9841); } 
BgL_v2668z00_1997 = 
(BgL_typez00_bglt)(BgL_auxz00_9840); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_otypez00) = ((BgL_typez00_bglt)BgL_v2668z00_1997), BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_v2672z00_1998;
{ /* ./Ast/node.scm 134 */
obj_t BgL_auxz00_9846;
{ /* ./Ast/node.scm 134 */
int BgL_auxz00_9847;
BgL_auxz00_9847 = 
(int)(((long)10)); 
BgL_auxz00_9846 = 
STRUCT_REF(BgL_sz00_1985, BgL_auxz00_9847); } 
BgL_v2672z00_1998 = 
(BgL_typez00_bglt)(BgL_auxz00_9846); } 
((((BgL_vsetz12z12_bglt)CREF(BgL_oz00_1984))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_v2672z00_1998), BUNSPEC); } 
BgL_auxz00_9797 = BgL_oz00_1984; 
return 
(obj_t)(BgL_auxz00_9797);} } } 
}



/* object->struct-vset!3609 */
obj_t BGl_objectzd2ze3structzd2vsetz123609zf1zzast_nodez00(obj_t BgL_envz00_5532, obj_t BgL_obj2632z00_5533)
{ AN_OBJECT;
{ /* ./Ast/node.scm 134 */
{ 
BgL_vsetz12z12_bglt BgL_obj2632z00_1958;
BgL_obj2632z00_1958 = 
(BgL_vsetz12z12_bglt)(BgL_obj2632z00_5533); 
{ /* ./Ast/node.scm 134 */
obj_t BgL_res2633z00_1961;
{ /* ./Ast/node.scm 134 */
obj_t BgL_keyz00_4060;int BgL_lenz00_4061;
BgL_keyz00_4060 = 
CNST_TABLE_REF(((long)17)); 
BgL_lenz00_4061 = 
(int)(((long)11)); 
BgL_res2633z00_1961 = 
make_struct(BgL_keyz00_4060, BgL_lenz00_4061, BUNSPEC); } 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4064;
BgL_kz00_4064 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4064, BFALSE); } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg5076z00_1963;
{ /* ./Ast/node.scm 134 */
BgL_nodez00_bglt BgL_obj1560z00_4066;
BgL_obj1560z00_4066 = 
(BgL_nodez00_bglt)(BgL_obj2632z00_1958); 
BgL_arg5076z00_1963 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4066))->BgL_locz00); } 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4068;
BgL_kz00_4068 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4068, BgL_arg5076z00_1963); } } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_arg5081z00_1965;
{ /* ./Ast/node.scm 134 */
BgL_nodez00_bglt BgL_obj1561z00_4070;
BgL_obj1561z00_4070 = 
(BgL_nodez00_bglt)(BgL_obj2632z00_1958); 
BgL_arg5081z00_1965 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4070))->BgL_typez00); } 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4072;obj_t BgL_oz00_4073;
BgL_kz00_4072 = 
(int)(((long)2)); 
BgL_oz00_4073 = 
(obj_t)(BgL_arg5081z00_1965); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4072, BgL_oz00_4073); } } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg5086z00_1967;
{ /* ./Ast/node.scm 134 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4074;
BgL_obj1590z00_4074 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2632z00_1958); 
BgL_arg5086z00_1967 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4074))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4076;
BgL_kz00_4076 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4076, BgL_arg5086z00_1967); } } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg5091z00_1969;
{ /* ./Ast/node.scm 134 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4078;
BgL_obj1593z00_4078 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2632z00_1958); 
BgL_arg5091z00_1969 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4078))->BgL_keyz00); } 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4080;
BgL_kz00_4080 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4080, BgL_arg5091z00_1969); } } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg5096z00_1971;
{ /* ./Ast/node.scm 134 */
BgL_externz00_bglt BgL_obj2009z00_4082;
BgL_obj2009z00_4082 = 
(BgL_externz00_bglt)(BgL_obj2632z00_1958); 
BgL_arg5096z00_1971 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4082))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4084;
BgL_kz00_4084 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4084, BgL_arg5096z00_1971); } } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg5101z00_1973;
{ /* ./Ast/node.scm 134 */
BgL_externz00_bglt BgL_obj2012z00_4086;
BgL_obj2012z00_4086 = 
(BgL_externz00_bglt)(BgL_obj2632z00_1958); 
BgL_arg5101z00_1973 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4086))->BgL_effectz00); } 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4088;
BgL_kz00_4088 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4088, BgL_arg5101z00_1973); } } 
{ /* ./Ast/node.scm 134 */
obj_t BgL_arg5106z00_1975;
BgL_arg5106z00_1975 = 
(((BgL_vsetz12z12_bglt)CREF(BgL_obj2632z00_1958))->BgL_czd2formatzd2); 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4092;
BgL_kz00_4092 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4092, BgL_arg5106z00_1975); } } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_arg5111z00_1977;
BgL_arg5111z00_1977 = 
(((BgL_vsetz12z12_bglt)CREF(BgL_obj2632z00_1958))->BgL_ftypez00); 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4096;obj_t BgL_oz00_4097;
BgL_kz00_4096 = 
(int)(((long)8)); 
BgL_oz00_4097 = 
(obj_t)(BgL_arg5111z00_1977); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4096, BgL_oz00_4097); } } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_arg5116z00_1979;
BgL_arg5116z00_1979 = 
(((BgL_vsetz12z12_bglt)CREF(BgL_obj2632z00_1958))->BgL_otypez00); 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4100;obj_t BgL_oz00_4101;
BgL_kz00_4100 = 
(int)(((long)9)); 
BgL_oz00_4101 = 
(obj_t)(BgL_arg5116z00_1979); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4100, BgL_oz00_4101); } } 
{ /* ./Ast/node.scm 134 */
BgL_typez00_bglt BgL_arg5121z00_1981;
BgL_arg5121z00_1981 = 
(((BgL_vsetz12z12_bglt)CREF(BgL_obj2632z00_1958))->BgL_vtypez00); 
{ /* ./Ast/node.scm 134 */
int BgL_kz00_4104;obj_t BgL_oz00_4105;
BgL_kz00_4104 = 
(int)(((long)10)); 
BgL_oz00_4105 = 
(obj_t)(BgL_arg5121z00_1981); 
STRUCT_SET(BgL_res2633z00_1961, BgL_kz00_4104, BgL_oz00_4105); } } 
return BgL_res2633z00_1961;} } } 
}



/* struct+object->object-vlength3606 */
obj_t BGl_structzb2objectzd2ze3objectzd2vlength3606z51zzast_nodez00(obj_t BgL_envz00_5534, obj_t BgL_oz00_5535, obj_t BgL_sz00_5536)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ 
BgL_vlengthz00_bglt BgL_oz00_1943;obj_t BgL_sz00_1944;
{ /* ./Ast/node.scm 145 */
BgL_vlengthz00_bglt BgL_auxz00_9900;
BgL_oz00_1943 = 
(BgL_vlengthz00_bglt)(BgL_oz00_5535); 
BgL_sz00_1944 = BgL_sz00_5536; 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg5056z00_1947;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9901;
BgL_auxz00_9901 = 
(int)(((long)0)); 
BgL_arg5056z00_1947 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9901); } 
{ /* ./Ast/node.scm 145 */
BgL_objectz00_bglt BgL_auxz00_9904;
BgL_auxz00_9904 = 
(BgL_objectz00_bglt)(BgL_oz00_1943); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9904, BgL_arg5056z00_1947); } } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_v2729z00_1948;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9907;
BgL_auxz00_9907 = 
(int)(((long)1)); 
BgL_v2729z00_1948 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9907); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_locz00) = ((obj_t)BgL_v2729z00_1948), BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
BgL_typez00_bglt BgL_v2733z00_1949;
{ /* ./Ast/node.scm 145 */
obj_t BgL_auxz00_9911;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9912;
BgL_auxz00_9912 = 
(int)(((long)2)); 
BgL_auxz00_9911 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9912); } 
BgL_v2733z00_1949 = 
(BgL_typez00_bglt)(BgL_auxz00_9911); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2733z00_1949), BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_v2737z00_1950;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9917;
BgL_auxz00_9917 = 
(int)(((long)3)); 
BgL_v2737z00_1950 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9917); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2737z00_1950), BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_v2741z00_1951;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9921;
BgL_auxz00_9921 = 
(int)(((long)4)); 
BgL_v2741z00_1951 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9921); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_keyz00) = ((obj_t)BgL_v2741z00_1951), BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_v2745z00_1952;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9925;
BgL_auxz00_9925 = 
(int)(((long)5)); 
BgL_v2745z00_1952 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9925); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_exprza2za2) = ((obj_t)BgL_v2745z00_1952), BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_v2749z00_1953;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9929;
BgL_auxz00_9929 = 
(int)(((long)6)); 
BgL_v2749z00_1953 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9929); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_effectz00) = ((obj_t)BgL_v2749z00_1953), BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_v2753z00_1954;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9933;
BgL_auxz00_9933 = 
(int)(((long)7)); 
BgL_v2753z00_1954 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9933); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_czd2formatzd2) = ((obj_t)BgL_v2753z00_1954), BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
BgL_typez00_bglt BgL_v2757z00_1955;
{ /* ./Ast/node.scm 145 */
obj_t BgL_auxz00_9937;
{ /* ./Ast/node.scm 145 */
int BgL_auxz00_9938;
BgL_auxz00_9938 = 
(int)(((long)8)); 
BgL_auxz00_9937 = 
STRUCT_REF(BgL_sz00_1944, BgL_auxz00_9938); } 
BgL_v2757z00_1955 = 
(BgL_typez00_bglt)(BgL_auxz00_9937); } 
((((BgL_vlengthz00_bglt)CREF(BgL_oz00_1943))->BgL_vtypez00) = ((BgL_typez00_bglt)BgL_v2757z00_1955), BUNSPEC); } 
BgL_auxz00_9900 = BgL_oz00_1943; 
return 
(obj_t)(BgL_auxz00_9900);} } } 
}



/* object->struct-vlength3604 */
obj_t BGl_objectzd2ze3structzd2vlength3604ze3zzast_nodez00(obj_t BgL_envz00_5537, obj_t BgL_obj2725z00_5538)
{ AN_OBJECT;
{ /* ./Ast/node.scm 145 */
{ 
BgL_vlengthz00_bglt BgL_obj2725z00_1921;
BgL_obj2725z00_1921 = 
(BgL_vlengthz00_bglt)(BgL_obj2725z00_5538); 
{ /* ./Ast/node.scm 145 */
obj_t BgL_res2726z00_1924;
{ /* ./Ast/node.scm 145 */
obj_t BgL_keyz00_4004;int BgL_lenz00_4005;
BgL_keyz00_4004 = 
CNST_TABLE_REF(((long)18)); 
BgL_lenz00_4005 = 
(int)(((long)9)); 
BgL_res2726z00_1924 = 
make_struct(BgL_keyz00_4004, BgL_lenz00_4005, BUNSPEC); } 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4008;
BgL_kz00_4008 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4008, BFALSE); } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg5009z00_1926;
{ /* ./Ast/node.scm 145 */
BgL_nodez00_bglt BgL_obj1560z00_4010;
BgL_obj1560z00_4010 = 
(BgL_nodez00_bglt)(BgL_obj2725z00_1921); 
BgL_arg5009z00_1926 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_4010))->BgL_locz00); } 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4012;
BgL_kz00_4012 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4012, BgL_arg5009z00_1926); } } 
{ /* ./Ast/node.scm 145 */
BgL_typez00_bglt BgL_arg5014z00_1928;
{ /* ./Ast/node.scm 145 */
BgL_nodez00_bglt BgL_obj1561z00_4014;
BgL_obj1561z00_4014 = 
(BgL_nodez00_bglt)(BgL_obj2725z00_1921); 
BgL_arg5014z00_1928 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_4014))->BgL_typez00); } 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4016;obj_t BgL_oz00_4017;
BgL_kz00_4016 = 
(int)(((long)2)); 
BgL_oz00_4017 = 
(obj_t)(BgL_arg5014z00_1928); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4016, BgL_oz00_4017); } } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg5019z00_1930;
{ /* ./Ast/node.scm 145 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_4018;
BgL_obj1590z00_4018 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2725z00_1921); 
BgL_arg5019z00_1930 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_4018))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4020;
BgL_kz00_4020 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4020, BgL_arg5019z00_1930); } } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg5024z00_1932;
{ /* ./Ast/node.scm 145 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_4022;
BgL_obj1593z00_4022 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2725z00_1921); 
BgL_arg5024z00_1932 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_4022))->BgL_keyz00); } 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4024;
BgL_kz00_4024 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4024, BgL_arg5024z00_1932); } } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg5030z00_1934;
{ /* ./Ast/node.scm 145 */
BgL_externz00_bglt BgL_obj2009z00_4026;
BgL_obj2009z00_4026 = 
(BgL_externz00_bglt)(BgL_obj2725z00_1921); 
BgL_arg5030z00_1934 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_4026))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4028;
BgL_kz00_4028 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4028, BgL_arg5030z00_1934); } } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg5035z00_1936;
{ /* ./Ast/node.scm 145 */
BgL_externz00_bglt BgL_obj2012z00_4030;
BgL_obj2012z00_4030 = 
(BgL_externz00_bglt)(BgL_obj2725z00_1921); 
BgL_arg5035z00_1936 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_4030))->BgL_effectz00); } 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4032;
BgL_kz00_4032 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4032, BgL_arg5035z00_1936); } } 
{ /* ./Ast/node.scm 145 */
obj_t BgL_arg5040z00_1938;
BgL_arg5040z00_1938 = 
(((BgL_vlengthz00_bglt)CREF(BgL_obj2725z00_1921))->BgL_czd2formatzd2); 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4036;
BgL_kz00_4036 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4036, BgL_arg5040z00_1938); } } 
{ /* ./Ast/node.scm 145 */
BgL_typez00_bglt BgL_arg5045z00_1940;
BgL_arg5045z00_1940 = 
(((BgL_vlengthz00_bglt)CREF(BgL_obj2725z00_1921))->BgL_vtypez00); 
{ /* ./Ast/node.scm 145 */
int BgL_kz00_4040;obj_t BgL_oz00_4041;
BgL_kz00_4040 = 
(int)(((long)8)); 
BgL_oz00_4041 = 
(obj_t)(BgL_arg5045z00_1940); 
STRUCT_SET(BgL_res2726z00_1924, BgL_kz00_4040, BgL_oz00_4041); } } 
return BgL_res2726z00_1924;} } } 
}



/* struct+object->object-isa3602 */
obj_t BGl_structzb2objectzd2ze3objectzd2isa3602z51zzast_nodez00(obj_t BgL_envz00_5539, obj_t BgL_oz00_5540, obj_t BgL_sz00_5541)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ 
BgL_isaz00_bglt BgL_oz00_1907;obj_t BgL_sz00_1908;
{ /* ./Ast/node.scm 152 */
BgL_isaz00_bglt BgL_auxz00_9983;
BgL_oz00_1907 = 
(BgL_isaz00_bglt)(BgL_oz00_5540); 
BgL_sz00_1908 = BgL_sz00_5541; 
{ /* ./Ast/node.scm 152 */
obj_t BgL_arg4990z00_1911;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_9984;
BgL_auxz00_9984 = 
(int)(((long)0)); 
BgL_arg4990z00_1911 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_9984); } 
{ /* ./Ast/node.scm 152 */
BgL_objectz00_bglt BgL_auxz00_9987;
BgL_auxz00_9987 = 
(BgL_objectz00_bglt)(BgL_oz00_1907); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_9987, BgL_arg4990z00_1911); } } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_v2808z00_1912;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_9990;
BgL_auxz00_9990 = 
(int)(((long)1)); 
BgL_v2808z00_1912 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_9990); } 
((((BgL_isaz00_bglt)CREF(BgL_oz00_1907))->BgL_locz00) = ((obj_t)BgL_v2808z00_1912), BUNSPEC); } 
{ /* ./Ast/node.scm 152 */
BgL_typez00_bglt BgL_v2812z00_1913;
{ /* ./Ast/node.scm 152 */
obj_t BgL_auxz00_9994;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_9995;
BgL_auxz00_9995 = 
(int)(((long)2)); 
BgL_auxz00_9994 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_9995); } 
BgL_v2812z00_1913 = 
(BgL_typez00_bglt)(BgL_auxz00_9994); } 
((((BgL_isaz00_bglt)CREF(BgL_oz00_1907))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2812z00_1913), BUNSPEC); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_v2816z00_1914;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_10000;
BgL_auxz00_10000 = 
(int)(((long)3)); 
BgL_v2816z00_1914 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_10000); } 
((((BgL_isaz00_bglt)CREF(BgL_oz00_1907))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2816z00_1914), BUNSPEC); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_v2820z00_1915;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_10004;
BgL_auxz00_10004 = 
(int)(((long)4)); 
BgL_v2820z00_1915 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_10004); } 
((((BgL_isaz00_bglt)CREF(BgL_oz00_1907))->BgL_keyz00) = ((obj_t)BgL_v2820z00_1915), BUNSPEC); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_v2824z00_1916;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_10008;
BgL_auxz00_10008 = 
(int)(((long)5)); 
BgL_v2824z00_1916 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_10008); } 
((((BgL_isaz00_bglt)CREF(BgL_oz00_1907))->BgL_exprza2za2) = ((obj_t)BgL_v2824z00_1916), BUNSPEC); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_v2828z00_1917;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_10012;
BgL_auxz00_10012 = 
(int)(((long)6)); 
BgL_v2828z00_1917 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_10012); } 
((((BgL_isaz00_bglt)CREF(BgL_oz00_1907))->BgL_effectz00) = ((obj_t)BgL_v2828z00_1917), BUNSPEC); } 
{ /* ./Ast/node.scm 152 */
BgL_typez00_bglt BgL_v2832z00_1918;
{ /* ./Ast/node.scm 152 */
obj_t BgL_auxz00_10016;
{ /* ./Ast/node.scm 152 */
int BgL_auxz00_10017;
BgL_auxz00_10017 = 
(int)(((long)7)); 
BgL_auxz00_10016 = 
STRUCT_REF(BgL_sz00_1908, BgL_auxz00_10017); } 
BgL_v2832z00_1918 = 
(BgL_typez00_bglt)(BgL_auxz00_10016); } 
((((BgL_isaz00_bglt)CREF(BgL_oz00_1907))->BgL_classz00) = ((BgL_typez00_bglt)BgL_v2832z00_1918), BUNSPEC); } 
BgL_auxz00_9983 = BgL_oz00_1907; 
return 
(obj_t)(BgL_auxz00_9983);} } } 
}



/* object->struct-isa3600 */
obj_t BGl_objectzd2ze3structzd2isa3600ze3zzast_nodez00(obj_t BgL_envz00_5542, obj_t BgL_obj2804z00_5543)
{ AN_OBJECT;
{ /* ./Ast/node.scm 152 */
{ 
BgL_isaz00_bglt BgL_obj2804z00_1887;
BgL_obj2804z00_1887 = 
(BgL_isaz00_bglt)(BgL_obj2804z00_5543); 
{ /* ./Ast/node.scm 152 */
obj_t BgL_res2805z00_1890;
{ /* ./Ast/node.scm 152 */
obj_t BgL_keyz00_3954;int BgL_lenz00_3955;
BgL_keyz00_3954 = 
CNST_TABLE_REF(((long)19)); 
BgL_lenz00_3955 = 
(int)(((long)8)); 
BgL_res2805z00_1890 = 
make_struct(BgL_keyz00_3954, BgL_lenz00_3955, BUNSPEC); } 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3958;
BgL_kz00_3958 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3958, BFALSE); } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_arg4948z00_1892;
{ /* ./Ast/node.scm 152 */
BgL_nodez00_bglt BgL_obj1560z00_3960;
BgL_obj1560z00_3960 = 
(BgL_nodez00_bglt)(BgL_obj2804z00_1887); 
BgL_arg4948z00_1892 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3960))->BgL_locz00); } 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3962;
BgL_kz00_3962 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3962, BgL_arg4948z00_1892); } } 
{ /* ./Ast/node.scm 152 */
BgL_typez00_bglt BgL_arg4953z00_1894;
{ /* ./Ast/node.scm 152 */
BgL_nodez00_bglt BgL_obj1561z00_3964;
BgL_obj1561z00_3964 = 
(BgL_nodez00_bglt)(BgL_obj2804z00_1887); 
BgL_arg4953z00_1894 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3964))->BgL_typez00); } 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3966;obj_t BgL_oz00_3967;
BgL_kz00_3966 = 
(int)(((long)2)); 
BgL_oz00_3967 = 
(obj_t)(BgL_arg4953z00_1894); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3966, BgL_oz00_3967); } } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_arg4959z00_1896;
{ /* ./Ast/node.scm 152 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_3968;
BgL_obj1590z00_3968 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2804z00_1887); 
BgL_arg4959z00_1896 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_3968))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3970;
BgL_kz00_3970 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3970, BgL_arg4959z00_1896); } } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_arg4964z00_1898;
{ /* ./Ast/node.scm 152 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_3972;
BgL_obj1593z00_3972 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2804z00_1887); 
BgL_arg4964z00_1898 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_3972))->BgL_keyz00); } 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3974;
BgL_kz00_3974 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3974, BgL_arg4964z00_1898); } } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_arg4969z00_1900;
{ /* ./Ast/node.scm 152 */
BgL_externz00_bglt BgL_obj2009z00_3976;
BgL_obj2009z00_3976 = 
(BgL_externz00_bglt)(BgL_obj2804z00_1887); 
BgL_arg4969z00_1900 = 
(((BgL_externz00_bglt)CREF(BgL_obj2009z00_3976))->BgL_exprza2za2); } 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3978;
BgL_kz00_3978 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3978, BgL_arg4969z00_1900); } } 
{ /* ./Ast/node.scm 152 */
obj_t BgL_arg4974z00_1902;
{ /* ./Ast/node.scm 152 */
BgL_externz00_bglt BgL_obj2012z00_3980;
BgL_obj2012z00_3980 = 
(BgL_externz00_bglt)(BgL_obj2804z00_1887); 
BgL_arg4974z00_1902 = 
(((BgL_externz00_bglt)CREF(BgL_obj2012z00_3980))->BgL_effectz00); } 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3982;
BgL_kz00_3982 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3982, BgL_arg4974z00_1902); } } 
{ /* ./Ast/node.scm 152 */
BgL_typez00_bglt BgL_arg4979z00_1904;
BgL_arg4979z00_1904 = 
(((BgL_isaz00_bglt)CREF(BgL_obj2804z00_1887))->BgL_classz00); 
{ /* ./Ast/node.scm 152 */
int BgL_kz00_3986;obj_t BgL_oz00_3987;
BgL_kz00_3986 = 
(int)(((long)7)); 
BgL_oz00_3987 = 
(obj_t)(BgL_arg4979z00_1904); 
STRUCT_SET(BgL_res2805z00_1890, BgL_kz00_3986, BgL_oz00_3987); } } 
return BgL_res2805z00_1890;} } } 
}



/* struct+object->object-cast3598 */
obj_t BGl_structzb2objectzd2ze3objectzd2cast3598z51zzast_nodez00(obj_t BgL_envz00_5544, obj_t BgL_oz00_5545, obj_t BgL_sz00_5546)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ 
BgL_castz00_bglt BgL_oz00_1877;obj_t BgL_sz00_1878;
{ /* ./Ast/node.scm 156 */
BgL_castz00_bglt BgL_auxz00_10059;
BgL_oz00_1877 = 
(BgL_castz00_bglt)(BgL_oz00_5545); 
BgL_sz00_1878 = BgL_sz00_5546; 
{ /* ./Ast/node.scm 156 */
obj_t BgL_arg4933z00_1881;
{ /* ./Ast/node.scm 156 */
int BgL_auxz00_10060;
BgL_auxz00_10060 = 
(int)(((long)0)); 
BgL_arg4933z00_1881 = 
STRUCT_REF(BgL_sz00_1878, BgL_auxz00_10060); } 
{ /* ./Ast/node.scm 156 */
BgL_objectz00_bglt BgL_auxz00_10063;
BgL_auxz00_10063 = 
(BgL_objectz00_bglt)(BgL_oz00_1877); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10063, BgL_arg4933z00_1881); } } 
{ /* ./Ast/node.scm 156 */
obj_t BgL_v2860z00_1882;
{ /* ./Ast/node.scm 156 */
int BgL_auxz00_10066;
BgL_auxz00_10066 = 
(int)(((long)1)); 
BgL_v2860z00_1882 = 
STRUCT_REF(BgL_sz00_1878, BgL_auxz00_10066); } 
((((BgL_castz00_bglt)CREF(BgL_oz00_1877))->BgL_locz00) = ((obj_t)BgL_v2860z00_1882), BUNSPEC); } 
{ /* ./Ast/node.scm 156 */
BgL_typez00_bglt BgL_v2864z00_1883;
{ /* ./Ast/node.scm 156 */
obj_t BgL_auxz00_10070;
{ /* ./Ast/node.scm 156 */
int BgL_auxz00_10071;
BgL_auxz00_10071 = 
(int)(((long)2)); 
BgL_auxz00_10070 = 
STRUCT_REF(BgL_sz00_1878, BgL_auxz00_10071); } 
BgL_v2864z00_1883 = 
(BgL_typez00_bglt)(BgL_auxz00_10070); } 
((((BgL_castz00_bglt)CREF(BgL_oz00_1877))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2864z00_1883), BUNSPEC); } 
{ /* ./Ast/node.scm 156 */
BgL_nodez00_bglt BgL_v2868z00_1884;
{ /* ./Ast/node.scm 156 */
obj_t BgL_auxz00_10076;
{ /* ./Ast/node.scm 156 */
int BgL_auxz00_10077;
BgL_auxz00_10077 = 
(int)(((long)3)); 
BgL_auxz00_10076 = 
STRUCT_REF(BgL_sz00_1878, BgL_auxz00_10077); } 
BgL_v2868z00_1884 = 
(BgL_nodez00_bglt)(BgL_auxz00_10076); } 
((((BgL_castz00_bglt)CREF(BgL_oz00_1877))->BgL_argz00) = ((BgL_nodez00_bglt)BgL_v2868z00_1884), BUNSPEC); } 
BgL_auxz00_10059 = BgL_oz00_1877; 
return 
(obj_t)(BgL_auxz00_10059);} } } 
}



/* object->struct-cast3596 */
obj_t BGl_objectzd2ze3structzd2cast3596ze3zzast_nodez00(obj_t BgL_envz00_5547, obj_t BgL_obj2856z00_5548)
{ AN_OBJECT;
{ /* ./Ast/node.scm 156 */
{ 
BgL_castz00_bglt BgL_obj2856z00_1865;
BgL_obj2856z00_1865 = 
(BgL_castz00_bglt)(BgL_obj2856z00_5548); 
{ /* ./Ast/node.scm 156 */
obj_t BgL_res2857z00_1868;
{ /* ./Ast/node.scm 156 */
obj_t BgL_keyz00_3928;int BgL_lenz00_3929;
BgL_keyz00_3928 = 
CNST_TABLE_REF(((long)20)); 
BgL_lenz00_3929 = 
(int)(((long)4)); 
BgL_res2857z00_1868 = 
make_struct(BgL_keyz00_3928, BgL_lenz00_3929, BUNSPEC); } 
{ /* ./Ast/node.scm 156 */
int BgL_kz00_3932;
BgL_kz00_3932 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2857z00_1868, BgL_kz00_3932, BFALSE); } 
{ /* ./Ast/node.scm 156 */
obj_t BgL_arg4912z00_1870;
{ /* ./Ast/node.scm 156 */
BgL_nodez00_bglt BgL_obj1560z00_3934;
BgL_obj1560z00_3934 = 
(BgL_nodez00_bglt)(BgL_obj2856z00_1865); 
BgL_arg4912z00_1870 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3934))->BgL_locz00); } 
{ /* ./Ast/node.scm 156 */
int BgL_kz00_3936;
BgL_kz00_3936 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2857z00_1868, BgL_kz00_3936, BgL_arg4912z00_1870); } } 
{ /* ./Ast/node.scm 156 */
BgL_typez00_bglt BgL_arg4917z00_1872;
{ /* ./Ast/node.scm 156 */
BgL_nodez00_bglt BgL_obj1561z00_3938;
BgL_obj1561z00_3938 = 
(BgL_nodez00_bglt)(BgL_obj2856z00_1865); 
BgL_arg4917z00_1872 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3938))->BgL_typez00); } 
{ /* ./Ast/node.scm 156 */
int BgL_kz00_3940;obj_t BgL_oz00_3941;
BgL_kz00_3940 = 
(int)(((long)2)); 
BgL_oz00_3941 = 
(obj_t)(BgL_arg4917z00_1872); 
STRUCT_SET(BgL_res2857z00_1868, BgL_kz00_3940, BgL_oz00_3941); } } 
{ /* ./Ast/node.scm 156 */
BgL_nodez00_bglt BgL_arg4922z00_1874;
BgL_arg4922z00_1874 = 
(((BgL_castz00_bglt)CREF(BgL_obj2856z00_1865))->BgL_argz00); 
{ /* ./Ast/node.scm 156 */
int BgL_kz00_3944;obj_t BgL_oz00_3945;
BgL_kz00_3944 = 
(int)(((long)3)); 
BgL_oz00_3945 = 
(obj_t)(BgL_arg4922z00_1874); 
STRUCT_SET(BgL_res2857z00_1868, BgL_kz00_3944, BgL_oz00_3945); } } 
return BgL_res2857z00_1868;} } } 
}



/* struct+object->object-setq3594 */
obj_t BGl_structzb2objectzd2ze3objectzd2setq3594z51zzast_nodez00(obj_t BgL_envz00_5549, obj_t BgL_oz00_5550, obj_t BgL_sz00_5551)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ 
BgL_setqz00_bglt BgL_oz00_1854;obj_t BgL_sz00_1855;
{ /* ./Ast/node.scm 161 */
BgL_setqz00_bglt BgL_auxz00_10103;
BgL_oz00_1854 = 
(BgL_setqz00_bglt)(BgL_oz00_5550); 
BgL_sz00_1855 = BgL_sz00_5551; 
{ /* ./Ast/node.scm 161 */
obj_t BgL_arg4896z00_1858;
{ /* ./Ast/node.scm 161 */
int BgL_auxz00_10104;
BgL_auxz00_10104 = 
(int)(((long)0)); 
BgL_arg4896z00_1858 = 
STRUCT_REF(BgL_sz00_1855, BgL_auxz00_10104); } 
{ /* ./Ast/node.scm 161 */
BgL_objectz00_bglt BgL_auxz00_10107;
BgL_auxz00_10107 = 
(BgL_objectz00_bglt)(BgL_oz00_1854); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10107, BgL_arg4896z00_1858); } } 
{ /* ./Ast/node.scm 161 */
obj_t BgL_v2902z00_1859;
{ /* ./Ast/node.scm 161 */
int BgL_auxz00_10110;
BgL_auxz00_10110 = 
(int)(((long)1)); 
BgL_v2902z00_1859 = 
STRUCT_REF(BgL_sz00_1855, BgL_auxz00_10110); } 
((((BgL_setqz00_bglt)CREF(BgL_oz00_1854))->BgL_locz00) = ((obj_t)BgL_v2902z00_1859), BUNSPEC); } 
{ /* ./Ast/node.scm 161 */
BgL_typez00_bglt BgL_v2906z00_1860;
{ /* ./Ast/node.scm 161 */
obj_t BgL_auxz00_10114;
{ /* ./Ast/node.scm 161 */
int BgL_auxz00_10115;
BgL_auxz00_10115 = 
(int)(((long)2)); 
BgL_auxz00_10114 = 
STRUCT_REF(BgL_sz00_1855, BgL_auxz00_10115); } 
BgL_v2906z00_1860 = 
(BgL_typez00_bglt)(BgL_auxz00_10114); } 
((((BgL_setqz00_bglt)CREF(BgL_oz00_1854))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2906z00_1860), BUNSPEC); } 
{ /* ./Ast/node.scm 161 */
BgL_varz00_bglt BgL_v2910z00_1861;
{ /* ./Ast/node.scm 161 */
obj_t BgL_auxz00_10120;
{ /* ./Ast/node.scm 161 */
int BgL_auxz00_10121;
BgL_auxz00_10121 = 
(int)(((long)3)); 
BgL_auxz00_10120 = 
STRUCT_REF(BgL_sz00_1855, BgL_auxz00_10121); } 
BgL_v2910z00_1861 = 
(BgL_varz00_bglt)(BgL_auxz00_10120); } 
((((BgL_setqz00_bglt)CREF(BgL_oz00_1854))->BgL_varz00) = ((BgL_varz00_bglt)BgL_v2910z00_1861), BUNSPEC); } 
{ /* ./Ast/node.scm 161 */
BgL_nodez00_bglt BgL_v2914z00_1862;
{ /* ./Ast/node.scm 161 */
obj_t BgL_auxz00_10126;
{ /* ./Ast/node.scm 161 */
int BgL_auxz00_10127;
BgL_auxz00_10127 = 
(int)(((long)4)); 
BgL_auxz00_10126 = 
STRUCT_REF(BgL_sz00_1855, BgL_auxz00_10127); } 
BgL_v2914z00_1862 = 
(BgL_nodez00_bglt)(BgL_auxz00_10126); } 
((((BgL_setqz00_bglt)CREF(BgL_oz00_1854))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_v2914z00_1862), BUNSPEC); } 
BgL_auxz00_10103 = BgL_oz00_1854; 
return 
(obj_t)(BgL_auxz00_10103);} } } 
}



/* object->struct-setq3592 */
obj_t BGl_objectzd2ze3structzd2setq3592ze3zzast_nodez00(obj_t BgL_envz00_5552, obj_t BgL_obj2898z00_5553)
{ AN_OBJECT;
{ /* ./Ast/node.scm 161 */
{ 
BgL_setqz00_bglt BgL_obj2898z00_1840;
BgL_obj2898z00_1840 = 
(BgL_setqz00_bglt)(BgL_obj2898z00_5553); 
{ /* ./Ast/node.scm 161 */
obj_t BgL_res2899z00_1843;
{ /* ./Ast/node.scm 161 */
obj_t BgL_keyz00_3896;int BgL_lenz00_3897;
BgL_keyz00_3896 = 
CNST_TABLE_REF(((long)21)); 
BgL_lenz00_3897 = 
(int)(((long)5)); 
BgL_res2899z00_1843 = 
make_struct(BgL_keyz00_3896, BgL_lenz00_3897, BUNSPEC); } 
{ /* ./Ast/node.scm 161 */
int BgL_kz00_3900;
BgL_kz00_3900 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2899z00_1843, BgL_kz00_3900, BFALSE); } 
{ /* ./Ast/node.scm 161 */
obj_t BgL_arg4870z00_1845;
{ /* ./Ast/node.scm 161 */
BgL_nodez00_bglt BgL_obj1560z00_3902;
BgL_obj1560z00_3902 = 
(BgL_nodez00_bglt)(BgL_obj2898z00_1840); 
BgL_arg4870z00_1845 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3902))->BgL_locz00); } 
{ /* ./Ast/node.scm 161 */
int BgL_kz00_3904;
BgL_kz00_3904 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2899z00_1843, BgL_kz00_3904, BgL_arg4870z00_1845); } } 
{ /* ./Ast/node.scm 161 */
BgL_typez00_bglt BgL_arg4875z00_1847;
{ /* ./Ast/node.scm 161 */
BgL_nodez00_bglt BgL_obj1561z00_3906;
BgL_obj1561z00_3906 = 
(BgL_nodez00_bglt)(BgL_obj2898z00_1840); 
BgL_arg4875z00_1847 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3906))->BgL_typez00); } 
{ /* ./Ast/node.scm 161 */
int BgL_kz00_3908;obj_t BgL_oz00_3909;
BgL_kz00_3908 = 
(int)(((long)2)); 
BgL_oz00_3909 = 
(obj_t)(BgL_arg4875z00_1847); 
STRUCT_SET(BgL_res2899z00_1843, BgL_kz00_3908, BgL_oz00_3909); } } 
{ /* ./Ast/node.scm 161 */
BgL_varz00_bglt BgL_arg4880z00_1849;
BgL_arg4880z00_1849 = 
(((BgL_setqz00_bglt)CREF(BgL_obj2898z00_1840))->BgL_varz00); 
{ /* ./Ast/node.scm 161 */
int BgL_kz00_3912;obj_t BgL_oz00_3913;
BgL_kz00_3912 = 
(int)(((long)3)); 
BgL_oz00_3913 = 
(obj_t)(BgL_arg4880z00_1849); 
STRUCT_SET(BgL_res2899z00_1843, BgL_kz00_3912, BgL_oz00_3913); } } 
{ /* ./Ast/node.scm 161 */
BgL_nodez00_bglt BgL_arg4885z00_1851;
BgL_arg4885z00_1851 = 
(((BgL_setqz00_bglt)CREF(BgL_obj2898z00_1840))->BgL_valuez00); 
{ /* ./Ast/node.scm 161 */
int BgL_kz00_3916;obj_t BgL_oz00_3917;
BgL_kz00_3916 = 
(int)(((long)4)); 
BgL_oz00_3917 = 
(obj_t)(BgL_arg4885z00_1851); 
STRUCT_SET(BgL_res2899z00_1843, BgL_kz00_3916, BgL_oz00_3917); } } 
return BgL_res2899z00_1843;} } } 
}



/* struct+object->object-conditional3590 */
obj_t BGl_structzb2objectzd2ze3objectzd2conditional3590z51zzast_nodez00(obj_t BgL_envz00_5554, obj_t BgL_oz00_5555, obj_t BgL_sz00_5556)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ 
BgL_conditionalz00_bglt BgL_oz00_1826;obj_t BgL_sz00_1827;
{ /* ./Ast/node.scm 168 */
BgL_conditionalz00_bglt BgL_auxz00_10157;
BgL_oz00_1826 = 
(BgL_conditionalz00_bglt)(BgL_oz00_5555); 
BgL_sz00_1827 = BgL_sz00_5556; 
{ /* ./Ast/node.scm 168 */
obj_t BgL_arg4851z00_1830;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10158;
BgL_auxz00_10158 = 
(int)(((long)0)); 
BgL_arg4851z00_1830 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10158); } 
{ /* ./Ast/node.scm 168 */
BgL_objectz00_bglt BgL_auxz00_10161;
BgL_auxz00_10161 = 
(BgL_objectz00_bglt)(BgL_oz00_1826); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10161, BgL_arg4851z00_1830); } } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_v2966z00_1831;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10164;
BgL_auxz00_10164 = 
(int)(((long)1)); 
BgL_v2966z00_1831 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10164); } 
((((BgL_conditionalz00_bglt)CREF(BgL_oz00_1826))->BgL_locz00) = ((obj_t)BgL_v2966z00_1831), BUNSPEC); } 
{ /* ./Ast/node.scm 168 */
BgL_typez00_bglt BgL_v2970z00_1832;
{ /* ./Ast/node.scm 168 */
obj_t BgL_auxz00_10168;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10169;
BgL_auxz00_10169 = 
(int)(((long)2)); 
BgL_auxz00_10168 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10169); } 
BgL_v2970z00_1832 = 
(BgL_typez00_bglt)(BgL_auxz00_10168); } 
((((BgL_conditionalz00_bglt)CREF(BgL_oz00_1826))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v2970z00_1832), BUNSPEC); } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_v2974z00_1833;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10174;
BgL_auxz00_10174 = 
(int)(((long)3)); 
BgL_v2974z00_1833 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10174); } 
((((BgL_conditionalz00_bglt)CREF(BgL_oz00_1826))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v2974z00_1833), BUNSPEC); } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_v2978z00_1834;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10178;
BgL_auxz00_10178 = 
(int)(((long)4)); 
BgL_v2978z00_1834 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10178); } 
((((BgL_conditionalz00_bglt)CREF(BgL_oz00_1826))->BgL_keyz00) = ((obj_t)BgL_v2978z00_1834), BUNSPEC); } 
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_v2982z00_1835;
{ /* ./Ast/node.scm 168 */
obj_t BgL_auxz00_10182;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10183;
BgL_auxz00_10183 = 
(int)(((long)5)); 
BgL_auxz00_10182 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10183); } 
BgL_v2982z00_1835 = 
(BgL_nodez00_bglt)(BgL_auxz00_10182); } 
((((BgL_conditionalz00_bglt)CREF(BgL_oz00_1826))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_v2982z00_1835), BUNSPEC); } 
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_v2986z00_1836;
{ /* ./Ast/node.scm 168 */
obj_t BgL_auxz00_10188;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10189;
BgL_auxz00_10189 = 
(int)(((long)6)); 
BgL_auxz00_10188 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10189); } 
BgL_v2986z00_1836 = 
(BgL_nodez00_bglt)(BgL_auxz00_10188); } 
((((BgL_conditionalz00_bglt)CREF(BgL_oz00_1826))->BgL_truez00) = ((BgL_nodez00_bglt)BgL_v2986z00_1836), BUNSPEC); } 
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_v2990z00_1837;
{ /* ./Ast/node.scm 168 */
obj_t BgL_auxz00_10194;
{ /* ./Ast/node.scm 168 */
int BgL_auxz00_10195;
BgL_auxz00_10195 = 
(int)(((long)7)); 
BgL_auxz00_10194 = 
STRUCT_REF(BgL_sz00_1827, BgL_auxz00_10195); } 
BgL_v2990z00_1837 = 
(BgL_nodez00_bglt)(BgL_auxz00_10194); } 
((((BgL_conditionalz00_bglt)CREF(BgL_oz00_1826))->BgL_falsez00) = ((BgL_nodez00_bglt)BgL_v2990z00_1837), BUNSPEC); } 
BgL_auxz00_10157 = BgL_oz00_1826; 
return 
(obj_t)(BgL_auxz00_10157);} } } 
}



/* object->struct-conditional3588 */
obj_t BGl_objectzd2ze3structzd2conditional3588ze3zzast_nodez00(obj_t BgL_envz00_5557, obj_t BgL_obj2962z00_5558)
{ AN_OBJECT;
{ /* ./Ast/node.scm 168 */
{ 
BgL_conditionalz00_bglt BgL_obj2962z00_1806;
BgL_obj2962z00_1806 = 
(BgL_conditionalz00_bglt)(BgL_obj2962z00_5558); 
{ /* ./Ast/node.scm 168 */
obj_t BgL_res2963z00_1809;
{ /* ./Ast/node.scm 168 */
obj_t BgL_keyz00_3846;int BgL_lenz00_3847;
BgL_keyz00_3846 = 
CNST_TABLE_REF(((long)22)); 
BgL_lenz00_3847 = 
(int)(((long)8)); 
BgL_res2963z00_1809 = 
make_struct(BgL_keyz00_3846, BgL_lenz00_3847, BUNSPEC); } 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3850;
BgL_kz00_3850 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3850, BFALSE); } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_arg4810z00_1811;
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_obj1560z00_3852;
BgL_obj1560z00_3852 = 
(BgL_nodez00_bglt)(BgL_obj2962z00_1806); 
BgL_arg4810z00_1811 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3852))->BgL_locz00); } 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3854;
BgL_kz00_3854 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3854, BgL_arg4810z00_1811); } } 
{ /* ./Ast/node.scm 168 */
BgL_typez00_bglt BgL_arg4815z00_1813;
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_obj1561z00_3856;
BgL_obj1561z00_3856 = 
(BgL_nodez00_bglt)(BgL_obj2962z00_1806); 
BgL_arg4815z00_1813 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3856))->BgL_typez00); } 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3858;obj_t BgL_oz00_3859;
BgL_kz00_3858 = 
(int)(((long)2)); 
BgL_oz00_3859 = 
(obj_t)(BgL_arg4815z00_1813); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3858, BgL_oz00_3859); } } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_arg4820z00_1815;
{ /* ./Ast/node.scm 168 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_3860;
BgL_obj1590z00_3860 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2962z00_1806); 
BgL_arg4820z00_1815 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_3860))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3862;
BgL_kz00_3862 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3862, BgL_arg4820z00_1815); } } 
{ /* ./Ast/node.scm 168 */
obj_t BgL_arg4825z00_1817;
{ /* ./Ast/node.scm 168 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_3864;
BgL_obj1593z00_3864 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj2962z00_1806); 
BgL_arg4825z00_1817 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_3864))->BgL_keyz00); } 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3866;
BgL_kz00_3866 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3866, BgL_arg4825z00_1817); } } 
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_arg4830z00_1819;
BgL_arg4830z00_1819 = 
(((BgL_conditionalz00_bglt)CREF(BgL_obj2962z00_1806))->BgL_testz00); 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3870;obj_t BgL_oz00_3871;
BgL_kz00_3870 = 
(int)(((long)5)); 
BgL_oz00_3871 = 
(obj_t)(BgL_arg4830z00_1819); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3870, BgL_oz00_3871); } } 
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_arg4835z00_1821;
BgL_arg4835z00_1821 = 
(((BgL_conditionalz00_bglt)CREF(BgL_obj2962z00_1806))->BgL_truez00); 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3874;obj_t BgL_oz00_3875;
BgL_kz00_3874 = 
(int)(((long)6)); 
BgL_oz00_3875 = 
(obj_t)(BgL_arg4835z00_1821); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3874, BgL_oz00_3875); } } 
{ /* ./Ast/node.scm 168 */
BgL_nodez00_bglt BgL_arg4840z00_1823;
BgL_arg4840z00_1823 = 
(((BgL_conditionalz00_bglt)CREF(BgL_obj2962z00_1806))->BgL_falsez00); 
{ /* ./Ast/node.scm 168 */
int BgL_kz00_3878;obj_t BgL_oz00_3879;
BgL_kz00_3878 = 
(int)(((long)7)); 
BgL_oz00_3879 = 
(obj_t)(BgL_arg4840z00_1823); 
STRUCT_SET(BgL_res2963z00_1809, BgL_kz00_3878, BgL_oz00_3879); } } 
return BgL_res2963z00_1809;} } } 
}



/* struct+object->object-fail3586 */
obj_t BGl_structzb2objectzd2ze3objectzd2fail3586z51zzast_nodez00(obj_t BgL_envz00_5559, obj_t BgL_oz00_5560, obj_t BgL_sz00_5561)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ 
BgL_failz00_bglt BgL_oz00_1794;obj_t BgL_sz00_1795;
{ /* ./Ast/node.scm 177 */
BgL_failz00_bglt BgL_auxz00_10237;
BgL_oz00_1794 = 
(BgL_failz00_bglt)(BgL_oz00_5560); 
BgL_sz00_1795 = BgL_sz00_5561; 
{ /* ./Ast/node.scm 177 */
obj_t BgL_arg4793z00_1798;
{ /* ./Ast/node.scm 177 */
int BgL_auxz00_10238;
BgL_auxz00_10238 = 
(int)(((long)0)); 
BgL_arg4793z00_1798 = 
STRUCT_REF(BgL_sz00_1795, BgL_auxz00_10238); } 
{ /* ./Ast/node.scm 177 */
BgL_objectz00_bglt BgL_auxz00_10241;
BgL_auxz00_10241 = 
(BgL_objectz00_bglt)(BgL_oz00_1794); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10241, BgL_arg4793z00_1798); } } 
{ /* ./Ast/node.scm 177 */
obj_t BgL_v3030z00_1799;
{ /* ./Ast/node.scm 177 */
int BgL_auxz00_10244;
BgL_auxz00_10244 = 
(int)(((long)1)); 
BgL_v3030z00_1799 = 
STRUCT_REF(BgL_sz00_1795, BgL_auxz00_10244); } 
((((BgL_failz00_bglt)CREF(BgL_oz00_1794))->BgL_locz00) = ((obj_t)BgL_v3030z00_1799), BUNSPEC); } 
{ /* ./Ast/node.scm 177 */
BgL_typez00_bglt BgL_v3034z00_1800;
{ /* ./Ast/node.scm 177 */
obj_t BgL_auxz00_10248;
{ /* ./Ast/node.scm 177 */
int BgL_auxz00_10249;
BgL_auxz00_10249 = 
(int)(((long)2)); 
BgL_auxz00_10248 = 
STRUCT_REF(BgL_sz00_1795, BgL_auxz00_10249); } 
BgL_v3034z00_1800 = 
(BgL_typez00_bglt)(BgL_auxz00_10248); } 
((((BgL_failz00_bglt)CREF(BgL_oz00_1794))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3034z00_1800), BUNSPEC); } 
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_v3038z00_1801;
{ /* ./Ast/node.scm 177 */
obj_t BgL_auxz00_10254;
{ /* ./Ast/node.scm 177 */
int BgL_auxz00_10255;
BgL_auxz00_10255 = 
(int)(((long)3)); 
BgL_auxz00_10254 = 
STRUCT_REF(BgL_sz00_1795, BgL_auxz00_10255); } 
BgL_v3038z00_1801 = 
(BgL_nodez00_bglt)(BgL_auxz00_10254); } 
((((BgL_failz00_bglt)CREF(BgL_oz00_1794))->BgL_procz00) = ((BgL_nodez00_bglt)BgL_v3038z00_1801), BUNSPEC); } 
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_v3042z00_1802;
{ /* ./Ast/node.scm 177 */
obj_t BgL_auxz00_10260;
{ /* ./Ast/node.scm 177 */
int BgL_auxz00_10261;
BgL_auxz00_10261 = 
(int)(((long)4)); 
BgL_auxz00_10260 = 
STRUCT_REF(BgL_sz00_1795, BgL_auxz00_10261); } 
BgL_v3042z00_1802 = 
(BgL_nodez00_bglt)(BgL_auxz00_10260); } 
((((BgL_failz00_bglt)CREF(BgL_oz00_1794))->BgL_msgz00) = ((BgL_nodez00_bglt)BgL_v3042z00_1802), BUNSPEC); } 
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_v3046z00_1803;
{ /* ./Ast/node.scm 177 */
obj_t BgL_auxz00_10266;
{ /* ./Ast/node.scm 177 */
int BgL_auxz00_10267;
BgL_auxz00_10267 = 
(int)(((long)5)); 
BgL_auxz00_10266 = 
STRUCT_REF(BgL_sz00_1795, BgL_auxz00_10267); } 
BgL_v3046z00_1803 = 
(BgL_nodez00_bglt)(BgL_auxz00_10266); } 
((((BgL_failz00_bglt)CREF(BgL_oz00_1794))->BgL_objz00) = ((BgL_nodez00_bglt)BgL_v3046z00_1803), BUNSPEC); } 
BgL_auxz00_10237 = BgL_oz00_1794; 
return 
(obj_t)(BgL_auxz00_10237);} } } 
}



/* object->struct-fail3584 */
obj_t BGl_objectzd2ze3structzd2fail3584ze3zzast_nodez00(obj_t BgL_envz00_5562, obj_t BgL_obj3026z00_5563)
{ AN_OBJECT;
{ /* ./Ast/node.scm 177 */
{ 
BgL_failz00_bglt BgL_obj3026z00_1778;
BgL_obj3026z00_1778 = 
(BgL_failz00_bglt)(BgL_obj3026z00_5563); 
{ /* ./Ast/node.scm 177 */
obj_t BgL_res3027z00_1781;
{ /* ./Ast/node.scm 177 */
obj_t BgL_keyz00_3808;int BgL_lenz00_3809;
BgL_keyz00_3808 = 
CNST_TABLE_REF(((long)23)); 
BgL_lenz00_3809 = 
(int)(((long)6)); 
BgL_res3027z00_1781 = 
make_struct(BgL_keyz00_3808, BgL_lenz00_3809, BUNSPEC); } 
{ /* ./Ast/node.scm 177 */
int BgL_kz00_3812;
BgL_kz00_3812 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3027z00_1781, BgL_kz00_3812, BFALSE); } 
{ /* ./Ast/node.scm 177 */
obj_t BgL_arg4762z00_1783;
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_obj1560z00_3814;
BgL_obj1560z00_3814 = 
(BgL_nodez00_bglt)(BgL_obj3026z00_1778); 
BgL_arg4762z00_1783 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3814))->BgL_locz00); } 
{ /* ./Ast/node.scm 177 */
int BgL_kz00_3816;
BgL_kz00_3816 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3027z00_1781, BgL_kz00_3816, BgL_arg4762z00_1783); } } 
{ /* ./Ast/node.scm 177 */
BgL_typez00_bglt BgL_arg4767z00_1785;
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_obj1561z00_3818;
BgL_obj1561z00_3818 = 
(BgL_nodez00_bglt)(BgL_obj3026z00_1778); 
BgL_arg4767z00_1785 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3818))->BgL_typez00); } 
{ /* ./Ast/node.scm 177 */
int BgL_kz00_3820;obj_t BgL_oz00_3821;
BgL_kz00_3820 = 
(int)(((long)2)); 
BgL_oz00_3821 = 
(obj_t)(BgL_arg4767z00_1785); 
STRUCT_SET(BgL_res3027z00_1781, BgL_kz00_3820, BgL_oz00_3821); } } 
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_arg4772z00_1787;
BgL_arg4772z00_1787 = 
(((BgL_failz00_bglt)CREF(BgL_obj3026z00_1778))->BgL_procz00); 
{ /* ./Ast/node.scm 177 */
int BgL_kz00_3824;obj_t BgL_oz00_3825;
BgL_kz00_3824 = 
(int)(((long)3)); 
BgL_oz00_3825 = 
(obj_t)(BgL_arg4772z00_1787); 
STRUCT_SET(BgL_res3027z00_1781, BgL_kz00_3824, BgL_oz00_3825); } } 
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_arg4777z00_1789;
BgL_arg4777z00_1789 = 
(((BgL_failz00_bglt)CREF(BgL_obj3026z00_1778))->BgL_msgz00); 
{ /* ./Ast/node.scm 177 */
int BgL_kz00_3828;obj_t BgL_oz00_3829;
BgL_kz00_3828 = 
(int)(((long)4)); 
BgL_oz00_3829 = 
(obj_t)(BgL_arg4777z00_1789); 
STRUCT_SET(BgL_res3027z00_1781, BgL_kz00_3828, BgL_oz00_3829); } } 
{ /* ./Ast/node.scm 177 */
BgL_nodez00_bglt BgL_arg4782z00_1791;
BgL_arg4782z00_1791 = 
(((BgL_failz00_bglt)CREF(BgL_obj3026z00_1778))->BgL_objz00); 
{ /* ./Ast/node.scm 177 */
int BgL_kz00_3832;obj_t BgL_oz00_3833;
BgL_kz00_3832 = 
(int)(((long)5)); 
BgL_oz00_3833 = 
(obj_t)(BgL_arg4782z00_1791); 
STRUCT_SET(BgL_res3027z00_1781, BgL_kz00_3832, BgL_oz00_3833); } } 
return BgL_res3027z00_1781;} } } 
}



/* struct+object->object-select3582 */
obj_t BGl_structzb2objectzd2ze3objectzd2select3582z51zzast_nodez00(obj_t BgL_envz00_5564, obj_t BgL_oz00_5565, obj_t BgL_sz00_5566)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ 
BgL_selectz00_bglt BgL_oz00_1764;obj_t BgL_sz00_1765;
{ /* ./Ast/node.scm 184 */
BgL_selectz00_bglt BgL_auxz00_10301;
BgL_oz00_1764 = 
(BgL_selectz00_bglt)(BgL_oz00_5565); 
BgL_sz00_1765 = BgL_sz00_5566; 
{ /* ./Ast/node.scm 184 */
obj_t BgL_arg4743z00_1768;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10302;
BgL_auxz00_10302 = 
(int)(((long)0)); 
BgL_arg4743z00_1768 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10302); } 
{ /* ./Ast/node.scm 184 */
BgL_objectz00_bglt BgL_auxz00_10305;
BgL_auxz00_10305 = 
(BgL_objectz00_bglt)(BgL_oz00_1764); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10305, BgL_arg4743z00_1768); } } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_v3095z00_1769;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10308;
BgL_auxz00_10308 = 
(int)(((long)1)); 
BgL_v3095z00_1769 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10308); } 
((((BgL_selectz00_bglt)CREF(BgL_oz00_1764))->BgL_locz00) = ((obj_t)BgL_v3095z00_1769), BUNSPEC); } 
{ /* ./Ast/node.scm 184 */
BgL_typez00_bglt BgL_v3099z00_1770;
{ /* ./Ast/node.scm 184 */
obj_t BgL_auxz00_10312;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10313;
BgL_auxz00_10313 = 
(int)(((long)2)); 
BgL_auxz00_10312 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10313); } 
BgL_v3099z00_1770 = 
(BgL_typez00_bglt)(BgL_auxz00_10312); } 
((((BgL_selectz00_bglt)CREF(BgL_oz00_1764))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3099z00_1770), BUNSPEC); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_v3103z00_1771;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10318;
BgL_auxz00_10318 = 
(int)(((long)3)); 
BgL_v3103z00_1771 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10318); } 
((((BgL_selectz00_bglt)CREF(BgL_oz00_1764))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v3103z00_1771), BUNSPEC); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_v3107z00_1772;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10322;
BgL_auxz00_10322 = 
(int)(((long)4)); 
BgL_v3107z00_1772 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10322); } 
((((BgL_selectz00_bglt)CREF(BgL_oz00_1764))->BgL_keyz00) = ((obj_t)BgL_v3107z00_1772), BUNSPEC); } 
{ /* ./Ast/node.scm 184 */
BgL_nodez00_bglt BgL_v3111z00_1773;
{ /* ./Ast/node.scm 184 */
obj_t BgL_auxz00_10326;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10327;
BgL_auxz00_10327 = 
(int)(((long)5)); 
BgL_auxz00_10326 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10327); } 
BgL_v3111z00_1773 = 
(BgL_nodez00_bglt)(BgL_auxz00_10326); } 
((((BgL_selectz00_bglt)CREF(BgL_oz00_1764))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_v3111z00_1773), BUNSPEC); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_v3115z00_1774;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10332;
BgL_auxz00_10332 = 
(int)(((long)6)); 
BgL_v3115z00_1774 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10332); } 
((((BgL_selectz00_bglt)CREF(BgL_oz00_1764))->BgL_clausesz00) = ((obj_t)BgL_v3115z00_1774), BUNSPEC); } 
{ /* ./Ast/node.scm 184 */
BgL_typez00_bglt BgL_v3119z00_1775;
{ /* ./Ast/node.scm 184 */
obj_t BgL_auxz00_10336;
{ /* ./Ast/node.scm 184 */
int BgL_auxz00_10337;
BgL_auxz00_10337 = 
(int)(((long)7)); 
BgL_auxz00_10336 = 
STRUCT_REF(BgL_sz00_1765, BgL_auxz00_10337); } 
BgL_v3119z00_1775 = 
(BgL_typez00_bglt)(BgL_auxz00_10336); } 
((((BgL_selectz00_bglt)CREF(BgL_oz00_1764))->BgL_itemzd2typezd2) = ((BgL_typez00_bglt)BgL_v3119z00_1775), BUNSPEC); } 
BgL_auxz00_10301 = BgL_oz00_1764; 
return 
(obj_t)(BgL_auxz00_10301);} } } 
}



/* object->struct-select3580 */
obj_t BGl_objectzd2ze3structzd2select3580ze3zzast_nodez00(obj_t BgL_envz00_5567, obj_t BgL_obj3091z00_5568)
{ AN_OBJECT;
{ /* ./Ast/node.scm 184 */
{ 
BgL_selectz00_bglt BgL_obj3091z00_1744;
BgL_obj3091z00_1744 = 
(BgL_selectz00_bglt)(BgL_obj3091z00_5568); 
{ /* ./Ast/node.scm 184 */
obj_t BgL_res3092z00_1747;
{ /* ./Ast/node.scm 184 */
obj_t BgL_keyz00_3758;int BgL_lenz00_3759;
BgL_keyz00_3758 = 
CNST_TABLE_REF(((long)24)); 
BgL_lenz00_3759 = 
(int)(((long)8)); 
BgL_res3092z00_1747 = 
make_struct(BgL_keyz00_3758, BgL_lenz00_3759, BUNSPEC); } 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3762;
BgL_kz00_3762 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3762, BFALSE); } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_arg4702z00_1749;
{ /* ./Ast/node.scm 184 */
BgL_nodez00_bglt BgL_obj1560z00_3764;
BgL_obj1560z00_3764 = 
(BgL_nodez00_bglt)(BgL_obj3091z00_1744); 
BgL_arg4702z00_1749 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3764))->BgL_locz00); } 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3766;
BgL_kz00_3766 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3766, BgL_arg4702z00_1749); } } 
{ /* ./Ast/node.scm 184 */
BgL_typez00_bglt BgL_arg4707z00_1751;
{ /* ./Ast/node.scm 184 */
BgL_nodez00_bglt BgL_obj1561z00_3768;
BgL_obj1561z00_3768 = 
(BgL_nodez00_bglt)(BgL_obj3091z00_1744); 
BgL_arg4707z00_1751 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3768))->BgL_typez00); } 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3770;obj_t BgL_oz00_3771;
BgL_kz00_3770 = 
(int)(((long)2)); 
BgL_oz00_3771 = 
(obj_t)(BgL_arg4707z00_1751); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3770, BgL_oz00_3771); } } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_arg4712z00_1753;
{ /* ./Ast/node.scm 184 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_3772;
BgL_obj1590z00_3772 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3091z00_1744); 
BgL_arg4712z00_1753 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_3772))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3774;
BgL_kz00_3774 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3774, BgL_arg4712z00_1753); } } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_arg4717z00_1755;
{ /* ./Ast/node.scm 184 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_3776;
BgL_obj1593z00_3776 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3091z00_1744); 
BgL_arg4717z00_1755 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_3776))->BgL_keyz00); } 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3778;
BgL_kz00_3778 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3778, BgL_arg4717z00_1755); } } 
{ /* ./Ast/node.scm 184 */
BgL_nodez00_bglt BgL_arg4722z00_1757;
BgL_arg4722z00_1757 = 
(((BgL_selectz00_bglt)CREF(BgL_obj3091z00_1744))->BgL_testz00); 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3782;obj_t BgL_oz00_3783;
BgL_kz00_3782 = 
(int)(((long)5)); 
BgL_oz00_3783 = 
(obj_t)(BgL_arg4722z00_1757); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3782, BgL_oz00_3783); } } 
{ /* ./Ast/node.scm 184 */
obj_t BgL_arg4727z00_1759;
BgL_arg4727z00_1759 = 
(((BgL_selectz00_bglt)CREF(BgL_obj3091z00_1744))->BgL_clausesz00); 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3786;
BgL_kz00_3786 = 
(int)(((long)6)); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3786, BgL_arg4727z00_1759); } } 
{ /* ./Ast/node.scm 184 */
BgL_typez00_bglt BgL_arg4732z00_1761;
BgL_arg4732z00_1761 = 
(((BgL_selectz00_bglt)CREF(BgL_obj3091z00_1744))->BgL_itemzd2typezd2); 
{ /* ./Ast/node.scm 184 */
int BgL_kz00_3790;obj_t BgL_oz00_3791;
BgL_kz00_3790 = 
(int)(((long)7)); 
BgL_oz00_3791 = 
(obj_t)(BgL_arg4732z00_1761); 
STRUCT_SET(BgL_res3092z00_1747, BgL_kz00_3790, BgL_oz00_3791); } } 
return BgL_res3092z00_1747;} } } 
}



/* struct+object->object-let-fun3578 */
obj_t BGl_structzb2objectzd2ze3objectzd2letzd2fun3578z83zzast_nodez00(obj_t BgL_envz00_5569, obj_t BgL_oz00_5570, obj_t BgL_sz00_5571)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ 
BgL_letzd2funzd2_bglt BgL_oz00_1731;obj_t BgL_sz00_1732;
{ /* ./Ast/node.scm 193 */
BgL_letzd2funzd2_bglt BgL_auxz00_10378;
BgL_oz00_1731 = 
(BgL_letzd2funzd2_bglt)(BgL_oz00_5570); 
BgL_sz00_1732 = BgL_sz00_5571; 
{ /* ./Ast/node.scm 193 */
obj_t BgL_arg4684z00_1735;
{ /* ./Ast/node.scm 193 */
int BgL_auxz00_10379;
BgL_auxz00_10379 = 
(int)(((long)0)); 
BgL_arg4684z00_1735 = 
STRUCT_REF(BgL_sz00_1732, BgL_auxz00_10379); } 
{ /* ./Ast/node.scm 193 */
BgL_objectz00_bglt BgL_auxz00_10382;
BgL_auxz00_10382 = 
(BgL_objectz00_bglt)(BgL_oz00_1731); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10382, BgL_arg4684z00_1735); } } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_v3168z00_1736;
{ /* ./Ast/node.scm 193 */
int BgL_auxz00_10385;
BgL_auxz00_10385 = 
(int)(((long)1)); 
BgL_v3168z00_1736 = 
STRUCT_REF(BgL_sz00_1732, BgL_auxz00_10385); } 
((((BgL_letzd2funzd2_bglt)CREF(BgL_oz00_1731))->BgL_locz00) = ((obj_t)BgL_v3168z00_1736), BUNSPEC); } 
{ /* ./Ast/node.scm 193 */
BgL_typez00_bglt BgL_v3172z00_1737;
{ /* ./Ast/node.scm 193 */
obj_t BgL_auxz00_10389;
{ /* ./Ast/node.scm 193 */
int BgL_auxz00_10390;
BgL_auxz00_10390 = 
(int)(((long)2)); 
BgL_auxz00_10389 = 
STRUCT_REF(BgL_sz00_1732, BgL_auxz00_10390); } 
BgL_v3172z00_1737 = 
(BgL_typez00_bglt)(BgL_auxz00_10389); } 
((((BgL_letzd2funzd2_bglt)CREF(BgL_oz00_1731))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3172z00_1737), BUNSPEC); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_v3176z00_1738;
{ /* ./Ast/node.scm 193 */
int BgL_auxz00_10395;
BgL_auxz00_10395 = 
(int)(((long)3)); 
BgL_v3176z00_1738 = 
STRUCT_REF(BgL_sz00_1732, BgL_auxz00_10395); } 
((((BgL_letzd2funzd2_bglt)CREF(BgL_oz00_1731))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v3176z00_1738), BUNSPEC); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_v3180z00_1739;
{ /* ./Ast/node.scm 193 */
int BgL_auxz00_10399;
BgL_auxz00_10399 = 
(int)(((long)4)); 
BgL_v3180z00_1739 = 
STRUCT_REF(BgL_sz00_1732, BgL_auxz00_10399); } 
((((BgL_letzd2funzd2_bglt)CREF(BgL_oz00_1731))->BgL_keyz00) = ((obj_t)BgL_v3180z00_1739), BUNSPEC); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_v3184z00_1740;
{ /* ./Ast/node.scm 193 */
int BgL_auxz00_10403;
BgL_auxz00_10403 = 
(int)(((long)5)); 
BgL_v3184z00_1740 = 
STRUCT_REF(BgL_sz00_1732, BgL_auxz00_10403); } 
((((BgL_letzd2funzd2_bglt)CREF(BgL_oz00_1731))->BgL_localsz00) = ((obj_t)BgL_v3184z00_1740), BUNSPEC); } 
{ /* ./Ast/node.scm 193 */
BgL_nodez00_bglt BgL_v3188z00_1741;
{ /* ./Ast/node.scm 193 */
obj_t BgL_auxz00_10407;
{ /* ./Ast/node.scm 193 */
int BgL_auxz00_10408;
BgL_auxz00_10408 = 
(int)(((long)6)); 
BgL_auxz00_10407 = 
STRUCT_REF(BgL_sz00_1732, BgL_auxz00_10408); } 
BgL_v3188z00_1741 = 
(BgL_nodez00_bglt)(BgL_auxz00_10407); } 
((((BgL_letzd2funzd2_bglt)CREF(BgL_oz00_1731))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_v3188z00_1741), BUNSPEC); } 
BgL_auxz00_10378 = BgL_oz00_1731; 
return 
(obj_t)(BgL_auxz00_10378);} } } 
}



/* object->struct-let-fun3576 */
obj_t BGl_objectzd2ze3structzd2letzd2fun3576z31zzast_nodez00(obj_t BgL_envz00_5572, obj_t BgL_obj3164z00_5573)
{ AN_OBJECT;
{ /* ./Ast/node.scm 193 */
{ 
BgL_letzd2funzd2_bglt BgL_obj3164z00_1713;
BgL_obj3164z00_1713 = 
(BgL_letzd2funzd2_bglt)(BgL_obj3164z00_5573); 
{ /* ./Ast/node.scm 193 */
obj_t BgL_res3165z00_1716;
{ /* ./Ast/node.scm 193 */
obj_t BgL_keyz00_3714;int BgL_lenz00_3715;
BgL_keyz00_3714 = 
CNST_TABLE_REF(((long)25)); 
BgL_lenz00_3715 = 
(int)(((long)7)); 
BgL_res3165z00_1716 = 
make_struct(BgL_keyz00_3714, BgL_lenz00_3715, BUNSPEC); } 
{ /* ./Ast/node.scm 193 */
int BgL_kz00_3718;
BgL_kz00_3718 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3165z00_1716, BgL_kz00_3718, BFALSE); } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_arg4648z00_1718;
{ /* ./Ast/node.scm 193 */
BgL_nodez00_bglt BgL_obj1560z00_3720;
BgL_obj1560z00_3720 = 
(BgL_nodez00_bglt)(BgL_obj3164z00_1713); 
BgL_arg4648z00_1718 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3720))->BgL_locz00); } 
{ /* ./Ast/node.scm 193 */
int BgL_kz00_3722;
BgL_kz00_3722 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3165z00_1716, BgL_kz00_3722, BgL_arg4648z00_1718); } } 
{ /* ./Ast/node.scm 193 */
BgL_typez00_bglt BgL_arg4653z00_1720;
{ /* ./Ast/node.scm 193 */
BgL_nodez00_bglt BgL_obj1561z00_3724;
BgL_obj1561z00_3724 = 
(BgL_nodez00_bglt)(BgL_obj3164z00_1713); 
BgL_arg4653z00_1720 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3724))->BgL_typez00); } 
{ /* ./Ast/node.scm 193 */
int BgL_kz00_3726;obj_t BgL_oz00_3727;
BgL_kz00_3726 = 
(int)(((long)2)); 
BgL_oz00_3727 = 
(obj_t)(BgL_arg4653z00_1720); 
STRUCT_SET(BgL_res3165z00_1716, BgL_kz00_3726, BgL_oz00_3727); } } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_arg4658z00_1722;
{ /* ./Ast/node.scm 193 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_3728;
BgL_obj1590z00_3728 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3164z00_1713); 
BgL_arg4658z00_1722 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_3728))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 193 */
int BgL_kz00_3730;
BgL_kz00_3730 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res3165z00_1716, BgL_kz00_3730, BgL_arg4658z00_1722); } } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_arg4663z00_1724;
{ /* ./Ast/node.scm 193 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_3732;
BgL_obj1593z00_3732 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3164z00_1713); 
BgL_arg4663z00_1724 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_3732))->BgL_keyz00); } 
{ /* ./Ast/node.scm 193 */
int BgL_kz00_3734;
BgL_kz00_3734 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res3165z00_1716, BgL_kz00_3734, BgL_arg4663z00_1724); } } 
{ /* ./Ast/node.scm 193 */
obj_t BgL_arg4668z00_1726;
BgL_arg4668z00_1726 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_obj3164z00_1713))->BgL_localsz00); 
{ /* ./Ast/node.scm 193 */
int BgL_kz00_3738;
BgL_kz00_3738 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res3165z00_1716, BgL_kz00_3738, BgL_arg4668z00_1726); } } 
{ /* ./Ast/node.scm 193 */
BgL_nodez00_bglt BgL_arg4673z00_1728;
BgL_arg4673z00_1728 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_obj3164z00_1713))->BgL_bodyz00); 
{ /* ./Ast/node.scm 193 */
int BgL_kz00_3742;obj_t BgL_oz00_3743;
BgL_kz00_3742 = 
(int)(((long)6)); 
BgL_oz00_3743 = 
(obj_t)(BgL_arg4673z00_1728); 
STRUCT_SET(BgL_res3165z00_1716, BgL_kz00_3742, BgL_oz00_3743); } } 
return BgL_res3165z00_1716;} } } 
}



/* struct+object->object-let-var3574 */
obj_t BGl_structzb2objectzd2ze3objectzd2letzd2var3574z83zzast_nodez00(obj_t BgL_envz00_5574, obj_t BgL_oz00_5575, obj_t BgL_sz00_5576)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ 
BgL_letzd2varzd2_bglt BgL_oz00_1699;obj_t BgL_sz00_1700;
{ /* ./Ast/node.scm 200 */
BgL_letzd2varzd2_bglt BgL_auxz00_10445;
BgL_oz00_1699 = 
(BgL_letzd2varzd2_bglt)(BgL_oz00_5575); 
BgL_sz00_1700 = BgL_sz00_5576; 
{ /* ./Ast/node.scm 200 */
obj_t BgL_arg4629z00_1703;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10446;
BgL_auxz00_10446 = 
(int)(((long)0)); 
BgL_arg4629z00_1703 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10446); } 
{ /* ./Ast/node.scm 200 */
BgL_objectz00_bglt BgL_auxz00_10449;
BgL_auxz00_10449 = 
(BgL_objectz00_bglt)(BgL_oz00_1699); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10449, BgL_arg4629z00_1703); } } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_v3240z00_1704;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10452;
BgL_auxz00_10452 = 
(int)(((long)1)); 
BgL_v3240z00_1704 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10452); } 
((((BgL_letzd2varzd2_bglt)CREF(BgL_oz00_1699))->BgL_locz00) = ((obj_t)BgL_v3240z00_1704), BUNSPEC); } 
{ /* ./Ast/node.scm 200 */
BgL_typez00_bglt BgL_v3244z00_1705;
{ /* ./Ast/node.scm 200 */
obj_t BgL_auxz00_10456;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10457;
BgL_auxz00_10457 = 
(int)(((long)2)); 
BgL_auxz00_10456 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10457); } 
BgL_v3244z00_1705 = 
(BgL_typez00_bglt)(BgL_auxz00_10456); } 
((((BgL_letzd2varzd2_bglt)CREF(BgL_oz00_1699))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3244z00_1705), BUNSPEC); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_v3248z00_1706;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10462;
BgL_auxz00_10462 = 
(int)(((long)3)); 
BgL_v3248z00_1706 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10462); } 
((((BgL_letzd2varzd2_bglt)CREF(BgL_oz00_1699))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v3248z00_1706), BUNSPEC); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_v3252z00_1707;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10466;
BgL_auxz00_10466 = 
(int)(((long)4)); 
BgL_v3252z00_1707 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10466); } 
((((BgL_letzd2varzd2_bglt)CREF(BgL_oz00_1699))->BgL_keyz00) = ((obj_t)BgL_v3252z00_1707), BUNSPEC); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_v3256z00_1708;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10470;
BgL_auxz00_10470 = 
(int)(((long)5)); 
BgL_v3256z00_1708 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10470); } 
((((BgL_letzd2varzd2_bglt)CREF(BgL_oz00_1699))->BgL_bindingsz00) = ((obj_t)BgL_v3256z00_1708), BUNSPEC); } 
{ /* ./Ast/node.scm 200 */
BgL_nodez00_bglt BgL_v3260z00_1709;
{ /* ./Ast/node.scm 200 */
obj_t BgL_auxz00_10474;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10475;
BgL_auxz00_10475 = 
(int)(((long)6)); 
BgL_auxz00_10474 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10475); } 
BgL_v3260z00_1709 = 
(BgL_nodez00_bglt)(BgL_auxz00_10474); } 
((((BgL_letzd2varzd2_bglt)CREF(BgL_oz00_1699))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_v3260z00_1709), BUNSPEC); } 
{ /* ./Ast/node.scm 200 */
bool_t BgL_v3264z00_1710;
{ /* ./Ast/node.scm 200 */
obj_t BgL_auxz00_10480;
{ /* ./Ast/node.scm 200 */
int BgL_auxz00_10481;
BgL_auxz00_10481 = 
(int)(((long)7)); 
BgL_auxz00_10480 = 
STRUCT_REF(BgL_sz00_1700, BgL_auxz00_10481); } 
BgL_v3264z00_1710 = 
CBOOL(BgL_auxz00_10480); } 
((((BgL_letzd2varzd2_bglt)CREF(BgL_oz00_1699))->BgL_removablezf3zf3) = ((bool_t)BgL_v3264z00_1710), BUNSPEC); } 
BgL_auxz00_10445 = BgL_oz00_1699; 
return 
(obj_t)(BgL_auxz00_10445);} } } 
}



/* object->struct-let-var3572 */
obj_t BGl_objectzd2ze3structzd2letzd2var3572z31zzast_nodez00(obj_t BgL_envz00_5577, obj_t BgL_obj3236z00_5578)
{ AN_OBJECT;
{ /* ./Ast/node.scm 200 */
{ 
BgL_letzd2varzd2_bglt BgL_obj3236z00_1679;
BgL_obj3236z00_1679 = 
(BgL_letzd2varzd2_bglt)(BgL_obj3236z00_5578); 
{ /* ./Ast/node.scm 200 */
obj_t BgL_res3237z00_1682;
{ /* ./Ast/node.scm 200 */
obj_t BgL_keyz00_3664;int BgL_lenz00_3665;
BgL_keyz00_3664 = 
CNST_TABLE_REF(((long)26)); 
BgL_lenz00_3665 = 
(int)(((long)8)); 
BgL_res3237z00_1682 = 
make_struct(BgL_keyz00_3664, BgL_lenz00_3665, BUNSPEC); } 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3668;
BgL_kz00_3668 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3668, BFALSE); } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_arg4588z00_1684;
{ /* ./Ast/node.scm 200 */
BgL_nodez00_bglt BgL_obj1560z00_3670;
BgL_obj1560z00_3670 = 
(BgL_nodez00_bglt)(BgL_obj3236z00_1679); 
BgL_arg4588z00_1684 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3670))->BgL_locz00); } 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3672;
BgL_kz00_3672 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3672, BgL_arg4588z00_1684); } } 
{ /* ./Ast/node.scm 200 */
BgL_typez00_bglt BgL_arg4593z00_1686;
{ /* ./Ast/node.scm 200 */
BgL_nodez00_bglt BgL_obj1561z00_3674;
BgL_obj1561z00_3674 = 
(BgL_nodez00_bglt)(BgL_obj3236z00_1679); 
BgL_arg4593z00_1686 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3674))->BgL_typez00); } 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3676;obj_t BgL_oz00_3677;
BgL_kz00_3676 = 
(int)(((long)2)); 
BgL_oz00_3677 = 
(obj_t)(BgL_arg4593z00_1686); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3676, BgL_oz00_3677); } } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_arg4598z00_1688;
{ /* ./Ast/node.scm 200 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_3678;
BgL_obj1590z00_3678 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3236z00_1679); 
BgL_arg4598z00_1688 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_3678))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3680;
BgL_kz00_3680 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3680, BgL_arg4598z00_1688); } } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_arg4603z00_1690;
{ /* ./Ast/node.scm 200 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_3682;
BgL_obj1593z00_3682 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3236z00_1679); 
BgL_arg4603z00_1690 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_3682))->BgL_keyz00); } 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3684;
BgL_kz00_3684 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3684, BgL_arg4603z00_1690); } } 
{ /* ./Ast/node.scm 200 */
obj_t BgL_arg4608z00_1692;
BgL_arg4608z00_1692 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_obj3236z00_1679))->BgL_bindingsz00); 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3688;
BgL_kz00_3688 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3688, BgL_arg4608z00_1692); } } 
{ /* ./Ast/node.scm 200 */
BgL_nodez00_bglt BgL_arg4613z00_1694;
BgL_arg4613z00_1694 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_obj3236z00_1679))->BgL_bodyz00); 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3692;obj_t BgL_oz00_3693;
BgL_kz00_3692 = 
(int)(((long)6)); 
BgL_oz00_3693 = 
(obj_t)(BgL_arg4613z00_1694); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3692, BgL_oz00_3693); } } 
{ /* ./Ast/node.scm 200 */
bool_t BgL_arg4618z00_1696;
BgL_arg4618z00_1696 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_obj3236z00_1679))->BgL_removablezf3zf3); 
{ /* ./Ast/node.scm 200 */
int BgL_kz00_3696;obj_t BgL_oz00_3697;
BgL_kz00_3696 = 
(int)(((long)7)); 
BgL_oz00_3697 = 
BBOOL(BgL_arg4618z00_1696); 
STRUCT_SET(BgL_res3237z00_1682, BgL_kz00_3696, BgL_oz00_3697); } } 
return BgL_res3237z00_1682;} } } 
}



/* struct+object->object-set-ex-it3570 */
obj_t BGl_structzb2objectzd2ze3objectzd2setzd2exzd2it3570z51zzast_nodez00(obj_t BgL_envz00_5579, obj_t BgL_oz00_5580, obj_t BgL_sz00_5581)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_oz00_1668;obj_t BgL_sz00_1669;
{ /* ./Ast/node.scm 209 */
BgL_setzd2exzd2itz00_bglt BgL_auxz00_10522;
BgL_oz00_1668 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_oz00_5580); 
BgL_sz00_1669 = BgL_sz00_5581; 
{ /* ./Ast/node.scm 209 */
obj_t BgL_arg4572z00_1672;
{ /* ./Ast/node.scm 209 */
int BgL_auxz00_10523;
BgL_auxz00_10523 = 
(int)(((long)0)); 
BgL_arg4572z00_1672 = 
STRUCT_REF(BgL_sz00_1669, BgL_auxz00_10523); } 
{ /* ./Ast/node.scm 209 */
BgL_objectz00_bglt BgL_auxz00_10526;
BgL_auxz00_10526 = 
(BgL_objectz00_bglt)(BgL_oz00_1668); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10526, BgL_arg4572z00_1672); } } 
{ /* ./Ast/node.scm 209 */
obj_t BgL_v3298z00_1673;
{ /* ./Ast/node.scm 209 */
int BgL_auxz00_10529;
BgL_auxz00_10529 = 
(int)(((long)1)); 
BgL_v3298z00_1673 = 
STRUCT_REF(BgL_sz00_1669, BgL_auxz00_10529); } 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_oz00_1668))->BgL_locz00) = ((obj_t)BgL_v3298z00_1673), BUNSPEC); } 
{ /* ./Ast/node.scm 209 */
BgL_typez00_bglt BgL_v3302z00_1674;
{ /* ./Ast/node.scm 209 */
obj_t BgL_auxz00_10533;
{ /* ./Ast/node.scm 209 */
int BgL_auxz00_10534;
BgL_auxz00_10534 = 
(int)(((long)2)); 
BgL_auxz00_10533 = 
STRUCT_REF(BgL_sz00_1669, BgL_auxz00_10534); } 
BgL_v3302z00_1674 = 
(BgL_typez00_bglt)(BgL_auxz00_10533); } 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_oz00_1668))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3302z00_1674), BUNSPEC); } 
{ /* ./Ast/node.scm 209 */
BgL_varz00_bglt BgL_v3306z00_1675;
{ /* ./Ast/node.scm 209 */
obj_t BgL_auxz00_10539;
{ /* ./Ast/node.scm 209 */
int BgL_auxz00_10540;
BgL_auxz00_10540 = 
(int)(((long)3)); 
BgL_auxz00_10539 = 
STRUCT_REF(BgL_sz00_1669, BgL_auxz00_10540); } 
BgL_v3306z00_1675 = 
(BgL_varz00_bglt)(BgL_auxz00_10539); } 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_oz00_1668))->BgL_varz00) = ((BgL_varz00_bglt)BgL_v3306z00_1675), BUNSPEC); } 
{ /* ./Ast/node.scm 209 */
BgL_nodez00_bglt BgL_v3310z00_1676;
{ /* ./Ast/node.scm 209 */
obj_t BgL_auxz00_10545;
{ /* ./Ast/node.scm 209 */
int BgL_auxz00_10546;
BgL_auxz00_10546 = 
(int)(((long)4)); 
BgL_auxz00_10545 = 
STRUCT_REF(BgL_sz00_1669, BgL_auxz00_10546); } 
BgL_v3310z00_1676 = 
(BgL_nodez00_bglt)(BgL_auxz00_10545); } 
((((BgL_setzd2exzd2itz00_bglt)CREF(BgL_oz00_1668))->BgL_bodyz00) = ((BgL_nodez00_bglt)BgL_v3310z00_1676), BUNSPEC); } 
BgL_auxz00_10522 = BgL_oz00_1668; 
return 
(obj_t)(BgL_auxz00_10522);} } } 
}



/* object->struct-set-ex-it3568 */
obj_t BGl_objectzd2ze3structzd2setzd2exzd2it3568ze3zzast_nodez00(obj_t BgL_envz00_5582, obj_t BgL_obj3294z00_5583)
{ AN_OBJECT;
{ /* ./Ast/node.scm 209 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_obj3294z00_1654;
BgL_obj3294z00_1654 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_obj3294z00_5583); 
{ /* ./Ast/node.scm 209 */
obj_t BgL_res3295z00_1657;
{ /* ./Ast/node.scm 209 */
obj_t BgL_keyz00_3632;int BgL_lenz00_3633;
BgL_keyz00_3632 = 
CNST_TABLE_REF(((long)27)); 
BgL_lenz00_3633 = 
(int)(((long)5)); 
BgL_res3295z00_1657 = 
make_struct(BgL_keyz00_3632, BgL_lenz00_3633, BUNSPEC); } 
{ /* ./Ast/node.scm 209 */
int BgL_kz00_3636;
BgL_kz00_3636 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3295z00_1657, BgL_kz00_3636, BFALSE); } 
{ /* ./Ast/node.scm 209 */
obj_t BgL_arg4546z00_1659;
{ /* ./Ast/node.scm 209 */
BgL_nodez00_bglt BgL_obj1560z00_3638;
BgL_obj1560z00_3638 = 
(BgL_nodez00_bglt)(BgL_obj3294z00_1654); 
BgL_arg4546z00_1659 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3638))->BgL_locz00); } 
{ /* ./Ast/node.scm 209 */
int BgL_kz00_3640;
BgL_kz00_3640 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3295z00_1657, BgL_kz00_3640, BgL_arg4546z00_1659); } } 
{ /* ./Ast/node.scm 209 */
BgL_typez00_bglt BgL_arg4551z00_1661;
{ /* ./Ast/node.scm 209 */
BgL_nodez00_bglt BgL_obj1561z00_3642;
BgL_obj1561z00_3642 = 
(BgL_nodez00_bglt)(BgL_obj3294z00_1654); 
BgL_arg4551z00_1661 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3642))->BgL_typez00); } 
{ /* ./Ast/node.scm 209 */
int BgL_kz00_3644;obj_t BgL_oz00_3645;
BgL_kz00_3644 = 
(int)(((long)2)); 
BgL_oz00_3645 = 
(obj_t)(BgL_arg4551z00_1661); 
STRUCT_SET(BgL_res3295z00_1657, BgL_kz00_3644, BgL_oz00_3645); } } 
{ /* ./Ast/node.scm 209 */
BgL_varz00_bglt BgL_arg4556z00_1663;
BgL_arg4556z00_1663 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_obj3294z00_1654))->BgL_varz00); 
{ /* ./Ast/node.scm 209 */
int BgL_kz00_3648;obj_t BgL_oz00_3649;
BgL_kz00_3648 = 
(int)(((long)3)); 
BgL_oz00_3649 = 
(obj_t)(BgL_arg4556z00_1663); 
STRUCT_SET(BgL_res3295z00_1657, BgL_kz00_3648, BgL_oz00_3649); } } 
{ /* ./Ast/node.scm 209 */
BgL_nodez00_bglt BgL_arg4561z00_1665;
BgL_arg4561z00_1665 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_obj3294z00_1654))->BgL_bodyz00); 
{ /* ./Ast/node.scm 209 */
int BgL_kz00_3652;obj_t BgL_oz00_3653;
BgL_kz00_3652 = 
(int)(((long)4)); 
BgL_oz00_3653 = 
(obj_t)(BgL_arg4561z00_1665); 
STRUCT_SET(BgL_res3295z00_1657, BgL_kz00_3652, BgL_oz00_3653); } } 
return BgL_res3295z00_1657;} } } 
}



/* struct+object->object-jump-ex-it3566 */
obj_t BGl_structzb2objectzd2ze3objectzd2jumpzd2exzd2it3566z51zzast_nodez00(obj_t BgL_envz00_5584, obj_t BgL_oz00_5585, obj_t BgL_sz00_5586)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_oz00_1643;obj_t BgL_sz00_1644;
{ /* ./Ast/node.scm 216 */
BgL_jumpzd2exzd2itz00_bglt BgL_auxz00_10576;
BgL_oz00_1643 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_oz00_5585); 
BgL_sz00_1644 = BgL_sz00_5586; 
{ /* ./Ast/node.scm 216 */
obj_t BgL_arg4530z00_1647;
{ /* ./Ast/node.scm 216 */
int BgL_auxz00_10577;
BgL_auxz00_10577 = 
(int)(((long)0)); 
BgL_arg4530z00_1647 = 
STRUCT_REF(BgL_sz00_1644, BgL_auxz00_10577); } 
{ /* ./Ast/node.scm 216 */
BgL_objectz00_bglt BgL_auxz00_10580;
BgL_auxz00_10580 = 
(BgL_objectz00_bglt)(BgL_oz00_1643); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10580, BgL_arg4530z00_1647); } } 
{ /* ./Ast/node.scm 216 */
obj_t BgL_v3345z00_1648;
{ /* ./Ast/node.scm 216 */
int BgL_auxz00_10583;
BgL_auxz00_10583 = 
(int)(((long)1)); 
BgL_v3345z00_1648 = 
STRUCT_REF(BgL_sz00_1644, BgL_auxz00_10583); } 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_oz00_1643))->BgL_locz00) = ((obj_t)BgL_v3345z00_1648), BUNSPEC); } 
{ /* ./Ast/node.scm 216 */
BgL_typez00_bglt BgL_v3349z00_1649;
{ /* ./Ast/node.scm 216 */
obj_t BgL_auxz00_10587;
{ /* ./Ast/node.scm 216 */
int BgL_auxz00_10588;
BgL_auxz00_10588 = 
(int)(((long)2)); 
BgL_auxz00_10587 = 
STRUCT_REF(BgL_sz00_1644, BgL_auxz00_10588); } 
BgL_v3349z00_1649 = 
(BgL_typez00_bglt)(BgL_auxz00_10587); } 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_oz00_1643))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3349z00_1649), BUNSPEC); } 
{ /* ./Ast/node.scm 216 */
BgL_nodez00_bglt BgL_v3353z00_1650;
{ /* ./Ast/node.scm 216 */
obj_t BgL_auxz00_10593;
{ /* ./Ast/node.scm 216 */
int BgL_auxz00_10594;
BgL_auxz00_10594 = 
(int)(((long)3)); 
BgL_auxz00_10593 = 
STRUCT_REF(BgL_sz00_1644, BgL_auxz00_10594); } 
BgL_v3353z00_1650 = 
(BgL_nodez00_bglt)(BgL_auxz00_10593); } 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_oz00_1643))->BgL_exitz00) = ((BgL_nodez00_bglt)BgL_v3353z00_1650), BUNSPEC); } 
{ /* ./Ast/node.scm 216 */
BgL_nodez00_bglt BgL_v3357z00_1651;
{ /* ./Ast/node.scm 216 */
obj_t BgL_auxz00_10599;
{ /* ./Ast/node.scm 216 */
int BgL_auxz00_10600;
BgL_auxz00_10600 = 
(int)(((long)4)); 
BgL_auxz00_10599 = 
STRUCT_REF(BgL_sz00_1644, BgL_auxz00_10600); } 
BgL_v3357z00_1651 = 
(BgL_nodez00_bglt)(BgL_auxz00_10599); } 
((((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_oz00_1643))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_v3357z00_1651), BUNSPEC); } 
BgL_auxz00_10576 = BgL_oz00_1643; 
return 
(obj_t)(BgL_auxz00_10576);} } } 
}



/* object->struct-jump-ex-it3564 */
obj_t BGl_objectzd2ze3structzd2jumpzd2exzd2it3564ze3zzast_nodez00(obj_t BgL_envz00_5587, obj_t BgL_obj3341z00_5588)
{ AN_OBJECT;
{ /* ./Ast/node.scm 216 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_obj3341z00_1629;
BgL_obj3341z00_1629 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_obj3341z00_5588); 
{ /* ./Ast/node.scm 216 */
obj_t BgL_res3342z00_1632;
{ /* ./Ast/node.scm 216 */
obj_t BgL_keyz00_3600;int BgL_lenz00_3601;
BgL_keyz00_3600 = 
CNST_TABLE_REF(((long)28)); 
BgL_lenz00_3601 = 
(int)(((long)5)); 
BgL_res3342z00_1632 = 
make_struct(BgL_keyz00_3600, BgL_lenz00_3601, BUNSPEC); } 
{ /* ./Ast/node.scm 216 */
int BgL_kz00_3604;
BgL_kz00_3604 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3342z00_1632, BgL_kz00_3604, BFALSE); } 
{ /* ./Ast/node.scm 216 */
obj_t BgL_arg4504z00_1634;
{ /* ./Ast/node.scm 216 */
BgL_nodez00_bglt BgL_obj1560z00_3606;
BgL_obj1560z00_3606 = 
(BgL_nodez00_bglt)(BgL_obj3341z00_1629); 
BgL_arg4504z00_1634 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3606))->BgL_locz00); } 
{ /* ./Ast/node.scm 216 */
int BgL_kz00_3608;
BgL_kz00_3608 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3342z00_1632, BgL_kz00_3608, BgL_arg4504z00_1634); } } 
{ /* ./Ast/node.scm 216 */
BgL_typez00_bglt BgL_arg4509z00_1636;
{ /* ./Ast/node.scm 216 */
BgL_nodez00_bglt BgL_obj1561z00_3610;
BgL_obj1561z00_3610 = 
(BgL_nodez00_bglt)(BgL_obj3341z00_1629); 
BgL_arg4509z00_1636 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3610))->BgL_typez00); } 
{ /* ./Ast/node.scm 216 */
int BgL_kz00_3612;obj_t BgL_oz00_3613;
BgL_kz00_3612 = 
(int)(((long)2)); 
BgL_oz00_3613 = 
(obj_t)(BgL_arg4509z00_1636); 
STRUCT_SET(BgL_res3342z00_1632, BgL_kz00_3612, BgL_oz00_3613); } } 
{ /* ./Ast/node.scm 216 */
BgL_nodez00_bglt BgL_arg4514z00_1638;
BgL_arg4514z00_1638 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_obj3341z00_1629))->BgL_exitz00); 
{ /* ./Ast/node.scm 216 */
int BgL_kz00_3616;obj_t BgL_oz00_3617;
BgL_kz00_3616 = 
(int)(((long)3)); 
BgL_oz00_3617 = 
(obj_t)(BgL_arg4514z00_1638); 
STRUCT_SET(BgL_res3342z00_1632, BgL_kz00_3616, BgL_oz00_3617); } } 
{ /* ./Ast/node.scm 216 */
BgL_nodez00_bglt BgL_arg4519z00_1640;
BgL_arg4519z00_1640 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_obj3341z00_1629))->BgL_valuez00); 
{ /* ./Ast/node.scm 216 */
int BgL_kz00_3620;obj_t BgL_oz00_3621;
BgL_kz00_3620 = 
(int)(((long)4)); 
BgL_oz00_3621 = 
(obj_t)(BgL_arg4519z00_1640); 
STRUCT_SET(BgL_res3342z00_1632, BgL_kz00_3620, BgL_oz00_3621); } } 
return BgL_res3342z00_1632;} } } 
}



/* struct+object->object-make-box3562 */
obj_t BGl_structzb2objectzd2ze3objectzd2makezd2box3562z83zzast_nodez00(obj_t BgL_envz00_5589, obj_t BgL_oz00_5590, obj_t BgL_sz00_5591)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ 
BgL_makezd2boxzd2_bglt BgL_oz00_1617;obj_t BgL_sz00_1618;
{ /* ./Ast/node.scm 223 */
BgL_makezd2boxzd2_bglt BgL_auxz00_10630;
BgL_oz00_1617 = 
(BgL_makezd2boxzd2_bglt)(BgL_oz00_5590); 
BgL_sz00_1618 = BgL_sz00_5591; 
{ /* ./Ast/node.scm 223 */
obj_t BgL_arg4487z00_1621;
{ /* ./Ast/node.scm 223 */
int BgL_auxz00_10631;
BgL_auxz00_10631 = 
(int)(((long)0)); 
BgL_arg4487z00_1621 = 
STRUCT_REF(BgL_sz00_1618, BgL_auxz00_10631); } 
{ /* ./Ast/node.scm 223 */
BgL_objectz00_bglt BgL_auxz00_10634;
BgL_auxz00_10634 = 
(BgL_objectz00_bglt)(BgL_oz00_1617); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10634, BgL_arg4487z00_1621); } } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_v3397z00_1622;
{ /* ./Ast/node.scm 223 */
int BgL_auxz00_10637;
BgL_auxz00_10637 = 
(int)(((long)1)); 
BgL_v3397z00_1622 = 
STRUCT_REF(BgL_sz00_1618, BgL_auxz00_10637); } 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_oz00_1617))->BgL_locz00) = ((obj_t)BgL_v3397z00_1622), BUNSPEC); } 
{ /* ./Ast/node.scm 223 */
BgL_typez00_bglt BgL_v3401z00_1623;
{ /* ./Ast/node.scm 223 */
obj_t BgL_auxz00_10641;
{ /* ./Ast/node.scm 223 */
int BgL_auxz00_10642;
BgL_auxz00_10642 = 
(int)(((long)2)); 
BgL_auxz00_10641 = 
STRUCT_REF(BgL_sz00_1618, BgL_auxz00_10642); } 
BgL_v3401z00_1623 = 
(BgL_typez00_bglt)(BgL_auxz00_10641); } 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_oz00_1617))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3401z00_1623), BUNSPEC); } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_v3405z00_1624;
{ /* ./Ast/node.scm 223 */
int BgL_auxz00_10647;
BgL_auxz00_10647 = 
(int)(((long)3)); 
BgL_v3405z00_1624 = 
STRUCT_REF(BgL_sz00_1618, BgL_auxz00_10647); } 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_oz00_1617))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v3405z00_1624), BUNSPEC); } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_v3409z00_1625;
{ /* ./Ast/node.scm 223 */
int BgL_auxz00_10651;
BgL_auxz00_10651 = 
(int)(((long)4)); 
BgL_v3409z00_1625 = 
STRUCT_REF(BgL_sz00_1618, BgL_auxz00_10651); } 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_oz00_1617))->BgL_keyz00) = ((obj_t)BgL_v3409z00_1625), BUNSPEC); } 
{ /* ./Ast/node.scm 223 */
BgL_nodez00_bglt BgL_v3413z00_1626;
{ /* ./Ast/node.scm 223 */
obj_t BgL_auxz00_10655;
{ /* ./Ast/node.scm 223 */
int BgL_auxz00_10656;
BgL_auxz00_10656 = 
(int)(((long)5)); 
BgL_auxz00_10655 = 
STRUCT_REF(BgL_sz00_1618, BgL_auxz00_10656); } 
BgL_v3413z00_1626 = 
(BgL_nodez00_bglt)(BgL_auxz00_10655); } 
((((BgL_makezd2boxzd2_bglt)CREF(BgL_oz00_1617))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_v3413z00_1626), BUNSPEC); } 
BgL_auxz00_10630 = BgL_oz00_1617; 
return 
(obj_t)(BgL_auxz00_10630);} } } 
}



/* object->struct-make-box3560 */
obj_t BGl_objectzd2ze3structzd2makezd2box3560z31zzast_nodez00(obj_t BgL_envz00_5592, obj_t BgL_obj3393z00_5593)
{ AN_OBJECT;
{ /* ./Ast/node.scm 223 */
{ 
BgL_makezd2boxzd2_bglt BgL_obj3393z00_1601;
BgL_obj3393z00_1601 = 
(BgL_makezd2boxzd2_bglt)(BgL_obj3393z00_5593); 
{ /* ./Ast/node.scm 223 */
obj_t BgL_res3394z00_1604;
{ /* ./Ast/node.scm 223 */
obj_t BgL_keyz00_3562;int BgL_lenz00_3563;
BgL_keyz00_3562 = 
CNST_TABLE_REF(((long)29)); 
BgL_lenz00_3563 = 
(int)(((long)6)); 
BgL_res3394z00_1604 = 
make_struct(BgL_keyz00_3562, BgL_lenz00_3563, BUNSPEC); } 
{ /* ./Ast/node.scm 223 */
int BgL_kz00_3566;
BgL_kz00_3566 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3394z00_1604, BgL_kz00_3566, BFALSE); } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_arg4454z00_1606;
{ /* ./Ast/node.scm 223 */
BgL_nodez00_bglt BgL_obj1560z00_3568;
BgL_obj1560z00_3568 = 
(BgL_nodez00_bglt)(BgL_obj3393z00_1601); 
BgL_arg4454z00_1606 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3568))->BgL_locz00); } 
{ /* ./Ast/node.scm 223 */
int BgL_kz00_3570;
BgL_kz00_3570 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3394z00_1604, BgL_kz00_3570, BgL_arg4454z00_1606); } } 
{ /* ./Ast/node.scm 223 */
BgL_typez00_bglt BgL_arg4459z00_1608;
{ /* ./Ast/node.scm 223 */
BgL_nodez00_bglt BgL_obj1561z00_3572;
BgL_obj1561z00_3572 = 
(BgL_nodez00_bglt)(BgL_obj3393z00_1601); 
BgL_arg4459z00_1608 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3572))->BgL_typez00); } 
{ /* ./Ast/node.scm 223 */
int BgL_kz00_3574;obj_t BgL_oz00_3575;
BgL_kz00_3574 = 
(int)(((long)2)); 
BgL_oz00_3575 = 
(obj_t)(BgL_arg4459z00_1608); 
STRUCT_SET(BgL_res3394z00_1604, BgL_kz00_3574, BgL_oz00_3575); } } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_arg4465z00_1610;
{ /* ./Ast/node.scm 223 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_3576;
BgL_obj1590z00_3576 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3393z00_1601); 
BgL_arg4465z00_1610 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_3576))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 223 */
int BgL_kz00_3578;
BgL_kz00_3578 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res3394z00_1604, BgL_kz00_3578, BgL_arg4465z00_1610); } } 
{ /* ./Ast/node.scm 223 */
obj_t BgL_arg4471z00_1612;
{ /* ./Ast/node.scm 223 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_3580;
BgL_obj1593z00_3580 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3393z00_1601); 
BgL_arg4471z00_1612 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_3580))->BgL_keyz00); } 
{ /* ./Ast/node.scm 223 */
int BgL_kz00_3582;
BgL_kz00_3582 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res3394z00_1604, BgL_kz00_3582, BgL_arg4471z00_1612); } } 
{ /* ./Ast/node.scm 223 */
BgL_nodez00_bglt BgL_arg4476z00_1614;
BgL_arg4476z00_1614 = 
(((BgL_makezd2boxzd2_bglt)CREF(BgL_obj3393z00_1601))->BgL_valuez00); 
{ /* ./Ast/node.scm 223 */
int BgL_kz00_3586;obj_t BgL_oz00_3587;
BgL_kz00_3586 = 
(int)(((long)5)); 
BgL_oz00_3587 = 
(obj_t)(BgL_arg4476z00_1614); 
STRUCT_SET(BgL_res3394z00_1604, BgL_kz00_3586, BgL_oz00_3587); } } 
return BgL_res3394z00_1604;} } } 
}



/* struct+object->object-box-ref3558 */
obj_t BGl_structzb2objectzd2ze3objectzd2boxzd2ref3558z83zzast_nodez00(obj_t BgL_envz00_5594, obj_t BgL_oz00_5595, obj_t BgL_sz00_5596)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ 
BgL_boxzd2refzd2_bglt BgL_oz00_1589;obj_t BgL_sz00_1590;
{ /* ./Ast/node.scm 227 */
BgL_boxzd2refzd2_bglt BgL_auxz00_10690;
BgL_oz00_1589 = 
(BgL_boxzd2refzd2_bglt)(BgL_oz00_5595); 
BgL_sz00_1590 = BgL_sz00_5596; 
{ /* ./Ast/node.scm 227 */
obj_t BgL_arg4437z00_1593;
{ /* ./Ast/node.scm 227 */
int BgL_auxz00_10691;
BgL_auxz00_10691 = 
(int)(((long)0)); 
BgL_arg4437z00_1593 = 
STRUCT_REF(BgL_sz00_1590, BgL_auxz00_10691); } 
{ /* ./Ast/node.scm 227 */
BgL_objectz00_bglt BgL_auxz00_10694;
BgL_auxz00_10694 = 
(BgL_objectz00_bglt)(BgL_oz00_1589); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10694, BgL_arg4437z00_1593); } } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_v3453z00_1594;
{ /* ./Ast/node.scm 227 */
int BgL_auxz00_10697;
BgL_auxz00_10697 = 
(int)(((long)1)); 
BgL_v3453z00_1594 = 
STRUCT_REF(BgL_sz00_1590, BgL_auxz00_10697); } 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_oz00_1589))->BgL_locz00) = ((obj_t)BgL_v3453z00_1594), BUNSPEC); } 
{ /* ./Ast/node.scm 227 */
BgL_typez00_bglt BgL_v3457z00_1595;
{ /* ./Ast/node.scm 227 */
obj_t BgL_auxz00_10701;
{ /* ./Ast/node.scm 227 */
int BgL_auxz00_10702;
BgL_auxz00_10702 = 
(int)(((long)2)); 
BgL_auxz00_10701 = 
STRUCT_REF(BgL_sz00_1590, BgL_auxz00_10702); } 
BgL_v3457z00_1595 = 
(BgL_typez00_bglt)(BgL_auxz00_10701); } 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_oz00_1589))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3457z00_1595), BUNSPEC); } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_v3461z00_1596;
{ /* ./Ast/node.scm 227 */
int BgL_auxz00_10707;
BgL_auxz00_10707 = 
(int)(((long)3)); 
BgL_v3461z00_1596 = 
STRUCT_REF(BgL_sz00_1590, BgL_auxz00_10707); } 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_oz00_1589))->BgL_sidezd2effectzf3z21) = ((obj_t)BgL_v3461z00_1596), BUNSPEC); } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_v3465z00_1597;
{ /* ./Ast/node.scm 227 */
int BgL_auxz00_10711;
BgL_auxz00_10711 = 
(int)(((long)4)); 
BgL_v3465z00_1597 = 
STRUCT_REF(BgL_sz00_1590, BgL_auxz00_10711); } 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_oz00_1589))->BgL_keyz00) = ((obj_t)BgL_v3465z00_1597), BUNSPEC); } 
{ /* ./Ast/node.scm 227 */
BgL_varz00_bglt BgL_v3469z00_1598;
{ /* ./Ast/node.scm 227 */
obj_t BgL_auxz00_10715;
{ /* ./Ast/node.scm 227 */
int BgL_auxz00_10716;
BgL_auxz00_10716 = 
(int)(((long)5)); 
BgL_auxz00_10715 = 
STRUCT_REF(BgL_sz00_1590, BgL_auxz00_10716); } 
BgL_v3469z00_1598 = 
(BgL_varz00_bglt)(BgL_auxz00_10715); } 
((((BgL_boxzd2refzd2_bglt)CREF(BgL_oz00_1589))->BgL_varz00) = ((BgL_varz00_bglt)BgL_v3469z00_1598), BUNSPEC); } 
BgL_auxz00_10690 = BgL_oz00_1589; 
return 
(obj_t)(BgL_auxz00_10690);} } } 
}



/* object->struct-box-ref3556 */
obj_t BGl_objectzd2ze3structzd2boxzd2ref3556z31zzast_nodez00(obj_t BgL_envz00_5597, obj_t BgL_obj3449z00_5598)
{ AN_OBJECT;
{ /* ./Ast/node.scm 227 */
{ 
BgL_boxzd2refzd2_bglt BgL_obj3449z00_1573;
BgL_obj3449z00_1573 = 
(BgL_boxzd2refzd2_bglt)(BgL_obj3449z00_5598); 
{ /* ./Ast/node.scm 227 */
obj_t BgL_res3450z00_1576;
{ /* ./Ast/node.scm 227 */
obj_t BgL_keyz00_3524;int BgL_lenz00_3525;
BgL_keyz00_3524 = 
CNST_TABLE_REF(((long)30)); 
BgL_lenz00_3525 = 
(int)(((long)6)); 
BgL_res3450z00_1576 = 
make_struct(BgL_keyz00_3524, BgL_lenz00_3525, BUNSPEC); } 
{ /* ./Ast/node.scm 227 */
int BgL_kz00_3528;
BgL_kz00_3528 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3450z00_1576, BgL_kz00_3528, BFALSE); } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_arg4406z00_1578;
{ /* ./Ast/node.scm 227 */
BgL_nodez00_bglt BgL_obj1560z00_3530;
BgL_obj1560z00_3530 = 
(BgL_nodez00_bglt)(BgL_obj3449z00_1573); 
BgL_arg4406z00_1578 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3530))->BgL_locz00); } 
{ /* ./Ast/node.scm 227 */
int BgL_kz00_3532;
BgL_kz00_3532 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3450z00_1576, BgL_kz00_3532, BgL_arg4406z00_1578); } } 
{ /* ./Ast/node.scm 227 */
BgL_typez00_bglt BgL_arg4411z00_1580;
{ /* ./Ast/node.scm 227 */
BgL_nodez00_bglt BgL_obj1561z00_3534;
BgL_obj1561z00_3534 = 
(BgL_nodez00_bglt)(BgL_obj3449z00_1573); 
BgL_arg4411z00_1580 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3534))->BgL_typez00); } 
{ /* ./Ast/node.scm 227 */
int BgL_kz00_3536;obj_t BgL_oz00_3537;
BgL_kz00_3536 = 
(int)(((long)2)); 
BgL_oz00_3537 = 
(obj_t)(BgL_arg4411z00_1580); 
STRUCT_SET(BgL_res3450z00_1576, BgL_kz00_3536, BgL_oz00_3537); } } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_arg4416z00_1582;
{ /* ./Ast/node.scm 227 */
BgL_nodezf2effectzf2_bglt BgL_obj1590z00_3538;
BgL_obj1590z00_3538 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3449z00_1573); 
BgL_arg4416z00_1582 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1590z00_3538))->BgL_sidezd2effectzf3z21); } 
{ /* ./Ast/node.scm 227 */
int BgL_kz00_3540;
BgL_kz00_3540 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res3450z00_1576, BgL_kz00_3540, BgL_arg4416z00_1582); } } 
{ /* ./Ast/node.scm 227 */
obj_t BgL_arg4421z00_1584;
{ /* ./Ast/node.scm 227 */
BgL_nodezf2effectzf2_bglt BgL_obj1593z00_3542;
BgL_obj1593z00_3542 = 
(BgL_nodezf2effectzf2_bglt)(BgL_obj3449z00_1573); 
BgL_arg4421z00_1584 = 
(((BgL_nodezf2effectzf2_bglt)CREF(BgL_obj1593z00_3542))->BgL_keyz00); } 
{ /* ./Ast/node.scm 227 */
int BgL_kz00_3544;
BgL_kz00_3544 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res3450z00_1576, BgL_kz00_3544, BgL_arg4421z00_1584); } } 
{ /* ./Ast/node.scm 227 */
BgL_varz00_bglt BgL_arg4426z00_1586;
BgL_arg4426z00_1586 = 
(((BgL_boxzd2refzd2_bglt)CREF(BgL_obj3449z00_1573))->BgL_varz00); 
{ /* ./Ast/node.scm 227 */
int BgL_kz00_3548;obj_t BgL_oz00_3549;
BgL_kz00_3548 = 
(int)(((long)5)); 
BgL_oz00_3549 = 
(obj_t)(BgL_arg4426z00_1586); 
STRUCT_SET(BgL_res3450z00_1576, BgL_kz00_3548, BgL_oz00_3549); } } 
return BgL_res3450z00_1576;} } } 
}



/* struct+object->object-box-set!3554 */
obj_t BGl_structzb2objectzd2ze3objectzd2boxzd2setz123554z91zzast_nodez00(obj_t BgL_envz00_5599, obj_t BgL_oz00_5600, obj_t BgL_sz00_5601)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_oz00_1562;obj_t BgL_sz00_1563;
{ /* ./Ast/node.scm 231 */
BgL_boxzd2setz12zc0_bglt BgL_auxz00_10750;
BgL_oz00_1562 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_oz00_5600); 
BgL_sz00_1563 = BgL_sz00_5601; 
{ /* ./Ast/node.scm 231 */
obj_t BgL_arg4390z00_1566;
{ /* ./Ast/node.scm 231 */
int BgL_auxz00_10751;
BgL_auxz00_10751 = 
(int)(((long)0)); 
BgL_arg4390z00_1566 = 
STRUCT_REF(BgL_sz00_1563, BgL_auxz00_10751); } 
{ /* ./Ast/node.scm 231 */
BgL_objectz00_bglt BgL_auxz00_10754;
BgL_auxz00_10754 = 
(BgL_objectz00_bglt)(BgL_oz00_1562); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_10754, BgL_arg4390z00_1566); } } 
{ /* ./Ast/node.scm 231 */
obj_t BgL_v3504z00_1567;
{ /* ./Ast/node.scm 231 */
int BgL_auxz00_10757;
BgL_auxz00_10757 = 
(int)(((long)1)); 
BgL_v3504z00_1567 = 
STRUCT_REF(BgL_sz00_1563, BgL_auxz00_10757); } 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_oz00_1562))->BgL_locz00) = ((obj_t)BgL_v3504z00_1567), BUNSPEC); } 
{ /* ./Ast/node.scm 231 */
BgL_typez00_bglt BgL_v3508z00_1568;
{ /* ./Ast/node.scm 231 */
obj_t BgL_auxz00_10761;
{ /* ./Ast/node.scm 231 */
int BgL_auxz00_10762;
BgL_auxz00_10762 = 
(int)(((long)2)); 
BgL_auxz00_10761 = 
STRUCT_REF(BgL_sz00_1563, BgL_auxz00_10762); } 
BgL_v3508z00_1568 = 
(BgL_typez00_bglt)(BgL_auxz00_10761); } 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_oz00_1562))->BgL_typez00) = ((BgL_typez00_bglt)BgL_v3508z00_1568), BUNSPEC); } 
{ /* ./Ast/node.scm 231 */
BgL_varz00_bglt BgL_v3512z00_1569;
{ /* ./Ast/node.scm 231 */
obj_t BgL_auxz00_10767;
{ /* ./Ast/node.scm 231 */
int BgL_auxz00_10768;
BgL_auxz00_10768 = 
(int)(((long)3)); 
BgL_auxz00_10767 = 
STRUCT_REF(BgL_sz00_1563, BgL_auxz00_10768); } 
BgL_v3512z00_1569 = 
(BgL_varz00_bglt)(BgL_auxz00_10767); } 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_oz00_1562))->BgL_varz00) = ((BgL_varz00_bglt)BgL_v3512z00_1569), BUNSPEC); } 
{ /* ./Ast/node.scm 231 */
BgL_nodez00_bglt BgL_v3516z00_1570;
{ /* ./Ast/node.scm 231 */
obj_t BgL_auxz00_10773;
{ /* ./Ast/node.scm 231 */
int BgL_auxz00_10774;
BgL_auxz00_10774 = 
(int)(((long)4)); 
BgL_auxz00_10773 = 
STRUCT_REF(BgL_sz00_1563, BgL_auxz00_10774); } 
BgL_v3516z00_1570 = 
(BgL_nodez00_bglt)(BgL_auxz00_10773); } 
((((BgL_boxzd2setz12zc0_bglt)CREF(BgL_oz00_1562))->BgL_valuez00) = ((BgL_nodez00_bglt)BgL_v3516z00_1570), BUNSPEC); } 
BgL_auxz00_10750 = BgL_oz00_1562; 
return 
(obj_t)(BgL_auxz00_10750);} } } 
}



/* object->struct-box-set!3552 */
obj_t BGl_objectzd2ze3structzd2boxzd2setz123552z23zzast_nodez00(obj_t BgL_envz00_5602, obj_t BgL_obj3500z00_5603)
{ AN_OBJECT;
{ /* ./Ast/node.scm 231 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_obj3500z00_1548;
BgL_obj3500z00_1548 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_obj3500z00_5603); 
{ /* ./Ast/node.scm 231 */
obj_t BgL_res3501z00_1551;
{ /* ./Ast/node.scm 231 */
obj_t BgL_keyz00_3492;int BgL_lenz00_3493;
BgL_keyz00_3492 = 
CNST_TABLE_REF(((long)31)); 
BgL_lenz00_3493 = 
(int)(((long)5)); 
BgL_res3501z00_1551 = 
make_struct(BgL_keyz00_3492, BgL_lenz00_3493, BUNSPEC); } 
{ /* ./Ast/node.scm 231 */
int BgL_kz00_3496;
BgL_kz00_3496 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3501z00_1551, BgL_kz00_3496, BFALSE); } 
{ /* ./Ast/node.scm 231 */
obj_t BgL_arg4364z00_1553;
{ /* ./Ast/node.scm 231 */
BgL_nodez00_bglt BgL_obj1560z00_3498;
BgL_obj1560z00_3498 = 
(BgL_nodez00_bglt)(BgL_obj3500z00_1548); 
BgL_arg4364z00_1553 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_3498))->BgL_locz00); } 
{ /* ./Ast/node.scm 231 */
int BgL_kz00_3500;
BgL_kz00_3500 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res3501z00_1551, BgL_kz00_3500, BgL_arg4364z00_1553); } } 
{ /* ./Ast/node.scm 231 */
BgL_typez00_bglt BgL_arg4369z00_1555;
{ /* ./Ast/node.scm 231 */
BgL_nodez00_bglt BgL_obj1561z00_3502;
BgL_obj1561z00_3502 = 
(BgL_nodez00_bglt)(BgL_obj3500z00_1548); 
BgL_arg4369z00_1555 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1561z00_3502))->BgL_typez00); } 
{ /* ./Ast/node.scm 231 */
int BgL_kz00_3504;obj_t BgL_oz00_3505;
BgL_kz00_3504 = 
(int)(((long)2)); 
BgL_oz00_3505 = 
(obj_t)(BgL_arg4369z00_1555); 
STRUCT_SET(BgL_res3501z00_1551, BgL_kz00_3504, BgL_oz00_3505); } } 
{ /* ./Ast/node.scm 231 */
BgL_varz00_bglt BgL_arg4374z00_1557;
BgL_arg4374z00_1557 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_obj3500z00_1548))->BgL_varz00); 
{ /* ./Ast/node.scm 231 */
int BgL_kz00_3508;obj_t BgL_oz00_3509;
BgL_kz00_3508 = 
(int)(((long)3)); 
BgL_oz00_3509 = 
(obj_t)(BgL_arg4374z00_1557); 
STRUCT_SET(BgL_res3501z00_1551, BgL_kz00_3508, BgL_oz00_3509); } } 
{ /* ./Ast/node.scm 231 */
BgL_nodez00_bglt BgL_arg4379z00_1559;
BgL_arg4379z00_1559 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_obj3500z00_1548))->BgL_valuez00); 
{ /* ./Ast/node.scm 231 */
int BgL_kz00_3512;obj_t BgL_oz00_3513;
BgL_kz00_3512 = 
(int)(((long)4)); 
BgL_oz00_3513 = 
(obj_t)(BgL_arg4379z00_1559); 
STRUCT_SET(BgL_res3501z00_1551, BgL_kz00_3512, BgL_oz00_3513); } } 
return BgL_res3501z00_1551;} } } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzast_nodez00()
{ AN_OBJECT;
{ /* ./Ast/node.scm 14 */
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "ast_node"); 
return 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "ast_node");} 
}

