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

#include <bigloo.h>


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

typedef struct BgL_rtl_regz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_varz00;
} *BgL_rtl_regz00_bglt;

typedef struct BgL_rtl_funz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_funz00_bglt;

typedef struct BgL_rtl_lastz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_lastz00_bglt;

typedef struct BgL_rtl_returnz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_returnz00_bglt;

typedef struct BgL_rtl_jumpexitz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_jumpexitz00_bglt;

typedef struct BgL_rtl_failz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_failz00_bglt;

typedef struct BgL_rtl_notseqz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_notseqz00_bglt;

typedef struct BgL_rtl_ifz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_ifz00_bglt;

typedef struct BgL_rtl_selectz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_patternsz00;
} *BgL_rtl_selectz00_bglt;

typedef struct BgL_rtl_switchz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   obj_t BgL_patternsz00;
   obj_t BgL_labelsz00;
} *BgL_rtl_switchz00_bglt;

typedef struct BgL_rtl_ifeqz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_blockz00_bgl * BgL_thenz00;
} *BgL_rtl_ifeqz00_bglt;

typedef struct BgL_rtl_ifnez00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_blockz00_bgl * BgL_thenz00;
} *BgL_rtl_ifnez00_bglt;

typedef struct BgL_rtl_goz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_blockz00_bgl * BgL_toz00;
} *BgL_rtl_goz00_bglt;

typedef struct BgL_rtl_purez00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_purez00_bglt;

typedef struct BgL_rtl_nopz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_nopz00_bglt;

typedef struct BgL_rtl_movz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_movz00_bglt;

typedef struct BgL_rtl_loadiz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_atomz00_bgl * BgL_constantz00;
} *BgL_rtl_loadiz00_bglt;

typedef struct BgL_rtl_loadgz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_loadgz00_bglt;

typedef struct BgL_rtl_loadfunz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_loadfunz00_bglt;

typedef struct BgL_rtl_globalrefz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_globalrefz00_bglt;

typedef struct BgL_rtl_getfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_objtypez00;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_getfieldz00_bglt;

typedef struct BgL_rtl_vallocz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_rtl_vallocz00_bglt;

typedef struct BgL_rtl_vrefz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_rtl_vrefz00_bglt;

typedef struct BgL_rtl_vlengthz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_vlengthz00_bglt;

typedef struct BgL_rtl_isaz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_isaz00_bglt;

typedef struct BgL_rtl_makeboxz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_makeboxz00_bglt;

typedef struct BgL_rtl_boxrefz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_boxrefz00_bglt;

typedef struct BgL_rtl_effectz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_effectz00_bglt;

typedef struct BgL_rtl_storegz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_storegz00_bglt;

typedef struct BgL_rtl_setfieldz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_objtypez00;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_setfieldz00_bglt;

typedef struct BgL_rtl_vsetz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_typez00_bgl * BgL_vtypez00;
} *BgL_rtl_vsetz00_bglt;

typedef struct BgL_rtl_boxsetz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_boxsetz00_bglt;

typedef struct BgL_rtl_newz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_newz00_bglt;

typedef struct BgL_rtl_callz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_globalz00_bgl * BgL_varz00;
} *BgL_rtl_callz00_bglt;

typedef struct BgL_rtl_applyz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_applyz00_bglt;

typedef struct BgL_rtl_lightfuncallz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_lightfuncallz00_bglt;

typedef struct BgL_rtl_funcallz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_funcallz00_bglt;

typedef struct BgL_rtl_pragmaz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_formatz00;
} *BgL_rtl_pragmaz00_bglt;

typedef struct BgL_rtl_castz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_typez00_bgl * BgL_typez00;
} *BgL_rtl_castz00_bglt;

typedef struct BgL_rtl_protectz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_protectz00_bglt;

typedef struct BgL_rtl_protectedz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_rtl_protectedz00_bglt;

typedef struct BgL_stl_loadrz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_rtl_regz00_bgl * BgL_regz00;
} *BgL_stl_loadrz00_bglt;

typedef struct BgL_stl_storerz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_rtl_regz00_bgl * BgL_regz00;
} *BgL_stl_storerz00_bglt;

typedef struct BgL_stl_popz00_bgl {
   header_t header;
   obj_t widening;
} *BgL_stl_popz00_bglt;

typedef struct BgL_rtl_insz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
   obj_t BgL_destz00;
   struct BgL_rtl_funz00_bgl * BgL_funz00;
   obj_t BgL_argsz00;
} *BgL_rtl_insz00_bglt;

typedef struct BgL_blockz00_bgl {
   header_t header;
   obj_t widening;
   int BgL_labelz00;
   obj_t BgL_predsz00;
   obj_t BgL_succsz00;
   obj_t BgL_firstz00;
} *BgL_blockz00_bglt;

typedef struct BgL_areaz00_bgl {
   header_t header;
   obj_t widening;
   struct BgL_blockz00_bgl * BgL_entryz00;
   struct BgL_blockz00_bgl * BgL_exitz00;
} *BgL_areaz00_bglt;

typedef struct BgL_reversedz00_bgl {
   char dummy;
} *BgL_reversedz00_bglt;

typedef struct BgL_rlocalz00_bgl {
   obj_t BgL_regz00;
   obj_t BgL_codez00;
} *BgL_rlocalz00_bglt;


static obj_t BGl__allocatezd2rlocalzd2zzsaw_node2rtlz00(obj_t);
extern BgL_rtl_storegz00_bglt BGl_makezd2rtl_storegzd2zzsaw_defsz00(BgL_globalz00_bglt);
extern obj_t BGl_vrefz00zzast_nodez00;
BGL_IMPORT double BGl_roundflz00zz__r4_numbers_6_5_flonumz00(double);
static obj_t BGl_methodzd2initzd2zzsaw_node2rtlz00();
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl_areaz00zzsaw_node2rtlz00 = BUNSPEC;
BGL_IMPORT long BGl_classzd2numzd2zz__objectz00(obj_t);
static obj_t BGl_nodezd2ze3rtlzd2isa3477ze3zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_letzd2funzd2zzast_nodez00;
extern obj_t BGl_nodez00zzast_nodez00;
extern obj_t BGl_sfunz00zzast_varz00;
BGL_EXPORTED_DECL BgL_blockz00_bglt BGl_globalzd2ze3rtlz31zzsaw_node2rtlz00(BgL_globalz00_bglt);
static obj_t BGl_objectzd2ze3structzd2rlocal3499ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2reversed3503ze3zzsaw_node2rtlz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
extern BgL_rtl_globalrefz00_bglt BGl_makezd2rtl_globalrefzd2zzsaw_defsz00(BgL_globalz00_bglt);
static obj_t BGl_nodezd2ze3rtlzd2fail3485ze3zzsaw_node2rtlz00(obj_t, obj_t);
extern BgL_rtl_failz00_bglt BGl_makezd2rtl_failzd2zzsaw_defsz00();
BGL_IMPORT obj_t BGl_objectzd2ze3structz31zz__objectz00(BgL_objectz00_bglt);
static BgL_areaz00_bglt BGl_predicatez00zzsaw_node2rtlz00(BgL_nodez00_bglt, obj_t);
BGL_IMPORT obj_t BGl_addzd2genericz12zc0zz__objectz00(obj_t, obj_t);
extern BgL_rtl_regz00_bglt BGl_makezd2rtl_regzd2zzsaw_defsz00(BgL_typez00_bglt, obj_t);
static BgL_areaz00_bglt BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(BgL_nodez00_bglt);
extern obj_t BGl_letzd2varzd2zzast_nodez00;
BGL_IMPORT obj_t BGl_objectz00zz__objectz00;
extern obj_t BGl_pragmaz00zzast_nodez00;
static obj_t BGl_structzb2objectzd2ze3objectzd2area3510z51zzsaw_node2rtlz00(obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_registerzd2classz12zc0zz__objectz00(obj_t, obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t);
extern BgL_blockz00_bglt BGl_makezd2blockzd2zzsaw_defsz00(int, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL BgL_rtl_regz00_bglt BGl_localzd2ze3regz31zzsaw_node2rtlz00(BgL_localz00_bglt);
static obj_t BGl_nodezd2ze3rtlzd2valloc3469ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2funcall3459ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2getfield3463ze3zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_globalz00zzast_varz00;
extern BgL_typez00_bglt BGl_typeofz00zztype_typeofz00(BgL_nodez00_bglt);
extern BgL_rtl_jumpexitz00_bglt BGl_makezd2rtl_jumpexitzd2zzsaw_defsz00();
extern BgL_rtl_protectedz00_bglt BGl_makezd2rtl_protectedzd2zzsaw_defsz00();
extern BgL_rtl_callz00_bglt BGl_makezd2rtl_callzd2zzsaw_defsz00(BgL_globalz00_bglt);
extern BgL_rtl_setfieldz00_bglt BGl_makezd2rtl_setfieldzd2zzsaw_defsz00(obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
static BgL_areaz00_bglt BGl_forkzf2joinzf2zzsaw_node2rtlz00(BgL_areaz00_bglt, obj_t, BgL_rtl_regz00_bglt);
static BgL_areaz00_bglt BGl_linkz00zzsaw_node2rtlz00(BgL_areaz00_bglt, BgL_areaz00_bglt);
static obj_t BGl_joinz00zzsaw_node2rtlz00(obj_t, BgL_rtl_regz00_bglt);
extern BgL_rtl_vallocz00_bglt BGl_makezd2rtl_valloczd2zzsaw_defsz00(BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl_nodezd2ze3rtlzd2app3455ze3zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_castz00zzast_nodez00;
extern BgL_rtl_lightfuncallz00_bglt BGl_makezd2rtl_lightfuncallzd2zzsaw_defsz00();
extern BgL_rtl_selectz00_bglt BGl_makezd2rtl_selectzd2zzsaw_defsz00(BgL_typez00_bglt, obj_t);
extern obj_t BGl_boxzd2refzd2zzast_nodez00;
BGL_IMPORT obj_t BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00(obj_t);
extern obj_t BGl_varz00zzast_nodez00;
static obj_t BGl_cnstzd2initzd2zzsaw_node2rtlz00();
extern BgL_rtl_loadiz00_bglt BGl_makezd2rtl_loadizd2zzsaw_defsz00(BgL_atomz00_bglt);
extern obj_t BGl_atomz00zzast_nodez00;
extern BgL_rtl_loadgz00_bglt BGl_makezd2rtl_loadgzd2zzsaw_defsz00(BgL_globalz00_bglt);
static obj_t BGl_predicatezd2atom3495zd2zzsaw_node2rtlz00(obj_t, obj_t, obj_t);
static obj_t BGl__nodezd2ze3rtlz31zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_failz00zzast_nodez00;
extern obj_t BGl_funcallz00zzast_nodez00;
static obj_t BGl_nodezd2ze3rtlzd2vsetz123473zf1zzsaw_node2rtlz00(obj_t, obj_t);
extern BgL_rtl_vsetz00_bglt BGl_makezd2rtl_vsetzd2zzsaw_defsz00(BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl_reversedz00zzsaw_node2rtlz00 = BUNSPEC;
static obj_t BGl_nodezd2ze3rtlzd2boxzd2setz123491z23zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl__predicatez00zzsaw_node2rtlz00(obj_t, obj_t, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2boxzd2ref3489z31zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2setzd2exzd2it3481ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2jumpzd2exzd2it3483ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzsaw_node2rtlz00();
extern BgL_rtl_nopz00_bglt BGl_makezd2rtl_nopzd2zzsaw_defsz00();
static obj_t BGl_nodezd2ze3rtlzd2atom3439ze3zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_makezd2boxzd2zzast_nodez00;
BGL_IMPORT obj_t make_struct(obj_t, int, obj_t);
extern obj_t BGl_getfieldz00zzast_nodez00;
extern obj_t BGl_isaz00zzast_nodez00;
static BgL_areaz00_bglt BGl_linkza2za2zzsaw_node2rtlz00(obj_t);
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
extern BgL_rtl_vrefz00_bglt BGl_makezd2rtl_vrefzd2zzsaw_defsz00(BgL_typez00_bglt, BgL_typez00_bglt);
static obj_t BGl_structzb2objectzd2ze3objectzd2rlocal3501z51zzsaw_node2rtlz00(obj_t, obj_t, obj_t);
extern BgL_rtl_movz00_bglt BGl_makezd2rtl_movzd2zzsaw_defsz00();
extern BgL_rtl_newz00_bglt BGl_makezd2rtl_newzd2zzsaw_defsz00(BgL_typez00_bglt);
static obj_t BGl_nodezd2ze3rtlzd2sequence3447ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl__nodezd2ze3rtlzd2default3436ze3zzsaw_node2rtlz00(obj_t, obj_t);
static BgL_areaz00_bglt BGl_localzd2ze3codez31zzsaw_node2rtlz00(BgL_localz00_bglt);
extern BgL_rtl_funcallz00_bglt BGl_makezd2rtl_funcallzd2zzsaw_defsz00();
extern obj_t BGl_selectz00zzast_nodez00;
extern obj_t BGl_vallocz00zzast_nodez00;
static obj_t BGl_toplevelzd2initzd2zzsaw_node2rtlz00();
extern obj_t BGl_appzd2lyzd2zzast_nodez00;
static obj_t BGl_nodezd2ze3rtlzd2select3451ze3zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_boxzd2setz12zc0zzast_nodez00;
static obj_t BGl_nodezd2ze3rtlzd2setfield3465ze3zzsaw_node2rtlz00(obj_t, obj_t);
static BgL_areaz00_bglt BGl_forkz00zzsaw_node2rtlz00(BgL_areaz00_bglt, obj_t);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzsaw_node2rtlz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typeofz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzsaw_defsz00(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_equivalence_6_2z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_flonumz00(long, char *);
static BgL_areaz00_bglt BGl_movez00zzsaw_node2rtlz00(BgL_rtl_regz00_bglt, BgL_localz00_bglt);
static obj_t BGl_predicatezd2conditional3497zd2zzsaw_node2rtlz00(obj_t, obj_t, obj_t);
static obj_t BGl__localzd2ze3regz31zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2pragma3461ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_imperativezf3zf3zzsaw_node2rtlz00(BgL_appz00_bglt, BgL_globalz00_bglt, obj_t);
extern BgL_rtl_makeboxz00_bglt BGl_makezd2rtl_makeboxzd2zzsaw_defsz00();
extern obj_t BGl_blockz00zzsaw_defsz00;
static obj_t BGl_nodezd2ze3rtlzd2setq3445ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2vlength3475ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_findzd2registerzd2zzsaw_node2rtlz00(obj_t, BgL_rtl_regz00_bglt);
extern BgL_rtl_pragmaz00_bglt BGl_makezd2rtl_pragmazd2zzsaw_defsz00(obj_t);
static obj_t BGl_nodezd2ze3rtlzd2vref3471ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2area3507ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_rlocalz00zzsaw_node2rtlz00 = BUNSPEC;
extern obj_t BGl_setzd2exzd2itz00zzast_nodez00;
BGL_IMPORT BgL_objectz00_bglt BGl_structzb2objectzd2ze3objectz83zz__objectz00(BgL_objectz00_bglt, obj_t);
static obj_t BGl__allocatezd2areazd2zzsaw_node2rtlz00(obj_t);
static obj_t BGl_nodezd2ze3rtlzd2new3467ze3zzsaw_node2rtlz00(obj_t, obj_t);
extern BgL_rtl_loadfunz00_bglt BGl_makezd2rtl_loadfunzd2zzsaw_defsz00(BgL_globalz00_bglt);
extern BgL_rtl_getfieldz00_bglt BGl_makezd2rtl_getfieldzd2zzsaw_defsz00(obj_t, BgL_typez00_bglt, BgL_typez00_bglt);
static BgL_areaz00_bglt BGl_predicatezd2default3492zd2zzsaw_node2rtlz00(BgL_nodez00_bglt, obj_t);
extern obj_t BGl_jumpzd2exzd2itz00zzast_nodez00;
extern obj_t BGl_newz00zzast_nodez00;
extern obj_t BGl_conditionalz00zzast_nodez00;
extern obj_t BGl_sequencez00zzast_nodez00;
static obj_t BGl_structzb2objectzd2ze3objectzd2reversed3505z51zzsaw_node2rtlz00(obj_t, obj_t, obj_t);
static BgL_areaz00_bglt BGl_singleza2za2zzsaw_node2rtlz00(obj_t, BgL_rtl_funz00_bglt, obj_t);
extern BgL_rtl_isaz00_bglt BGl_makezd2rtl_isazd2zzsaw_defsz00(BgL_typez00_bglt);
static obj_t BGl_nodezd2ze3rtlzd2conditional3449ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl__globalzd2ze3rtlz31zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_appz00zzast_nodez00;
extern BgL_rtl_insz00_bglt BGl_makezd2rtl_inszd2zzsaw_defsz00(obj_t, obj_t, BgL_rtl_funz00_bglt, obj_t);
static obj_t BGl_nodezd2ze3rtlzd2letzd2var3443z31zzsaw_node2rtlz00(obj_t, obj_t);
extern obj_t BGl_localz00zzast_varz00;
static obj_t BGl_nodezd2ze3rtlzd2var3441ze3zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_argszd21zd2zzsaw_node2rtlz00(obj_t);
extern obj_t BGl_rtl_movz00zzsaw_defsz00;
static obj_t BGl_nodezd2ze3rtlzd2makezd2box3487z31zzsaw_node2rtlz00(obj_t, obj_t);
static BgL_areaz00_bglt BGl_compilezd2labelzd2callz00zzsaw_node2rtlz00(BgL_localz00_bglt, obj_t);
extern obj_t BGl_vlengthz00zzast_nodez00;
extern BgL_rtl_applyz00_bglt BGl_makezd2rtl_applyzd2zzsaw_defsz00();
static obj_t BGl_nodezd2ze3rtlzd2cast3479ze3zzsaw_node2rtlz00(obj_t, obj_t);
static BgL_reversedz00_bglt BGl_wideningzd2reversedzd2zzsaw_node2rtlz00();
extern obj_t BGl_setfieldz00zzast_nodez00;
static obj_t BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_blockz00_bglt, BgL_rtl_regz00_bglt);
extern BgL_rtl_boxsetz00_bglt BGl_makezd2rtl_boxsetzd2zzsaw_defsz00();
extern BgL_rtl_protectz00_bglt BGl_makezd2rtl_protectzd2zzsaw_defsz00();
extern BgL_rtl_returnz00_bglt BGl_makezd2rtl_returnzd2zzsaw_defsz00(BgL_typez00_bglt);
static obj_t BGl_nodezd2ze3rtlzd2letzd2fun3453z31zzsaw_node2rtlz00(obj_t, obj_t);
static BgL_areaz00_bglt BGl_unlinkz00zzsaw_node2rtlz00(BgL_areaz00_bglt);
static obj_t BGl__predicatezd2default3492zd2zzsaw_node2rtlz00(obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2initzd2zzsaw_node2rtlz00();
extern BgL_rtl_ifz00_bglt BGl_makezd2rtl_ifzd2zzsaw_defsz00();
static obj_t BGl_requirezd2initializa7ationz75zzsaw_node2rtlz00 = BUNSPEC;
static BgL_areaz00_bglt BGl_callza2za2zzsaw_node2rtlz00(obj_t, BgL_rtl_funz00_bglt, obj_t);
static bool_t BGl_dfsz00zzsaw_node2rtlz00(obj_t, obj_t);
static obj_t BGl_coercez00zzsaw_node2rtlz00(obj_t);
BGL_IMPORT bool_t BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(obj_t, obj_t);
extern BgL_rtl_boxrefz00_bglt BGl_makezd2rtl_boxrefzd2zzsaw_defsz00();
static obj_t BGl__allocatezd2reversedzd2zzsaw_node2rtlz00(obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzsaw_node2rtlz00();
extern obj_t BGl_vsetz12z12zzast_nodez00;
extern BgL_rtl_vlengthz00_bglt BGl_makezd2rtl_vlengthzd2zzsaw_defsz00(BgL_typez00_bglt);
static BgL_areaz00_bglt BGl_nodezd2ze3rtlzd2default3436ze3zzsaw_node2rtlz00(BgL_nodez00_bglt);
extern obj_t BGl_setqz00zzast_nodez00;
static obj_t BGl_nodezd2ze3rtlzd2appzd2ly3457z31zzsaw_node2rtlz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_findzd2superzd2classzd2methodzd2zz__objectz00(BgL_objectz00_bglt, obj_t, obj_t);
static obj_t __cnst[ 10 ] ;


DEFINE_STATIC_PROCEDURE( BGl_allocatezd2areazd2envz00zzsaw_node2rtlz00, BgL_bgl__allocateza7d2areaza7d2za7za7saw_node2rtlza7006682za7, BGl__allocatezd2areazd2zzsaw_node2rtlz00, 0L, 0 );
BGL_IMPORT obj_t BGl_objectzd2ze3structzd2envze3zz__objectz00;
DEFINE_STATIC_PROCEDURE( BGl_allocatezd2rlocalzd2envz00zzsaw_node2rtlz00, BgL_bgl__allocateza7d2rlocalza7d2za7za7saw_node2rtlza7006683za7, BGl__allocatezd2rlocalzd2zzsaw_node2rtlz00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_localzd2ze3regzd2envze3zzsaw_node2rtlz00, BgL_bgl__localza7d2za7e3regza731za7za7saw_node2rtlza7006684z00, BGl__localzd2ze3regz31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_predicatezd2default3492zd2envz00zzsaw_node2rtlz00, BgL_bgl__predicateza7d2default3492za7d2za7za7saw_node2rtlza7006685za7, BGl__predicatezd2default3492zd2zzsaw_node2rtlz00, 0L, 2 );
DEFINE_STATIC_GENERIC( BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_bgl__nodeza7d2za7e3rtlza731za7za7saw_node2rtlza7006686z00, BGl__nodezd2ze3rtlz31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_nodezd2ze3rtlzd2default3436zd2envz31zzsaw_node2rtlz00, BgL_bgl__nodeza7d2za7e3rtlza7d2default3436za7e3za7za7saw_node2rtlza7006687za7, BGl__nodezd2ze3rtlzd2default3436ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_globalzd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_bgl__globalza7d2za7e3rtlza731za7za7saw_node2rtlza7006688z00, BGl__globalzd2ze3rtlz31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_allocatezd2reversedzd2envz00zzsaw_node2rtlz00, BgL_bgl__allocateza7d2reversedza7d2za7za7saw_node2rtlza7006689za7, BGl__allocatezd2reversedzd2zzsaw_node2rtlz00, 0L, 0 );
BGL_IMPORT obj_t BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00;
DEFINE_STATIC_PROCEDURE( BGl_proc6613z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2atom3439za7e3za7za7saw_node2rtlza7006690za7, BGl_nodezd2ze3rtlzd2atom3439ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6614z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2var3441za7e3za7za7saw_node2rtlza7006691za7, BGl_nodezd2ze3rtlzd2var3441ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6615z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2letza7d2var3443za731za7za7saw_node2rtlza7006692z00, BGl_nodezd2ze3rtlzd2letzd2var3443z31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6616z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2setq3445za7e3za7za7saw_node2rtlza7006693za7, BGl_nodezd2ze3rtlzd2setq3445ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_GENERIC( BGl_predicatezd2envzd2zzsaw_node2rtlz00, BgL_bgl__predicateza700za7za7saw_node2rtlza7006694z00, BGl__predicatez00zzsaw_node2rtlz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc6617z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2sequence3447za7e3za7za7saw_node2rtlza7006695za7, BGl_nodezd2ze3rtlzd2sequence3447ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6618z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2conditional3449za7e3za7za7saw_node2rtlza7006696za7, BGl_nodezd2ze3rtlzd2conditional3449ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6620z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2letza7d2fun3453za731za7za7saw_node2rtlza7006697z00, BGl_nodezd2ze3rtlzd2letzd2fun3453z31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6619z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2select3451za7e3za7za7saw_node2rtlza7006698za7, BGl_nodezd2ze3rtlzd2select3451ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6621z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2app3455za7e3za7za7saw_node2rtlza7006699za7, BGl_nodezd2ze3rtlzd2app3455ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6622z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2appza7d2ly3457za731za7za7saw_node2rtlza7006700z00, BGl_nodezd2ze3rtlzd2appzd2ly3457z31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6623z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2funcall3459za7e3za7za7saw_node2rtlza7006701za7, BGl_nodezd2ze3rtlzd2funcall3459ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6624z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2pragma3461za7e3za7za7saw_node2rtlza7006702za7, BGl_nodezd2ze3rtlzd2pragma3461ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6625z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2getfield3463za7e3za7za7saw_node2rtlza7006703za7, BGl_nodezd2ze3rtlzd2getfield3463ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6626z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2setfield3465za7e3za7za7saw_node2rtlza7006704za7, BGl_nodezd2ze3rtlzd2setfield3465ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6627z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2new3467za7e3za7za7saw_node2rtlza7006705za7, BGl_nodezd2ze3rtlzd2new3467ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6628z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2valloc3469za7e3za7za7saw_node2rtlza7006706za7, BGl_nodezd2ze3rtlzd2valloc3469ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6630z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2vsetza7123473za7f1za7za7saw_node2rtlza7006707z00, BGl_nodezd2ze3rtlzd2vsetz123473zf1zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6629z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2vref3471za7e3za7za7saw_node2rtlza7006708za7, BGl_nodezd2ze3rtlzd2vref3471ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6631z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2vlength3475za7e3za7za7saw_node2rtlza7006709za7, BGl_nodezd2ze3rtlzd2vlength3475ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6632z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2isa3477za7e3za7za7saw_node2rtlza7006710za7, BGl_nodezd2ze3rtlzd2isa3477ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6633z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2cast3479za7e3za7za7saw_node2rtlza7006711za7, BGl_nodezd2ze3rtlzd2cast3479ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6634z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2setza7d2exza7d2it3481za7e3za7za7saw_node2rtlza7006712za7, BGl_nodezd2ze3rtlzd2setzd2exzd2it3481ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6635z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2jumpza7d2exza7d2it3483za7e3za7za7saw_node2rtlza7006713za7, BGl_nodezd2ze3rtlzd2jumpzd2exzd2it3483ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6636z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2fail3485za7e3za7za7saw_node2rtlza7006714za7, BGl_nodezd2ze3rtlzd2fail3485ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6637z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2makeza7d2box3487za731za7za7saw_node2rtlza7006715z00, BGl_nodezd2ze3rtlzd2makezd2box3487z31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6638z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2boxza7d2ref3489za731za7za7saw_node2rtlza7006716z00, BGl_nodezd2ze3rtlzd2boxzd2ref3489z31zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6640z00zzsaw_node2rtlz00, BgL_bgl_predicateza7d2atom3495za7d2za7za7saw_node2rtlza7006717za7, BGl_predicatezd2atom3495zd2zzsaw_node2rtlz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc6639z00zzsaw_node2rtlz00, BgL_bgl_nodeza7d2za7e3rtlza7d2boxza7d2setza7123491za723za7za7saw_node2rtlza7006718za7, BGl_nodezd2ze3rtlzd2boxzd2setz123491z23zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6641z00zzsaw_node2rtlz00, BgL_bgl_predicateza7d2conditional3497za7d2za7za7saw_node2rtlza7006719za7, BGl_predicatezd2conditional3497zd2zzsaw_node2rtlz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc6642z00zzsaw_node2rtlz00, BgL_bgl_objectza7d2za7e3structza7d2rlocal3499za7e3za7za7saw_node2rtlza7006720za7, BGl_objectzd2ze3structzd2rlocal3499ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6643z00zzsaw_node2rtlz00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2rlocal3501za751za7za7saw_node2rtlza7006721z00, BGl_structzb2objectzd2ze3objectzd2rlocal3501z51zzsaw_node2rtlz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc6644z00zzsaw_node2rtlz00, BgL_bgl_objectza7d2za7e3structza7d2reversed3503za7e3za7za7saw_node2rtlza7006722za7, BGl_objectzd2ze3structzd2reversed3503ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6645z00zzsaw_node2rtlz00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2reversed3505za751za7za7saw_node2rtlza7006723z00, BGl_structzb2objectzd2ze3objectzd2reversed3505z51zzsaw_node2rtlz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc6646z00zzsaw_node2rtlz00, BgL_bgl_objectza7d2za7e3structza7d2area3507za7e3za7za7saw_node2rtlza7006724za7, BGl_objectzd2ze3structzd2area3507ze3zzsaw_node2rtlz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc6647z00zzsaw_node2rtlz00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2area3510za751za7za7saw_node2rtlza7006725z00, BGl_structzb2objectzd2ze3objectzd2area3510z51zzsaw_node2rtlz00, 0L, 2 );
DEFINE_STRING( BGl_string6649z00zzsaw_node2rtlz00, BgL_bgl_string6649za700za7za7saw_node2rtlza7006726z00, "node->rtl-default3436 light elight rlocal reversed area __evmeaning_address procedure-1-el-set! select else ", 108 );
DEFINE_STRING( BGl_string6648z00zzsaw_node2rtlz00, BgL_bgl_string6648za700za7za7saw_node2rtlza7006727z00, "No method for this object", 25 );
DEFINE_STRING( BGl_string6612z00zzsaw_node2rtlz00, BgL_bgl_string6612za700za7za7saw_node2rtlza7006728z00, "bad constant", 12 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzsaw_node2rtlz00(long BgL_checksumz00_3891, char * BgL_fromz00_3892)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzsaw_node2rtlz00))
{ 
BGl_requirezd2initializa7ationz75zzsaw_node2rtlz00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzsaw_node2rtlz00(); 
BGl_cnstzd2initzd2zzsaw_node2rtlz00(); 
BGl_importedzd2moduleszd2initz00zzsaw_node2rtlz00(); 
BGl_objectzd2initzd2zzsaw_node2rtlz00(); 
BGl_methodzd2initzd2zzsaw_node2rtlz00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzsaw_node2rtlz00()
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_flonumz00(((long)0), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(((long)0), "saw_node2rtl"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzsaw_node2rtlz00()
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
{ /* ./SawMill/node2rtl.scm 1 */
obj_t BgL_cportz00_3857;
BgL_cportz00_3857 = 
open_input_string(BGl_string6649z00zzsaw_node2rtlz00); 
{ 
long BgL_iz00_3858;
BgL_iz00_3858 = ((long)9); 
BgL_loopz00_3859:
{ /* ./SawMill/node2rtl.scm 1 */
bool_t BgL_test6651z00_3860;
BgL_test6651z00_3860 = 
(BgL_iz00_3858==((long)-1)); 
if(BgL_test6651z00_3860)
{ /* ./SawMill/node2rtl.scm 1 */
return BUNSPEC;}  else 
{ /* ./SawMill/node2rtl.scm 1 */
{ /* ./SawMill/node2rtl.scm 1 */
obj_t BgL_arg6653z00_3861;
{ /* ./SawMill/node2rtl.scm 1 */
obj_t BgL_list6656z00_3862;
BgL_list6656z00_3862 = 
MAKE_PAIR(BgL_cportz00_3857, BNIL); 
BgL_arg6653z00_3861 = 
BGl_readz00zz__readerz00(BgL_list6656z00_3862); } 
{ /* ./SawMill/node2rtl.scm 1 */
int BgL_auxz00_3911;
BgL_auxz00_3911 = 
(int)(BgL_iz00_3858); 
CNST_TABLE_SET(BgL_auxz00_3911, BgL_arg6653z00_3861); } } 
{ /* ./SawMill/node2rtl.scm 1 */
int BgL_auxz00_3863;
{ /* ./SawMill/node2rtl.scm 1 */
long BgL_auxz00_3914;
BgL_auxz00_3914 = 
(BgL_iz00_3858-((long)1)); 
BgL_auxz00_3863 = 
(int)(BgL_auxz00_3914); } 
{ 
long BgL_iz00_3917;
BgL_iz00_3917 = 
(long)(BgL_auxz00_3863); 
BgL_iz00_3858 = BgL_iz00_3917; 
goto BgL_loopz00_3859;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzsaw_node2rtlz00()
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
return BUNSPEC;} 
}



/* global->rtl */
BGL_EXPORTED_DEF BgL_blockz00_bglt BGl_globalzd2ze3rtlz31zzsaw_node2rtlz00(BgL_globalz00_bglt BgL_varz00_15)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 27 */
{ /* ./SawMill/node2rtl.scm 28 */
BgL_areaz00_bglt BgL_az00_1076;
{ /* ./SawMill/node2rtl.scm 28 */
BgL_rtl_returnz00_bglt BgL_arg3581z00_1093;obj_t BgL_arg3582z00_1094;
{ /* ./SawMill/node2rtl.scm 28 */
BgL_typez00_bglt BgL_arg3587z00_1096;
{ /* ./SawMill/node2rtl.scm 28 */
BgL_variablez00_bglt BgL_obj1097z00_2449;
BgL_obj1097z00_2449 = 
(BgL_variablez00_bglt)(BgL_varz00_15); 
BgL_arg3587z00_1096 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1097z00_2449))->BgL_typez00); } 
BgL_arg3581z00_1093 = 
BGl_makezd2rtl_returnzd2zzsaw_defsz00(BgL_arg3587z00_1096); } 
{ /* ./SawMill/node2rtl.scm 29 */
BgL_sfunz00_bglt BgL_obj1370z00_2451;
{ /* ./SawMill/node2rtl.scm 29 */
BgL_valuez00_bglt BgL_auxz00_3922;
{ /* ./SawMill/node2rtl.scm 29 */
BgL_variablez00_bglt BgL_obj1100z00_2450;
BgL_obj1100z00_2450 = 
(BgL_variablez00_bglt)(BgL_varz00_15); 
BgL_auxz00_3922 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1100z00_2450))->BgL_valuez00); } 
BgL_obj1370z00_2451 = 
(BgL_sfunz00_bglt)(BgL_auxz00_3922); } 
BgL_arg3582z00_1094 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1370z00_2451))->BgL_bodyz00); } 
{ /* ./SawMill/node2rtl.scm 28 */
obj_t BgL_list3584z00_1095;
BgL_list3584z00_1095 = 
MAKE_PAIR(BgL_arg3582z00_1094, BNIL); 
{ /* ./SawMill/node2rtl.scm 28 */
BgL_rtl_funz00_bglt BgL_funz00_2453;
BgL_funz00_2453 = 
(BgL_rtl_funz00_bglt)(BgL_arg3581z00_1093); 
BgL_az00_1076 = 
BGl_callza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2453, BgL_list3584z00_1095); } } } 
{ /* ./SawMill/node2rtl.scm 31 */
BgL_blockz00_bglt BgL_rz00_1077;obj_t BgL_nz00_1078;
BgL_rz00_1077 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_1076))->BgL_entryz00); 
{ /* ./SawMill/node2rtl.scm 31 */
obj_t BgL_cellvalz00_3931;
BgL_cellvalz00_3931 = 
BINT(((long)0)); 
BgL_nz00_1078 = 
MAKE_CELL(BgL_cellvalz00_3931); } 
BGl_dfsz00zzsaw_node2rtlz00(BgL_nz00_1078, 
(obj_t)(BgL_rz00_1077)); 
return BgL_rz00_1077;} } } 
}



/* dfs */
bool_t BGl_dfsz00zzsaw_node2rtlz00(obj_t BgL_nz00_3854, obj_t BgL_bz00_1079)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 32 */
{ /* ./SawMill/node2rtl.scm 33 */
BgL_blockz00_bglt BgL_obj3245z00_1081;
{ 
BgL_blockz00_bglt BgL_auxz00_3935;
BgL_auxz00_3935 = 
(BgL_blockz00_bglt)(BgL_bz00_1079); 
BgL_obj3245z00_1081 = 
((BgL_blockz00_bglt)BgL_auxz00_3935); } 
{ /* ./SawMill/node2rtl.scm 33 */
BgL_reversedz00_bglt BgL_arg3547z00_1082;
BgL_arg3547z00_1082 = 
BGl_wideningzd2reversedzd2zzsaw_node2rtlz00(); 
{ /* ./SawMill/node2rtl.scm 33 */
obj_t BgL_auxz00_3941;BgL_objectz00_bglt BgL_auxz00_3939;
BgL_auxz00_3941 = 
(obj_t)(BgL_arg3547z00_1082); 
BgL_auxz00_3939 = 
(BgL_objectz00_bglt)(BgL_obj3245z00_1081); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3939, BgL_auxz00_3941); } } 
{ /* ./SawMill/node2rtl.scm 33 */
long BgL_arg3552z00_1083;
BgL_arg3552z00_1083 = 
BGl_classzd2numzd2zz__objectz00(BGl_reversedz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 33 */
BgL_objectz00_bglt BgL_objz00_2456;
BgL_objz00_2456 = 
(BgL_objectz00_bglt)(BgL_obj3245z00_1081); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2456, BgL_arg3552z00_1083); } } 
{ /* ./SawMill/node2rtl.scm 33 */
obj_t BgL_objz00_2458;
BgL_objz00_2458 = 
(obj_t)(BgL_obj3245z00_1081); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2458); BUNSPEC; } BgL_obj3245z00_1081; } 
{ /* ./SawMill/node2rtl.scm 34 */
BgL_blockz00_bglt BgL_obj3094z00_2459;int BgL_val3093z00_2460;
BgL_obj3094z00_2459 = 
(BgL_blockz00_bglt)(BgL_bz00_1079); 
{ /* ./SawMill/node2rtl.scm 34 */
obj_t BgL_auxz00_3950;
BgL_auxz00_3950 = 
CELL_REF(BgL_nz00_3854); 
BgL_val3093z00_2460 = 
CINT(BgL_auxz00_3950); } 
((((BgL_blockz00_bglt)CREF(BgL_obj3094z00_2459))->BgL_labelz00) = ((int)BgL_val3093z00_2460), BUNSPEC); } 
{ /* ./SawMill/node2rtl.scm 35 */
obj_t BgL_auxz00_3855;
{ /* ./SawMill/node2rtl.scm 35 */
long BgL_za71za7_2461;
{ /* ./SawMill/node2rtl.scm 35 */
obj_t BgL_auxz00_3953;
BgL_auxz00_3953 = 
CELL_REF(BgL_nz00_3854); 
BgL_za71za7_2461 = 
(long)CINT(BgL_auxz00_3953); } 
{ /* ./SawMill/node2rtl.scm 35 */
long BgL_auxz00_3955;
BgL_auxz00_3955 = 
(BgL_za71za7_2461+((long)1)); 
BgL_auxz00_3855 = 
BINT(BgL_auxz00_3955); } } 
CELL_SET(BgL_nz00_3854, BgL_auxz00_3855); } 
{ 
obj_t BgL_l3246z00_1084;
{ /* ./SawMill/node2rtl.scm 39 */
obj_t BgL_arg3559z00_1086;
{ /* ./SawMill/node2rtl.scm 39 */
BgL_blockz00_bglt BgL_obj3098z00_2463;
BgL_obj3098z00_2463 = 
(BgL_blockz00_bglt)(BgL_bz00_1079); 
BgL_arg3559z00_1086 = 
(((BgL_blockz00_bglt)CREF(BgL_obj3098z00_2463))->BgL_succsz00); } 
BgL_l3246z00_1084 = BgL_arg3559z00_1086; 
BgL_forzd2each3247zd2_1085:
{ /* ./SawMill/node2rtl.scm 36 */
bool_t BgL_test3562z00_1087;
BgL_test3562z00_1087 = 
PAIRP(BgL_l3246z00_1084); 
if(BgL_test3562z00_1087)
{ /* ./SawMill/node2rtl.scm 36 */
{ /* ./SawMill/node2rtl.scm 37 */
obj_t BgL_sz00_1088;
BgL_sz00_1088 = 
CAR(BgL_l3246z00_1084); 
{ /* ./SawMill/node2rtl.scm 37 */
obj_t BgL_arg3564z00_1089;
{ /* ./SawMill/node2rtl.scm 37 */
obj_t BgL_arg3567z00_1090;
{ /* ./SawMill/node2rtl.scm 37 */
BgL_blockz00_bglt BgL_obj3095z00_2466;
BgL_obj3095z00_2466 = 
(BgL_blockz00_bglt)(BgL_sz00_1088); 
BgL_arg3567z00_1090 = 
(((BgL_blockz00_bglt)CREF(BgL_obj3095z00_2466))->BgL_predsz00); } 
BgL_arg3564z00_1089 = 
MAKE_PAIR(BgL_bz00_1079, BgL_arg3567z00_1090); } 
{ /* ./SawMill/node2rtl.scm 37 */
BgL_blockz00_bglt BgL_obj3097z00_2467;obj_t BgL_val3096z00_2468;
BgL_obj3097z00_2467 = 
(BgL_blockz00_bglt)(BgL_sz00_1088); 
BgL_val3096z00_2468 = BgL_arg3564z00_1089; 
((((BgL_blockz00_bglt)CREF(BgL_obj3097z00_2467))->BgL_predsz00) = ((obj_t)BgL_val3096z00_2468), BUNSPEC); } } 
{ /* ./SawMill/node2rtl.scm 38 */
bool_t BgL_test3570z00_1091;
BgL_test3570z00_1091 = 
BGl_iszd2azf3z21zz__objectz00(BgL_sz00_1088, BGl_reversedz00zzsaw_node2rtlz00); 
if(BgL_test3570z00_1091)
{ /* ./SawMill/node2rtl.scm 38 */((bool_t)0); }  else 
{ /* ./SawMill/node2rtl.scm 38 */
BGl_dfsz00zzsaw_node2rtlz00(BgL_nz00_3854, BgL_sz00_1088); } } } 
{ /* ./SawMill/node2rtl.scm 36 */
obj_t BgL_arg3575z00_1092;
BgL_arg3575z00_1092 = 
CDR(BgL_l3246z00_1084); 
{ 
obj_t BgL_l3246z00_3972;
BgL_l3246z00_3972 = BgL_arg3575z00_1092; 
BgL_l3246z00_1084 = BgL_l3246z00_3972; 
goto BgL_forzd2each3247zd2_1085;} } }  else 
{ /* ./SawMill/node2rtl.scm 36 */
return ((bool_t)1);} } } } } 
}



/* _global->rtl */
obj_t BGl__globalzd2ze3rtlz31zzsaw_node2rtlz00(obj_t BgL_envz00_3722, obj_t BgL_varz00_3723)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 27 */
{ /* ./SawMill/node2rtl.scm 28 */
BgL_blockz00_bglt BgL_auxz00_3973;
BgL_auxz00_3973 = 
BGl_globalzd2ze3rtlz31zzsaw_node2rtlz00(
(BgL_globalz00_bglt)(BgL_varz00_3723)); 
return 
(obj_t)(BgL_auxz00_3973);} } 
}



/* local->reg */
BGL_EXPORTED_DEF BgL_rtl_regz00_bglt BGl_localzd2ze3regz31zzsaw_node2rtlz00(BgL_localz00_bglt BgL_varz00_18)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 51 */
{ /* ./SawMill/node2rtl.scm 52 */
bool_t BgL_test3604z00_1102;
BgL_test3604z00_1102 = 
BGl_iszd2azf3z21zz__objectz00(
(obj_t)(BgL_varz00_18), BGl_rlocalz00zzsaw_node2rtlz00); 
if(BgL_test3604z00_1102)
{ /* ./SawMill/node2rtl.scm 53 */
BgL_rlocalz00_bglt BgL_obj3211z00_2477;
BgL_obj3211z00_2477 = 
(BgL_rlocalz00_bglt)(BgL_varz00_18); 
{ /* ./SawMill/node2rtl.scm 53 */
obj_t BgL_auxz00_3981;
{ 
obj_t BgL_auxz00_3982;
{ /* ./SawMill/node2rtl.scm 53 */
BgL_objectz00_bglt BgL_auxz00_3983;
BgL_auxz00_3983 = 
(BgL_objectz00_bglt)(BgL_obj3211z00_2477); 
BgL_auxz00_3982 = 
BGL_OBJECT_WIDENING(BgL_auxz00_3983); } 
BgL_auxz00_3981 = 
(((BgL_rlocalz00_bglt)CREF(BgL_auxz00_3982))->BgL_regz00); } 
return 
(BgL_rtl_regz00_bglt)(BgL_auxz00_3981);} }  else 
{ /* ./SawMill/node2rtl.scm 54 */
BgL_rtl_regz00_bglt BgL_rz00_1103;
{ /* ./SawMill/node2rtl.scm 54 */
BgL_rtl_regz00_bglt BgL_res5812z00_2482;
{ /* ./SawMill/node2rtl.scm 54 */
BgL_typez00_bglt BgL_arg3600z00_2479;BgL_localz00_bglt BgL_arg3601z00_2480;
{ /* ./SawMill/node2rtl.scm 54 */
BgL_variablez00_bglt BgL_obj1097z00_2481;
BgL_obj1097z00_2481 = 
(BgL_variablez00_bglt)(BgL_varz00_18); 
BgL_arg3600z00_2479 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1097z00_2481))->BgL_typez00); } 
BgL_arg3601z00_2480 = BgL_varz00_18; 
BgL_res5812z00_2482 = 
BGl_makezd2rtl_regzd2zzsaw_defsz00(BgL_arg3600z00_2479, 
(obj_t)(BgL_arg3601z00_2480)); } 
BgL_rz00_1103 = BgL_res5812z00_2482; } 
{ /* ./SawMill/node2rtl.scm 55 */
BgL_localz00_bglt BgL_obj3250z00_1104;
BgL_obj3250z00_1104 = 
((BgL_localz00_bglt)BgL_varz00_18); 
{ /* ./SawMill/node2rtl.scm 55 */
BgL_rlocalz00_bglt BgL_arg3607z00_1105;
{ /* ./SawMill/node2rtl.scm 55 */
BgL_rtl_regz00_bglt BgL_arg3610z00_1106;bool_t BgL_arg3611z00_1107;
BgL_arg3610z00_1106 = BgL_rz00_1103; 
BgL_arg3611z00_1107 = ((bool_t)0); 
{ /* ./SawMill/node2rtl.scm 55 */
BgL_rlocalz00_bglt BgL_res5814z00_2492;
{ /* ./SawMill/node2rtl.scm 55 */
obj_t BgL_reg3179z00_2483;obj_t BgL_code3180z00_2484;
BgL_reg3179z00_2483 = 
(obj_t)(BgL_arg3610z00_1106); 
BgL_code3180z00_2484 = 
BBOOL(BgL_arg3611z00_1107); 
{ /* ./SawMill/node2rtl.scm 55 */
BgL_rlocalz00_bglt BgL_new3181z00_2485;
BgL_new3181z00_2485 = 
((BgL_rlocalz00_bglt)BREF( GC_MALLOC (sizeof(struct BgL_rlocalz00_bgl)))); 
{ /* ./SawMill/node2rtl.scm 55 */
BgL_rlocalz00_bglt BgL_res5813z00_2491;
{ /* ./SawMill/node2rtl.scm 55 */
BgL_rlocalz00_bglt BgL_new3199z00_2486;
BgL_new3199z00_2486 = BgL_new3181z00_2485; 
{ /* ./SawMill/node2rtl.scm 55 */
obj_t BgL_reg3197z00_2489;obj_t BgL_code3198z00_2490;
BgL_reg3197z00_2489 = BgL_reg3179z00_2483; 
BgL_code3198z00_2490 = BgL_code3180z00_2484; 
((((BgL_rlocalz00_bglt)CREF(BgL_new3199z00_2486))->BgL_regz00) = ((obj_t)BgL_reg3197z00_2489), BUNSPEC); 
((((BgL_rlocalz00_bglt)CREF(BgL_new3199z00_2486))->BgL_codez00) = ((obj_t)BgL_code3198z00_2490), BUNSPEC); 
BgL_res5813z00_2491 = BgL_new3199z00_2486; } } BgL_res5813z00_2491; } 
BgL_res5814z00_2492 = BgL_new3181z00_2485; } } 
BgL_arg3607z00_1105 = BgL_res5814z00_2492; } } 
{ /* ./SawMill/node2rtl.scm 55 */
obj_t BgL_auxz00_4000;BgL_objectz00_bglt BgL_auxz00_3998;
BgL_auxz00_4000 = 
(obj_t)(BgL_arg3607z00_1105); 
BgL_auxz00_3998 = 
(BgL_objectz00_bglt)(BgL_obj3250z00_1104); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_3998, BgL_auxz00_4000); } } 
{ /* ./SawMill/node2rtl.scm 55 */
long BgL_arg3614z00_1108;
BgL_arg3614z00_1108 = 
BGl_classzd2numzd2zz__objectz00(BGl_rlocalz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 55 */
BgL_objectz00_bglt BgL_objz00_2493;
BgL_objz00_2493 = 
(BgL_objectz00_bglt)(BgL_obj3250z00_1104); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2493, BgL_arg3614z00_1108); } } 
{ /* ./SawMill/node2rtl.scm 55 */
obj_t BgL_objz00_2495;
BgL_objz00_2495 = 
(obj_t)(BgL_obj3250z00_1104); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2495); BUNSPEC; } BgL_obj3250z00_1104; } 
return BgL_rz00_1103;} } } 
}



/* _local->reg */
obj_t BGl__localzd2ze3regz31zzsaw_node2rtlz00(obj_t BgL_envz00_3724, obj_t BgL_varz00_3725)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 51 */
{ /* ./SawMill/node2rtl.scm 52 */
BgL_rtl_regz00_bglt BgL_auxz00_4008;
BgL_auxz00_4008 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_varz00_3725)); 
return 
(obj_t)(BgL_auxz00_4008);} } 
}



/* bdestination! */
obj_t BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_blockz00_bglt BgL_bz00_21, BgL_rtl_regz00_bglt BgL_regz00_22)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 64 */
{ /* ./SawMill/node2rtl.scm 65 */
obj_t BgL_insz00_1111;
{ /* ./SawMill/node2rtl.scm 65 */
obj_t BgL_auxz00_4012;
BgL_auxz00_4012 = 
BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00(
(((BgL_blockz00_bglt)CREF(BgL_bz00_21))->BgL_firstz00)); 
BgL_insz00_1111 = 
CAR(BgL_auxz00_4012); } 
{ /* ./SawMill/node2rtl.scm 66 */
bool_t BgL_test3627z00_1112;
{ /* ./SawMill/node2rtl.scm 66 */
bool_t BgL_test3629z00_1113;
{ /* ./SawMill/node2rtl.scm 66 */
BgL_rtl_funz00_bglt BgL_arg3639z00_1117;
{ /* ./SawMill/node2rtl.scm 66 */
BgL_rtl_insz00_bglt BgL_obj3070z00_2503;
BgL_obj3070z00_2503 = 
(BgL_rtl_insz00_bglt)(BgL_insz00_1111); 
BgL_arg3639z00_1117 = 
(((BgL_rtl_insz00_bglt)CREF(BgL_obj3070z00_2503))->BgL_funz00); } 
{ /* ./SawMill/node2rtl.scm 66 */
obj_t BgL_obj2798z00_2504;
BgL_obj2798z00_2504 = 
(obj_t)(BgL_arg3639z00_1117); 
BgL_test3629z00_1113 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2798z00_2504, BGl_rtl_movz00zzsaw_defsz00); } } 
if(BgL_test3629z00_1113)
{ /* ./SawMill/node2rtl.scm 67 */
bool_t BgL_testz00_4021;
{ /* ./SawMill/node2rtl.scm 67 */
obj_t BgL_auxz00_4027;obj_t BgL_auxz00_4022;
BgL_auxz00_4027 = 
(obj_t)(BgL_regz00_22); 
{ /* ./SawMill/node2rtl.scm 67 */
obj_t BgL_auxz00_4023;
{ /* ./SawMill/node2rtl.scm 67 */
BgL_rtl_insz00_bglt BgL_obj3073z00_2505;
BgL_obj3073z00_2505 = 
(BgL_rtl_insz00_bglt)(BgL_insz00_1111); 
BgL_auxz00_4023 = 
(((BgL_rtl_insz00_bglt)CREF(BgL_obj3073z00_2505))->BgL_argsz00); } 
BgL_auxz00_4022 = 
CAR(BgL_auxz00_4023); } 
BgL_testz00_4021 = 
(BgL_auxz00_4022==BgL_auxz00_4027); } 
if(BgL_testz00_4021)
{ /* ./SawMill/node2rtl.scm 67 */
BgL_test3627z00_1112 = ((bool_t)0); }  else 
{ /* ./SawMill/node2rtl.scm 67 */
BgL_test3627z00_1112 = ((bool_t)1); } }  else 
{ /* ./SawMill/node2rtl.scm 66 */
BgL_test3627z00_1112 = ((bool_t)1); } } 
if(BgL_test3627z00_1112)
{ /* ./SawMill/node2rtl.scm 68 */
BgL_rtl_insz00_bglt BgL_obj3069z00_2507;obj_t BgL_val3067z00_2508;
BgL_obj3069z00_2507 = 
(BgL_rtl_insz00_bglt)(BgL_insz00_1111); 
BgL_val3067z00_2508 = 
(obj_t)(BgL_regz00_22); 
return 
((((BgL_rtl_insz00_bglt)CREF(BgL_obj3069z00_2507))->BgL_destz00) = ((obj_t)BgL_val3067z00_2508), BUNSPEC);}  else 
{ /* ./SawMill/node2rtl.scm 66 */
return BFALSE;} } } } 
}



/* single* */
BgL_areaz00_bglt BGl_singleza2za2zzsaw_node2rtlz00(obj_t BgL_ez00_23, BgL_rtl_funz00_bglt BgL_funz00_24, obj_t BgL_argsz00_25)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 73 */
{ /* ./SawMill/node2rtl.scm 74 */
BgL_rtl_insz00_bglt BgL_insz00_1120;
{ /* ./SawMill/node2rtl.scm 74 */
BgL_rtl_funz00_bglt BgL_arg3667z00_1131;obj_t BgL_arg3668z00_1132;
BgL_arg3667z00_1131 = BgL_funz00_24; 
BgL_arg3668z00_1132 = BgL_argsz00_25; 
BgL_insz00_1120 = 
BGl_makezd2rtl_inszd2zzsaw_defsz00(BFALSE, BFALSE, BgL_arg3667z00_1131, BgL_arg3668z00_1132); } 
{ /* ./SawMill/node2rtl.scm 75 */
bool_t BgL_test3649z00_1121;
BgL_test3649z00_1121 = 
BGl_iszd2azf3z21zz__objectz00(BgL_ez00_23, BGl_nodez00zzast_nodez00); 
if(BgL_test3649z00_1121)
{ /* ./SawMill/node2rtl.scm 76 */
obj_t BgL_arg3651z00_1122;
{ /* ./SawMill/node2rtl.scm 76 */
BgL_nodez00_bglt BgL_obj1560z00_2510;
BgL_obj1560z00_2510 = 
(BgL_nodez00_bglt)(BgL_ez00_23); 
BgL_arg3651z00_1122 = 
(((BgL_nodez00_bglt)CREF(BgL_obj1560z00_2510))->BgL_locz00); } 
{ /* ./SawMill/node2rtl.scm 76 */
BgL_rtl_insz00_bglt BgL_obj3065z00_2511;obj_t BgL_val3064z00_2512;
BgL_obj3065z00_2511 = BgL_insz00_1120; 
BgL_val3064z00_2512 = BgL_arg3651z00_1122; 
((((BgL_rtl_insz00_bglt)CREF(BgL_obj3065z00_2511))->BgL_locz00) = ((obj_t)BgL_val3064z00_2512), BUNSPEC); } }  else 
{ /* ./SawMill/node2rtl.scm 75 */BFALSE; } } 
{ /* ./SawMill/node2rtl.scm 77 */
obj_t BgL_lz00_1123;
{ /* ./SawMill/node2rtl.scm 77 */
obj_t BgL_auxz00_4040;
BgL_auxz00_4040 = 
(obj_t)(BgL_insz00_1120); 
BgL_lz00_1123 = 
MAKE_PAIR(BgL_auxz00_4040, BNIL); } 
{ /* ./SawMill/node2rtl.scm 78 */
BgL_blockz00_bglt BgL_bz00_1124;
{ /* ./SawMill/node2rtl.scm 78 */
obj_t BgL_arg3663z00_1130;
BgL_arg3663z00_1130 = BgL_lz00_1123; 
BgL_bz00_1124 = 
BGl_makezd2blockzd2zzsaw_defsz00(
(int)(((long)0)), BNIL, BNIL, BgL_arg3663z00_1130); } 
{ /* ./SawMill/node2rtl.scm 79 */
BgL_blockz00_bglt BgL_arg3656z00_1125;BgL_blockz00_bglt BgL_arg3657z00_1126;
BgL_arg3656z00_1125 = BgL_bz00_1124; 
BgL_arg3657z00_1126 = BgL_bz00_1124; 
{ /* ./SawMill/node2rtl.scm 79 */
BgL_areaz00_bglt BgL_res5817z00_2528;
{ /* ./SawMill/node2rtl.scm 79 */
BgL_areaz00_bglt BgL_new3129z00_2515;
{ /* ./SawMill/node2rtl.scm 79 */
BgL_areaz00_bglt BgL_res5815z00_2521;
{ /* ./SawMill/node2rtl.scm 79 */
BgL_areaz00_bglt BgL_new3137z00_2516;
BgL_new3137z00_2516 = 
((BgL_areaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_areaz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 79 */
long BgL_arg4252z00_2517;
BgL_arg4252z00_2517 = 
BGl_classzd2numzd2zz__objectz00(BGl_areaz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 79 */
BgL_objectz00_bglt BgL_objz00_2518;
BgL_objz00_2518 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2516); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2518, BgL_arg4252z00_2517); } } 
{ /* ./SawMill/node2rtl.scm 79 */
BgL_objectz00_bglt BgL_auxz00_4049;
BgL_auxz00_4049 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2516); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4049, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 79 */
obj_t BgL_objz00_2520;
BgL_objz00_2520 = 
(obj_t)(BgL_new3137z00_2516); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2520); BUNSPEC; } 
BgL_res5815z00_2521 = BgL_new3137z00_2516; } 
BgL_new3129z00_2515 = BgL_res5815z00_2521; } 
{ /* ./SawMill/node2rtl.scm 79 */
BgL_areaz00_bglt BgL_res5816z00_2527;
{ /* ./SawMill/node2rtl.scm 79 */
BgL_areaz00_bglt BgL_new3133z00_2522;
BgL_new3133z00_2522 = BgL_new3129z00_2515; 
{ /* ./SawMill/node2rtl.scm 79 */
BgL_blockz00_bglt BgL_entry3131z00_2525;BgL_blockz00_bglt BgL_exit3132z00_2526;
BgL_entry3131z00_2525 = BgL_arg3656z00_1125; 
BgL_exit3132z00_2526 = BgL_arg3657z00_1126; 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2522))->BgL_entryz00) = ((BgL_blockz00_bglt)BgL_entry3131z00_2525), BUNSPEC); 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2522))->BgL_exitz00) = ((BgL_blockz00_bglt)BgL_exit3132z00_2526), BUNSPEC); 
BgL_res5816z00_2527 = BgL_new3133z00_2522; } } BgL_res5816z00_2527; } 
BgL_res5817z00_2528 = BgL_new3129z00_2515; } 
return BgL_res5817z00_2528;} } } } } } 
}



/* unlink */
BgL_areaz00_bglt BGl_unlinkz00zzsaw_node2rtlz00(BgL_areaz00_bglt BgL_az00_31)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 87 */
{ /* ./SawMill/node2rtl.scm 88 */
BgL_blockz00_bglt BgL_arg3676z00_1134;BgL_blockz00_bglt BgL_arg3677z00_1135;
BgL_arg3676z00_1134 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_31))->BgL_entryz00); 
{ /* ./SawMill/node2rtl.scm 90 */
BgL_areaz00_bglt BgL_arg3681z00_1136;
{ /* ./SawMill/node2rtl.scm 90 */
BgL_rtl_nopz00_bglt BgL_arg3684z00_1137;
BgL_arg3684z00_1137 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 90 */
BgL_rtl_funz00_bglt BgL_funz00_2533;
BgL_funz00_2533 = 
(BgL_rtl_funz00_bglt)(BgL_arg3684z00_1137); 
BgL_arg3681z00_1136 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2533, BNIL); } } 
BgL_arg3677z00_1135 = 
(((BgL_areaz00_bglt)CREF(BgL_arg3681z00_1136))->BgL_exitz00); } 
{ /* ./SawMill/node2rtl.scm 88 */
BgL_areaz00_bglt BgL_res5820z00_2551;
{ /* ./SawMill/node2rtl.scm 88 */
BgL_areaz00_bglt BgL_new3129z00_2538;
{ /* ./SawMill/node2rtl.scm 88 */
BgL_areaz00_bglt BgL_res5818z00_2544;
{ /* ./SawMill/node2rtl.scm 88 */
BgL_areaz00_bglt BgL_new3137z00_2539;
BgL_new3137z00_2539 = 
((BgL_areaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_areaz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 88 */
long BgL_arg4252z00_2540;
BgL_arg4252z00_2540 = 
BGl_classzd2numzd2zz__objectz00(BGl_areaz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 88 */
BgL_objectz00_bglt BgL_objz00_2541;
BgL_objz00_2541 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2539); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2541, BgL_arg4252z00_2540); } } 
{ /* ./SawMill/node2rtl.scm 88 */
BgL_objectz00_bglt BgL_auxz00_4065;
BgL_auxz00_4065 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2539); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4065, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 88 */
obj_t BgL_objz00_2543;
BgL_objz00_2543 = 
(obj_t)(BgL_new3137z00_2539); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2543); BUNSPEC; } 
BgL_res5818z00_2544 = BgL_new3137z00_2539; } 
BgL_new3129z00_2538 = BgL_res5818z00_2544; } 
{ /* ./SawMill/node2rtl.scm 88 */
BgL_areaz00_bglt BgL_res5819z00_2550;
{ /* ./SawMill/node2rtl.scm 88 */
BgL_areaz00_bglt BgL_new3133z00_2545;
BgL_new3133z00_2545 = BgL_new3129z00_2538; 
{ /* ./SawMill/node2rtl.scm 88 */
BgL_blockz00_bglt BgL_entry3131z00_2548;BgL_blockz00_bglt BgL_exit3132z00_2549;
BgL_entry3131z00_2548 = BgL_arg3676z00_1134; 
BgL_exit3132z00_2549 = BgL_arg3677z00_1135; 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2545))->BgL_entryz00) = ((BgL_blockz00_bglt)BgL_entry3131z00_2548), BUNSPEC); 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2545))->BgL_exitz00) = ((BgL_blockz00_bglt)BgL_exit3132z00_2549), BUNSPEC); 
BgL_res5819z00_2550 = BgL_new3133z00_2545; } } BgL_res5819z00_2550; } 
BgL_res5820z00_2551 = BgL_new3129z00_2538; } 
return BgL_res5820z00_2551;} } } 
}



/* link */
BgL_areaz00_bglt BGl_linkz00zzsaw_node2rtlz00(BgL_areaz00_bglt BgL_b1z00_32, BgL_areaz00_bglt BgL_b2z00_33)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 92 */
{ /* ./SawMill/node2rtl.scm 93 */
BgL_blockz00_bglt BgL_arg3689z00_1139;BgL_blockz00_bglt BgL_arg3690z00_1140;
BgL_arg3689z00_1139 = 
(((BgL_areaz00_bglt)CREF(BgL_b1z00_32))->BgL_exitz00); 
BgL_arg3690z00_1140 = 
(((BgL_areaz00_bglt)CREF(BgL_b2z00_33))->BgL_entryz00); 
{ /* ./SawMill/node2rtl.scm 93 */
obj_t BgL_arg3621z00_2556;
{ /* ./SawMill/node2rtl.scm 93 */
obj_t BgL_arg3624z00_2557;
BgL_arg3624z00_2557 = 
(((BgL_blockz00_bglt)CREF(BgL_arg3689z00_1139))->BgL_succsz00); 
{ /* ./SawMill/node2rtl.scm 93 */
obj_t BgL_auxz00_4075;
BgL_auxz00_4075 = 
(obj_t)(BgL_arg3690z00_1140); 
BgL_arg3621z00_2556 = 
MAKE_PAIR(BgL_auxz00_4075, BgL_arg3624z00_2557); } } 
{ /* ./SawMill/node2rtl.scm 93 */
BgL_blockz00_bglt BgL_obj3100z00_2559;obj_t BgL_val3099z00_2560;
BgL_obj3100z00_2559 = BgL_arg3689z00_1139; 
BgL_val3099z00_2560 = BgL_arg3621z00_2556; 
((((BgL_blockz00_bglt)CREF(BgL_obj3100z00_2559))->BgL_succsz00) = ((obj_t)BgL_val3099z00_2560), BUNSPEC); } } } 
{ /* ./SawMill/node2rtl.scm 94 */
BgL_blockz00_bglt BgL_arg3695z00_1141;BgL_blockz00_bglt BgL_arg3697z00_1142;
BgL_arg3695z00_1141 = 
(((BgL_areaz00_bglt)CREF(BgL_b1z00_32))->BgL_entryz00); 
BgL_arg3697z00_1142 = 
(((BgL_areaz00_bglt)CREF(BgL_b2z00_33))->BgL_exitz00); 
{ /* ./SawMill/node2rtl.scm 94 */
BgL_areaz00_bglt BgL_res5823z00_2578;
{ /* ./SawMill/node2rtl.scm 94 */
BgL_areaz00_bglt BgL_new3129z00_2565;
{ /* ./SawMill/node2rtl.scm 94 */
BgL_areaz00_bglt BgL_res5821z00_2571;
{ /* ./SawMill/node2rtl.scm 94 */
BgL_areaz00_bglt BgL_new3137z00_2566;
BgL_new3137z00_2566 = 
((BgL_areaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_areaz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 94 */
long BgL_arg4252z00_2567;
BgL_arg4252z00_2567 = 
BGl_classzd2numzd2zz__objectz00(BGl_areaz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 94 */
BgL_objectz00_bglt BgL_objz00_2568;
BgL_objz00_2568 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2566); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2568, BgL_arg4252z00_2567); } } 
{ /* ./SawMill/node2rtl.scm 94 */
BgL_objectz00_bglt BgL_auxz00_4085;
BgL_auxz00_4085 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2566); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4085, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 94 */
obj_t BgL_objz00_2570;
BgL_objz00_2570 = 
(obj_t)(BgL_new3137z00_2566); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2570); BUNSPEC; } 
BgL_res5821z00_2571 = BgL_new3137z00_2566; } 
BgL_new3129z00_2565 = BgL_res5821z00_2571; } 
{ /* ./SawMill/node2rtl.scm 94 */
BgL_areaz00_bglt BgL_res5822z00_2577;
{ /* ./SawMill/node2rtl.scm 94 */
BgL_areaz00_bglt BgL_new3133z00_2572;
BgL_new3133z00_2572 = BgL_new3129z00_2565; 
{ /* ./SawMill/node2rtl.scm 94 */
BgL_blockz00_bglt BgL_entry3131z00_2575;BgL_blockz00_bglt BgL_exit3132z00_2576;
BgL_entry3131z00_2575 = BgL_arg3695z00_1141; 
BgL_exit3132z00_2576 = BgL_arg3697z00_1142; 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2572))->BgL_entryz00) = ((BgL_blockz00_bglt)BgL_entry3131z00_2575), BUNSPEC); 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2572))->BgL_exitz00) = ((BgL_blockz00_bglt)BgL_exit3132z00_2576), BUNSPEC); 
BgL_res5822z00_2577 = BgL_new3133z00_2572; } } BgL_res5822z00_2577; } 
BgL_res5823z00_2578 = BgL_new3129z00_2565; } 
return BgL_res5823z00_2578;} } } 
}



/* link* */
BgL_areaz00_bglt BGl_linkza2za2zzsaw_node2rtlz00(obj_t BgL_lz00_34)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 96 */
{ 
BgL_areaz00_bglt BgL_rz00_1149;obj_t BgL_lz00_1150;
{ /* ./SawMill/node2rtl.scm 101 */
bool_t BgL_test3701z00_1144;
BgL_test3701z00_1144 = 
NULLP(BgL_lz00_34); 
if(BgL_test3701z00_1144)
{ /* ./SawMill/node2rtl.scm 102 */
BgL_rtl_nopz00_bglt BgL_arg3703z00_1145;
BgL_arg3703z00_1145 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 102 */
BgL_rtl_funz00_bglt BgL_funz00_2581;
BgL_funz00_2581 = 
(BgL_rtl_funz00_bglt)(BgL_arg3703z00_1145); 
return 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2581, BNIL);} }  else 
{ /* ./SawMill/node2rtl.scm 103 */
obj_t BgL_arg3708z00_1147;obj_t BgL_arg3709z00_1148;
BgL_arg3708z00_1147 = 
CAR(BgL_lz00_34); 
BgL_arg3709z00_1148 = 
CDR(BgL_lz00_34); 
BgL_rz00_1149 = 
(BgL_areaz00_bglt)(BgL_arg3708z00_1147); 
BgL_lz00_1150 = BgL_arg3709z00_1148; 
BgL_zc3anonymousza33714ze3z83_1151:
{ /* ./SawMill/node2rtl.scm 98 */
bool_t BgL_test3715z00_1152;
BgL_test3715z00_1152 = 
NULLP(BgL_lz00_1150); 
if(BgL_test3715z00_1152)
{ /* ./SawMill/node2rtl.scm 98 */
return BgL_rz00_1149;}  else 
{ /* ./SawMill/node2rtl.scm 100 */
BgL_areaz00_bglt BgL_arg3717z00_1153;obj_t BgL_arg3718z00_1154;
{ /* ./SawMill/node2rtl.scm 100 */
obj_t BgL_arg3721z00_1155;
BgL_arg3721z00_1155 = 
CAR(BgL_lz00_1150); 
BgL_arg3717z00_1153 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_rz00_1149, 
(BgL_areaz00_bglt)(BgL_arg3721z00_1155)); } 
BgL_arg3718z00_1154 = 
CDR(BgL_lz00_1150); 
{ 
obj_t BgL_lz00_4106;BgL_areaz00_bglt BgL_rz00_4105;
BgL_rz00_4105 = BgL_arg3717z00_1153; 
BgL_lz00_4106 = BgL_arg3718z00_1154; 
BgL_lz00_1150 = BgL_lz00_4106; 
BgL_rz00_1149 = BgL_rz00_4105; 
goto BgL_zc3anonymousza33714ze3z83_1151;} } } } } } } 
}



/* fork/join */
BgL_areaz00_bglt BGl_forkzf2joinzf2zzsaw_node2rtlz00(BgL_areaz00_bglt BgL_headz00_35, obj_t BgL_contsz00_36, BgL_rtl_regz00_bglt BgL_rz00_37)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 105 */
{ /* ./SawMill/node2rtl.scm 107 */
BgL_blockz00_bglt BgL_arg3728z00_1157;obj_t BgL_arg3729z00_1158;
BgL_arg3728z00_1157 = 
(((BgL_areaz00_bglt)CREF(BgL_headz00_35))->BgL_exitz00); 
{ /* ./SawMill/node2rtl.scm 107 */
bool_t BgL_test3732z00_1160;
BgL_test3732z00_1160 = 
NULLP(BgL_contsz00_36); 
if(BgL_test3732z00_1160)
{ /* ./SawMill/node2rtl.scm 107 */
BgL_arg3729z00_1158 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_head3260z00_1161;
{ /* ./SawMill/node2rtl.scm 107 */
BgL_blockz00_bglt BgL_arg3753z00_1172;
{ /* ./SawMill/node2rtl.scm 107 */
BgL_areaz00_bglt BgL_obj3120z00_2591;
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_auxz00_4111;
BgL_auxz00_4111 = 
CAR(BgL_contsz00_36); 
BgL_obj3120z00_2591 = 
(BgL_areaz00_bglt)(BgL_auxz00_4111); } 
BgL_arg3753z00_1172 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3120z00_2591))->BgL_entryz00); } 
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_obj1z00_2592;
BgL_obj1z00_2592 = 
(obj_t)(BgL_arg3753z00_1172); 
BgL_head3260z00_1161 = 
MAKE_PAIR(BgL_obj1z00_2592, BNIL); } } 
{ 
obj_t BgL_l3258z00_1162;obj_t BgL_tail3261z00_1163;
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_arg3734z00_1165;
BgL_arg3734z00_1165 = 
CDR(BgL_contsz00_36); 
BgL_l3258z00_1162 = BgL_arg3734z00_1165; 
BgL_tail3261z00_1163 = BgL_head3260z00_1161; 
BgL_map3259z00_1164:
{ /* ./SawMill/node2rtl.scm 107 */
bool_t BgL_test3737z00_1166;
BgL_test3737z00_1166 = 
NULLP(BgL_l3258z00_1162); 
if(BgL_test3737z00_1166)
{ /* ./SawMill/node2rtl.scm 107 */
BgL_arg3729z00_1158 = BgL_head3260z00_1161; }  else 
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_newtail3262z00_1167;
{ /* ./SawMill/node2rtl.scm 107 */
BgL_blockz00_bglt BgL_arg3744z00_1169;
{ /* ./SawMill/node2rtl.scm 107 */
BgL_areaz00_bglt BgL_obj3120z00_2597;
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_auxz00_4120;
BgL_auxz00_4120 = 
CAR(BgL_l3258z00_1162); 
BgL_obj3120z00_2597 = 
(BgL_areaz00_bglt)(BgL_auxz00_4120); } 
BgL_arg3744z00_1169 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3120z00_2597))->BgL_entryz00); } 
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_obj1z00_2598;
BgL_obj1z00_2598 = 
(obj_t)(BgL_arg3744z00_1169); 
BgL_newtail3262z00_1167 = 
MAKE_PAIR(BgL_obj1z00_2598, BNIL); } } 
SET_CDR(BgL_tail3261z00_1163, BgL_newtail3262z00_1167); 
{ /* ./SawMill/node2rtl.scm 107 */
obj_t BgL_arg3740z00_1168;
BgL_arg3740z00_1168 = 
CDR(BgL_l3258z00_1162); 
{ 
obj_t BgL_tail3261z00_4129;obj_t BgL_l3258z00_4128;
BgL_l3258z00_4128 = BgL_arg3740z00_1168; 
BgL_tail3261z00_4129 = BgL_newtail3262z00_1167; 
BgL_tail3261z00_1163 = BgL_tail3261z00_4129; 
BgL_l3258z00_1162 = BgL_l3258z00_4128; 
goto BgL_map3259z00_1164;} } } } } } } } 
{ /* ./SawMill/node2rtl.scm 107 */
BgL_blockz00_bglt BgL_obj3100z00_2603;obj_t BgL_val3099z00_2604;
BgL_obj3100z00_2603 = BgL_arg3728z00_1157; 
BgL_val3099z00_2604 = BgL_arg3729z00_1158; 
((((BgL_blockz00_bglt)CREF(BgL_obj3100z00_2603))->BgL_succsz00) = ((obj_t)BgL_val3099z00_2604), BUNSPEC); } } 
{ /* ./SawMill/node2rtl.scm 109 */
BgL_blockz00_bglt BgL_joinz00_1175;
{ /* ./SawMill/node2rtl.scm 109 */
BgL_areaz00_bglt BgL_arg3778z00_1184;
{ /* ./SawMill/node2rtl.scm 109 */
BgL_rtl_movz00_bglt BgL_arg3781z00_1185;
BgL_arg3781z00_1185 = 
BGl_makezd2rtl_movzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 109 */
obj_t BgL_list3783z00_1186;
{ /* ./SawMill/node2rtl.scm 109 */
obj_t BgL_auxz00_4132;
BgL_auxz00_4132 = 
(obj_t)(BgL_rz00_37); 
BgL_list3783z00_1186 = 
MAKE_PAIR(BgL_auxz00_4132, BNIL); } 
{ /* ./SawMill/node2rtl.scm 109 */
BgL_rtl_funz00_bglt BgL_funz00_2606;
BgL_funz00_2606 = 
(BgL_rtl_funz00_bglt)(BgL_arg3781z00_1185); 
BgL_arg3778z00_1184 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2606, BgL_list3783z00_1186); } } } 
BgL_joinz00_1175 = 
(((BgL_areaz00_bglt)CREF(BgL_arg3778z00_1184))->BgL_entryz00); } 
{ 
obj_t BgL_l3264z00_1176;
BgL_l3264z00_1176 = BgL_contsz00_36; 
BgL_forzd2each3265zd2_1177:
{ /* ./SawMill/node2rtl.scm 110 */
bool_t BgL_test3762z00_1178;
BgL_test3762z00_1178 = 
PAIRP(BgL_l3264z00_1176); 
if(BgL_test3762z00_1178)
{ /* ./SawMill/node2rtl.scm 110 */
{ /* ./SawMill/node2rtl.scm 111 */
BgL_areaz00_bglt BgL_az00_1179;
{ /* ./SawMill/node2rtl.scm 111 */
obj_t BgL_auxz00_4140;
BgL_auxz00_4140 = 
CAR(BgL_l3264z00_1176); 
BgL_az00_1179 = 
(BgL_areaz00_bglt)(BgL_auxz00_4140); } 
{ /* ./SawMill/node2rtl.scm 111 */
BgL_blockz00_bglt BgL_bz00_1180;
BgL_bz00_1180 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_1179))->BgL_exitz00); 
{ /* ./SawMill/node2rtl.scm 112 */
obj_t BgL_arg3621z00_2614;
{ /* ./SawMill/node2rtl.scm 112 */
obj_t BgL_arg3624z00_2615;
BgL_arg3624z00_2615 = 
(((BgL_blockz00_bglt)CREF(BgL_bz00_1180))->BgL_succsz00); 
{ /* ./SawMill/node2rtl.scm 112 */
obj_t BgL_auxz00_4145;
BgL_auxz00_4145 = 
(obj_t)(BgL_joinz00_1175); 
BgL_arg3621z00_2614 = 
MAKE_PAIR(BgL_auxz00_4145, BgL_arg3624z00_2615); } } 
{ /* ./SawMill/node2rtl.scm 112 */
BgL_blockz00_bglt BgL_obj3100z00_2617;obj_t BgL_val3099z00_2618;
BgL_obj3100z00_2617 = BgL_bz00_1180; 
BgL_val3099z00_2618 = BgL_arg3621z00_2614; 
((((BgL_blockz00_bglt)CREF(BgL_obj3100z00_2617))->BgL_succsz00) = ((obj_t)BgL_val3099z00_2618), BUNSPEC); } } 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_bz00_1180, BgL_rz00_37); } } 
{ /* ./SawMill/node2rtl.scm 110 */
obj_t BgL_arg3768z00_1181;
BgL_arg3768z00_1181 = 
CDR(BgL_l3264z00_1176); 
{ 
obj_t BgL_l3264z00_4151;
BgL_l3264z00_4151 = BgL_arg3768z00_1181; 
BgL_l3264z00_1176 = BgL_l3264z00_4151; 
goto BgL_forzd2each3265zd2_1177;} } }  else 
{ /* ./SawMill/node2rtl.scm 110 */((bool_t)1); } } } 
{ /* ./SawMill/node2rtl.scm 116 */
BgL_blockz00_bglt BgL_arg3773z00_1182;BgL_blockz00_bglt BgL_arg3774z00_1183;
BgL_arg3773z00_1182 = 
(((BgL_areaz00_bglt)CREF(BgL_headz00_35))->BgL_entryz00); 
BgL_arg3774z00_1183 = BgL_joinz00_1175; 
{ /* ./SawMill/node2rtl.scm 116 */
BgL_areaz00_bglt BgL_res5826z00_2636;
{ /* ./SawMill/node2rtl.scm 116 */
BgL_areaz00_bglt BgL_new3129z00_2623;
{ /* ./SawMill/node2rtl.scm 116 */
BgL_areaz00_bglt BgL_res5824z00_2629;
{ /* ./SawMill/node2rtl.scm 116 */
BgL_areaz00_bglt BgL_new3137z00_2624;
BgL_new3137z00_2624 = 
((BgL_areaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_areaz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 116 */
long BgL_arg4252z00_2625;
BgL_arg4252z00_2625 = 
BGl_classzd2numzd2zz__objectz00(BGl_areaz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 116 */
BgL_objectz00_bglt BgL_objz00_2626;
BgL_objz00_2626 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2624); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2626, BgL_arg4252z00_2625); } } 
{ /* ./SawMill/node2rtl.scm 116 */
BgL_objectz00_bglt BgL_auxz00_4157;
BgL_auxz00_4157 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2624); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4157, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 116 */
obj_t BgL_objz00_2628;
BgL_objz00_2628 = 
(obj_t)(BgL_new3137z00_2624); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2628); BUNSPEC; } 
BgL_res5824z00_2629 = BgL_new3137z00_2624; } 
BgL_new3129z00_2623 = BgL_res5824z00_2629; } 
{ /* ./SawMill/node2rtl.scm 116 */
BgL_areaz00_bglt BgL_res5825z00_2635;
{ /* ./SawMill/node2rtl.scm 116 */
BgL_areaz00_bglt BgL_new3133z00_2630;
BgL_new3133z00_2630 = BgL_new3129z00_2623; 
{ /* ./SawMill/node2rtl.scm 116 */
BgL_blockz00_bglt BgL_entry3131z00_2633;BgL_blockz00_bglt BgL_exit3132z00_2634;
BgL_entry3131z00_2633 = BgL_arg3773z00_1182; 
BgL_exit3132z00_2634 = BgL_arg3774z00_1183; 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2630))->BgL_entryz00) = ((BgL_blockz00_bglt)BgL_entry3131z00_2633), BUNSPEC); 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2630))->BgL_exitz00) = ((BgL_blockz00_bglt)BgL_exit3132z00_2634), BUNSPEC); 
BgL_res5825z00_2635 = BgL_new3133z00_2630; } } BgL_res5825z00_2635; } 
BgL_res5826z00_2636 = BgL_new3129z00_2623; } 
return BgL_res5826z00_2636;} } } } 
}



/* join */
obj_t BGl_joinz00zzsaw_node2rtlz00(obj_t BgL_contsz00_38, BgL_rtl_regz00_bglt BgL_xrz00_39)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 118 */
{ /* ./SawMill/node2rtl.scm 119 */
obj_t BgL_rz00_1187;
BgL_rz00_1187 = 
BGl_findzd2registerzd2zzsaw_node2rtlz00(BgL_contsz00_38, BgL_xrz00_39); 
{ /* ./SawMill/node2rtl.scm 121 */
BgL_blockz00_bglt BgL_joinz00_1188;
{ /* ./SawMill/node2rtl.scm 121 */
BgL_areaz00_bglt BgL_arg3820z00_1209;
{ /* ./SawMill/node2rtl.scm 121 */
BgL_rtl_movz00_bglt BgL_arg3823z00_1210;
BgL_arg3823z00_1210 = 
BGl_makezd2rtl_movzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 121 */
obj_t BgL_list3825z00_1211;
BgL_list3825z00_1211 = 
MAKE_PAIR(BgL_rz00_1187, BNIL); 
{ /* ./SawMill/node2rtl.scm 121 */
BgL_rtl_funz00_bglt BgL_funz00_2638;
BgL_funz00_2638 = 
(BgL_rtl_funz00_bglt)(BgL_arg3823z00_1210); 
BgL_arg3820z00_1209 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2638, BgL_list3825z00_1211); } } } 
BgL_joinz00_1188 = 
(((BgL_areaz00_bglt)CREF(BgL_arg3820z00_1209))->BgL_entryz00); } 
{ 
obj_t BgL_l3268z00_1189;
BgL_l3268z00_1189 = BgL_contsz00_38; 
BgL_forzd2each3269zd2_1190:
{ /* ./SawMill/node2rtl.scm 122 */
bool_t BgL_test3787z00_1191;
BgL_test3787z00_1191 = 
PAIRP(BgL_l3268z00_1189); 
if(BgL_test3787z00_1191)
{ /* ./SawMill/node2rtl.scm 122 */
{ /* ./SawMill/node2rtl.scm 123 */
BgL_areaz00_bglt BgL_az00_1192;
{ /* ./SawMill/node2rtl.scm 123 */
obj_t BgL_auxz00_4172;
BgL_auxz00_4172 = 
CAR(BgL_l3268z00_1189); 
BgL_az00_1192 = 
(BgL_areaz00_bglt)(BgL_auxz00_4172); } 
{ /* ./SawMill/node2rtl.scm 123 */
BgL_blockz00_bglt BgL_bz00_1193;
BgL_bz00_1193 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_1192))->BgL_exitz00); 
{ /* ./SawMill/node2rtl.scm 124 */
obj_t BgL_arg3621z00_2646;
{ /* ./SawMill/node2rtl.scm 124 */
obj_t BgL_arg3624z00_2647;
BgL_arg3624z00_2647 = 
(((BgL_blockz00_bglt)CREF(BgL_bz00_1193))->BgL_succsz00); 
{ /* ./SawMill/node2rtl.scm 124 */
obj_t BgL_auxz00_4177;
BgL_auxz00_4177 = 
(obj_t)(BgL_joinz00_1188); 
BgL_arg3621z00_2646 = 
MAKE_PAIR(BgL_auxz00_4177, BgL_arg3624z00_2647); } } 
{ /* ./SawMill/node2rtl.scm 124 */
BgL_blockz00_bglt BgL_obj3100z00_2649;obj_t BgL_val3099z00_2650;
BgL_obj3100z00_2649 = BgL_bz00_1193; 
BgL_val3099z00_2650 = BgL_arg3621z00_2646; 
((((BgL_blockz00_bglt)CREF(BgL_obj3100z00_2649))->BgL_succsz00) = ((obj_t)BgL_val3099z00_2650), BUNSPEC); } } 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_bz00_1193, 
(BgL_rtl_regz00_bglt)(BgL_rz00_1187)); } } 
{ /* ./SawMill/node2rtl.scm 122 */
obj_t BgL_arg3793z00_1194;
BgL_arg3793z00_1194 = 
CDR(BgL_l3268z00_1189); 
{ 
obj_t BgL_l3268z00_4184;
BgL_l3268z00_4184 = BgL_arg3793z00_1194; 
BgL_l3268z00_1189 = BgL_l3268z00_4184; 
goto BgL_forzd2each3269zd2_1190;} } }  else 
{ /* ./SawMill/node2rtl.scm 122 */((bool_t)1); } } } 
{ /* ./SawMill/node2rtl.scm 128 */
bool_t BgL_test3797z00_1196;
BgL_test3797z00_1196 = 
NULLP(BgL_contsz00_38); 
if(BgL_test3797z00_1196)
{ /* ./SawMill/node2rtl.scm 128 */
return BNIL;}  else 
{ /* ./SawMill/node2rtl.scm 128 */
obj_t BgL_head3272z00_1197;
BgL_head3272z00_1197 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3270z00_1198;obj_t BgL_tail3273z00_1199;
BgL_l3270z00_1198 = BgL_contsz00_38; 
BgL_tail3273z00_1199 = BgL_head3272z00_1197; 
BgL_map3271z00_1200:
{ /* ./SawMill/node2rtl.scm 128 */
bool_t BgL_test3799z00_1201;
BgL_test3799z00_1201 = 
NULLP(BgL_l3270z00_1198); 
if(BgL_test3799z00_1201)
{ /* ./SawMill/node2rtl.scm 128 */
return 
CDR(BgL_head3272z00_1197);}  else 
{ /* ./SawMill/node2rtl.scm 129 */
obj_t BgL_newtail3274z00_1202;
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_arg3807z00_1204;
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_az00_1206;
{ /* ./SawMill/node2rtl.scm 129 */
obj_t BgL_auxz00_4191;
BgL_auxz00_4191 = 
CAR(BgL_l3270z00_1198); 
BgL_az00_1206 = 
(BgL_areaz00_bglt)(BgL_auxz00_4191); } 
{ /* ./SawMill/node2rtl.scm 129 */
BgL_blockz00_bglt BgL_arg3811z00_1207;BgL_blockz00_bglt BgL_arg3812z00_1208;
BgL_arg3811z00_1207 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_1206))->BgL_entryz00); 
BgL_arg3812z00_1208 = BgL_joinz00_1188; 
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_res5829z00_2674;
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_new3129z00_2661;
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_res5827z00_2667;
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_new3137z00_2662;
BgL_new3137z00_2662 = 
((BgL_areaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_areaz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 129 */
long BgL_arg4252z00_2663;
BgL_arg4252z00_2663 = 
BGl_classzd2numzd2zz__objectz00(BGl_areaz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 129 */
BgL_objectz00_bglt BgL_objz00_2664;
BgL_objz00_2664 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2662); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2664, BgL_arg4252z00_2663); } } 
{ /* ./SawMill/node2rtl.scm 129 */
BgL_objectz00_bglt BgL_auxz00_4199;
BgL_auxz00_4199 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2662); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4199, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 129 */
obj_t BgL_objz00_2666;
BgL_objz00_2666 = 
(obj_t)(BgL_new3137z00_2662); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2666); BUNSPEC; } 
BgL_res5827z00_2667 = BgL_new3137z00_2662; } 
BgL_new3129z00_2661 = BgL_res5827z00_2667; } 
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_res5828z00_2673;
{ /* ./SawMill/node2rtl.scm 129 */
BgL_areaz00_bglt BgL_new3133z00_2668;
BgL_new3133z00_2668 = BgL_new3129z00_2661; 
{ /* ./SawMill/node2rtl.scm 129 */
BgL_blockz00_bglt BgL_entry3131z00_2671;BgL_blockz00_bglt BgL_exit3132z00_2672;
BgL_entry3131z00_2671 = BgL_arg3811z00_1207; 
BgL_exit3132z00_2672 = BgL_arg3812z00_1208; 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2668))->BgL_entryz00) = ((BgL_blockz00_bglt)BgL_entry3131z00_2671), BUNSPEC); 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2668))->BgL_exitz00) = ((BgL_blockz00_bglt)BgL_exit3132z00_2672), BUNSPEC); 
BgL_res5828z00_2673 = BgL_new3133z00_2668; } } BgL_res5828z00_2673; } 
BgL_res5829z00_2674 = BgL_new3129z00_2661; } 
BgL_arg3807z00_1204 = BgL_res5829z00_2674; } } } 
{ /* ./SawMill/node2rtl.scm 128 */
obj_t BgL_obj1z00_2675;
BgL_obj1z00_2675 = 
(obj_t)(BgL_arg3807z00_1204); 
BgL_newtail3274z00_1202 = 
MAKE_PAIR(BgL_obj1z00_2675, BNIL); } } 
SET_CDR(BgL_tail3273z00_1199, BgL_newtail3274z00_1202); 
{ /* ./SawMill/node2rtl.scm 128 */
obj_t BgL_arg3803z00_1203;
BgL_arg3803z00_1203 = 
CDR(BgL_l3270z00_1198); 
{ 
obj_t BgL_tail3273z00_4211;obj_t BgL_l3270z00_4210;
BgL_l3270z00_4210 = BgL_arg3803z00_1203; 
BgL_tail3273z00_4211 = BgL_newtail3274z00_1202; 
BgL_tail3273z00_1199 = BgL_tail3273z00_4211; 
BgL_l3270z00_1198 = BgL_l3270z00_4210; 
goto BgL_map3271z00_1200;} } } } } } } } } } 
}



/* fork */
BgL_areaz00_bglt BGl_forkz00zzsaw_node2rtlz00(BgL_areaz00_bglt BgL_headz00_40, obj_t BgL_joinedz00_41)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 132 */
{ /* ./SawMill/node2rtl.scm 134 */
BgL_blockz00_bglt BgL_arg3830z00_1212;obj_t BgL_arg3832z00_1213;
BgL_arg3830z00_1212 = 
(((BgL_areaz00_bglt)CREF(BgL_headz00_40))->BgL_exitz00); 
{ /* ./SawMill/node2rtl.scm 134 */
bool_t BgL_test3835z00_1215;
BgL_test3835z00_1215 = 
NULLP(BgL_joinedz00_41); 
if(BgL_test3835z00_1215)
{ /* ./SawMill/node2rtl.scm 134 */
BgL_arg3832z00_1213 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_head3278z00_1216;
{ /* ./SawMill/node2rtl.scm 134 */
BgL_blockz00_bglt BgL_arg3856z00_1227;
{ /* ./SawMill/node2rtl.scm 134 */
BgL_areaz00_bglt BgL_obj3120z00_2683;
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_auxz00_4215;
BgL_auxz00_4215 = 
CAR(BgL_joinedz00_41); 
BgL_obj3120z00_2683 = 
(BgL_areaz00_bglt)(BgL_auxz00_4215); } 
BgL_arg3856z00_1227 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3120z00_2683))->BgL_entryz00); } 
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_obj1z00_2684;
BgL_obj1z00_2684 = 
(obj_t)(BgL_arg3856z00_1227); 
BgL_head3278z00_1216 = 
MAKE_PAIR(BgL_obj1z00_2684, BNIL); } } 
{ 
obj_t BgL_l3276z00_1217;obj_t BgL_tail3279z00_1218;
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_arg3837z00_1220;
BgL_arg3837z00_1220 = 
CDR(BgL_joinedz00_41); 
BgL_l3276z00_1217 = BgL_arg3837z00_1220; 
BgL_tail3279z00_1218 = BgL_head3278z00_1216; 
BgL_map3277z00_1219:
{ /* ./SawMill/node2rtl.scm 134 */
bool_t BgL_test3840z00_1221;
BgL_test3840z00_1221 = 
NULLP(BgL_l3276z00_1217); 
if(BgL_test3840z00_1221)
{ /* ./SawMill/node2rtl.scm 134 */
BgL_arg3832z00_1213 = BgL_head3278z00_1216; }  else 
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_newtail3280z00_1222;
{ /* ./SawMill/node2rtl.scm 134 */
BgL_blockz00_bglt BgL_arg3847z00_1224;
{ /* ./SawMill/node2rtl.scm 134 */
BgL_areaz00_bglt BgL_obj3120z00_2689;
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_auxz00_4224;
BgL_auxz00_4224 = 
CAR(BgL_l3276z00_1217); 
BgL_obj3120z00_2689 = 
(BgL_areaz00_bglt)(BgL_auxz00_4224); } 
BgL_arg3847z00_1224 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3120z00_2689))->BgL_entryz00); } 
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_obj1z00_2690;
BgL_obj1z00_2690 = 
(obj_t)(BgL_arg3847z00_1224); 
BgL_newtail3280z00_1222 = 
MAKE_PAIR(BgL_obj1z00_2690, BNIL); } } 
SET_CDR(BgL_tail3279z00_1218, BgL_newtail3280z00_1222); 
{ /* ./SawMill/node2rtl.scm 134 */
obj_t BgL_arg3843z00_1223;
BgL_arg3843z00_1223 = 
CDR(BgL_l3276z00_1217); 
{ 
obj_t BgL_tail3279z00_4233;obj_t BgL_l3276z00_4232;
BgL_l3276z00_4232 = BgL_arg3843z00_1223; 
BgL_tail3279z00_4233 = BgL_newtail3280z00_1222; 
BgL_tail3279z00_1218 = BgL_tail3279z00_4233; 
BgL_l3276z00_1217 = BgL_l3276z00_4232; 
goto BgL_map3277z00_1219;} } } } } } } } 
{ /* ./SawMill/node2rtl.scm 134 */
BgL_blockz00_bglt BgL_obj3100z00_2695;obj_t BgL_val3099z00_2696;
BgL_obj3100z00_2695 = BgL_arg3830z00_1212; 
BgL_val3099z00_2696 = BgL_arg3832z00_1213; 
((((BgL_blockz00_bglt)CREF(BgL_obj3100z00_2695))->BgL_succsz00) = ((obj_t)BgL_val3099z00_2696), BUNSPEC); } } 
{ /* ./SawMill/node2rtl.scm 136 */
BgL_blockz00_bglt BgL_arg3865z00_1230;BgL_blockz00_bglt BgL_arg3866z00_1231;
BgL_arg3865z00_1230 = 
(((BgL_areaz00_bglt)CREF(BgL_headz00_40))->BgL_entryz00); 
{ /* ./SawMill/node2rtl.scm 137 */
BgL_areaz00_bglt BgL_obj3123z00_2699;
{ /* ./SawMill/node2rtl.scm 137 */
obj_t BgL_auxz00_4236;
BgL_auxz00_4236 = 
CAR(BgL_joinedz00_41); 
BgL_obj3123z00_2699 = 
(BgL_areaz00_bglt)(BgL_auxz00_4236); } 
BgL_arg3866z00_1231 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3123z00_2699))->BgL_exitz00); } 
{ /* ./SawMill/node2rtl.scm 136 */
BgL_areaz00_bglt BgL_res5832z00_2715;
{ /* ./SawMill/node2rtl.scm 136 */
BgL_areaz00_bglt BgL_new3129z00_2702;
{ /* ./SawMill/node2rtl.scm 136 */
BgL_areaz00_bglt BgL_res5830z00_2708;
{ /* ./SawMill/node2rtl.scm 136 */
BgL_areaz00_bglt BgL_new3137z00_2703;
BgL_new3137z00_2703 = 
((BgL_areaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_areaz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 136 */
long BgL_arg4252z00_2704;
BgL_arg4252z00_2704 = 
BGl_classzd2numzd2zz__objectz00(BGl_areaz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 136 */
BgL_objectz00_bglt BgL_objz00_2705;
BgL_objz00_2705 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2703); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2705, BgL_arg4252z00_2704); } } 
{ /* ./SawMill/node2rtl.scm 136 */
BgL_objectz00_bglt BgL_auxz00_4244;
BgL_auxz00_4244 = 
(BgL_objectz00_bglt)(BgL_new3137z00_2703); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4244, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 136 */
obj_t BgL_objz00_2707;
BgL_objz00_2707 = 
(obj_t)(BgL_new3137z00_2703); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2707); BUNSPEC; } 
BgL_res5830z00_2708 = BgL_new3137z00_2703; } 
BgL_new3129z00_2702 = BgL_res5830z00_2708; } 
{ /* ./SawMill/node2rtl.scm 136 */
BgL_areaz00_bglt BgL_res5831z00_2714;
{ /* ./SawMill/node2rtl.scm 136 */
BgL_areaz00_bglt BgL_new3133z00_2709;
BgL_new3133z00_2709 = BgL_new3129z00_2702; 
{ /* ./SawMill/node2rtl.scm 136 */
BgL_blockz00_bglt BgL_entry3131z00_2712;BgL_blockz00_bglt BgL_exit3132z00_2713;
BgL_entry3131z00_2712 = BgL_arg3865z00_1230; 
BgL_exit3132z00_2713 = BgL_arg3866z00_1231; 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2709))->BgL_entryz00) = ((BgL_blockz00_bglt)BgL_entry3131z00_2712), BUNSPEC); 
((((BgL_areaz00_bglt)CREF(BgL_new3133z00_2709))->BgL_exitz00) = ((BgL_blockz00_bglt)BgL_exit3132z00_2713), BUNSPEC); 
BgL_res5831z00_2714 = BgL_new3133z00_2709; } } BgL_res5831z00_2714; } 
BgL_res5832z00_2715 = BgL_new3129z00_2702; } 
return BgL_res5832z00_2715;} } } 
}



/* find-register */
obj_t BGl_findzd2registerzd2zzsaw_node2rtlz00(obj_t BgL_areasz00_42, BgL_rtl_regz00_bglt BgL_regz00_43)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 139 */
{ 
obj_t BgL_az00_1240;
{ 
obj_t BgL_lz00_1234;
BgL_lz00_1234 = BgL_areasz00_42; 
BgL_walkz00_1235:
if(
NULLP(BgL_lz00_1234))
{ /* ./SawMill/node2rtl.scm 149 */
return 
(obj_t)(BgL_regz00_43);}  else 
{ /* ./SawMill/node2rtl.scm 151 */
obj_t BgL__ortest_3283z00_1237;
BgL_az00_1240 = 
CAR(BgL_lz00_1234); 
{ /* ./SawMill/node2rtl.scm 141 */
obj_t BgL_insz00_1242;
{ /* ./SawMill/node2rtl.scm 141 */
obj_t BgL_auxz00_4254;
{ /* ./SawMill/node2rtl.scm 141 */
obj_t BgL_auxz00_4255;
{ /* ./SawMill/node2rtl.scm 141 */
BgL_blockz00_bglt BgL_arg3910z00_1254;
{ /* ./SawMill/node2rtl.scm 141 */
BgL_areaz00_bglt BgL_obj3123z00_2719;
BgL_obj3123z00_2719 = 
(BgL_areaz00_bglt)(BgL_az00_1240); 
BgL_arg3910z00_1254 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3123z00_2719))->BgL_exitz00); } 
BgL_auxz00_4255 = 
(((BgL_blockz00_bglt)CREF(BgL_arg3910z00_1254))->BgL_firstz00); } 
BgL_auxz00_4254 = 
BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00(BgL_auxz00_4255); } 
BgL_insz00_1242 = 
CAR(BgL_auxz00_4254); } 
{ /* ./SawMill/node2rtl.scm 142 */
bool_t BgL__andtest_3282z00_1243;
{ /* ./SawMill/node2rtl.scm 142 */
BgL_rtl_funz00_bglt BgL_arg3900z00_1251;
{ /* ./SawMill/node2rtl.scm 142 */
BgL_rtl_insz00_bglt BgL_obj3070z00_2722;
BgL_obj3070z00_2722 = 
(BgL_rtl_insz00_bglt)(BgL_insz00_1242); 
BgL_arg3900z00_1251 = 
(((BgL_rtl_insz00_bglt)CREF(BgL_obj3070z00_2722))->BgL_funz00); } 
{ /* ./SawMill/node2rtl.scm 142 */
obj_t BgL_obj2798z00_2723;
BgL_obj2798z00_2723 = 
(obj_t)(BgL_arg3900z00_1251); 
BgL__andtest_3282z00_1243 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2798z00_2723, BGl_rtl_movz00zzsaw_defsz00); } } 
if(BgL__andtest_3282z00_1243)
{ /* ./SawMill/node2rtl.scm 143 */
obj_t BgL_rz00_1244;
{ /* ./SawMill/node2rtl.scm 143 */
obj_t BgL_auxz00_4266;
{ /* ./SawMill/node2rtl.scm 143 */
BgL_rtl_insz00_bglt BgL_obj3073z00_2724;
BgL_obj3073z00_2724 = 
(BgL_rtl_insz00_bglt)(BgL_insz00_1242); 
BgL_auxz00_4266 = 
(((BgL_rtl_insz00_bglt)CREF(BgL_obj3073z00_2724))->BgL_argsz00); } 
BgL_rz00_1244 = 
CAR(BgL_auxz00_4266); } 
{ /* ./SawMill/node2rtl.scm 144 */
bool_t BgL_testz00_4270;
{ /* ./SawMill/node2rtl.scm 144 */
bool_t BgL_testz00_4271;
{ /* ./SawMill/node2rtl.scm 144 */
BgL_rtl_regz00_bglt BgL_obj2665z00_2726;
BgL_obj2665z00_2726 = 
(BgL_rtl_regz00_bglt)(BgL_rz00_1244); 
{ /* ./SawMill/node2rtl.scm 144 */
obj_t BgL_auxz00_4273;
BgL_auxz00_4273 = 
(((BgL_rtl_regz00_bglt)CREF(BgL_obj2665z00_2726))->BgL_varz00); 
BgL_testz00_4271 = 
CBOOL(BgL_auxz00_4273); } } 
if(BgL_testz00_4271)
{ /* ./SawMill/node2rtl.scm 144 */
BgL_testz00_4270 = ((bool_t)1)
; }  else 
{ /* ./SawMill/node2rtl.scm 145 */
bool_t BgL_testz00_4276;
{ /* ./SawMill/node2rtl.scm 145 */
obj_t BgL_auxz00_4282;obj_t BgL_auxz00_4277;
{ /* ./SawMill/node2rtl.scm 145 */
BgL_typez00_bglt BgL_auxz00_4283;
BgL_auxz00_4283 = 
(((BgL_rtl_regz00_bglt)CREF(BgL_regz00_43))->BgL_typez00); 
BgL_auxz00_4282 = 
(obj_t)(BgL_auxz00_4283); } 
{ /* ./SawMill/node2rtl.scm 145 */
BgL_typez00_bglt BgL_auxz00_4278;
{ /* ./SawMill/node2rtl.scm 145 */
BgL_rtl_regz00_bglt BgL_obj2662z00_2727;
BgL_obj2662z00_2727 = 
(BgL_rtl_regz00_bglt)(BgL_rz00_1244); 
BgL_auxz00_4278 = 
(((BgL_rtl_regz00_bglt)CREF(BgL_obj2662z00_2727))->BgL_typez00); } 
BgL_auxz00_4277 = 
(obj_t)(BgL_auxz00_4278); } 
BgL_testz00_4276 = 
(BgL_auxz00_4277==BgL_auxz00_4282); } 
if(BgL_testz00_4276)
{ /* ./SawMill/node2rtl.scm 145 */
BgL_testz00_4270 = ((bool_t)0)
; }  else 
{ /* ./SawMill/node2rtl.scm 145 */
BgL_testz00_4270 = ((bool_t)1)
; } } } 
if(BgL_testz00_4270)
{ /* ./SawMill/node2rtl.scm 144 */
BgL__ortest_3283z00_1237 = BFALSE; }  else 
{ /* ./SawMill/node2rtl.scm 144 */
BgL__ortest_3283z00_1237 = BgL_rz00_1244; } } }  else 
{ /* ./SawMill/node2rtl.scm 142 */
BgL__ortest_3283z00_1237 = BFALSE; } } } 
if(
CBOOL(BgL__ortest_3283z00_1237))
{ /* ./SawMill/node2rtl.scm 152 */
return BgL__ortest_3283z00_1237;}  else 
{ 
obj_t BgL_lz00_4290;
BgL_lz00_4290 = 
CDR(BgL_lz00_1234); 
BgL_lz00_1234 = BgL_lz00_4290; 
goto BgL_walkz00_1235;} } } } } 
}



/* call* */
BgL_areaz00_bglt BGl_callza2za2zzsaw_node2rtlz00(obj_t BgL_ez00_46, BgL_rtl_funz00_bglt BgL_funz00_47, obj_t BgL_exprsz00_48)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 159 */
{ /* ./SawMill/node2rtl.scm 160 */
obj_t BgL_regsz00_1257;
{ /* ./SawMill/node2rtl.scm 160 */
bool_t BgL_test3944z00_1278;
BgL_test3944z00_1278 = 
NULLP(BgL_exprsz00_48); 
if(BgL_test3944z00_1278)
{ /* ./SawMill/node2rtl.scm 160 */
BgL_regsz00_1257 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 160 */
obj_t BgL_head3286z00_1279;
BgL_head3286z00_1279 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3284z00_1280;obj_t BgL_tail3287z00_1281;
BgL_l3284z00_1280 = BgL_exprsz00_48; 
BgL_tail3287z00_1281 = BgL_head3286z00_1279; 
BgL_map3285z00_1282:
{ /* ./SawMill/node2rtl.scm 160 */
bool_t BgL_test3946z00_1283;
BgL_test3946z00_1283 = 
NULLP(BgL_l3284z00_1280); 
if(BgL_test3946z00_1283)
{ /* ./SawMill/node2rtl.scm 160 */
BgL_regsz00_1257 = 
CDR(BgL_head3286z00_1279); }  else 
{ /* ./SawMill/node2rtl.scm 160 */
obj_t BgL_newtail3288z00_1284;
{ /* ./SawMill/node2rtl.scm 160 */
BgL_rtl_regz00_bglt BgL_arg3954z00_1286;
{ /* ./SawMill/node2rtl.scm 160 */
obj_t BgL_ez00_1288;
BgL_ez00_1288 = 
CAR(BgL_l3284z00_1280); 
{ /* ./SawMill/node2rtl.scm 160 */
BgL_rtl_regz00_bglt BgL_res5836z00_2770;
{ /* ./SawMill/node2rtl.scm 160 */
BgL_nodez00_bglt BgL_ez00_2767;
BgL_ez00_2767 = 
(BgL_nodez00_bglt)(BgL_ez00_1288); 
{ /* ./SawMill/node2rtl.scm 160 */
BgL_typez00_bglt BgL_arg3595z00_2768;bool_t BgL_arg3596z00_2769;
BgL_arg3595z00_2768 = 
BGl_typeofz00zztype_typeofz00(BgL_ez00_2767); 
BgL_arg3596z00_2769 = ((bool_t)0); 
BgL_res5836z00_2770 = 
BGl_makezd2rtl_regzd2zzsaw_defsz00(BgL_arg3595z00_2768, 
BBOOL(BgL_arg3596z00_2769)); } } 
BgL_arg3954z00_1286 = BgL_res5836z00_2770; } } 
{ /* ./SawMill/node2rtl.scm 160 */
obj_t BgL_obj1z00_2771;
BgL_obj1z00_2771 = 
(obj_t)(BgL_arg3954z00_1286); 
BgL_newtail3288z00_1284 = 
MAKE_PAIR(BgL_obj1z00_2771, BNIL); } } 
SET_CDR(BgL_tail3287z00_1281, BgL_newtail3288z00_1284); 
{ /* ./SawMill/node2rtl.scm 160 */
obj_t BgL_arg3950z00_1285;
BgL_arg3950z00_1285 = 
CDR(BgL_l3284z00_1280); 
{ 
obj_t BgL_tail3287z00_4308;obj_t BgL_l3284z00_4307;
BgL_l3284z00_4307 = BgL_arg3950z00_1285; 
BgL_tail3287z00_4308 = BgL_newtail3288z00_1284; 
BgL_tail3287z00_1281 = BgL_tail3287z00_4308; 
BgL_l3284z00_1280 = BgL_l3284z00_4307; 
goto BgL_map3285z00_1282;} } } } } } } 
{ /* ./SawMill/node2rtl.scm 161 */
BgL_areaz00_bglt BgL_arg3916z00_1258;BgL_areaz00_bglt BgL_arg3917z00_1259;
{ /* ./SawMill/node2rtl.scm 161 */
obj_t BgL_arg3920z00_1260;
{ /* ./SawMill/node2rtl.scm 161 */
bool_t BgL_test3922z00_1263;
BgL_test3922z00_1263 = 
NULLP(BgL_exprsz00_48); 
if(BgL_test3922z00_1263)
{ /* ./SawMill/node2rtl.scm 161 */
BgL_arg3920z00_1260 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 161 */
obj_t BgL_head3291z00_1264;
BgL_head3291z00_1264 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_ll3289z00_1265;obj_t BgL_ll3290z00_1266;obj_t BgL_tail3292z00_1267;
BgL_ll3289z00_1265 = BgL_exprsz00_48; 
BgL_ll3290z00_1266 = BgL_regsz00_1257; 
BgL_tail3292z00_1267 = BgL_head3291z00_1264; 
BgL_map3294z00_1268:
{ /* ./SawMill/node2rtl.scm 161 */
bool_t BgL_test3924z00_1269;
BgL_test3924z00_1269 = 
NULLP(BgL_ll3289z00_1265); 
if(BgL_test3924z00_1269)
{ /* ./SawMill/node2rtl.scm 161 */
BgL_arg3920z00_1260 = 
CDR(BgL_head3291z00_1264); }  else 
{ /* ./SawMill/node2rtl.scm 161 */
obj_t BgL_newtail3293z00_1270;
{ /* ./SawMill/node2rtl.scm 161 */
BgL_areaz00_bglt BgL_arg3934z00_1273;
{ /* ./SawMill/node2rtl.scm 161 */
obj_t BgL_az00_1275;obj_t BgL_rz00_1276;
BgL_az00_1275 = 
CAR(BgL_ll3289z00_1265); 
BgL_rz00_1276 = 
CAR(BgL_ll3290z00_1266); 
{ /* ./SawMill/node2rtl.scm 161 */
BgL_areaz00_bglt BgL_res5837z00_2790;
{ /* ./SawMill/node2rtl.scm 161 */
BgL_nodez00_bglt BgL_ez00_2783;BgL_rtl_regz00_bglt BgL_rz00_2784;
BgL_ez00_2783 = 
(BgL_nodez00_bglt)(BgL_az00_1275); 
BgL_rz00_2784 = 
(BgL_rtl_regz00_bglt)(BgL_rz00_1276); 
{ /* ./SawMill/node2rtl.scm 161 */
BgL_areaz00_bglt BgL_az00_2785;
BgL_az00_2785 = 
BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(BgL_ez00_2783); 
{ /* ./SawMill/node2rtl.scm 161 */
BgL_blockz00_bglt BgL_arg3672z00_2788;
BgL_arg3672z00_2788 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_2785))->BgL_exitz00); 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_arg3672z00_2788, BgL_rz00_2784); } 
BgL_res5837z00_2790 = BgL_az00_2785; } } 
BgL_arg3934z00_1273 = BgL_res5837z00_2790; } } 
{ /* ./SawMill/node2rtl.scm 161 */
obj_t BgL_obj1z00_2791;
BgL_obj1z00_2791 = 
(obj_t)(BgL_arg3934z00_1273); 
BgL_newtail3293z00_1270 = 
MAKE_PAIR(BgL_obj1z00_2791, BNIL); } } 
SET_CDR(BgL_tail3292z00_1267, BgL_newtail3293z00_1270); 
{ /* ./SawMill/node2rtl.scm 161 */
obj_t BgL_arg3928z00_1271;obj_t BgL_arg3929z00_1272;
BgL_arg3928z00_1271 = 
CDR(BgL_ll3289z00_1265); 
BgL_arg3929z00_1272 = 
CDR(BgL_ll3290z00_1266); 
{ 
obj_t BgL_tail3292z00_4329;obj_t BgL_ll3290z00_4328;obj_t BgL_ll3289z00_4327;
BgL_ll3289z00_4327 = BgL_arg3928z00_1271; 
BgL_ll3290z00_4328 = BgL_arg3929z00_1272; 
BgL_tail3292z00_4329 = BgL_newtail3293z00_1270; 
BgL_tail3292z00_1267 = BgL_tail3292z00_4329; 
BgL_ll3290z00_1266 = BgL_ll3290z00_4328; 
BgL_ll3289z00_1265 = BgL_ll3289z00_4327; 
goto BgL_map3294z00_1268;} } } } } } } 
BgL_arg3916z00_1258 = 
BGl_linkza2za2zzsaw_node2rtlz00(BgL_arg3920z00_1260); } 
BgL_arg3917z00_1259 = 
BGl_singleza2za2zzsaw_node2rtlz00(BgL_ez00_46, BgL_funz00_47, BgL_regsz00_1257); 
return 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg3916z00_1258, BgL_arg3917z00_1259);} } } 
}



/* coerce */
obj_t BGl_coercez00zzsaw_node2rtlz00(obj_t BgL_clausesz00_61)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 232 */
{ /* ./SawMill/node2rtl.scm 233 */
bool_t BgL_test3963z00_1290;
BgL_test3963z00_1290 = 
NULLP(BgL_clausesz00_61); 
if(BgL_test3963z00_1290)
{ /* ./SawMill/node2rtl.scm 233 */
return BNIL;}  else 
{ /* ./SawMill/node2rtl.scm 233 */
obj_t BgL_head3333z00_1291;
BgL_head3333z00_1291 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3331z00_1292;obj_t BgL_tail3334z00_1293;
BgL_l3331z00_1292 = BgL_clausesz00_61; 
BgL_tail3334z00_1293 = BgL_head3333z00_1291; 
BgL_map3332z00_1294:
{ /* ./SawMill/node2rtl.scm 233 */
bool_t BgL_test3965z00_1295;
BgL_test3965z00_1295 = 
NULLP(BgL_l3331z00_1292); 
if(BgL_test3965z00_1295)
{ /* ./SawMill/node2rtl.scm 233 */
return 
CDR(BgL_head3333z00_1291);}  else 
{ /* ./SawMill/node2rtl.scm 234 */
obj_t BgL_newtail3335z00_1296;
{ /* ./SawMill/node2rtl.scm 234 */
obj_t BgL_arg3973z00_1298;
{ /* ./SawMill/node2rtl.scm 234 */
obj_t BgL_cz00_1300;
BgL_cz00_1300 = 
CAR(BgL_l3331z00_1292); 
{ /* ./SawMill/node2rtl.scm 234 */
obj_t BgL_pz00_1301;
BgL_pz00_1301 = 
CAR(BgL_cz00_1300); 
{ /* ./SawMill/node2rtl.scm 235 */
bool_t BgL_test3976z00_1302;
{ /* ./SawMill/node2rtl.scm 235 */
obj_t BgL_auxz00_4341;
BgL_auxz00_4341 = 
CNST_TABLE_REF(((long)0)); 
BgL_test3976z00_1302 = 
(BgL_pz00_1301==BgL_auxz00_4341); } 
if(BgL_test3976z00_1302)
{ /* ./SawMill/node2rtl.scm 235 */
BgL_arg3973z00_1298 = BgL_pz00_1301; }  else 
{ /* ./SawMill/node2rtl.scm 237 */
bool_t BgL_test3977z00_1304;
BgL_test3977z00_1304 = 
NULLP(BgL_pz00_1301); 
if(BgL_test3977z00_1304)
{ /* ./SawMill/node2rtl.scm 237 */
BgL_arg3973z00_1298 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 237 */
obj_t BgL_head3338z00_1305;
BgL_head3338z00_1305 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3336z00_1306;obj_t BgL_tail3339z00_1307;
BgL_l3336z00_1306 = BgL_pz00_1301; 
BgL_tail3339z00_1307 = BgL_head3338z00_1305; 
BgL_map3337z00_1308:
{ /* ./SawMill/node2rtl.scm 237 */
bool_t BgL_test3979z00_1309;
BgL_test3979z00_1309 = 
NULLP(BgL_l3336z00_1306); 
if(BgL_test3979z00_1309)
{ /* ./SawMill/node2rtl.scm 237 */
BgL_arg3973z00_1298 = 
CDR(BgL_head3338z00_1305); }  else 
{ /* ./SawMill/node2rtl.scm 238 */
obj_t BgL_newtail3340z00_1310;
{ /* ./SawMill/node2rtl.scm 238 */
obj_t BgL_arg3987z00_1312;
{ /* ./SawMill/node2rtl.scm 238 */
obj_t BgL_nz00_1314;
BgL_nz00_1314 = 
CAR(BgL_l3336z00_1306); 
{ /* ./SawMill/node2rtl.scm 238 */
bool_t BgL_test3990z00_1315;
{ /* ./SawMill/node2rtl.scm 238 */
bool_t BgL_res5838z00_2816;
{ /* ./SawMill/node2rtl.scm 238 */
bool_t BgL_test1396z00_2811;
BgL_test1396z00_2811 = 
INTEGERP(BgL_nz00_1314); 
if(BgL_test1396z00_2811)
{ /* ./SawMill/node2rtl.scm 238 */
BgL_res5838z00_2816 = ((bool_t)1); }  else 
{ /* ./SawMill/node2rtl.scm 238 */
bool_t BgL_test1397z00_2812;
BgL_test1397z00_2812 = 
REALP(BgL_nz00_1314); 
if(BgL_test1397z00_2812)
{ /* ./SawMill/node2rtl.scm 238 */
double BgL_arg1399z00_2813;
BgL_arg1399z00_2813 = 
BGl_roundflz00zz__r4_numbers_6_5_flonumz00(
REAL_TO_DOUBLE(BgL_nz00_1314)); 
{ /* ./SawMill/node2rtl.scm 238 */
double BgL_auxz00_4358;
BgL_auxz00_4358 = 
REAL_TO_DOUBLE(BgL_nz00_1314); 
BgL_res5838z00_2816 = 
(BgL_auxz00_4358==BgL_arg1399z00_2813); } }  else 
{ /* ./SawMill/node2rtl.scm 238 */
BgL_res5838z00_2816 = ((bool_t)0); } } } 
BgL_test3990z00_1315 = BgL_res5838z00_2816; } 
if(BgL_test3990z00_1315)
{ /* ./SawMill/node2rtl.scm 238 */
BgL_arg3987z00_1312 = BgL_nz00_1314; }  else 
{ /* ./SawMill/node2rtl.scm 239 */
bool_t BgL_test3991z00_1316;
BgL_test3991z00_1316 = 
CHARP(BgL_nz00_1314); 
if(BgL_test3991z00_1316)
{ /* ./SawMill/node2rtl.scm 239 */
{ /* ./SawMill/node2rtl.scm 239 */
long BgL_auxz00_4364;
{ /* ./SawMill/node2rtl.scm 239 */
unsigned char BgL_auxz00_4365;
BgL_auxz00_4365 = 
(unsigned char)CCHAR(BgL_nz00_1314); 
BgL_auxz00_4364 = 
(BgL_auxz00_4365); } 
BgL_arg3987z00_1312 = 
BINT(BgL_auxz00_4364); } }  else 
{ /* ./SawMill/node2rtl.scm 239 */
{ /* ./SawMill/node2rtl.scm 240 */
obj_t BgL_procz00_2819;
BgL_procz00_2819 = 
CNST_TABLE_REF(((long)1)); 
FAILURE(BgL_procz00_2819,BGl_string6612z00zzsaw_node2rtlz00,BgL_nz00_1314);} } } } } 
BgL_newtail3340z00_1310 = 
MAKE_PAIR(BgL_arg3987z00_1312, BNIL); } 
SET_CDR(BgL_tail3339z00_1307, BgL_newtail3340z00_1310); 
{ /* ./SawMill/node2rtl.scm 237 */
obj_t BgL_arg3983z00_1311;
BgL_arg3983z00_1311 = 
CDR(BgL_l3336z00_1306); 
{ 
obj_t BgL_tail3339z00_4375;obj_t BgL_l3336z00_4374;
BgL_l3336z00_4374 = BgL_arg3983z00_1311; 
BgL_tail3339z00_4375 = BgL_newtail3340z00_1310; 
BgL_tail3339z00_1307 = BgL_tail3339z00_4375; 
BgL_l3336z00_1306 = BgL_l3336z00_4374; 
goto BgL_map3337z00_1308;} } } } } } } } } } 
BgL_newtail3335z00_1296 = 
MAKE_PAIR(BgL_arg3973z00_1298, BNIL); } 
SET_CDR(BgL_tail3334z00_1293, BgL_newtail3335z00_1296); 
{ /* ./SawMill/node2rtl.scm 233 */
obj_t BgL_arg3969z00_1297;
BgL_arg3969z00_1297 = 
CDR(BgL_l3331z00_1292); 
{ 
obj_t BgL_tail3334z00_4380;obj_t BgL_l3331z00_4379;
BgL_l3331z00_4379 = BgL_arg3969z00_1297; 
BgL_tail3334z00_4380 = BgL_newtail3335z00_1296; 
BgL_tail3334z00_1293 = BgL_tail3334z00_4380; 
BgL_l3331z00_1292 = BgL_l3331z00_4379; 
goto BgL_map3332z00_1294;} } } } } } } } 
}



/* compile-label-call */
BgL_areaz00_bglt BGl_compilezd2labelzd2callz00zzsaw_node2rtlz00(BgL_localz00_bglt BgL_vz00_63, obj_t BgL_argsz00_64)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 250 */
{ /* ./SawMill/node2rtl.scm 257 */
obj_t BgL_regsz00_1318;
{ /* ./SawMill/node2rtl.scm 257 */
bool_t BgL_test4084z00_1366;
BgL_test4084z00_1366 = 
NULLP(BgL_argsz00_64); 
if(BgL_test4084z00_1366)
{ /* ./SawMill/node2rtl.scm 257 */
BgL_regsz00_1318 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 257 */
obj_t BgL_head3346z00_1367;
BgL_head3346z00_1367 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3344z00_1368;obj_t BgL_tail3347z00_1369;
BgL_l3344z00_1368 = BgL_argsz00_64; 
BgL_tail3347z00_1369 = BgL_head3346z00_1367; 
BgL_map3345z00_1370:
{ /* ./SawMill/node2rtl.scm 257 */
bool_t BgL_test4086z00_1371;
BgL_test4086z00_1371 = 
NULLP(BgL_l3344z00_1368); 
if(BgL_test4086z00_1371)
{ /* ./SawMill/node2rtl.scm 257 */
BgL_regsz00_1318 = 
CDR(BgL_head3346z00_1367); }  else 
{ /* ./SawMill/node2rtl.scm 257 */
obj_t BgL_newtail3348z00_1372;
{ /* ./SawMill/node2rtl.scm 257 */
BgL_rtl_regz00_bglt BgL_arg4094z00_1374;
{ /* ./SawMill/node2rtl.scm 257 */
obj_t BgL_az00_1376;
BgL_az00_1376 = 
CAR(BgL_l3344z00_1368); 
{ /* ./SawMill/node2rtl.scm 257 */
BgL_rtl_regz00_bglt BgL_res5839z00_2841;
{ /* ./SawMill/node2rtl.scm 257 */
BgL_nodez00_bglt BgL_ez00_2838;
BgL_ez00_2838 = 
(BgL_nodez00_bglt)(BgL_az00_1376); 
{ /* ./SawMill/node2rtl.scm 257 */
BgL_typez00_bglt BgL_arg3595z00_2839;bool_t BgL_arg3596z00_2840;
BgL_arg3595z00_2839 = 
BGl_typeofz00zztype_typeofz00(BgL_ez00_2838); 
BgL_arg3596z00_2840 = ((bool_t)0); 
BgL_res5839z00_2841 = 
BGl_makezd2rtl_regzd2zzsaw_defsz00(BgL_arg3595z00_2839, 
BBOOL(BgL_arg3596z00_2840)); } } 
BgL_arg4094z00_1374 = BgL_res5839z00_2841; } } 
{ /* ./SawMill/node2rtl.scm 257 */
obj_t BgL_obj1z00_2842;
BgL_obj1z00_2842 = 
(obj_t)(BgL_arg4094z00_1374); 
BgL_newtail3348z00_1372 = 
MAKE_PAIR(BgL_obj1z00_2842, BNIL); } } 
SET_CDR(BgL_tail3347z00_1369, BgL_newtail3348z00_1372); 
{ /* ./SawMill/node2rtl.scm 257 */
obj_t BgL_arg4090z00_1373;
BgL_arg4090z00_1373 = 
CDR(BgL_l3344z00_1368); 
{ 
obj_t BgL_tail3347z00_4397;obj_t BgL_l3344z00_4396;
BgL_l3344z00_4396 = BgL_arg4090z00_1373; 
BgL_tail3347z00_4397 = BgL_newtail3348z00_1372; 
BgL_tail3347z00_1369 = BgL_tail3347z00_4397; 
BgL_l3344z00_1368 = BgL_l3344z00_4396; 
goto BgL_map3345z00_1370;} } } } } } } 
{ /* ./SawMill/node2rtl.scm 258 */
obj_t BgL_paramsz00_1319;
{ /* ./SawMill/node2rtl.scm 258 */
BgL_sfunz00_bglt BgL_obj1367z00_2848;
{ /* ./SawMill/node2rtl.scm 258 */
BgL_valuez00_bglt BgL_auxz00_4398;
{ /* ./SawMill/node2rtl.scm 258 */
BgL_variablez00_bglt BgL_obj1100z00_2847;
BgL_obj1100z00_2847 = 
(BgL_variablez00_bglt)(BgL_vz00_63); 
BgL_auxz00_4398 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1100z00_2847))->BgL_valuez00); } 
BgL_obj1367z00_2848 = 
(BgL_sfunz00_bglt)(BgL_auxz00_4398); } 
BgL_paramsz00_1319 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1367z00_2848))->BgL_argsz00); } 
{ /* ./SawMill/node2rtl.scm 260 */
BgL_areaz00_bglt BgL_arg4007z00_1320;BgL_areaz00_bglt BgL_arg4008z00_1321;
{ /* ./SawMill/node2rtl.scm 260 */
obj_t BgL_arg4011z00_1322;
{ /* ./SawMill/node2rtl.scm 260 */
bool_t BgL_test4013z00_1325;
BgL_test4013z00_1325 = 
NULLP(BgL_argsz00_64); 
if(BgL_test4013z00_1325)
{ /* ./SawMill/node2rtl.scm 260 */
BgL_arg4011z00_1322 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 260 */
obj_t BgL_head3351z00_1326;
BgL_head3351z00_1326 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_ll3349z00_1327;obj_t BgL_ll3350z00_1328;obj_t BgL_tail3352z00_1329;
BgL_ll3349z00_1327 = BgL_argsz00_64; 
BgL_ll3350z00_1328 = BgL_regsz00_1318; 
BgL_tail3352z00_1329 = BgL_head3351z00_1326; 
BgL_map3354z00_1330:
{ /* ./SawMill/node2rtl.scm 260 */
bool_t BgL_test4015z00_1331;
BgL_test4015z00_1331 = 
NULLP(BgL_ll3349z00_1327); 
if(BgL_test4015z00_1331)
{ /* ./SawMill/node2rtl.scm 260 */
BgL_arg4011z00_1322 = 
CDR(BgL_head3351z00_1326); }  else 
{ /* ./SawMill/node2rtl.scm 260 */
obj_t BgL_newtail3353z00_1332;
{ /* ./SawMill/node2rtl.scm 260 */
BgL_areaz00_bglt BgL_arg4025z00_1335;
{ /* ./SawMill/node2rtl.scm 260 */
obj_t BgL_ez00_1337;obj_t BgL_rz00_1338;
BgL_ez00_1337 = 
CAR(BgL_ll3349z00_1327); 
BgL_rz00_1338 = 
CAR(BgL_ll3350z00_1328); 
{ /* ./SawMill/node2rtl.scm 260 */
BgL_areaz00_bglt BgL_res5840z00_2863;
{ /* ./SawMill/node2rtl.scm 260 */
BgL_nodez00_bglt BgL_ez00_2856;BgL_rtl_regz00_bglt BgL_rz00_2857;
BgL_ez00_2856 = 
(BgL_nodez00_bglt)(BgL_ez00_1337); 
BgL_rz00_2857 = 
(BgL_rtl_regz00_bglt)(BgL_rz00_1338); 
{ /* ./SawMill/node2rtl.scm 260 */
BgL_areaz00_bglt BgL_az00_2858;
BgL_az00_2858 = 
BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(BgL_ez00_2856); 
{ /* ./SawMill/node2rtl.scm 260 */
BgL_blockz00_bglt BgL_arg3672z00_2861;
BgL_arg3672z00_2861 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_2858))->BgL_exitz00); 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_arg3672z00_2861, BgL_rz00_2857); } 
BgL_res5840z00_2863 = BgL_az00_2858; } } 
BgL_arg4025z00_1335 = BgL_res5840z00_2863; } } 
{ /* ./SawMill/node2rtl.scm 260 */
obj_t BgL_obj1z00_2864;
BgL_obj1z00_2864 = 
(obj_t)(BgL_arg4025z00_1335); 
BgL_newtail3353z00_1332 = 
MAKE_PAIR(BgL_obj1z00_2864, BNIL); } } 
SET_CDR(BgL_tail3352z00_1329, BgL_newtail3353z00_1332); 
{ /* ./SawMill/node2rtl.scm 260 */
obj_t BgL_arg4019z00_1333;obj_t BgL_arg4020z00_1334;
BgL_arg4019z00_1333 = 
CDR(BgL_ll3349z00_1327); 
BgL_arg4020z00_1334 = 
CDR(BgL_ll3350z00_1328); 
{ 
obj_t BgL_tail3352z00_4423;obj_t BgL_ll3350z00_4422;obj_t BgL_ll3349z00_4421;
BgL_ll3349z00_4421 = BgL_arg4019z00_1333; 
BgL_ll3350z00_4422 = BgL_arg4020z00_1334; 
BgL_tail3352z00_4423 = BgL_newtail3353z00_1332; 
BgL_tail3352z00_1329 = BgL_tail3352z00_4423; 
BgL_ll3350z00_1328 = BgL_ll3350z00_4422; 
BgL_ll3349z00_1327 = BgL_ll3349z00_4421; 
goto BgL_map3354z00_1330;} } } } } } } 
BgL_arg4007z00_1320 = 
BGl_linkza2za2zzsaw_node2rtlz00(BgL_arg4011z00_1322); } 
{ /* ./SawMill/node2rtl.scm 262 */
BgL_areaz00_bglt BgL_arg4035z00_1339;BgL_areaz00_bglt BgL_arg4036z00_1340;
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_arg4039z00_1341;
{ /* ./SawMill/node2rtl.scm 262 */
bool_t BgL_test4041z00_1344;
BgL_test4041z00_1344 = 
NULLP(BgL_regsz00_1318); 
if(BgL_test4041z00_1344)
{ /* ./SawMill/node2rtl.scm 262 */
BgL_arg4039z00_1341 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_head3357z00_1345;
{ /* ./SawMill/node2rtl.scm 262 */
BgL_areaz00_bglt BgL_arg4069z00_1360;
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_arg4073z00_1362;obj_t BgL_arg4074z00_1363;
BgL_arg4073z00_1362 = 
CAR(BgL_regsz00_1318); 
BgL_arg4074z00_1363 = 
CAR(BgL_paramsz00_1319); 
BgL_arg4069z00_1360 = 
BGl_movez00zzsaw_node2rtlz00(
(BgL_rtl_regz00_bglt)(BgL_arg4073z00_1362), 
(BgL_localz00_bglt)(BgL_arg4074z00_1363)); } 
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_obj1z00_2873;
BgL_obj1z00_2873 = 
(obj_t)(BgL_arg4069z00_1360); 
BgL_head3357z00_1345 = 
MAKE_PAIR(BgL_obj1z00_2873, BNIL); } } 
{ 
obj_t BgL_ll3355z00_1346;obj_t BgL_ll3356z00_1347;obj_t BgL_tail3358z00_1348;
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_arg4043z00_1350;obj_t BgL_arg4044z00_1351;
BgL_arg4043z00_1350 = 
CDR(BgL_regsz00_1318); 
BgL_arg4044z00_1351 = 
CDR(BgL_paramsz00_1319); 
BgL_ll3355z00_1346 = BgL_arg4043z00_1350; 
BgL_ll3356z00_1347 = BgL_arg4044z00_1351; 
BgL_tail3358z00_1348 = BgL_head3357z00_1345; 
BgL_map3360z00_1349:
{ /* ./SawMill/node2rtl.scm 262 */
bool_t BgL_test4048z00_1352;
BgL_test4048z00_1352 = 
NULLP(BgL_ll3355z00_1346); 
if(BgL_test4048z00_1352)
{ /* ./SawMill/node2rtl.scm 262 */
BgL_arg4039z00_1341 = BgL_head3357z00_1345; }  else 
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_newtail3359z00_1353;
{ /* ./SawMill/node2rtl.scm 262 */
BgL_areaz00_bglt BgL_arg4058z00_1356;
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_arg4062z00_1358;obj_t BgL_arg4063z00_1359;
BgL_arg4062z00_1358 = 
CAR(BgL_ll3355z00_1346); 
BgL_arg4063z00_1359 = 
CAR(BgL_ll3356z00_1347); 
BgL_arg4058z00_1356 = 
BGl_movez00zzsaw_node2rtlz00(
(BgL_rtl_regz00_bglt)(BgL_arg4062z00_1358), 
(BgL_localz00_bglt)(BgL_arg4063z00_1359)); } 
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_obj1z00_2880;
BgL_obj1z00_2880 = 
(obj_t)(BgL_arg4058z00_1356); 
BgL_newtail3359z00_1353 = 
MAKE_PAIR(BgL_obj1z00_2880, BNIL); } } 
SET_CDR(BgL_tail3358z00_1348, BgL_newtail3359z00_1353); 
{ /* ./SawMill/node2rtl.scm 262 */
obj_t BgL_arg4052z00_1354;obj_t BgL_arg4053z00_1355;
BgL_arg4052z00_1354 = 
CDR(BgL_ll3355z00_1346); 
BgL_arg4053z00_1355 = 
CDR(BgL_ll3356z00_1347); 
{ 
obj_t BgL_tail3358z00_4450;obj_t BgL_ll3356z00_4449;obj_t BgL_ll3355z00_4448;
BgL_ll3355z00_4448 = BgL_arg4052z00_1354; 
BgL_ll3356z00_4449 = BgL_arg4053z00_1355; 
BgL_tail3358z00_4450 = BgL_newtail3359z00_1353; 
BgL_tail3358z00_1348 = BgL_tail3358z00_4450; 
BgL_ll3356z00_1347 = BgL_ll3356z00_4449; 
BgL_ll3355z00_1346 = BgL_ll3355z00_4448; 
goto BgL_map3360z00_1349;} } } } } } } } 
BgL_arg4035z00_1339 = 
BGl_linkza2za2zzsaw_node2rtlz00(BgL_arg4039z00_1341); } 
BgL_arg4036z00_1340 = 
BGl_localzd2ze3codez31zzsaw_node2rtlz00(BgL_vz00_63); 
BgL_arg4008z00_1321 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg4035z00_1339, BgL_arg4036z00_1340); } 
return 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg4007z00_1320, BgL_arg4008z00_1321);} } } } 
}



/* move */
BgL_areaz00_bglt BGl_movez00zzsaw_node2rtlz00(BgL_rtl_regz00_bglt BgL_rz00_1377, BgL_localz00_bglt BgL_vz00_1378)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 256 */
{ /* ./SawMill/node2rtl.scm 254 */
BgL_areaz00_bglt BgL_az00_1380;
{ /* ./SawMill/node2rtl.scm 254 */
BgL_rtl_movz00_bglt BgL_arg4108z00_1382;
BgL_arg4108z00_1382 = 
BGl_makezd2rtl_movzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 254 */
obj_t BgL_list4110z00_1383;
{ /* ./SawMill/node2rtl.scm 254 */
obj_t BgL_auxz00_4456;
BgL_auxz00_4456 = 
(obj_t)(BgL_rz00_1377); 
BgL_list4110z00_1383 = 
MAKE_PAIR(BgL_auxz00_4456, BNIL); } 
{ /* ./SawMill/node2rtl.scm 254 */
BgL_rtl_funz00_bglt BgL_funz00_2887;
BgL_funz00_2887 = 
(BgL_rtl_funz00_bglt)(BgL_arg4108z00_1382); 
BgL_az00_1380 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2887, BgL_list4110z00_1383); } } } 
{ /* ./SawMill/node2rtl.scm 255 */
BgL_rtl_regz00_bglt BgL_arg4104z00_1381;
BgL_arg4104z00_1381 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(BgL_vz00_1378); 
{ /* ./SawMill/node2rtl.scm 255 */
BgL_blockz00_bglt BgL_arg3672z00_2891;
BgL_arg3672z00_2891 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_1380))->BgL_exitz00); 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_arg3672z00_2891, BgL_arg4104z00_1381); } } 
return BgL_az00_1380;} } 
}



/* local->code */
BgL_areaz00_bglt BGl_localzd2ze3codez31zzsaw_node2rtlz00(BgL_localz00_bglt BgL_vz00_65)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 266 */
{ /* ./SawMill/node2rtl.scm 267 */
bool_t BgL_test4113z00_1385;
BgL_test4113z00_1385 = 
BGl_iszd2azf3z21zz__objectz00(
(obj_t)(BgL_vz00_65), BGl_rlocalz00zzsaw_node2rtlz00); 
if(BgL_test4113z00_1385)
{ /* ./SawMill/node2rtl.scm 276 */
obj_t BgL_arg4115z00_1386;
{ /* ./SawMill/node2rtl.scm 276 */
BgL_rlocalz00_bglt BgL_obj3214z00_2894;
BgL_obj3214z00_2894 = 
(BgL_rlocalz00_bglt)(BgL_vz00_65); 
{ 
obj_t BgL_auxz00_4468;
{ /* ./SawMill/node2rtl.scm 276 */
BgL_objectz00_bglt BgL_auxz00_4469;
BgL_auxz00_4469 = 
(BgL_objectz00_bglt)(BgL_obj3214z00_2894); 
BgL_auxz00_4468 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4469); } 
BgL_arg4115z00_1386 = 
(((BgL_rlocalz00_bglt)CREF(BgL_auxz00_4468))->BgL_codez00); } } 
return 
BGl_unlinkz00zzsaw_node2rtlz00(
(BgL_areaz00_bglt)(BgL_arg4115z00_1386));}  else 
{ /* ./SawMill/node2rtl.scm 269 */
BgL_areaz00_bglt BgL_nopz00_1387;obj_t BgL_bodyz00_1388;
{ /* ./SawMill/node2rtl.scm 269 */
BgL_rtl_nopz00_bglt BgL_arg4135z00_1395;
BgL_arg4135z00_1395 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 269 */
BgL_rtl_funz00_bglt BgL_funz00_2896;
BgL_funz00_2896 = 
(BgL_rtl_funz00_bglt)(BgL_arg4135z00_1395); 
BgL_nopz00_1387 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2896, BNIL); } } 
{ /* ./SawMill/node2rtl.scm 270 */
BgL_sfunz00_bglt BgL_obj1370z00_2899;
{ /* ./SawMill/node2rtl.scm 270 */
BgL_valuez00_bglt BgL_auxz00_4478;
{ /* ./SawMill/node2rtl.scm 270 */
BgL_variablez00_bglt BgL_obj1100z00_2898;
BgL_obj1100z00_2898 = 
(BgL_variablez00_bglt)(BgL_vz00_65); 
BgL_auxz00_4478 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1100z00_2898))->BgL_valuez00); } 
BgL_obj1370z00_2899 = 
(BgL_sfunz00_bglt)(BgL_auxz00_4478); } 
BgL_bodyz00_1388 = 
(((BgL_sfunz00_bglt)CREF(BgL_obj1370z00_2899))->BgL_bodyz00); } 
{ /* ./SawMill/node2rtl.scm 272 */
BgL_localz00_bglt BgL_obj3362z00_1389;
BgL_obj3362z00_1389 = 
((BgL_localz00_bglt)BgL_vz00_65); 
{ /* ./SawMill/node2rtl.scm 272 */
BgL_rlocalz00_bglt BgL_arg4119z00_1390;
{ /* ./SawMill/node2rtl.scm 272 */
bool_t BgL_arg4122z00_1391;BgL_areaz00_bglt BgL_arg4123z00_1392;
BgL_arg4122z00_1391 = ((bool_t)0); 
BgL_arg4123z00_1392 = BgL_nopz00_1387; 
{ /* ./SawMill/node2rtl.scm 272 */
BgL_rlocalz00_bglt BgL_res5842z00_2909;
{ /* ./SawMill/node2rtl.scm 272 */
obj_t BgL_reg3179z00_2900;obj_t BgL_code3180z00_2901;
BgL_reg3179z00_2900 = 
BBOOL(BgL_arg4122z00_1391); 
BgL_code3180z00_2901 = 
(obj_t)(BgL_arg4123z00_1392); 
{ /* ./SawMill/node2rtl.scm 272 */
BgL_rlocalz00_bglt BgL_new3181z00_2902;
BgL_new3181z00_2902 = 
((BgL_rlocalz00_bglt)BREF( GC_MALLOC (sizeof(struct BgL_rlocalz00_bgl)))); 
{ /* ./SawMill/node2rtl.scm 272 */
BgL_rlocalz00_bglt BgL_res5841z00_2908;
{ /* ./SawMill/node2rtl.scm 272 */
BgL_rlocalz00_bglt BgL_new3199z00_2903;
BgL_new3199z00_2903 = BgL_new3181z00_2902; 
{ /* ./SawMill/node2rtl.scm 272 */
obj_t BgL_reg3197z00_2906;obj_t BgL_code3198z00_2907;
BgL_reg3197z00_2906 = BgL_reg3179z00_2900; 
BgL_code3198z00_2907 = BgL_code3180z00_2901; 
((((BgL_rlocalz00_bglt)CREF(BgL_new3199z00_2903))->BgL_regz00) = ((obj_t)BgL_reg3197z00_2906), BUNSPEC); 
((((BgL_rlocalz00_bglt)CREF(BgL_new3199z00_2903))->BgL_codez00) = ((obj_t)BgL_code3198z00_2907), BUNSPEC); 
BgL_res5841z00_2908 = BgL_new3199z00_2903; } } BgL_res5841z00_2908; } 
BgL_res5842z00_2909 = BgL_new3181z00_2902; } } 
BgL_arg4119z00_1390 = BgL_res5842z00_2909; } } 
{ /* ./SawMill/node2rtl.scm 272 */
obj_t BgL_auxz00_4491;BgL_objectz00_bglt BgL_auxz00_4489;
BgL_auxz00_4491 = 
(obj_t)(BgL_arg4119z00_1390); 
BgL_auxz00_4489 = 
(BgL_objectz00_bglt)(BgL_obj3362z00_1389); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4489, BgL_auxz00_4491); } } 
{ /* ./SawMill/node2rtl.scm 272 */
long BgL_arg4126z00_1393;
BgL_arg4126z00_1393 = 
BGl_classzd2numzd2zz__objectz00(BGl_rlocalz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 272 */
BgL_objectz00_bglt BgL_objz00_2910;
BgL_objz00_2910 = 
(BgL_objectz00_bglt)(BgL_obj3362z00_1389); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_2910, BgL_arg4126z00_1393); } } 
{ /* ./SawMill/node2rtl.scm 272 */
obj_t BgL_objz00_2912;
BgL_objz00_2912 = 
(obj_t)(BgL_obj3362z00_1389); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_2912); BUNSPEC; } BgL_obj3362z00_1389; } 
{ /* ./SawMill/node2rtl.scm 274 */
BgL_areaz00_bglt BgL_arg4131z00_1394;
{ /* ./SawMill/node2rtl.scm 274 */
BgL_areaz00_bglt BgL_res5845z00_2939;
{ /* ./SawMill/node2rtl.scm 274 */
BgL_nodez00_bglt BgL_ez00_2913;
BgL_ez00_2913 = 
(BgL_nodez00_bglt)(BgL_bodyz00_1388); 
{ /* ./SawMill/node2rtl.scm 274 */
obj_t BgL_method3437z00_2914;
{ /* ./SawMill/node2rtl.scm 274 */
BgL_objectz00_bglt BgL_objz00_2915;
BgL_objz00_2915 = 
(BgL_objectz00_bglt)(BgL_ez00_2913); 
{ /* ./SawMill/node2rtl.scm 274 */
long BgL_objzd2classzd2numz00_2916;
BgL_objzd2classzd2numz00_2916 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_2915); 
{ /* ./SawMill/node2rtl.scm 274 */
obj_t BgL_arg2017z00_2917;
{ /* ./SawMill/node2rtl.scm 274 */
int BgL_auxz00_4502;
BgL_auxz00_4502 = 
(int)(((long)1)); 
BgL_arg2017z00_2917 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_4502); } 
{ /* ./SawMill/node2rtl.scm 274 */
int BgL_offsetz00_2920;
BgL_offsetz00_2920 = 
(int)(BgL_objzd2classzd2numz00_2916); 
{ /* ./SawMill/node2rtl.scm 274 */
long BgL_offsetz00_2921;
{ /* ./SawMill/node2rtl.scm 274 */
long BgL_auxz00_4506;
BgL_auxz00_4506 = 
(long)(BgL_offsetz00_2920); 
BgL_offsetz00_2921 = 
(BgL_auxz00_4506-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 274 */
long BgL_modz00_2922;
{ /* ./SawMill/node2rtl.scm 274 */
int BgL_arg2028z00_2923;
BgL_arg2028z00_2923 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 274 */
long BgL_n2z00_2931;
BgL_n2z00_2931 = 
(long)(BgL_arg2028z00_2923); 
BgL_modz00_2922 = 
(BgL_offsetz00_2921/BgL_n2z00_2931); } } 
{ /* ./SawMill/node2rtl.scm 274 */
long BgL_restz00_2924;
{ /* ./SawMill/node2rtl.scm 274 */
int BgL_arg2024z00_2925;
BgL_arg2024z00_2925 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 274 */
long BgL_n2z00_2934;
BgL_n2z00_2934 = 
(long)(BgL_arg2024z00_2925); 
BgL_restz00_2924 = 
(BgL_offsetz00_2921%BgL_n2z00_2934); } } 
{ /* ./SawMill/node2rtl.scm 274 */

{ /* ./SawMill/node2rtl.scm 274 */
obj_t BgL_bucketz00_2926;
{ /* ./SawMill/node2rtl.scm 274 */
int BgL_kz00_2936;
BgL_kz00_2936 = 
(int)(BgL_modz00_2922); 
BgL_bucketz00_2926 = 
VECTOR_REF(BgL_arg2017z00_2917,BgL_kz00_2936); } 
{ /* ./SawMill/node2rtl.scm 274 */
int BgL_kz00_2938;
BgL_kz00_2938 = 
(int)(BgL_restz00_2924); 
BgL_method3437z00_2914 = 
VECTOR_REF(BgL_bucketz00_2926,BgL_kz00_2938); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 274 */
obj_t BgL_auxz00_4519;
BgL_auxz00_4519 = 
PROCEDURE_ENTRY(BgL_method3437z00_2914)(BgL_method3437z00_2914, 
(obj_t)(BgL_ez00_2913), BEOA); 
BgL_res5845z00_2939 = 
(BgL_areaz00_bglt)(BgL_auxz00_4519); } } } 
BgL_arg4131z00_1394 = BgL_res5845z00_2939; } 
return 
BGl_linkz00zzsaw_node2rtlz00(BgL_nopz00_1387, BgL_arg4131z00_1394);} } } } 
}



/* imperative? */
obj_t BGl_imperativezf3zf3zzsaw_node2rtlz00(BgL_appz00_bglt BgL_ez00_67, BgL_globalz00_bglt BgL_vz00_68, obj_t BgL_argsz00_69)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 287 */
{ /* ./SawMill/node2rtl.scm 288 */
obj_t BgL_idz00_1398;
{ /* ./SawMill/node2rtl.scm 288 */
BgL_variablez00_bglt BgL_obj1093z00_2940;
BgL_obj1093z00_2940 = 
(BgL_variablez00_bglt)(BgL_vz00_68); 
BgL_idz00_1398 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1093z00_2940))->BgL_idz00); } 
{ /* ./SawMill/node2rtl.scm 290 */
bool_t BgL_test4144z00_1399;
{ /* ./SawMill/node2rtl.scm 290 */
obj_t BgL_auxz00_4527;
BgL_auxz00_4527 = 
CNST_TABLE_REF(((long)2)); 
BgL_test4144z00_1399 = 
(BgL_idz00_1398==BgL_auxz00_4527); } 
if(BgL_test4144z00_1399)
{ /* ./SawMill/node2rtl.scm 290 */
{ /* ./SawMill/node2rtl.scm 292 */
BgL_areaz00_bglt BgL_arg4146z00_1400;BgL_areaz00_bglt BgL_arg4147z00_1401;
{ /* ./SawMill/node2rtl.scm 292 */
obj_t BgL_arg4150z00_1402;BgL_rtl_regz00_bglt BgL_arg4151z00_1403;
{ /* ./SawMill/node2rtl.scm 292 */
obj_t BgL_auxz00_4531;
{ /* ./SawMill/node2rtl.scm 292 */
obj_t BgL_auxz00_4532;
BgL_auxz00_4532 = 
CDR(BgL_argsz00_69); 
BgL_auxz00_4531 = 
CDR(BgL_auxz00_4532); } 
BgL_arg4150z00_1402 = 
CAR(BgL_auxz00_4531); } 
{ /* ./SawMill/node2rtl.scm 293 */
BgL_variablez00_bglt BgL_arg4155z00_1404;
{ /* ./SawMill/node2rtl.scm 293 */
BgL_varz00_bglt BgL_obj1625z00_2948;
{ /* ./SawMill/node2rtl.scm 293 */
obj_t BgL_auxz00_4536;
BgL_auxz00_4536 = 
CAR(BgL_argsz00_69); 
BgL_obj1625z00_2948 = 
(BgL_varz00_bglt)(BgL_auxz00_4536); } 
BgL_arg4155z00_1404 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_2948))->BgL_variablez00); } 
BgL_arg4151z00_1403 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_arg4155z00_1404)); } 
{ /* ./SawMill/node2rtl.scm 292 */
BgL_areaz00_bglt BgL_res5846z00_2956;
{ /* ./SawMill/node2rtl.scm 292 */
BgL_nodez00_bglt BgL_ez00_2949;
BgL_ez00_2949 = 
(BgL_nodez00_bglt)(BgL_arg4150z00_1402); 
{ /* ./SawMill/node2rtl.scm 292 */
BgL_areaz00_bglt BgL_az00_2951;
BgL_az00_2951 = 
BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(BgL_ez00_2949); 
{ /* ./SawMill/node2rtl.scm 292 */
BgL_blockz00_bglt BgL_arg3672z00_2954;
BgL_arg3672z00_2954 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_2951))->BgL_exitz00); 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_arg3672z00_2954, BgL_arg4151z00_1403); } 
BgL_res5846z00_2956 = BgL_az00_2951; } } 
BgL_arg4146z00_1400 = BgL_res5846z00_2956; } } 
{ /* ./SawMill/node2rtl.scm 294 */
BgL_rtl_nopz00_bglt BgL_arg4162z00_1406;
BgL_arg4162z00_1406 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 294 */
BgL_rtl_funz00_bglt BgL_funz00_2958;
BgL_funz00_2958 = 
(BgL_rtl_funz00_bglt)(BgL_arg4162z00_1406); 
BgL_arg4147z00_1401 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_2958, BNIL); } } 
{ /* ./SawMill/node2rtl.scm 292 */
BgL_areaz00_bglt BgL_auxz00_4549;
BgL_auxz00_4549 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg4146z00_1400, BgL_arg4147z00_1401); 
return 
(obj_t)(BgL_auxz00_4549);} } }  else 
{ /* ./SawMill/node2rtl.scm 295 */
bool_t BgL_test4166z00_1408;
{ /* ./SawMill/node2rtl.scm 295 */
obj_t BgL_auxz00_4552;
BgL_auxz00_4552 = 
CNST_TABLE_REF(((long)3)); 
BgL_test4166z00_1408 = 
(BgL_idz00_1398==BgL_auxz00_4552); } 
if(BgL_test4166z00_1408)
{ /* ./SawMill/node2rtl.scm 295 */
{ /* ./SawMill/node2rtl.scm 297 */
BgL_rtl_globalrefz00_bglt BgL_arg4168z00_1409;
{ /* ./SawMill/node2rtl.scm 297 */
BgL_variablez00_bglt BgL_arg4172z00_1411;
{ /* ./SawMill/node2rtl.scm 297 */
BgL_varz00_bglt BgL_obj1625z00_2961;
{ /* ./SawMill/node2rtl.scm 297 */
obj_t BgL_auxz00_4556;
BgL_auxz00_4556 = 
CAR(BgL_argsz00_69); 
BgL_obj1625z00_2961 = 
(BgL_varz00_bglt)(BgL_auxz00_4556); } 
BgL_arg4172z00_1411 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_2961))->BgL_variablez00); } 
BgL_arg4168z00_1409 = 
BGl_makezd2rtl_globalrefzd2zzsaw_defsz00(
(BgL_globalz00_bglt)(BgL_arg4172z00_1411)); } 
{ /* ./SawMill/node2rtl.scm 296 */
BgL_rtl_funz00_bglt BgL_funz00_2963;
BgL_funz00_2963 = 
(BgL_rtl_funz00_bglt)(BgL_arg4168z00_1409); 
{ /* ./SawMill/node2rtl.scm 296 */
BgL_areaz00_bglt BgL_auxz00_4563;
BgL_auxz00_4563 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_67), BgL_funz00_2963, BNIL); 
return 
(obj_t)(BgL_auxz00_4563);} } } }  else 
{ /* ./SawMill/node2rtl.scm 295 */
return BFALSE;} } } } } 
}



/* object-init */
obj_t BGl_objectzd2initzd2zzsaw_node2rtlz00()
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_arg4182z00_1413;obj_t BgL_arg4183z00_1414;obj_t BgL_arg4187z00_1418;
BgL_arg4182z00_1413 = 
CNST_TABLE_REF(((long)4)); 
BgL_arg4183z00_1414 = BGl_objectz00zz__objectz00; 
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_v3433z00_1419;
{ 
int BgL_auxz00_4568;
BgL_auxz00_4568 = 
(int)(((long)0)); 
BgL_v3433z00_1419 = 
create_vector(BgL_auxz00_4568); } 
BgL_arg4187z00_1418 = BgL_v3433z00_1419; } 
BGl_areaz00zzsaw_node2rtlz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg4182z00_1413, BgL_arg4183z00_1414, BFALSE, BGl_allocatezd2areazd2envz00zzsaw_node2rtlz00, ((long)49985), BNIL, BFALSE, BgL_arg4187z00_1418); } 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_arg4191z00_1420;obj_t BgL_arg4192z00_1421;obj_t BgL_arg4196z00_1425;
BgL_arg4191z00_1420 = 
CNST_TABLE_REF(((long)5)); 
BgL_arg4192z00_1421 = BGl_blockz00zzsaw_defsz00; 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_v3434z00_1426;
{ 
int BgL_auxz00_4573;
BgL_auxz00_4573 = 
(int)(((long)0)); 
BgL_v3434z00_1426 = 
create_vector(BgL_auxz00_4573); } 
BgL_arg4196z00_1425 = BgL_v3434z00_1426; } 
BGl_reversedz00zzsaw_node2rtlz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg4191z00_1420, BgL_arg4192z00_1421, BFALSE, BGl_allocatezd2reversedzd2envz00zzsaw_node2rtlz00, ((long)56664), BNIL, BFALSE, BgL_arg4196z00_1425); } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_arg4200z00_1427;obj_t BgL_arg4201z00_1428;obj_t BgL_arg4205z00_1432;
BgL_arg4200z00_1427 = 
CNST_TABLE_REF(((long)6)); 
BgL_arg4201z00_1428 = BGl_localz00zzast_varz00; 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_v3435z00_1433;
{ 
int BgL_auxz00_4578;
BgL_auxz00_4578 = 
(int)(((long)0)); 
BgL_v3435z00_1433 = 
create_vector(BgL_auxz00_4578); } 
BgL_arg4205z00_1432 = BgL_v3435z00_1433; } 
BGl_rlocalz00zzsaw_node2rtlz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg4200z00_1427, BgL_arg4201z00_1428, BFALSE, BGl_allocatezd2rlocalzd2envz00zzsaw_node2rtlz00, ((long)36504), BNIL, BFALSE, BgL_arg4205z00_1432); } 
return BUNSPEC;} 
}



/* _allocate-rlocal */
obj_t BGl__allocatezd2rlocalzd2zzsaw_node2rtlz00(obj_t BgL_envz00_3730)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 17 */
{ /* ./SawMill/node2rtl.scm 17 */
BgL_localz00_bglt BgL_auxz00_4582;
{ /* ./SawMill/node2rtl.scm 17 */
BgL_localz00_bglt BgL_res6665z00_3872;
{ /* ./SawMill/node2rtl.scm 17 */
BgL_localz00_bglt BgL_new3203z00_3868;
BgL_new3203z00_3868 = 
((BgL_localz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_localz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 17 */
long BgL_arg4221z00_3869;
BgL_arg4221z00_3869 = 
BGl_classzd2numzd2zz__objectz00(BGl_rlocalz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_objectz00_bglt BgL_objz00_3870;
BgL_objz00_3870 = 
(BgL_objectz00_bglt)(BgL_new3203z00_3868); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3870, BgL_arg4221z00_3869); } } 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_objectz00_bglt BgL_auxz00_4587;
BgL_auxz00_4587 = 
(BgL_objectz00_bglt)(BgL_new3203z00_3868); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4587, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_objz00_3871;
BgL_objz00_3871 = 
(obj_t)(BgL_new3203z00_3868); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3871); BUNSPEC; } 
BgL_res6665z00_3872 = BgL_new3203z00_3868; } 
BgL_auxz00_4582 = BgL_res6665z00_3872; } 
return 
(obj_t)(BgL_auxz00_4582);} } 
}



/* widening-reversed */
BgL_reversedz00_bglt BGl_wideningzd2reversedzd2zzsaw_node2rtlz00()
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 16 */
{ /* ./SawMill/node2rtl.scm 16 */
BgL_reversedz00_bglt BgL_new3149z00_1443;
BgL_new3149z00_1443 = 
((BgL_reversedz00_bglt)BREF( GC_MALLOC (sizeof(struct BgL_reversedz00_bgl)))); 
return BgL_new3149z00_1443;} } 
}



/* _allocate-reversed */
obj_t BGl__allocatezd2reversedzd2zzsaw_node2rtlz00(obj_t BgL_envz00_3729)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 16 */
{ /* ./SawMill/node2rtl.scm 16 */
BgL_blockz00_bglt BgL_auxz00_4594;
{ /* ./SawMill/node2rtl.scm 16 */
BgL_blockz00_bglt BgL_res6666z00_3881;
{ /* ./SawMill/node2rtl.scm 16 */
BgL_blockz00_bglt BgL_new3159z00_3877;
BgL_new3159z00_3877 = 
((BgL_blockz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_blockz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 16 */
long BgL_arg4243z00_3878;
BgL_arg4243z00_3878 = 
BGl_classzd2numzd2zz__objectz00(BGl_reversedz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 16 */
BgL_objectz00_bglt BgL_objz00_3879;
BgL_objz00_3879 = 
(BgL_objectz00_bglt)(BgL_new3159z00_3877); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3879, BgL_arg4243z00_3878); } } 
{ /* ./SawMill/node2rtl.scm 16 */
BgL_objectz00_bglt BgL_auxz00_4599;
BgL_auxz00_4599 = 
(BgL_objectz00_bglt)(BgL_new3159z00_3877); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4599, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_objz00_3880;
BgL_objz00_3880 = 
(obj_t)(BgL_new3159z00_3877); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3880); BUNSPEC; } 
BgL_res6666z00_3881 = BgL_new3159z00_3877; } 
BgL_auxz00_4594 = BgL_res6666z00_3881; } 
return 
(obj_t)(BgL_auxz00_4594);} } 
}



/* _allocate-area */
obj_t BGl__allocatezd2areazd2zzsaw_node2rtlz00(obj_t BgL_envz00_3728)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 15 */
{ /* ./SawMill/node2rtl.scm 15 */
BgL_areaz00_bglt BgL_auxz00_4605;
{ /* ./SawMill/node2rtl.scm 15 */
BgL_areaz00_bglt BgL_res6667z00_3890;
{ /* ./SawMill/node2rtl.scm 15 */
BgL_areaz00_bglt BgL_new3137z00_3886;
BgL_new3137z00_3886 = 
((BgL_areaz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_areaz00_bgl) ))); 
{ /* ./SawMill/node2rtl.scm 15 */
long BgL_arg4252z00_3887;
BgL_arg4252z00_3887 = 
BGl_classzd2numzd2zz__objectz00(BGl_areaz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 15 */
BgL_objectz00_bglt BgL_objz00_3888;
BgL_objz00_3888 = 
(BgL_objectz00_bglt)(BgL_new3137z00_3886); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3888, BgL_arg4252z00_3887); } } 
{ /* ./SawMill/node2rtl.scm 15 */
BgL_objectz00_bglt BgL_auxz00_4610;
BgL_auxz00_4610 = 
(BgL_objectz00_bglt)(BgL_new3137z00_3886); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4610, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_objz00_3889;
BgL_objz00_3889 = 
(obj_t)(BgL_new3137z00_3886); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3889); BUNSPEC; } 
BgL_res6667z00_3890 = BgL_new3137z00_3886; } 
BgL_auxz00_4605 = BgL_res6667z00_3890; } 
return 
(obj_t)(BgL_auxz00_4605);} } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzsaw_node2rtlz00()
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
BGl_addzd2genericz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_nodezd2ze3rtlzd2default3436zd2envz31zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_atomz00zzast_nodez00, BGl_proc6613z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_varz00zzast_nodez00, BGl_proc6614z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_letzd2varzd2zzast_nodez00, BGl_proc6615z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_setqz00zzast_nodez00, BGl_proc6616z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_sequencez00zzast_nodez00, BGl_proc6617z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_conditionalz00zzast_nodez00, BGl_proc6618z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_selectz00zzast_nodez00, BGl_proc6619z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_letzd2funzd2zzast_nodez00, BGl_proc6620z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_appz00zzast_nodez00, BGl_proc6621z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_appzd2lyzd2zzast_nodez00, BGl_proc6622z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_funcallz00zzast_nodez00, BGl_proc6623z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_pragmaz00zzast_nodez00, BGl_proc6624z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_getfieldz00zzast_nodez00, BGl_proc6625z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_setfieldz00zzast_nodez00, BGl_proc6626z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_newz00zzast_nodez00, BGl_proc6627z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_vallocz00zzast_nodez00, BGl_proc6628z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_vrefz00zzast_nodez00, BGl_proc6629z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_vsetz12z12zzast_nodez00, BGl_proc6630z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_vlengthz00zzast_nodez00, BGl_proc6631z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_isaz00zzast_nodez00, BGl_proc6632z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_castz00zzast_nodez00, BGl_proc6633z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_setzd2exzd2itz00zzast_nodez00, BGl_proc6634z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_jumpzd2exzd2itz00zzast_nodez00, BGl_proc6635z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_failz00zzast_nodez00, BGl_proc6636z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_makezd2boxzd2zzast_nodez00, BGl_proc6637z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_boxzd2refzd2zzast_nodez00, BGl_proc6638z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BGl_boxzd2setz12zc0zzast_nodez00, BGl_proc6639z00zzsaw_node2rtlz00); 
BGl_addzd2genericz12zc0zz__objectz00(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BGl_predicatezd2default3492zd2envz00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BGl_atomz00zzast_nodez00, BGl_proc6640z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BGl_conditionalz00zzast_nodez00, BGl_proc6641z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_rlocalz00zzsaw_node2rtlz00, BGl_proc6642z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_rlocalz00zzsaw_node2rtlz00, BGl_proc6643z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_reversedz00zzsaw_node2rtlz00, BGl_proc6644z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_reversedz00zzsaw_node2rtlz00, BGl_proc6645z00zzsaw_node2rtlz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_areaz00zzsaw_node2rtlz00, BGl_proc6646z00zzsaw_node2rtlz00); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_areaz00zzsaw_node2rtlz00, BGl_proc6647z00zzsaw_node2rtlz00);} 
}



/* struct+object->object-area3510 */
obj_t BGl_structzb2objectzd2ze3objectzd2area3510z51zzsaw_node2rtlz00(obj_t BgL_envz00_3774, obj_t BgL_oz00_3775, obj_t BgL_sz00_3776)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 15 */
{ 
BgL_areaz00_bglt BgL_oz00_2425;obj_t BgL_sz00_2426;
{ /* ./SawMill/node2rtl.scm 15 */
BgL_areaz00_bglt BgL_auxz00_4653;
BgL_oz00_2425 = 
(BgL_areaz00_bglt)(BgL_oz00_3775); 
BgL_sz00_2426 = BgL_sz00_3776; 
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_arg5779z00_2429;
{ /* ./SawMill/node2rtl.scm 15 */
int BgL_auxz00_4654;
BgL_auxz00_4654 = 
(int)(((long)0)); 
BgL_arg5779z00_2429 = 
STRUCT_REF(BgL_sz00_2426, BgL_auxz00_4654); } 
{ /* ./SawMill/node2rtl.scm 15 */
BgL_objectz00_bglt BgL_auxz00_4657;
BgL_auxz00_4657 = 
(BgL_objectz00_bglt)(BgL_oz00_2425); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4657, BgL_arg5779z00_2429); } } 
{ /* ./SawMill/node2rtl.scm 15 */
BgL_blockz00_bglt BgL_v3142z00_2430;
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_auxz00_4660;
{ /* ./SawMill/node2rtl.scm 15 */
int BgL_auxz00_4661;
BgL_auxz00_4661 = 
(int)(((long)1)); 
BgL_auxz00_4660 = 
STRUCT_REF(BgL_sz00_2426, BgL_auxz00_4661); } 
BgL_v3142z00_2430 = 
(BgL_blockz00_bglt)(BgL_auxz00_4660); } 
((((BgL_areaz00_bglt)CREF(BgL_oz00_2425))->BgL_entryz00) = ((BgL_blockz00_bglt)BgL_v3142z00_2430), BUNSPEC); } 
{ /* ./SawMill/node2rtl.scm 15 */
BgL_blockz00_bglt BgL_v3146z00_2431;
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_auxz00_4666;
{ /* ./SawMill/node2rtl.scm 15 */
int BgL_auxz00_4667;
BgL_auxz00_4667 = 
(int)(((long)2)); 
BgL_auxz00_4666 = 
STRUCT_REF(BgL_sz00_2426, BgL_auxz00_4667); } 
BgL_v3146z00_2431 = 
(BgL_blockz00_bglt)(BgL_auxz00_4666); } 
((((BgL_areaz00_bglt)CREF(BgL_oz00_2425))->BgL_exitz00) = ((BgL_blockz00_bglt)BgL_v3146z00_2431), BUNSPEC); } 
BgL_auxz00_4653 = BgL_oz00_2425; 
return 
(obj_t)(BgL_auxz00_4653);} } } 
}



/* object->struct-area3507 */
obj_t BGl_objectzd2ze3structzd2area3507ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3777, obj_t BgL_obj3138z00_3778)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 15 */
{ 
BgL_areaz00_bglt BgL_obj3138z00_2415;
BgL_obj3138z00_2415 = 
(BgL_areaz00_bglt)(BgL_obj3138z00_3778); 
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_res3139z00_2418;
{ /* ./SawMill/node2rtl.scm 15 */
obj_t BgL_keyz00_3643;int BgL_lenz00_3644;
BgL_keyz00_3643 = 
CNST_TABLE_REF(((long)4)); 
BgL_lenz00_3644 = 
(int)(((long)3)); 
BgL_res3139z00_2418 = 
make_struct(BgL_keyz00_3643, BgL_lenz00_3644, BUNSPEC); } 
{ /* ./SawMill/node2rtl.scm 15 */
int BgL_kz00_3647;
BgL_kz00_3647 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3139z00_2418, BgL_kz00_3647, BFALSE); } 
{ /* ./SawMill/node2rtl.scm 15 */
BgL_blockz00_bglt BgL_arg5763z00_2420;
BgL_arg5763z00_2420 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3138z00_2415))->BgL_entryz00); 
{ /* ./SawMill/node2rtl.scm 15 */
int BgL_kz00_3651;obj_t BgL_oz00_3652;
BgL_kz00_3651 = 
(int)(((long)1)); 
BgL_oz00_3652 = 
(obj_t)(BgL_arg5763z00_2420); 
STRUCT_SET(BgL_res3139z00_2418, BgL_kz00_3651, BgL_oz00_3652); } } 
{ /* ./SawMill/node2rtl.scm 15 */
BgL_blockz00_bglt BgL_arg5768z00_2422;
BgL_arg5768z00_2422 = 
(((BgL_areaz00_bglt)CREF(BgL_obj3138z00_2415))->BgL_exitz00); 
{ /* ./SawMill/node2rtl.scm 15 */
int BgL_kz00_3655;obj_t BgL_oz00_3656;
BgL_kz00_3655 = 
(int)(((long)2)); 
BgL_oz00_3656 = 
(obj_t)(BgL_arg5768z00_2422); 
STRUCT_SET(BgL_res3139z00_2418, BgL_kz00_3655, BgL_oz00_3656); } } 
return BgL_res3139z00_2418;} } } 
}



/* struct+object->object-reversed3505 */
obj_t BGl_structzb2objectzd2ze3objectzd2reversed3505z51zzsaw_node2rtlz00(obj_t BgL_envz00_3779, obj_t BgL_oz00_3780, obj_t BgL_sz00_3781)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 16 */
{ 
BgL_reversedz00_bglt BgL_oz00_2404;obj_t BgL_sz00_2405;
{ /* ./SawMill/node2rtl.scm 16 */
BgL_reversedz00_bglt BgL_auxz00_4688;
BgL_oz00_2404 = 
(BgL_reversedz00_bglt)(BgL_oz00_3780); 
BgL_sz00_2405 = BgL_sz00_3781; 
{ 

{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_old3163z00_2408;
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_nextzd2method3504zd2_2413;
BgL_nextzd2method3504zd2_2413 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_2404), BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_reversedz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 16 */
bool_t BgL_test5754z00_2414;
BgL_test5754z00_2414 = 
PROCEDUREP(BgL_nextzd2method3504zd2_2413); 
if(BgL_test5754z00_2414)
{ /* ./SawMill/node2rtl.scm 16 */
BgL_old3163z00_2408 = 
PROCEDURE_ENTRY(BgL_nextzd2method3504zd2_2413)(BgL_nextzd2method3504zd2_2413, 
(obj_t)(BgL_oz00_2404), BgL_sz00_2405, BEOA); }  else 
{ /* ./SawMill/node2rtl.scm 16 */
{ /* ./SawMill/node2rtl.scm 16 */
BgL_objectz00_bglt BgL_auxz00_4696;
BgL_auxz00_4696 = 
BGl_structzb2objectzd2ze3objectz83zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_2404), BgL_sz00_2405); 
BgL_old3163z00_2408 = 
(obj_t)(BgL_auxz00_4696); } } } } 
{ /* ./SawMill/node2rtl.scm 16 */
BgL_reversedz00_bglt BgL_new3165z00_2410;
BgL_new3165z00_2410 = 
((BgL_reversedz00_bglt)(BgL_old3163z00_2408)); 
{ /* ./SawMill/node2rtl.scm 16 */
long BgL_arg5744z00_2411;
BgL_arg5744z00_2411 = 
BGl_classzd2numzd2zz__objectz00(BGl_reversedz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 16 */
BgL_objectz00_bglt BgL_objz00_3639;
BgL_objz00_3639 = 
(BgL_objectz00_bglt)(BgL_new3165z00_2410); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3639, BgL_arg5744z00_2411); } } 
{ /* ./SawMill/node2rtl.scm 16 */
BgL_reversedz00_bglt BgL_arg5748z00_2412;
BgL_arg5748z00_2412 = 
BGl_wideningzd2reversedzd2zzsaw_node2rtlz00(); 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_auxz00_4707;BgL_objectz00_bglt BgL_auxz00_4705;
BgL_auxz00_4707 = 
(obj_t)(BgL_arg5748z00_2412); 
BgL_auxz00_4705 = 
(BgL_objectz00_bglt)(BgL_new3165z00_2410); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4705, BgL_auxz00_4707); } } 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_objz00_3641;
BgL_objz00_3641 = 
(obj_t)(BgL_new3165z00_2410); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3641); BUNSPEC; } 
BgL_auxz00_4688 = BgL_new3165z00_2410; } } } 
return 
(obj_t)(BgL_auxz00_4688);} } } 
}



/* object->struct-reversed3503 */
obj_t BGl_objectzd2ze3structzd2reversed3503ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3782, obj_t BgL_obj3160z00_3783)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 16 */
{ 
BgL_reversedz00_bglt BgL_obj3160z00_2396;
BgL_obj3160z00_2396 = 
(BgL_reversedz00_bglt)(BgL_obj3160z00_3783); 
{ 

{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_res3161z00_2399;
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_nextzd2method3502zd2_2402;
BgL_nextzd2method3502zd2_2402 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj3160z00_2396), BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_reversedz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 16 */
bool_t BgL_test5737z00_2403;
BgL_test5737z00_2403 = 
PROCEDUREP(BgL_nextzd2method3502zd2_2402); 
if(BgL_test5737z00_2403)
{ /* ./SawMill/node2rtl.scm 16 */
BgL_res3161z00_2399 = 
PROCEDURE_ENTRY(BgL_nextzd2method3502zd2_2402)(BgL_nextzd2method3502zd2_2402, 
(obj_t)(BgL_obj3160z00_2396), BEOA); }  else 
{ /* ./SawMill/node2rtl.scm 16 */
BgL_res3161z00_2399 = 
BGl_objectzd2ze3structz31zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj3160z00_2396)); } } } 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_aux3162z00_2400;
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_keyz00_3624;int BgL_lenz00_3625;
BgL_keyz00_3624 = 
CNST_TABLE_REF(((long)5)); 
BgL_lenz00_3625 = 
(int)(((long)0)); 
BgL_aux3162z00_2400 = 
make_struct(BgL_keyz00_3624, BgL_lenz00_3625, BUNSPEC); } 
{ /* ./SawMill/node2rtl.scm 16 */
int BgL_kz00_3628;
BgL_kz00_3628 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3161z00_2399, BgL_kz00_3628, BgL_aux3162z00_2400); } 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_arg5731z00_2401;
BgL_arg5731z00_2401 = 
STRUCT_KEY(BgL_res3161z00_2399); 
STRUCT_KEY_SET(BgL_aux3162z00_2400, BgL_arg5731z00_2401); } 
{ /* ./SawMill/node2rtl.scm 16 */
obj_t BgL_kz00_3635;
BgL_kz00_3635 = 
CNST_TABLE_REF(((long)5)); 
STRUCT_KEY_SET(BgL_res3161z00_2399, BgL_kz00_3635); } 
return BgL_res3161z00_2399;} } } } } 
}



/* struct+object->object-rlocal3501 */
obj_t BGl_structzb2objectzd2ze3objectzd2rlocal3501z51zzsaw_node2rtlz00(obj_t BgL_envz00_3784, obj_t BgL_oz00_3785, obj_t BgL_sz00_3786)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 17 */
{ 
BgL_rlocalz00_bglt BgL_oz00_2383;obj_t BgL_sz00_2384;
{ /* ./SawMill/node2rtl.scm 17 */
BgL_rlocalz00_bglt BgL_auxz00_4733;
BgL_oz00_2383 = 
(BgL_rlocalz00_bglt)(BgL_oz00_3785); 
BgL_sz00_2384 = BgL_sz00_3786; 
{ 

{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_old3207z00_2387;obj_t BgL_aux3208z00_2388;
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_nextzd2method3500zd2_2394;
BgL_nextzd2method3500zd2_2394 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_2383), BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_rlocalz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 17 */
bool_t BgL_test5723z00_2395;
BgL_test5723z00_2395 = 
PROCEDUREP(BgL_nextzd2method3500zd2_2394); 
if(BgL_test5723z00_2395)
{ /* ./SawMill/node2rtl.scm 17 */
BgL_old3207z00_2387 = 
PROCEDURE_ENTRY(BgL_nextzd2method3500zd2_2394)(BgL_nextzd2method3500zd2_2394, 
(obj_t)(BgL_oz00_2383), BgL_sz00_2384, BEOA); }  else 
{ /* ./SawMill/node2rtl.scm 17 */
{ /* ./SawMill/node2rtl.scm 17 */
BgL_objectz00_bglt BgL_auxz00_4741;
BgL_auxz00_4741 = 
BGl_structzb2objectzd2ze3objectz83zz__objectz00(
(BgL_objectz00_bglt)(BgL_oz00_2383), BgL_sz00_2384); 
BgL_old3207z00_2387 = 
(obj_t)(BgL_auxz00_4741); } } } } 
{ /* ./SawMill/node2rtl.scm 17 */
int BgL_auxz00_4745;
BgL_auxz00_4745 = 
(int)(((long)0)); 
BgL_aux3208z00_2388 = 
STRUCT_REF(BgL_sz00_2384, BgL_auxz00_4745); } 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_rlocalz00_bglt BgL_new3209z00_2389;
BgL_new3209z00_2389 = 
((BgL_rlocalz00_bglt)(BgL_old3207z00_2387)); 
{ /* ./SawMill/node2rtl.scm 17 */
long BgL_arg5708z00_2390;
BgL_arg5708z00_2390 = 
BGl_classzd2numzd2zz__objectz00(BGl_rlocalz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_objectz00_bglt BgL_objz00_3606;
BgL_objz00_3606 = 
(BgL_objectz00_bglt)(BgL_new3209z00_2389); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_3606, BgL_arg5708z00_2390); } } 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_rlocalz00_bglt BgL_arg5712z00_2391;
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_arg5715z00_2392;obj_t BgL_arg5716z00_2393;
{ /* ./SawMill/node2rtl.scm 17 */
int BgL_auxz00_4752;
BgL_auxz00_4752 = 
(int)(((long)0)); 
BgL_arg5715z00_2392 = 
STRUCT_REF(BgL_aux3208z00_2388, BgL_auxz00_4752); } 
{ /* ./SawMill/node2rtl.scm 17 */
int BgL_auxz00_4755;
BgL_auxz00_4755 = 
(int)(((long)1)); 
BgL_arg5716z00_2393 = 
STRUCT_REF(BgL_aux3208z00_2388, BgL_auxz00_4755); } 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_rlocalz00_bglt BgL_res5894z00_3621;
{ /* ./SawMill/node2rtl.scm 17 */
BgL_rlocalz00_bglt BgL_new3181z00_3614;
BgL_new3181z00_3614 = 
((BgL_rlocalz00_bglt)BREF( GC_MALLOC (sizeof(struct BgL_rlocalz00_bgl)))); 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_rlocalz00_bglt BgL_res5893z00_3620;
{ /* ./SawMill/node2rtl.scm 17 */
BgL_rlocalz00_bglt BgL_new3199z00_3615;
BgL_new3199z00_3615 = BgL_new3181z00_3614; 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_reg3197z00_3618;obj_t BgL_code3198z00_3619;
BgL_reg3197z00_3618 = BgL_arg5715z00_2392; 
BgL_code3198z00_3619 = BgL_arg5716z00_2393; 
((((BgL_rlocalz00_bglt)CREF(BgL_new3199z00_3615))->BgL_regz00) = ((obj_t)BgL_reg3197z00_3618), BUNSPEC); 
((((BgL_rlocalz00_bglt)CREF(BgL_new3199z00_3615))->BgL_codez00) = ((obj_t)BgL_code3198z00_3619), BUNSPEC); 
BgL_res5893z00_3620 = BgL_new3199z00_3615; } } BgL_res5893z00_3620; } 
BgL_res5894z00_3621 = BgL_new3181z00_3614; } 
BgL_arg5712z00_2391 = BgL_res5894z00_3621; } } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_auxz00_4763;BgL_objectz00_bglt BgL_auxz00_4761;
BgL_auxz00_4763 = 
(obj_t)(BgL_arg5712z00_2391); 
BgL_auxz00_4761 = 
(BgL_objectz00_bglt)(BgL_new3209z00_2389); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_4761, BgL_auxz00_4763); } } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_objz00_3622;
BgL_objz00_3622 = 
(obj_t)(BgL_new3209z00_2389); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_3622); BUNSPEC; } 
BgL_auxz00_4733 = BgL_new3209z00_2389; } } } 
return 
(obj_t)(BgL_auxz00_4733);} } } 
}



/* object->struct-rlocal3499 */
obj_t BGl_objectzd2ze3structzd2rlocal3499ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3787, obj_t BgL_obj3204z00_3788)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 17 */
{ 
BgL_rlocalz00_bglt BgL_obj3204z00_2371;
BgL_obj3204z00_2371 = 
(BgL_rlocalz00_bglt)(BgL_obj3204z00_3788); 
{ 

{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_res3205z00_2374;
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_nextzd2method3498zd2_2381;
BgL_nextzd2method3498zd2_2381 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj3204z00_2371), BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_rlocalz00zzsaw_node2rtlz00); 
{ /* ./SawMill/node2rtl.scm 17 */
bool_t BgL_test5701z00_2382;
BgL_test5701z00_2382 = 
PROCEDUREP(BgL_nextzd2method3498zd2_2381); 
if(BgL_test5701z00_2382)
{ /* ./SawMill/node2rtl.scm 17 */
BgL_res3205z00_2374 = 
PROCEDURE_ENTRY(BgL_nextzd2method3498zd2_2381)(BgL_nextzd2method3498zd2_2381, 
(obj_t)(BgL_obj3204z00_2371), BEOA); }  else 
{ /* ./SawMill/node2rtl.scm 17 */
BgL_res3205z00_2374 = 
BGl_objectzd2ze3structz31zz__objectz00(
(BgL_objectz00_bglt)(BgL_obj3204z00_2371)); } } } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_aux3206z00_2375;
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_keyz00_3583;int BgL_lenz00_3584;
BgL_keyz00_3583 = 
CNST_TABLE_REF(((long)6)); 
BgL_lenz00_3584 = 
(int)(((long)2)); 
BgL_aux3206z00_2375 = 
make_struct(BgL_keyz00_3583, BgL_lenz00_3584, BUNSPEC); } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_arg5685z00_2377;
{ 
obj_t BgL_auxz00_4782;
{ /* ./SawMill/node2rtl.scm 17 */
BgL_objectz00_bglt BgL_auxz00_4783;
BgL_auxz00_4783 = 
(BgL_objectz00_bglt)(BgL_obj3204z00_2371); 
BgL_auxz00_4782 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4783); } 
BgL_arg5685z00_2377 = 
(((BgL_rlocalz00_bglt)CREF(BgL_auxz00_4782))->BgL_regz00); } 
{ /* ./SawMill/node2rtl.scm 17 */
int BgL_kz00_3588;
BgL_kz00_3588 = 
(int)(((long)0)); 
STRUCT_SET(BgL_aux3206z00_2375, BgL_kz00_3588, BgL_arg5685z00_2377); } } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_arg5690z00_2379;
{ 
obj_t BgL_auxz00_4789;
{ /* ./SawMill/node2rtl.scm 17 */
BgL_objectz00_bglt BgL_auxz00_4790;
BgL_auxz00_4790 = 
(BgL_objectz00_bglt)(BgL_obj3204z00_2371); 
BgL_auxz00_4789 = 
BGL_OBJECT_WIDENING(BgL_auxz00_4790); } 
BgL_arg5690z00_2379 = 
(((BgL_rlocalz00_bglt)CREF(BgL_auxz00_4789))->BgL_codez00); } 
{ /* ./SawMill/node2rtl.scm 17 */
int BgL_kz00_3592;
BgL_kz00_3592 = 
(int)(((long)1)); 
STRUCT_SET(BgL_aux3206z00_2375, BgL_kz00_3592, BgL_arg5690z00_2379); } } 
{ /* ./SawMill/node2rtl.scm 17 */
int BgL_kz00_3595;
BgL_kz00_3595 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res3205z00_2374, BgL_kz00_3595, BgL_aux3206z00_2375); } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_arg5695z00_2380;
BgL_arg5695z00_2380 = 
STRUCT_KEY(BgL_res3205z00_2374); 
STRUCT_KEY_SET(BgL_aux3206z00_2375, BgL_arg5695z00_2380); } 
{ /* ./SawMill/node2rtl.scm 17 */
obj_t BgL_kz00_3602;
BgL_kz00_3602 = 
CNST_TABLE_REF(((long)6)); 
STRUCT_KEY_SET(BgL_res3205z00_2374, BgL_kz00_3602); } 
return BgL_res3205z00_2374;} } } } } 
}



/* predicate-conditional3497 */
obj_t BGl_predicatezd2conditional3497zd2zzsaw_node2rtlz00(obj_t BgL_envz00_3789, obj_t BgL_ez00_3790, obj_t BgL_lz00_3791)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 438 */
{ 
BgL_conditionalz00_bglt BgL_ez00_2356;obj_t BgL_lz00_2357;
{ /* ./SawMill/node2rtl.scm 439 */
BgL_areaz00_bglt BgL_auxz00_4803;
BgL_ez00_2356 = 
(BgL_conditionalz00_bglt)(BgL_ez00_3790); 
BgL_lz00_2357 = BgL_lz00_3791; 
{ /* ./SawMill/node2rtl.scm 440 */
BgL_nodez00_bglt BgL_arg5656z00_2361;obj_t BgL_arg5657z00_2362;
BgL_arg5656z00_2361 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_2356))->BgL_testz00); 
{ /* ./SawMill/node2rtl.scm 440 */
BgL_areaz00_bglt BgL_arg5661z00_2363;BgL_areaz00_bglt BgL_arg5662z00_2364;
{ /* ./SawMill/node2rtl.scm 440 */
BgL_nodez00_bglt BgL_arg5670z00_2367;
BgL_arg5670z00_2367 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_2356))->BgL_truez00); 
{ /* ./SawMill/node2rtl.scm 440 */
BgL_areaz00_bglt BgL_res5884z00_3523;
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_method3493z00_3498;
{ /* ./SawMill/node2rtl.scm 440 */
BgL_objectz00_bglt BgL_objz00_3499;
BgL_objz00_3499 = 
(BgL_objectz00_bglt)(BgL_arg5670z00_2367); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_objzd2classzd2numz00_3500;
BgL_objzd2classzd2numz00_3500 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3499); 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_arg2017z00_3501;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_auxz00_4808;
BgL_auxz00_4808 = 
(int)(((long)1)); 
BgL_arg2017z00_3501 = 
PROCEDURE_REF(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BgL_auxz00_4808); } 
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_offsetz00_3504;
BgL_offsetz00_3504 = 
(int)(BgL_objzd2classzd2numz00_3500); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_offsetz00_3505;
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_auxz00_4812;
BgL_auxz00_4812 = 
(long)(BgL_offsetz00_3504); 
BgL_offsetz00_3505 = 
(BgL_auxz00_4812-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_modz00_3506;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_arg2028z00_3507;
BgL_arg2028z00_3507 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_n2z00_3515;
BgL_n2z00_3515 = 
(long)(BgL_arg2028z00_3507); 
BgL_modz00_3506 = 
(BgL_offsetz00_3505/BgL_n2z00_3515); } } 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_restz00_3508;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_arg2024z00_3509;
BgL_arg2024z00_3509 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_n2z00_3518;
BgL_n2z00_3518 = 
(long)(BgL_arg2024z00_3509); 
BgL_restz00_3508 = 
(BgL_offsetz00_3505%BgL_n2z00_3518); } } 
{ /* ./SawMill/node2rtl.scm 440 */

{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_bucketz00_3510;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_kz00_3520;
BgL_kz00_3520 = 
(int)(BgL_modz00_3506); 
BgL_bucketz00_3510 = 
VECTOR_REF(BgL_arg2017z00_3501,BgL_kz00_3520); } 
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_kz00_3522;
BgL_kz00_3522 = 
(int)(BgL_restz00_3508); 
BgL_method3493z00_3498 = 
VECTOR_REF(BgL_bucketz00_3510,BgL_kz00_3522); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_auxz00_4825;
BgL_auxz00_4825 = 
PROCEDURE_ENTRY(BgL_method3493z00_3498)(BgL_method3493z00_3498, 
(obj_t)(BgL_arg5670z00_2367), BgL_lz00_2357, BEOA); 
BgL_res5884z00_3523 = 
(BgL_areaz00_bglt)(BgL_auxz00_4825); } } 
BgL_arg5661z00_2363 = BgL_res5884z00_3523; } } 
{ /* ./SawMill/node2rtl.scm 440 */
BgL_nodez00_bglt BgL_arg5674z00_2368;
BgL_arg5674z00_2368 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_2356))->BgL_falsez00); 
{ /* ./SawMill/node2rtl.scm 440 */
BgL_areaz00_bglt BgL_res5887z00_3552;
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_method3493z00_3527;
{ /* ./SawMill/node2rtl.scm 440 */
BgL_objectz00_bglt BgL_objz00_3528;
BgL_objz00_3528 = 
(BgL_objectz00_bglt)(BgL_arg5674z00_2368); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_objzd2classzd2numz00_3529;
BgL_objzd2classzd2numz00_3529 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3528); 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_arg2017z00_3530;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_auxz00_4833;
BgL_auxz00_4833 = 
(int)(((long)1)); 
BgL_arg2017z00_3530 = 
PROCEDURE_REF(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BgL_auxz00_4833); } 
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_offsetz00_3533;
BgL_offsetz00_3533 = 
(int)(BgL_objzd2classzd2numz00_3529); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_offsetz00_3534;
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_auxz00_4837;
BgL_auxz00_4837 = 
(long)(BgL_offsetz00_3533); 
BgL_offsetz00_3534 = 
(BgL_auxz00_4837-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_modz00_3535;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_arg2028z00_3536;
BgL_arg2028z00_3536 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_n2z00_3544;
BgL_n2z00_3544 = 
(long)(BgL_arg2028z00_3536); 
BgL_modz00_3535 = 
(BgL_offsetz00_3534/BgL_n2z00_3544); } } 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_restz00_3537;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_arg2024z00_3538;
BgL_arg2024z00_3538 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_n2z00_3547;
BgL_n2z00_3547 = 
(long)(BgL_arg2024z00_3538); 
BgL_restz00_3537 = 
(BgL_offsetz00_3534%BgL_n2z00_3547); } } 
{ /* ./SawMill/node2rtl.scm 440 */

{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_bucketz00_3539;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_kz00_3549;
BgL_kz00_3549 = 
(int)(BgL_modz00_3535); 
BgL_bucketz00_3539 = 
VECTOR_REF(BgL_arg2017z00_3530,BgL_kz00_3549); } 
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_kz00_3551;
BgL_kz00_3551 = 
(int)(BgL_restz00_3537); 
BgL_method3493z00_3527 = 
VECTOR_REF(BgL_bucketz00_3539,BgL_kz00_3551); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_auxz00_4850;
BgL_auxz00_4850 = 
PROCEDURE_ENTRY(BgL_method3493z00_3527)(BgL_method3493z00_3527, 
(obj_t)(BgL_arg5674z00_2368), BgL_lz00_2357, BEOA); 
BgL_res5887z00_3552 = 
(BgL_areaz00_bglt)(BgL_auxz00_4850); } } 
BgL_arg5662z00_2364 = BgL_res5887z00_3552; } } 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_list5664z00_2365;
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_arg5666z00_2366;
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_auxz00_4855;
BgL_auxz00_4855 = 
(obj_t)(BgL_arg5662z00_2364); 
BgL_arg5666z00_2366 = 
MAKE_PAIR(BgL_auxz00_4855, BNIL); } 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_auxz00_4858;
BgL_auxz00_4858 = 
(obj_t)(BgL_arg5661z00_2363); 
BgL_list5664z00_2365 = 
MAKE_PAIR(BgL_auxz00_4858, BgL_arg5666z00_2366); } } 
BgL_arg5657z00_2362 = BgL_list5664z00_2365; } } 
{ /* ./SawMill/node2rtl.scm 440 */
BgL_areaz00_bglt BgL_res5891z00_3582;
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_method3493z00_3557;
{ /* ./SawMill/node2rtl.scm 440 */
BgL_objectz00_bglt BgL_objz00_3558;
BgL_objz00_3558 = 
(BgL_objectz00_bglt)(BgL_arg5656z00_2361); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_objzd2classzd2numz00_3559;
BgL_objzd2classzd2numz00_3559 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3558); 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_arg2017z00_3560;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_auxz00_4863;
BgL_auxz00_4863 = 
(int)(((long)1)); 
BgL_arg2017z00_3560 = 
PROCEDURE_REF(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BgL_auxz00_4863); } 
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_offsetz00_3563;
BgL_offsetz00_3563 = 
(int)(BgL_objzd2classzd2numz00_3559); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_offsetz00_3564;
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_auxz00_4867;
BgL_auxz00_4867 = 
(long)(BgL_offsetz00_3563); 
BgL_offsetz00_3564 = 
(BgL_auxz00_4867-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_modz00_3565;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_arg2028z00_3566;
BgL_arg2028z00_3566 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_n2z00_3574;
BgL_n2z00_3574 = 
(long)(BgL_arg2028z00_3566); 
BgL_modz00_3565 = 
(BgL_offsetz00_3564/BgL_n2z00_3574); } } 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_restz00_3567;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_arg2024z00_3568;
BgL_arg2024z00_3568 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 440 */
long BgL_n2z00_3577;
BgL_n2z00_3577 = 
(long)(BgL_arg2024z00_3568); 
BgL_restz00_3567 = 
(BgL_offsetz00_3564%BgL_n2z00_3577); } } 
{ /* ./SawMill/node2rtl.scm 440 */

{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_bucketz00_3569;
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_kz00_3579;
BgL_kz00_3579 = 
(int)(BgL_modz00_3565); 
BgL_bucketz00_3569 = 
VECTOR_REF(BgL_arg2017z00_3560,BgL_kz00_3579); } 
{ /* ./SawMill/node2rtl.scm 440 */
int BgL_kz00_3581;
BgL_kz00_3581 = 
(int)(BgL_restz00_3567); 
BgL_method3493z00_3557 = 
VECTOR_REF(BgL_bucketz00_3569,BgL_kz00_3581); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 440 */
obj_t BgL_auxz00_4880;
BgL_auxz00_4880 = 
PROCEDURE_ENTRY(BgL_method3493z00_3557)(BgL_method3493z00_3557, 
(obj_t)(BgL_arg5656z00_2361), BgL_arg5657z00_2362, BEOA); 
BgL_res5891z00_3582 = 
(BgL_areaz00_bglt)(BgL_auxz00_4880); } } 
BgL_auxz00_4803 = BgL_res5891z00_3582; } } 
return 
(obj_t)(BgL_auxz00_4803);} } } 
}



/* predicate-atom3495 */
obj_t BGl_predicatezd2atom3495zd2zzsaw_node2rtlz00(obj_t BgL_envz00_3792, obj_t BgL_ez00_3793, obj_t BgL_lz00_3794)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 431 */
{ 
BgL_atomz00_bglt BgL_ez00_2348;obj_t BgL_lz00_2349;
BgL_ez00_2348 = 
(BgL_atomz00_bglt)(BgL_ez00_3793); 
BgL_lz00_2349 = BgL_lz00_3794; 
{ /* ./SawMill/node2rtl.scm 432 */
bool_t BgL_testz00_4887;
{ /* ./SawMill/node2rtl.scm 432 */
obj_t BgL_auxz00_4888;
BgL_auxz00_4888 = 
(((BgL_atomz00_bglt)CREF(BgL_ez00_2348))->BgL_valuez00); 
BgL_testz00_4887 = 
CBOOL(BgL_auxz00_4888); } 
if(BgL_testz00_4887)
{ /* ./SawMill/node2rtl.scm 432 */
return 
CAR(BgL_lz00_2349);}  else 
{ /* ./SawMill/node2rtl.scm 432 */
obj_t BgL_auxz00_4892;
BgL_auxz00_4892 = 
CDR(BgL_lz00_2349); 
return 
CAR(BgL_auxz00_4892);} } } } 
}



/* node->rtl-box-set!3491 */
obj_t BGl_nodezd2ze3rtlzd2boxzd2setz123491z23zzsaw_node2rtlz00(obj_t BgL_envz00_3795, obj_t BgL_ez00_3796)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 419 */
{ 
BgL_boxzd2setz12zc0_bglt BgL_ez00_2333;
{ /* ./SawMill/node2rtl.scm 420 */
BgL_areaz00_bglt BgL_auxz00_4896;
BgL_ez00_2333 = 
(BgL_boxzd2setz12zc0_bglt)(BgL_ez00_3796); 
{ /* ./SawMill/node2rtl.scm 421 */
BgL_areaz00_bglt BgL_arg5617z00_2337;BgL_areaz00_bglt BgL_arg5618z00_2338;
{ /* ./SawMill/node2rtl.scm 421 */
BgL_rtl_boxsetz00_bglt BgL_arg5621z00_2339;BgL_varz00_bglt BgL_arg5622z00_2340;BgL_nodez00_bglt BgL_arg5623z00_2341;
BgL_arg5621z00_2339 = 
BGl_makezd2rtl_boxsetzd2zzsaw_defsz00(); 
BgL_arg5622z00_2340 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_ez00_2333))->BgL_varz00); 
BgL_arg5623z00_2341 = 
(((BgL_boxzd2setz12zc0_bglt)CREF(BgL_ez00_2333))->BgL_valuez00); 
{ /* ./SawMill/node2rtl.scm 421 */
obj_t BgL_list5625z00_2342;
{ /* ./SawMill/node2rtl.scm 421 */
obj_t BgL_arg5627z00_2343;
{ /* ./SawMill/node2rtl.scm 421 */
obj_t BgL_auxz00_4900;
BgL_auxz00_4900 = 
(obj_t)(BgL_arg5623z00_2341); 
BgL_arg5627z00_2343 = 
MAKE_PAIR(BgL_auxz00_4900, BNIL); } 
{ /* ./SawMill/node2rtl.scm 421 */
obj_t BgL_auxz00_4903;
BgL_auxz00_4903 = 
(obj_t)(BgL_arg5622z00_2340); 
BgL_list5625z00_2342 = 
MAKE_PAIR(BgL_auxz00_4903, BgL_arg5627z00_2343); } } 
{ /* ./SawMill/node2rtl.scm 421 */
BgL_rtl_funz00_bglt BgL_funz00_3481;
BgL_funz00_3481 = 
(BgL_rtl_funz00_bglt)(BgL_arg5621z00_2339); 
BgL_arg5617z00_2337 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2333), BgL_funz00_3481, BgL_list5625z00_2342); } } } 
{ /* ./SawMill/node2rtl.scm 422 */
BgL_rtl_nopz00_bglt BgL_arg5634z00_2344;
BgL_arg5634z00_2344 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 422 */
BgL_rtl_funz00_bglt BgL_funz00_3484;
BgL_funz00_3484 = 
(BgL_rtl_funz00_bglt)(BgL_arg5634z00_2344); 
BgL_arg5618z00_2338 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_3484, BNIL); } } 
BgL_auxz00_4896 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg5617z00_2337, BgL_arg5618z00_2338); } 
return 
(obj_t)(BgL_auxz00_4896);} } } 
}



/* node->rtl-box-ref3489 */
obj_t BGl_nodezd2ze3rtlzd2boxzd2ref3489z31zzsaw_node2rtlz00(obj_t BgL_envz00_3797, obj_t BgL_ez00_3798)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 414 */
{ 
BgL_boxzd2refzd2_bglt BgL_ez00_2324;
{ /* ./SawMill/node2rtl.scm 415 */
BgL_areaz00_bglt BgL_auxz00_4915;
BgL_ez00_2324 = 
(BgL_boxzd2refzd2_bglt)(BgL_ez00_3798); 
{ /* ./SawMill/node2rtl.scm 416 */
BgL_rtl_boxrefz00_bglt BgL_arg5603z00_2328;BgL_varz00_bglt BgL_arg5604z00_2329;
BgL_arg5603z00_2328 = 
BGl_makezd2rtl_boxrefzd2zzsaw_defsz00(); 
BgL_arg5604z00_2329 = 
(((BgL_boxzd2refzd2_bglt)CREF(BgL_ez00_2324))->BgL_varz00); 
{ /* ./SawMill/node2rtl.scm 416 */
obj_t BgL_list5606z00_2330;
{ /* ./SawMill/node2rtl.scm 416 */
obj_t BgL_auxz00_4918;
BgL_auxz00_4918 = 
(obj_t)(BgL_arg5604z00_2329); 
BgL_list5606z00_2330 = 
MAKE_PAIR(BgL_auxz00_4918, BNIL); } 
{ /* ./SawMill/node2rtl.scm 416 */
BgL_rtl_funz00_bglt BgL_funz00_3476;
BgL_funz00_3476 = 
(BgL_rtl_funz00_bglt)(BgL_arg5603z00_2328); 
BgL_auxz00_4915 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2324), BgL_funz00_3476, BgL_list5606z00_2330); } } } 
return 
(obj_t)(BgL_auxz00_4915);} } } 
}



/* node->rtl-make-box3487 */
obj_t BGl_nodezd2ze3rtlzd2makezd2box3487z31zzsaw_node2rtlz00(obj_t BgL_envz00_3799, obj_t BgL_ez00_3800)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 409 */
{ 
BgL_makezd2boxzd2_bglt BgL_ez00_2315;
{ /* ./SawMill/node2rtl.scm 410 */
BgL_areaz00_bglt BgL_auxz00_4926;
BgL_ez00_2315 = 
(BgL_makezd2boxzd2_bglt)(BgL_ez00_3800); 
{ /* ./SawMill/node2rtl.scm 411 */
BgL_rtl_makeboxz00_bglt BgL_arg5589z00_2319;BgL_nodez00_bglt BgL_arg5590z00_2320;
BgL_arg5589z00_2319 = 
BGl_makezd2rtl_makeboxzd2zzsaw_defsz00(); 
BgL_arg5590z00_2320 = 
(((BgL_makezd2boxzd2_bglt)CREF(BgL_ez00_2315))->BgL_valuez00); 
{ /* ./SawMill/node2rtl.scm 411 */
obj_t BgL_list5592z00_2321;
{ /* ./SawMill/node2rtl.scm 411 */
obj_t BgL_auxz00_4929;
BgL_auxz00_4929 = 
(obj_t)(BgL_arg5590z00_2320); 
BgL_list5592z00_2321 = 
MAKE_PAIR(BgL_auxz00_4929, BNIL); } 
{ /* ./SawMill/node2rtl.scm 411 */
BgL_rtl_funz00_bglt BgL_funz00_3472;
BgL_funz00_3472 = 
(BgL_rtl_funz00_bglt)(BgL_arg5589z00_2319); 
BgL_auxz00_4926 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2315), BgL_funz00_3472, BgL_list5592z00_2321); } } } 
return 
(obj_t)(BgL_auxz00_4926);} } } 
}



/* node->rtl-fail3485 */
obj_t BGl_nodezd2ze3rtlzd2fail3485ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3801, obj_t BgL_ez00_3802)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 404 */
{ 
BgL_failz00_bglt BgL_ez00_2301;
{ /* ./SawMill/node2rtl.scm 405 */
BgL_areaz00_bglt BgL_auxz00_4937;
BgL_ez00_2301 = 
(BgL_failz00_bglt)(BgL_ez00_3802); 
{ /* ./SawMill/node2rtl.scm 406 */
BgL_areaz00_bglt BgL_arg5562z00_2305;
{ /* ./SawMill/node2rtl.scm 406 */
BgL_rtl_failz00_bglt BgL_arg5565z00_2306;BgL_nodez00_bglt BgL_arg5566z00_2307;BgL_nodez00_bglt BgL_arg5567z00_2308;BgL_nodez00_bglt BgL_arg5568z00_2309;
BgL_arg5565z00_2306 = 
BGl_makezd2rtl_failzd2zzsaw_defsz00(); 
BgL_arg5566z00_2307 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_2301))->BgL_procz00); 
BgL_arg5567z00_2308 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_2301))->BgL_msgz00); 
BgL_arg5568z00_2309 = 
(((BgL_failz00_bglt)CREF(BgL_ez00_2301))->BgL_objz00); 
{ /* ./SawMill/node2rtl.scm 406 */
obj_t BgL_list5570z00_2310;
{ /* ./SawMill/node2rtl.scm 406 */
obj_t BgL_arg5572z00_2311;
{ /* ./SawMill/node2rtl.scm 406 */
obj_t BgL_arg5575z00_2312;
{ /* ./SawMill/node2rtl.scm 406 */
obj_t BgL_auxz00_4942;
BgL_auxz00_4942 = 
(obj_t)(BgL_arg5568z00_2309); 
BgL_arg5575z00_2312 = 
MAKE_PAIR(BgL_auxz00_4942, BNIL); } 
{ /* ./SawMill/node2rtl.scm 406 */
obj_t BgL_auxz00_4945;
BgL_auxz00_4945 = 
(obj_t)(BgL_arg5567z00_2308); 
BgL_arg5572z00_2311 = 
MAKE_PAIR(BgL_auxz00_4945, BgL_arg5575z00_2312); } } 
{ /* ./SawMill/node2rtl.scm 406 */
obj_t BgL_auxz00_4948;
BgL_auxz00_4948 = 
(obj_t)(BgL_arg5566z00_2307); 
BgL_list5570z00_2310 = 
MAKE_PAIR(BgL_auxz00_4948, BgL_arg5572z00_2311); } } 
{ /* ./SawMill/node2rtl.scm 406 */
BgL_rtl_funz00_bglt BgL_funz00_3468;
BgL_funz00_3468 = 
(BgL_rtl_funz00_bglt)(BgL_arg5565z00_2306); 
BgL_arg5562z00_2305 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2301), BgL_funz00_3468, BgL_list5570z00_2310); } } } 
BgL_auxz00_4937 = 
BGl_unlinkz00zzsaw_node2rtlz00(BgL_arg5562z00_2305); } 
return 
(obj_t)(BgL_auxz00_4937);} } } 
}



/* node->rtl-jump-ex-it3483 */
obj_t BGl_nodezd2ze3rtlzd2jumpzd2exzd2it3483ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3803, obj_t BgL_ez00_3804)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 399 */
{ 
BgL_jumpzd2exzd2itz00_bglt BgL_ez00_2289;
{ /* ./SawMill/node2rtl.scm 400 */
BgL_areaz00_bglt BgL_auxz00_4957;
BgL_ez00_2289 = 
(BgL_jumpzd2exzd2itz00_bglt)(BgL_ez00_3804); 
{ /* ./SawMill/node2rtl.scm 401 */
BgL_areaz00_bglt BgL_arg5540z00_2293;
{ /* ./SawMill/node2rtl.scm 401 */
BgL_rtl_jumpexitz00_bglt BgL_arg5543z00_2294;BgL_nodez00_bglt BgL_arg5544z00_2295;BgL_nodez00_bglt BgL_arg5545z00_2296;
BgL_arg5543z00_2294 = 
BGl_makezd2rtl_jumpexitzd2zzsaw_defsz00(); 
BgL_arg5544z00_2295 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_ez00_2289))->BgL_exitz00); 
BgL_arg5545z00_2296 = 
(((BgL_jumpzd2exzd2itz00_bglt)CREF(BgL_ez00_2289))->BgL_valuez00); 
{ /* ./SawMill/node2rtl.scm 401 */
obj_t BgL_list5547z00_2297;
{ /* ./SawMill/node2rtl.scm 401 */
obj_t BgL_arg5549z00_2298;
{ /* ./SawMill/node2rtl.scm 401 */
obj_t BgL_auxz00_4961;
BgL_auxz00_4961 = 
(obj_t)(BgL_arg5545z00_2296); 
BgL_arg5549z00_2298 = 
MAKE_PAIR(BgL_auxz00_4961, BNIL); } 
{ /* ./SawMill/node2rtl.scm 401 */
obj_t BgL_auxz00_4964;
BgL_auxz00_4964 = 
(obj_t)(BgL_arg5544z00_2295); 
BgL_list5547z00_2297 = 
MAKE_PAIR(BgL_auxz00_4964, BgL_arg5549z00_2298); } } 
{ /* ./SawMill/node2rtl.scm 401 */
BgL_rtl_funz00_bglt BgL_funz00_3462;
BgL_funz00_3462 = 
(BgL_rtl_funz00_bglt)(BgL_arg5543z00_2294); 
BgL_arg5540z00_2293 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2289), BgL_funz00_3462, BgL_list5547z00_2297); } } } 
BgL_auxz00_4957 = 
BGl_unlinkz00zzsaw_node2rtlz00(BgL_arg5540z00_2293); } 
return 
(obj_t)(BgL_auxz00_4957);} } } 
}



/* node->rtl-set-ex-it3481 */
obj_t BGl_nodezd2ze3rtlzd2setzd2exzd2it3481ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3805, obj_t BgL_ez00_3806)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 391 */
{ 
BgL_setzd2exzd2itz00_bglt BgL_ez00_2272;
{ /* ./SawMill/node2rtl.scm 392 */
BgL_areaz00_bglt BgL_auxz00_4973;
BgL_ez00_2272 = 
(BgL_setzd2exzd2itz00_bglt)(BgL_ez00_3806); 
{ /* ./SawMill/node2rtl.scm 393 */
BgL_areaz00_bglt BgL_arg5506z00_2276;BgL_areaz00_bglt BgL_arg5507z00_2277;
{ /* ./SawMill/node2rtl.scm 393 */
BgL_areaz00_bglt BgL_az00_2278;
{ /* ./SawMill/node2rtl.scm 393 */
BgL_rtl_protectz00_bglt BgL_arg5521z00_2282;
BgL_arg5521z00_2282 = 
BGl_makezd2rtl_protectzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 393 */
BgL_rtl_funz00_bglt BgL_funz00_3447;
BgL_funz00_3447 = 
(BgL_rtl_funz00_bglt)(BgL_arg5521z00_2282); 
BgL_az00_2278 = 
BGl_singleza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2272), BgL_funz00_3447, BNIL); } } 
{ /* ./SawMill/node2rtl.scm 394 */
BgL_rtl_regz00_bglt BgL_arg5510z00_2279;
{ /* ./SawMill/node2rtl.scm 394 */
BgL_variablez00_bglt BgL_arg5513z00_2280;
{ /* ./SawMill/node2rtl.scm 394 */
BgL_varz00_bglt BgL_arg5516z00_2281;
BgL_arg5516z00_2281 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_ez00_2272))->BgL_varz00); 
BgL_arg5513z00_2280 = 
(((BgL_varz00_bglt)CREF(BgL_arg5516z00_2281))->BgL_variablez00); } 
BgL_arg5510z00_2279 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_arg5513z00_2280)); } 
{ /* ./SawMill/node2rtl.scm 394 */
BgL_blockz00_bglt BgL_arg3672z00_3453;
BgL_arg3672z00_3453 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_2278))->BgL_exitz00); 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_arg3672z00_3453, BgL_arg5510z00_2279); } } 
BgL_arg5506z00_2276 = BgL_az00_2278; } 
{ /* ./SawMill/node2rtl.scm 396 */
BgL_rtl_protectedz00_bglt BgL_arg5526z00_2284;BgL_nodez00_bglt BgL_arg5527z00_2285;
BgL_arg5526z00_2284 = 
BGl_makezd2rtl_protectedzd2zzsaw_defsz00(); 
BgL_arg5527z00_2285 = 
(((BgL_setzd2exzd2itz00_bglt)CREF(BgL_ez00_2272))->BgL_bodyz00); 
{ /* ./SawMill/node2rtl.scm 396 */
obj_t BgL_list5529z00_2286;
{ /* ./SawMill/node2rtl.scm 396 */
obj_t BgL_auxz00_4986;
BgL_auxz00_4986 = 
(obj_t)(BgL_arg5527z00_2285); 
BgL_list5529z00_2286 = 
MAKE_PAIR(BgL_auxz00_4986, BNIL); } 
{ /* ./SawMill/node2rtl.scm 396 */
BgL_rtl_funz00_bglt BgL_funz00_3457;
BgL_funz00_3457 = 
(BgL_rtl_funz00_bglt)(BgL_arg5526z00_2284); 
BgL_arg5507z00_2277 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2272), BgL_funz00_3457, BgL_list5529z00_2286); } } } 
BgL_auxz00_4973 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg5506z00_2276, BgL_arg5507z00_2277); } 
return 
(obj_t)(BgL_auxz00_4973);} } } 
}



/* node->rtl-cast3479 */
obj_t BGl_nodezd2ze3rtlzd2cast3479ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3807, obj_t BgL_ez00_3808)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 384 */
{ 
BgL_castz00_bglt BgL_ez00_2265;
{ /* ./SawMill/node2rtl.scm 385 */
BgL_areaz00_bglt BgL_auxz00_4995;
BgL_ez00_2265 = 
(BgL_castz00_bglt)(BgL_ez00_3808); 
{ /* ./SawMill/node2rtl.scm 385 */
BgL_nodez00_bglt BgL_arg5496z00_3417;
BgL_arg5496z00_3417 = 
(((BgL_castz00_bglt)CREF(BgL_ez00_2265))->BgL_argz00); 
{ /* ./SawMill/node2rtl.scm 385 */
BgL_areaz00_bglt BgL_res5881z00_3445;
{ /* ./SawMill/node2rtl.scm 385 */
obj_t BgL_method3437z00_3420;
{ /* ./SawMill/node2rtl.scm 385 */
BgL_objectz00_bglt BgL_objz00_3421;
BgL_objz00_3421 = 
(BgL_objectz00_bglt)(BgL_arg5496z00_3417); 
{ /* ./SawMill/node2rtl.scm 385 */
long BgL_objzd2classzd2numz00_3422;
BgL_objzd2classzd2numz00_3422 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3421); 
{ /* ./SawMill/node2rtl.scm 385 */
obj_t BgL_arg2017z00_3423;
{ /* ./SawMill/node2rtl.scm 385 */
int BgL_auxz00_4999;
BgL_auxz00_4999 = 
(int)(((long)1)); 
BgL_arg2017z00_3423 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_4999); } 
{ /* ./SawMill/node2rtl.scm 385 */
int BgL_offsetz00_3426;
BgL_offsetz00_3426 = 
(int)(BgL_objzd2classzd2numz00_3422); 
{ /* ./SawMill/node2rtl.scm 385 */
long BgL_offsetz00_3427;
{ /* ./SawMill/node2rtl.scm 385 */
long BgL_auxz00_5003;
BgL_auxz00_5003 = 
(long)(BgL_offsetz00_3426); 
BgL_offsetz00_3427 = 
(BgL_auxz00_5003-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 385 */
long BgL_modz00_3428;
{ /* ./SawMill/node2rtl.scm 385 */
int BgL_arg2028z00_3429;
BgL_arg2028z00_3429 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 385 */
long BgL_n2z00_3437;
BgL_n2z00_3437 = 
(long)(BgL_arg2028z00_3429); 
BgL_modz00_3428 = 
(BgL_offsetz00_3427/BgL_n2z00_3437); } } 
{ /* ./SawMill/node2rtl.scm 385 */
long BgL_restz00_3430;
{ /* ./SawMill/node2rtl.scm 385 */
int BgL_arg2024z00_3431;
BgL_arg2024z00_3431 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 385 */
long BgL_n2z00_3440;
BgL_n2z00_3440 = 
(long)(BgL_arg2024z00_3431); 
BgL_restz00_3430 = 
(BgL_offsetz00_3427%BgL_n2z00_3440); } } 
{ /* ./SawMill/node2rtl.scm 385 */

{ /* ./SawMill/node2rtl.scm 385 */
obj_t BgL_bucketz00_3432;
{ /* ./SawMill/node2rtl.scm 385 */
int BgL_kz00_3442;
BgL_kz00_3442 = 
(int)(BgL_modz00_3428); 
BgL_bucketz00_3432 = 
VECTOR_REF(BgL_arg2017z00_3423,BgL_kz00_3442); } 
{ /* ./SawMill/node2rtl.scm 385 */
int BgL_kz00_3444;
BgL_kz00_3444 = 
(int)(BgL_restz00_3430); 
BgL_method3437z00_3420 = 
VECTOR_REF(BgL_bucketz00_3432,BgL_kz00_3444); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 385 */
obj_t BgL_auxz00_5016;
BgL_auxz00_5016 = 
PROCEDURE_ENTRY(BgL_method3437z00_3420)(BgL_method3437z00_3420, 
(obj_t)(BgL_arg5496z00_3417), BEOA); 
BgL_res5881z00_3445 = 
(BgL_areaz00_bglt)(BgL_auxz00_5016); } } 
BgL_auxz00_4995 = BgL_res5881z00_3445; } } 
return 
(obj_t)(BgL_auxz00_4995);} } } 
}



/* node->rtl-isa3477 */
obj_t BGl_nodezd2ze3rtlzd2isa3477ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3809, obj_t BgL_ez00_3810)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 379 */
{ 
BgL_isaz00_bglt BgL_ez00_2256;
{ /* ./SawMill/node2rtl.scm 380 */
BgL_areaz00_bglt BgL_auxz00_5023;
BgL_ez00_2256 = 
(BgL_isaz00_bglt)(BgL_ez00_3810); 
{ /* ./SawMill/node2rtl.scm 381 */
BgL_rtl_isaz00_bglt BgL_arg5481z00_2260;obj_t BgL_arg5482z00_2261;
{ /* ./SawMill/node2rtl.scm 381 */
BgL_typez00_bglt BgL_arg5485z00_2262;
BgL_arg5485z00_2262 = 
(((BgL_isaz00_bglt)CREF(BgL_ez00_2256))->BgL_classz00); 
BgL_arg5481z00_2260 = 
BGl_makezd2rtl_isazd2zzsaw_defsz00(BgL_arg5485z00_2262); } 
{ /* ./SawMill/node2rtl.scm 381 */
BgL_externz00_bglt BgL_obj1817z00_3415;
BgL_obj1817z00_3415 = 
(BgL_externz00_bglt)(BgL_ez00_2256); 
BgL_arg5482z00_2261 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3415))->BgL_exprza2za2); } 
BgL_auxz00_5023 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2256), 
(BgL_rtl_funz00_bglt)(BgL_arg5481z00_2260), BgL_arg5482z00_2261); } 
return 
(obj_t)(BgL_auxz00_5023);} } } 
}



/* node->rtl-vlength3475 */
obj_t BGl_nodezd2ze3rtlzd2vlength3475ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3811, obj_t BgL_ez00_3812)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 374 */
{ 
BgL_vlengthz00_bglt BgL_ez00_2247;
{ /* ./SawMill/node2rtl.scm 375 */
BgL_areaz00_bglt BgL_auxz00_5033;
BgL_ez00_2247 = 
(BgL_vlengthz00_bglt)(BgL_ez00_3812); 
{ /* ./SawMill/node2rtl.scm 376 */
BgL_rtl_vlengthz00_bglt BgL_arg5466z00_2251;obj_t BgL_arg5467z00_2252;
{ /* ./SawMill/node2rtl.scm 376 */
BgL_typez00_bglt BgL_arg5470z00_2253;
BgL_arg5470z00_2253 = 
(((BgL_vlengthz00_bglt)CREF(BgL_ez00_2247))->BgL_vtypez00); 
BgL_arg5466z00_2251 = 
BGl_makezd2rtl_vlengthzd2zzsaw_defsz00(BgL_arg5470z00_2253); } 
{ /* ./SawMill/node2rtl.scm 376 */
BgL_externz00_bglt BgL_obj1817z00_3413;
BgL_obj1817z00_3413 = 
(BgL_externz00_bglt)(BgL_ez00_2247); 
BgL_arg5467z00_2252 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3413))->BgL_exprza2za2); } 
BgL_auxz00_5033 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2247), 
(BgL_rtl_funz00_bglt)(BgL_arg5466z00_2251), BgL_arg5467z00_2252); } 
return 
(obj_t)(BgL_auxz00_5033);} } } 
}



/* node->rtl-vset!3473 */
obj_t BGl_nodezd2ze3rtlzd2vsetz123473zf1zzsaw_node2rtlz00(obj_t BgL_envz00_3813, obj_t BgL_ez00_3814)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 368 */
{ 
BgL_vsetz12z12_bglt BgL_ez00_2233;
{ /* ./SawMill/node2rtl.scm 369 */
BgL_areaz00_bglt BgL_auxz00_5043;
BgL_ez00_2233 = 
(BgL_vsetz12z12_bglt)(BgL_ez00_3814); 
{ /* ./SawMill/node2rtl.scm 370 */
BgL_areaz00_bglt BgL_arg5440z00_2237;BgL_areaz00_bglt BgL_arg5441z00_2238;
{ /* ./SawMill/node2rtl.scm 370 */
BgL_rtl_vsetz00_bglt BgL_arg5444z00_2239;obj_t BgL_arg5445z00_2240;
{ /* ./SawMill/node2rtl.scm 370 */
BgL_typez00_bglt BgL_arg5448z00_2241;BgL_typez00_bglt BgL_arg5449z00_2242;
BgL_arg5448z00_2241 = 
(((BgL_vsetz12z12_bglt)CREF(BgL_ez00_2233))->BgL_ftypez00); 
BgL_arg5449z00_2242 = 
(((BgL_vsetz12z12_bglt)CREF(BgL_ez00_2233))->BgL_vtypez00); 
BgL_arg5444z00_2239 = 
BGl_makezd2rtl_vsetzd2zzsaw_defsz00(BgL_arg5448z00_2241, BgL_arg5449z00_2242); } 
{ /* ./SawMill/node2rtl.scm 370 */
BgL_externz00_bglt BgL_obj1817z00_3408;
BgL_obj1817z00_3408 = 
(BgL_externz00_bglt)(BgL_ez00_2233); 
BgL_arg5445z00_2240 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3408))->BgL_exprza2za2); } 
BgL_arg5440z00_2237 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2233), 
(BgL_rtl_funz00_bglt)(BgL_arg5444z00_2239), BgL_arg5445z00_2240); } 
{ /* ./SawMill/node2rtl.scm 371 */
BgL_rtl_nopz00_bglt BgL_arg5455z00_2243;
BgL_arg5455z00_2243 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 371 */
BgL_rtl_funz00_bglt BgL_funz00_3410;
BgL_funz00_3410 = 
(BgL_rtl_funz00_bglt)(BgL_arg5455z00_2243); 
BgL_arg5441z00_2238 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_3410, BNIL); } } 
BgL_auxz00_5043 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg5440z00_2237, BgL_arg5441z00_2238); } 
return 
(obj_t)(BgL_auxz00_5043);} } } 
}



/* node->rtl-vref3471 */
obj_t BGl_nodezd2ze3rtlzd2vref3471ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3815, obj_t BgL_ez00_3816)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 363 */
{ 
BgL_vrefz00_bglt BgL_ez00_2223;
{ /* ./SawMill/node2rtl.scm 364 */
BgL_areaz00_bglt BgL_auxz00_5058;
BgL_ez00_2223 = 
(BgL_vrefz00_bglt)(BgL_ez00_3816); 
{ /* ./SawMill/node2rtl.scm 365 */
BgL_rtl_vrefz00_bglt BgL_arg5423z00_2227;obj_t BgL_arg5424z00_2228;
{ /* ./SawMill/node2rtl.scm 365 */
BgL_typez00_bglt BgL_arg5427z00_2229;BgL_typez00_bglt BgL_arg5428z00_2230;
BgL_arg5427z00_2229 = 
(((BgL_vrefz00_bglt)CREF(BgL_ez00_2223))->BgL_ftypez00); 
BgL_arg5428z00_2230 = 
(((BgL_vrefz00_bglt)CREF(BgL_ez00_2223))->BgL_vtypez00); 
BgL_arg5423z00_2227 = 
BGl_makezd2rtl_vrefzd2zzsaw_defsz00(BgL_arg5427z00_2229, BgL_arg5428z00_2230); } 
{ /* ./SawMill/node2rtl.scm 365 */
BgL_externz00_bglt BgL_obj1817z00_3405;
BgL_obj1817z00_3405 = 
(BgL_externz00_bglt)(BgL_ez00_2223); 
BgL_arg5424z00_2228 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3405))->BgL_exprza2za2); } 
BgL_auxz00_5058 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2223), 
(BgL_rtl_funz00_bglt)(BgL_arg5423z00_2227), BgL_arg5424z00_2228); } 
return 
(obj_t)(BgL_auxz00_5058);} } } 
}



/* node->rtl-valloc3469 */
obj_t BGl_nodezd2ze3rtlzd2valloc3469ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3817, obj_t BgL_ez00_3818)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 357 */
{ 
BgL_vallocz00_bglt BgL_ez00_2213;
{ /* ./SawMill/node2rtl.scm 358 */
BgL_areaz00_bglt BgL_auxz00_5069;
BgL_ez00_2213 = 
(BgL_vallocz00_bglt)(BgL_ez00_3818); 
{ /* ./SawMill/node2rtl.scm 359 */
BgL_rtl_vallocz00_bglt BgL_arg5406z00_2217;obj_t BgL_arg5407z00_2218;
{ /* ./SawMill/node2rtl.scm 359 */
BgL_typez00_bglt BgL_arg5410z00_2219;BgL_typez00_bglt BgL_arg5411z00_2220;
BgL_arg5410z00_2219 = 
(((BgL_vallocz00_bglt)CREF(BgL_ez00_2213))->BgL_ftypez00); 
BgL_arg5411z00_2220 = 
BGl_typeofz00zztype_typeofz00(
(BgL_nodez00_bglt)(BgL_ez00_2213)); 
BgL_arg5406z00_2217 = 
BGl_makezd2rtl_valloczd2zzsaw_defsz00(BgL_arg5410z00_2219, BgL_arg5411z00_2220); } 
{ /* ./SawMill/node2rtl.scm 359 */
BgL_externz00_bglt BgL_obj1817z00_3402;
BgL_obj1817z00_3402 = 
(BgL_externz00_bglt)(BgL_ez00_2213); 
BgL_arg5407z00_2218 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3402))->BgL_exprza2za2); } 
BgL_auxz00_5069 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2213), 
(BgL_rtl_funz00_bglt)(BgL_arg5406z00_2217), BgL_arg5407z00_2218); } 
return 
(obj_t)(BgL_auxz00_5069);} } } 
}



/* node->rtl-new3467 */
obj_t BGl_nodezd2ze3rtlzd2new3467ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3819, obj_t BgL_ez00_3820)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 348 */
{ 
BgL_newz00_bglt BgL_ez00_2204;
{ /* ./SawMill/node2rtl.scm 349 */
BgL_areaz00_bglt BgL_auxz00_5081;
BgL_ez00_2204 = 
(BgL_newz00_bglt)(BgL_ez00_3820); 
{ /* ./SawMill/node2rtl.scm 354 */
BgL_rtl_newz00_bglt BgL_arg5391z00_2208;obj_t BgL_arg5392z00_2209;
{ /* ./SawMill/node2rtl.scm 354 */
BgL_typez00_bglt BgL_arg5395z00_2210;
BgL_arg5395z00_2210 = 
BGl_typeofz00zztype_typeofz00(
(BgL_nodez00_bglt)(BgL_ez00_2204)); 
BgL_arg5391z00_2208 = 
BGl_makezd2rtl_newzd2zzsaw_defsz00(BgL_arg5395z00_2210); } 
{ /* ./SawMill/node2rtl.scm 354 */
BgL_externz00_bglt BgL_obj1817z00_3400;
BgL_obj1817z00_3400 = 
(BgL_externz00_bglt)(BgL_ez00_2204); 
BgL_arg5392z00_2209 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3400))->BgL_exprza2za2); } 
BgL_auxz00_5081 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2204), 
(BgL_rtl_funz00_bglt)(BgL_arg5391z00_2208), BgL_arg5392z00_2209); } 
return 
(obj_t)(BgL_auxz00_5081);} } } 
}



/* node->rtl-setfield3465 */
obj_t BGl_nodezd2ze3rtlzd2setfield3465ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3821, obj_t BgL_ez00_3822)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 339 */
{ 
BgL_setfieldz00_bglt BgL_ez00_2189;
{ /* ./SawMill/node2rtl.scm 340 */
BgL_areaz00_bglt BgL_auxz00_5092;
BgL_ez00_2189 = 
(BgL_setfieldz00_bglt)(BgL_ez00_3822); 
{ /* ./SawMill/node2rtl.scm 341 */
BgL_areaz00_bglt BgL_arg5363z00_2193;BgL_areaz00_bglt BgL_arg5364z00_2194;
{ /* ./SawMill/node2rtl.scm 341 */
BgL_rtl_setfieldz00_bglt BgL_arg5367z00_2195;obj_t BgL_arg5368z00_2196;
{ /* ./SawMill/node2rtl.scm 341 */
obj_t BgL_arg5371z00_2197;BgL_typez00_bglt BgL_arg5372z00_2198;BgL_typez00_bglt BgL_arg5373z00_2199;
BgL_arg5371z00_2197 = 
(((BgL_setfieldz00_bglt)CREF(BgL_ez00_2189))->BgL_fnamez00); 
BgL_arg5372z00_2198 = 
(((BgL_setfieldz00_bglt)CREF(BgL_ez00_2189))->BgL_otypez00); 
BgL_arg5373z00_2199 = 
(((BgL_setfieldz00_bglt)CREF(BgL_ez00_2189))->BgL_ftypez00); 
BgL_arg5367z00_2195 = 
BGl_makezd2rtl_setfieldzd2zzsaw_defsz00(BgL_arg5371z00_2197, BgL_arg5372z00_2198, BgL_arg5373z00_2199); } 
{ /* ./SawMill/node2rtl.scm 341 */
BgL_externz00_bglt BgL_obj1817z00_3396;
BgL_obj1817z00_3396 = 
(BgL_externz00_bglt)(BgL_ez00_2189); 
BgL_arg5368z00_2196 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3396))->BgL_exprza2za2); } 
BgL_arg5363z00_2193 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2189), 
(BgL_rtl_funz00_bglt)(BgL_arg5367z00_2195), BgL_arg5368z00_2196); } 
{ /* ./SawMill/node2rtl.scm 345 */
BgL_rtl_nopz00_bglt BgL_arg5380z00_2200;
BgL_arg5380z00_2200 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 345 */
BgL_rtl_funz00_bglt BgL_funz00_3398;
BgL_funz00_3398 = 
(BgL_rtl_funz00_bglt)(BgL_arg5380z00_2200); 
BgL_arg5364z00_2194 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_3398, BNIL); } } 
BgL_auxz00_5092 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg5363z00_2193, BgL_arg5364z00_2194); } 
return 
(obj_t)(BgL_auxz00_5092);} } } 
}



/* node->rtl-getfield3463 */
obj_t BGl_nodezd2ze3rtlzd2getfield3463ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3823, obj_t BgL_ez00_3824)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 331 */
{ 
BgL_getfieldz00_bglt BgL_ez00_2178;
{ /* ./SawMill/node2rtl.scm 332 */
BgL_areaz00_bglt BgL_auxz00_5108;
BgL_ez00_2178 = 
(BgL_getfieldz00_bglt)(BgL_ez00_3824); 
{ /* ./SawMill/node2rtl.scm 333 */
BgL_rtl_getfieldz00_bglt BgL_arg5344z00_2182;obj_t BgL_arg5345z00_2183;
{ /* ./SawMill/node2rtl.scm 333 */
obj_t BgL_arg5348z00_2184;BgL_typez00_bglt BgL_arg5349z00_2185;BgL_typez00_bglt BgL_arg5350z00_2186;
BgL_arg5348z00_2184 = 
(((BgL_getfieldz00_bglt)CREF(BgL_ez00_2178))->BgL_fnamez00); 
BgL_arg5349z00_2185 = 
(((BgL_getfieldz00_bglt)CREF(BgL_ez00_2178))->BgL_otypez00); 
BgL_arg5350z00_2186 = 
(((BgL_getfieldz00_bglt)CREF(BgL_ez00_2178))->BgL_ftypez00); 
BgL_arg5344z00_2182 = 
BGl_makezd2rtl_getfieldzd2zzsaw_defsz00(BgL_arg5348z00_2184, BgL_arg5349z00_2185, BgL_arg5350z00_2186); } 
{ /* ./SawMill/node2rtl.scm 333 */
BgL_externz00_bglt BgL_obj1817z00_3392;
BgL_obj1817z00_3392 = 
(BgL_externz00_bglt)(BgL_ez00_2178); 
BgL_arg5345z00_2183 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3392))->BgL_exprza2za2); } 
BgL_auxz00_5108 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2178), 
(BgL_rtl_funz00_bglt)(BgL_arg5344z00_2182), BgL_arg5345z00_2183); } 
return 
(obj_t)(BgL_auxz00_5108);} } } 
}



/* node->rtl-pragma3461 */
obj_t BGl_nodezd2ze3rtlzd2pragma3461ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3825, obj_t BgL_ez00_3826)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 326 */
{ 
BgL_pragmaz00_bglt BgL_ez00_2169;
{ /* ./SawMill/node2rtl.scm 327 */
BgL_areaz00_bglt BgL_auxz00_5120;
BgL_ez00_2169 = 
(BgL_pragmaz00_bglt)(BgL_ez00_3826); 
{ /* ./SawMill/node2rtl.scm 328 */
BgL_rtl_pragmaz00_bglt BgL_arg5329z00_2173;obj_t BgL_arg5330z00_2174;
{ /* ./SawMill/node2rtl.scm 328 */
obj_t BgL_arg5333z00_2175;
BgL_arg5333z00_2175 = 
(((BgL_pragmaz00_bglt)CREF(BgL_ez00_2169))->BgL_formatz00); 
BgL_arg5329z00_2173 = 
BGl_makezd2rtl_pragmazd2zzsaw_defsz00(BgL_arg5333z00_2175); } 
{ /* ./SawMill/node2rtl.scm 328 */
BgL_externz00_bglt BgL_obj1817z00_3388;
BgL_obj1817z00_3388 = 
(BgL_externz00_bglt)(BgL_ez00_2169); 
BgL_arg5330z00_2174 = 
(((BgL_externz00_bglt)CREF(BgL_obj1817z00_3388))->BgL_exprza2za2); } 
BgL_auxz00_5120 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2169), 
(BgL_rtl_funz00_bglt)(BgL_arg5329z00_2173), BgL_arg5330z00_2174); } 
return 
(obj_t)(BgL_auxz00_5120);} } } 
}



/* node->rtl-funcall3459 */
obj_t BGl_nodezd2ze3rtlzd2funcall3459ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3827, obj_t BgL_ez00_3828)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 306 */
{ 
BgL_funcallz00_bglt BgL_ez00_2144;
{ /* ./SawMill/node2rtl.scm 310 */
BgL_areaz00_bglt BgL_auxz00_5130;
BgL_ez00_2144 = 
(BgL_funcallz00_bglt)(BgL_ez00_3828); 
{ /* ./SawMill/node2rtl.scm 313 */
obj_t BgL_argsz00_2149;
{ /* ./SawMill/node2rtl.scm 313 */
obj_t BgL_arg5304z00_2158;
BgL_arg5304z00_2158 = 
(((BgL_funcallz00_bglt)CREF(BgL_ez00_2144))->BgL_argsz00); 
BgL_argsz00_2149 = 
BGl_argszd21zd2zzsaw_node2rtlz00(BgL_arg5304z00_2158); } 
{ /* ./SawMill/node2rtl.scm 314 */
obj_t BgL_casezd2valuezd2_2150;
BgL_casezd2valuezd2_2150 = 
(((BgL_funcallz00_bglt)CREF(BgL_ez00_2144))->BgL_strengthz00); 
{ /* ./SawMill/node2rtl.scm 314 */
bool_t BgL_test5280z00_2151;
BgL_test5280z00_2151 = 
BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(BgL_casezd2valuezd2_2150, 
CNST_TABLE_REF(((long)7))); 
if(BgL_test5280z00_2151)
{ /* ./SawMill/node2rtl.scm 317 */
BgL_rtl_callz00_bglt BgL_arg5282z00_2152;
{ /* ./SawMill/node2rtl.scm 317 */
BgL_variablez00_bglt BgL_arg5285z00_2153;
{ /* ./SawMill/node2rtl.scm 317 */
BgL_varz00_bglt BgL_obj1625z00_3382;
{ /* ./SawMill/node2rtl.scm 317 */
BgL_nodez00_bglt BgL_auxz00_5137;
BgL_auxz00_5137 = 
(((BgL_funcallz00_bglt)CREF(BgL_ez00_2144))->BgL_funz00); 
BgL_obj1625z00_3382 = 
(BgL_varz00_bglt)(BgL_auxz00_5137); } 
BgL_arg5285z00_2153 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_3382))->BgL_variablez00); } 
BgL_arg5282z00_2152 = 
BGl_makezd2rtl_callzd2zzsaw_defsz00(
(BgL_globalz00_bglt)(BgL_arg5285z00_2153)); } 
BgL_auxz00_5130 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2144), 
(BgL_rtl_funz00_bglt)(BgL_arg5282z00_2152), BgL_argsz00_2149); }  else 
{ /* ./SawMill/node2rtl.scm 314 */
bool_t BgL_test5291z00_2155;
BgL_test5291z00_2155 = 
BGl_eqvzf3zf3zz__r4_equivalence_6_2z00(BgL_casezd2valuezd2_2150, 
CNST_TABLE_REF(((long)8))); 
if(BgL_test5291z00_2155)
{ /* ./SawMill/node2rtl.scm 320 */
BgL_rtl_lightfuncallz00_bglt BgL_arg5293z00_2156;
BgL_arg5293z00_2156 = 
BGl_makezd2rtl_lightfuncallzd2zzsaw_defsz00(); 
BgL_auxz00_5130 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2144), 
(BgL_rtl_funz00_bglt)(BgL_arg5293z00_2156), BgL_argsz00_2149); }  else 
{ /* ./SawMill/node2rtl.scm 323 */
BgL_rtl_funcallz00_bglt BgL_arg5297z00_2157;
BgL_arg5297z00_2157 = 
BGl_makezd2rtl_funcallzd2zzsaw_defsz00(); 
BgL_auxz00_5130 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2144), 
(BgL_rtl_funz00_bglt)(BgL_arg5297z00_2157), BgL_argsz00_2149); } } } } } 
return 
(obj_t)(BgL_auxz00_5130);} } } 
}



/* args-1 */
obj_t BGl_argszd21zd2zzsaw_node2rtlz00(obj_t BgL_argsz00_2159)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 310 */
{ /* ./SawMill/node2rtl.scm 308 */
bool_t BgL_test5308z00_2161;
{ /* ./SawMill/node2rtl.scm 308 */
obj_t BgL_auxz00_5159;
BgL_auxz00_5159 = 
CDR(BgL_argsz00_2159); 
BgL_test5308z00_2161 = 
NULLP(BgL_auxz00_5159); } 
if(BgL_test5308z00_2161)
{ /* ./SawMill/node2rtl.scm 308 */
return BNIL;}  else 
{ /* ./SawMill/node2rtl.scm 310 */
obj_t BgL_arg5310z00_2162;obj_t BgL_arg5311z00_2163;
BgL_arg5310z00_2162 = 
CAR(BgL_argsz00_2159); 
{ /* ./SawMill/node2rtl.scm 310 */
obj_t BgL_arg5315z00_2164;
BgL_arg5315z00_2164 = 
CDR(BgL_argsz00_2159); 
BgL_arg5311z00_2163 = 
BGl_argszd21zd2zzsaw_node2rtlz00(BgL_arg5315z00_2164); } 
return 
MAKE_PAIR(BgL_arg5310z00_2162, BgL_arg5311z00_2163);} } } 
}



/* node->rtl-app-ly3457 */
obj_t BGl_nodezd2ze3rtlzd2appzd2ly3457z31zzsaw_node2rtlz00(obj_t BgL_envz00_3829, obj_t BgL_ez00_3830)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 301 */
{ 
BgL_appzd2lyzd2_bglt BgL_ez00_2133;
{ /* ./SawMill/node2rtl.scm 302 */
BgL_areaz00_bglt BgL_auxz00_5167;
BgL_ez00_2133 = 
(BgL_appzd2lyzd2_bglt)(BgL_ez00_3830); 
{ /* ./SawMill/node2rtl.scm 303 */
BgL_rtl_applyz00_bglt BgL_arg5262z00_2137;BgL_nodez00_bglt BgL_arg5263z00_2138;BgL_nodez00_bglt BgL_arg5264z00_2139;
BgL_arg5262z00_2137 = 
BGl_makezd2rtl_applyzd2zzsaw_defsz00(); 
BgL_arg5263z00_2138 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_ez00_2133))->BgL_funz00); 
BgL_arg5264z00_2139 = 
(((BgL_appzd2lyzd2_bglt)CREF(BgL_ez00_2133))->BgL_argz00); 
{ /* ./SawMill/node2rtl.scm 303 */
obj_t BgL_list5266z00_2140;
{ /* ./SawMill/node2rtl.scm 303 */
obj_t BgL_arg5268z00_2141;
{ /* ./SawMill/node2rtl.scm 303 */
obj_t BgL_auxz00_5171;
BgL_auxz00_5171 = 
(obj_t)(BgL_arg5264z00_2139); 
BgL_arg5268z00_2141 = 
MAKE_PAIR(BgL_auxz00_5171, BNIL); } 
{ /* ./SawMill/node2rtl.scm 303 */
obj_t BgL_auxz00_5174;
BgL_auxz00_5174 = 
(obj_t)(BgL_arg5263z00_2138); 
BgL_list5266z00_2140 = 
MAKE_PAIR(BgL_auxz00_5174, BgL_arg5268z00_2141); } } 
{ /* ./SawMill/node2rtl.scm 303 */
BgL_rtl_funz00_bglt BgL_funz00_3377;
BgL_funz00_3377 = 
(BgL_rtl_funz00_bglt)(BgL_arg5262z00_2137); 
BgL_auxz00_5167 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2133), BgL_funz00_3377, BgL_list5266z00_2140); } } } 
return 
(obj_t)(BgL_auxz00_5167);} } } 
}



/* node->rtl-app3455 */
obj_t BGl_nodezd2ze3rtlzd2app3455ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3831, obj_t BgL_ez00_3832)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 279 */
{ 
BgL_appz00_bglt BgL_ez00_2118;
BgL_ez00_2118 = 
(BgL_appz00_bglt)(BgL_ez00_3832); 
{ /* ./SawMill/node2rtl.scm 281 */
BgL_variablez00_bglt BgL_vz00_2122;
{ /* ./SawMill/node2rtl.scm 281 */
BgL_varz00_bglt BgL_arg5252z00_2130;
BgL_arg5252z00_2130 = 
(((BgL_appz00_bglt)CREF(BgL_ez00_2118))->BgL_funz00); 
BgL_vz00_2122 = 
(((BgL_varz00_bglt)CREF(BgL_arg5252z00_2130))->BgL_variablez00); } 
{ /* ./SawMill/node2rtl.scm 282 */
bool_t BgL_test5233z00_2123;
{ /* ./SawMill/node2rtl.scm 282 */
obj_t BgL_obj1300z00_3370;
BgL_obj1300z00_3370 = 
(obj_t)(BgL_vz00_2122); 
BgL_test5233z00_2123 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1300z00_3370, BGl_localz00zzast_varz00); } 
if(BgL_test5233z00_2123)
{ /* ./SawMill/node2rtl.scm 283 */
obj_t BgL_arg5235z00_2124;
BgL_arg5235z00_2124 = 
(((BgL_appz00_bglt)CREF(BgL_ez00_2118))->BgL_argsz00); 
{ /* ./SawMill/node2rtl.scm 283 */
BgL_areaz00_bglt BgL_auxz00_5188;
BgL_auxz00_5188 = 
BGl_compilezd2labelzd2callz00zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_vz00_2122), BgL_arg5235z00_2124); 
return 
(obj_t)(BgL_auxz00_5188);} }  else 
{ /* ./SawMill/node2rtl.scm 284 */
obj_t BgL__ortest_3365z00_2125;
{ /* ./SawMill/node2rtl.scm 284 */
obj_t BgL_arg5247z00_2129;
BgL_arg5247z00_2129 = 
(((BgL_appz00_bglt)CREF(BgL_ez00_2118))->BgL_argsz00); 
BgL__ortest_3365z00_2125 = 
BGl_imperativezf3zf3zzsaw_node2rtlz00(BgL_ez00_2118, 
(BgL_globalz00_bglt)(BgL_vz00_2122), BgL_arg5247z00_2129); } 
if(
CBOOL(BgL__ortest_3365z00_2125))
{ /* ./SawMill/node2rtl.scm 285 */
return BgL__ortest_3365z00_2125;}  else 
{ /* ./SawMill/node2rtl.scm 285 */
BgL_rtl_callz00_bglt BgL_arg5239z00_2126;obj_t BgL_arg5240z00_2127;
{ /* ./SawMill/node2rtl.scm 285 */
BgL_variablez00_bglt BgL_arg5243z00_2128;
BgL_arg5243z00_2128 = BgL_vz00_2122; 
BgL_arg5239z00_2126 = 
BGl_makezd2rtl_callzd2zzsaw_defsz00(
(BgL_globalz00_bglt)(BgL_arg5243z00_2128)); } 
BgL_arg5240z00_2127 = 
(((BgL_appz00_bglt)CREF(BgL_ez00_2118))->BgL_argsz00); 
{ /* ./SawMill/node2rtl.scm 285 */
BgL_areaz00_bglt BgL_auxz00_5200;
BgL_auxz00_5200 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2118), 
(BgL_rtl_funz00_bglt)(BgL_arg5239z00_2126), BgL_arg5240z00_2127); 
return 
(obj_t)(BgL_auxz00_5200);} } } } } } } 
}



/* node->rtl-let-fun3453 */
obj_t BGl_nodezd2ze3rtlzd2letzd2fun3453z31zzsaw_node2rtlz00(obj_t BgL_envz00_3833, obj_t BgL_ez00_3834)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 245 */
{ 
BgL_letzd2funzd2_bglt BgL_ez00_2111;
{ /* ./SawMill/node2rtl.scm 246 */
BgL_areaz00_bglt BgL_auxz00_5206;
BgL_ez00_2111 = 
(BgL_letzd2funzd2_bglt)(BgL_ez00_3834); 
{ /* ./SawMill/node2rtl.scm 246 */
BgL_nodez00_bglt BgL_arg5224z00_3339;
BgL_arg5224z00_3339 = 
(((BgL_letzd2funzd2_bglt)CREF(BgL_ez00_2111))->BgL_bodyz00); 
{ /* ./SawMill/node2rtl.scm 246 */
BgL_areaz00_bglt BgL_res5878z00_3367;
{ /* ./SawMill/node2rtl.scm 246 */
obj_t BgL_method3437z00_3342;
{ /* ./SawMill/node2rtl.scm 246 */
BgL_objectz00_bglt BgL_objz00_3343;
BgL_objz00_3343 = 
(BgL_objectz00_bglt)(BgL_arg5224z00_3339); 
{ /* ./SawMill/node2rtl.scm 246 */
long BgL_objzd2classzd2numz00_3344;
BgL_objzd2classzd2numz00_3344 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3343); 
{ /* ./SawMill/node2rtl.scm 246 */
obj_t BgL_arg2017z00_3345;
{ /* ./SawMill/node2rtl.scm 246 */
int BgL_auxz00_5210;
BgL_auxz00_5210 = 
(int)(((long)1)); 
BgL_arg2017z00_3345 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5210); } 
{ /* ./SawMill/node2rtl.scm 246 */
int BgL_offsetz00_3348;
BgL_offsetz00_3348 = 
(int)(BgL_objzd2classzd2numz00_3344); 
{ /* ./SawMill/node2rtl.scm 246 */
long BgL_offsetz00_3349;
{ /* ./SawMill/node2rtl.scm 246 */
long BgL_auxz00_5214;
BgL_auxz00_5214 = 
(long)(BgL_offsetz00_3348); 
BgL_offsetz00_3349 = 
(BgL_auxz00_5214-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 246 */
long BgL_modz00_3350;
{ /* ./SawMill/node2rtl.scm 246 */
int BgL_arg2028z00_3351;
BgL_arg2028z00_3351 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 246 */
long BgL_n2z00_3359;
BgL_n2z00_3359 = 
(long)(BgL_arg2028z00_3351); 
BgL_modz00_3350 = 
(BgL_offsetz00_3349/BgL_n2z00_3359); } } 
{ /* ./SawMill/node2rtl.scm 246 */
long BgL_restz00_3352;
{ /* ./SawMill/node2rtl.scm 246 */
int BgL_arg2024z00_3353;
BgL_arg2024z00_3353 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 246 */
long BgL_n2z00_3362;
BgL_n2z00_3362 = 
(long)(BgL_arg2024z00_3353); 
BgL_restz00_3352 = 
(BgL_offsetz00_3349%BgL_n2z00_3362); } } 
{ /* ./SawMill/node2rtl.scm 246 */

{ /* ./SawMill/node2rtl.scm 246 */
obj_t BgL_bucketz00_3354;
{ /* ./SawMill/node2rtl.scm 246 */
int BgL_kz00_3364;
BgL_kz00_3364 = 
(int)(BgL_modz00_3350); 
BgL_bucketz00_3354 = 
VECTOR_REF(BgL_arg2017z00_3345,BgL_kz00_3364); } 
{ /* ./SawMill/node2rtl.scm 246 */
int BgL_kz00_3366;
BgL_kz00_3366 = 
(int)(BgL_restz00_3352); 
BgL_method3437z00_3342 = 
VECTOR_REF(BgL_bucketz00_3354,BgL_kz00_3366); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 246 */
obj_t BgL_auxz00_5227;
BgL_auxz00_5227 = 
PROCEDURE_ENTRY(BgL_method3437z00_3342)(BgL_method3437z00_3342, 
(obj_t)(BgL_arg5224z00_3339), BEOA); 
BgL_res5878z00_3367 = 
(BgL_areaz00_bglt)(BgL_auxz00_5227); } } 
BgL_auxz00_5206 = BgL_res5878z00_3367; } } 
return 
(obj_t)(BgL_auxz00_5206);} } } 
}



/* node->rtl-select3451 */
obj_t BGl_nodezd2ze3rtlzd2select3451ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3835, obj_t BgL_ez00_3836)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 224 */
{ 
BgL_selectz00_bglt BgL_ez00_2083;
{ /* ./SawMill/node2rtl.scm 225 */
BgL_areaz00_bglt BgL_auxz00_5234;
BgL_ez00_2083 = 
(BgL_selectz00_bglt)(BgL_ez00_3836); 
{ /* ./SawMill/node2rtl.scm 226 */
BgL_areaz00_bglt BgL_arg5174z00_2087;obj_t BgL_arg5175z00_2088;BgL_rtl_regz00_bglt BgL_arg5176z00_2089;
{ /* ./SawMill/node2rtl.scm 226 */
BgL_rtl_selectz00_bglt BgL_arg5179z00_2090;BgL_nodez00_bglt BgL_arg5180z00_2091;
{ /* ./SawMill/node2rtl.scm 226 */
BgL_typez00_bglt BgL_arg5185z00_2093;obj_t BgL_arg5186z00_2094;
BgL_arg5185z00_2093 = 
(((BgL_selectz00_bglt)CREF(BgL_ez00_2083))->BgL_itemzd2typezd2); 
{ /* ./SawMill/node2rtl.scm 227 */
obj_t BgL_arg5190z00_2095;
BgL_arg5190z00_2095 = 
(((BgL_selectz00_bglt)CREF(BgL_ez00_2083))->BgL_clausesz00); 
BgL_arg5186z00_2094 = 
BGl_coercez00zzsaw_node2rtlz00(BgL_arg5190z00_2095); } 
BgL_arg5179z00_2090 = 
BGl_makezd2rtl_selectzd2zzsaw_defsz00(BgL_arg5185z00_2093, BgL_arg5186z00_2094); } 
BgL_arg5180z00_2091 = 
(((BgL_selectz00_bglt)CREF(BgL_ez00_2083))->BgL_testz00); 
{ /* ./SawMill/node2rtl.scm 226 */
obj_t BgL_list5182z00_2092;
{ /* ./SawMill/node2rtl.scm 226 */
obj_t BgL_auxz00_5240;
BgL_auxz00_5240 = 
(obj_t)(BgL_arg5180z00_2091); 
BgL_list5182z00_2092 = 
MAKE_PAIR(BgL_auxz00_5240, BNIL); } 
{ /* ./SawMill/node2rtl.scm 226 */
BgL_rtl_funz00_bglt BgL_funz00_3292;
BgL_funz00_3292 = 
(BgL_rtl_funz00_bglt)(BgL_arg5179z00_2090); 
BgL_arg5174z00_2087 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2083), BgL_funz00_3292, BgL_list5182z00_2092); } } } 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_l3326z00_2096;
BgL_l3326z00_2096 = 
(((BgL_selectz00_bglt)CREF(BgL_ez00_2083))->BgL_clausesz00); 
{ /* ./SawMill/node2rtl.scm 229 */
bool_t BgL_test5194z00_2097;
BgL_test5194z00_2097 = 
NULLP(BgL_l3326z00_2096); 
if(BgL_test5194z00_2097)
{ /* ./SawMill/node2rtl.scm 229 */
BgL_arg5175z00_2088 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_head3328z00_2098;
BgL_head3328z00_2098 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3326z00_2099;obj_t BgL_tail3329z00_2100;
BgL_l3326z00_2099 = BgL_l3326z00_2096; 
BgL_tail3329z00_2100 = BgL_head3328z00_2098; 
BgL_map3327z00_2101:
{ /* ./SawMill/node2rtl.scm 229 */
bool_t BgL_test5196z00_2102;
BgL_test5196z00_2102 = 
NULLP(BgL_l3326z00_2099); 
if(BgL_test5196z00_2102)
{ /* ./SawMill/node2rtl.scm 229 */
BgL_arg5175z00_2088 = 
CDR(BgL_head3328z00_2098); }  else 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_newtail3330z00_2103;
{ /* ./SawMill/node2rtl.scm 229 */
BgL_areaz00_bglt BgL_arg5204z00_2105;
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_cz00_2107;
BgL_cz00_2107 = 
CAR(BgL_l3326z00_2099); 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_arg5208z00_2108;
BgL_arg5208z00_2108 = 
CDR(BgL_cz00_2107); 
{ /* ./SawMill/node2rtl.scm 229 */
BgL_areaz00_bglt BgL_res5874z00_3328;
{ /* ./SawMill/node2rtl.scm 229 */
BgL_nodez00_bglt BgL_ez00_3302;
BgL_ez00_3302 = 
(BgL_nodez00_bglt)(BgL_arg5208z00_2108); 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_method3437z00_3303;
{ /* ./SawMill/node2rtl.scm 229 */
BgL_objectz00_bglt BgL_objz00_3304;
BgL_objz00_3304 = 
(BgL_objectz00_bglt)(BgL_ez00_3302); 
{ /* ./SawMill/node2rtl.scm 229 */
long BgL_objzd2classzd2numz00_3305;
BgL_objzd2classzd2numz00_3305 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3304); 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_arg2017z00_3306;
{ /* ./SawMill/node2rtl.scm 229 */
int BgL_auxz00_5258;
BgL_auxz00_5258 = 
(int)(((long)1)); 
BgL_arg2017z00_3306 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5258); } 
{ /* ./SawMill/node2rtl.scm 229 */
int BgL_offsetz00_3309;
BgL_offsetz00_3309 = 
(int)(BgL_objzd2classzd2numz00_3305); 
{ /* ./SawMill/node2rtl.scm 229 */
long BgL_offsetz00_3310;
{ /* ./SawMill/node2rtl.scm 229 */
long BgL_auxz00_5262;
BgL_auxz00_5262 = 
(long)(BgL_offsetz00_3309); 
BgL_offsetz00_3310 = 
(BgL_auxz00_5262-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 229 */
long BgL_modz00_3311;
{ /* ./SawMill/node2rtl.scm 229 */
int BgL_arg2028z00_3312;
BgL_arg2028z00_3312 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 229 */
long BgL_n2z00_3320;
BgL_n2z00_3320 = 
(long)(BgL_arg2028z00_3312); 
BgL_modz00_3311 = 
(BgL_offsetz00_3310/BgL_n2z00_3320); } } 
{ /* ./SawMill/node2rtl.scm 229 */
long BgL_restz00_3313;
{ /* ./SawMill/node2rtl.scm 229 */
int BgL_arg2024z00_3314;
BgL_arg2024z00_3314 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 229 */
long BgL_n2z00_3323;
BgL_n2z00_3323 = 
(long)(BgL_arg2024z00_3314); 
BgL_restz00_3313 = 
(BgL_offsetz00_3310%BgL_n2z00_3323); } } 
{ /* ./SawMill/node2rtl.scm 229 */

{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_bucketz00_3315;
{ /* ./SawMill/node2rtl.scm 229 */
int BgL_kz00_3325;
BgL_kz00_3325 = 
(int)(BgL_modz00_3311); 
BgL_bucketz00_3315 = 
VECTOR_REF(BgL_arg2017z00_3306,BgL_kz00_3325); } 
{ /* ./SawMill/node2rtl.scm 229 */
int BgL_kz00_3327;
BgL_kz00_3327 = 
(int)(BgL_restz00_3313); 
BgL_method3437z00_3303 = 
VECTOR_REF(BgL_bucketz00_3315,BgL_kz00_3327); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_auxz00_5275;
BgL_auxz00_5275 = 
PROCEDURE_ENTRY(BgL_method3437z00_3303)(BgL_method3437z00_3303, 
(obj_t)(BgL_ez00_3302), BEOA); 
BgL_res5874z00_3328 = 
(BgL_areaz00_bglt)(BgL_auxz00_5275); } } } 
BgL_arg5204z00_2105 = BgL_res5874z00_3328; } } } 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_obj1z00_3329;
BgL_obj1z00_3329 = 
(obj_t)(BgL_arg5204z00_2105); 
BgL_newtail3330z00_2103 = 
MAKE_PAIR(BgL_obj1z00_3329, BNIL); } } 
SET_CDR(BgL_tail3329z00_2100, BgL_newtail3330z00_2103); 
{ /* ./SawMill/node2rtl.scm 229 */
obj_t BgL_arg5200z00_2104;
BgL_arg5200z00_2104 = 
CDR(BgL_l3326z00_2099); 
{ 
obj_t BgL_tail3329z00_5285;obj_t BgL_l3326z00_5284;
BgL_l3326z00_5284 = BgL_arg5200z00_2104; 
BgL_tail3329z00_5285 = BgL_newtail3330z00_2103; 
BgL_tail3329z00_2100 = BgL_tail3329z00_5285; 
BgL_l3326z00_2099 = BgL_l3326z00_5284; 
goto BgL_map3327z00_2101;} } } } } } } } 
{ /* ./SawMill/node2rtl.scm 230 */
BgL_rtl_regz00_bglt BgL_res5875z00_3337;
{ /* ./SawMill/node2rtl.scm 230 */
BgL_nodez00_bglt BgL_ez00_3334;
BgL_ez00_3334 = 
(BgL_nodez00_bglt)(BgL_ez00_2083); 
{ /* ./SawMill/node2rtl.scm 230 */
BgL_typez00_bglt BgL_arg3595z00_3335;bool_t BgL_arg3596z00_3336;
BgL_arg3595z00_3335 = 
BGl_typeofz00zztype_typeofz00(BgL_ez00_3334); 
BgL_arg3596z00_3336 = ((bool_t)0); 
BgL_res5875z00_3337 = 
BGl_makezd2rtl_regzd2zzsaw_defsz00(BgL_arg3595z00_3335, 
BBOOL(BgL_arg3596z00_3336)); } } 
BgL_arg5176z00_2089 = BgL_res5875z00_3337; } 
BgL_auxz00_5234 = 
BGl_forkzf2joinzf2zzsaw_node2rtlz00(BgL_arg5174z00_2087, BgL_arg5175z00_2088, BgL_arg5176z00_2089); } 
return 
(obj_t)(BgL_auxz00_5234);} } } 
}



/* node->rtl-conditional3449 */
obj_t BGl_nodezd2ze3rtlzd2conditional3449ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3837, obj_t BgL_ez00_3838)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 218 */
{ 
BgL_conditionalz00_bglt BgL_ez00_2067;
{ /* ./SawMill/node2rtl.scm 219 */
BgL_areaz00_bglt BgL_auxz00_5293;
BgL_ez00_2067 = 
(BgL_conditionalz00_bglt)(BgL_ez00_3838); 
{ /* ./SawMill/node2rtl.scm 220 */
BgL_nodez00_bglt BgL_arg5141z00_2071;obj_t BgL_arg5142z00_2072;
BgL_arg5141z00_2071 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_2067))->BgL_testz00); 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_arg5146z00_2073;BgL_rtl_regz00_bglt BgL_arg5147z00_2074;
{ /* ./SawMill/node2rtl.scm 220 */
BgL_areaz00_bglt BgL_arg5150z00_2075;BgL_areaz00_bglt BgL_arg5151z00_2076;
{ /* ./SawMill/node2rtl.scm 220 */
BgL_nodez00_bglt BgL_arg5159z00_2079;
BgL_arg5159z00_2079 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_2067))->BgL_truez00); 
{ /* ./SawMill/node2rtl.scm 220 */
BgL_areaz00_bglt BgL_res5863z00_3225;
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_method3437z00_3200;
{ /* ./SawMill/node2rtl.scm 220 */
BgL_objectz00_bglt BgL_objz00_3201;
BgL_objz00_3201 = 
(BgL_objectz00_bglt)(BgL_arg5159z00_2079); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_objzd2classzd2numz00_3202;
BgL_objzd2classzd2numz00_3202 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3201); 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_arg2017z00_3203;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_auxz00_5298;
BgL_auxz00_5298 = 
(int)(((long)1)); 
BgL_arg2017z00_3203 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5298); } 
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_offsetz00_3206;
BgL_offsetz00_3206 = 
(int)(BgL_objzd2classzd2numz00_3202); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_offsetz00_3207;
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_auxz00_5302;
BgL_auxz00_5302 = 
(long)(BgL_offsetz00_3206); 
BgL_offsetz00_3207 = 
(BgL_auxz00_5302-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_modz00_3208;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_arg2028z00_3209;
BgL_arg2028z00_3209 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_n2z00_3217;
BgL_n2z00_3217 = 
(long)(BgL_arg2028z00_3209); 
BgL_modz00_3208 = 
(BgL_offsetz00_3207/BgL_n2z00_3217); } } 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_restz00_3210;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_arg2024z00_3211;
BgL_arg2024z00_3211 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_n2z00_3220;
BgL_n2z00_3220 = 
(long)(BgL_arg2024z00_3211); 
BgL_restz00_3210 = 
(BgL_offsetz00_3207%BgL_n2z00_3220); } } 
{ /* ./SawMill/node2rtl.scm 220 */

{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_bucketz00_3212;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_kz00_3222;
BgL_kz00_3222 = 
(int)(BgL_modz00_3208); 
BgL_bucketz00_3212 = 
VECTOR_REF(BgL_arg2017z00_3203,BgL_kz00_3222); } 
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_kz00_3224;
BgL_kz00_3224 = 
(int)(BgL_restz00_3210); 
BgL_method3437z00_3200 = 
VECTOR_REF(BgL_bucketz00_3212,BgL_kz00_3224); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_auxz00_5315;
BgL_auxz00_5315 = 
PROCEDURE_ENTRY(BgL_method3437z00_3200)(BgL_method3437z00_3200, 
(obj_t)(BgL_arg5159z00_2079), BEOA); 
BgL_res5863z00_3225 = 
(BgL_areaz00_bglt)(BgL_auxz00_5315); } } 
BgL_arg5150z00_2075 = BgL_res5863z00_3225; } } 
{ /* ./SawMill/node2rtl.scm 220 */
BgL_nodez00_bglt BgL_arg5163z00_2080;
BgL_arg5163z00_2080 = 
(((BgL_conditionalz00_bglt)CREF(BgL_ez00_2067))->BgL_falsez00); 
{ /* ./SawMill/node2rtl.scm 220 */
BgL_areaz00_bglt BgL_res5866z00_3253;
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_method3437z00_3228;
{ /* ./SawMill/node2rtl.scm 220 */
BgL_objectz00_bglt BgL_objz00_3229;
BgL_objz00_3229 = 
(BgL_objectz00_bglt)(BgL_arg5163z00_2080); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_objzd2classzd2numz00_3230;
BgL_objzd2classzd2numz00_3230 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3229); 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_arg2017z00_3231;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_auxz00_5323;
BgL_auxz00_5323 = 
(int)(((long)1)); 
BgL_arg2017z00_3231 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5323); } 
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_offsetz00_3234;
BgL_offsetz00_3234 = 
(int)(BgL_objzd2classzd2numz00_3230); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_offsetz00_3235;
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_auxz00_5327;
BgL_auxz00_5327 = 
(long)(BgL_offsetz00_3234); 
BgL_offsetz00_3235 = 
(BgL_auxz00_5327-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_modz00_3236;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_arg2028z00_3237;
BgL_arg2028z00_3237 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_n2z00_3245;
BgL_n2z00_3245 = 
(long)(BgL_arg2028z00_3237); 
BgL_modz00_3236 = 
(BgL_offsetz00_3235/BgL_n2z00_3245); } } 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_restz00_3238;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_arg2024z00_3239;
BgL_arg2024z00_3239 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_n2z00_3248;
BgL_n2z00_3248 = 
(long)(BgL_arg2024z00_3239); 
BgL_restz00_3238 = 
(BgL_offsetz00_3235%BgL_n2z00_3248); } } 
{ /* ./SawMill/node2rtl.scm 220 */

{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_bucketz00_3240;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_kz00_3250;
BgL_kz00_3250 = 
(int)(BgL_modz00_3236); 
BgL_bucketz00_3240 = 
VECTOR_REF(BgL_arg2017z00_3231,BgL_kz00_3250); } 
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_kz00_3252;
BgL_kz00_3252 = 
(int)(BgL_restz00_3238); 
BgL_method3437z00_3228 = 
VECTOR_REF(BgL_bucketz00_3240,BgL_kz00_3252); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_auxz00_5340;
BgL_auxz00_5340 = 
PROCEDURE_ENTRY(BgL_method3437z00_3228)(BgL_method3437z00_3228, 
(obj_t)(BgL_arg5163z00_2080), BEOA); 
BgL_res5866z00_3253 = 
(BgL_areaz00_bglt)(BgL_auxz00_5340); } } 
BgL_arg5151z00_2076 = BgL_res5866z00_3253; } } 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_list5153z00_2077;
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_arg5155z00_2078;
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_auxz00_5345;
BgL_auxz00_5345 = 
(obj_t)(BgL_arg5151z00_2076); 
BgL_arg5155z00_2078 = 
MAKE_PAIR(BgL_auxz00_5345, BNIL); } 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_auxz00_5348;
BgL_auxz00_5348 = 
(obj_t)(BgL_arg5150z00_2075); 
BgL_list5153z00_2077 = 
MAKE_PAIR(BgL_auxz00_5348, BgL_arg5155z00_2078); } } 
BgL_arg5146z00_2073 = BgL_list5153z00_2077; } } 
{ /* ./SawMill/node2rtl.scm 221 */
BgL_rtl_regz00_bglt BgL_res5868z00_3259;
{ /* ./SawMill/node2rtl.scm 221 */
BgL_nodez00_bglt BgL_ez00_3256;
BgL_ez00_3256 = 
(BgL_nodez00_bglt)(BgL_ez00_2067); 
{ /* ./SawMill/node2rtl.scm 221 */
BgL_typez00_bglt BgL_arg3595z00_3257;bool_t BgL_arg3596z00_3258;
BgL_arg3595z00_3257 = 
BGl_typeofz00zztype_typeofz00(BgL_ez00_3256); 
BgL_arg3596z00_3258 = ((bool_t)0); 
BgL_res5868z00_3259 = 
BGl_makezd2rtl_regzd2zzsaw_defsz00(BgL_arg3595z00_3257, 
BBOOL(BgL_arg3596z00_3258)); } } 
BgL_arg5147z00_2074 = BgL_res5868z00_3259; } 
BgL_arg5142z00_2072 = 
BGl_joinz00zzsaw_node2rtlz00(BgL_arg5146z00_2073, BgL_arg5147z00_2074); } 
{ /* ./SawMill/node2rtl.scm 220 */
BgL_areaz00_bglt BgL_res5871z00_3287;
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_method3493z00_3262;
{ /* ./SawMill/node2rtl.scm 220 */
BgL_objectz00_bglt BgL_objz00_3263;
BgL_objz00_3263 = 
(BgL_objectz00_bglt)(BgL_arg5141z00_2071); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_objzd2classzd2numz00_3264;
BgL_objzd2classzd2numz00_3264 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3263); 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_arg2017z00_3265;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_auxz00_5358;
BgL_auxz00_5358 = 
(int)(((long)1)); 
BgL_arg2017z00_3265 = 
PROCEDURE_REF(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BgL_auxz00_5358); } 
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_offsetz00_3268;
BgL_offsetz00_3268 = 
(int)(BgL_objzd2classzd2numz00_3264); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_offsetz00_3269;
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_auxz00_5362;
BgL_auxz00_5362 = 
(long)(BgL_offsetz00_3268); 
BgL_offsetz00_3269 = 
(BgL_auxz00_5362-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_modz00_3270;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_arg2028z00_3271;
BgL_arg2028z00_3271 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_n2z00_3279;
BgL_n2z00_3279 = 
(long)(BgL_arg2028z00_3271); 
BgL_modz00_3270 = 
(BgL_offsetz00_3269/BgL_n2z00_3279); } } 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_restz00_3272;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_arg2024z00_3273;
BgL_arg2024z00_3273 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 220 */
long BgL_n2z00_3282;
BgL_n2z00_3282 = 
(long)(BgL_arg2024z00_3273); 
BgL_restz00_3272 = 
(BgL_offsetz00_3269%BgL_n2z00_3282); } } 
{ /* ./SawMill/node2rtl.scm 220 */

{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_bucketz00_3274;
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_kz00_3284;
BgL_kz00_3284 = 
(int)(BgL_modz00_3270); 
BgL_bucketz00_3274 = 
VECTOR_REF(BgL_arg2017z00_3265,BgL_kz00_3284); } 
{ /* ./SawMill/node2rtl.scm 220 */
int BgL_kz00_3286;
BgL_kz00_3286 = 
(int)(BgL_restz00_3272); 
BgL_method3493z00_3262 = 
VECTOR_REF(BgL_bucketz00_3274,BgL_kz00_3286); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 220 */
obj_t BgL_auxz00_5375;
BgL_auxz00_5375 = 
PROCEDURE_ENTRY(BgL_method3493z00_3262)(BgL_method3493z00_3262, 
(obj_t)(BgL_arg5141z00_2071), BgL_arg5142z00_2072, BEOA); 
BgL_res5871z00_3287 = 
(BgL_areaz00_bglt)(BgL_auxz00_5375); } } 
BgL_auxz00_5293 = BgL_res5871z00_3287; } } 
return 
(obj_t)(BgL_auxz00_5293);} } } 
}



/* node->rtl-sequence3447 */
obj_t BGl_nodezd2ze3rtlzd2sequence3447ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3839, obj_t BgL_ez00_3840)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 213 */
{ 
BgL_sequencez00_bglt BgL_ez00_2048;
{ /* ./SawMill/node2rtl.scm 214 */
BgL_areaz00_bglt BgL_auxz00_5382;
BgL_ez00_2048 = 
(BgL_sequencez00_bglt)(BgL_ez00_3840); 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_arg5112z00_2052;
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_l3316z00_2053;
BgL_l3316z00_2053 = 
(((BgL_sequencez00_bglt)CREF(BgL_ez00_2048))->BgL_nodesz00); 
{ /* ./SawMill/node2rtl.scm 215 */
bool_t BgL_test5114z00_2054;
BgL_test5114z00_2054 = 
NULLP(BgL_l3316z00_2053); 
if(BgL_test5114z00_2054)
{ /* ./SawMill/node2rtl.scm 215 */
BgL_arg5112z00_2052 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_head3318z00_2055;
BgL_head3318z00_2055 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3316z00_2056;obj_t BgL_tail3319z00_2057;
BgL_l3316z00_2056 = BgL_l3316z00_2053; 
BgL_tail3319z00_2057 = BgL_head3318z00_2055; 
BgL_map3317z00_2058:
{ /* ./SawMill/node2rtl.scm 215 */
bool_t BgL_test5116z00_2059;
BgL_test5116z00_2059 = 
NULLP(BgL_l3316z00_2056); 
if(BgL_test5116z00_2059)
{ /* ./SawMill/node2rtl.scm 215 */
BgL_arg5112z00_2052 = 
CDR(BgL_head3318z00_2055); }  else 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_newtail3320z00_2060;
{ /* ./SawMill/node2rtl.scm 215 */
BgL_areaz00_bglt BgL_arg5124z00_2062;
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_ez00_2064;
BgL_ez00_2064 = 
CAR(BgL_l3316z00_2056); 
{ /* ./SawMill/node2rtl.scm 215 */
BgL_areaz00_bglt BgL_res5860z00_3191;
{ /* ./SawMill/node2rtl.scm 215 */
BgL_nodez00_bglt BgL_ez00_3165;
BgL_ez00_3165 = 
(BgL_nodez00_bglt)(BgL_ez00_2064); 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_method3437z00_3166;
{ /* ./SawMill/node2rtl.scm 215 */
BgL_objectz00_bglt BgL_objz00_3167;
BgL_objz00_3167 = 
(BgL_objectz00_bglt)(BgL_ez00_3165); 
{ /* ./SawMill/node2rtl.scm 215 */
long BgL_objzd2classzd2numz00_3168;
BgL_objzd2classzd2numz00_3168 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3167); 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_arg2017z00_3169;
{ /* ./SawMill/node2rtl.scm 215 */
int BgL_auxz00_5394;
BgL_auxz00_5394 = 
(int)(((long)1)); 
BgL_arg2017z00_3169 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5394); } 
{ /* ./SawMill/node2rtl.scm 215 */
int BgL_offsetz00_3172;
BgL_offsetz00_3172 = 
(int)(BgL_objzd2classzd2numz00_3168); 
{ /* ./SawMill/node2rtl.scm 215 */
long BgL_offsetz00_3173;
{ /* ./SawMill/node2rtl.scm 215 */
long BgL_auxz00_5398;
BgL_auxz00_5398 = 
(long)(BgL_offsetz00_3172); 
BgL_offsetz00_3173 = 
(BgL_auxz00_5398-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 215 */
long BgL_modz00_3174;
{ /* ./SawMill/node2rtl.scm 215 */
int BgL_arg2028z00_3175;
BgL_arg2028z00_3175 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 215 */
long BgL_n2z00_3183;
BgL_n2z00_3183 = 
(long)(BgL_arg2028z00_3175); 
BgL_modz00_3174 = 
(BgL_offsetz00_3173/BgL_n2z00_3183); } } 
{ /* ./SawMill/node2rtl.scm 215 */
long BgL_restz00_3176;
{ /* ./SawMill/node2rtl.scm 215 */
int BgL_arg2024z00_3177;
BgL_arg2024z00_3177 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 215 */
long BgL_n2z00_3186;
BgL_n2z00_3186 = 
(long)(BgL_arg2024z00_3177); 
BgL_restz00_3176 = 
(BgL_offsetz00_3173%BgL_n2z00_3186); } } 
{ /* ./SawMill/node2rtl.scm 215 */

{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_bucketz00_3178;
{ /* ./SawMill/node2rtl.scm 215 */
int BgL_kz00_3188;
BgL_kz00_3188 = 
(int)(BgL_modz00_3174); 
BgL_bucketz00_3178 = 
VECTOR_REF(BgL_arg2017z00_3169,BgL_kz00_3188); } 
{ /* ./SawMill/node2rtl.scm 215 */
int BgL_kz00_3190;
BgL_kz00_3190 = 
(int)(BgL_restz00_3176); 
BgL_method3437z00_3166 = 
VECTOR_REF(BgL_bucketz00_3178,BgL_kz00_3190); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_auxz00_5411;
BgL_auxz00_5411 = 
PROCEDURE_ENTRY(BgL_method3437z00_3166)(BgL_method3437z00_3166, 
(obj_t)(BgL_ez00_3165), BEOA); 
BgL_res5860z00_3191 = 
(BgL_areaz00_bglt)(BgL_auxz00_5411); } } } 
BgL_arg5124z00_2062 = BgL_res5860z00_3191; } } 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_obj1z00_3192;
BgL_obj1z00_3192 = 
(obj_t)(BgL_arg5124z00_2062); 
BgL_newtail3320z00_2060 = 
MAKE_PAIR(BgL_obj1z00_3192, BNIL); } } 
SET_CDR(BgL_tail3319z00_2057, BgL_newtail3320z00_2060); 
{ /* ./SawMill/node2rtl.scm 215 */
obj_t BgL_arg5120z00_2061;
BgL_arg5120z00_2061 = 
CDR(BgL_l3316z00_2056); 
{ 
obj_t BgL_tail3319z00_5421;obj_t BgL_l3316z00_5420;
BgL_l3316z00_5420 = BgL_arg5120z00_2061; 
BgL_tail3319z00_5421 = BgL_newtail3320z00_2060; 
BgL_tail3319z00_2057 = BgL_tail3319z00_5421; 
BgL_l3316z00_2056 = BgL_l3316z00_5420; 
goto BgL_map3317z00_2058;} } } } } } } } 
BgL_auxz00_5382 = 
BGl_linkza2za2zzsaw_node2rtlz00(BgL_arg5112z00_2052); } 
return 
(obj_t)(BgL_auxz00_5382);} } } 
}



/* node->rtl-setq3445 */
obj_t BGl_nodezd2ze3rtlzd2setq3445ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3841, obj_t BgL_ez00_3842)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 204 */
{ 
BgL_setqz00_bglt BgL_ez00_2028;
{ /* ./SawMill/node2rtl.scm 205 */
BgL_areaz00_bglt BgL_auxz00_5425;
BgL_ez00_2028 = 
(BgL_setqz00_bglt)(BgL_ez00_3842); 
{ /* ./SawMill/node2rtl.scm 206 */
BgL_varz00_bglt BgL_instance3310z00_2032;
BgL_instance3310z00_2032 = 
(((BgL_setqz00_bglt)CREF(BgL_ez00_2028))->BgL_varz00); 
{ /* ./SawMill/node2rtl.scm 207 */
BgL_areaz00_bglt BgL_arg5071z00_2033;BgL_areaz00_bglt BgL_arg5072z00_2034;
{ /* ./SawMill/node2rtl.scm 207 */
bool_t BgL_test5074z00_2035;
{ /* ./SawMill/node2rtl.scm 207 */
BgL_variablez00_bglt BgL_arg5096z00_2043;
BgL_arg5096z00_2043 = 
(((BgL_varz00_bglt)CREF(BgL_instance3310z00_2032))->BgL_variablez00); 
{ /* ./SawMill/node2rtl.scm 207 */
obj_t BgL_obj1240z00_3139;
BgL_obj1240z00_3139 = 
(obj_t)(BgL_arg5096z00_2043); 
BgL_test5074z00_2035 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1240z00_3139, BGl_globalz00zzast_varz00); } } 
if(BgL_test5074z00_2035)
{ /* ./SawMill/node2rtl.scm 208 */
BgL_rtl_storegz00_bglt BgL_arg5076z00_2036;BgL_nodez00_bglt BgL_arg5077z00_2037;
{ /* ./SawMill/node2rtl.scm 208 */
BgL_variablez00_bglt BgL_arg5082z00_2039;
BgL_arg5082z00_2039 = 
(((BgL_varz00_bglt)CREF(BgL_instance3310z00_2032))->BgL_variablez00); 
BgL_arg5076z00_2036 = 
BGl_makezd2rtl_storegzd2zzsaw_defsz00(
(BgL_globalz00_bglt)(BgL_arg5082z00_2039)); } 
BgL_arg5077z00_2037 = 
(((BgL_setqz00_bglt)CREF(BgL_ez00_2028))->BgL_valuez00); 
{ /* ./SawMill/node2rtl.scm 208 */
obj_t BgL_list5079z00_2038;
{ /* ./SawMill/node2rtl.scm 208 */
obj_t BgL_auxz00_5435;
BgL_auxz00_5435 = 
(obj_t)(BgL_arg5077z00_2037); 
BgL_list5079z00_2038 = 
MAKE_PAIR(BgL_auxz00_5435, BNIL); } 
{ /* ./SawMill/node2rtl.scm 208 */
BgL_rtl_funz00_bglt BgL_funz00_3143;
BgL_funz00_3143 = 
(BgL_rtl_funz00_bglt)(BgL_arg5076z00_2036); 
BgL_arg5071z00_2033 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_2028), BgL_funz00_3143, BgL_list5079z00_2038); } } }  else 
{ /* ./SawMill/node2rtl.scm 209 */
BgL_nodez00_bglt BgL_arg5087z00_2040;BgL_rtl_regz00_bglt BgL_arg5088z00_2041;
BgL_arg5087z00_2040 = 
(((BgL_setqz00_bglt)CREF(BgL_ez00_2028))->BgL_valuez00); 
{ /* ./SawMill/node2rtl.scm 209 */
BgL_variablez00_bglt BgL_arg5092z00_2042;
BgL_arg5092z00_2042 = 
(((BgL_varz00_bglt)CREF(BgL_instance3310z00_2032))->BgL_variablez00); 
BgL_arg5088z00_2041 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_arg5092z00_2042)); } 
{ /* ./SawMill/node2rtl.scm 209 */
BgL_areaz00_bglt BgL_res5857z00_3154;
{ /* ./SawMill/node2rtl.scm 209 */
BgL_areaz00_bglt BgL_az00_3149;
BgL_az00_3149 = 
BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(BgL_arg5087z00_2040); 
{ /* ./SawMill/node2rtl.scm 209 */
BgL_blockz00_bglt BgL_arg3672z00_3152;
BgL_arg3672z00_3152 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_3149))->BgL_exitz00); 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_arg3672z00_3152, BgL_arg5088z00_2041); } 
BgL_res5857z00_3154 = BgL_az00_3149; } 
BgL_arg5071z00_2033 = BgL_res5857z00_3154; } } } 
{ /* ./SawMill/node2rtl.scm 210 */
BgL_rtl_nopz00_bglt BgL_arg5100z00_2044;
BgL_arg5100z00_2044 = 
BGl_makezd2rtl_nopzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 210 */
BgL_rtl_funz00_bglt BgL_funz00_3156;
BgL_funz00_3156 = 
(BgL_rtl_funz00_bglt)(BgL_arg5100z00_2044); 
BgL_arg5072z00_2034 = 
BGl_singleza2za2zzsaw_node2rtlz00(BFALSE, BgL_funz00_3156, BNIL); } } 
BgL_auxz00_5425 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg5071z00_2033, BgL_arg5072z00_2034); } } 
return 
(obj_t)(BgL_auxz00_5425);} } } 
}



/* node->rtl-let-var3443 */
obj_t BGl_nodezd2ze3rtlzd2letzd2var3443z31zzsaw_node2rtlz00(obj_t BgL_envz00_3843, obj_t BgL_ez00_3844)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 187 */
{ 
BgL_letzd2varzd2_bglt BgL_ez00_1978;
{ /* ./SawMill/node2rtl.scm 188 */
BgL_areaz00_bglt BgL_auxz00_5454;
BgL_ez00_1978 = 
(BgL_letzd2varzd2_bglt)(BgL_ez00_3844); 
{ /* ./SawMill/node2rtl.scm 190 */
bool_t BgL_test4959z00_1982;
{ /* ./SawMill/node2rtl.scm 190 */
bool_t BgL_test5011z00_2006;
{ /* ./SawMill/node2rtl.scm 190 */
BgL_nodez00_bglt BgL_arg5061z00_2025;
BgL_arg5061z00_2025 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bodyz00); 
{ /* ./SawMill/node2rtl.scm 190 */
obj_t BgL_obj2365z00_3026;
BgL_obj2365z00_3026 = 
(obj_t)(BgL_arg5061z00_2025); 
BgL_test5011z00_2006 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj2365z00_3026, BGl_conditionalz00zzast_nodez00); } } 
if(BgL_test5011z00_2006)
{ /* ./SawMill/node2rtl.scm 191 */
bool_t BgL_test5012z00_2007;
{ /* ./SawMill/node2rtl.scm 191 */
obj_t BgL_auxz00_5459;
BgL_auxz00_5459 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bindingsz00); 
BgL_test5012z00_2007 = 
NULLP(BgL_auxz00_5459); } 
if(BgL_test5012z00_2007)
{ /* ./SawMill/node2rtl.scm 191 */
BgL_test4959z00_1982 = ((bool_t)0); }  else 
{ /* ./SawMill/node2rtl.scm 192 */
bool_t BgL_test5013z00_2008;
{ /* ./SawMill/node2rtl.scm 192 */
obj_t BgL_auxz00_5463;
{ /* ./SawMill/node2rtl.scm 192 */
obj_t BgL_auxz00_5464;
BgL_auxz00_5464 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bindingsz00); 
BgL_auxz00_5463 = 
CDR(BgL_auxz00_5464); } 
BgL_test5013z00_2008 = 
NULLP(BgL_auxz00_5463); } 
if(BgL_test5013z00_2008)
{ /* ./SawMill/node2rtl.scm 193 */
bool_t BgL_test5014z00_2009;
{ /* ./SawMill/node2rtl.scm 193 */
BgL_nodez00_bglt BgL_arg5043z00_2020;
{ /* ./SawMill/node2rtl.scm 193 */
BgL_conditionalz00_bglt BgL_obj2332z00_3033;
{ /* ./SawMill/node2rtl.scm 193 */
BgL_nodez00_bglt BgL_auxz00_5469;
BgL_auxz00_5469 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bodyz00); 
BgL_obj2332z00_3033 = 
(BgL_conditionalz00_bglt)(BgL_auxz00_5469); } 
BgL_arg5043z00_2020 = 
(((BgL_conditionalz00_bglt)CREF(BgL_obj2332z00_3033))->BgL_testz00); } 
{ /* ./SawMill/node2rtl.scm 193 */
obj_t BgL_obj1640z00_3034;
BgL_obj1640z00_3034 = 
(obj_t)(BgL_arg5043z00_2020); 
BgL_test5014z00_2009 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1640z00_3034, BGl_varz00zzast_nodez00); } } 
if(BgL_test5014z00_2009)
{ /* ./SawMill/node2rtl.scm 194 */
bool_t BgL_testz00_5476;
{ /* ./SawMill/node2rtl.scm 194 */
long BgL_auxz00_5477;
{ /* ./SawMill/node2rtl.scm 194 */
BgL_variablez00_bglt BgL_obj1112z00_3040;
{ /* ./SawMill/node2rtl.scm 194 */
obj_t BgL_auxz00_5478;
{ /* ./SawMill/node2rtl.scm 194 */
obj_t BgL_auxz00_5479;
{ /* ./SawMill/node2rtl.scm 194 */
obj_t BgL_auxz00_5480;
BgL_auxz00_5480 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bindingsz00); 
BgL_auxz00_5479 = 
CAR(BgL_auxz00_5480); } 
BgL_auxz00_5478 = 
CAR(BgL_auxz00_5479); } 
BgL_obj1112z00_3040 = 
(BgL_variablez00_bglt)(BgL_auxz00_5478); } 
BgL_auxz00_5477 = 
(((BgL_variablez00_bglt)CREF(BgL_obj1112z00_3040))->BgL_occurrencez00); } 
BgL_testz00_5476 = 
(((long)1)==BgL_auxz00_5477); } 
if(BgL_testz00_5476)
{ /* ./SawMill/node2rtl.scm 195 */
obj_t BgL_auxz00_5493;obj_t BgL_auxz00_5487;
{ /* ./SawMill/node2rtl.scm 195 */
BgL_variablez00_bglt BgL_auxz00_5494;
{ /* ./SawMill/node2rtl.scm 195 */
BgL_varz00_bglt BgL_obj1625z00_3050;
{ /* ./SawMill/node2rtl.scm 195 */
BgL_nodez00_bglt BgL_auxz00_5495;
{ /* ./SawMill/node2rtl.scm 195 */
BgL_conditionalz00_bglt BgL_obj2332z00_3049;
{ /* ./SawMill/node2rtl.scm 195 */
BgL_nodez00_bglt BgL_auxz00_5496;
BgL_auxz00_5496 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bodyz00); 
BgL_obj2332z00_3049 = 
(BgL_conditionalz00_bglt)(BgL_auxz00_5496); } 
BgL_auxz00_5495 = 
(((BgL_conditionalz00_bglt)CREF(BgL_obj2332z00_3049))->BgL_testz00); } 
BgL_obj1625z00_3050 = 
(BgL_varz00_bglt)(BgL_auxz00_5495); } 
BgL_auxz00_5494 = 
(((BgL_varz00_bglt)CREF(BgL_obj1625z00_3050))->BgL_variablez00); } 
BgL_auxz00_5493 = 
(obj_t)(BgL_auxz00_5494); } 
{ /* ./SawMill/node2rtl.scm 195 */
obj_t BgL_auxz00_5488;
{ /* ./SawMill/node2rtl.scm 195 */
obj_t BgL_auxz00_5489;
BgL_auxz00_5489 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bindingsz00); 
BgL_auxz00_5488 = 
CAR(BgL_auxz00_5489); } 
BgL_auxz00_5487 = 
CAR(BgL_auxz00_5488); } 
BgL_test4959z00_1982 = 
(BgL_auxz00_5487==BgL_auxz00_5493); }  else 
{ /* ./SawMill/node2rtl.scm 194 */
BgL_test4959z00_1982 = ((bool_t)0); } }  else 
{ /* ./SawMill/node2rtl.scm 193 */
BgL_test4959z00_1982 = ((bool_t)0); } }  else 
{ /* ./SawMill/node2rtl.scm 192 */
BgL_test4959z00_1982 = ((bool_t)0); } } }  else 
{ /* ./SawMill/node2rtl.scm 190 */
BgL_test4959z00_1982 = ((bool_t)0); } } 
if(BgL_test4959z00_1982)
{ /* ./SawMill/node2rtl.scm 190 */
{ /* ./SawMill/node2rtl.scm 196 */
BgL_nodez00_bglt BgL_arg4961z00_1983;obj_t BgL_arg4962z00_1984;
BgL_arg4961z00_1983 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bodyz00); 
{ /* ./SawMill/node2rtl.scm 196 */
obj_t BgL_auxz00_5506;
{ /* ./SawMill/node2rtl.scm 196 */
obj_t BgL_auxz00_5507;
BgL_auxz00_5507 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bindingsz00); 
BgL_auxz00_5506 = 
CAR(BgL_auxz00_5507); } 
BgL_arg4962z00_1984 = 
CDR(BgL_auxz00_5506); } 
{ /* ./SawMill/node2rtl.scm 196 */
BgL_conditionalz00_bglt BgL_obj2334z00_3057;BgL_nodez00_bglt BgL_val2333z00_3058;
BgL_obj2334z00_3057 = 
(BgL_conditionalz00_bglt)(BgL_arg4961z00_1983); 
BgL_val2333z00_3058 = 
(BgL_nodez00_bglt)(BgL_arg4962z00_1984); 
((((BgL_conditionalz00_bglt)CREF(BgL_obj2334z00_3057))->BgL_testz00) = ((BgL_nodez00_bglt)BgL_val2333z00_3058), BUNSPEC); } } 
{ /* ./SawMill/node2rtl.scm 197 */
BgL_nodez00_bglt BgL_arg4970z00_1986;
BgL_arg4970z00_1986 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bodyz00); 
{ /* ./SawMill/node2rtl.scm 197 */
BgL_areaz00_bglt BgL_res5852z00_3086;
{ /* ./SawMill/node2rtl.scm 197 */
obj_t BgL_method3437z00_3061;
{ /* ./SawMill/node2rtl.scm 197 */
BgL_objectz00_bglt BgL_objz00_3062;
BgL_objz00_3062 = 
(BgL_objectz00_bglt)(BgL_arg4970z00_1986); 
{ /* ./SawMill/node2rtl.scm 197 */
long BgL_objzd2classzd2numz00_3063;
BgL_objzd2classzd2numz00_3063 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3062); 
{ /* ./SawMill/node2rtl.scm 197 */
obj_t BgL_arg2017z00_3064;
{ /* ./SawMill/node2rtl.scm 197 */
int BgL_auxz00_5517;
BgL_auxz00_5517 = 
(int)(((long)1)); 
BgL_arg2017z00_3064 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5517); } 
{ /* ./SawMill/node2rtl.scm 197 */
int BgL_offsetz00_3067;
BgL_offsetz00_3067 = 
(int)(BgL_objzd2classzd2numz00_3063); 
{ /* ./SawMill/node2rtl.scm 197 */
long BgL_offsetz00_3068;
{ /* ./SawMill/node2rtl.scm 197 */
long BgL_auxz00_5521;
BgL_auxz00_5521 = 
(long)(BgL_offsetz00_3067); 
BgL_offsetz00_3068 = 
(BgL_auxz00_5521-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 197 */
long BgL_modz00_3069;
{ /* ./SawMill/node2rtl.scm 197 */
int BgL_arg2028z00_3070;
BgL_arg2028z00_3070 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 197 */
long BgL_n2z00_3078;
BgL_n2z00_3078 = 
(long)(BgL_arg2028z00_3070); 
BgL_modz00_3069 = 
(BgL_offsetz00_3068/BgL_n2z00_3078); } } 
{ /* ./SawMill/node2rtl.scm 197 */
long BgL_restz00_3071;
{ /* ./SawMill/node2rtl.scm 197 */
int BgL_arg2024z00_3072;
BgL_arg2024z00_3072 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 197 */
long BgL_n2z00_3081;
BgL_n2z00_3081 = 
(long)(BgL_arg2024z00_3072); 
BgL_restz00_3071 = 
(BgL_offsetz00_3068%BgL_n2z00_3081); } } 
{ /* ./SawMill/node2rtl.scm 197 */

{ /* ./SawMill/node2rtl.scm 197 */
obj_t BgL_bucketz00_3073;
{ /* ./SawMill/node2rtl.scm 197 */
int BgL_kz00_3083;
BgL_kz00_3083 = 
(int)(BgL_modz00_3069); 
BgL_bucketz00_3073 = 
VECTOR_REF(BgL_arg2017z00_3064,BgL_kz00_3083); } 
{ /* ./SawMill/node2rtl.scm 197 */
int BgL_kz00_3085;
BgL_kz00_3085 = 
(int)(BgL_restz00_3071); 
BgL_method3437z00_3061 = 
VECTOR_REF(BgL_bucketz00_3073,BgL_kz00_3085); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 197 */
obj_t BgL_auxz00_5534;
BgL_auxz00_5534 = 
PROCEDURE_ENTRY(BgL_method3437z00_3061)(BgL_method3437z00_3061, 
(obj_t)(BgL_arg4970z00_1986), BEOA); 
BgL_res5852z00_3086 = 
(BgL_areaz00_bglt)(BgL_auxz00_5534); } } 
BgL_auxz00_5454 = BgL_res5852z00_3086; } } }  else 
{ /* ./SawMill/node2rtl.scm 199 */
BgL_areaz00_bglt BgL_arg4974z00_1987;BgL_areaz00_bglt BgL_arg4975z00_1988;
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_arg4978z00_1989;
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_l3303z00_1990;
BgL_l3303z00_1990 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bindingsz00); 
{ /* ./SawMill/node2rtl.scm 199 */
bool_t BgL_test4980z00_1991;
BgL_test4980z00_1991 = 
NULLP(BgL_l3303z00_1990); 
if(BgL_test4980z00_1991)
{ /* ./SawMill/node2rtl.scm 199 */
BgL_arg4978z00_1989 = BNIL; }  else 
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_head3305z00_1992;
BgL_head3305z00_1992 = 
MAKE_PAIR(BNIL, BNIL); 
{ 
obj_t BgL_l3303z00_1993;obj_t BgL_tail3306z00_1994;
BgL_l3303z00_1993 = BgL_l3303z00_1990; 
BgL_tail3306z00_1994 = BgL_head3305z00_1992; 
BgL_map3304z00_1995:
{ /* ./SawMill/node2rtl.scm 199 */
bool_t BgL_test4982z00_1996;
BgL_test4982z00_1996 = 
NULLP(BgL_l3303z00_1993); 
if(BgL_test4982z00_1996)
{ /* ./SawMill/node2rtl.scm 199 */
BgL_arg4978z00_1989 = 
CDR(BgL_head3305z00_1992); }  else 
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_newtail3307z00_1997;
{ /* ./SawMill/node2rtl.scm 199 */
BgL_areaz00_bglt BgL_arg4990z00_1999;
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_bz00_2001;
BgL_bz00_2001 = 
CAR(BgL_l3303z00_1993); 
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_arg4994z00_2002;BgL_rtl_regz00_bglt BgL_arg4995z00_2003;
BgL_arg4994z00_2002 = 
CDR(BgL_bz00_2001); 
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_arg4999z00_2004;
BgL_arg4999z00_2004 = 
CAR(BgL_bz00_2001); 
BgL_arg4995z00_2003 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_arg4999z00_2004)); } 
{ /* ./SawMill/node2rtl.scm 199 */
BgL_areaz00_bglt BgL_res5853z00_3103;
{ /* ./SawMill/node2rtl.scm 199 */
BgL_nodez00_bglt BgL_ez00_3096;
BgL_ez00_3096 = 
(BgL_nodez00_bglt)(BgL_arg4994z00_2002); 
{ /* ./SawMill/node2rtl.scm 199 */
BgL_areaz00_bglt BgL_az00_3098;
BgL_az00_3098 = 
BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(BgL_ez00_3096); 
{ /* ./SawMill/node2rtl.scm 199 */
BgL_blockz00_bglt BgL_arg3672z00_3101;
BgL_arg3672z00_3101 = 
(((BgL_areaz00_bglt)CREF(BgL_az00_3098))->BgL_exitz00); 
BGl_bdestinationz12z12zzsaw_node2rtlz00(BgL_arg3672z00_3101, BgL_arg4995z00_2003); } 
BgL_res5853z00_3103 = BgL_az00_3098; } } 
BgL_arg4990z00_1999 = BgL_res5853z00_3103; } } } 
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_obj1z00_3104;
BgL_obj1z00_3104 = 
(obj_t)(BgL_arg4990z00_1999); 
BgL_newtail3307z00_1997 = 
MAKE_PAIR(BgL_obj1z00_3104, BNIL); } } 
SET_CDR(BgL_tail3306z00_1994, BgL_newtail3307z00_1997); 
{ /* ./SawMill/node2rtl.scm 199 */
obj_t BgL_arg4986z00_1998;
BgL_arg4986z00_1998 = 
CDR(BgL_l3303z00_1993); 
{ 
obj_t BgL_tail3306z00_5560;obj_t BgL_l3303z00_5559;
BgL_l3303z00_5559 = BgL_arg4986z00_1998; 
BgL_tail3306z00_5560 = BgL_newtail3307z00_1997; 
BgL_tail3306z00_1994 = BgL_tail3306z00_5560; 
BgL_l3303z00_1993 = BgL_l3303z00_5559; 
goto BgL_map3304z00_1995;} } } } } } } } 
BgL_arg4974z00_1987 = 
BGl_linkza2za2zzsaw_node2rtlz00(BgL_arg4978z00_1989); } 
{ /* ./SawMill/node2rtl.scm 201 */
BgL_nodez00_bglt BgL_arg5008z00_2005;
BgL_arg5008z00_2005 = 
(((BgL_letzd2varzd2_bglt)CREF(BgL_ez00_1978))->BgL_bodyz00); 
{ /* ./SawMill/node2rtl.scm 201 */
BgL_areaz00_bglt BgL_res5856z00_3136;
{ /* ./SawMill/node2rtl.scm 201 */
obj_t BgL_method3437z00_3111;
{ /* ./SawMill/node2rtl.scm 201 */
BgL_objectz00_bglt BgL_objz00_3112;
BgL_objz00_3112 = 
(BgL_objectz00_bglt)(BgL_arg5008z00_2005); 
{ /* ./SawMill/node2rtl.scm 201 */
long BgL_objzd2classzd2numz00_3113;
BgL_objzd2classzd2numz00_3113 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3112); 
{ /* ./SawMill/node2rtl.scm 201 */
obj_t BgL_arg2017z00_3114;
{ /* ./SawMill/node2rtl.scm 201 */
int BgL_auxz00_5565;
BgL_auxz00_5565 = 
(int)(((long)1)); 
BgL_arg2017z00_3114 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5565); } 
{ /* ./SawMill/node2rtl.scm 201 */
int BgL_offsetz00_3117;
BgL_offsetz00_3117 = 
(int)(BgL_objzd2classzd2numz00_3113); 
{ /* ./SawMill/node2rtl.scm 201 */
long BgL_offsetz00_3118;
{ /* ./SawMill/node2rtl.scm 201 */
long BgL_auxz00_5569;
BgL_auxz00_5569 = 
(long)(BgL_offsetz00_3117); 
BgL_offsetz00_3118 = 
(BgL_auxz00_5569-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 201 */
long BgL_modz00_3119;
{ /* ./SawMill/node2rtl.scm 201 */
int BgL_arg2028z00_3120;
BgL_arg2028z00_3120 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 201 */
long BgL_n2z00_3128;
BgL_n2z00_3128 = 
(long)(BgL_arg2028z00_3120); 
BgL_modz00_3119 = 
(BgL_offsetz00_3118/BgL_n2z00_3128); } } 
{ /* ./SawMill/node2rtl.scm 201 */
long BgL_restz00_3121;
{ /* ./SawMill/node2rtl.scm 201 */
int BgL_arg2024z00_3122;
BgL_arg2024z00_3122 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 201 */
long BgL_n2z00_3131;
BgL_n2z00_3131 = 
(long)(BgL_arg2024z00_3122); 
BgL_restz00_3121 = 
(BgL_offsetz00_3118%BgL_n2z00_3131); } } 
{ /* ./SawMill/node2rtl.scm 201 */

{ /* ./SawMill/node2rtl.scm 201 */
obj_t BgL_bucketz00_3123;
{ /* ./SawMill/node2rtl.scm 201 */
int BgL_kz00_3133;
BgL_kz00_3133 = 
(int)(BgL_modz00_3119); 
BgL_bucketz00_3123 = 
VECTOR_REF(BgL_arg2017z00_3114,BgL_kz00_3133); } 
{ /* ./SawMill/node2rtl.scm 201 */
int BgL_kz00_3135;
BgL_kz00_3135 = 
(int)(BgL_restz00_3121); 
BgL_method3437z00_3111 = 
VECTOR_REF(BgL_bucketz00_3123,BgL_kz00_3135); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 201 */
obj_t BgL_auxz00_5582;
BgL_auxz00_5582 = 
PROCEDURE_ENTRY(BgL_method3437z00_3111)(BgL_method3437z00_3111, 
(obj_t)(BgL_arg5008z00_2005), BEOA); 
BgL_res5856z00_3136 = 
(BgL_areaz00_bglt)(BgL_auxz00_5582); } } 
BgL_arg4975z00_1988 = BgL_res5856z00_3136; } } 
BgL_auxz00_5454 = 
BGl_linkz00zzsaw_node2rtlz00(BgL_arg4974z00_1987, BgL_arg4975z00_1988); } } 
return 
(obj_t)(BgL_auxz00_5454);} } } 
}



/* node->rtl-var3441 */
obj_t BGl_nodezd2ze3rtlzd2var3441ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3845, obj_t BgL_ez00_3846)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 177 */
{ 
BgL_varz00_bglt BgL_ez00_1957;
{ /* ./SawMill/node2rtl.scm 178 */
BgL_areaz00_bglt BgL_auxz00_5590;
BgL_ez00_1957 = 
(BgL_varz00_bglt)(BgL_ez00_3846); 
{ /* ./SawMill/node2rtl.scm 179 */
bool_t BgL_test4912z00_1961;
{ /* ./SawMill/node2rtl.scm 179 */
BgL_variablez00_bglt BgL_arg4950z00_1975;
BgL_arg4950z00_1975 = 
(((BgL_varz00_bglt)CREF(BgL_ez00_1957))->BgL_variablez00); 
{ /* ./SawMill/node2rtl.scm 179 */
obj_t BgL_obj1300z00_3009;
BgL_obj1300z00_3009 = 
(obj_t)(BgL_arg4950z00_1975); 
BgL_test4912z00_1961 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1300z00_3009, BGl_localz00zzast_varz00); } } 
if(BgL_test4912z00_1961)
{ /* ./SawMill/node2rtl.scm 179 */
{ /* ./SawMill/node2rtl.scm 180 */
BgL_rtl_movz00_bglt BgL_arg4914z00_1962;BgL_rtl_regz00_bglt BgL_arg4915z00_1963;
BgL_arg4914z00_1962 = 
BGl_makezd2rtl_movzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 180 */
BgL_variablez00_bglt BgL_arg4921z00_1965;
BgL_arg4921z00_1965 = 
(((BgL_varz00_bglt)CREF(BgL_ez00_1957))->BgL_variablez00); 
BgL_arg4915z00_1963 = 
BGl_localzd2ze3regz31zzsaw_node2rtlz00(
(BgL_localz00_bglt)(BgL_arg4921z00_1965)); } 
{ /* ./SawMill/node2rtl.scm 180 */
obj_t BgL_list4917z00_1964;
{ /* ./SawMill/node2rtl.scm 180 */
obj_t BgL_auxz00_5599;
BgL_auxz00_5599 = 
(obj_t)(BgL_arg4915z00_1963); 
BgL_list4917z00_1964 = 
MAKE_PAIR(BgL_auxz00_5599, BNIL); } 
{ /* ./SawMill/node2rtl.scm 180 */
BgL_rtl_funz00_bglt BgL_funz00_3012;
BgL_funz00_3012 = 
(BgL_rtl_funz00_bglt)(BgL_arg4914z00_1962); 
BgL_auxz00_5590 = 
BGl_singleza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_1957), BgL_funz00_3012, BgL_list4917z00_1964); } } } }  else 
{ /* ./SawMill/node2rtl.scm 181 */
bool_t BgL_test4924z00_1966;
{ /* ./SawMill/node2rtl.scm 181 */
BgL_valuez00_bglt BgL_arg4942z00_1973;
{ /* ./SawMill/node2rtl.scm 181 */
BgL_variablez00_bglt BgL_arg4945z00_1974;
BgL_arg4945z00_1974 = 
(((BgL_varz00_bglt)CREF(BgL_ez00_1957))->BgL_variablez00); 
BgL_arg4942z00_1973 = 
(((BgL_variablez00_bglt)CREF(BgL_arg4945z00_1974))->BgL_valuez00); } 
{ /* ./SawMill/node2rtl.scm 181 */
obj_t BgL_obj1425z00_3016;
BgL_obj1425z00_3016 = 
(obj_t)(BgL_arg4942z00_1973); 
BgL_test4924z00_1966 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1425z00_3016, BGl_sfunz00zzast_varz00); } } 
if(BgL_test4924z00_1966)
{ /* ./SawMill/node2rtl.scm 181 */
{ /* ./SawMill/node2rtl.scm 182 */
BgL_rtl_loadfunz00_bglt BgL_arg4926z00_1967;
{ /* ./SawMill/node2rtl.scm 182 */
BgL_variablez00_bglt BgL_arg4930z00_1969;
BgL_arg4930z00_1969 = 
(((BgL_varz00_bglt)CREF(BgL_ez00_1957))->BgL_variablez00); 
BgL_arg4926z00_1967 = 
BGl_makezd2rtl_loadfunzd2zzsaw_defsz00(
(BgL_globalz00_bglt)(BgL_arg4930z00_1969)); } 
{ /* ./SawMill/node2rtl.scm 182 */
BgL_rtl_funz00_bglt BgL_funz00_3019;
BgL_funz00_3019 = 
(BgL_rtl_funz00_bglt)(BgL_arg4926z00_1967); 
BgL_auxz00_5590 = 
BGl_singleza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_1957), BgL_funz00_3019, BNIL); } } }  else 
{ /* ./SawMill/node2rtl.scm 181 */
{ /* ./SawMill/node2rtl.scm 184 */
BgL_rtl_loadgz00_bglt BgL_arg4934z00_1970;
{ /* ./SawMill/node2rtl.scm 184 */
BgL_variablez00_bglt BgL_arg4938z00_1972;
BgL_arg4938z00_1972 = 
(((BgL_varz00_bglt)CREF(BgL_ez00_1957))->BgL_variablez00); 
BgL_arg4934z00_1970 = 
BGl_makezd2rtl_loadgzd2zzsaw_defsz00(
(BgL_globalz00_bglt)(BgL_arg4938z00_1972)); } 
{ /* ./SawMill/node2rtl.scm 184 */
BgL_rtl_funz00_bglt BgL_funz00_3023;
BgL_funz00_3023 = 
(BgL_rtl_funz00_bglt)(BgL_arg4934z00_1970); 
BgL_auxz00_5590 = 
BGl_singleza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_1957), BgL_funz00_3023, BNIL); } } } } } 
return 
(obj_t)(BgL_auxz00_5590);} } } 
}



/* node->rtl-atom3439 */
obj_t BGl_nodezd2ze3rtlzd2atom3439ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3847, obj_t BgL_ez00_3848)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 173 */
{ 
BgL_atomz00_bglt BgL_ez00_1949;
{ /* ./SawMill/node2rtl.scm 174 */
BgL_areaz00_bglt BgL_auxz00_5624;
BgL_ez00_1949 = 
(BgL_atomz00_bglt)(BgL_ez00_3848); 
{ /* ./SawMill/node2rtl.scm 174 */
BgL_rtl_loadiz00_bglt BgL_arg4900z00_1952;
{ /* ./SawMill/node2rtl.scm 174 */
BgL_atomz00_bglt BgL_arg4904z00_1954;
BgL_arg4904z00_1954 = BgL_ez00_1949; 
BgL_arg4900z00_1952 = 
BGl_makezd2rtl_loadizd2zzsaw_defsz00(BgL_arg4904z00_1954); } 
{ /* ./SawMill/node2rtl.scm 174 */
BgL_rtl_funz00_bglt BgL_funz00_3006;
BgL_funz00_3006 = 
(BgL_rtl_funz00_bglt)(BgL_arg4900z00_1952); 
BgL_auxz00_5624 = 
BGl_singleza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_1949), BgL_funz00_3006, BNIL); } } 
return 
(obj_t)(BgL_auxz00_5624);} } } 
}



/* node->rtl */
BgL_areaz00_bglt BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(BgL_nodez00_bglt BgL_ez00_52)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 170 */
{ /* ./SawMill/node2rtl.scm 170 */
obj_t BgL_method3437z00_3663;
{ /* ./SawMill/node2rtl.scm 170 */
BgL_objectz00_bglt BgL_objz00_3664;
BgL_objz00_3664 = 
(BgL_objectz00_bglt)(BgL_ez00_52); 
{ /* ./SawMill/node2rtl.scm 170 */
long BgL_objzd2classzd2numz00_3665;
BgL_objzd2classzd2numz00_3665 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3664); 
{ /* ./SawMill/node2rtl.scm 170 */
obj_t BgL_arg2017z00_3666;
{ /* ./SawMill/node2rtl.scm 170 */
int BgL_auxz00_5633;
BgL_auxz00_5633 = 
(int)(((long)1)); 
BgL_arg2017z00_3666 = 
PROCEDURE_REF(BGl_nodezd2ze3rtlzd2envze3zzsaw_node2rtlz00, BgL_auxz00_5633); } 
{ /* ./SawMill/node2rtl.scm 170 */
int BgL_offsetz00_3669;
BgL_offsetz00_3669 = 
(int)(BgL_objzd2classzd2numz00_3665); 
{ /* ./SawMill/node2rtl.scm 170 */
long BgL_offsetz00_3670;
{ /* ./SawMill/node2rtl.scm 170 */
long BgL_auxz00_5637;
BgL_auxz00_5637 = 
(long)(BgL_offsetz00_3669); 
BgL_offsetz00_3670 = 
(BgL_auxz00_5637-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 170 */
long BgL_modz00_3671;
{ /* ./SawMill/node2rtl.scm 170 */
int BgL_arg2028z00_3672;
BgL_arg2028z00_3672 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 170 */
long BgL_n2z00_3680;
BgL_n2z00_3680 = 
(long)(BgL_arg2028z00_3672); 
BgL_modz00_3671 = 
(BgL_offsetz00_3670/BgL_n2z00_3680); } } 
{ /* ./SawMill/node2rtl.scm 170 */
long BgL_restz00_3673;
{ /* ./SawMill/node2rtl.scm 170 */
int BgL_arg2024z00_3674;
BgL_arg2024z00_3674 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 170 */
long BgL_n2z00_3683;
BgL_n2z00_3683 = 
(long)(BgL_arg2024z00_3674); 
BgL_restz00_3673 = 
(BgL_offsetz00_3670%BgL_n2z00_3683); } } 
{ /* ./SawMill/node2rtl.scm 170 */

{ /* ./SawMill/node2rtl.scm 170 */
obj_t BgL_bucketz00_3675;
{ /* ./SawMill/node2rtl.scm 170 */
int BgL_kz00_3685;
BgL_kz00_3685 = 
(int)(BgL_modz00_3671); 
BgL_bucketz00_3675 = 
VECTOR_REF(BgL_arg2017z00_3666,BgL_kz00_3685); } 
{ /* ./SawMill/node2rtl.scm 170 */
int BgL_kz00_3687;
BgL_kz00_3687 = 
(int)(BgL_restz00_3673); 
BgL_method3437z00_3663 = 
VECTOR_REF(BgL_bucketz00_3675,BgL_kz00_3687); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 170 */
obj_t BgL_auxz00_5650;
BgL_auxz00_5650 = 
PROCEDURE_ENTRY(BgL_method3437z00_3663)(BgL_method3437z00_3663, 
(obj_t)(BgL_ez00_52), BEOA); 
return 
(BgL_areaz00_bglt)(BgL_auxz00_5650);} } } 
}



/* _node->rtl */
obj_t BGl__nodezd2ze3rtlz31zzsaw_node2rtlz00(obj_t BgL_envz00_3726, obj_t BgL_ez00_3727)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 170 */
{ /* ./SawMill/node2rtl.scm 170 */
BgL_areaz00_bglt BgL_auxz00_5655;
BgL_auxz00_5655 = 
BGl_nodezd2ze3rtlz31zzsaw_node2rtlz00(
(BgL_nodez00_bglt)(BgL_ez00_3727)); 
return 
(obj_t)(BgL_auxz00_5655);} } 
}



/* node->rtl-default3436 */
BgL_areaz00_bglt BGl_nodezd2ze3rtlzd2default3436ze3zzsaw_node2rtlz00(BgL_nodez00_bglt BgL_ez00_53)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
{ /* ./SawMill/node2rtl.scm 1 */
obj_t BgL_procz00_3688;obj_t BgL_objectz00_3690;
BgL_procz00_3688 = 
CNST_TABLE_REF(((long)9)); 
BgL_objectz00_3690 = 
(obj_t)(BgL_ez00_53); 
FAILURE(BgL_procz00_3688,BGl_string6648z00zzsaw_node2rtlz00,BgL_objectz00_3690);} } 
}



/* _node->rtl-default3436 */
obj_t BGl__nodezd2ze3rtlzd2default3436ze3zzsaw_node2rtlz00(obj_t BgL_envz00_3849, obj_t BgL_ez00_3850)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
{ /* ./SawMill/node2rtl.scm 1 */
BgL_areaz00_bglt BgL_auxz00_5662;
BgL_auxz00_5662 = 
BGl_nodezd2ze3rtlzd2default3436ze3zzsaw_node2rtlz00(
(BgL_nodez00_bglt)(BgL_ez00_3850)); 
return 
(obj_t)(BgL_auxz00_5662);} } 
}



/* predicate */
BgL_areaz00_bglt BGl_predicatez00zzsaw_node2rtlz00(BgL_nodez00_bglt BgL_ez00_88, obj_t BgL_joinedz00_89)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 427 */
{ /* ./SawMill/node2rtl.scm 427 */
obj_t BgL_method3493z00_3691;
{ /* ./SawMill/node2rtl.scm 427 */
BgL_objectz00_bglt BgL_objz00_3692;
BgL_objz00_3692 = 
(BgL_objectz00_bglt)(BgL_ez00_88); 
{ /* ./SawMill/node2rtl.scm 427 */
long BgL_objzd2classzd2numz00_3693;
BgL_objzd2classzd2numz00_3693 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_3692); 
{ /* ./SawMill/node2rtl.scm 427 */
obj_t BgL_arg2017z00_3694;
{ /* ./SawMill/node2rtl.scm 427 */
int BgL_auxz00_5668;
BgL_auxz00_5668 = 
(int)(((long)1)); 
BgL_arg2017z00_3694 = 
PROCEDURE_REF(BGl_predicatezd2envzd2zzsaw_node2rtlz00, BgL_auxz00_5668); } 
{ /* ./SawMill/node2rtl.scm 427 */
int BgL_offsetz00_3697;
BgL_offsetz00_3697 = 
(int)(BgL_objzd2classzd2numz00_3693); 
{ /* ./SawMill/node2rtl.scm 427 */
long BgL_offsetz00_3698;
{ /* ./SawMill/node2rtl.scm 427 */
long BgL_auxz00_5672;
BgL_auxz00_5672 = 
(long)(BgL_offsetz00_3697); 
BgL_offsetz00_3698 = 
(BgL_auxz00_5672-OBJECT_TYPE); } 
{ /* ./SawMill/node2rtl.scm 427 */
long BgL_modz00_3699;
{ /* ./SawMill/node2rtl.scm 427 */
int BgL_arg2028z00_3700;
BgL_arg2028z00_3700 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 427 */
long BgL_n2z00_3708;
BgL_n2z00_3708 = 
(long)(BgL_arg2028z00_3700); 
BgL_modz00_3699 = 
(BgL_offsetz00_3698/BgL_n2z00_3708); } } 
{ /* ./SawMill/node2rtl.scm 427 */
long BgL_restz00_3701;
{ /* ./SawMill/node2rtl.scm 427 */
int BgL_arg2024z00_3702;
BgL_arg2024z00_3702 = 
(int)(((long)8)); 
{ /* ./SawMill/node2rtl.scm 427 */
long BgL_n2z00_3711;
BgL_n2z00_3711 = 
(long)(BgL_arg2024z00_3702); 
BgL_restz00_3701 = 
(BgL_offsetz00_3698%BgL_n2z00_3711); } } 
{ /* ./SawMill/node2rtl.scm 427 */

{ /* ./SawMill/node2rtl.scm 427 */
obj_t BgL_bucketz00_3703;
{ /* ./SawMill/node2rtl.scm 427 */
int BgL_kz00_3713;
BgL_kz00_3713 = 
(int)(BgL_modz00_3699); 
BgL_bucketz00_3703 = 
VECTOR_REF(BgL_arg2017z00_3694,BgL_kz00_3713); } 
{ /* ./SawMill/node2rtl.scm 427 */
int BgL_kz00_3715;
BgL_kz00_3715 = 
(int)(BgL_restz00_3701); 
BgL_method3493z00_3691 = 
VECTOR_REF(BgL_bucketz00_3703,BgL_kz00_3715); } } } } } } } } } } 
{ /* ./SawMill/node2rtl.scm 427 */
obj_t BgL_auxz00_5685;
BgL_auxz00_5685 = 
PROCEDURE_ENTRY(BgL_method3493z00_3691)(BgL_method3493z00_3691, 
(obj_t)(BgL_ez00_88), BgL_joinedz00_89, BEOA); 
return 
(BgL_areaz00_bglt)(BgL_auxz00_5685);} } } 
}



/* _predicate */
obj_t BGl__predicatez00zzsaw_node2rtlz00(obj_t BgL_envz00_3743, obj_t BgL_ez00_3744, obj_t BgL_joinedz00_3745)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 427 */
{ /* ./SawMill/node2rtl.scm 427 */
BgL_areaz00_bglt BgL_auxz00_5690;
BgL_auxz00_5690 = 
BGl_predicatez00zzsaw_node2rtlz00(
(BgL_nodez00_bglt)(BgL_ez00_3744), BgL_joinedz00_3745); 
return 
(obj_t)(BgL_auxz00_5690);} } 
}



/* predicate-default3492 */
BgL_areaz00_bglt BGl_predicatezd2default3492zd2zzsaw_node2rtlz00(BgL_nodez00_bglt BgL_ez00_90, obj_t BgL_joinedz00_91)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
{ /* ./SawMill/node2rtl.scm 428 */
BgL_areaz00_bglt BgL_arg5795z00_3716;
{ /* ./SawMill/node2rtl.scm 428 */
BgL_rtl_ifz00_bglt BgL_arg5798z00_3717;
BgL_arg5798z00_3717 = 
BGl_makezd2rtl_ifzd2zzsaw_defsz00(); 
{ /* ./SawMill/node2rtl.scm 428 */
obj_t BgL_list5800z00_3718;
{ /* ./SawMill/node2rtl.scm 428 */
obj_t BgL_auxz00_5695;
BgL_auxz00_5695 = 
(obj_t)(BgL_ez00_90); 
BgL_list5800z00_3718 = 
MAKE_PAIR(BgL_auxz00_5695, BNIL); } 
{ /* ./SawMill/node2rtl.scm 428 */
BgL_rtl_funz00_bglt BgL_funz00_3720;
BgL_funz00_3720 = 
(BgL_rtl_funz00_bglt)(BgL_arg5798z00_3717); 
BgL_arg5795z00_3716 = 
BGl_callza2za2zzsaw_node2rtlz00(
(obj_t)(BgL_ez00_90), BgL_funz00_3720, BgL_list5800z00_3718); } } } 
return 
BGl_forkz00zzsaw_node2rtlz00(BgL_arg5795z00_3716, BgL_joinedz00_91);} } 
}



/* _predicate-default3492 */
obj_t BGl__predicatezd2default3492zd2zzsaw_node2rtlz00(obj_t BgL_envz00_3851, obj_t BgL_ez00_3852, obj_t BgL_joinedz00_3853)
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
{ /* ./SawMill/node2rtl.scm 428 */
BgL_areaz00_bglt BgL_auxz00_5702;
BgL_auxz00_5702 = 
BGl_predicatezd2default3492zd2zzsaw_node2rtlz00(
(BgL_nodez00_bglt)(BgL_ez00_3852), BgL_joinedz00_3853); 
return 
(obj_t)(BgL_auxz00_5702);} } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzsaw_node2rtlz00()
{ AN_OBJECT;
{ /* ./SawMill/node2rtl.scm 1 */
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zztype_typeofz00(((long)852), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zzast_nodez00(((long)50868), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zzast_envz00(((long)62031), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zztype_envz00(((long)25186), "saw_node2rtl"); 
BGl_modulezd2initializa7ationz75zztools_shapez00(((long)30833), "saw_node2rtl"); 
return 
BGl_modulezd2initializa7ationz75zzsaw_defsz00(((long)12736), "saw_node2rtl");} 
}

