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

#include <bigloo.h>


/* Object type definitions */
typedef struct BgL_ccompz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_producerz00;
   obj_t BgL_consumerz00;
   obj_t BgL_finaliza7erza7;
} *BgL_ccompz00_bglt;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

typedef struct BgL_tclassz00_bgl {
   obj_t BgL_itszd2superzd2;
   obj_t BgL_slotsz00;
   struct BgL_globalz00_bgl * BgL_holderz00;
   obj_t BgL_wideningz00;
   long BgL_depthz00;
   bool_t BgL_finalzf3zf3;
   obj_t BgL_constructorz00;
   obj_t BgL_virtualzd2slotszd2numberz00;
   bool_t BgL_abstractzf3zf3;
   obj_t BgL_widezd2typezd2;
} *BgL_tclassz00_bglt;

typedef struct BgL_jclassz00_bgl {
   obj_t BgL_itszd2superzd2;
   obj_t BgL_slotsz00;
   obj_t BgL_packagez00;
} *BgL_jclassz00_bglt;

typedef struct BgL_wclassz00_bgl {
   obj_t BgL_itszd2classzd2;
} *BgL_wclassz00_bglt;

typedef struct BgL_copz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
} *BgL_copz00_bglt;

typedef struct BgL_clabelz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   obj_t BgL_namez00;
   bool_t BgL_usedzf3zf3;
   obj_t BgL_bodyz00;
} *BgL_clabelz00_bglt;

typedef struct BgL_cgotoz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_clabelz00_bgl * BgL_labelz00;
} *BgL_cgotoz00_bglt;

typedef struct BgL_blockz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_bodyz00;
} *BgL_blockz00_bglt;

typedef struct BgL_creturnz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_valuez00;
} *BgL_creturnz00_bglt;

typedef struct BgL_cvoidz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_valuez00;
} *BgL_cvoidz00_bglt;

typedef struct BgL_catomz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   obj_t BgL_valuez00;
} *BgL_catomz00_bglt;

typedef struct BgL_varcz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_variablez00_bgl * BgL_variablez00;
} *BgL_varcz00_bglt;

typedef struct BgL_cpragmaz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   obj_t BgL_formatz00;
   obj_t BgL_argsz00;
} *BgL_cpragmaz00_bglt;

typedef struct BgL_ccastz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_copz00_bgl * BgL_argz00;
} *BgL_ccastz00_bglt;

typedef struct BgL_csequencez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   bool_t BgL_czd2expzf3z21;
   obj_t BgL_copsz00;
} *BgL_csequencez00_bglt;

typedef struct BgL_nopz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
} *BgL_nopz00_bglt;

typedef struct BgL_stopz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_valuez00;
} *BgL_stopz00_bglt;

typedef struct BgL_csetqz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_varcz00_bgl * BgL_varz00;
   struct BgL_copz00_bgl * BgL_valuez00;
} *BgL_csetqz00_bglt;

typedef struct BgL_cifz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_testz00;
   struct BgL_copz00_bgl * BgL_truez00;
   struct BgL_copz00_bgl * BgL_falsez00;
} *BgL_cifz00_bglt;

typedef struct BgL_localzd2varzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   obj_t BgL_varsz00;
} *BgL_localzd2varzd2_bglt;

typedef struct BgL_cfuncallz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
   obj_t BgL_strengthz00;
} *BgL_cfuncallz00_bglt;

typedef struct BgL_capplyz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_funz00;
   struct BgL_copz00_bgl * BgL_argz00;
} *BgL_capplyz00_bglt;

typedef struct BgL_cappz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
} *BgL_cappz00_bglt;

typedef struct BgL_cfailz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_procz00;
   struct BgL_copz00_bgl * BgL_msgz00;
   struct BgL_copz00_bgl * BgL_objz00;
} *BgL_cfailz00_bglt;

typedef struct BgL_cswitchz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_testz00;
   obj_t BgL_clausesz00;
} *BgL_cswitchz00_bglt;

typedef struct BgL_cmakezd2boxzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_valuez00;
} *BgL_cmakezd2boxzd2_bglt;

typedef struct BgL_cboxzd2refzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_varz00;
} *BgL_cboxzd2refzd2_bglt;

typedef struct BgL_cboxzd2setz12zc0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_varz00;
   struct BgL_copz00_bgl * BgL_valuez00;
} *BgL_cboxzd2setz12zc0_bglt;

typedef struct BgL_csetzd2exzd2itz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_exitz00;
   struct BgL_copz00_bgl * BgL_jumpzd2valuezd2;
   struct BgL_copz00_bgl * BgL_bodyz00;
} *BgL_csetzd2exzd2itz00_bglt;

typedef struct BgL_cjumpzd2exzd2itz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_exitz00;
   struct BgL_copz00_bgl * BgL_valuez00;
} *BgL_cjumpzd2exzd2itz00_bglt;

typedef struct BgL_sfunzf2czf2_bgl {
   struct BgL_clabelz00_bgl * BgL_labelz00;
   bool_t BgL_integratedz00;
} *BgL_sfunzf2czf2_bglt;

typedef struct BgL_bdbzd2blockzd2_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   struct BgL_copz00_bgl * BgL_bodyz00;
} *BgL_bdbzd2blockzd2_bglt;

typedef struct BgL_backendz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_backendz00_bglt;

typedef struct BgL_cvmz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_cvmz00_bglt;

typedef struct BgL_sawcz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_sawcz00_bglt;

typedef struct BgL_cgenz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
} *BgL_cgenz00_bglt;

typedef struct BgL_jvmz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
   obj_t BgL_qnamez00;
   obj_t BgL_classesz00;
   obj_t BgL_currentzd2classzd2;
   obj_t BgL_declarationsz00;
   obj_t BgL_fieldsz00;
   obj_t BgL_methodsz00;
   obj_t BgL_currentzd2methodzd2;
   obj_t BgL_codez00;
} *BgL_jvmz00_bglt;

typedef struct BgL_dotnetz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_languagez00;
   obj_t BgL_namez00;
   obj_t BgL_externzd2variableszd2;
   obj_t BgL_externzd2functionszd2;
   obj_t BgL_externzd2typeszd2;
   obj_t BgL_variablesz00;
   obj_t BgL_functionsz00;
   obj_t BgL_typesz00;
   obj_t BgL_outz00;
   obj_t BgL_qnamez00;
} *BgL_dotnetz00_bglt;


static obj_t BGl_methodzd2initzd2zzcgen_walkz00();
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl__astzb2initializa7ers4512z15zzcgen_walkz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
extern obj_t BGl_buildzd2astzd2sanszd2removezd2zzast_buildz00(obj_t);
static obj_t BGl_cnstzd2initzd2zzcgen_walkz00();
extern obj_t BGl_getzd2modulezd2initz00zzbackend_c_initz00();
static obj_t BGl_importedzd2moduleszd2initz00zzcgen_walkz00();
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_toplevelzd2initzd2zzcgen_walkz00();
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzcgen_walkz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_speekz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_passz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_tracez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_configurez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmodule_modulez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmodule_libraryz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_occurz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_buildz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_classz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbdb_emitz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzprof_emitz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_c_emitz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_c_prototypez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_c_mainz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_c_initz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcgen_copz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzcgen_cgenz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzbackend_backendz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
extern obj_t BGl_makezd2bigloozd2mainz00zzbackend_c_mainz00();
extern obj_t BGl_cgenzd2functionzd2zzcgen_cgenz00(BgL_globalz00_bglt);
extern obj_t BGl_cgenz00zzbackend_backendz00;
static obj_t BGl_cvmzd2compilezd2functionszd2cgen3788zd2zzcgen_walkz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_memqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
extern obj_t BGl_za2mainza2z00zzmodule_modulez00;
extern obj_t BGl_za2passza2z00zzengine_paramz00;
BGL_IMPORT obj_t bgl_append2(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_astzb2initializa7ersz15zzcgen_walkz00(obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzcgen_walkz00 = BUNSPEC;
extern obj_t BGl_occurzd2nodezd2inz12z12zzast_occurz00(BgL_nodez00_bglt, BgL_globalz00_bglt);
extern obj_t BGl_libraryzd2finaliza7erz75zzmodule_libraryz00();
static obj_t BGl_libraryzd2moduleszd2initz00zzcgen_walkz00();
static obj_t __cnst[ 3 ] ;


DEFINE_EXPORT_PROCEDURE( BGl_astzb2initializa7erszd2envzc7zzcgen_walkz00, BgL_bgl__astza7b2initializa7a7ers4512za715za7za7cgen_walkza7004556z00, BGl__astzb2initializa7ers4512z15zzcgen_walkz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc4528z00zzcgen_walkz00, BgL_bgl_cvmza7d2compileza7d2functionsza7d2cgen3788za7d2za7za7cgen_walkza7004557za7, BGl_cvmzd2compilezd2functionszd2cgen3788zd2zzcgen_walkz00, 0L, 1 );
DEFINE_STRING( BGl_string4529z00zzcgen_walkz00, BgL_bgl_string4529za700za7za7cgen_walkza7004558z00, "imported (ld distrib) unit ", 27 );
extern obj_t BGl_cvmzd2compilezd2functionszd2envzd2zzbackend_backendz00;



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzcgen_walkz00(long BgL_checksumz00_1685, char * BgL_fromz00_1686)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzcgen_walkz00))
{ 
BGl_requirezd2initializa7ationz75zzcgen_walkz00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzcgen_walkz00(); 
BGl_cnstzd2initzd2zzcgen_walkz00(); 
BGl_importedzd2moduleszd2initz00zzcgen_walkz00(); 
BGl_methodzd2initzd2zzcgen_walkz00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzcgen_walkz00()
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 15 */
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "cgen_walk"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzcgen_walkz00()
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 15 */
{ /* ./Cgen/walk.scm 15 */
obj_t BgL_cportz00_1678;
BgL_cportz00_1678 = 
open_input_string(BGl_string4529z00zzcgen_walkz00); 
{ 
long BgL_iz00_1679;
BgL_iz00_1679 = ((long)2); 
BgL_loopz00_1680:
{ /* ./Cgen/walk.scm 15 */
bool_t BgL_test4531z00_1681;
BgL_test4531z00_1681 = 
(BgL_iz00_1679==((long)-1)); 
if(BgL_test4531z00_1681)
{ /* ./Cgen/walk.scm 15 */
return BUNSPEC;}  else 
{ /* ./Cgen/walk.scm 15 */
{ /* ./Cgen/walk.scm 15 */
obj_t BgL_arg4533z00_1682;
{ /* ./Cgen/walk.scm 15 */
obj_t BgL_list4536z00_1683;
BgL_list4536z00_1683 = 
MAKE_PAIR(BgL_cportz00_1678, BNIL); 
BgL_arg4533z00_1682 = 
BGl_readz00zz__readerz00(BgL_list4536z00_1683); } 
{ /* ./Cgen/walk.scm 15 */
int BgL_auxz00_1702;
BgL_auxz00_1702 = 
(int)(BgL_iz00_1679); 
CNST_TABLE_SET(BgL_auxz00_1702, BgL_arg4533z00_1682); } } 
{ /* ./Cgen/walk.scm 15 */
int BgL_auxz00_1684;
{ /* ./Cgen/walk.scm 15 */
long BgL_auxz00_1705;
BgL_auxz00_1705 = 
(BgL_iz00_1679-((long)1)); 
BgL_auxz00_1684 = 
(int)(BgL_auxz00_1705); } 
{ 
long BgL_iz00_1708;
BgL_iz00_1708 = 
(long)(BgL_auxz00_1684); 
BgL_iz00_1679 = BgL_iz00_1708; 
goto BgL_loopz00_1680;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzcgen_walkz00()
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 15 */
return BUNSPEC;} 
}



/* ast+initializers */
BGL_EXPORTED_DEF obj_t BGl_astzb2initializa7ersz15zzcgen_walkz00(obj_t BgL_globalsz00_20)
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 56 */
{ /* ./Cgen/walk.scm 57 */
obj_t BgL_libzd2unitzd2_1038;
BgL_libzd2unitzd2_1038 = 
BGl_libraryzd2finaliza7erz75zzmodule_libraryz00(); 
{ /* ./Cgen/walk.scm 57 */
obj_t BgL_libzd2initzd2_1039;
{ /* ./Cgen/walk.scm 58 */
bool_t BgL_test3842z00_1048;
if(
STRUCTP(BgL_libzd2unitzd2_1038))
{ /* ./Cgen/walk.scm 58 */
obj_t BgL_auxz00_1715;obj_t BgL_auxz00_1713;
BgL_auxz00_1715 = 
CNST_TABLE_REF(((long)0)); 
BgL_auxz00_1713 = 
STRUCT_KEY(BgL_libzd2unitzd2_1038); 
BgL_test3842z00_1048 = 
(BgL_auxz00_1713==BgL_auxz00_1715); }  else 
{ /* ./Cgen/walk.scm 58 */
BgL_test3842z00_1048 = ((bool_t)0); } 
if(BgL_test3842z00_1048)
{ /* ./Cgen/walk.scm 59 */
obj_t BgL_varsz00_1049;
{ /* ./Cgen/walk.scm 59 */
obj_t BgL_arg3860z00_1057;
{ /* ./Cgen/walk.scm 59 */
obj_t BgL_list3863z00_1058;
BgL_list3863z00_1058 = 
MAKE_PAIR(BgL_libzd2unitzd2_1038, BNIL); 
BgL_arg3860z00_1057 = BgL_list3863z00_1058; } 
BgL_varsz00_1049 = 
BGl_buildzd2astzd2sanszd2removezd2zzast_buildz00(BgL_arg3860z00_1057); } 
{ 
obj_t BgL_l3785z00_1050;
BgL_l3785z00_1050 = BgL_varsz00_1049; 
BgL_forzd2each3786zd2_1051:
{ /* ./Cgen/walk.scm 60 */
bool_t BgL_test3844z00_1052;
BgL_test3844z00_1052 = 
PAIRP(BgL_l3785z00_1050); 
if(BgL_test3844z00_1052)
{ /* ./Cgen/walk.scm 60 */
{ /* ./Cgen/walk.scm 61 */
obj_t BgL_gz00_1053;
BgL_gz00_1053 = 
CAR(BgL_l3785z00_1050); 
{ /* ./Cgen/walk.scm 62 */
obj_t BgL_arg3846z00_1054;
{ /* ./Cgen/walk.scm 62 */
BgL_sfunz00_bglt BgL_obj1392z00_1664;
{ /* ./Cgen/walk.scm 62 */
BgL_valuez00_bglt BgL_auxz00_1724;
{ /* ./Cgen/walk.scm 62 */
BgL_variablez00_bglt BgL_obj1120z00_1663;
BgL_obj1120z00_1663 = 
(BgL_variablez00_bglt)(BgL_gz00_1053); 
BgL_auxz00_1724 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1120z00_1663))->BgL_valuez00); } 
BgL_obj1392z00_1664 = 
(BgL_sfunz00_bglt)(BgL_auxz00_1724); } 
BgL_arg3846z00_1054 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1392z00_1664))->BgL_bodyz00); } 
BGl_occurzd2nodezd2inz12z12zzast_occurz00(
(BgL_nodez00_bglt)(BgL_arg3846z00_1054), 
(BgL_globalz00_bglt)(BgL_gz00_1053)); } } 
{ /* ./Cgen/walk.scm 60 */
obj_t BgL_arg3855z00_1056;
BgL_arg3855z00_1056 = 
CDR(BgL_l3785z00_1050); 
{ 
obj_t BgL_l3785z00_1733;
BgL_l3785z00_1733 = BgL_arg3855z00_1056; 
BgL_l3785z00_1050 = BgL_l3785z00_1733; 
goto BgL_forzd2each3786zd2_1051;} } }  else 
{ /* ./Cgen/walk.scm 60 */((bool_t)1); } } } 
BgL_libzd2initzd2_1039 = BgL_varsz00_1049; }  else 
{ /* ./Cgen/walk.scm 58 */
BgL_libzd2initzd2_1039 = BNIL; } } 
{ /* ./Cgen/walk.scm 58 */
obj_t BgL_modzd2initzd2_1040;
BgL_modzd2initzd2_1040 = 
BGl_getzd2modulezd2initz00zzbackend_c_initz00(); 
{ /* ./Cgen/walk.scm 67 */
obj_t BgL_globalsz00_1041;
{ /* ./Cgen/walk.scm 69 */
obj_t BgL_arg3826z00_1042;
{ /* ./Cgen/walk.scm 69 */
bool_t BgL_test3828z00_1043;
{ /* ./Cgen/walk.scm 69 */
bool_t BgL_test3837z00_1046;
if(
CBOOL(BGl_za2mainza2z00zzmodule_modulez00))
{ /* ./Cgen/walk.scm 69 */
BgL_test3837z00_1046 = ((bool_t)1); }  else 
{ /* ./Cgen/walk.scm 69 */
obj_t BgL_auxz00_1737;
BgL_auxz00_1737 = 
BGl_memqz00zz__r4_pairs_and_lists_6_3z00(BGl_za2passza2z00zzengine_paramz00, 
CNST_TABLE_REF(((long)1))); 
BgL_test3837z00_1046 = 
CBOOL(BgL_auxz00_1737); } 
if(BgL_test3837z00_1046)
{ /* ./Cgen/walk.scm 70 */
bool_t BgL_test3838z00_1047;
{ /* ./Cgen/walk.scm 70 */
obj_t BgL_auxz00_1742;
BgL_auxz00_1742 = 
CNST_TABLE_REF(((long)2)); 
BgL_test3838z00_1047 = 
(BGl_za2mainza2z00zzmodule_modulez00==BgL_auxz00_1742); } 
if(BgL_test3838z00_1047)
{ /* ./Cgen/walk.scm 70 */
BgL_test3828z00_1043 = ((bool_t)0); }  else 
{ /* ./Cgen/walk.scm 70 */
BgL_test3828z00_1043 = ((bool_t)1); } }  else 
{ /* ./Cgen/walk.scm 69 */
BgL_test3828z00_1043 = ((bool_t)0); } } 
if(BgL_test3828z00_1043)
{ /* ./Cgen/walk.scm 71 */
obj_t BgL_arg3830z00_1044;obj_t BgL_arg3832z00_1045;
BgL_arg3830z00_1044 = 
BGl_makezd2bigloozd2mainz00zzbackend_c_mainz00(); 
BgL_arg3832z00_1045 = 
bgl_append2(BgL_libzd2initzd2_1039, BgL_globalsz00_20); 
BgL_arg3826z00_1042 = 
MAKE_PAIR(BgL_arg3830z00_1044, BgL_arg3832z00_1045); }  else 
{ /* ./Cgen/walk.scm 69 */
BgL_arg3826z00_1042 = 
bgl_append2(BgL_libzd2initzd2_1039, BgL_globalsz00_20); } } 
BgL_globalsz00_1041 = 
MAKE_PAIR(BgL_modzd2initzd2_1040, BgL_arg3826z00_1042); } 
{ /* ./Cgen/walk.scm 68 */

return BgL_globalsz00_1041;} } } } } } 
}



/* _ast+initializers4512 */
obj_t BGl__astzb2initializa7ers4512z15zzcgen_walkz00(obj_t BgL_envz00_1670, obj_t BgL_globalsz00_1671)
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 56 */
return 
BGl_astzb2initializa7ersz15zzcgen_walkz00(BgL_globalsz00_1671);} 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzcgen_walkz00()
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 15 */
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_cvmzd2compilezd2functionszd2envzd2zzbackend_backendz00, BGl_cgenz00zzbackend_backendz00, BGl_proc4528z00zzcgen_walkz00);} 
}



/* cvm-compile-functions-cgen3788 */
obj_t BGl_cvmzd2compilezd2functionszd2cgen3788zd2zzcgen_walkz00(obj_t BgL_envz00_1673, obj_t BgL_mez00_1674)
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 45 */
{ 
BgL_cgenz00_bglt BgL_mez00_1622;
{ /* ./Cgen/walk.scm 46 */
bool_t BgL_auxz00_1754;
BgL_mez00_1622 = 
(BgL_cgenz00_bglt)(BgL_mez00_1674); 
{ 
obj_t BgL_l3783z00_1625;
{ /* ./Cgen/walk.scm 46 */
obj_t BgL_arg4465z00_1627;
{ /* ./Cgen/walk.scm 46 */
BgL_backendz00_bglt BgL_obj3471z00_1666;
BgL_obj3471z00_1666 = 
(BgL_backendz00_bglt)(BgL_mez00_1622); 
BgL_arg4465z00_1627 = 
(((BgL_backendz00_bglt)CREF(BgL_obj3471z00_1666))->BgL_functionsz00); } 
BgL_l3783z00_1625 = BgL_arg4465z00_1627; 
BgL_forzd2each3784zd2_1626:
{ /* ./Cgen/walk.scm 46 */
bool_t BgL_test4468z00_1628;
BgL_test4468z00_1628 = 
PAIRP(BgL_l3783z00_1625); 
if(BgL_test4468z00_1628)
{ /* ./Cgen/walk.scm 46 */
{ /* ./Cgen/walk.scm 46 */
obj_t BgL_arg4471z00_1629;
BgL_arg4471z00_1629 = 
CAR(BgL_l3783z00_1625); 
BGl_cgenzd2functionzd2zzcgen_cgenz00(
(BgL_globalz00_bglt)(BgL_arg4471z00_1629)); } 
{ /* ./Cgen/walk.scm 46 */
obj_t BgL_arg4475z00_1630;
BgL_arg4475z00_1630 = 
CDR(BgL_l3783z00_1625); 
{ 
obj_t BgL_l3783z00_1763;
BgL_l3783z00_1763 = BgL_arg4475z00_1630; 
BgL_l3783z00_1625 = BgL_l3783z00_1763; 
goto BgL_forzd2each3784zd2_1626;} } }  else 
{ /* ./Cgen/walk.scm 46 */
BgL_auxz00_1754 = ((bool_t)1); } } } } 
return 
BBOOL(BgL_auxz00_1754);} } } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzcgen_walkz00()
{ AN_OBJECT;
{ /* ./Cgen/walk.scm 15 */
BGl_modulezd2initializa7ationz75zztools_speekz00(((long)23537), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zztools_errorz00(((long)25566), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzengine_passz00(((long)10268), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zztools_tracez00(((long)59211), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zztools_shapez00(((long)30833), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzengine_paramz00(((long)14260), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzengine_configurez00(((long)37635), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzmodule_modulez00(((long)8699), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzmodule_libraryz00(((long)60538), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzast_occurz00(((long)28605), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzast_buildz00(((long)17453), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzobject_classz00(((long)30791), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzbdb_emitz00(((long)41411), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzprof_emitz00(((long)14049), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzbackend_c_emitz00(((long)11970), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzbackend_c_prototypez00(((long)34740), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzbackend_c_mainz00(((long)39441), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzbackend_c_initz00(((long)36471), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzcgen_copz00(((long)5379), "cgen_walk"); 
BGl_modulezd2initializa7ationz75zzcgen_cgenz00(((long)61576), "cgen_walk"); 
return 
BGl_modulezd2initializa7ationz75zzbackend_backendz00(((long)3428), "cgen_walk");} 
}

