/*===========================================================================*/
/*   (SawBbv/bbv.scm)                                                        */
/*   Bigloo (4.5b)                                                           */
/*   Inria -- Sophia Antipolis (c)       Fri Dec 22 05:17:06 PM CET 2023     */
/*===========================================================================*/
/* COMPILATION: (/home/serrano/prgm/project/bigloo/bigloo/bin/bigloo -ldopt -L/home/serrano/prgm/project/bigloo/bigloo/libbacktrace/home/serrano/prgm/project/bigloo/bigloo/lib/bigloo/4.5b  -q -afile .afile -fsharing -fno-reflection -cc gcc -lib-dir /home/serrano/prgm/project/bigloo/bigloo/lib/bigloo/4.5b -unsafev -gno-error-localization -no-hello -O2 -rm -unsafe -s -stdc -indent SawBbv/bbv.scm) */
/* GC selection */
#define THE_GC BOEHM_GC

/* unsafe mode */
#define BIGLOO_UNSAFE 1

/* traces mode */
#define BIGLOO_TRACE 0

/* standard Bigloo include */
#include <bigloo.h>

#ifdef __cplusplus
extern "C"
{
#endif
#ifndef BGL_MODULE_TYPE_DEFINITIONS
#define BGL_MODULE_TYPE_DEFINITIONS
#ifndef BGL_SAW_BBV_TYPE_DEFINITIONS
#define BGL_SAW_BBV_TYPE_DEFINITIONS

/* object type definitions */
	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;
		long BgL_occurrencewz00;
		bool_t BgL_userzf3zf3;
	}                  *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;
		long BgL_occurrencewz00;
		bool_t BgL_userzf3zf3;
		obj_t BgL_modulez00;
		obj_t BgL_importz00;
		bool_t BgL_evaluablezf3zf3;
		bool_t BgL_evalzf3zf3;
		obj_t BgL_libraryz00;
		obj_t BgL_pragmaz00;
		obj_t BgL_srcz00;
		obj_t BgL_jvmzd2typezd2namez00;
		obj_t BgL_initz00;
		obj_t BgL_aliasz00;
	}                *BgL_globalz00_bglt;

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

	typedef struct BgL_backendz00_bgl
	{
		header_t header;
		obj_t widening;
		obj_t BgL_languagez00;
		obj_t BgL_srfi0z00;
		obj_t BgL_namez00;
		obj_t BgL_externzd2variableszd2;
		obj_t BgL_externzd2functionszd2;
		obj_t BgL_externzd2typeszd2;
		obj_t BgL_variablesz00;
		obj_t BgL_functionsz00;
		obj_t BgL_typesz00;
		bool_t BgL_typedz00;
		obj_t BgL_heapzd2suffixzd2;
		obj_t BgL_heapzd2compatiblezd2;
		bool_t BgL_callccz00;
		bool_t BgL_qualifiedzd2typeszd2;
		bool_t BgL_effectzb2zb2;
		bool_t BgL_removezd2emptyzd2letz00;
		bool_t BgL_foreignzd2closurezd2;
		bool_t BgL_typedzd2eqzd2;
		bool_t BgL_tracezd2supportzd2;
		obj_t BgL_foreignzd2clausezd2supportz00;
		obj_t BgL_debugzd2supportzd2;
		bool_t BgL_pragmazd2supportzd2;
		bool_t BgL_tvectorzd2descrzd2supportz00;
		bool_t BgL_requirezd2tailczd2;
		obj_t BgL_registersz00;
		obj_t BgL_pregistersz00;
		bool_t BgL_boundzd2checkzd2;
		bool_t BgL_typezd2checkzd2;
		bool_t BgL_typedzd2funcallzd2;
	}                 *BgL_backendz00_bglt;

	typedef struct BgL_rtl_regz00_bgl
	{
		header_t header;
		obj_t widening;
		struct BgL_typez00_bgl *BgL_typez00;
		obj_t BgL_varz00;
		obj_t BgL_onexprzf3zf3;
		obj_t BgL_namez00;
		obj_t BgL_keyz00;
		obj_t BgL_debugnamez00;
		obj_t BgL_hardwarez00;
	}                 *BgL_rtl_regz00_bglt;

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

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

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

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

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

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

	typedef struct BgL_rtl_insz00_bgl
	{
		header_t header;
		obj_t widening;
		obj_t BgL_locz00;
		obj_t BgL_z52spillz52;
		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_rtl_regzf2razf2_bgl
	{
		int BgL_numz00;
		obj_t BgL_colorz00;
		obj_t BgL_coalescez00;
		int BgL_occurrencesz00;
		obj_t BgL_interferez00;
		obj_t BgL_interfere2z00;
	}                      *BgL_rtl_regzf2razf2_bglt;

	typedef struct BgL_regsetz00_bgl
	{
		header_t header;
		obj_t widening;
		int BgL_lengthz00;
		int BgL_msiza7eza7;
		obj_t BgL_regvz00;
		obj_t BgL_reglz00;
		obj_t BgL_stringz00;
	}                *BgL_regsetz00_bglt;

	typedef struct BgL_blockvz00_bgl
	{
		obj_t BgL_versionsz00;
		obj_t BgL_genericz00;
		long BgL_z52markz52;
		obj_t BgL_mergez00;
	}                *BgL_blockvz00_bglt;

	typedef struct BgL_blocksz00_bgl
	{
		long BgL_z52markz52;
		obj_t BgL_z52hashz52;
		obj_t BgL_z52blacklistz52;
		obj_t BgL_z52mergezd2infoz80;
		struct BgL_bbvzd2ctxzd2_bgl *BgL_ctxz00;
		struct BgL_blockz00_bgl *BgL_parentz00;
		long BgL_cntz00;
		obj_t BgL_mblockz00;
		bool_t BgL_collapsedz00;
	}                *BgL_blocksz00_bglt;

	typedef struct BgL_bbvzd2ctxzd2_bgl
	{
		header_t header;
		obj_t widening;
		long BgL_idz00;
		obj_t BgL_entriesz00;
	}                   *BgL_bbvzd2ctxzd2_bglt;


#endif													// BGL_SAW_BBV_TYPE_DEFINITIONS
#endif													// BGL_MODULE_TYPE_DEFINITIONS

	static obj_t BGl_z62rtl_regzf2razd2occurrenceszd2setz12z82zzsaw_bbvz00(obj_t,
		obj_t, obj_t);
	extern obj_t BGl_rtl_insz00zzsaw_defsz00;
	static obj_t BGl_z62rtl_regzf2razd2onexprzf3zb1zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2varzd2setz12z82zzsaw_bbvz00(obj_t, obj_t,
		obj_t);
	BGL_IMPORT obj_t BGl_classzd2nilzd2initz12z12zz__objectz00(obj_t);
	extern obj_t BGl_rtl_pragmaz00zzsaw_defsz00;
	static BgL_rtl_insz00_bglt
		BGl_removezd2inszd2tempsz12ze70zf5zzsaw_bbvz00(BgL_rtl_insz00_bglt);
	static obj_t BGl_requirezd2initializa7ationz75zzsaw_bbvz00 = BUNSPEC;
	extern obj_t BGl_za2bbvzd2logza2zd2zzsaw_bbvzd2configzd2;
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2coalescez20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2keyz20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	extern bool_t
		BGl_rtl_inszd2ifeqzf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	extern obj_t BGl_za2maxzd2blockzd2mergezd2versionsza2zd2zzsaw_bbvzd2configzd2;
	static obj_t BGl_normaliza7ezd2gotoz12z67zzsaw_bbvz00(BgL_blockz00_bglt);
	BGL_IMPORT obj_t BGl_za2classesza2z00zz__objectz00;
	static obj_t BGl_z62regsetzd2stringzd2setz12z70zzsaw_bbvz00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL BgL_regsetz00_bglt BGl_makezd2regsetzd2zzsaw_bbvz00(int,
		int, obj_t, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2coalescezd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL BgL_rtl_regz00_bglt
		BGl_makezd2rtl_regzf2raz20zzsaw_bbvz00(BgL_typez00_bglt, obj_t, obj_t,
		obj_t, obj_t, obj_t, int, obj_t, obj_t, int, obj_t, obj_t);
	static BgL_rtl_regz00_bglt BGl_z62makezd2rtl_regzf2raz42zzsaw_bbvz00(obj_t,
		obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t,
		obj_t);
	extern bool_t
		BGl_rtl_inszd2callzf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	static obj_t BGl_toplevelzd2initzd2zzsaw_bbvz00(void);
	BGL_EXPORTED_DECL int
		BGl_rtl_regzf2razd2occurrencesz20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	static obj_t BGl_z62regsetzd2lengthzb0zzsaw_bbvz00(obj_t, obj_t);
	static bool_t BGl_reorderzd2succsz12zc0zzsaw_bbvz00(obj_t);
	static obj_t BGl_z62regsetzd2reglzb0zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_z62regsetzd2regvzb0zzsaw_bbvz00(obj_t, obj_t);
	extern obj_t
		BGl_rtl_inszd2switchzf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	BGL_IMPORT obj_t bgl_reverse(obj_t);
	static obj_t BGl_genericzd2initzd2zzsaw_bbvz00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2namez20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	static obj_t BGl_z62rtl_regzf2razd2namez42zzsaw_bbvz00(obj_t, obj_t);
	static BgL_rtl_regz00_bglt BGl_z62rtl_regzf2razd2nilz42zzsaw_bbvz00(obj_t);
	extern obj_t
		BGl_simplifyzd2branchz12zc0zzsaw_bbvzd2optimzd2(BgL_blockz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2interfere2z20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	extern obj_t BGl_removezd2gotoz12zc0zzsaw_bbvzd2optimzd2(BgL_blockz00_bglt);
	static obj_t BGl_objectzd2initzd2zzsaw_bbvz00(void);
	BGL_EXPORTED_DECL obj_t BGl_bbvz00zzsaw_bbvz00(BgL_backendz00_bglt,
		BgL_globalz00_bglt, obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2hardwarez20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	BGL_IMPORT obj_t BGl_memqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
	extern obj_t BGl_shapez00zztools_shapez00(obj_t);
	BGL_IMPORT obj_t BGl_za2inheritancesza2z00zz__objectz00;
	static obj_t BGl_failz12z12zzsaw_bbvz00(BgL_blockz00_bglt);
	BGL_IMPORT obj_t bgl_reverse_bang(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2varzd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt, obj_t);
	extern bool_t
		BGl_rtl_inszd2ifnezf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	extern obj_t BGl_regsetz00zzsaw_regsetz00;
	extern obj_t BGl_rtl_regz00zzsaw_defsz00;
	static obj_t BGl_z62regsetzf3z91zzsaw_bbvz00(obj_t, obj_t);
	extern bool_t
		BGl_rtl_inszd2errorzf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t, obj_t);
	extern obj_t BGl_za2bbvzd2debugza2zd2zzsaw_bbvzd2configzd2;
	extern bool_t
		BGl_rtl_inszd2failzf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	extern obj_t
		BGl_assertzd2contextz12zc0zzsaw_bbvzd2debugzd2(BgL_blockz00_bglt);
	extern obj_t BGl_assertzd2blockzd2zzsaw_bbvzd2debugzd2(BgL_blockz00_bglt,
		obj_t);
	extern obj_t
		BGl_rtl_callzd2predicatezd2zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	BGL_IMPORT obj_t BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2interfere2z42zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_appendzd221011zd2zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza31799ze3ze5zzsaw_bbvz00(obj_t);
	extern obj_t BGl_rtl_nopz00zzsaw_defsz00;
	extern obj_t BGl_coalescez12z12zzsaw_bbvzd2optimzd2(obj_t, BgL_blockz00_bglt);
	static obj_t BGl_methodzd2initzd2zzsaw_bbvz00(void);
	static obj_t BGl_bbsetzd2conszd2zzsaw_bbvz00(BgL_blockz00_bglt, obj_t);
	extern obj_t
		BGl_bbvzd2livenessz12zc0zzsaw_bbvzd2livenesszd2(BgL_backendz00_bglt, obj_t,
		obj_t);
	static obj_t BGl_z62rtl_regzf2razd2onexprzf3zd2setz12z71zzsaw_bbvz00(obj_t,
		obj_t, obj_t);
	static BgL_regsetz00_bglt BGl_z62makezd2regsetzb0zzsaw_bbvz00(obj_t, obj_t,
		obj_t, obj_t, obj_t, obj_t);
	extern obj_t BGl_rtl_inszd2argsza2z70zzsaw_defsz00(BgL_rtl_insz00_bglt);
	BGL_EXPORTED_DECL BgL_typez00_bglt
		BGl_rtl_regzf2razd2typez20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	BGL_EXPORTED_DECL BgL_rtl_regz00_bglt
		BGl_rtl_regzf2razd2nilz20zzsaw_bbvz00(void);
	static BgL_typez00_bglt BGl_z62rtl_regzf2razd2typez42zzsaw_bbvz00(obj_t,
		obj_t);
	extern obj_t BGl_rtl_goz00zzsaw_defsz00;
	extern obj_t BGl_rtl_ifnez00zzsaw_defsz00;
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2onexprzf3zd3zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	extern bool_t BGl_rtl_inszd2gozf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	static obj_t BGl_z62rtl_regzf2razd2varz42zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_z62regsetzd2stringzb0zzsaw_bbvz00(obj_t, obj_t);
	BGL_EXPORTED_DECL int BGl_regsetzd2msiza7ez75zzsaw_bbvz00(BgL_regsetz00_bglt);
	static obj_t BGl_z62rtl_regzf2razd2occurrencesz42zzsaw_bbvz00(obj_t, obj_t);
	extern obj_t BGl_za2compilerzd2debugza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_errorz00zz__errorz00(obj_t, obj_t, obj_t);
	static BgL_blockz00_bglt BGl_gcz12z12zzsaw_bbvz00(BgL_blockz00_bglt);
	extern obj_t BGl_za2tracezd2levelza2zd2zzengine_paramz00;
	static obj_t BGl_z62regsetzd2lengthzd2setz12z70zzsaw_bbvz00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL int BGl_regsetzd2lengthzd2zzsaw_bbvz00(BgL_regsetz00_bglt);
	extern obj_t BGl_za2sawzd2bbvzf3za2z21zzengine_paramz00;
	BGL_EXPORTED_DECL obj_t
		BGl_regsetzd2stringzd2setz12z12zzsaw_bbvz00(BgL_regsetz00_bglt, obj_t);
	extern obj_t BGl_za2sawzd2bbvzd2functionsza2z00zzengine_paramz00;
	BGL_IMPORT obj_t bgl_remq_bang(obj_t, obj_t);
	extern obj_t BGl_getzd2bbzd2markz00zzsaw_bbvzd2typeszd2(void);
	static obj_t BGl_z62rtl_regzf2razd2numz42zzsaw_bbvz00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2debugzd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2optimzd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2livenesszd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2mergezd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2utilszd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2cachezd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2specializa7ez75(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2typeszd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvzd2configzd2(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_regutilsz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_regsetz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_defsz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzsaw_libz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzbackend_backendz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztools_speekz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztype_cachez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztools_tracez00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_vectors_6_8z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(long,
		char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_fixnumz00(long, char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__structurez00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__bexitz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__errorz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__biglooz00(long, char *);
	static obj_t BGl_normaliza7ezd2ifeqz12z67zzsaw_bbvz00(BgL_blockz00_bglt);
	static obj_t BGl_markzd2mergez12zc0zzsaw_bbvz00(BgL_blockz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2colorz20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2varz20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	extern obj_t BGl_logzd2blockszd2zzsaw_bbvzd2debugzd2(BgL_globalz00_bglt,
		obj_t, obj_t);
	BGL_EXPORTED_DECL bool_t BGl_rtl_regzf2razf3z01zzsaw_bbvz00(obj_t);
	BGL_IMPORT obj_t BGl_tprintz00zz__r4_output_6_10_3z00(obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2interferezd2setz12z82zzsaw_bbvz00(obj_t,
		obj_t, obj_t);
	BGL_IMPORT obj_t create_struct(obj_t, int);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2colorzd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt,
		obj_t);
	static obj_t BGl_cnstzd2initzd2zzsaw_bbvz00(void);
	static obj_t BGl_libraryzd2moduleszd2initz00zzsaw_bbvz00(void);
	extern BgL_bbvzd2ctxzd2_bglt
		BGl_paramszd2ze3ctxz31zzsaw_bbvzd2typeszd2(obj_t);
	BGL_IMPORT long bgl_list_length(obj_t);
	static obj_t BGl_importedzd2moduleszd2initz00zzsaw_bbvz00(void);
	extern obj_t BGl_setzd2maxzd2labelz12z12zzsaw_bbvzd2utilszd2(obj_t);
	static obj_t BGl_gczd2rootszd2initz00zzsaw_bbvz00(void);
	extern obj_t BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_bglt, obj_t,
		obj_t, obj_t);
	static obj_t BGl_normaliza7ezd2movz12z67zzsaw_bbvz00(BgL_blockz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2occurrenceszd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt,
		int);
	static obj_t BGl_makezd2emptyzd2bbsetz00zzsaw_bbvz00(void);
	BGL_EXPORTED_DECL int
		BGl_rtl_regzf2razd2numz20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	extern BgL_blockz00_bglt
		BGl_bbvzd2blockza2z70zzsaw_bbvzd2specializa7ez75(BgL_blockz00_bglt,
		BgL_bbvzd2ctxzd2_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2interferezd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL bool_t BGl_regsetzf3zf3zzsaw_bbvz00(obj_t);
	extern obj_t BGl_za2bbvzd2blockszd2cleanupza2z00zzsaw_bbvzd2configzd2;
	extern obj_t BGl_startzd2bbvzd2cachez12z12zzsaw_bbvzd2cachezd2(void);
	static obj_t BGl_z62rtl_regzf2razd2colorzd2setz12z82zzsaw_bbvz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_z62rtl_regzf2razd2coalescezd2setz12z82zzsaw_bbvz00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2colorz42zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2coalescez42zzsaw_bbvz00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_regsetzd2stringzd2zzsaw_bbvz00(BgL_regsetz00_bglt);
	static obj_t BGl_normaliza7ezd2typecheckz12z67zzsaw_bbvz00(BgL_blockz00_bglt);
	static obj_t BGl_z62rtl_regzf2razd2typezd2setz12z82zzsaw_bbvz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_removezd2innerzd2movz12ze70zf5zzsaw_bbvz00(obj_t);
	extern obj_t BGl_removezd2nopz12zc0zzsaw_bbvzd2optimzd2(BgL_blockz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2interfere2zd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2onexprzf3zd2setz12z13zzsaw_bbvz00(BgL_rtl_regz00_bglt,
		obj_t);
	BGL_EXPORTED_DECL BgL_regsetz00_bglt BGl_regsetzd2nilzd2zzsaw_bbvz00(void);
	static BgL_blockz00_bglt
		BGl_removezd2tempsz12zc0zzsaw_bbvz00(BgL_blockz00_bglt);
	static obj_t BGl_loopze70ze7zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2interferez42zzsaw_bbvz00(obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2keyz42zzsaw_bbvz00(obj_t, obj_t);
	extern obj_t BGl_rtl_regzf2razf2zzsaw_regsetz00;
	BGL_IMPORT obj_t BGl_classzd2superzd2zz__objectz00(obj_t);
	static obj_t BGl_z62rtl_regzf2razf3z63zzsaw_bbvz00(obj_t, obj_t);
	extern bool_t
		BGl_rtl_inszd2movzf3z21zzsaw_bbvzd2typeszd2(BgL_rtl_insz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2typezd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt,
		BgL_typez00_bglt);
	BGL_EXPORTED_DECL obj_t BGl_regsetzd2reglzd2zzsaw_bbvz00(BgL_regsetz00_bglt);
	static obj_t BGl_z62regsetzd2msiza7ez17zzsaw_bbvz00(obj_t, obj_t);
	extern obj_t BGl_blockzd2ze3blockzd2listze3zzsaw_bbvzd2utilszd2(obj_t,
		BgL_blockz00_bglt);
	BGL_EXPORTED_DECL obj_t BGl_regsetzd2regvzd2zzsaw_bbvz00(BgL_regsetz00_bglt);
	BGL_IMPORT obj_t BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00(obj_t);
	static obj_t BGl_z62rtl_regzf2razd2interfere2zd2setz12z82zzsaw_bbvz00(obj_t,
		obj_t, obj_t);
	static BgL_regsetz00_bglt BGl_z62regsetzd2nilzb0zzsaw_bbvz00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_rtl_regzf2razd2interferez20zzsaw_bbvz00(BgL_rtl_regz00_bglt);
	BGL_EXPORTED_DECL obj_t
		BGl_regsetzd2lengthzd2setz12z12zzsaw_bbvz00(BgL_regsetz00_bglt, int);
	extern obj_t BGl_verbosez00zztools_speekz00(obj_t, obj_t);
	static bool_t BGl_sidezd2effectzd2freezf3ze70z14zzsaw_bbvz00(obj_t);
	static obj_t BGl_z62bbvz62zzsaw_bbvz00(obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62rtl_regzf2razd2hardwarez42zzsaw_bbvz00(obj_t, obj_t);
	static obj_t __cnst[1];


	   
		 
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razd2namezd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72365za7,
		BGl_z62rtl_regzf2razd2namez42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_regsetzd2nilzd2envz00zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2nilza72366za7, BGl_z62regsetzd2nilzb0zzsaw_bbvz00,
		0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2typezd2setz12zd2envz32zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72367za7,
		BGl_z62rtl_regzf2razd2typezd2setz12z82zzsaw_bbvz00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2interferezd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72368za7,
		BGl_z62rtl_regzf2razd2interferez42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_STRING(BGl_string2339z00zzsaw_bbvz00,
		BgL_bgl_string2339za700za7za7s2369za7, "=== ", 4);
	      DEFINE_STRING(BGl_string2340z00zzsaw_bbvz00,
		BgL_bgl_string2340za700za7za7s2370za7, ":", 1);
	      DEFINE_STRING(BGl_string2341z00zzsaw_bbvz00,
		BgL_bgl_string2341za700za7za7s2371za7, ",", 1);
	      DEFINE_STRING(BGl_string2342z00zzsaw_bbvz00,
		BgL_bgl_string2342za700za7za7s2372za7, "SawBbv/bbv.scm", 14);
	      DEFINE_STRING(BGl_string2343z00zzsaw_bbvz00,
		BgL_bgl_string2343za700za7za7s2373za7, "        bbv ", 12);
	      DEFINE_STRING(BGl_string2344z00zzsaw_bbvz00,
		BgL_bgl_string2344za700za7za7s2374za7, ".plain.cfg", 10);
	      DEFINE_STRING(BGl_string2345z00zzsaw_bbvz00,
		BgL_bgl_string2345za700za7za7s2375za7, ".reorder.cfg", 12);
	      DEFINE_STRING(BGl_string2346z00zzsaw_bbvz00,
		BgL_bgl_string2346za700za7za7s2376za7, ".failure.cfg", 12);
	      DEFINE_STRING(BGl_string2347z00zzsaw_bbvz00,
		BgL_bgl_string2347za700za7za7s2377za7, ".typecheck.cfg", 14);
	      DEFINE_STRING(BGl_string2348z00zzsaw_bbvz00,
		BgL_bgl_string2348za700za7za7s2378za7, ".goto.cfg", 9);
	      DEFINE_STRING(BGl_string2349z00zzsaw_bbvz00,
		BgL_bgl_string2349za700za7za7s2379za7, ".ifeq.cfg", 9);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2onexprzf3zd2setz12zd2envzc1zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72380za7,
		BGl_z62rtl_regzf2razd2onexprzf3zd2setz12z71zzsaw_bbvz00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2occurrenceszd2setz12zd2envz32zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72381za7,
		BGl_z62rtl_regzf2razd2occurrenceszd2setz12z82zzsaw_bbvz00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razd2colorzd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72382za7,
		BGl_z62rtl_regzf2razd2colorz42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_STRING(BGl_string2350z00zzsaw_bbvz00,
		BgL_bgl_string2350za700za7za7s2383za7, ".mov.cfg", 8);
	      DEFINE_STRING(BGl_string2351z00zzsaw_bbvz00,
		BgL_bgl_string2351za700za7za7s2384za7, ".liveness.cfg", 13);
	      DEFINE_STRING(BGl_string2352z00zzsaw_bbvz00,
		BgL_bgl_string2352za700za7za7s2385za7, ".specialize.cfg", 15);
	      DEFINE_STRING(BGl_string2353z00zzsaw_bbvz00,
		BgL_bgl_string2353za700za7za7s2386za7, " -> ", 4);
	      DEFINE_STRING(BGl_string2354z00zzsaw_bbvz00,
		BgL_bgl_string2354za700za7za7s2387za7, " ", 1);
	      DEFINE_STRING(BGl_string2355z00zzsaw_bbvz00,
		BgL_bgl_string2355za700za7za7s2388za7, "\n", 1);
	      DEFINE_STRING(BGl_string2356z00zzsaw_bbvz00,
		BgL_bgl_string2356za700za7za7s2389za7, ".bbv.cfg", 8);
	      DEFINE_STRING(BGl_string2357z00zzsaw_bbvz00,
		BgL_bgl_string2357za700za7za7s2390za7, "gc!", 3);
	      DEFINE_STRING(BGl_string2358z00zzsaw_bbvz00,
		BgL_bgl_string2358za700za7za7s2391za7, "normalize-ifeq!", 15);
	      DEFINE_STRING(BGl_string2359z00zzsaw_bbvz00,
		BgL_bgl_string2359za700za7za7s2392za7, "bad block (no instruction)", 26);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2interferezd2setz12zd2envz32zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72393za7,
		BGl_z62rtl_regzf2razd2interferezd2setz12z82zzsaw_bbvz00, 0L, BUNSPEC, 2);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_regsetzd2regvzd2envz00zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2regv2394z00, BGl_z62regsetzd2regvzb0zzsaw_bbvz00,
		0L, BUNSPEC, 1);
	      DEFINE_STRING(BGl_string2360z00zzsaw_bbvz00,
		BgL_bgl_string2360za700za7za7s2395za7, "bad block", 9);
	      DEFINE_STRING(BGl_string2361z00zzsaw_bbvz00,
		BgL_bgl_string2361za700za7za7s2396za7, "exit(0)", 7);
	      DEFINE_STRING(BGl_string2362z00zzsaw_bbvz00,
		BgL_bgl_string2362za700za7za7s2397za7, "saw_bbv", 7);
	      DEFINE_STRING(BGl_string2363z00zzsaw_bbvz00,
		BgL_bgl_string2363za700za7za7s2398za7, "bbset ", 6);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_regsetzd2lengthzd2setz12zd2envzc0zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2leng2399z00,
		BGl_z62regsetzd2lengthzd2setz12z70zzsaw_bbvz00, 0L, BUNSPEC, 2);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_regsetzd2msiza7ezd2envza7zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2msiza72400za7,
		BGl_z62regsetzd2msiza7ez17zzsaw_bbvz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razd2typezd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72401za7,
		BGl_z62rtl_regzf2razd2typez42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2varzd2setz12zd2envz32zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72402za7,
		BGl_z62rtl_regzf2razd2varzd2setz12z82zzsaw_bbvz00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2occurrenceszd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72403za7,
		BGl_z62rtl_regzf2razd2occurrencesz42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_bbvzd2envzd2zzsaw_bbvz00,
		BgL_bgl_za762bbvza762za7za7saw_b2404z00, BGl_z62bbvz62zzsaw_bbvz00, 0L,
		BUNSPEC, 4);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razd2nilzd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72405za7,
		BGl_z62rtl_regzf2razd2nilz42zzsaw_bbvz00, 0L, BUNSPEC, 0);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razd2varzd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72406za7,
		BGl_z62rtl_regzf2razd2varz42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razd2numzd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72407za7,
		BGl_z62rtl_regzf2razd2numz42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_regsetzd2stringzd2setz12zd2envzc0zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2stri2408z00,
		BGl_z62regsetzd2stringzd2setz12z70zzsaw_bbvz00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2colorzd2setz12zd2envz32zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72409za7,
		BGl_z62rtl_regzf2razd2colorzd2setz12z82zzsaw_bbvz00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2onexprzf3zd2envz01zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72410za7,
		BGl_z62rtl_regzf2razd2onexprzf3zb1zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_regsetzd2stringzd2envz00zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2stri2411z00, BGl_z62regsetzd2stringzb0zzsaw_bbvz00,
		0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2interfere2zd2setz12zd2envz32zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72412za7,
		BGl_z62rtl_regzf2razd2interfere2zd2setz12z82zzsaw_bbvz00, 0L, BUNSPEC, 2);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_makezd2rtl_regzf2razd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762makeza7d2rtl_re2413z00,
		BGl_z62makezd2rtl_regzf2raz42zzsaw_bbvz00, 0L, BUNSPEC, 12);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razf3zd2envzd3zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72414za7,
		BGl_z62rtl_regzf2razf3z63zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_regsetzd2lengthzd2envz00zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2leng2415z00, BGl_z62regsetzd2lengthzb0zzsaw_bbvz00,
		0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2coalescezd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72416za7,
		BGl_z62rtl_regzf2razd2coalescez42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2interfere2zd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72417za7,
		BGl_z62rtl_regzf2razd2interfere2z42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2hardwarezd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72418za7,
		BGl_z62rtl_regzf2razd2hardwarez42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_makezd2regsetzd2envz00zzsaw_bbvz00,
		BgL_bgl_za762makeza7d2regset2419z00, BGl_z62makezd2regsetzb0zzsaw_bbvz00,
		0L, BUNSPEC, 5);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_regsetzf3zd2envz21zzsaw_bbvz00,
		BgL_bgl_za762regsetza7f3za791za72420z00, BGl_z62regsetzf3z91zzsaw_bbvz00,
		0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_rtl_regzf2razd2keyzd2envzf2zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72421za7,
		BGl_z62rtl_regzf2razd2keyz42zzsaw_bbvz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_rtl_regzf2razd2coalescezd2setz12zd2envz32zzsaw_bbvz00,
		BgL_bgl_za762rtl_regza7f2raza72422za7,
		BGl_z62rtl_regzf2razd2coalescezd2setz12z82zzsaw_bbvz00, 0L, BUNSPEC, 2);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_regsetzd2reglzd2envz00zzsaw_bbvz00,
		BgL_bgl_za762regsetza7d2regl2423z00, BGl_z62regsetzd2reglzb0zzsaw_bbvz00,
		0L, BUNSPEC, 1);

/* GC roots registration */
	static obj_t bgl_gc_roots_register()
	{
#if defined( BGL_GC_ROOTS )
#define ADD_ROOT( addr ) (addr > roots_max ? roots_max = addr : (addr < roots_min ? roots_min = addr : 0))
		void *roots_min = (void *) ULONG_MAX, *roots_max = 0;
		     ADD_ROOT((void *) (&BGl_requirezd2initializa7ationz75zzsaw_bbvz00));
#undef ADD_ROOT
		if   (roots_max > 0)
			     GC_add_roots(roots_min, ((void **) roots_max) + 1);
#endif
		     return BUNSPEC;
	}



/* module-initialization */
	BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzsaw_bbvz00(long
		BgL_checksumz00_4083, char *BgL_fromz00_4084)
	{
		{
			if (CBOOL(BGl_requirezd2initializa7ationz75zzsaw_bbvz00))
				{
					BGl_requirezd2initializa7ationz75zzsaw_bbvz00 = BBOOL(((bool_t) 0));
					BGl_gczd2rootszd2initz00zzsaw_bbvz00();
					BGl_libraryzd2moduleszd2initz00zzsaw_bbvz00();
					BGl_cnstzd2initzd2zzsaw_bbvz00();
					BGl_importedzd2moduleszd2initz00zzsaw_bbvz00();
					return BGl_toplevelzd2initzd2zzsaw_bbvz00();
				}
			else
				{
					return BUNSPEC;
				}
		}

	}



/* library-modules-init */
	obj_t BGl_libraryzd2moduleszd2initz00zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			BGl_modulezd2initializa7ationz75zz__objectz00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(0L,
				"saw_bbv");
			BGl_modulezd2initializa7ationz75zz__readerz00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__errorz00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__bexitz00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__structurez00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__r4_vectors_6_8z00(0L, "saw_bbv");
			BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_fixnumz00(0L,
				"saw_bbv");
			BGl_modulezd2initializa7ationz75zz__biglooz00(0L, "saw_bbv");
			return BUNSPEC;
		}

	}



/* cnst-init */
	obj_t BGl_cnstzd2initzd2zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			{	/* SawBbv/bbv.scm 15 */
				obj_t BgL_cportz00_4031;

				{	/* SawBbv/bbv.scm 15 */
					obj_t BgL_stringz00_4038;

					BgL_stringz00_4038 = BGl_string2363z00zzsaw_bbvz00;
					{	/* SawBbv/bbv.scm 15 */
						obj_t BgL_startz00_4039;

						BgL_startz00_4039 = BINT(0L);
						{	/* SawBbv/bbv.scm 15 */
							obj_t BgL_endz00_4040;

							BgL_endz00_4040 =
								BINT(STRING_LENGTH(((obj_t) BgL_stringz00_4038)));
							{	/* SawBbv/bbv.scm 15 */

								BgL_cportz00_4031 =
									BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00
									(BgL_stringz00_4038, BgL_startz00_4039, BgL_endz00_4040);
				}}}}
				{
					long BgL_iz00_4032;

					BgL_iz00_4032 = 0L;
				BgL_loopz00_4033:
					if ((BgL_iz00_4032 == -1L))
						{	/* SawBbv/bbv.scm 15 */
							return BUNSPEC;
						}
					else
						{	/* SawBbv/bbv.scm 15 */
							{	/* SawBbv/bbv.scm 15 */
								obj_t BgL_arg2364z00_4034;

								{	/* SawBbv/bbv.scm 15 */

									{	/* SawBbv/bbv.scm 15 */
										obj_t BgL_locationz00_4036;

										BgL_locationz00_4036 = BBOOL(((bool_t) 0));
										{	/* SawBbv/bbv.scm 15 */

											BgL_arg2364z00_4034 =
												BGl_readz00zz__readerz00(BgL_cportz00_4031,
												BgL_locationz00_4036);
										}
									}
								}
								{	/* SawBbv/bbv.scm 15 */
									int BgL_tmpz00_4115;

									BgL_tmpz00_4115 = (int) (BgL_iz00_4032);
									CNST_TABLE_SET(BgL_tmpz00_4115, BgL_arg2364z00_4034);
							}}
							{	/* SawBbv/bbv.scm 15 */
								int BgL_auxz00_4037;

								BgL_auxz00_4037 = (int) ((BgL_iz00_4032 - 1L));
								{
									long BgL_iz00_4120;

									BgL_iz00_4120 = (long) (BgL_auxz00_4037);
									BgL_iz00_4032 = BgL_iz00_4120;
									goto BgL_loopz00_4033;
								}
							}
						}
				}
			}
		}

	}



/* gc-roots-init */
	obj_t BGl_gczd2rootszd2initz00zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			return bgl_gc_roots_register();
		}

	}



/* toplevel-init */
	obj_t BGl_toplevelzd2initzd2zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			return BUNSPEC;
		}

	}



/* append-21011 */
	obj_t BGl_appendzd221011zd2zzsaw_bbvz00(obj_t BgL_l1z00_1, obj_t BgL_l2z00_2)
	{
		{
			{
				obj_t BgL_headz00_2127;

				BgL_headz00_2127 = MAKE_YOUNG_PAIR(BNIL, BgL_l2z00_2);
				{
					obj_t BgL_prevz00_2128;
					obj_t BgL_tailz00_2129;

					BgL_prevz00_2128 = BgL_headz00_2127;
					BgL_tailz00_2129 = BgL_l1z00_1;
				BgL_loopz00_2130:
					if (PAIRP(BgL_tailz00_2129))
						{
							obj_t BgL_newzd2prevzd2_2132;

							BgL_newzd2prevzd2_2132 =
								MAKE_YOUNG_PAIR(CAR(BgL_tailz00_2129), BgL_l2z00_2);
							SET_CDR(BgL_prevz00_2128, BgL_newzd2prevzd2_2132);
							{
								obj_t BgL_tailz00_4130;
								obj_t BgL_prevz00_4129;

								BgL_prevz00_4129 = BgL_newzd2prevzd2_2132;
								BgL_tailz00_4130 = CDR(BgL_tailz00_2129);
								BgL_tailz00_2129 = BgL_tailz00_4130;
								BgL_prevz00_2128 = BgL_prevz00_4129;
								goto BgL_loopz00_2130;
							}
						}
					else
						{
							BNIL;
						}
					return CDR(BgL_headz00_2127);
				}
			}
		}

	}



/* make-rtl_reg/ra */
	BGL_EXPORTED_DEF BgL_rtl_regz00_bglt
		BGl_makezd2rtl_regzf2raz20zzsaw_bbvz00(BgL_typez00_bglt BgL_type1179z00_3,
		obj_t BgL_var1180z00_4, obj_t BgL_onexprzf31181zf3_5,
		obj_t BgL_name1182z00_6, obj_t BgL_key1183z00_7,
		obj_t BgL_hardware1184z00_8, int BgL_num1185z00_9,
		obj_t BgL_color1186z00_10, obj_t BgL_coalesce1187z00_11,
		int BgL_occurrences1188z00_12, obj_t BgL_interfere1189z00_13,
		obj_t BgL_interfere21190z00_14)
	{
		{	/* SawMill/regset.sch 55 */
			{	/* SawMill/regset.sch 55 */
				BgL_rtl_regz00_bglt BgL_new1166z00_4042;

				{	/* SawMill/regset.sch 55 */
					BgL_rtl_regz00_bglt BgL_tmp1164z00_4043;
					BgL_rtl_regzf2razf2_bglt BgL_wide1165z00_4044;

					{
						BgL_rtl_regz00_bglt BgL_auxz00_4133;

						{	/* SawMill/regset.sch 55 */
							BgL_rtl_regz00_bglt BgL_new1163z00_4045;

							BgL_new1163z00_4045 =
								((BgL_rtl_regz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
											BgL_rtl_regz00_bgl))));
							{	/* SawMill/regset.sch 55 */
								long BgL_arg1579z00_4046;

								BgL_arg1579z00_4046 =
									BGL_CLASS_NUM(BGl_rtl_regz00zzsaw_defsz00);
								BGL_OBJECT_CLASS_NUM_SET(
									((BgL_objectz00_bglt) BgL_new1163z00_4045),
									BgL_arg1579z00_4046);
							}
							{	/* SawMill/regset.sch 55 */
								BgL_objectz00_bglt BgL_tmpz00_4138;

								BgL_tmpz00_4138 = ((BgL_objectz00_bglt) BgL_new1163z00_4045);
								BGL_OBJECT_WIDENING_SET(BgL_tmpz00_4138, BFALSE);
							}
							((BgL_objectz00_bglt) BgL_new1163z00_4045);
							BgL_auxz00_4133 = BgL_new1163z00_4045;
						}
						BgL_tmp1164z00_4043 = ((BgL_rtl_regz00_bglt) BgL_auxz00_4133);
					}
					BgL_wide1165z00_4044 =
						((BgL_rtl_regzf2razf2_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_rtl_regzf2razf2_bgl))));
					{	/* SawMill/regset.sch 55 */
						obj_t BgL_auxz00_4146;
						BgL_objectz00_bglt BgL_tmpz00_4144;

						BgL_auxz00_4146 = ((obj_t) BgL_wide1165z00_4044);
						BgL_tmpz00_4144 = ((BgL_objectz00_bglt) BgL_tmp1164z00_4043);
						BGL_OBJECT_WIDENING_SET(BgL_tmpz00_4144, BgL_auxz00_4146);
					}
					((BgL_objectz00_bglt) BgL_tmp1164z00_4043);
					{	/* SawMill/regset.sch 55 */
						long BgL_arg1578z00_4047;

						BgL_arg1578z00_4047 =
							BGL_CLASS_NUM(BGl_rtl_regzf2razf2zzsaw_regsetz00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_tmp1164z00_4043), BgL_arg1578z00_4047);
					}
					BgL_new1166z00_4042 = ((BgL_rtl_regz00_bglt) BgL_tmp1164z00_4043);
				}
				((((BgL_rtl_regz00_bglt) COBJECT(
								((BgL_rtl_regz00_bglt) BgL_new1166z00_4042)))->BgL_typez00) =
					((BgL_typez00_bglt) BgL_type1179z00_3), BUNSPEC);
				((((BgL_rtl_regz00_bglt) COBJECT(((BgL_rtl_regz00_bglt)
									BgL_new1166z00_4042)))->BgL_varz00) =
					((obj_t) BgL_var1180z00_4), BUNSPEC);
				((((BgL_rtl_regz00_bglt) COBJECT(((BgL_rtl_regz00_bglt)
									BgL_new1166z00_4042)))->BgL_onexprzf3zf3) =
					((obj_t) BgL_onexprzf31181zf3_5), BUNSPEC);
				((((BgL_rtl_regz00_bglt) COBJECT(((BgL_rtl_regz00_bglt)
									BgL_new1166z00_4042)))->BgL_namez00) =
					((obj_t) BgL_name1182z00_6), BUNSPEC);
				((((BgL_rtl_regz00_bglt) COBJECT(((BgL_rtl_regz00_bglt)
									BgL_new1166z00_4042)))->BgL_keyz00) =
					((obj_t) BgL_key1183z00_7), BUNSPEC);
				((((BgL_rtl_regz00_bglt) COBJECT(((BgL_rtl_regz00_bglt)
									BgL_new1166z00_4042)))->BgL_debugnamez00) =
					((obj_t) BFALSE), BUNSPEC);
				((((BgL_rtl_regz00_bglt) COBJECT(((BgL_rtl_regz00_bglt)
									BgL_new1166z00_4042)))->BgL_hardwarez00) =
					((obj_t) BgL_hardware1184z00_8), BUNSPEC);
				{
					BgL_rtl_regzf2razf2_bglt BgL_auxz00_4168;

					{
						obj_t BgL_auxz00_4169;

						{	/* SawMill/regset.sch 55 */
							BgL_objectz00_bglt BgL_tmpz00_4170;

							BgL_tmpz00_4170 = ((BgL_objectz00_bglt) BgL_new1166z00_4042);
							BgL_auxz00_4169 = BGL_OBJECT_WIDENING(BgL_tmpz00_4170);
						}
						BgL_auxz00_4168 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4169);
					}
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4168))->BgL_numz00) =
						((int) BgL_num1185z00_9), BUNSPEC);
				}
				{
					BgL_rtl_regzf2razf2_bglt BgL_auxz00_4175;

					{
						obj_t BgL_auxz00_4176;

						{	/* SawMill/regset.sch 55 */
							BgL_objectz00_bglt BgL_tmpz00_4177;

							BgL_tmpz00_4177 = ((BgL_objectz00_bglt) BgL_new1166z00_4042);
							BgL_auxz00_4176 = BGL_OBJECT_WIDENING(BgL_tmpz00_4177);
						}
						BgL_auxz00_4175 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4176);
					}
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4175))->
							BgL_colorz00) = ((obj_t) BgL_color1186z00_10), BUNSPEC);
				}
				{
					BgL_rtl_regzf2razf2_bglt BgL_auxz00_4182;

					{
						obj_t BgL_auxz00_4183;

						{	/* SawMill/regset.sch 55 */
							BgL_objectz00_bglt BgL_tmpz00_4184;

							BgL_tmpz00_4184 = ((BgL_objectz00_bglt) BgL_new1166z00_4042);
							BgL_auxz00_4183 = BGL_OBJECT_WIDENING(BgL_tmpz00_4184);
						}
						BgL_auxz00_4182 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4183);
					}
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4182))->
							BgL_coalescez00) = ((obj_t) BgL_coalesce1187z00_11), BUNSPEC);
				}
				{
					BgL_rtl_regzf2razf2_bglt BgL_auxz00_4189;

					{
						obj_t BgL_auxz00_4190;

						{	/* SawMill/regset.sch 55 */
							BgL_objectz00_bglt BgL_tmpz00_4191;

							BgL_tmpz00_4191 = ((BgL_objectz00_bglt) BgL_new1166z00_4042);
							BgL_auxz00_4190 = BGL_OBJECT_WIDENING(BgL_tmpz00_4191);
						}
						BgL_auxz00_4189 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4190);
					}
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4189))->
							BgL_occurrencesz00) = ((int) BgL_occurrences1188z00_12), BUNSPEC);
				}
				{
					BgL_rtl_regzf2razf2_bglt BgL_auxz00_4196;

					{
						obj_t BgL_auxz00_4197;

						{	/* SawMill/regset.sch 55 */
							BgL_objectz00_bglt BgL_tmpz00_4198;

							BgL_tmpz00_4198 = ((BgL_objectz00_bglt) BgL_new1166z00_4042);
							BgL_auxz00_4197 = BGL_OBJECT_WIDENING(BgL_tmpz00_4198);
						}
						BgL_auxz00_4196 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4197);
					}
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4196))->
							BgL_interferez00) = ((obj_t) BgL_interfere1189z00_13), BUNSPEC);
				}
				{
					BgL_rtl_regzf2razf2_bglt BgL_auxz00_4203;

					{
						obj_t BgL_auxz00_4204;

						{	/* SawMill/regset.sch 55 */
							BgL_objectz00_bglt BgL_tmpz00_4205;

							BgL_tmpz00_4205 = ((BgL_objectz00_bglt) BgL_new1166z00_4042);
							BgL_auxz00_4204 = BGL_OBJECT_WIDENING(BgL_tmpz00_4205);
						}
						BgL_auxz00_4203 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4204);
					}
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4203))->
							BgL_interfere2z00) = ((obj_t) BgL_interfere21190z00_14), BUNSPEC);
				}
				return BgL_new1166z00_4042;
			}
		}

	}



/* &make-rtl_reg/ra */
	BgL_rtl_regz00_bglt BGl_z62makezd2rtl_regzf2raz42zzsaw_bbvz00(obj_t
		BgL_envz00_3933, obj_t BgL_type1179z00_3934, obj_t BgL_var1180z00_3935,
		obj_t BgL_onexprzf31181zf3_3936, obj_t BgL_name1182z00_3937,
		obj_t BgL_key1183z00_3938, obj_t BgL_hardware1184z00_3939,
		obj_t BgL_num1185z00_3940, obj_t BgL_color1186z00_3941,
		obj_t BgL_coalesce1187z00_3942, obj_t BgL_occurrences1188z00_3943,
		obj_t BgL_interfere1189z00_3944, obj_t BgL_interfere21190z00_3945)
	{
		{	/* SawMill/regset.sch 55 */
			return
				BGl_makezd2rtl_regzf2raz20zzsaw_bbvz00(
				((BgL_typez00_bglt) BgL_type1179z00_3934), BgL_var1180z00_3935,
				BgL_onexprzf31181zf3_3936, BgL_name1182z00_3937, BgL_key1183z00_3938,
				BgL_hardware1184z00_3939, CINT(BgL_num1185z00_3940),
				BgL_color1186z00_3941, BgL_coalesce1187z00_3942,
				CINT(BgL_occurrences1188z00_3943), BgL_interfere1189z00_3944,
				BgL_interfere21190z00_3945);
		}

	}



/* rtl_reg/ra? */
	BGL_EXPORTED_DEF bool_t BGl_rtl_regzf2razf3z01zzsaw_bbvz00(obj_t
		BgL_objz00_15)
	{
		{	/* SawMill/regset.sch 56 */
			{	/* SawMill/regset.sch 56 */
				obj_t BgL_classz00_4048;

				BgL_classz00_4048 = BGl_rtl_regzf2razf2zzsaw_regsetz00;
				if (BGL_OBJECTP(BgL_objz00_15))
					{	/* SawMill/regset.sch 56 */
						BgL_objectz00_bglt BgL_arg1801z00_4049;

						BgL_arg1801z00_4049 = (BgL_objectz00_bglt) (BgL_objz00_15);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* SawMill/regset.sch 56 */
								long BgL_idxz00_4050;

								BgL_idxz00_4050 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_4049);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_4050 + 2L)) == BgL_classz00_4048);
							}
						else
							{	/* SawMill/regset.sch 56 */
								bool_t BgL_res2317z00_4053;

								{	/* SawMill/regset.sch 56 */
									obj_t BgL_oclassz00_4054;

									{	/* SawMill/regset.sch 56 */
										long BgL_arg1808z00_4055;

										{	/* SawMill/regset.sch 56 */
											long BgL_arg1809z00_4056;

											BgL_arg1809z00_4056 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_4049);
											BgL_arg1808z00_4055 = (BgL_arg1809z00_4056 - OBJECT_TYPE);
										}
										BgL_oclassz00_4054 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_4055);
									}
									{	/* SawMill/regset.sch 56 */
										bool_t BgL__ortest_1115z00_4057;

										BgL__ortest_1115z00_4057 =
											(BgL_classz00_4048 == BgL_oclassz00_4054);
										if (BgL__ortest_1115z00_4057)
											{	/* SawMill/regset.sch 56 */
												BgL_res2317z00_4053 = BgL__ortest_1115z00_4057;
											}
										else
											{	/* SawMill/regset.sch 56 */
												long BgL_odepthz00_4058;

												BgL_odepthz00_4058 =
													BGL_CLASS_DEPTH(BgL_oclassz00_4054);
												if ((2L < BgL_odepthz00_4058))
													{	/* SawMill/regset.sch 56 */
														obj_t BgL_arg1797z00_4059;

														BgL_arg1797z00_4059 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_4054, 2L);
														BgL_res2317z00_4053 =
															(BgL_arg1797z00_4059 == BgL_classz00_4048);
													}
												else
													{	/* SawMill/regset.sch 56 */
														BgL_res2317z00_4053 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2317z00_4053;
							}
					}
				else
					{	/* SawMill/regset.sch 56 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &rtl_reg/ra? */
	obj_t BGl_z62rtl_regzf2razf3z63zzsaw_bbvz00(obj_t BgL_envz00_3946,
		obj_t BgL_objz00_3947)
	{
		{	/* SawMill/regset.sch 56 */
			return BBOOL(BGl_rtl_regzf2razf3z01zzsaw_bbvz00(BgL_objz00_3947));
		}

	}



/* rtl_reg/ra-nil */
	BGL_EXPORTED_DEF BgL_rtl_regz00_bglt
		BGl_rtl_regzf2razd2nilz20zzsaw_bbvz00(void)
	{
		{	/* SawMill/regset.sch 57 */
			{	/* SawMill/regset.sch 57 */
				obj_t BgL_classz00_3299;

				BgL_classz00_3299 = BGl_rtl_regzf2razf2zzsaw_regsetz00;
				{	/* SawMill/regset.sch 57 */
					obj_t BgL__ortest_1117z00_3300;

					BgL__ortest_1117z00_3300 = BGL_CLASS_NIL(BgL_classz00_3299);
					if (CBOOL(BgL__ortest_1117z00_3300))
						{	/* SawMill/regset.sch 57 */
							return ((BgL_rtl_regz00_bglt) BgL__ortest_1117z00_3300);
						}
					else
						{	/* SawMill/regset.sch 57 */
							return
								((BgL_rtl_regz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_3299));
						}
				}
			}
		}

	}



/* &rtl_reg/ra-nil */
	BgL_rtl_regz00_bglt BGl_z62rtl_regzf2razd2nilz42zzsaw_bbvz00(obj_t
		BgL_envz00_3948)
	{
		{	/* SawMill/regset.sch 57 */
			return BGl_rtl_regzf2razd2nilz20zzsaw_bbvz00();
		}

	}



/* rtl_reg/ra-interfere2 */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2interfere2z20zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_16)
	{
		{	/* SawMill/regset.sch 58 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4242;

				{
					obj_t BgL_auxz00_4243;

					{	/* SawMill/regset.sch 58 */
						BgL_objectz00_bglt BgL_tmpz00_4244;

						BgL_tmpz00_4244 = ((BgL_objectz00_bglt) BgL_oz00_16);
						BgL_auxz00_4243 = BGL_OBJECT_WIDENING(BgL_tmpz00_4244);
					}
					BgL_auxz00_4242 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4243);
				}
				return
					(((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4242))->
					BgL_interfere2z00);
			}
		}

	}



/* &rtl_reg/ra-interfere2 */
	obj_t BGl_z62rtl_regzf2razd2interfere2z42zzsaw_bbvz00(obj_t BgL_envz00_3949,
		obj_t BgL_oz00_3950)
	{
		{	/* SawMill/regset.sch 58 */
			return
				BGl_rtl_regzf2razd2interfere2z20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3950));
		}

	}



/* rtl_reg/ra-interfere2-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2interfere2zd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_17, obj_t BgL_vz00_18)
	{
		{	/* SawMill/regset.sch 59 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4251;

				{
					obj_t BgL_auxz00_4252;

					{	/* SawMill/regset.sch 59 */
						BgL_objectz00_bglt BgL_tmpz00_4253;

						BgL_tmpz00_4253 = ((BgL_objectz00_bglt) BgL_oz00_17);
						BgL_auxz00_4252 = BGL_OBJECT_WIDENING(BgL_tmpz00_4253);
					}
					BgL_auxz00_4251 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4252);
				}
				return
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4251))->
						BgL_interfere2z00) = ((obj_t) BgL_vz00_18), BUNSPEC);
			}
		}

	}



/* &rtl_reg/ra-interfere2-set! */
	obj_t BGl_z62rtl_regzf2razd2interfere2zd2setz12z82zzsaw_bbvz00(obj_t
		BgL_envz00_3951, obj_t BgL_oz00_3952, obj_t BgL_vz00_3953)
	{
		{	/* SawMill/regset.sch 59 */
			return
				BGl_rtl_regzf2razd2interfere2zd2setz12ze0zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3952), BgL_vz00_3953);
		}

	}



/* rtl_reg/ra-interfere */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2interferez20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_19)
	{
		{	/* SawMill/regset.sch 60 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4260;

				{
					obj_t BgL_auxz00_4261;

					{	/* SawMill/regset.sch 60 */
						BgL_objectz00_bglt BgL_tmpz00_4262;

						BgL_tmpz00_4262 = ((BgL_objectz00_bglt) BgL_oz00_19);
						BgL_auxz00_4261 = BGL_OBJECT_WIDENING(BgL_tmpz00_4262);
					}
					BgL_auxz00_4260 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4261);
				}
				return
					(((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4260))->
					BgL_interferez00);
			}
		}

	}



/* &rtl_reg/ra-interfere */
	obj_t BGl_z62rtl_regzf2razd2interferez42zzsaw_bbvz00(obj_t BgL_envz00_3954,
		obj_t BgL_oz00_3955)
	{
		{	/* SawMill/regset.sch 60 */
			return
				BGl_rtl_regzf2razd2interferez20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3955));
		}

	}



/* rtl_reg/ra-interfere-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2interferezd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_20, obj_t BgL_vz00_21)
	{
		{	/* SawMill/regset.sch 61 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4269;

				{
					obj_t BgL_auxz00_4270;

					{	/* SawMill/regset.sch 61 */
						BgL_objectz00_bglt BgL_tmpz00_4271;

						BgL_tmpz00_4271 = ((BgL_objectz00_bglt) BgL_oz00_20);
						BgL_auxz00_4270 = BGL_OBJECT_WIDENING(BgL_tmpz00_4271);
					}
					BgL_auxz00_4269 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4270);
				}
				return
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4269))->
						BgL_interferez00) = ((obj_t) BgL_vz00_21), BUNSPEC);
			}
		}

	}



/* &rtl_reg/ra-interfere-set! */
	obj_t BGl_z62rtl_regzf2razd2interferezd2setz12z82zzsaw_bbvz00(obj_t
		BgL_envz00_3956, obj_t BgL_oz00_3957, obj_t BgL_vz00_3958)
	{
		{	/* SawMill/regset.sch 61 */
			return
				BGl_rtl_regzf2razd2interferezd2setz12ze0zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3957), BgL_vz00_3958);
		}

	}



/* rtl_reg/ra-occurrences */
	BGL_EXPORTED_DEF int
		BGl_rtl_regzf2razd2occurrencesz20zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_22)
	{
		{	/* SawMill/regset.sch 62 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4278;

				{
					obj_t BgL_auxz00_4279;

					{	/* SawMill/regset.sch 62 */
						BgL_objectz00_bglt BgL_tmpz00_4280;

						BgL_tmpz00_4280 = ((BgL_objectz00_bglt) BgL_oz00_22);
						BgL_auxz00_4279 = BGL_OBJECT_WIDENING(BgL_tmpz00_4280);
					}
					BgL_auxz00_4278 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4279);
				}
				return
					(((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4278))->
					BgL_occurrencesz00);
			}
		}

	}



/* &rtl_reg/ra-occurrences */
	obj_t BGl_z62rtl_regzf2razd2occurrencesz42zzsaw_bbvz00(obj_t BgL_envz00_3959,
		obj_t BgL_oz00_3960)
	{
		{	/* SawMill/regset.sch 62 */
			return
				BINT(BGl_rtl_regzf2razd2occurrencesz20zzsaw_bbvz00(
					((BgL_rtl_regz00_bglt) BgL_oz00_3960)));
		}

	}



/* rtl_reg/ra-occurrences-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2occurrenceszd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_23, int BgL_vz00_24)
	{
		{	/* SawMill/regset.sch 63 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4288;

				{
					obj_t BgL_auxz00_4289;

					{	/* SawMill/regset.sch 63 */
						BgL_objectz00_bglt BgL_tmpz00_4290;

						BgL_tmpz00_4290 = ((BgL_objectz00_bglt) BgL_oz00_23);
						BgL_auxz00_4289 = BGL_OBJECT_WIDENING(BgL_tmpz00_4290);
					}
					BgL_auxz00_4288 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4289);
				}
				return
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4288))->
						BgL_occurrencesz00) = ((int) BgL_vz00_24), BUNSPEC);
		}}

	}



/* &rtl_reg/ra-occurrences-set! */
	obj_t BGl_z62rtl_regzf2razd2occurrenceszd2setz12z82zzsaw_bbvz00(obj_t
		BgL_envz00_3961, obj_t BgL_oz00_3962, obj_t BgL_vz00_3963)
	{
		{	/* SawMill/regset.sch 63 */
			return
				BGl_rtl_regzf2razd2occurrenceszd2setz12ze0zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3962), CINT(BgL_vz00_3963));
		}

	}



/* rtl_reg/ra-coalesce */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2coalescez20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_25)
	{
		{	/* SawMill/regset.sch 64 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4298;

				{
					obj_t BgL_auxz00_4299;

					{	/* SawMill/regset.sch 64 */
						BgL_objectz00_bglt BgL_tmpz00_4300;

						BgL_tmpz00_4300 = ((BgL_objectz00_bglt) BgL_oz00_25);
						BgL_auxz00_4299 = BGL_OBJECT_WIDENING(BgL_tmpz00_4300);
					}
					BgL_auxz00_4298 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4299);
				}
				return
					(((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4298))->
					BgL_coalescez00);
			}
		}

	}



/* &rtl_reg/ra-coalesce */
	obj_t BGl_z62rtl_regzf2razd2coalescez42zzsaw_bbvz00(obj_t BgL_envz00_3964,
		obj_t BgL_oz00_3965)
	{
		{	/* SawMill/regset.sch 64 */
			return
				BGl_rtl_regzf2razd2coalescez20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3965));
		}

	}



/* rtl_reg/ra-coalesce-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2coalescezd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_26, obj_t BgL_vz00_27)
	{
		{	/* SawMill/regset.sch 65 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4307;

				{
					obj_t BgL_auxz00_4308;

					{	/* SawMill/regset.sch 65 */
						BgL_objectz00_bglt BgL_tmpz00_4309;

						BgL_tmpz00_4309 = ((BgL_objectz00_bglt) BgL_oz00_26);
						BgL_auxz00_4308 = BGL_OBJECT_WIDENING(BgL_tmpz00_4309);
					}
					BgL_auxz00_4307 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4308);
				}
				return
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4307))->
						BgL_coalescez00) = ((obj_t) BgL_vz00_27), BUNSPEC);
			}
		}

	}



/* &rtl_reg/ra-coalesce-set! */
	obj_t BGl_z62rtl_regzf2razd2coalescezd2setz12z82zzsaw_bbvz00(obj_t
		BgL_envz00_3966, obj_t BgL_oz00_3967, obj_t BgL_vz00_3968)
	{
		{	/* SawMill/regset.sch 65 */
			return
				BGl_rtl_regzf2razd2coalescezd2setz12ze0zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3967), BgL_vz00_3968);
		}

	}



/* rtl_reg/ra-color */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2colorz20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_28)
	{
		{	/* SawMill/regset.sch 66 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4316;

				{
					obj_t BgL_auxz00_4317;

					{	/* SawMill/regset.sch 66 */
						BgL_objectz00_bglt BgL_tmpz00_4318;

						BgL_tmpz00_4318 = ((BgL_objectz00_bglt) BgL_oz00_28);
						BgL_auxz00_4317 = BGL_OBJECT_WIDENING(BgL_tmpz00_4318);
					}
					BgL_auxz00_4316 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4317);
				}
				return
					(((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4316))->BgL_colorz00);
			}
		}

	}



/* &rtl_reg/ra-color */
	obj_t BGl_z62rtl_regzf2razd2colorz42zzsaw_bbvz00(obj_t BgL_envz00_3969,
		obj_t BgL_oz00_3970)
	{
		{	/* SawMill/regset.sch 66 */
			return
				BGl_rtl_regzf2razd2colorz20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3970));
		}

	}



/* rtl_reg/ra-color-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2colorzd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_29, obj_t BgL_vz00_30)
	{
		{	/* SawMill/regset.sch 67 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4325;

				{
					obj_t BgL_auxz00_4326;

					{	/* SawMill/regset.sch 67 */
						BgL_objectz00_bglt BgL_tmpz00_4327;

						BgL_tmpz00_4327 = ((BgL_objectz00_bglt) BgL_oz00_29);
						BgL_auxz00_4326 = BGL_OBJECT_WIDENING(BgL_tmpz00_4327);
					}
					BgL_auxz00_4325 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4326);
				}
				return
					((((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4325))->
						BgL_colorz00) = ((obj_t) BgL_vz00_30), BUNSPEC);
			}
		}

	}



/* &rtl_reg/ra-color-set! */
	obj_t BGl_z62rtl_regzf2razd2colorzd2setz12z82zzsaw_bbvz00(obj_t
		BgL_envz00_3971, obj_t BgL_oz00_3972, obj_t BgL_vz00_3973)
	{
		{	/* SawMill/regset.sch 67 */
			return
				BGl_rtl_regzf2razd2colorzd2setz12ze0zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3972), BgL_vz00_3973);
		}

	}



/* rtl_reg/ra-num */
	BGL_EXPORTED_DEF int BGl_rtl_regzf2razd2numz20zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_31)
	{
		{	/* SawMill/regset.sch 68 */
			{
				BgL_rtl_regzf2razf2_bglt BgL_auxz00_4334;

				{
					obj_t BgL_auxz00_4335;

					{	/* SawMill/regset.sch 68 */
						BgL_objectz00_bglt BgL_tmpz00_4336;

						BgL_tmpz00_4336 = ((BgL_objectz00_bglt) BgL_oz00_31);
						BgL_auxz00_4335 = BGL_OBJECT_WIDENING(BgL_tmpz00_4336);
					}
					BgL_auxz00_4334 = ((BgL_rtl_regzf2razf2_bglt) BgL_auxz00_4335);
				}
				return
					(((BgL_rtl_regzf2razf2_bglt) COBJECT(BgL_auxz00_4334))->BgL_numz00);
			}
		}

	}



/* &rtl_reg/ra-num */
	obj_t BGl_z62rtl_regzf2razd2numz42zzsaw_bbvz00(obj_t BgL_envz00_3974,
		obj_t BgL_oz00_3975)
	{
		{	/* SawMill/regset.sch 68 */
			return
				BINT(BGl_rtl_regzf2razd2numz20zzsaw_bbvz00(
					((BgL_rtl_regz00_bglt) BgL_oz00_3975)));
		}

	}



/* rtl_reg/ra-hardware */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2hardwarez20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_34)
	{
		{	/* SawMill/regset.sch 70 */
			return
				(((BgL_rtl_regz00_bglt) COBJECT(
						((BgL_rtl_regz00_bglt) BgL_oz00_34)))->BgL_hardwarez00);
		}

	}



/* &rtl_reg/ra-hardware */
	obj_t BGl_z62rtl_regzf2razd2hardwarez42zzsaw_bbvz00(obj_t BgL_envz00_3976,
		obj_t BgL_oz00_3977)
	{
		{	/* SawMill/regset.sch 70 */
			return
				BGl_rtl_regzf2razd2hardwarez20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3977));
		}

	}



/* rtl_reg/ra-key */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2keyz20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_37)
	{
		{	/* SawMill/regset.sch 72 */
			return
				(((BgL_rtl_regz00_bglt) COBJECT(
						((BgL_rtl_regz00_bglt) BgL_oz00_37)))->BgL_keyz00);
		}

	}



/* &rtl_reg/ra-key */
	obj_t BGl_z62rtl_regzf2razd2keyz42zzsaw_bbvz00(obj_t BgL_envz00_3978,
		obj_t BgL_oz00_3979)
	{
		{	/* SawMill/regset.sch 72 */
			return
				BGl_rtl_regzf2razd2keyz20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3979));
		}

	}



/* rtl_reg/ra-name */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2namez20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_40)
	{
		{	/* SawMill/regset.sch 74 */
			return
				(((BgL_rtl_regz00_bglt) COBJECT(
						((BgL_rtl_regz00_bglt) BgL_oz00_40)))->BgL_namez00);
		}

	}



/* &rtl_reg/ra-name */
	obj_t BGl_z62rtl_regzf2razd2namez42zzsaw_bbvz00(obj_t BgL_envz00_3980,
		obj_t BgL_oz00_3981)
	{
		{	/* SawMill/regset.sch 74 */
			return
				BGl_rtl_regzf2razd2namez20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3981));
		}

	}



/* rtl_reg/ra-onexpr? */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2onexprzf3zd3zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_43)
	{
		{	/* SawMill/regset.sch 76 */
			return
				(((BgL_rtl_regz00_bglt) COBJECT(
						((BgL_rtl_regz00_bglt) BgL_oz00_43)))->BgL_onexprzf3zf3);
		}

	}



/* &rtl_reg/ra-onexpr? */
	obj_t BGl_z62rtl_regzf2razd2onexprzf3zb1zzsaw_bbvz00(obj_t BgL_envz00_3982,
		obj_t BgL_oz00_3983)
	{
		{	/* SawMill/regset.sch 76 */
			return
				BGl_rtl_regzf2razd2onexprzf3zd3zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3983));
		}

	}



/* rtl_reg/ra-onexpr?-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2onexprzf3zd2setz12z13zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_44, obj_t BgL_vz00_45)
	{
		{	/* SawMill/regset.sch 77 */
			return
				((((BgL_rtl_regz00_bglt) COBJECT(
							((BgL_rtl_regz00_bglt) BgL_oz00_44)))->BgL_onexprzf3zf3) =
				((obj_t) BgL_vz00_45), BUNSPEC);
		}

	}



/* &rtl_reg/ra-onexpr?-set! */
	obj_t BGl_z62rtl_regzf2razd2onexprzf3zd2setz12z71zzsaw_bbvz00(obj_t
		BgL_envz00_3984, obj_t BgL_oz00_3985, obj_t BgL_vz00_3986)
	{
		{	/* SawMill/regset.sch 77 */
			return
				BGl_rtl_regzf2razd2onexprzf3zd2setz12z13zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3985), BgL_vz00_3986);
		}

	}



/* rtl_reg/ra-var */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2varz20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_46)
	{
		{	/* SawMill/regset.sch 78 */
			return
				(((BgL_rtl_regz00_bglt) COBJECT(
						((BgL_rtl_regz00_bglt) BgL_oz00_46)))->BgL_varz00);
		}

	}



/* &rtl_reg/ra-var */
	obj_t BGl_z62rtl_regzf2razd2varz42zzsaw_bbvz00(obj_t BgL_envz00_3987,
		obj_t BgL_oz00_3988)
	{
		{	/* SawMill/regset.sch 78 */
			return
				BGl_rtl_regzf2razd2varz20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3988));
		}

	}



/* rtl_reg/ra-var-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2varzd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_47, obj_t BgL_vz00_48)
	{
		{	/* SawMill/regset.sch 79 */
			return
				((((BgL_rtl_regz00_bglt) COBJECT(
							((BgL_rtl_regz00_bglt) BgL_oz00_47)))->BgL_varz00) =
				((obj_t) BgL_vz00_48), BUNSPEC);
		}

	}



/* &rtl_reg/ra-var-set! */
	obj_t BGl_z62rtl_regzf2razd2varzd2setz12z82zzsaw_bbvz00(obj_t BgL_envz00_3989,
		obj_t BgL_oz00_3990, obj_t BgL_vz00_3991)
	{
		{	/* SawMill/regset.sch 79 */
			return
				BGl_rtl_regzf2razd2varzd2setz12ze0zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3990), BgL_vz00_3991);
		}

	}



/* rtl_reg/ra-type */
	BGL_EXPORTED_DEF BgL_typez00_bglt
		BGl_rtl_regzf2razd2typez20zzsaw_bbvz00(BgL_rtl_regz00_bglt BgL_oz00_49)
	{
		{	/* SawMill/regset.sch 80 */
			return
				(((BgL_rtl_regz00_bglt) COBJECT(
						((BgL_rtl_regz00_bglt) BgL_oz00_49)))->BgL_typez00);
		}

	}



/* &rtl_reg/ra-type */
	BgL_typez00_bglt BGl_z62rtl_regzf2razd2typez42zzsaw_bbvz00(obj_t
		BgL_envz00_3992, obj_t BgL_oz00_3993)
	{
		{	/* SawMill/regset.sch 80 */
			return
				BGl_rtl_regzf2razd2typez20zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3993));
		}

	}



/* rtl_reg/ra-type-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_rtl_regzf2razd2typezd2setz12ze0zzsaw_bbvz00(BgL_rtl_regz00_bglt
		BgL_oz00_50, BgL_typez00_bglt BgL_vz00_51)
	{
		{	/* SawMill/regset.sch 81 */
			return
				((((BgL_rtl_regz00_bglt) COBJECT(
							((BgL_rtl_regz00_bglt) BgL_oz00_50)))->BgL_typez00) =
				((BgL_typez00_bglt) BgL_vz00_51), BUNSPEC);
		}

	}



/* &rtl_reg/ra-type-set! */
	obj_t BGl_z62rtl_regzf2razd2typezd2setz12z82zzsaw_bbvz00(obj_t
		BgL_envz00_3994, obj_t BgL_oz00_3995, obj_t BgL_vz00_3996)
	{
		{	/* SawMill/regset.sch 81 */
			return
				BGl_rtl_regzf2razd2typezd2setz12ze0zzsaw_bbvz00(
				((BgL_rtl_regz00_bglt) BgL_oz00_3995),
				((BgL_typez00_bglt) BgL_vz00_3996));
		}

	}



/* make-regset */
	BGL_EXPORTED_DEF BgL_regsetz00_bglt BGl_makezd2regsetzd2zzsaw_bbvz00(int
		BgL_length1172z00_52, int BgL_msiza7e1173za7_53, obj_t BgL_regv1174z00_54,
		obj_t BgL_regl1175z00_55, obj_t BgL_string1176z00_56)
	{
		{	/* SawMill/regset.sch 84 */
			{	/* SawMill/regset.sch 84 */
				BgL_regsetz00_bglt BgL_new1168z00_4060;

				{	/* SawMill/regset.sch 84 */
					BgL_regsetz00_bglt BgL_new1167z00_4061;

					BgL_new1167z00_4061 =
						((BgL_regsetz00_bglt) BOBJECT(GC_MALLOC(sizeof(struct
									BgL_regsetz00_bgl))));
					{	/* SawMill/regset.sch 84 */
						long BgL_arg1581z00_4062;

						BgL_arg1581z00_4062 = BGL_CLASS_NUM(BGl_regsetz00zzsaw_regsetz00);
						BGL_OBJECT_CLASS_NUM_SET(
							((BgL_objectz00_bglt) BgL_new1167z00_4061), BgL_arg1581z00_4062);
					}
					BgL_new1168z00_4060 = BgL_new1167z00_4061;
				}
				((((BgL_regsetz00_bglt) COBJECT(BgL_new1168z00_4060))->BgL_lengthz00) =
					((int) BgL_length1172z00_52), BUNSPEC);
				((((BgL_regsetz00_bglt) COBJECT(BgL_new1168z00_4060))->BgL_msiza7eza7) =
					((int) BgL_msiza7e1173za7_53), BUNSPEC);
				((((BgL_regsetz00_bglt) COBJECT(BgL_new1168z00_4060))->BgL_regvz00) =
					((obj_t) BgL_regv1174z00_54), BUNSPEC);
				((((BgL_regsetz00_bglt) COBJECT(BgL_new1168z00_4060))->BgL_reglz00) =
					((obj_t) BgL_regl1175z00_55), BUNSPEC);
				((((BgL_regsetz00_bglt) COBJECT(BgL_new1168z00_4060))->BgL_stringz00) =
					((obj_t) BgL_string1176z00_56), BUNSPEC);
				return BgL_new1168z00_4060;
			}
		}

	}



/* &make-regset */
	BgL_regsetz00_bglt BGl_z62makezd2regsetzb0zzsaw_bbvz00(obj_t BgL_envz00_3997,
		obj_t BgL_length1172z00_3998, obj_t BgL_msiza7e1173za7_3999,
		obj_t BgL_regv1174z00_4000, obj_t BgL_regl1175z00_4001,
		obj_t BgL_string1176z00_4002)
	{
		{	/* SawMill/regset.sch 84 */
			return
				BGl_makezd2regsetzd2zzsaw_bbvz00(CINT(BgL_length1172z00_3998),
				CINT(BgL_msiza7e1173za7_3999), BgL_regv1174z00_4000,
				BgL_regl1175z00_4001, BgL_string1176z00_4002);
		}

	}



/* regset? */
	BGL_EXPORTED_DEF bool_t BGl_regsetzf3zf3zzsaw_bbvz00(obj_t BgL_objz00_57)
	{
		{	/* SawMill/regset.sch 85 */
			{	/* SawMill/regset.sch 85 */
				obj_t BgL_classz00_4063;

				BgL_classz00_4063 = BGl_regsetz00zzsaw_regsetz00;
				if (BGL_OBJECTP(BgL_objz00_57))
					{	/* SawMill/regset.sch 85 */
						BgL_objectz00_bglt BgL_arg1801z00_4064;

						BgL_arg1801z00_4064 = (BgL_objectz00_bglt) (BgL_objz00_57);
						if (BGL_CONDEXPAND_ISA_ARCH64())
							{	/* SawMill/regset.sch 85 */
								long BgL_idxz00_4065;

								BgL_idxz00_4065 =
									BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_4064);
								return
									(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
										(BgL_idxz00_4065 + 1L)) == BgL_classz00_4063);
							}
						else
							{	/* SawMill/regset.sch 85 */
								bool_t BgL_res2318z00_4068;

								{	/* SawMill/regset.sch 85 */
									obj_t BgL_oclassz00_4069;

									{	/* SawMill/regset.sch 85 */
										long BgL_arg1808z00_4070;

										{	/* SawMill/regset.sch 85 */
											long BgL_arg1809z00_4071;

											BgL_arg1809z00_4071 =
												BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_4064);
											BgL_arg1808z00_4070 = (BgL_arg1809z00_4071 - OBJECT_TYPE);
										}
										BgL_oclassz00_4069 =
											VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
											BgL_arg1808z00_4070);
									}
									{	/* SawMill/regset.sch 85 */
										bool_t BgL__ortest_1115z00_4072;

										BgL__ortest_1115z00_4072 =
											(BgL_classz00_4063 == BgL_oclassz00_4069);
										if (BgL__ortest_1115z00_4072)
											{	/* SawMill/regset.sch 85 */
												BgL_res2318z00_4068 = BgL__ortest_1115z00_4072;
											}
										else
											{	/* SawMill/regset.sch 85 */
												long BgL_odepthz00_4073;

												BgL_odepthz00_4073 =
													BGL_CLASS_DEPTH(BgL_oclassz00_4069);
												if ((1L < BgL_odepthz00_4073))
													{	/* SawMill/regset.sch 85 */
														obj_t BgL_arg1797z00_4074;

														BgL_arg1797z00_4074 =
															BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_4069, 1L);
														BgL_res2318z00_4068 =
															(BgL_arg1797z00_4074 == BgL_classz00_4063);
													}
												else
													{	/* SawMill/regset.sch 85 */
														BgL_res2318z00_4068 = ((bool_t) 0);
													}
											}
									}
								}
								return BgL_res2318z00_4068;
							}
					}
				else
					{	/* SawMill/regset.sch 85 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* &regset? */
	obj_t BGl_z62regsetzf3z91zzsaw_bbvz00(obj_t BgL_envz00_4003,
		obj_t BgL_objz00_4004)
	{
		{	/* SawMill/regset.sch 85 */
			return BBOOL(BGl_regsetzf3zf3zzsaw_bbvz00(BgL_objz00_4004));
		}

	}



/* regset-nil */
	BGL_EXPORTED_DEF BgL_regsetz00_bglt BGl_regsetzd2nilzd2zzsaw_bbvz00(void)
	{
		{	/* SawMill/regset.sch 86 */
			{	/* SawMill/regset.sch 86 */
				obj_t BgL_classz00_3349;

				BgL_classz00_3349 = BGl_regsetz00zzsaw_regsetz00;
				{	/* SawMill/regset.sch 86 */
					obj_t BgL__ortest_1117z00_3350;

					BgL__ortest_1117z00_3350 = BGL_CLASS_NIL(BgL_classz00_3349);
					if (CBOOL(BgL__ortest_1117z00_3350))
						{	/* SawMill/regset.sch 86 */
							return ((BgL_regsetz00_bglt) BgL__ortest_1117z00_3350);
						}
					else
						{	/* SawMill/regset.sch 86 */
							return
								((BgL_regsetz00_bglt)
								BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_3349));
						}
				}
			}
		}

	}



/* &regset-nil */
	BgL_regsetz00_bglt BGl_z62regsetzd2nilzb0zzsaw_bbvz00(obj_t BgL_envz00_4005)
	{
		{	/* SawMill/regset.sch 86 */
			return BGl_regsetzd2nilzd2zzsaw_bbvz00();
		}

	}



/* regset-string */
	BGL_EXPORTED_DEF obj_t BGl_regsetzd2stringzd2zzsaw_bbvz00(BgL_regsetz00_bglt
		BgL_oz00_58)
	{
		{	/* SawMill/regset.sch 87 */
			return (((BgL_regsetz00_bglt) COBJECT(BgL_oz00_58))->BgL_stringz00);
		}

	}



/* &regset-string */
	obj_t BGl_z62regsetzd2stringzb0zzsaw_bbvz00(obj_t BgL_envz00_4006,
		obj_t BgL_oz00_4007)
	{
		{	/* SawMill/regset.sch 87 */
			return
				BGl_regsetzd2stringzd2zzsaw_bbvz00(
				((BgL_regsetz00_bglt) BgL_oz00_4007));
		}

	}



/* regset-string-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_regsetzd2stringzd2setz12z12zzsaw_bbvz00(BgL_regsetz00_bglt BgL_oz00_59,
		obj_t BgL_vz00_60)
	{
		{	/* SawMill/regset.sch 88 */
			return
				((((BgL_regsetz00_bglt) COBJECT(BgL_oz00_59))->BgL_stringz00) =
				((obj_t) BgL_vz00_60), BUNSPEC);
		}

	}



/* &regset-string-set! */
	obj_t BGl_z62regsetzd2stringzd2setz12z70zzsaw_bbvz00(obj_t BgL_envz00_4008,
		obj_t BgL_oz00_4009, obj_t BgL_vz00_4010)
	{
		{	/* SawMill/regset.sch 88 */
			return
				BGl_regsetzd2stringzd2setz12z12zzsaw_bbvz00(
				((BgL_regsetz00_bglt) BgL_oz00_4009), BgL_vz00_4010);
		}

	}



/* regset-regl */
	BGL_EXPORTED_DEF obj_t BGl_regsetzd2reglzd2zzsaw_bbvz00(BgL_regsetz00_bglt
		BgL_oz00_61)
	{
		{	/* SawMill/regset.sch 89 */
			return (((BgL_regsetz00_bglt) COBJECT(BgL_oz00_61))->BgL_reglz00);
		}

	}



/* &regset-regl */
	obj_t BGl_z62regsetzd2reglzb0zzsaw_bbvz00(obj_t BgL_envz00_4011,
		obj_t BgL_oz00_4012)
	{
		{	/* SawMill/regset.sch 89 */
			return
				BGl_regsetzd2reglzd2zzsaw_bbvz00(((BgL_regsetz00_bglt) BgL_oz00_4012));
		}

	}



/* regset-regv */
	BGL_EXPORTED_DEF obj_t BGl_regsetzd2regvzd2zzsaw_bbvz00(BgL_regsetz00_bglt
		BgL_oz00_64)
	{
		{	/* SawMill/regset.sch 91 */
			return (((BgL_regsetz00_bglt) COBJECT(BgL_oz00_64))->BgL_regvz00);
		}

	}



/* &regset-regv */
	obj_t BGl_z62regsetzd2regvzb0zzsaw_bbvz00(obj_t BgL_envz00_4013,
		obj_t BgL_oz00_4014)
	{
		{	/* SawMill/regset.sch 91 */
			return
				BGl_regsetzd2regvzd2zzsaw_bbvz00(((BgL_regsetz00_bglt) BgL_oz00_4014));
		}

	}



/* regset-msize */
	BGL_EXPORTED_DEF int BGl_regsetzd2msiza7ez75zzsaw_bbvz00(BgL_regsetz00_bglt
		BgL_oz00_67)
	{
		{	/* SawMill/regset.sch 93 */
			return (((BgL_regsetz00_bglt) COBJECT(BgL_oz00_67))->BgL_msiza7eza7);
		}

	}



/* &regset-msize */
	obj_t BGl_z62regsetzd2msiza7ez17zzsaw_bbvz00(obj_t BgL_envz00_4015,
		obj_t BgL_oz00_4016)
	{
		{	/* SawMill/regset.sch 93 */
			return
				BINT(BGl_regsetzd2msiza7ez75zzsaw_bbvz00(
					((BgL_regsetz00_bglt) BgL_oz00_4016)));
		}

	}



/* regset-length */
	BGL_EXPORTED_DEF int BGl_regsetzd2lengthzd2zzsaw_bbvz00(BgL_regsetz00_bglt
		BgL_oz00_70)
	{
		{	/* SawMill/regset.sch 95 */
			return (((BgL_regsetz00_bglt) COBJECT(BgL_oz00_70))->BgL_lengthz00);
		}

	}



/* &regset-length */
	obj_t BGl_z62regsetzd2lengthzb0zzsaw_bbvz00(obj_t BgL_envz00_4017,
		obj_t BgL_oz00_4018)
	{
		{	/* SawMill/regset.sch 95 */
			return
				BINT(BGl_regsetzd2lengthzd2zzsaw_bbvz00(
					((BgL_regsetz00_bglt) BgL_oz00_4018)));
		}

	}



/* regset-length-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_regsetzd2lengthzd2setz12z12zzsaw_bbvz00(BgL_regsetz00_bglt BgL_oz00_71,
		int BgL_vz00_72)
	{
		{	/* SawMill/regset.sch 96 */
			return
				((((BgL_regsetz00_bglt) COBJECT(BgL_oz00_71))->BgL_lengthz00) =
				((int) BgL_vz00_72), BUNSPEC);
		}

	}



/* &regset-length-set! */
	obj_t BGl_z62regsetzd2lengthzd2setz12z70zzsaw_bbvz00(obj_t BgL_envz00_4019,
		obj_t BgL_oz00_4020, obj_t BgL_vz00_4021)
	{
		{	/* SawMill/regset.sch 96 */
			return
				BGl_regsetzd2lengthzd2setz12z12zzsaw_bbvz00(
				((BgL_regsetz00_bglt) BgL_oz00_4020), CINT(BgL_vz00_4021));
		}

	}



/* make-empty-bbset */
	obj_t BGl_makezd2emptyzd2bbsetz00zzsaw_bbvz00(void)
	{
		{	/* SawMill/bbset.sch 20 */
			{	/* SawMill/bbset.sch 21 */
				obj_t BgL_arg1606z00_2155;

				BgL_arg1606z00_2155 = BGl_getzd2bbzd2markz00zzsaw_bbvzd2typeszd2();
				{	/* SawMill/bbset.sch 15 */
					obj_t BgL_newz00_3358;

					BgL_newz00_3358 = create_struct(CNST_TABLE_REF(0L), (int) (2L));
					{	/* SawMill/bbset.sch 15 */
						int BgL_tmpz00_4449;

						BgL_tmpz00_4449 = (int) (1L);
						STRUCT_SET(BgL_newz00_3358, BgL_tmpz00_4449, BNIL);
					}
					{	/* SawMill/bbset.sch 15 */
						int BgL_tmpz00_4452;

						BgL_tmpz00_4452 = (int) (0L);
						STRUCT_SET(BgL_newz00_3358, BgL_tmpz00_4452, BgL_arg1606z00_2155);
					}
					return BgL_newz00_3358;
				}
			}
		}

	}



/* bbset-cons */
	obj_t BGl_bbsetzd2conszd2zzsaw_bbvz00(BgL_blockz00_bglt BgL_bz00_85,
		obj_t BgL_setz00_86)
	{
		{	/* SawMill/bbset.sch 33 */
			{	/* SawMill/bbset.sch 34 */
				obj_t BgL_mz00_2159;

				BgL_mz00_2159 = STRUCT_REF(BgL_setz00_86, (int) (0L));
				{
					BgL_blocksz00_bglt BgL_auxz00_4457;

					{
						obj_t BgL_auxz00_4458;

						{	/* SawMill/bbset.sch 36 */
							BgL_objectz00_bglt BgL_tmpz00_4459;

							BgL_tmpz00_4459 = ((BgL_objectz00_bglt) BgL_bz00_85);
							BgL_auxz00_4458 = BGL_OBJECT_WIDENING(BgL_tmpz00_4459);
						}
						BgL_auxz00_4457 = ((BgL_blocksz00_bglt) BgL_auxz00_4458);
					}
					((((BgL_blocksz00_bglt) COBJECT(BgL_auxz00_4457))->BgL_z52markz52) =
						((long) (long) CINT(BgL_mz00_2159)), BUNSPEC);
				}
				{	/* SawMill/bbset.sch 37 */
					obj_t BgL_arg1613z00_2161;

					{	/* SawMill/bbset.sch 37 */
						obj_t BgL_arg1614z00_2162;

						BgL_arg1614z00_2162 = STRUCT_REF(BgL_setz00_86, (int) (1L));
						BgL_arg1613z00_2161 =
							MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_85), BgL_arg1614z00_2162);
					}
					{	/* SawMill/bbset.sch 15 */
						int BgL_tmpz00_4469;

						BgL_tmpz00_4469 = (int) (1L);
						STRUCT_SET(BgL_setz00_86, BgL_tmpz00_4469, BgL_arg1613z00_2161);
				}}
				return BgL_setz00_86;
			}
		}

	}



/* bbv */
	BGL_EXPORTED_DEF obj_t BGl_bbvz00zzsaw_bbvz00(BgL_backendz00_bglt
		BgL_backz00_91, BgL_globalz00_bglt BgL_globalz00_92, obj_t BgL_paramsz00_93,
		obj_t BgL_blocksz00_94)
	{
		{	/* SawBbv/bbv.scm 48 */
			{	/* SawBbv/bbv.scm 49 */
				bool_t BgL_test2437z00_4472;

				if (CBOOL(BGl_za2sawzd2bbvzf3za2z21zzengine_paramz00))
					{	/* SawBbv/bbv.scm 50 */
						bool_t BgL_test2439z00_4475;

						if (NULLP(BGl_za2sawzd2bbvzd2functionsza2z00zzengine_paramz00))
							{	/* SawBbv/bbv.scm 50 */
								BgL_test2439z00_4475 = ((bool_t) 1);
							}
						else
							{	/* SawBbv/bbv.scm 51 */
								obj_t BgL_arg1829z00_2283;

								BgL_arg1829z00_2283 =
									(((BgL_variablez00_bglt) COBJECT(
											((BgL_variablez00_bglt) BgL_globalz00_92)))->BgL_idz00);
								BgL_test2439z00_4475 =
									CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00
									(BgL_arg1829z00_2283,
										BGl_za2sawzd2bbvzd2functionsza2z00zzengine_paramz00));
							}
						if (BgL_test2439z00_4475)
							{	/* SawBbv/bbv.scm 50 */
								BgL_test2437z00_4472 =
									(
									(long)
									CINT
									(BGl_za2maxzd2blockzd2mergezd2versionsza2zd2zzsaw_bbvzd2configzd2)
									>= 1L);
							}
						else
							{	/* SawBbv/bbv.scm 50 */
								BgL_test2437z00_4472 = ((bool_t) 0);
							}
					}
				else
					{	/* SawBbv/bbv.scm 49 */
						BgL_test2437z00_4472 = ((bool_t) 0);
					}
				if (BgL_test2437z00_4472)
					{	/* SawBbv/bbv.scm 49 */
						if (CBOOL(BGl_za2bbvzd2debugza2zd2zzsaw_bbvzd2configzd2))
							{	/* SawBbv/bbv.scm 54 */
								obj_t BgL_arg1681z00_2193;
								obj_t BgL_arg1684z00_2194;

								{	/* SawBbv/bbv.scm 54 */
									obj_t BgL_tmpz00_4486;

									BgL_tmpz00_4486 = BGL_CURRENT_DYNAMIC_ENV();
									BgL_arg1681z00_2193 =
										BGL_ENV_CURRENT_ERROR_PORT(BgL_tmpz00_4486);
								}
								BgL_arg1684z00_2194 =
									BGl_shapez00zztools_shapez00(((obj_t) BgL_globalz00_92));
								{	/* SawBbv/bbv.scm 54 */
									obj_t BgL_list1685z00_2195;

									{	/* SawBbv/bbv.scm 54 */
										obj_t BgL_arg1686z00_2196;

										{	/* SawBbv/bbv.scm 54 */
											obj_t BgL_arg1690z00_2197;

											{	/* SawBbv/bbv.scm 54 */
												obj_t BgL_arg1693z00_2198;

												{	/* SawBbv/bbv.scm 54 */
													obj_t BgL_arg1695z00_2199;

													{	/* SawBbv/bbv.scm 54 */
														obj_t BgL_arg1696z00_2200;

														BgL_arg1696z00_2200 =
															MAKE_YOUNG_PAIR(BgL_arg1684z00_2194, BNIL);
														BgL_arg1695z00_2199 =
															MAKE_YOUNG_PAIR(BGl_string2339z00zzsaw_bbvz00,
															BgL_arg1696z00_2200);
													}
													BgL_arg1693z00_2198 =
														MAKE_YOUNG_PAIR(BGl_string2340z00zzsaw_bbvz00,
														BgL_arg1695z00_2199);
												}
												BgL_arg1690z00_2197 =
													MAKE_YOUNG_PAIR(BINT(54L), BgL_arg1693z00_2198);
											}
											BgL_arg1686z00_2196 =
												MAKE_YOUNG_PAIR(BGl_string2341z00zzsaw_bbvz00,
												BgL_arg1690z00_2197);
										}
										BgL_list1685z00_2195 =
											MAKE_YOUNG_PAIR(BGl_string2342z00zzsaw_bbvz00,
											BgL_arg1686z00_2196);
									}
									BGl_tprintz00zz__r4_output_6_10_3z00(BgL_arg1681z00_2193,
										BgL_list1685z00_2195);
								}
							}
						else
							{	/* SawBbv/bbv.scm 54 */
								BFALSE;
							}
						BGl_startzd2bbvzd2cachez12z12zzsaw_bbvzd2cachezd2();
						{	/* SawBbv/bbv.scm 56 */
							obj_t BgL_arg1698z00_2201;

							BgL_arg1698z00_2201 =
								(((BgL_variablez00_bglt) COBJECT(
										((BgL_variablez00_bglt) BgL_globalz00_92)))->BgL_idz00);
							{	/* SawBbv/bbv.scm 56 */
								obj_t BgL_list1699z00_2202;

								{	/* SawBbv/bbv.scm 56 */
									obj_t BgL_arg1706z00_2203;

									BgL_arg1706z00_2203 =
										MAKE_YOUNG_PAIR(BgL_arg1698z00_2201, BNIL);
									BgL_list1699z00_2202 =
										MAKE_YOUNG_PAIR(BGl_string2343z00zzsaw_bbvz00,
										BgL_arg1706z00_2203);
								}
								BGl_verbosez00zztools_speekz00(BINT(2L), BgL_list1699z00_2202);
							}
						}
						if (
							((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >= 2L))
							{	/* SawBbv/bbv.scm 57 */
								BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
									BgL_paramsz00_93, BgL_blocksz00_94,
									BGl_string2344z00zzsaw_bbvz00);
							}
						else
							{	/* SawBbv/bbv.scm 57 */
								BFALSE;
							}
						BGl_setzd2maxzd2labelz12z12zzsaw_bbvzd2utilszd2(BgL_blocksz00_94);
						BGl_reorderzd2succsz12zc0zzsaw_bbvz00(BgL_blocksz00_94);
						if (
							((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >= 2L))
							{	/* SawBbv/bbv.scm 65 */
								BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
									BgL_paramsz00_93, BgL_blocksz00_94,
									BGl_string2345z00zzsaw_bbvz00);
							}
						else
							{	/* SawBbv/bbv.scm 65 */
								BFALSE;
							}
						{	/* SawBbv/bbv.scm 68 */
							obj_t BgL_arg1712z00_2206;

							BgL_arg1712z00_2206 = CAR(((obj_t) BgL_blocksz00_94));
							BGl_failz12z12zzsaw_bbvz00(
								((BgL_blockz00_bglt) BgL_arg1712z00_2206));
						}
						if (
							((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >= 2L))
							{	/* SawBbv/bbv.scm 69 */
								BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
									BgL_paramsz00_93, BgL_blocksz00_94,
									BGl_string2346z00zzsaw_bbvz00);
							}
						else
							{	/* SawBbv/bbv.scm 69 */
								BFALSE;
							}
						{	/* SawBbv/bbv.scm 73 */
							obj_t BgL_arg1714z00_2208;

							BgL_arg1714z00_2208 = CAR(((obj_t) BgL_blocksz00_94));
							BGl_normaliza7ezd2typecheckz12z67zzsaw_bbvz00(
								((BgL_blockz00_bglt) BgL_arg1714z00_2208));
						}
						if (
							((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >= 2L))
							{	/* SawBbv/bbv.scm 74 */
								BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
									BgL_paramsz00_93, BgL_blocksz00_94,
									BGl_string2347z00zzsaw_bbvz00);
							}
						else
							{	/* SawBbv/bbv.scm 74 */
								BFALSE;
							}
						{	/* SawBbv/bbv.scm 76 */
							obj_t BgL_blocksz00_2210;

							{	/* SawBbv/bbv.scm 76 */
								BgL_blockz00_bglt BgL_arg1827z00_2279;

								{	/* SawBbv/bbv.scm 76 */
									obj_t BgL_arg1828z00_2280;

									BgL_arg1828z00_2280 = CAR(((obj_t) BgL_blocksz00_94));
									BgL_arg1827z00_2279 =
										BGl_removezd2tempsz12zc0zzsaw_bbvz00(
										((BgL_blockz00_bglt) BgL_arg1828z00_2280));
								}
								BgL_blocksz00_2210 =
									BGl_normaliza7ezd2gotoz12z67zzsaw_bbvz00(BgL_arg1827z00_2279);
							}
							if (
								((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >=
									2L))
								{	/* SawBbv/bbv.scm 77 */
									BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
										BgL_paramsz00_93, BgL_blocksz00_2210,
										BGl_string2348z00zzsaw_bbvz00);
								}
							else
								{	/* SawBbv/bbv.scm 77 */
									BFALSE;
								}
							{	/* SawBbv/bbv.scm 79 */
								obj_t BgL_blocksz00_2212;

								{	/* SawBbv/bbv.scm 79 */
									obj_t BgL_arg1826z00_2278;

									BgL_arg1826z00_2278 = CAR(BgL_blocksz00_2210);
									BgL_blocksz00_2212 =
										BGl_normaliza7ezd2ifeqz12z67zzsaw_bbvz00(
										((BgL_blockz00_bglt) BgL_arg1826z00_2278));
								}
								if (
									((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >=
										2L))
									{	/* SawBbv/bbv.scm 80 */
										BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
											BgL_paramsz00_93, BgL_blocksz00_2212,
											BGl_string2349z00zzsaw_bbvz00);
									}
								else
									{	/* SawBbv/bbv.scm 80 */
										BFALSE;
									}
								{	/* SawBbv/bbv.scm 82 */
									obj_t BgL_blocksz00_2214;

									{	/* SawBbv/bbv.scm 82 */
										obj_t BgL_arg1825z00_2277;

										BgL_arg1825z00_2277 = CAR(BgL_blocksz00_2212);
										BgL_blocksz00_2214 =
											BGl_normaliza7ezd2movz12z67zzsaw_bbvz00(
											((BgL_blockz00_bglt) BgL_arg1825z00_2277));
									}
									if (
										((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >=
											2L))
										{	/* SawBbv/bbv.scm 83 */
											BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
												BgL_paramsz00_93, BgL_blocksz00_2214,
												BGl_string2350z00zzsaw_bbvz00);
										}
									else
										{	/* SawBbv/bbv.scm 83 */
											BFALSE;
										}
									{	/* SawBbv/bbv.scm 85 */
										obj_t BgL_regsz00_2216;

										BgL_regsz00_2216 =
											BGl_bbvzd2livenessz12zc0zzsaw_bbvzd2livenesszd2
											(BgL_backz00_91, BgL_blocksz00_2214, BgL_paramsz00_93);
										{	/* SawBbv/bbv.scm 87 */
											obj_t BgL_arg1729z00_2217;

											BgL_arg1729z00_2217 = CAR(BgL_blocksz00_2214);
											BGl_markzd2mergez12zc0zzsaw_bbvz00(
												((BgL_blockz00_bglt) BgL_arg1729z00_2217));
										}
										if (
											((long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00)
												>= 2L))
											{	/* SawBbv/bbv.scm 88 */
												BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2(BgL_globalz00_92,
													BgL_paramsz00_93, BgL_blocksz00_2214,
													BGl_string2351z00zzsaw_bbvz00);
											}
										else
											{	/* SawBbv/bbv.scm 88 */
												BFALSE;
											}
										{	/* SawBbv/bbv.scm 90 */
											obj_t BgL_exitd1172z00_2219;

											BgL_exitd1172z00_2219 = BGL_EXITD_TOP_AS_OBJ();
											{	/* SawBbv/bbv.scm 122 */
												obj_t BgL_zc3z04anonymousza31799ze3z87_4022;

												BgL_zc3z04anonymousza31799ze3z87_4022 =
													MAKE_FX_PROCEDURE
													(BGl_z62zc3z04anonymousza31799ze3ze5zzsaw_bbvz00,
													(int) (0L), (int) (1L));
												PROCEDURE_SET(BgL_zc3z04anonymousza31799ze3z87_4022,
													(int) (0L), BgL_regsz00_2216);
												{	/* SawBbv/bbv.scm 90 */
													obj_t BgL_arg1820z00_3405;

													{	/* SawBbv/bbv.scm 90 */
														obj_t BgL_arg1821z00_3406;

														BgL_arg1821z00_3406 =
															BGL_EXITD_PROTECT(BgL_exitd1172z00_2219);
														BgL_arg1820z00_3405 =
															MAKE_YOUNG_PAIR
															(BgL_zc3z04anonymousza31799ze3z87_4022,
															BgL_arg1821z00_3406);
													}
													BGL_EXITD_PROTECT_SET(BgL_exitd1172z00_2219,
														BgL_arg1820z00_3405);
													BUNSPEC;
												}
												{	/* SawBbv/bbv.scm 91 */
													obj_t BgL_tmp1174z00_2221;

													{	/* SawBbv/bbv.scm 93 */
														BgL_blockz00_bglt BgL_sz00_2223;

														{	/* SawBbv/bbv.scm 93 */
															obj_t BgL_arg1794z00_2259;
															BgL_bbvzd2ctxzd2_bglt BgL_arg1798z00_2260;

															BgL_arg1794z00_2259 = CAR(BgL_blocksz00_2214);
															BgL_arg1798z00_2260 =
																BGl_paramszd2ze3ctxz31zzsaw_bbvzd2typeszd2
																(BgL_paramsz00_93);
															BgL_sz00_2223 =
																BGl_bbvzd2blockza2z70zzsaw_bbvzd2specializa7ez75
																(((BgL_blockz00_bglt) BgL_arg1794z00_2259),
																BgL_arg1798z00_2260);
														}
														{	/* SawBbv/bbv.scm 93 */
															obj_t BgL__z00_2224;

															if (
																((long)
																	CINT
																	(BGl_za2tracezd2levelza2zd2zzengine_paramz00)
																	>= 2L))
																{	/* SawBbv/bbv.scm 97 */
																	obj_t BgL_arg1793z00_2258;

																	BgL_arg1793z00_2258 =
																		BGl_blockzd2ze3blockzd2listze3zzsaw_bbvzd2utilszd2
																		(BgL_regsz00_2216,
																		((BgL_blockz00_bglt) BgL_sz00_2223));
																	BgL__z00_2224 =
																		BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2
																		(BgL_globalz00_92, BgL_paramsz00_93,
																		BgL_arg1793z00_2258,
																		BGl_string2352z00zzsaw_bbvz00);
																}
															else
																{	/* SawBbv/bbv.scm 95 */
																	BgL__z00_2224 = BFALSE;
																}
															{	/* SawBbv/bbv.scm 95 */
																obj_t BgL___z00_2225;

																if (CBOOL
																	(BGl_za2bbvzd2logza2zd2zzsaw_bbvzd2configzd2))
																	{	/* SawBbv/bbv.scm 99 */
																		BgL___z00_2225 =
																			BGl_logzd2blockszd2zzsaw_bbvzd2debugzd2
																			(BgL_globalz00_92, BgL_paramsz00_93,
																			BgL_blocksz00_2214);
																	}
																else
																	{	/* SawBbv/bbv.scm 99 */
																		BgL___z00_2225 = BFALSE;
																	}
																{	/* SawBbv/bbv.scm 99 */
																	obj_t BgL_bz00_2226;

																	{	/* SawBbv/bbv.scm 103 */
																		obj_t BgL_arg1753z00_2249;

																		{	/* SawBbv/bbv.scm 103 */
																			obj_t BgL_arg1759z00_2250;

																			if (CBOOL
																				(BGl_za2bbvzd2blockszd2cleanupza2z00zzsaw_bbvzd2configzd2))
																				{	/* SawBbv/bbv.scm 109 */
																					obj_t BgL_arg1760z00_2251;

																					{	/* SawBbv/bbv.scm 109 */
																						obj_t BgL_arg1763z00_2252;

																						{	/* SawBbv/bbv.scm 109 */
																							obj_t BgL_arg1768z00_2253;

																							{	/* SawBbv/bbv.scm 109 */
																								obj_t BgL_arg1771z00_2254;

																								BgL_arg1771z00_2254 =
																									BGl_coalescez12z12zzsaw_bbvzd2optimzd2
																									(BGl_getzd2bbzd2markz00zzsaw_bbvzd2typeszd2
																									(),
																									BGl_gcz12z12zzsaw_bbvz00
																									(BgL_sz00_2223));
																								BgL_arg1768z00_2253 =
																									BGl_simplifyzd2branchz12zc0zzsaw_bbvzd2optimzd2
																									(((BgL_blockz00_bglt)
																										BgL_arg1771z00_2254));
																							}
																							BgL_arg1763z00_2252 =
																								BGl_removezd2gotoz12zc0zzsaw_bbvzd2optimzd2
																								(((BgL_blockz00_bglt)
																									BgL_arg1768z00_2253));
																						}
																						BgL_arg1760z00_2251 =
																							BGl_removezd2nopz12zc0zzsaw_bbvzd2optimzd2
																							(((BgL_blockz00_bglt)
																								BgL_arg1763z00_2252));
																					}
																					BgL_arg1759z00_2250 =
																						BGl_simplifyzd2branchz12zc0zzsaw_bbvzd2optimzd2
																						(((BgL_blockz00_bglt)
																							BgL_arg1760z00_2251));
																				}
																			else
																				{	/* SawBbv/bbv.scm 103 */
																					BgL_arg1759z00_2250 =
																						((obj_t) BgL_sz00_2223);
																				}
																			BgL_arg1753z00_2249 =
																				BGl_assertzd2contextz12zc0zzsaw_bbvzd2debugzd2
																				(((BgL_blockz00_bglt)
																					BgL_arg1759z00_2250));
																		}
																		BgL_bz00_2226 =
																			BGl_blockzd2ze3blockzd2listze3zzsaw_bbvzd2utilszd2
																			(BgL_regsz00_2216,
																			((BgL_blockz00_bglt)
																				BgL_arg1753z00_2249));
																	}
																	{	/* SawBbv/bbv.scm 101 */

																		{	/* SawBbv/bbv.scm 113 */
																			long BgL_arg1733z00_2227;
																			long BgL_arg1734z00_2228;

																			BgL_arg1733z00_2227 =
																				bgl_list_length(BgL_blocksz00_2214);
																			BgL_arg1734z00_2228 =
																				bgl_list_length(BgL_bz00_2226);
																			{	/* SawBbv/bbv.scm 112 */
																				obj_t BgL_list1735z00_2229;

																				{	/* SawBbv/bbv.scm 112 */
																					obj_t BgL_arg1736z00_2230;

																					{	/* SawBbv/bbv.scm 112 */
																						obj_t BgL_arg1739z00_2231;

																						{	/* SawBbv/bbv.scm 112 */
																							obj_t BgL_arg1741z00_2232;

																							BgL_arg1741z00_2232 =
																								MAKE_YOUNG_PAIR(BINT
																								(BgL_arg1734z00_2228), BNIL);
																							BgL_arg1739z00_2231 =
																								MAKE_YOUNG_PAIR
																								(BGl_string2353z00zzsaw_bbvz00,
																								BgL_arg1741z00_2232);
																						}
																						BgL_arg1736z00_2230 =
																							MAKE_YOUNG_PAIR(BINT
																							(BgL_arg1733z00_2227),
																							BgL_arg1739z00_2231);
																					}
																					BgL_list1735z00_2229 =
																						MAKE_YOUNG_PAIR
																						(BGl_string2354z00zzsaw_bbvz00,
																						BgL_arg1736z00_2230);
																				}
																				BGl_verbosez00zztools_speekz00(BINT(3L),
																					BgL_list1735z00_2229);
																		}}
																		{	/* SawBbv/bbv.scm 114 */
																			obj_t BgL_list1742z00_2233;

																			BgL_list1742z00_2233 =
																				MAKE_YOUNG_PAIR
																				(BGl_string2355z00zzsaw_bbvz00, BNIL);
																			BGl_verbosez00zztools_speekz00(BINT(2L),
																				BgL_list1742z00_2233);
																		}
																		if (
																			((long)
																				CINT
																				(BGl_za2tracezd2levelza2zd2zzengine_paramz00)
																				>= 1L))
																			{	/* SawBbv/bbv.scm 117 */
																				obj_t BgL_arg1745z00_2235;

																				BgL_arg1745z00_2235 =
																					BGl_blockzd2ze3blockzd2listze3zzsaw_bbvzd2utilszd2
																					(BgL_regsz00_2216,
																					((BgL_blockz00_bglt) BgL_sz00_2223));
																				BGl_dumpzd2cfgzd2zzsaw_bbvzd2debugzd2
																					(BgL_globalz00_92, BgL_paramsz00_93,
																					BgL_arg1745z00_2235,
																					BGl_string2356z00zzsaw_bbvz00);
																			}
																		else
																			{	/* SawBbv/bbv.scm 115 */
																				BFALSE;
																			}
																		{
																			obj_t BgL_l1538z00_2238;

																			BgL_l1538z00_2238 = BgL_bz00_2226;
																		BgL_zc3z04anonymousza31746ze3z87_2239:
																			if (NULLP(BgL_l1538z00_2238))
																				{	/* SawBbv/bbv.scm 118 */
																					BgL_bz00_2226;
																				}
																			else
																				{	/* SawBbv/bbv.scm 118 */
																					{	/* SawBbv/bbv.scm 118 */
																						obj_t BgL_arg1748z00_2241;

																						{	/* SawBbv/bbv.scm 118 */
																							obj_t BgL_bz00_2242;

																							BgL_bz00_2242 =
																								CAR(
																								((obj_t) BgL_l1538z00_2238));
																							{	/* SawBbv/bbv.scm 118 */
																								long BgL_arg1749z00_2244;

																								{	/* SawBbv/bbv.scm 118 */
																									obj_t BgL_arg1750z00_2245;

																									{	/* SawBbv/bbv.scm 118 */
																										obj_t BgL_arg1751z00_2246;

																										{	/* SawBbv/bbv.scm 118 */
																											long BgL_arg1808z00_3412;

																											{	/* SawBbv/bbv.scm 118 */
																												long
																													BgL_arg1809z00_3413;
																												BgL_arg1809z00_3413 =
																													BGL_OBJECT_CLASS_NUM((
																														(BgL_objectz00_bglt)
																														BgL_bz00_2242));
																												BgL_arg1808z00_3412 =
																													(BgL_arg1809z00_3413 -
																													OBJECT_TYPE);
																											}
																											BgL_arg1751z00_2246 =
																												VECTOR_REF
																												(BGl_za2classesza2z00zz__objectz00,
																												BgL_arg1808z00_3412);
																										}
																										BgL_arg1750z00_2245 =
																											BGl_classzd2superzd2zz__objectz00
																											(BgL_arg1751z00_2246);
																									}
																									{	/* SawBbv/bbv.scm 118 */
																										obj_t BgL_tmpz00_4631;

																										BgL_tmpz00_4631 =
																											((obj_t)
																											BgL_arg1750z00_2245);
																										BgL_arg1749z00_2244 =
																											BGL_CLASS_NUM
																											(BgL_tmpz00_4631);
																								}}
																								BGL_OBJECT_CLASS_NUM_SET(
																									((BgL_objectz00_bglt)
																										BgL_bz00_2242),
																									BgL_arg1749z00_2244);
																							}
																							{	/* SawBbv/bbv.scm 118 */
																								BgL_objectz00_bglt
																									BgL_tmpz00_4636;
																								BgL_tmpz00_4636 =
																									((BgL_objectz00_bglt)
																									BgL_bz00_2242);
																								BGL_OBJECT_WIDENING_SET
																									(BgL_tmpz00_4636, BFALSE);
																							}
																							((BgL_objectz00_bglt)
																								BgL_bz00_2242);
																							BgL_arg1748z00_2241 =
																								BgL_bz00_2242;
																						}
																						{	/* SawBbv/bbv.scm 118 */
																							obj_t BgL_tmpz00_4640;

																							BgL_tmpz00_4640 =
																								((obj_t) BgL_l1538z00_2238);
																							SET_CAR(BgL_tmpz00_4640,
																								BgL_arg1748z00_2241);
																					}}
																					{	/* SawBbv/bbv.scm 118 */
																						obj_t BgL_arg1752z00_2247;

																						BgL_arg1752z00_2247 =
																							CDR(((obj_t) BgL_l1538z00_2238));
																						{
																							obj_t BgL_l1538z00_4645;

																							BgL_l1538z00_4645 =
																								BgL_arg1752z00_2247;
																							BgL_l1538z00_2238 =
																								BgL_l1538z00_4645;
																							goto
																								BgL_zc3z04anonymousza31746ze3z87_2239;
																						}
																					}
																				}
																		}
																		BgL_tmp1174z00_2221 = BgL_bz00_2226;
																	}
																}
															}
														}
													}
													{	/* SawBbv/bbv.scm 90 */
														bool_t BgL_test2455z00_4646;

														{	/* SawBbv/bbv.scm 90 */
															obj_t BgL_arg1819z00_3426;

															BgL_arg1819z00_3426 =
																BGL_EXITD_PROTECT(BgL_exitd1172z00_2219);
															BgL_test2455z00_4646 = PAIRP(BgL_arg1819z00_3426);
														}
														if (BgL_test2455z00_4646)
															{	/* SawBbv/bbv.scm 90 */
																obj_t BgL_arg1817z00_3427;

																{	/* SawBbv/bbv.scm 90 */
																	obj_t BgL_arg1818z00_3428;

																	BgL_arg1818z00_3428 =
																		BGL_EXITD_PROTECT(BgL_exitd1172z00_2219);
																	BgL_arg1817z00_3427 =
																		CDR(((obj_t) BgL_arg1818z00_3428));
																}
																BGL_EXITD_PROTECT_SET(BgL_exitd1172z00_2219,
																	BgL_arg1817z00_3427);
																BUNSPEC;
															}
														else
															{	/* SawBbv/bbv.scm 90 */
																BFALSE;
															}
													}
													BGl_z62zc3z04anonymousza31799ze3ze5zzsaw_bbvz00
														(BgL_zc3z04anonymousza31799ze3z87_4022);
													return BgL_tmp1174z00_2221;
												}
											}
										}
									}
								}
							}
						}
					}
				else
					{	/* SawBbv/bbv.scm 49 */
						return BgL_blocksz00_94;
					}
			}
		}

	}



/* &bbv */
	obj_t BGl_z62bbvz62zzsaw_bbvz00(obj_t BgL_envz00_4023, obj_t BgL_backz00_4024,
		obj_t BgL_globalz00_4025, obj_t BgL_paramsz00_4026,
		obj_t BgL_blocksz00_4027)
	{
		{	/* SawBbv/bbv.scm 48 */
			return
				BGl_bbvz00zzsaw_bbvz00(
				((BgL_backendz00_bglt) BgL_backz00_4024),
				((BgL_globalz00_bglt) BgL_globalz00_4025), BgL_paramsz00_4026,
				BgL_blocksz00_4027);
		}

	}



/* &<@anonymous:1799> */
	obj_t BGl_z62zc3z04anonymousza31799ze3ze5zzsaw_bbvz00(obj_t BgL_envz00_4028)
	{
		{	/* SawBbv/bbv.scm 90 */
			{	/* SawBbv/bbv.scm 122 */
				obj_t BgL_regsz00_4029;

				BgL_regsz00_4029 = ((obj_t) PROCEDURE_REF(BgL_envz00_4028, (int) (0L)));
				{	/* SawBbv/bbv.scm 122 */
					bool_t BgL_tmpz00_4660;

					{	/* SawBbv/bbv.scm 122 */
						bool_t BgL_test2456z00_4661;

						if (
							((long) CINT(BGl_za2compilerzd2debugza2zd2zzengine_paramz00) >=
								1L))
							{	/* SawBbv/bbv.scm 122 */
								BgL_test2456z00_4661 = ((bool_t) 1);
							}
						else
							{	/* SawBbv/bbv.scm 122 */
								BgL_test2456z00_4661 =
									(
									(long) CINT(BGl_za2tracezd2levelza2zd2zzengine_paramz00) >=
									1L);
							}
						if (BgL_test2456z00_4661)
							{	/* SawBbv/bbv.scm 122 */
								BgL_tmpz00_4660 = ((bool_t) 0);
							}
						else
							{
								obj_t BgL_l1535z00_4076;

								BgL_l1535z00_4076 = BgL_regsz00_4029;
							BgL_zc3z04anonymousza31802ze3z87_4075:
								if (PAIRP(BgL_l1535z00_4076))
									{	/* SawBbv/bbv.scm 124 */
										{	/* SawBbv/bbv.scm 124 */
											obj_t BgL_rz00_4077;

											BgL_rz00_4077 = CAR(BgL_l1535z00_4076);
											{	/* SawBbv/bbv.scm 124 */
												long BgL_arg1816z00_4078;

												{	/* SawBbv/bbv.scm 124 */
													obj_t BgL_arg1822z00_4079;

													{	/* SawBbv/bbv.scm 124 */
														obj_t BgL_arg1823z00_4080;

														{	/* SawBbv/bbv.scm 124 */
															long BgL_arg1808z00_4081;

															{	/* SawBbv/bbv.scm 124 */
																long BgL_arg1809z00_4082;

																BgL_arg1809z00_4082 =
																	BGL_OBJECT_CLASS_NUM(
																	((BgL_objectz00_bglt) BgL_rz00_4077));
																BgL_arg1808z00_4081 =
																	(BgL_arg1809z00_4082 - OBJECT_TYPE);
															}
															BgL_arg1823z00_4080 =
																VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
																BgL_arg1808z00_4081);
														}
														BgL_arg1822z00_4079 =
															BGl_classzd2superzd2zz__objectz00
															(BgL_arg1823z00_4080);
													}
													{	/* SawBbv/bbv.scm 124 */
														obj_t BgL_tmpz00_4675;

														BgL_tmpz00_4675 = ((obj_t) BgL_arg1822z00_4079);
														BgL_arg1816z00_4078 =
															BGL_CLASS_NUM(BgL_tmpz00_4675);
												}}
												BGL_OBJECT_CLASS_NUM_SET(
													((BgL_objectz00_bglt) BgL_rz00_4077),
													BgL_arg1816z00_4078);
											}
											{	/* SawBbv/bbv.scm 124 */
												BgL_objectz00_bglt BgL_tmpz00_4680;

												BgL_tmpz00_4680 = ((BgL_objectz00_bglt) BgL_rz00_4077);
												BGL_OBJECT_WIDENING_SET(BgL_tmpz00_4680, BFALSE);
											}
											((BgL_objectz00_bglt) BgL_rz00_4077);
											BgL_rz00_4077;
										}
										{
											obj_t BgL_l1535z00_4684;

											BgL_l1535z00_4684 = CDR(BgL_l1535z00_4076);
											BgL_l1535z00_4076 = BgL_l1535z00_4684;
											goto BgL_zc3z04anonymousza31802ze3z87_4075;
										}
									}
								else
									{	/* SawBbv/bbv.scm 124 */
										BgL_tmpz00_4660 = ((bool_t) 1);
									}
							}
					}
					return BBOOL(BgL_tmpz00_4660);
				}
			}
		}

	}



/* mark-merge! */
	obj_t BGl_markzd2mergez12zc0zzsaw_bbvz00(BgL_blockz00_bglt BgL_blockz00_95)
	{
		{	/* SawBbv/bbv.scm 133 */
			return BGl_loopze70ze7zzsaw_bbvz00(((obj_t) BgL_blockz00_95), BNIL);
		}

	}



/* loop~0 */
	obj_t BGl_loopze70ze7zzsaw_bbvz00(obj_t BgL_blockz00_2286,
		obj_t BgL_stackz00_2287)
	{
		{	/* SawBbv/bbv.scm 135 */
			{	/* SawBbv/bbv.scm 139 */
				bool_t BgL_test2459z00_4689;

				{	/* SawBbv/bbv.scm 139 */
					obj_t BgL_arg1840z00_2305;

					{
						BgL_blockvz00_bglt BgL_auxz00_4690;

						{
							obj_t BgL_auxz00_4691;

							{	/* SawBbv/bbv.scm 139 */
								BgL_objectz00_bglt BgL_tmpz00_4692;

								BgL_tmpz00_4692 =
									((BgL_objectz00_bglt)
									((BgL_blockz00_bglt) BgL_blockz00_2286));
								BgL_auxz00_4691 = BGL_OBJECT_WIDENING(BgL_tmpz00_4692);
							}
							BgL_auxz00_4690 = ((BgL_blockvz00_bglt) BgL_auxz00_4691);
						}
						BgL_arg1840z00_2305 =
							(((BgL_blockvz00_bglt) COBJECT(BgL_auxz00_4690))->BgL_mergez00);
					}
					BgL_test2459z00_4689 = (BgL_arg1840z00_2305 == BUNSPEC);
				}
				if (BgL_test2459z00_4689)
					{	/* SawBbv/bbv.scm 139 */
						if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00
								(BgL_blockz00_2286, BgL_stackz00_2287)))
							{
								BgL_blockvz00_bglt BgL_auxz00_4702;

								{
									obj_t BgL_auxz00_4703;

									{	/* SawBbv/bbv.scm 143 */
										BgL_objectz00_bglt BgL_tmpz00_4704;

										BgL_tmpz00_4704 =
											((BgL_objectz00_bglt)
											((BgL_blockz00_bglt) BgL_blockz00_2286));
										BgL_auxz00_4703 = BGL_OBJECT_WIDENING(BgL_tmpz00_4704);
									}
									BgL_auxz00_4702 = ((BgL_blockvz00_bglt) BgL_auxz00_4703);
								}
								return
									((((BgL_blockvz00_bglt) COBJECT(BgL_auxz00_4702))->
										BgL_mergez00) = ((obj_t) BTRUE), BUNSPEC);
							}
						else
							{	/* SawBbv/bbv.scm 145 */
								obj_t BgL_nstackz00_2293;

								BgL_nstackz00_2293 =
									MAKE_YOUNG_PAIR(BgL_blockz00_2286, BgL_stackz00_2287);
								{	/* SawBbv/bbv.scm 146 */
									obj_t BgL_g1542z00_2294;

									BgL_g1542z00_2294 =
										(((BgL_blockz00_bglt) COBJECT(
												((BgL_blockz00_bglt)
													((BgL_blockz00_bglt) BgL_blockz00_2286))))->
										BgL_succsz00);
									{
										obj_t BgL_l1540z00_2296;

										BgL_l1540z00_2296 = BgL_g1542z00_2294;
									BgL_zc3z04anonymousza31834ze3z87_2297:
										if (PAIRP(BgL_l1540z00_2296))
											{	/* SawBbv/bbv.scm 146 */
												BGl_loopze70ze7zzsaw_bbvz00(CAR(BgL_l1540z00_2296),
													BgL_nstackz00_2293);
												{
													obj_t BgL_l1540z00_4718;

													BgL_l1540z00_4718 = CDR(BgL_l1540z00_2296);
													BgL_l1540z00_2296 = BgL_l1540z00_4718;
													goto BgL_zc3z04anonymousza31834ze3z87_2297;
												}
											}
										else
											{	/* SawBbv/bbv.scm 146 */
												((bool_t) 1);
											}
									}
								}
								{	/* SawBbv/bbv.scm 149 */
									bool_t BgL_test2462z00_4720;

									{	/* SawBbv/bbv.scm 149 */
										obj_t BgL_arg1839z00_2304;

										{
											BgL_blockvz00_bglt BgL_auxz00_4721;

											{
												obj_t BgL_auxz00_4722;

												{	/* SawBbv/bbv.scm 149 */
													BgL_objectz00_bglt BgL_tmpz00_4723;

													BgL_tmpz00_4723 =
														((BgL_objectz00_bglt)
														((BgL_blockz00_bglt) BgL_blockz00_2286));
													BgL_auxz00_4722 =
														BGL_OBJECT_WIDENING(BgL_tmpz00_4723);
												}
												BgL_auxz00_4721 =
													((BgL_blockvz00_bglt) BgL_auxz00_4722);
											}
											BgL_arg1839z00_2304 =
												(((BgL_blockvz00_bglt) COBJECT(BgL_auxz00_4721))->
												BgL_mergez00);
										}
										BgL_test2462z00_4720 = (BgL_arg1839z00_2304 == BTRUE);
									}
									if (BgL_test2462z00_4720)
										{	/* SawBbv/bbv.scm 149 */
											return BFALSE;
										}
									else
										{
											BgL_blockvz00_bglt BgL_auxz00_4730;

											{
												obj_t BgL_auxz00_4731;

												{	/* SawBbv/bbv.scm 150 */
													BgL_objectz00_bglt BgL_tmpz00_4732;

													BgL_tmpz00_4732 =
														((BgL_objectz00_bglt)
														((BgL_blockz00_bglt) BgL_blockz00_2286));
													BgL_auxz00_4731 =
														BGL_OBJECT_WIDENING(BgL_tmpz00_4732);
												}
												BgL_auxz00_4730 =
													((BgL_blockvz00_bglt) BgL_auxz00_4731);
											}
											return
												((((BgL_blockvz00_bglt) COBJECT(BgL_auxz00_4730))->
													BgL_mergez00) = ((obj_t) BFALSE), BUNSPEC);
										}
								}
							}
					}
				else
					{	/* SawBbv/bbv.scm 139 */
						return BUNSPEC;
					}
			}
		}

	}



/* reorder-succs! */
	bool_t BGl_reorderzd2succsz12zc0zzsaw_bbvz00(obj_t BgL_blocksz00_96)
	{
		{	/* SawBbv/bbv.scm 155 */
			{	/* SawBbv/bbv.scm 157 */
				bool_t BgL_test2463z00_4738;

				if (NULLP(BgL_blocksz00_96))
					{	/* SawBbv/bbv.scm 157 */
						BgL_test2463z00_4738 = ((bool_t) 0);
					}
				else
					{	/* SawBbv/bbv.scm 157 */
						obj_t BgL_tmpz00_4741;

						BgL_tmpz00_4741 = CDR(BgL_blocksz00_96);
						BgL_test2463z00_4738 = PAIRP(BgL_tmpz00_4741);
					}
				if (BgL_test2463z00_4738)
					{
						obj_t BgL_bsz00_2311;

						BgL_bsz00_2311 = BgL_blocksz00_96;
					BgL_zc3z04anonymousza31844ze3z87_2312:
						{	/* SawBbv/bbv.scm 159 */
							bool_t BgL_test2465z00_4744;

							{	/* SawBbv/bbv.scm 159 */
								obj_t BgL_tmpz00_4745;

								BgL_tmpz00_4745 = CDR(((obj_t) BgL_bsz00_2311));
								BgL_test2465z00_4744 = PAIRP(BgL_tmpz00_4745);
							}
							if (BgL_test2465z00_4744)
								{	/* SawBbv/bbv.scm 160 */
									obj_t BgL_bz00_2315;
									obj_t BgL_nz00_2316;

									BgL_bz00_2315 = CAR(((obj_t) BgL_bsz00_2311));
									{	/* SawBbv/bbv.scm 161 */
										obj_t BgL_pairz00_3442;

										BgL_pairz00_3442 = CDR(((obj_t) BgL_bsz00_2311));
										BgL_nz00_2316 = CAR(BgL_pairz00_3442);
									}
									if (NULLP(
											(((BgL_blockz00_bglt) COBJECT(
														((BgL_blockz00_bglt) BgL_bz00_2315)))->
												BgL_succsz00)))
										{	/* SawBbv/bbv.scm 163 */
											BFALSE;
										}
									else
										{	/* SawBbv/bbv.scm 164 */
											bool_t BgL_test2467z00_4758;

											{	/* SawBbv/bbv.scm 164 */
												bool_t BgL_test2468z00_4759;

												{	/* SawBbv/bbv.scm 164 */
													obj_t BgL_arg1872z00_2337;

													BgL_arg1872z00_2337 =
														CAR(BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00(
															(((BgL_blockz00_bglt) COBJECT(
																		((BgL_blockz00_bglt) BgL_bz00_2315)))->
																BgL_firstz00)));
													BgL_test2468z00_4759 =
														BGl_rtl_inszd2gozf3z21zzsaw_bbvzd2typeszd2((
															(BgL_rtl_insz00_bglt) BgL_arg1872z00_2337));
												}
												if (BgL_test2468z00_4759)
													{	/* SawBbv/bbv.scm 164 */
														BgL_test2467z00_4758 = ((bool_t) 1);
													}
												else
													{	/* SawBbv/bbv.scm 165 */
														obj_t BgL_arg1867z00_2334;

														BgL_arg1867z00_2334 =
															CAR
															(BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00((
																	((BgL_blockz00_bglt)
																		COBJECT(((BgL_blockz00_bglt)
																				BgL_bz00_2315)))->BgL_firstz00)));
														BgL_test2467z00_4758 =
															CBOOL
															(BGl_rtl_inszd2switchzf3z21zzsaw_bbvzd2typeszd2((
																	(BgL_rtl_insz00_bglt) BgL_arg1867z00_2334)));
													}
											}
											if (BgL_test2467z00_4758)
												{	/* SawBbv/bbv.scm 164 */
													BFALSE;
												}
											else
												{
													obj_t BgL_auxz00_4773;

													{	/* SawBbv/bbv.scm 166 */
														obj_t BgL_arg1864z00_2331;

														{	/* SawBbv/bbv.scm 166 */
															obj_t BgL_arg1866z00_2332;

															BgL_arg1866z00_2332 =
																(((BgL_blockz00_bglt) COBJECT(
																		((BgL_blockz00_bglt) BgL_bz00_2315)))->
																BgL_succsz00);
															BgL_arg1864z00_2331 =
																bgl_remq_bang(BgL_nz00_2316,
																BgL_arg1866z00_2332);
														}
														BgL_auxz00_4773 =
															MAKE_YOUNG_PAIR(BgL_nz00_2316,
															BgL_arg1864z00_2331);
													}
													((((BgL_blockz00_bglt) COBJECT(
																	((BgL_blockz00_bglt) BgL_bz00_2315)))->
															BgL_succsz00) =
														((obj_t) BgL_auxz00_4773), BUNSPEC);
												}
										}
									{	/* SawBbv/bbv.scm 167 */
										obj_t BgL_arg1877z00_2341;

										BgL_arg1877z00_2341 = CDR(((obj_t) BgL_bsz00_2311));
										{
											obj_t BgL_bsz00_4782;

											BgL_bsz00_4782 = BgL_arg1877z00_2341;
											BgL_bsz00_2311 = BgL_bsz00_4782;
											goto BgL_zc3z04anonymousza31844ze3z87_2312;
										}
									}
								}
							else
								{	/* SawBbv/bbv.scm 159 */
									return ((bool_t) 0);
								}
						}
					}
				else
					{	/* SawBbv/bbv.scm 157 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* gc! */
	BgL_blockz00_bglt BGl_gcz12z12zzsaw_bbvz00(BgL_blockz00_bglt BgL_bz00_97)
	{
		{	/* SawBbv/bbv.scm 176 */
			{
				BgL_blockz00_bglt BgL_bz00_2371;
				obj_t BgL_setmz00_2372;
				BgL_blockz00_bglt BgL_bz00_2349;

				BgL_bz00_2371 = BgL_bz00_97;
				BgL_bz00_2349 = BgL_bz00_97;
				{	/* SawBbv/bbv.scm 179 */
					obj_t BgL_g1181z00_2351;
					obj_t BgL_g1182z00_2352;

					{	/* SawBbv/bbv.scm 179 */
						obj_t BgL_list1897z00_2370;

						BgL_list1897z00_2370 =
							MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_2349), BNIL);
						BgL_g1181z00_2351 = BgL_list1897z00_2370;
					}
					BgL_g1182z00_2352 = BGl_makezd2emptyzd2bbsetz00zzsaw_bbvz00();
					{
						obj_t BgL_bsz00_2354;
						obj_t BgL_setz00_2355;

						BgL_bsz00_2354 = BgL_g1181z00_2351;
						BgL_setz00_2355 = BgL_g1182z00_2352;
					BgL_zc3z04anonymousza31883ze3z87_2356:
						if (NULLP(BgL_bsz00_2354))
							{	/* SawBbv/bbv.scm 182 */
								BgL_setmz00_2372 = BgL_setz00_2355;
							}
						else
							{	/* SawBbv/bbv.scm 184 */
								bool_t BgL_test2476z00_4900;

								{	/* SawBbv/bbv.scm 184 */
									BgL_blockz00_bglt BgL_blockz00_3448;

									BgL_blockz00_3448 =
										((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2354)));
									{	/* SawBbv/bbv.scm 184 */
										long BgL_arg1608z00_3451;
										obj_t BgL_arg1609z00_3452;

										{
											BgL_blocksz00_bglt BgL_auxz00_4904;

											{
												obj_t BgL_auxz00_4905;

												{	/* SawBbv/bbv.scm 184 */
													BgL_objectz00_bglt BgL_tmpz00_4906;

													BgL_tmpz00_4906 =
														((BgL_objectz00_bglt) BgL_blockz00_3448);
													BgL_auxz00_4905 =
														BGL_OBJECT_WIDENING(BgL_tmpz00_4906);
												}
												BgL_auxz00_4904 =
													((BgL_blocksz00_bglt) BgL_auxz00_4905);
											}
											BgL_arg1608z00_3451 =
												(((BgL_blocksz00_bglt) COBJECT(BgL_auxz00_4904))->
												BgL_z52markz52);
										}
										BgL_arg1609z00_3452 =
											STRUCT_REF(BgL_setz00_2355, (int) (0L));
										BgL_test2476z00_4900 =
											(BINT(BgL_arg1608z00_3451) == BgL_arg1609z00_3452);
								}}
								if (BgL_test2476z00_4900)
									{	/* SawBbv/bbv.scm 185 */
										obj_t BgL_arg1888z00_2360;

										BgL_arg1888z00_2360 = CDR(((obj_t) BgL_bsz00_2354));
										{
											obj_t BgL_bsz00_4917;

											BgL_bsz00_4917 = BgL_arg1888z00_2360;
											BgL_bsz00_2354 = BgL_bsz00_4917;
											goto BgL_zc3z04anonymousza31883ze3z87_2356;
										}
									}
								else
									{	/* SawBbv/bbv.scm 187 */
										BgL_blockz00_bglt BgL_i1183z00_2361;

										BgL_i1183z00_2361 =
											((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2354)));
										if (CBOOL(BGl_za2bbvzd2debugza2zd2zzsaw_bbvzd2configzd2))
											{	/* SawBbv/bbv.scm 189 */
												obj_t BgL_arg1889z00_2362;

												BgL_arg1889z00_2362 = CAR(((obj_t) BgL_bsz00_2354));
												BGl_assertzd2blockzd2zzsaw_bbvzd2debugzd2(
													((BgL_blockz00_bglt) BgL_arg1889z00_2362),
													BGl_string2357z00zzsaw_bbvz00);
											}
										else
											{	/* SawBbv/bbv.scm 188 */
												BFALSE;
											}
										{	/* SawBbv/bbv.scm 190 */
											obj_t BgL_arg1890z00_2363;
											obj_t BgL_arg1892z00_2364;

											{	/* SawBbv/bbv.scm 190 */
												obj_t BgL_arg1893z00_2365;
												obj_t BgL_arg1894z00_2366;

												BgL_arg1893z00_2365 =
													(((BgL_blockz00_bglt) COBJECT(
															((BgL_blockz00_bglt) BgL_i1183z00_2361)))->
													BgL_succsz00);
												BgL_arg1894z00_2366 = CDR(((obj_t) BgL_bsz00_2354));
												BgL_arg1890z00_2363 =
													BGl_appendzd221011zd2zzsaw_bbvz00(BgL_arg1893z00_2365,
													BgL_arg1894z00_2366);
											}
											{	/* SawBbv/bbv.scm 191 */
												obj_t BgL_arg1895z00_2367;

												BgL_arg1895z00_2367 = CAR(((obj_t) BgL_bsz00_2354));
												BgL_arg1892z00_2364 =
													BGl_bbsetzd2conszd2zzsaw_bbvz00(
													((BgL_blockz00_bglt) BgL_arg1895z00_2367),
													BgL_setz00_2355);
											}
											{
												obj_t BgL_setz00_4937;
												obj_t BgL_bsz00_4936;

												BgL_bsz00_4936 = BgL_arg1890z00_2363;
												BgL_setz00_4937 = BgL_arg1892z00_2364;
												BgL_setz00_2355 = BgL_setz00_4937;
												BgL_bsz00_2354 = BgL_bsz00_4936;
												goto BgL_zc3z04anonymousza31883ze3z87_2356;
											}
										}
									}
							}
					}
				}
				{	/* SawBbv/bbv.scm 194 */
					obj_t BgL_g1184z00_2374;

					{	/* SawBbv/bbv.scm 194 */
						obj_t BgL_list1928z00_2423;

						BgL_list1928z00_2423 =
							MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_2371), BNIL);
						BgL_g1184z00_2374 = BgL_list1928z00_2423;
					}
					{
						obj_t BgL_bsz00_2377;
						obj_t BgL_setz00_2378;

						BgL_bsz00_2377 = BgL_g1184z00_2374;
						BgL_setz00_2378 = BNIL;
					BgL_zc3z04anonymousza31899ze3z87_2379:
						if (NULLP(BgL_bsz00_2377))
							{	/* SawBbv/bbv.scm 197 */
								BgL_setz00_2378;
							}
						else
							{	/* SawBbv/bbv.scm 197 */
								if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(CAR(
												((obj_t) BgL_bsz00_2377)), BgL_setz00_2378)))
									{	/* SawBbv/bbv.scm 200 */
										obj_t BgL_arg1905z00_2383;

										BgL_arg1905z00_2383 = CDR(((obj_t) BgL_bsz00_2377));
										{
											obj_t BgL_bsz00_4794;

											BgL_bsz00_4794 = BgL_arg1905z00_2383;
											BgL_bsz00_2377 = BgL_bsz00_4794;
											goto BgL_zc3z04anonymousza31899ze3z87_2379;
										}
									}
								else
									{	/* SawBbv/bbv.scm 202 */
										BgL_blockz00_bglt BgL_i1187z00_2384;

										BgL_i1187z00_2384 =
											((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2377)));
										{
											obj_t BgL_auxz00_4798;

											{	/* SawBbv/bbv.scm 203 */
												obj_t BgL_hook1547z00_2385;

												BgL_hook1547z00_2385 = MAKE_YOUNG_PAIR(BFALSE, BNIL);
												{	/* SawBbv/bbv.scm 203 */
													obj_t BgL_g1548z00_2386;

													BgL_g1548z00_2386 =
														(((BgL_blockz00_bglt) COBJECT(
																((BgL_blockz00_bglt) BgL_i1187z00_2384)))->
														BgL_predsz00);
													{
														obj_t BgL_l1544z00_2388;
														obj_t BgL_h1545z00_2389;

														BgL_l1544z00_2388 = BgL_g1548z00_2386;
														BgL_h1545z00_2389 = BgL_hook1547z00_2385;
													BgL_zc3z04anonymousza31906ze3z87_2390:
														if (NULLP(BgL_l1544z00_2388))
															{	/* SawBbv/bbv.scm 203 */
																BgL_auxz00_4798 = CDR(BgL_hook1547z00_2385);
															}
														else
															{	/* SawBbv/bbv.scm 203 */
																bool_t BgL_test2472z00_4806;

																{	/* SawBbv/bbv.scm 203 */
																	BgL_blockz00_bglt BgL_blockz00_3466;

																	BgL_blockz00_3466 =
																		((BgL_blockz00_bglt)
																		CAR(((obj_t) BgL_l1544z00_2388)));
																	{	/* SawBbv/bbv.scm 203 */
																		long BgL_arg1608z00_3469;
																		obj_t BgL_arg1609z00_3470;

																		{
																			BgL_blocksz00_bglt BgL_auxz00_4810;

																			{
																				obj_t BgL_auxz00_4811;

																				{	/* SawBbv/bbv.scm 203 */
																					BgL_objectz00_bglt BgL_tmpz00_4812;

																					BgL_tmpz00_4812 =
																						((BgL_objectz00_bglt)
																						BgL_blockz00_3466);
																					BgL_auxz00_4811 =
																						BGL_OBJECT_WIDENING
																						(BgL_tmpz00_4812);
																				}
																				BgL_auxz00_4810 =
																					((BgL_blocksz00_bglt)
																					BgL_auxz00_4811);
																			}
																			BgL_arg1608z00_3469 =
																				(((BgL_blocksz00_bglt)
																					COBJECT(BgL_auxz00_4810))->
																				BgL_z52markz52);
																		}
																		BgL_arg1609z00_3470 =
																			STRUCT_REF(BgL_setmz00_2372, (int) (0L));
																		BgL_test2472z00_4806 =
																			(BINT(BgL_arg1608z00_3469) ==
																			BgL_arg1609z00_3470);
																}}
																if (BgL_test2472z00_4806)
																	{	/* SawBbv/bbv.scm 203 */
																		obj_t BgL_nh1546z00_2394;

																		{	/* SawBbv/bbv.scm 203 */
																			obj_t BgL_arg1911z00_2396;

																			BgL_arg1911z00_2396 =
																				CAR(((obj_t) BgL_l1544z00_2388));
																			BgL_nh1546z00_2394 =
																				MAKE_YOUNG_PAIR(BgL_arg1911z00_2396,
																				BNIL);
																		}
																		SET_CDR(BgL_h1545z00_2389,
																			BgL_nh1546z00_2394);
																		{	/* SawBbv/bbv.scm 203 */
																			obj_t BgL_arg1909z00_2395;

																			BgL_arg1909z00_2395 =
																				CDR(((obj_t) BgL_l1544z00_2388));
																			{
																				obj_t BgL_h1545z00_4828;
																				obj_t BgL_l1544z00_4827;

																				BgL_l1544z00_4827 = BgL_arg1909z00_2395;
																				BgL_h1545z00_4828 = BgL_nh1546z00_2394;
																				BgL_h1545z00_2389 = BgL_h1545z00_4828;
																				BgL_l1544z00_2388 = BgL_l1544z00_4827;
																				goto
																					BgL_zc3z04anonymousza31906ze3z87_2390;
																			}
																		}
																	}
																else
																	{	/* SawBbv/bbv.scm 203 */
																		obj_t BgL_arg1914z00_2397;

																		BgL_arg1914z00_2397 =
																			CDR(((obj_t) BgL_l1544z00_2388));
																		{
																			obj_t BgL_l1544z00_4831;

																			BgL_l1544z00_4831 = BgL_arg1914z00_2397;
																			BgL_l1544z00_2388 = BgL_l1544z00_4831;
																			goto
																				BgL_zc3z04anonymousza31906ze3z87_2390;
																		}
																	}
															}
													}
												}
											}
											((((BgL_blockz00_bglt) COBJECT(
															((BgL_blockz00_bglt) BgL_i1187z00_2384)))->
													BgL_predsz00) = ((obj_t) BgL_auxz00_4798), BUNSPEC);
										}
										{	/* SawBbv/bbv.scm 204 */
											BgL_blockz00_bglt BgL_i1188z00_2400;

											{
												BgL_blocksz00_bglt BgL_auxz00_4833;

												{
													obj_t BgL_auxz00_4834;

													{	/* SawBbv/bbv.scm 205 */
														BgL_objectz00_bglt BgL_tmpz00_4835;

														BgL_tmpz00_4835 =
															((BgL_objectz00_bglt) BgL_i1187z00_2384);
														BgL_auxz00_4834 =
															BGL_OBJECT_WIDENING(BgL_tmpz00_4835);
													}
													BgL_auxz00_4833 =
														((BgL_blocksz00_bglt) BgL_auxz00_4834);
												}
												BgL_i1188z00_2400 =
													(((BgL_blocksz00_bglt) COBJECT(BgL_auxz00_4833))->
													BgL_parentz00);
											}
											{
												obj_t BgL_auxz00_4846;
												BgL_blockvz00_bglt BgL_auxz00_4840;

												{	/* SawBbv/bbv.scm 206 */
													obj_t BgL_hook1553z00_2401;

													BgL_hook1553z00_2401 = MAKE_YOUNG_PAIR(BFALSE, BNIL);
													{	/* SawBbv/bbv.scm 206 */
														obj_t BgL_g1554z00_2402;

														{
															BgL_blockvz00_bglt BgL_auxz00_4848;

															{
																obj_t BgL_auxz00_4849;

																{	/* SawBbv/bbv.scm 206 */
																	BgL_objectz00_bglt BgL_tmpz00_4850;

																	BgL_tmpz00_4850 =
																		((BgL_objectz00_bglt) BgL_i1188z00_2400);
																	BgL_auxz00_4849 =
																		BGL_OBJECT_WIDENING(BgL_tmpz00_4850);
																}
																BgL_auxz00_4848 =
																	((BgL_blockvz00_bglt) BgL_auxz00_4849);
															}
															BgL_g1554z00_2402 =
																(((BgL_blockvz00_bglt)
																	COBJECT(BgL_auxz00_4848))->BgL_versionsz00);
														}
														{
															obj_t BgL_l1550z00_2404;
															obj_t BgL_h1551z00_2405;

															BgL_l1550z00_2404 = BgL_g1554z00_2402;
															BgL_h1551z00_2405 = BgL_hook1553z00_2401;
														BgL_zc3z04anonymousza31915ze3z87_2406:
															if (NULLP(BgL_l1550z00_2404))
																{	/* SawBbv/bbv.scm 206 */
																	BgL_auxz00_4846 = CDR(BgL_hook1553z00_2401);
																}
															else
																{	/* SawBbv/bbv.scm 206 */
																	bool_t BgL_test2474z00_4858;

																	{	/* SawBbv/bbv.scm 206 */
																		BgL_blockz00_bglt BgL_blockz00_3482;

																		BgL_blockz00_3482 =
																			((BgL_blockz00_bglt)
																			CAR(((obj_t) BgL_l1550z00_2404)));
																		{	/* SawBbv/bbv.scm 206 */
																			long BgL_arg1608z00_3485;
																			obj_t BgL_arg1609z00_3486;

																			{
																				BgL_blocksz00_bglt BgL_auxz00_4862;

																				{
																					obj_t BgL_auxz00_4863;

																					{	/* SawBbv/bbv.scm 206 */
																						BgL_objectz00_bglt BgL_tmpz00_4864;

																						BgL_tmpz00_4864 =
																							((BgL_objectz00_bglt)
																							BgL_blockz00_3482);
																						BgL_auxz00_4863 =
																							BGL_OBJECT_WIDENING
																							(BgL_tmpz00_4864);
																					}
																					BgL_auxz00_4862 =
																						((BgL_blocksz00_bglt)
																						BgL_auxz00_4863);
																				}
																				BgL_arg1608z00_3485 =
																					(((BgL_blocksz00_bglt)
																						COBJECT(BgL_auxz00_4862))->
																					BgL_z52markz52);
																			}
																			BgL_arg1609z00_3486 =
																				STRUCT_REF(BgL_setmz00_2372,
																				(int) (0L));
																			BgL_test2474z00_4858 =
																				(BINT(BgL_arg1608z00_3485) ==
																				BgL_arg1609z00_3486);
																	}}
																	if (BgL_test2474z00_4858)
																		{	/* SawBbv/bbv.scm 206 */
																			obj_t BgL_nh1552z00_2410;

																			{	/* SawBbv/bbv.scm 206 */
																				obj_t BgL_arg1920z00_2412;

																				BgL_arg1920z00_2412 =
																					CAR(((obj_t) BgL_l1550z00_2404));
																				BgL_nh1552z00_2410 =
																					MAKE_YOUNG_PAIR(BgL_arg1920z00_2412,
																					BNIL);
																			}
																			SET_CDR(BgL_h1551z00_2405,
																				BgL_nh1552z00_2410);
																			{	/* SawBbv/bbv.scm 206 */
																				obj_t BgL_arg1918z00_2411;

																				BgL_arg1918z00_2411 =
																					CDR(((obj_t) BgL_l1550z00_2404));
																				{
																					obj_t BgL_h1551z00_4880;
																					obj_t BgL_l1550z00_4879;

																					BgL_l1550z00_4879 =
																						BgL_arg1918z00_2411;
																					BgL_h1551z00_4880 =
																						BgL_nh1552z00_2410;
																					BgL_h1551z00_2405 = BgL_h1551z00_4880;
																					BgL_l1550z00_2404 = BgL_l1550z00_4879;
																					goto
																						BgL_zc3z04anonymousza31915ze3z87_2406;
																				}
																			}
																		}
																	else
																		{	/* SawBbv/bbv.scm 206 */
																			obj_t BgL_arg1921z00_2413;

																			BgL_arg1921z00_2413 =
																				CDR(((obj_t) BgL_l1550z00_2404));
																			{
																				obj_t BgL_l1550z00_4883;

																				BgL_l1550z00_4883 = BgL_arg1921z00_2413;
																				BgL_l1550z00_2404 = BgL_l1550z00_4883;
																				goto
																					BgL_zc3z04anonymousza31915ze3z87_2406;
																			}
																		}
																}
														}
													}
												}
												{
													obj_t BgL_auxz00_4841;

													{	/* SawBbv/bbv.scm 205 */
														BgL_objectz00_bglt BgL_tmpz00_4842;

														BgL_tmpz00_4842 =
															((BgL_objectz00_bglt) BgL_i1188z00_2400);
														BgL_auxz00_4841 =
															BGL_OBJECT_WIDENING(BgL_tmpz00_4842);
													}
													BgL_auxz00_4840 =
														((BgL_blockvz00_bglt) BgL_auxz00_4841);
												}
												((((BgL_blockvz00_bglt) COBJECT(BgL_auxz00_4840))->
														BgL_versionsz00) =
													((obj_t) BgL_auxz00_4846), BUNSPEC);
											}
										}
										{	/* SawBbv/bbv.scm 207 */
											obj_t BgL_arg1922z00_2416;
											obj_t BgL_arg1923z00_2417;

											{	/* SawBbv/bbv.scm 207 */
												obj_t BgL_arg1924z00_2418;
												obj_t BgL_arg1925z00_2419;

												BgL_arg1924z00_2418 =
													(((BgL_blockz00_bglt) COBJECT(
															((BgL_blockz00_bglt) BgL_i1187z00_2384)))->
													BgL_succsz00);
												BgL_arg1925z00_2419 = CDR(((obj_t) BgL_bsz00_2377));
												BgL_arg1922z00_2416 =
													BGl_appendzd221011zd2zzsaw_bbvz00(BgL_arg1924z00_2418,
													BgL_arg1925z00_2419);
											}
											{	/* SawBbv/bbv.scm 208 */
												obj_t BgL_arg1926z00_2420;

												BgL_arg1926z00_2420 = CAR(((obj_t) BgL_bsz00_2377));
												BgL_arg1923z00_2417 =
													MAKE_YOUNG_PAIR(BgL_arg1926z00_2420, BgL_setz00_2378);
											}
											{
												obj_t BgL_setz00_4894;
												obj_t BgL_bsz00_4893;

												BgL_bsz00_4893 = BgL_arg1922z00_2416;
												BgL_setz00_4894 = BgL_arg1923z00_2417;
												BgL_setz00_2378 = BgL_setz00_4894;
												BgL_bsz00_2377 = BgL_bsz00_4893;
												goto BgL_zc3z04anonymousza31899ze3z87_2379;
											}
										}
									}
							}
					}
				}
				return BgL_bz00_97;
			}
		}

	}



/* normalize-ifeq! */
	obj_t BGl_normaliza7ezd2ifeqz12z67zzsaw_bbvz00(BgL_blockz00_bglt BgL_bz00_98)
	{
		{	/* SawBbv/bbv.scm 219 */
			{
				BgL_blockz00_bglt BgL_bz00_2474;

				{	/* SawBbv/bbv.scm 267 */
					obj_t BgL_g1208z00_2428;

					{	/* SawBbv/bbv.scm 267 */
						obj_t BgL_list1941z00_2447;

						BgL_list1941z00_2447 = MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_98), BNIL);
						BgL_g1208z00_2428 = BgL_list1941z00_2447;
					}
					{
						obj_t BgL_bsz00_2431;
						obj_t BgL_accz00_2432;

						BgL_bsz00_2431 = BgL_g1208z00_2428;
						BgL_accz00_2432 = BNIL;
					BgL_zc3z04anonymousza31929ze3z87_2433:
						if (NULLP(BgL_bsz00_2431))
							{	/* SawBbv/bbv.scm 270 */
								return bgl_reverse(BgL_accz00_2432);
							}
						else
							{	/* SawBbv/bbv.scm 270 */
								if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(CAR(
												((obj_t) BgL_bsz00_2431)), BgL_accz00_2432)))
									{	/* SawBbv/bbv.scm 273 */
										obj_t BgL_arg1933z00_2437;

										BgL_arg1933z00_2437 = CDR(((obj_t) BgL_bsz00_2431));
										{
											obj_t BgL_bsz00_4950;

											BgL_bsz00_4950 = BgL_arg1933z00_2437;
											BgL_bsz00_2431 = BgL_bsz00_4950;
											goto BgL_zc3z04anonymousza31929ze3z87_2433;
										}
									}
								else
									{	/* SawBbv/bbv.scm 272 */
										{	/* SawBbv/bbv.scm 275 */
											obj_t BgL_arg1934z00_2438;

											BgL_arg1934z00_2438 = CAR(((obj_t) BgL_bsz00_2431));
											BgL_bz00_2474 = ((BgL_blockz00_bglt) BgL_arg1934z00_2438);
											if (NULLP(
													(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2474))->
														BgL_succsz00)))
												{	/* SawBbv/bbv.scm 230 */
													BFALSE;
												}
											else
												{
													obj_t BgL_insz00_2481;

													BgL_insz00_2481 =
														(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2474))->
														BgL_firstz00);
												BgL_zc3z04anonymousza31966ze3z87_2482:
													if (NULLP(BgL_insz00_2481))
														{	/* SawBbv/bbv.scm 234 */
															if (NULLP(
																	(((BgL_blockz00_bglt)
																			COBJECT(BgL_bz00_2474))->BgL_firstz00)))
																{	/* SawBbv/bbv.scm 237 */
																	obj_t BgL_arg1970z00_2486;

																	BgL_arg1970z00_2486 =
																		BGl_shapez00zztools_shapez00(
																		((obj_t) BgL_bz00_2474));
																	BGl_errorz00zz__errorz00
																		(BGl_string2358z00zzsaw_bbvz00,
																		BGl_string2359z00zzsaw_bbvz00,
																		BgL_arg1970z00_2486);
																}
															else
																{	/* SawBbv/bbv.scm 235 */
																	BFALSE;
																}
														}
													else
														{	/* SawBbv/bbv.scm 238 */
															bool_t BgL_test2483z00_4964;

															{	/* SawBbv/bbv.scm 238 */
																obj_t BgL_arg2013z00_2543;

																BgL_arg2013z00_2543 =
																	CAR(((obj_t) BgL_insz00_2481));
																BgL_test2483z00_4964 =
																	BGl_rtl_inszd2ifnezf3z21zzsaw_bbvzd2typeszd2(
																	((BgL_rtl_insz00_bglt) BgL_arg2013z00_2543));
															}
															if (BgL_test2483z00_4964)
																{	/* SawBbv/bbv.scm 239 */
																	bool_t BgL_test2484z00_4969;

																	if (NULLP(CDR(
																				(((BgL_blockz00_bglt)
																						COBJECT(BgL_bz00_2474))->
																					BgL_succsz00))))
																		{	/* SawBbv/bbv.scm 239 */
																			obj_t BgL_arg1982z00_2502;

																			BgL_arg1982z00_2502 =
																				CAR(((obj_t) BgL_insz00_2481));
																			BgL_test2484z00_4969 =
																				BGl_sidezd2effectzd2freezf3ze70z14zzsaw_bbvz00
																				(BgL_arg1982z00_2502);
																		}
																	else
																		{	/* SawBbv/bbv.scm 239 */
																			BgL_test2484z00_4969 = ((bool_t) 0);
																		}
																	if (BgL_test2484z00_4969)
																		{	/* SawBbv/bbv.scm 240 */
																			BgL_rtl_insz00_bglt BgL_i1193z00_2497;

																			BgL_i1193z00_2497 =
																				((BgL_rtl_insz00_bglt)
																				CAR(((obj_t) BgL_insz00_2481)));
																			{
																				BgL_rtl_funz00_bglt BgL_auxz00_4980;

																				{	/* SawBbv/bbv.scm 241 */
																					BgL_rtl_nopz00_bglt
																						BgL_new1195z00_2498;
																					{	/* SawBbv/bbv.scm 241 */
																						BgL_rtl_nopz00_bglt
																							BgL_new1194z00_2499;
																						BgL_new1194z00_2499 =
																							((BgL_rtl_nopz00_bglt)
																							BOBJECT(GC_MALLOC(sizeof(struct
																										BgL_rtl_nopz00_bgl))));
																						{	/* SawBbv/bbv.scm 241 */
																							long BgL_arg1981z00_2500;

																							{	/* SawBbv/bbv.scm 241 */
																								obj_t BgL_classz00_3566;

																								BgL_classz00_3566 =
																									BGl_rtl_nopz00zzsaw_defsz00;
																								BgL_arg1981z00_2500 =
																									BGL_CLASS_NUM
																									(BgL_classz00_3566);
																							}
																							BGL_OBJECT_CLASS_NUM_SET(
																								((BgL_objectz00_bglt)
																									BgL_new1194z00_2499),
																								BgL_arg1981z00_2500);
																						}
																						BgL_new1195z00_2498 =
																							BgL_new1194z00_2499;
																					}
																					((((BgL_rtl_funz00_bglt) COBJECT(
																									((BgL_rtl_funz00_bglt)
																										BgL_new1195z00_2498)))->
																							BgL_locz00) =
																						((obj_t) BFALSE), BUNSPEC);
																					BgL_auxz00_4980 =
																						((BgL_rtl_funz00_bglt)
																						BgL_new1195z00_2498);
																				}
																				((((BgL_rtl_insz00_bglt)
																							COBJECT(BgL_i1193z00_2497))->
																						BgL_funz00) =
																					((BgL_rtl_funz00_bglt)
																						BgL_auxz00_4980), BUNSPEC);
																			}
																			((((BgL_rtl_insz00_bglt)
																						COBJECT(BgL_i1193z00_2497))->
																					BgL_argsz00) =
																				((obj_t) BNIL), BUNSPEC);
																		}
																	else
																		{	/* SawBbv/bbv.scm 239 */
																			BUNSPEC;
																		}
																}
															else
																{	/* SawBbv/bbv.scm 244 */
																	bool_t BgL_test2486z00_4990;

																	{	/* SawBbv/bbv.scm 244 */
																		obj_t BgL_arg2012z00_2542;

																		BgL_arg2012z00_2542 =
																			CAR(((obj_t) BgL_insz00_2481));
																		BgL_test2486z00_4990 =
																			BGl_rtl_inszd2ifeqzf3z21zzsaw_bbvzd2typeszd2
																			(((BgL_rtl_insz00_bglt)
																				BgL_arg2012z00_2542));
																	}
																	if (BgL_test2486z00_4990)
																		{	/* SawBbv/bbv.scm 246 */
																			BgL_rtl_insz00_bglt BgL_i1196z00_2507;

																			BgL_i1196z00_2507 =
																				((BgL_rtl_insz00_bglt)
																				CAR(((obj_t) BgL_insz00_2481)));
																			{	/* SawBbv/bbv.scm 248 */
																				bool_t BgL_test2487z00_4998;

																				if (NULLP(CDR(
																							((obj_t) BgL_insz00_2481))))
																					{	/* SawBbv/bbv.scm 248 */
																						BgL_test2487z00_4998 = ((bool_t) 1);
																					}
																				else
																					{	/* SawBbv/bbv.scm 248 */
																						bool_t BgL_test2489z00_5003;

																						{	/* SawBbv/bbv.scm 248 */
																							obj_t BgL_arg2009z00_2539;

																							{	/* SawBbv/bbv.scm 248 */
																								obj_t BgL_pairz00_3575;

																								BgL_pairz00_3575 =
																									CDR(
																									((obj_t) BgL_insz00_2481));
																								BgL_arg2009z00_2539 =
																									CAR(BgL_pairz00_3575);
																							}
																							BgL_test2489z00_5003 =
																								BGl_rtl_inszd2gozf3z21zzsaw_bbvzd2typeszd2
																								(((BgL_rtl_insz00_bglt)
																									BgL_arg2009z00_2539));
																						}
																						if (BgL_test2489z00_5003)
																							{	/* SawBbv/bbv.scm 248 */
																								BgL_test2487z00_4998 =
																									((bool_t) 0);
																							}
																						else
																							{	/* SawBbv/bbv.scm 248 */
																								BgL_test2487z00_4998 =
																									((bool_t) 1);
																							}
																					}
																				if (BgL_test2487z00_4998)
																					{	/* SawBbv/bbv.scm 249 */
																						obj_t BgL_arg1994z00_2515;

																						BgL_arg1994z00_2515 =
																							BGl_shapez00zztools_shapez00(
																							((obj_t) BgL_bz00_2474));
																						BGl_errorz00zz__errorz00
																							(BGl_string2358z00zzsaw_bbvz00,
																							BGl_string2360z00zzsaw_bbvz00,
																							BgL_arg1994z00_2515);
																					}
																				else
																					{	/* SawBbv/bbv.scm 250 */
																						bool_t BgL_test2490z00_5012;

																						if (NULLP(CDR(
																									(((BgL_blockz00_bglt)
																											COBJECT(BgL_bz00_2474))->
																										BgL_succsz00))))
																							{	/* SawBbv/bbv.scm 250 */
																								obj_t BgL_arg2006z00_2534;

																								BgL_arg2006z00_2534 =
																									CAR(
																									((obj_t) BgL_insz00_2481));
																								BgL_test2490z00_5012 =
																									BGl_sidezd2effectzd2freezf3ze70z14zzsaw_bbvz00
																									(BgL_arg2006z00_2534);
																							}
																						else
																							{	/* SawBbv/bbv.scm 250 */
																								BgL_test2490z00_5012 =
																									((bool_t) 0);
																							}
																						if (BgL_test2490z00_5012)
																							{	/* SawBbv/bbv.scm 250 */
																								{
																									BgL_rtl_funz00_bglt
																										BgL_auxz00_5020;
																									{	/* SawBbv/bbv.scm 251 */
																										BgL_rtl_nopz00_bglt
																											BgL_new1198z00_2523;
																										{	/* SawBbv/bbv.scm 251 */
																											BgL_rtl_nopz00_bglt
																												BgL_new1197z00_2524;
																											BgL_new1197z00_2524 =
																												((BgL_rtl_nopz00_bglt)
																												BOBJECT(GC_MALLOC(sizeof
																														(struct
																															BgL_rtl_nopz00_bgl))));
																											{	/* SawBbv/bbv.scm 251 */
																												long
																													BgL_arg2002z00_2525;
																												{	/* SawBbv/bbv.scm 251 */
																													obj_t
																														BgL_classz00_3578;
																													BgL_classz00_3578 =
																														BGl_rtl_nopz00zzsaw_defsz00;
																													BgL_arg2002z00_2525 =
																														BGL_CLASS_NUM
																														(BgL_classz00_3578);
																												}
																												BGL_OBJECT_CLASS_NUM_SET
																													(((BgL_objectz00_bglt)
																														BgL_new1197z00_2524),
																													BgL_arg2002z00_2525);
																											}
																											BgL_new1198z00_2523 =
																												BgL_new1197z00_2524;
																										}
																										((((BgL_rtl_funz00_bglt)
																													COBJECT((
																															(BgL_rtl_funz00_bglt)
																															BgL_new1198z00_2523)))->
																												BgL_locz00) =
																											((obj_t) BFALSE),
																											BUNSPEC);
																										BgL_auxz00_5020 =
																											((BgL_rtl_funz00_bglt)
																											BgL_new1198z00_2523);
																									}
																									((((BgL_rtl_insz00_bglt)
																												COBJECT
																												(BgL_i1196z00_2507))->
																											BgL_funz00) =
																										((BgL_rtl_funz00_bglt)
																											BgL_auxz00_5020),
																										BUNSPEC);
																								}
																								((((BgL_rtl_insz00_bglt)
																											COBJECT
																											(BgL_i1196z00_2507))->
																										BgL_argsz00) =
																									((obj_t) BNIL), BUNSPEC);
																							}
																						else
																							{	/* SawBbv/bbv.scm 254 */
																								BgL_rtl_ifeqz00_bglt
																									BgL_i1199z00_2526;
																								BgL_i1199z00_2526 =
																									((BgL_rtl_ifeqz00_bglt) ((
																											(BgL_rtl_insz00_bglt)
																											COBJECT
																											(BgL_i1196z00_2507))->
																										BgL_funz00));
																								{	/* SawBbv/bbv.scm 255 */
																									BgL_rtl_insz00_bglt
																										BgL_i1200z00_2527;
																									{	/* SawBbv/bbv.scm 255 */
																										obj_t BgL_pairz00_3584;

																										BgL_pairz00_3584 =
																											CDR(
																											((obj_t)
																												BgL_insz00_2481));
																										BgL_i1200z00_2527 =
																											((BgL_rtl_insz00_bglt)
																											CAR(BgL_pairz00_3584));
																									}
																									{	/* SawBbv/bbv.scm 256 */
																										BgL_rtl_goz00_bglt
																											BgL_i1201z00_2528;
																										BgL_i1201z00_2528 =
																											((BgL_rtl_goz00_bglt) ((
																													(BgL_rtl_insz00_bglt)
																													COBJECT
																													(BgL_i1200z00_2527))->
																												BgL_funz00));
																										{
																											BgL_rtl_funz00_bglt
																												BgL_auxz00_5038;
																											{	/* SawBbv/bbv.scm 258 */
																												BgL_rtl_ifnez00_bglt
																													BgL_new1203z00_2529;
																												{	/* SawBbv/bbv.scm 260 */
																													BgL_rtl_ifnez00_bglt
																														BgL_new1202z00_2530;
																													BgL_new1202z00_2530 =
																														(
																														(BgL_rtl_ifnez00_bglt)
																														BOBJECT(GC_MALLOC
																															(sizeof(struct
																																	BgL_rtl_ifnez00_bgl))));
																													{	/* SawBbv/bbv.scm 260 */
																														long
																															BgL_arg2003z00_2531;
																														{	/* SawBbv/bbv.scm 260 */
																															obj_t
																																BgL_classz00_3585;
																															BgL_classz00_3585
																																=
																																BGl_rtl_ifnez00zzsaw_defsz00;
																															BgL_arg2003z00_2531
																																=
																																BGL_CLASS_NUM
																																(BgL_classz00_3585);
																														}
																														BGL_OBJECT_CLASS_NUM_SET
																															(((BgL_objectz00_bglt) BgL_new1202z00_2530), BgL_arg2003z00_2531);
																													}
																													BgL_new1203z00_2529 =
																														BgL_new1202z00_2530;
																												}
																												((((BgL_rtl_funz00_bglt)
																															COBJECT((
																																	(BgL_rtl_funz00_bglt)
																																	BgL_new1203z00_2529)))->
																														BgL_locz00) =
																													((obj_t) ((
																																(BgL_rtl_funz00_bglt)
																																COBJECT((
																																		(BgL_rtl_funz00_bglt)
																																		BgL_i1199z00_2526)))->
																															BgL_locz00)),
																													BUNSPEC);
																												((((BgL_rtl_ifnez00_bglt) COBJECT(BgL_new1203z00_2529))->BgL_thenz00) = ((BgL_blockz00_bglt) (((BgL_rtl_goz00_bglt) COBJECT(BgL_i1201z00_2528))->BgL_toz00)), BUNSPEC);
																												BgL_auxz00_5038 =
																													((BgL_rtl_funz00_bglt)
																													BgL_new1203z00_2529);
																											}
																											((((BgL_rtl_insz00_bglt)
																														COBJECT
																														(BgL_i1196z00_2507))->
																													BgL_funz00) =
																												((BgL_rtl_funz00_bglt)
																													BgL_auxz00_5038),
																												BUNSPEC);
																										}
																										((((BgL_rtl_goz00_bglt)
																													COBJECT
																													(BgL_i1201z00_2528))->
																												BgL_toz00) =
																											((BgL_blockz00_bglt) ((
																														(BgL_rtl_ifeqz00_bglt)
																														COBJECT
																														(BgL_i1199z00_2526))->
																													BgL_thenz00)),
																											BUNSPEC);
																										{
																											obj_t BgL_auxz00_5053;

																											{	/* SawBbv/bbv.scm 262 */
																												obj_t
																													BgL_arg2004z00_2532;
																												BgL_arg2004z00_2532 =
																													(((BgL_blockz00_bglt)
																														COBJECT
																														(BgL_bz00_2474))->
																													BgL_succsz00);
																												BgL_auxz00_5053 =
																													bgl_reverse_bang
																													(BgL_arg2004z00_2532);
																											}
																											((((BgL_blockz00_bglt)
																														COBJECT
																														(BgL_bz00_2474))->
																													BgL_succsz00) =
																												((obj_t)
																													BgL_auxz00_5053),
																												BUNSPEC);
																		}}}}}}}
																	else
																		{	/* SawBbv/bbv.scm 264 */
																			obj_t BgL_arg2011z00_2541;

																			BgL_arg2011z00_2541 =
																				CDR(((obj_t) BgL_insz00_2481));
																			{
																				obj_t BgL_insz00_5059;

																				BgL_insz00_5059 = BgL_arg2011z00_2541;
																				BgL_insz00_2481 = BgL_insz00_5059;
																				goto
																					BgL_zc3z04anonymousza31966ze3z87_2482;
																			}
																		}
																}
														}
												}
										}
										{	/* SawBbv/bbv.scm 276 */
											BgL_blockz00_bglt BgL_i1210z00_2439;

											BgL_i1210z00_2439 =
												((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2431)));
											{	/* SawBbv/bbv.scm 277 */
												obj_t BgL_arg1935z00_2440;
												obj_t BgL_arg1936z00_2441;

												{	/* SawBbv/bbv.scm 277 */
													obj_t BgL_arg1937z00_2442;
													obj_t BgL_arg1938z00_2443;

													BgL_arg1937z00_2442 =
														(((BgL_blockz00_bglt) COBJECT(BgL_i1210z00_2439))->
														BgL_succsz00);
													BgL_arg1938z00_2443 = CDR(((obj_t) BgL_bsz00_2431));
													BgL_arg1935z00_2440 =
														BGl_appendzd221011zd2zzsaw_bbvz00
														(BgL_arg1937z00_2442, BgL_arg1938z00_2443);
												}
												{	/* SawBbv/bbv.scm 277 */
													obj_t BgL_arg1939z00_2444;

													BgL_arg1939z00_2444 = CAR(((obj_t) BgL_bsz00_2431));
													BgL_arg1936z00_2441 =
														MAKE_YOUNG_PAIR(BgL_arg1939z00_2444,
														BgL_accz00_2432);
												}
												{
													obj_t BgL_accz00_5073;
													obj_t BgL_bsz00_5072;

													BgL_bsz00_5072 = BgL_arg1935z00_2440;
													BgL_accz00_5073 = BgL_arg1936z00_2441;
													BgL_accz00_2432 = BgL_accz00_5073;
													BgL_bsz00_2431 = BgL_bsz00_5072;
													goto BgL_zc3z04anonymousza31929ze3z87_2433;
												}
											}
										}
									}
							}
					}
				}
			}
		}

	}



/* side-effect-free?~0 */
	bool_t BGl_sidezd2effectzd2freezf3ze70z14zzsaw_bbvz00(obj_t BgL_insz00_2448)
	{
		{	/* SawBbv/bbv.scm 226 */
			{	/* SawBbv/bbv.scm 223 */
				bool_t BgL_test2492z00_5074;

				{	/* SawBbv/bbv.scm 223 */
					bool_t BgL_test2493z00_5075;

					{	/* SawBbv/bbv.scm 223 */
						obj_t BgL_arg1960z00_2472;

						{	/* SawBbv/bbv.scm 223 */
							obj_t BgL_pairz00_3495;

							BgL_pairz00_3495 =
								(((BgL_rtl_insz00_bglt) COBJECT(
										((BgL_rtl_insz00_bglt) BgL_insz00_2448)))->BgL_argsz00);
							BgL_arg1960z00_2472 = CAR(BgL_pairz00_3495);
						}
						{	/* SawBbv/bbv.scm 223 */
							obj_t BgL_classz00_3496;

							BgL_classz00_3496 = BGl_rtl_insz00zzsaw_defsz00;
							if (BGL_OBJECTP(BgL_arg1960z00_2472))
								{	/* SawBbv/bbv.scm 223 */
									BgL_objectz00_bglt BgL_arg1801z00_3498;

									BgL_arg1801z00_3498 =
										(BgL_objectz00_bglt) (BgL_arg1960z00_2472);
									if (BGL_CONDEXPAND_ISA_ARCH64())
										{	/* SawBbv/bbv.scm 223 */
											long BgL_idxz00_3504;

											BgL_idxz00_3504 =
												BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_3498);
											BgL_test2493z00_5075 =
												(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
													(BgL_idxz00_3504 + 1L)) == BgL_classz00_3496);
										}
									else
										{	/* SawBbv/bbv.scm 223 */
											bool_t BgL_res2321z00_3526;

											{	/* SawBbv/bbv.scm 223 */
												obj_t BgL_oclassz00_3512;

												{	/* SawBbv/bbv.scm 223 */
													long BgL_arg1808z00_3518;

													{	/* SawBbv/bbv.scm 223 */
														long BgL_arg1809z00_3519;

														BgL_arg1809z00_3519 =
															BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_3498);
														BgL_arg1808z00_3518 =
															(BgL_arg1809z00_3519 - OBJECT_TYPE);
													}
													BgL_oclassz00_3512 =
														VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
														BgL_arg1808z00_3518);
												}
												{	/* SawBbv/bbv.scm 223 */
													bool_t BgL__ortest_1115z00_3513;

													BgL__ortest_1115z00_3513 =
														(BgL_classz00_3496 == BgL_oclassz00_3512);
													if (BgL__ortest_1115z00_3513)
														{	/* SawBbv/bbv.scm 223 */
															BgL_res2321z00_3526 = BgL__ortest_1115z00_3513;
														}
													else
														{	/* SawBbv/bbv.scm 223 */
															long BgL_odepthz00_3514;

															BgL_odepthz00_3514 =
																BGL_CLASS_DEPTH(BgL_oclassz00_3512);
															if ((1L < BgL_odepthz00_3514))
																{	/* SawBbv/bbv.scm 223 */
																	obj_t BgL_arg1797z00_3516;

																	BgL_arg1797z00_3516 =
																		BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_3512,
																		1L);
																	BgL_res2321z00_3526 =
																		(BgL_arg1797z00_3516 == BgL_classz00_3496);
																}
															else
																{	/* SawBbv/bbv.scm 223 */
																	BgL_res2321z00_3526 = ((bool_t) 0);
																}
														}
												}
											}
											BgL_test2493z00_5075 = BgL_res2321z00_3526;
										}
								}
							else
								{	/* SawBbv/bbv.scm 223 */
									BgL_test2493z00_5075 = ((bool_t) 0);
								}
						}
					}
					if (BgL_test2493z00_5075)
						{	/* SawBbv/bbv.scm 223 */
							obj_t BgL_arg1958z00_2470;

							{	/* SawBbv/bbv.scm 223 */
								obj_t BgL_pairz00_3527;

								BgL_pairz00_3527 =
									(((BgL_rtl_insz00_bglt) COBJECT(
											((BgL_rtl_insz00_bglt) BgL_insz00_2448)))->BgL_argsz00);
								BgL_arg1958z00_2470 = CAR(BgL_pairz00_3527);
							}
							BgL_test2492z00_5074 =
								BGl_rtl_inszd2callzf3z21zzsaw_bbvzd2typeszd2(
								((BgL_rtl_insz00_bglt) BgL_arg1958z00_2470));
						}
					else
						{	/* SawBbv/bbv.scm 223 */
							BgL_test2492z00_5074 = ((bool_t) 0);
						}
				}
				if (BgL_test2492z00_5074)
					{	/* SawBbv/bbv.scm 224 */
						bool_t BgL_test2498z00_5103;

						{	/* SawBbv/bbv.scm 224 */
							obj_t BgL_arg1956z00_2467;

							{	/* SawBbv/bbv.scm 224 */
								obj_t BgL_pairz00_3528;

								BgL_pairz00_3528 =
									(((BgL_rtl_insz00_bglt) COBJECT(
											((BgL_rtl_insz00_bglt) BgL_insz00_2448)))->BgL_argsz00);
								BgL_arg1956z00_2467 = CAR(BgL_pairz00_3528);
							}
							BgL_test2498z00_5103 =
								CBOOL(BGl_rtl_callzd2predicatezd2zzsaw_bbvzd2typeszd2(
									((BgL_rtl_insz00_bglt) BgL_arg1956z00_2467)));
						}
						if (BgL_test2498z00_5103)
							{	/* SawBbv/bbv.scm 225 */
								obj_t BgL_argsz00_2462;

								BgL_argsz00_2462 =
									BGl_rtl_inszd2argsza2z70zzsaw_defsz00(
									((BgL_rtl_insz00_bglt) BgL_insz00_2448));
								if (NULLP(BgL_argsz00_2462))
									{	/* SawBbv/bbv.scm 226 */
										return ((bool_t) 0);
									}
								else
									{	/* SawBbv/bbv.scm 226 */
										if (NULLP(CDR(BgL_argsz00_2462)))
											{	/* SawBbv/bbv.scm 226 */
												obj_t BgL_arg1954z00_2465;

												BgL_arg1954z00_2465 = CAR(BgL_argsz00_2462);
												{	/* SawBbv/bbv.scm 226 */
													obj_t BgL_classz00_3531;

													BgL_classz00_3531 = BGl_rtl_regz00zzsaw_defsz00;
													if (BGL_OBJECTP(BgL_arg1954z00_2465))
														{	/* SawBbv/bbv.scm 226 */
															BgL_objectz00_bglt BgL_arg1801z00_3533;

															BgL_arg1801z00_3533 =
																(BgL_objectz00_bglt) (BgL_arg1954z00_2465);
															if (BGL_CONDEXPAND_ISA_ARCH64())
																{	/* SawBbv/bbv.scm 226 */
																	long BgL_idxz00_3539;

																	BgL_idxz00_3539 =
																		BGL_OBJECT_INHERITANCE_NUM
																		(BgL_arg1801z00_3533);
																	return (VECTOR_REF
																		(BGl_za2inheritancesza2z00zz__objectz00,
																			(BgL_idxz00_3539 + 1L)) ==
																		BgL_classz00_3531);
																}
															else
																{	/* SawBbv/bbv.scm 226 */
																	bool_t BgL_res2322z00_3561;

																	{	/* SawBbv/bbv.scm 226 */
																		obj_t BgL_oclassz00_3547;

																		{	/* SawBbv/bbv.scm 226 */
																			long BgL_arg1808z00_3553;

																			{	/* SawBbv/bbv.scm 226 */
																				long BgL_arg1809z00_3554;

																				BgL_arg1809z00_3554 =
																					BGL_OBJECT_CLASS_NUM
																					(BgL_arg1801z00_3533);
																				BgL_arg1808z00_3553 =
																					(BgL_arg1809z00_3554 - OBJECT_TYPE);
																			}
																			BgL_oclassz00_3547 =
																				VECTOR_REF
																				(BGl_za2classesza2z00zz__objectz00,
																				BgL_arg1808z00_3553);
																		}
																		{	/* SawBbv/bbv.scm 226 */
																			bool_t BgL__ortest_1115z00_3548;

																			BgL__ortest_1115z00_3548 =
																				(BgL_classz00_3531 ==
																				BgL_oclassz00_3547);
																			if (BgL__ortest_1115z00_3548)
																				{	/* SawBbv/bbv.scm 226 */
																					BgL_res2322z00_3561 =
																						BgL__ortest_1115z00_3548;
																				}
																			else
																				{	/* SawBbv/bbv.scm 226 */
																					long BgL_odepthz00_3549;

																					BgL_odepthz00_3549 =
																						BGL_CLASS_DEPTH(BgL_oclassz00_3547);
																					if ((1L < BgL_odepthz00_3549))
																						{	/* SawBbv/bbv.scm 226 */
																							obj_t BgL_arg1797z00_3551;

																							BgL_arg1797z00_3551 =
																								BGL_CLASS_ANCESTORS_REF
																								(BgL_oclassz00_3547, 1L);
																							BgL_res2322z00_3561 =
																								(BgL_arg1797z00_3551 ==
																								BgL_classz00_3531);
																						}
																					else
																						{	/* SawBbv/bbv.scm 226 */
																							BgL_res2322z00_3561 =
																								((bool_t) 0);
																						}
																				}
																		}
																	}
																	return BgL_res2322z00_3561;
																}
														}
													else
														{	/* SawBbv/bbv.scm 226 */
															return ((bool_t) 0);
														}
												}
											}
										else
											{	/* SawBbv/bbv.scm 226 */
												return ((bool_t) 0);
											}
									}
							}
						else
							{	/* SawBbv/bbv.scm 224 */
								return ((bool_t) 0);
							}
					}
				else
					{	/* SawBbv/bbv.scm 223 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* normalize-mov! */
	obj_t BGl_normaliza7ezd2movz12z67zzsaw_bbvz00(BgL_blockz00_bglt BgL_bz00_99)
	{
		{	/* SawBbv/bbv.scm 287 */
			{
				BgL_rtl_insz00_bglt BgL_iz00_2588;
				BgL_blockz00_bglt BgL_bz00_2607;

				{	/* SawBbv/bbv.scm 317 */
					obj_t BgL_g1217z00_2551;

					{	/* SawBbv/bbv.scm 317 */
						obj_t BgL_list2032z00_2570;

						BgL_list2032z00_2570 = MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_99), BNIL);
						BgL_g1217z00_2551 = BgL_list2032z00_2570;
					}
					{
						obj_t BgL_bsz00_2554;
						obj_t BgL_accz00_2555;

						BgL_bsz00_2554 = BgL_g1217z00_2551;
						BgL_accz00_2555 = BNIL;
					BgL_zc3z04anonymousza32015ze3z87_2556:
						if (NULLP(BgL_bsz00_2554))
							{	/* SawBbv/bbv.scm 320 */
								return bgl_reverse(BgL_accz00_2555);
							}
						else
							{	/* SawBbv/bbv.scm 320 */
								if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(CAR(
												((obj_t) BgL_bsz00_2554)), BgL_accz00_2555)))
									{	/* SawBbv/bbv.scm 323 */
										obj_t BgL_arg2020z00_2560;

										BgL_arg2020z00_2560 = CDR(((obj_t) BgL_bsz00_2554));
										{
											obj_t BgL_bsz00_5149;

											BgL_bsz00_5149 = BgL_arg2020z00_2560;
											BgL_bsz00_2554 = BgL_bsz00_5149;
											goto BgL_zc3z04anonymousza32015ze3z87_2556;
										}
									}
								else
									{	/* SawBbv/bbv.scm 322 */
										{	/* SawBbv/bbv.scm 325 */
											obj_t BgL_arg2021z00_2561;

											BgL_arg2021z00_2561 = CAR(((obj_t) BgL_bsz00_2554));
											BgL_bz00_2607 = ((BgL_blockz00_bglt) BgL_arg2021z00_2561);
											{
												obj_t BgL_auxz00_5152;

												{	/* SawBbv/bbv.scm 314 */
													obj_t BgL_l01563z00_2610;

													BgL_l01563z00_2610 =
														(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2607))->
														BgL_firstz00);
													{
														obj_t BgL_l1562z00_2612;

														BgL_l1562z00_2612 = BgL_l01563z00_2610;
													BgL_zc3z04anonymousza32055ze3z87_2613:
														if (NULLP(BgL_l1562z00_2612))
															{	/* SawBbv/bbv.scm 314 */
																BgL_auxz00_5152 = BgL_l01563z00_2610;
															}
														else
															{	/* SawBbv/bbv.scm 314 */
																{	/* SawBbv/bbv.scm 314 */
																	BgL_rtl_insz00_bglt BgL_arg2057z00_2615;

																	{	/* SawBbv/bbv.scm 314 */
																		obj_t BgL_arg2058z00_2616;

																		BgL_arg2058z00_2616 =
																			CAR(((obj_t) BgL_l1562z00_2612));
																		BgL_iz00_2588 =
																			((BgL_rtl_insz00_bglt)
																			BgL_arg2058z00_2616);
																		if (BGl_rtl_inszd2movzf3z21zzsaw_bbvzd2typeszd2(BgL_iz00_2588))
																			{	/* SawBbv/bbv.scm 302 */
																				obj_t BgL_niz00_2592;

																				BgL_niz00_2592 =
																					BGl_removezd2innerzd2movz12ze70zf5zzsaw_bbvz00
																					(CAR((((BgL_rtl_insz00_bglt)
																								COBJECT(BgL_iz00_2588))->
																							BgL_argsz00)));
																				{	/* SawBbv/bbv.scm 303 */
																					bool_t BgL_test2509z00_5163;

																					{	/* SawBbv/bbv.scm 303 */
																						obj_t BgL_classz00_3632;

																						BgL_classz00_3632 =
																							BGl_rtl_insz00zzsaw_defsz00;
																						if (BGL_OBJECTP(BgL_niz00_2592))
																							{	/* SawBbv/bbv.scm 303 */
																								BgL_objectz00_bglt
																									BgL_arg1801z00_3634;
																								BgL_arg1801z00_3634 =
																									(BgL_objectz00_bglt)
																									(BgL_niz00_2592);
																								if (BGL_CONDEXPAND_ISA_ARCH64())
																									{	/* SawBbv/bbv.scm 303 */
																										long BgL_idxz00_3640;

																										BgL_idxz00_3640 =
																											BGL_OBJECT_INHERITANCE_NUM
																											(BgL_arg1801z00_3634);
																										BgL_test2509z00_5163 =
																											(VECTOR_REF
																											(BGl_za2inheritancesza2z00zz__objectz00,
																												(BgL_idxz00_3640 +
																													1L)) ==
																											BgL_classz00_3632);
																									}
																								else
																									{	/* SawBbv/bbv.scm 303 */
																										bool_t BgL_res2325z00_3662;

																										{	/* SawBbv/bbv.scm 303 */
																											obj_t BgL_oclassz00_3648;

																											{	/* SawBbv/bbv.scm 303 */
																												long
																													BgL_arg1808z00_3654;
																												{	/* SawBbv/bbv.scm 303 */
																													long
																														BgL_arg1809z00_3655;
																													BgL_arg1809z00_3655 =
																														BGL_OBJECT_CLASS_NUM
																														(BgL_arg1801z00_3634);
																													BgL_arg1808z00_3654 =
																														(BgL_arg1809z00_3655
																														- OBJECT_TYPE);
																												}
																												BgL_oclassz00_3648 =
																													VECTOR_REF
																													(BGl_za2classesza2z00zz__objectz00,
																													BgL_arg1808z00_3654);
																											}
																											{	/* SawBbv/bbv.scm 303 */
																												bool_t
																													BgL__ortest_1115z00_3649;
																												BgL__ortest_1115z00_3649
																													=
																													(BgL_classz00_3632 ==
																													BgL_oclassz00_3648);
																												if (BgL__ortest_1115z00_3649)
																													{	/* SawBbv/bbv.scm 303 */
																														BgL_res2325z00_3662
																															=
																															BgL__ortest_1115z00_3649;
																													}
																												else
																													{	/* SawBbv/bbv.scm 303 */
																														long
																															BgL_odepthz00_3650;
																														BgL_odepthz00_3650 =
																															BGL_CLASS_DEPTH
																															(BgL_oclassz00_3648);
																														if ((1L <
																																BgL_odepthz00_3650))
																															{	/* SawBbv/bbv.scm 303 */
																																obj_t
																																	BgL_arg1797z00_3652;
																																BgL_arg1797z00_3652
																																	=
																																	BGL_CLASS_ANCESTORS_REF
																																	(BgL_oclassz00_3648,
																																	1L);
																																BgL_res2325z00_3662
																																	=
																																	(BgL_arg1797z00_3652
																																	==
																																	BgL_classz00_3632);
																															}
																														else
																															{	/* SawBbv/bbv.scm 303 */
																																BgL_res2325z00_3662
																																	=
																																	((bool_t) 0);
																															}
																													}
																											}
																										}
																										BgL_test2509z00_5163 =
																											BgL_res2325z00_3662;
																									}
																							}
																						else
																							{	/* SawBbv/bbv.scm 303 */
																								BgL_test2509z00_5163 =
																									((bool_t) 0);
																							}
																					}
																					if (BgL_test2509z00_5163)
																						{	/* SawBbv/bbv.scm 303 */
																							((((BgL_rtl_insz00_bglt)
																										COBJECT(BgL_iz00_2588))->
																									BgL_funz00) =
																								((BgL_rtl_funz00_bglt) ((
																											(BgL_rtl_insz00_bglt)
																											COBJECT((
																													(BgL_rtl_insz00_bglt)
																													BgL_niz00_2592)))->
																										BgL_funz00)), BUNSPEC);
																							((((BgL_rtl_insz00_bglt)
																										COBJECT(BgL_iz00_2588))->
																									BgL_argsz00) =
																								((obj_t) (((BgL_rtl_insz00_bglt)
																											COBJECT((
																													(BgL_rtl_insz00_bglt)
																													BgL_niz00_2592)))->
																										BgL_argsz00)), BUNSPEC);
																						}
																					else
																						{	/* SawBbv/bbv.scm 303 */
																							BFALSE;
																						}
																				}
																				BgL_arg2057z00_2615 = BgL_iz00_2588;
																			}
																		else
																			{	/* SawBbv/bbv.scm 300 */
																				{
																					obj_t BgL_auxz00_5189;

																					{	/* SawBbv/bbv.scm 309 */
																						obj_t BgL_l01560z00_2598;

																						BgL_l01560z00_2598 =
																							(((BgL_rtl_insz00_bglt)
																								COBJECT(BgL_iz00_2588))->
																							BgL_argsz00);
																						{
																							obj_t BgL_l1559z00_2600;

																							BgL_l1559z00_2600 =
																								BgL_l01560z00_2598;
																						BgL_zc3z04anonymousza32048ze3z87_2601:
																							if (NULLP
																								(BgL_l1559z00_2600))
																								{	/* SawBbv/bbv.scm 309 */
																									BgL_auxz00_5189 =
																										BgL_l01560z00_2598;
																								}
																							else
																								{	/* SawBbv/bbv.scm 309 */
																									{	/* SawBbv/bbv.scm 309 */
																										obj_t BgL_arg2050z00_2603;

																										{	/* SawBbv/bbv.scm 309 */
																											obj_t BgL_arg2051z00_2604;

																											BgL_arg2051z00_2604 =
																												CAR(
																												((obj_t)
																													BgL_l1559z00_2600));
																											BgL_arg2050z00_2603 =
																												BGl_removezd2innerzd2movz12ze70zf5zzsaw_bbvz00
																												(BgL_arg2051z00_2604);
																										}
																										{	/* SawBbv/bbv.scm 309 */
																											obj_t BgL_tmpz00_5196;

																											BgL_tmpz00_5196 =
																												((obj_t)
																												BgL_l1559z00_2600);
																											SET_CAR(BgL_tmpz00_5196,
																												BgL_arg2050z00_2603);
																										}
																									}
																									{	/* SawBbv/bbv.scm 309 */
																										obj_t BgL_arg2053z00_2605;

																										BgL_arg2053z00_2605 =
																											CDR(
																											((obj_t)
																												BgL_l1559z00_2600));
																										{
																											obj_t BgL_l1559z00_5201;

																											BgL_l1559z00_5201 =
																												BgL_arg2053z00_2605;
																											BgL_l1559z00_2600 =
																												BgL_l1559z00_5201;
																											goto
																												BgL_zc3z04anonymousza32048ze3z87_2601;
																										}
																									}
																								}
																						}
																					}
																					((((BgL_rtl_insz00_bglt)
																								COBJECT(BgL_iz00_2588))->
																							BgL_argsz00) =
																						((obj_t) BgL_auxz00_5189), BUNSPEC);
																				}
																				BgL_arg2057z00_2615 = BgL_iz00_2588;
																			}
																	}
																	{	/* SawBbv/bbv.scm 314 */
																		obj_t BgL_auxz00_5206;
																		obj_t BgL_tmpz00_5204;

																		BgL_auxz00_5206 =
																			((obj_t) BgL_arg2057z00_2615);
																		BgL_tmpz00_5204 =
																			((obj_t) BgL_l1562z00_2612);
																		SET_CAR(BgL_tmpz00_5204, BgL_auxz00_5206);
																	}
																}
																{	/* SawBbv/bbv.scm 314 */
																	obj_t BgL_arg2059z00_2617;

																	BgL_arg2059z00_2617 =
																		CDR(((obj_t) BgL_l1562z00_2612));
																	{
																		obj_t BgL_l1562z00_5211;

																		BgL_l1562z00_5211 = BgL_arg2059z00_2617;
																		BgL_l1562z00_2612 = BgL_l1562z00_5211;
																		goto BgL_zc3z04anonymousza32055ze3z87_2613;
																	}
																}
															}
													}
												}
												((((BgL_blockz00_bglt) COBJECT(BgL_bz00_2607))->
														BgL_firstz00) = ((obj_t) BgL_auxz00_5152), BUNSPEC);
											}
										}
										{	/* SawBbv/bbv.scm 326 */
											BgL_blockz00_bglt BgL_i1219z00_2562;

											BgL_i1219z00_2562 =
												((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2554)));
											{	/* SawBbv/bbv.scm 327 */
												obj_t BgL_arg2023z00_2563;
												obj_t BgL_arg2024z00_2564;

												{	/* SawBbv/bbv.scm 327 */
													obj_t BgL_arg2025z00_2565;
													obj_t BgL_arg2028z00_2566;

													BgL_arg2025z00_2565 =
														(((BgL_blockz00_bglt) COBJECT(BgL_i1219z00_2562))->
														BgL_succsz00);
													BgL_arg2028z00_2566 = CDR(((obj_t) BgL_bsz00_2554));
													BgL_arg2023z00_2563 =
														BGl_appendzd221011zd2zzsaw_bbvz00
														(BgL_arg2025z00_2565, BgL_arg2028z00_2566);
												}
												{	/* SawBbv/bbv.scm 327 */
													obj_t BgL_arg2029z00_2567;

													BgL_arg2029z00_2567 = CAR(((obj_t) BgL_bsz00_2554));
													BgL_arg2024z00_2564 =
														MAKE_YOUNG_PAIR(BgL_arg2029z00_2567,
														BgL_accz00_2555);
												}
												{
													obj_t BgL_accz00_5225;
													obj_t BgL_bsz00_5224;

													BgL_bsz00_5224 = BgL_arg2023z00_2563;
													BgL_accz00_5225 = BgL_arg2024z00_2564;
													BgL_accz00_2555 = BgL_accz00_5225;
													BgL_bsz00_2554 = BgL_bsz00_5224;
													goto BgL_zc3z04anonymousza32015ze3z87_2556;
												}
											}
										}
									}
							}
					}
				}
			}
		}

	}



/* remove-inner-mov!~0 */
	obj_t BGl_removezd2innerzd2movz12ze70zf5zzsaw_bbvz00(obj_t BgL_oz00_2571)
	{
		{	/* SawBbv/bbv.scm 297 */
		BGl_removezd2innerzd2movz12ze70zf5zzsaw_bbvz00:
			{	/* SawBbv/bbv.scm 290 */
				bool_t BgL_test2515z00_5226;

				{	/* SawBbv/bbv.scm 290 */
					obj_t BgL_classz00_3596;

					BgL_classz00_3596 = BGl_rtl_insz00zzsaw_defsz00;
					if (BGL_OBJECTP(BgL_oz00_2571))
						{	/* SawBbv/bbv.scm 290 */
							BgL_objectz00_bglt BgL_arg1801z00_3598;

							BgL_arg1801z00_3598 = (BgL_objectz00_bglt) (BgL_oz00_2571);
							if (BGL_CONDEXPAND_ISA_ARCH64())
								{	/* SawBbv/bbv.scm 290 */
									long BgL_idxz00_3604;

									BgL_idxz00_3604 =
										BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_3598);
									BgL_test2515z00_5226 =
										(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
											(BgL_idxz00_3604 + 1L)) == BgL_classz00_3596);
								}
							else
								{	/* SawBbv/bbv.scm 290 */
									bool_t BgL_res2324z00_3626;

									{	/* SawBbv/bbv.scm 290 */
										obj_t BgL_oclassz00_3612;

										{	/* SawBbv/bbv.scm 290 */
											long BgL_arg1808z00_3618;

											{	/* SawBbv/bbv.scm 290 */
												long BgL_arg1809z00_3619;

												BgL_arg1809z00_3619 =
													BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_3598);
												BgL_arg1808z00_3618 =
													(BgL_arg1809z00_3619 - OBJECT_TYPE);
											}
											BgL_oclassz00_3612 =
												VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
												BgL_arg1808z00_3618);
										}
										{	/* SawBbv/bbv.scm 290 */
											bool_t BgL__ortest_1115z00_3613;

											BgL__ortest_1115z00_3613 =
												(BgL_classz00_3596 == BgL_oclassz00_3612);
											if (BgL__ortest_1115z00_3613)
												{	/* SawBbv/bbv.scm 290 */
													BgL_res2324z00_3626 = BgL__ortest_1115z00_3613;
												}
											else
												{	/* SawBbv/bbv.scm 290 */
													long BgL_odepthz00_3614;

													BgL_odepthz00_3614 =
														BGL_CLASS_DEPTH(BgL_oclassz00_3612);
													if ((1L < BgL_odepthz00_3614))
														{	/* SawBbv/bbv.scm 290 */
															obj_t BgL_arg1797z00_3616;

															BgL_arg1797z00_3616 =
																BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_3612, 1L);
															BgL_res2324z00_3626 =
																(BgL_arg1797z00_3616 == BgL_classz00_3596);
														}
													else
														{	/* SawBbv/bbv.scm 290 */
															BgL_res2324z00_3626 = ((bool_t) 0);
														}
												}
										}
									}
									BgL_test2515z00_5226 = BgL_res2324z00_3626;
								}
						}
					else
						{	/* SawBbv/bbv.scm 290 */
							BgL_test2515z00_5226 = ((bool_t) 0);
						}
				}
				if (BgL_test2515z00_5226)
					{	/* SawBbv/bbv.scm 290 */
						if (BGl_rtl_inszd2movzf3z21zzsaw_bbvzd2typeszd2(
								((BgL_rtl_insz00_bglt) BgL_oz00_2571)))
							{	/* SawBbv/bbv.scm 293 */
								obj_t BgL_arg2036z00_2576;

								{	/* SawBbv/bbv.scm 293 */
									obj_t BgL_pairz00_3627;

									BgL_pairz00_3627 =
										(((BgL_rtl_insz00_bglt) COBJECT(
												((BgL_rtl_insz00_bglt) BgL_oz00_2571)))->BgL_argsz00);
									BgL_arg2036z00_2576 = CAR(BgL_pairz00_3627);
								}
								{
									obj_t BgL_oz00_5252;

									BgL_oz00_5252 = BgL_arg2036z00_2576;
									BgL_oz00_2571 = BgL_oz00_5252;
									goto BGl_removezd2innerzd2movz12ze70zf5zzsaw_bbvz00;
								}
							}
						else
							{	/* SawBbv/bbv.scm 291 */
								{
									obj_t BgL_auxz00_5253;

									{	/* SawBbv/bbv.scm 295 */
										obj_t BgL_l01557z00_2579;

										BgL_l01557z00_2579 =
											(((BgL_rtl_insz00_bglt) COBJECT(
													((BgL_rtl_insz00_bglt) BgL_oz00_2571)))->BgL_argsz00);
										{
											obj_t BgL_l1556z00_2581;

											BgL_l1556z00_2581 = BgL_l01557z00_2579;
										BgL_zc3z04anonymousza32038ze3z87_2582:
											if (NULLP(BgL_l1556z00_2581))
												{	/* SawBbv/bbv.scm 295 */
													BgL_auxz00_5253 = BgL_l01557z00_2579;
												}
											else
												{	/* SawBbv/bbv.scm 295 */
													{	/* SawBbv/bbv.scm 295 */
														obj_t BgL_arg2040z00_2584;

														{	/* SawBbv/bbv.scm 295 */
															obj_t BgL_arg2041z00_2585;

															BgL_arg2041z00_2585 =
																CAR(((obj_t) BgL_l1556z00_2581));
															BgL_arg2040z00_2584 =
																BGl_removezd2innerzd2movz12ze70zf5zzsaw_bbvz00
																(BgL_arg2041z00_2585);
														}
														{	/* SawBbv/bbv.scm 295 */
															obj_t BgL_tmpz00_5262;

															BgL_tmpz00_5262 = ((obj_t) BgL_l1556z00_2581);
															SET_CAR(BgL_tmpz00_5262, BgL_arg2040z00_2584);
														}
													}
													{	/* SawBbv/bbv.scm 295 */
														obj_t BgL_arg2042z00_2586;

														BgL_arg2042z00_2586 =
															CDR(((obj_t) BgL_l1556z00_2581));
														{
															obj_t BgL_l1556z00_5267;

															BgL_l1556z00_5267 = BgL_arg2042z00_2586;
															BgL_l1556z00_2581 = BgL_l1556z00_5267;
															goto BgL_zc3z04anonymousza32038ze3z87_2582;
														}
													}
												}
										}
									}
									((((BgL_rtl_insz00_bglt) COBJECT(
													((BgL_rtl_insz00_bglt) BgL_oz00_2571)))->
											BgL_argsz00) = ((obj_t) BgL_auxz00_5253), BUNSPEC);
								}
								return BgL_oz00_2571;
							}
					}
				else
					{	/* SawBbv/bbv.scm 290 */
						return BgL_oz00_2571;
					}
			}
		}

	}



/* fail! */
	obj_t BGl_failz12z12zzsaw_bbvz00(BgL_blockz00_bglt BgL_bz00_100)
	{
		{	/* SawBbv/bbv.scm 335 */
			{
				BgL_blockz00_bglt BgL_bz00_2643;

				{	/* SawBbv/bbv.scm 354 */
					obj_t BgL_g1225z00_2623;

					{	/* SawBbv/bbv.scm 354 */
						obj_t BgL_list2075z00_2642;

						BgL_list2075z00_2642 =
							MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_100), BNIL);
						BgL_g1225z00_2623 = BgL_list2075z00_2642;
					}
					{
						obj_t BgL_bsz00_2626;
						obj_t BgL_accz00_2627;

						BgL_bsz00_2626 = BgL_g1225z00_2623;
						BgL_accz00_2627 = BNIL;
					BgL_zc3z04anonymousza32060ze3z87_2628:
						if (NULLP(BgL_bsz00_2626))
							{	/* SawBbv/bbv.scm 357 */
								return bgl_reverse(BgL_accz00_2627);
							}
						else
							{	/* SawBbv/bbv.scm 357 */
								if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(CAR(
												((obj_t) BgL_bsz00_2626)), BgL_accz00_2627)))
									{	/* SawBbv/bbv.scm 360 */
										obj_t BgL_arg2066z00_2632;

										BgL_arg2066z00_2632 = CDR(((obj_t) BgL_bsz00_2626));
										{
											obj_t BgL_bsz00_5281;

											BgL_bsz00_5281 = BgL_arg2066z00_2632;
											BgL_bsz00_2626 = BgL_bsz00_5281;
											goto BgL_zc3z04anonymousza32060ze3z87_2628;
										}
									}
								else
									{	/* SawBbv/bbv.scm 359 */
										{	/* SawBbv/bbv.scm 362 */
											obj_t BgL_arg2067z00_2633;

											BgL_arg2067z00_2633 = CAR(((obj_t) BgL_bsz00_2626));
											BgL_bz00_2643 = ((BgL_blockz00_bglt) BgL_arg2067z00_2633);
											{	/* SawBbv/bbv.scm 339 */
												bool_t BgL_test2524z00_5284;

												if (NULLP(
														(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2643))->
															BgL_succsz00)))
													{	/* SawBbv/bbv.scm 339 */
														BgL_test2524z00_5284 = ((bool_t) 0);
													}
												else
													{	/* SawBbv/bbv.scm 339 */
														obj_t BgL_arg2096z00_2671;

														BgL_arg2096z00_2671 =
															CAR(
															(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2643))->
																BgL_firstz00));
														BgL_test2524z00_5284 =
															BGl_rtl_inszd2errorzf3z21zzsaw_bbvzd2typeszd2((
																(BgL_rtl_insz00_bglt) BgL_arg2096z00_2671));
													}
												if (BgL_test2524z00_5284)
													{	/* SawBbv/bbv.scm 340 */
														obj_t BgL_lpz00_2652;

														BgL_lpz00_2652 =
															BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00(
															(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2643))->
																BgL_firstz00));
														{	/* SawBbv/bbv.scm 340 */
															obj_t BgL_lastz00_2653;

															BgL_lastz00_2653 = CAR(BgL_lpz00_2652);
															{	/* SawBbv/bbv.scm 341 */

																{	/* SawBbv/bbv.scm 342 */
																	BgL_rtl_insz00_bglt BgL_failz00_2654;

																	{	/* SawBbv/bbv.scm 342 */
																		BgL_rtl_insz00_bglt BgL_new1222z00_2663;

																		{	/* SawBbv/bbv.scm 342 */
																			BgL_rtl_insz00_bglt BgL_new1221z00_2667;

																			BgL_new1221z00_2667 =
																				((BgL_rtl_insz00_bglt)
																				BOBJECT(GC_MALLOC(sizeof(struct
																							BgL_rtl_insz00_bgl))));
																			{	/* SawBbv/bbv.scm 342 */
																				long BgL_arg2094z00_2668;

																				BgL_arg2094z00_2668 =
																					BGL_CLASS_NUM
																					(BGl_rtl_insz00zzsaw_defsz00);
																				BGL_OBJECT_CLASS_NUM_SET((
																						(BgL_objectz00_bglt)
																						BgL_new1221z00_2667),
																					BgL_arg2094z00_2668);
																			}
																			{	/* SawBbv/bbv.scm 342 */
																				BgL_objectz00_bglt BgL_tmpz00_5299;

																				BgL_tmpz00_5299 =
																					((BgL_objectz00_bglt)
																					BgL_new1221z00_2667);
																				BGL_OBJECT_WIDENING_SET(BgL_tmpz00_5299,
																					BFALSE);
																			}
																			((BgL_objectz00_bglt)
																				BgL_new1221z00_2667);
																			BgL_new1222z00_2663 = BgL_new1221z00_2667;
																		}
																		((((BgL_rtl_insz00_bglt)
																					COBJECT(BgL_new1222z00_2663))->
																				BgL_locz00) =
																			((obj_t) BFALSE), BUNSPEC);
																		((((BgL_rtl_insz00_bglt)
																					COBJECT(BgL_new1222z00_2663))->
																				BgL_z52spillz52) =
																			((obj_t) BNIL), BUNSPEC);
																		((((BgL_rtl_insz00_bglt)
																					COBJECT(BgL_new1222z00_2663))->
																				BgL_destz00) =
																			((obj_t) BFALSE), BUNSPEC);
																		{
																			BgL_rtl_funz00_bglt BgL_auxz00_5306;

																			{	/* SawBbv/bbv.scm 344 */
																				BgL_rtl_pragmaz00_bglt
																					BgL_new1224z00_2664;
																				{	/* SawBbv/bbv.scm 345 */
																					BgL_rtl_pragmaz00_bglt
																						BgL_new1223z00_2665;
																					BgL_new1223z00_2665 =
																						((BgL_rtl_pragmaz00_bglt)
																						BOBJECT(GC_MALLOC(sizeof(struct
																									BgL_rtl_pragmaz00_bgl))));
																					{	/* SawBbv/bbv.scm 345 */
																						long BgL_arg2093z00_2666;

																						{	/* SawBbv/bbv.scm 345 */
																							obj_t BgL_classz00_3682;

																							BgL_classz00_3682 =
																								BGl_rtl_pragmaz00zzsaw_defsz00;
																							BgL_arg2093z00_2666 =
																								BGL_CLASS_NUM
																								(BgL_classz00_3682);
																						}
																						BGL_OBJECT_CLASS_NUM_SET(
																							((BgL_objectz00_bglt)
																								BgL_new1223z00_2665),
																							BgL_arg2093z00_2666);
																					}
																					BgL_new1224z00_2664 =
																						BgL_new1223z00_2665;
																				}
																				((((BgL_rtl_funz00_bglt) COBJECT(
																								((BgL_rtl_funz00_bglt)
																									BgL_new1224z00_2664)))->
																						BgL_locz00) =
																					((obj_t) (((BgL_rtl_insz00_bglt)
																								COBJECT(((BgL_rtl_insz00_bglt)
																										BgL_lastz00_2653)))->
																							BgL_locz00)), BUNSPEC);
																				((((BgL_rtl_pragmaz00_bglt)
																							COBJECT(BgL_new1224z00_2664))->
																						BgL_formatz00) =
																					((obj_t)
																						BGl_string2361z00zzsaw_bbvz00),
																					BUNSPEC);
																				BgL_auxz00_5306 =
																					((BgL_rtl_funz00_bglt)
																					BgL_new1224z00_2664);
																			}
																			((((BgL_rtl_insz00_bglt)
																						COBJECT(BgL_new1222z00_2663))->
																					BgL_funz00) =
																				((BgL_rtl_funz00_bglt) BgL_auxz00_5306),
																				BUNSPEC);
																		}
																		((((BgL_rtl_insz00_bglt)
																					COBJECT(BgL_new1222z00_2663))->
																				BgL_argsz00) = ((obj_t) BNIL), BUNSPEC);
																		BgL_failz00_2654 = BgL_new1222z00_2663;
																	}
																	if (NULLP(CDR(
																				(((BgL_blockz00_bglt)
																						COBJECT(BgL_bz00_2643))->
																					BgL_succsz00))))
																		{	/* SawBbv/bbv.scm 348 */
																			((((BgL_blockz00_bglt)
																						COBJECT(BgL_bz00_2643))->
																					BgL_succsz00) =
																				((obj_t) BNIL), BUNSPEC);
																		}
																	else
																		{	/* SawBbv/bbv.scm 348 */
																			BFALSE;
																		}
																	if (BGl_rtl_inszd2gozf3z21zzsaw_bbvzd2typeszd2
																		(((BgL_rtl_insz00_bglt) BgL_lastz00_2653)))
																		{	/* SawBbv/bbv.scm 351 */
																			obj_t BgL_tmpz00_5327;

																			BgL_tmpz00_5327 =
																				((obj_t) BgL_failz00_2654);
																			SET_CAR(BgL_lpz00_2652, BgL_tmpz00_5327);
																		}
																	else
																		{	/* SawBbv/bbv.scm 352 */
																			obj_t BgL_arg2090z00_2661;

																			{	/* SawBbv/bbv.scm 352 */
																				obj_t BgL_list2091z00_2662;

																				BgL_list2091z00_2662 =
																					MAKE_YOUNG_PAIR(
																					((obj_t) BgL_failz00_2654), BNIL);
																				BgL_arg2090z00_2661 =
																					BgL_list2091z00_2662;
																			}
																			SET_CDR(BgL_lpz00_2652,
																				BgL_arg2090z00_2661);
																		}
																}
															}
														}
													}
												else
													{	/* SawBbv/bbv.scm 339 */
														BFALSE;
													}
											}
										}
										{	/* SawBbv/bbv.scm 363 */
											BgL_blockz00_bglt BgL_i1228z00_2634;

											BgL_i1228z00_2634 =
												((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2626)));
											{	/* SawBbv/bbv.scm 364 */
												obj_t BgL_arg2069z00_2635;
												obj_t BgL_arg2070z00_2636;

												{	/* SawBbv/bbv.scm 364 */
													obj_t BgL_arg2071z00_2637;
													obj_t BgL_arg2072z00_2638;

													BgL_arg2071z00_2637 =
														(((BgL_blockz00_bglt) COBJECT(BgL_i1228z00_2634))->
														BgL_succsz00);
													BgL_arg2072z00_2638 = CDR(((obj_t) BgL_bsz00_2626));
													BgL_arg2069z00_2635 =
														BGl_appendzd221011zd2zzsaw_bbvz00
														(BgL_arg2071z00_2637, BgL_arg2072z00_2638);
												}
												{	/* SawBbv/bbv.scm 364 */
													obj_t BgL_arg2073z00_2639;

													BgL_arg2073z00_2639 = CAR(((obj_t) BgL_bsz00_2626));
													BgL_arg2070z00_2636 =
														MAKE_YOUNG_PAIR(BgL_arg2073z00_2639,
														BgL_accz00_2627);
												}
												{
													obj_t BgL_accz00_5345;
													obj_t BgL_bsz00_5344;

													BgL_bsz00_5344 = BgL_arg2069z00_2635;
													BgL_accz00_5345 = BgL_arg2070z00_2636;
													BgL_accz00_2627 = BgL_accz00_5345;
													BgL_bsz00_2626 = BgL_bsz00_5344;
													goto BgL_zc3z04anonymousza32060ze3z87_2628;
												}
											}
										}
									}
							}
					}
				}
			}
		}

	}



/* normalize-typecheck! */
	obj_t BGl_normaliza7ezd2typecheckz12z67zzsaw_bbvz00(BgL_blockz00_bglt
		BgL_bz00_101)
	{
		{	/* SawBbv/bbv.scm 372 */
			{
				BgL_blockz00_bglt BgL_bz00_2745;
				BgL_rtl_insz00_bglt BgL_iz00_2739;
				BgL_rtl_insz00_bglt BgL_iz00_2698;

				{	/* SawBbv/bbv.scm 405 */
					obj_t BgL_g1235z00_2678;

					{	/* SawBbv/bbv.scm 405 */
						obj_t BgL_list2111z00_2697;

						BgL_list2111z00_2697 =
							MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_101), BNIL);
						BgL_g1235z00_2678 = BgL_list2111z00_2697;
					}
					{
						obj_t BgL_bsz00_2681;
						obj_t BgL_accz00_2682;

						BgL_bsz00_2681 = BgL_g1235z00_2678;
						BgL_accz00_2682 = BNIL;
					BgL_zc3z04anonymousza32099ze3z87_2683:
						if (NULLP(BgL_bsz00_2681))
							{	/* SawBbv/bbv.scm 408 */
								return bgl_reverse(BgL_accz00_2682);
							}
						else
							{	/* SawBbv/bbv.scm 408 */
								if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(CAR(
												((obj_t) BgL_bsz00_2681)), BgL_accz00_2682)))
									{	/* SawBbv/bbv.scm 411 */
										obj_t BgL_arg2103z00_2687;

										BgL_arg2103z00_2687 = CDR(((obj_t) BgL_bsz00_2681));
										{
											obj_t BgL_bsz00_5358;

											BgL_bsz00_5358 = BgL_arg2103z00_2687;
											BgL_bsz00_2681 = BgL_bsz00_5358;
											goto BgL_zc3z04anonymousza32099ze3z87_2683;
										}
									}
								else
									{	/* SawBbv/bbv.scm 410 */
										{	/* SawBbv/bbv.scm 413 */
											obj_t BgL_arg2104z00_2688;

											BgL_arg2104z00_2688 = CAR(((obj_t) BgL_bsz00_2681));
											BgL_bz00_2745 = ((BgL_blockz00_bglt) BgL_arg2104z00_2688);
											{	/* SawBbv/bbv.scm 403 */
												obj_t BgL_g1566z00_2748;

												BgL_g1566z00_2748 =
													(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2745))->
													BgL_firstz00);
												{
													obj_t BgL_l1564z00_2750;

													BgL_l1564z00_2750 = BgL_g1566z00_2748;
												BgL_zc3z04anonymousza32146ze3z87_2751:
													if (PAIRP(BgL_l1564z00_2750))
														{	/* SawBbv/bbv.scm 403 */
															{	/* SawBbv/bbv.scm 403 */
																obj_t BgL_arg2148z00_2753;

																BgL_arg2148z00_2753 = CAR(BgL_l1564z00_2750);
																BgL_iz00_2739 =
																	((BgL_rtl_insz00_bglt) BgL_arg2148z00_2753);
																{	/* SawBbv/bbv.scm 394 */
																	obj_t BgL_callz00_2741;

																	BgL_iz00_2698 = BgL_iz00_2739;
																	if (BGl_rtl_inszd2ifnezf3z21zzsaw_bbvzd2typeszd2(BgL_iz00_2698))
																		{	/* SawBbv/bbv.scm 377 */
																			bool_t BgL_test2532z00_5367;

																			{	/* SawBbv/bbv.scm 377 */
																				bool_t BgL_test2533z00_5368;

																				{	/* SawBbv/bbv.scm 377 */
																					obj_t BgL_arg2141z00_2737;

																					BgL_arg2141z00_2737 =
																						CAR(
																						(((BgL_rtl_insz00_bglt)
																								COBJECT(BgL_iz00_2698))->
																							BgL_argsz00));
																					{	/* SawBbv/bbv.scm 377 */
																						obj_t BgL_classz00_3698;

																						BgL_classz00_3698 =
																							BGl_rtl_insz00zzsaw_defsz00;
																						if (BGL_OBJECTP
																							(BgL_arg2141z00_2737))
																							{	/* SawBbv/bbv.scm 377 */
																								BgL_objectz00_bglt
																									BgL_arg1801z00_3700;
																								BgL_arg1801z00_3700 =
																									(BgL_objectz00_bglt)
																									(BgL_arg2141z00_2737);
																								if (BGL_CONDEXPAND_ISA_ARCH64())
																									{	/* SawBbv/bbv.scm 377 */
																										long BgL_idxz00_3706;

																										BgL_idxz00_3706 =
																											BGL_OBJECT_INHERITANCE_NUM
																											(BgL_arg1801z00_3700);
																										BgL_test2533z00_5368 =
																											(VECTOR_REF
																											(BGl_za2inheritancesza2z00zz__objectz00,
																												(BgL_idxz00_3706 +
																													1L)) ==
																											BgL_classz00_3698);
																									}
																								else
																									{	/* SawBbv/bbv.scm 377 */
																										bool_t BgL_res2329z00_3728;

																										{	/* SawBbv/bbv.scm 377 */
																											obj_t BgL_oclassz00_3714;

																											{	/* SawBbv/bbv.scm 377 */
																												long
																													BgL_arg1808z00_3720;
																												{	/* SawBbv/bbv.scm 377 */
																													long
																														BgL_arg1809z00_3721;
																													BgL_arg1809z00_3721 =
																														BGL_OBJECT_CLASS_NUM
																														(BgL_arg1801z00_3700);
																													BgL_arg1808z00_3720 =
																														(BgL_arg1809z00_3721
																														- OBJECT_TYPE);
																												}
																												BgL_oclassz00_3714 =
																													VECTOR_REF
																													(BGl_za2classesza2z00zz__objectz00,
																													BgL_arg1808z00_3720);
																											}
																											{	/* SawBbv/bbv.scm 377 */
																												bool_t
																													BgL__ortest_1115z00_3715;
																												BgL__ortest_1115z00_3715
																													=
																													(BgL_classz00_3698 ==
																													BgL_oclassz00_3714);
																												if (BgL__ortest_1115z00_3715)
																													{	/* SawBbv/bbv.scm 377 */
																														BgL_res2329z00_3728
																															=
																															BgL__ortest_1115z00_3715;
																													}
																												else
																													{	/* SawBbv/bbv.scm 377 */
																														long
																															BgL_odepthz00_3716;
																														BgL_odepthz00_3716 =
																															BGL_CLASS_DEPTH
																															(BgL_oclassz00_3714);
																														if ((1L <
																																BgL_odepthz00_3716))
																															{	/* SawBbv/bbv.scm 377 */
																																obj_t
																																	BgL_arg1797z00_3718;
																																BgL_arg1797z00_3718
																																	=
																																	BGL_CLASS_ANCESTORS_REF
																																	(BgL_oclassz00_3714,
																																	1L);
																																BgL_res2329z00_3728
																																	=
																																	(BgL_arg1797z00_3718
																																	==
																																	BgL_classz00_3698);
																															}
																														else
																															{	/* SawBbv/bbv.scm 377 */
																																BgL_res2329z00_3728
																																	=
																																	((bool_t) 0);
																															}
																													}
																											}
																										}
																										BgL_test2533z00_5368 =
																											BgL_res2329z00_3728;
																									}
																							}
																						else
																							{	/* SawBbv/bbv.scm 377 */
																								BgL_test2533z00_5368 =
																									((bool_t) 0);
																							}
																					}
																				}
																				if (BgL_test2533z00_5368)
																					{	/* SawBbv/bbv.scm 377 */
																						obj_t BgL_arg2139z00_2735;

																						BgL_arg2139z00_2735 =
																							CAR(
																							(((BgL_rtl_insz00_bglt)
																									COBJECT(BgL_iz00_2698))->
																								BgL_argsz00));
																						BgL_test2532z00_5367 =
																							BGl_rtl_inszd2movzf3z21zzsaw_bbvzd2typeszd2
																							(((BgL_rtl_insz00_bglt)
																								BgL_arg2139z00_2735));
																					}
																				else
																					{	/* SawBbv/bbv.scm 377 */
																						BgL_test2532z00_5367 = ((bool_t) 0);
																					}
																			}
																			if (BgL_test2532z00_5367)
																				{	/* SawBbv/bbv.scm 378 */
																					obj_t BgL_g1230z00_2710;

																					BgL_g1230z00_2710 =
																						CAR(
																						(((BgL_rtl_insz00_bglt)
																								COBJECT(BgL_iz00_2698))->
																							BgL_argsz00));
																					{
																						obj_t BgL_jz00_2712;

																						BgL_jz00_2712 = BgL_g1230z00_2710;
																					BgL_zc3z04anonymousza32122ze3z87_2713:
																						{	/* SawBbv/bbv.scm 380 */
																							bool_t BgL_test2538z00_5396;

																							{	/* SawBbv/bbv.scm 380 */
																								obj_t BgL_classz00_3731;

																								BgL_classz00_3731 =
																									BGl_rtl_insz00zzsaw_defsz00;
																								if (BGL_OBJECTP(BgL_jz00_2712))
																									{	/* SawBbv/bbv.scm 380 */
																										BgL_objectz00_bglt
																											BgL_arg1801z00_3733;
																										BgL_arg1801z00_3733 =
																											(BgL_objectz00_bglt)
																											(BgL_jz00_2712);
																										if (BGL_CONDEXPAND_ISA_ARCH64())
																											{	/* SawBbv/bbv.scm 380 */
																												long BgL_idxz00_3739;

																												BgL_idxz00_3739 =
																													BGL_OBJECT_INHERITANCE_NUM
																													(BgL_arg1801z00_3733);
																												BgL_test2538z00_5396 =
																													(VECTOR_REF
																													(BGl_za2inheritancesza2z00zz__objectz00,
																														(BgL_idxz00_3739 +
																															1L)) ==
																													BgL_classz00_3731);
																											}
																										else
																											{	/* SawBbv/bbv.scm 380 */
																												bool_t
																													BgL_res2330z00_3761;
																												{	/* SawBbv/bbv.scm 380 */
																													obj_t
																														BgL_oclassz00_3747;
																													{	/* SawBbv/bbv.scm 380 */
																														long
																															BgL_arg1808z00_3753;
																														{	/* SawBbv/bbv.scm 380 */
																															long
																																BgL_arg1809z00_3754;
																															BgL_arg1809z00_3754
																																=
																																BGL_OBJECT_CLASS_NUM
																																(BgL_arg1801z00_3733);
																															BgL_arg1808z00_3753
																																=
																																(BgL_arg1809z00_3754
																																- OBJECT_TYPE);
																														}
																														BgL_oclassz00_3747 =
																															VECTOR_REF
																															(BGl_za2classesza2z00zz__objectz00,
																															BgL_arg1808z00_3753);
																													}
																													{	/* SawBbv/bbv.scm 380 */
																														bool_t
																															BgL__ortest_1115z00_3748;
																														BgL__ortest_1115z00_3748
																															=
																															(BgL_classz00_3731
																															==
																															BgL_oclassz00_3747);
																														if (BgL__ortest_1115z00_3748)
																															{	/* SawBbv/bbv.scm 380 */
																																BgL_res2330z00_3761
																																	=
																																	BgL__ortest_1115z00_3748;
																															}
																														else
																															{	/* SawBbv/bbv.scm 380 */
																																long
																																	BgL_odepthz00_3749;
																																BgL_odepthz00_3749
																																	=
																																	BGL_CLASS_DEPTH
																																	(BgL_oclassz00_3747);
																																if ((1L <
																																		BgL_odepthz00_3749))
																																	{	/* SawBbv/bbv.scm 380 */
																																		obj_t
																																			BgL_arg1797z00_3751;
																																		BgL_arg1797z00_3751
																																			=
																																			BGL_CLASS_ANCESTORS_REF
																																			(BgL_oclassz00_3747,
																																			1L);
																																		BgL_res2330z00_3761
																																			=
																																			(BgL_arg1797z00_3751
																																			==
																																			BgL_classz00_3731);
																																	}
																																else
																																	{	/* SawBbv/bbv.scm 380 */
																																		BgL_res2330z00_3761
																																			=
																																			((bool_t)
																																			0);
																																	}
																															}
																													}
																												}
																												BgL_test2538z00_5396 =
																													BgL_res2330z00_3761;
																											}
																									}
																								else
																									{	/* SawBbv/bbv.scm 380 */
																										BgL_test2538z00_5396 =
																											((bool_t) 0);
																									}
																							}
																							if (BgL_test2538z00_5396)
																								{	/* SawBbv/bbv.scm 380 */
																									if (BGl_rtl_inszd2movzf3z21zzsaw_bbvzd2typeszd2(((BgL_rtl_insz00_bglt) BgL_jz00_2712)))
																										{	/* SawBbv/bbv.scm 384 */
																											obj_t BgL_arg2125z00_2717;

																											{	/* SawBbv/bbv.scm 384 */
																												obj_t BgL_pairz00_3762;

																												BgL_pairz00_3762 =
																													(((BgL_rtl_insz00_bglt) COBJECT(((BgL_rtl_insz00_bglt) BgL_jz00_2712)))->BgL_argsz00);
																												BgL_arg2125z00_2717 =
																													CAR(BgL_pairz00_3762);
																											}
																											{
																												obj_t BgL_jz00_5422;

																												BgL_jz00_5422 =
																													BgL_arg2125z00_2717;
																												BgL_jz00_2712 =
																													BgL_jz00_5422;
																												goto
																													BgL_zc3z04anonymousza32122ze3z87_2713;
																											}
																										}
																									else
																										{	/* SawBbv/bbv.scm 382 */
																											if (BGl_rtl_inszd2callzf3z21zzsaw_bbvzd2typeszd2(((BgL_rtl_insz00_bglt) BgL_jz00_2712)))
																												{	/* SawBbv/bbv.scm 385 */
																													if (CBOOL
																														(BGl_rtl_callzd2predicatezd2zzsaw_bbvzd2typeszd2
																															(((BgL_rtl_insz00_bglt) BgL_jz00_2712))))
																														{	/* SawBbv/bbv.scm 387 */
																															obj_t
																																BgL_argsz00_2721;
																															BgL_argsz00_2721 =
																																BGl_rtl_inszd2argsza2z70zzsaw_defsz00
																																(BgL_iz00_2698);
																															{	/* SawBbv/bbv.scm 388 */
																																bool_t
																																	BgL_test2546z00_5431;
																																if (NULLP
																																	(BgL_argsz00_2721))
																																	{	/* SawBbv/bbv.scm 388 */
																																		BgL_test2546z00_5431
																																			=
																																			((bool_t)
																																			0);
																																	}
																																else
																																	{	/* SawBbv/bbv.scm 388 */
																																		if (NULLP
																																			(CDR
																																				(BgL_argsz00_2721)))
																																			{	/* SawBbv/bbv.scm 388 */
																																				obj_t
																																					BgL_arg2136z00_2730;
																																				BgL_arg2136z00_2730
																																					=
																																					CAR
																																					(BgL_argsz00_2721);
																																				{	/* SawBbv/bbv.scm 388 */
																																					obj_t
																																						BgL_classz00_3765;
																																					BgL_classz00_3765
																																						=
																																						BGl_rtl_regz00zzsaw_defsz00;
																																					if (BGL_OBJECTP(BgL_arg2136z00_2730))
																																						{	/* SawBbv/bbv.scm 388 */
																																							BgL_objectz00_bglt
																																								BgL_arg1801z00_3767;
																																							BgL_arg1801z00_3767
																																								=
																																								(BgL_objectz00_bglt)
																																								(BgL_arg2136z00_2730);
																																							if (BGL_CONDEXPAND_ISA_ARCH64())
																																								{	/* SawBbv/bbv.scm 388 */
																																									long
																																										BgL_idxz00_3773;
																																									BgL_idxz00_3773
																																										=
																																										BGL_OBJECT_INHERITANCE_NUM
																																										(BgL_arg1801z00_3767);
																																									BgL_test2546z00_5431
																																										=
																																										(VECTOR_REF
																																										(BGl_za2inheritancesza2z00zz__objectz00,
																																											(BgL_idxz00_3773
																																												+
																																												1L))
																																										==
																																										BgL_classz00_3765);
																																								}
																																							else
																																								{	/* SawBbv/bbv.scm 388 */
																																									bool_t
																																										BgL_res2331z00_3795;
																																									{	/* SawBbv/bbv.scm 388 */
																																										obj_t
																																											BgL_oclassz00_3781;
																																										{	/* SawBbv/bbv.scm 388 */
																																											long
																																												BgL_arg1808z00_3787;
																																											{	/* SawBbv/bbv.scm 388 */
																																												long
																																													BgL_arg1809z00_3788;
																																												BgL_arg1809z00_3788
																																													=
																																													BGL_OBJECT_CLASS_NUM
																																													(BgL_arg1801z00_3767);
																																												BgL_arg1808z00_3787
																																													=
																																													(BgL_arg1809z00_3788
																																													-
																																													OBJECT_TYPE);
																																											}
																																											BgL_oclassz00_3781
																																												=
																																												VECTOR_REF
																																												(BGl_za2classesza2z00zz__objectz00,
																																												BgL_arg1808z00_3787);
																																										}
																																										{	/* SawBbv/bbv.scm 388 */
																																											bool_t
																																												BgL__ortest_1115z00_3782;
																																											BgL__ortest_1115z00_3782
																																												=
																																												(BgL_classz00_3765
																																												==
																																												BgL_oclassz00_3781);
																																											if (BgL__ortest_1115z00_3782)
																																												{	/* SawBbv/bbv.scm 388 */
																																													BgL_res2331z00_3795
																																														=
																																														BgL__ortest_1115z00_3782;
																																												}
																																											else
																																												{	/* SawBbv/bbv.scm 388 */
																																													long
																																														BgL_odepthz00_3783;
																																													BgL_odepthz00_3783
																																														=
																																														BGL_CLASS_DEPTH
																																														(BgL_oclassz00_3781);
																																													if ((1L < BgL_odepthz00_3783))
																																														{	/* SawBbv/bbv.scm 388 */
																																															obj_t
																																																BgL_arg1797z00_3785;
																																															BgL_arg1797z00_3785
																																																=
																																																BGL_CLASS_ANCESTORS_REF
																																																(BgL_oclassz00_3781,
																																																1L);
																																															BgL_res2331z00_3795
																																																=
																																																(BgL_arg1797z00_3785
																																																==
																																																BgL_classz00_3765);
																																														}
																																													else
																																														{	/* SawBbv/bbv.scm 388 */
																																															BgL_res2331z00_3795
																																																=
																																																(
																																																(bool_t)
																																																0);
																																														}
																																												}
																																										}
																																									}
																																									BgL_test2546z00_5431
																																										=
																																										BgL_res2331z00_3795;
																																								}
																																						}
																																					else
																																						{	/* SawBbv/bbv.scm 388 */
																																							BgL_test2546z00_5431
																																								=
																																								(
																																								(bool_t)
																																								0);
																																						}
																																				}
																																			}
																																		else
																																			{	/* SawBbv/bbv.scm 388 */
																																				BgL_test2546z00_5431
																																					=
																																					(
																																					(bool_t)
																																					0);
																																			}
																																	}
																																if (BgL_test2546z00_5431)
																																	{	/* SawBbv/bbv.scm 388 */
																																		BgL_callz00_2741
																																			=
																																			BgL_jz00_2712;
																																	}
																																else
																																	{	/* SawBbv/bbv.scm 388 */
																																		BgL_callz00_2741
																																			= BFALSE;
																																	}
																															}
																														}
																													else
																														{	/* SawBbv/bbv.scm 386 */
																															BgL_callz00_2741 =
																																BFALSE;
																														}
																												}
																											else
																												{	/* SawBbv/bbv.scm 385 */
																													BgL_callz00_2741 =
																														BFALSE;
																												}
																										}
																								}
																							else
																								{	/* SawBbv/bbv.scm 380 */
																									BgL_callz00_2741 = BFALSE;
																								}
																						}
																					}
																				}
																			else
																				{	/* SawBbv/bbv.scm 377 */
																					BgL_callz00_2741 = BFALSE;
																				}
																		}
																	else
																		{	/* SawBbv/bbv.scm 375 */
																			BgL_callz00_2741 = BFALSE;
																		}
																	if (CBOOL(BgL_callz00_2741))
																		{	/* SawBbv/bbv.scm 395 */
																			((((BgL_rtl_insz00_bglt) COBJECT(
																							((BgL_rtl_insz00_bglt)
																								BgL_callz00_2741)))->
																					BgL_destz00) =
																				((obj_t) (((BgL_rtl_insz00_bglt)
																							COBJECT(BgL_iz00_2739))->
																						BgL_destz00)), BUNSPEC);
																			{	/* SawBbv/bbv.scm 399 */
																				obj_t BgL_arg2144z00_2744;

																				BgL_arg2144z00_2744 =
																					(((BgL_rtl_insz00_bglt)
																						COBJECT(BgL_iz00_2739))->
																					BgL_argsz00);
																				{	/* SawBbv/bbv.scm 399 */
																					obj_t BgL_tmpz00_5463;

																					BgL_tmpz00_5463 =
																						((obj_t) BgL_arg2144z00_2744);
																					SET_CAR(BgL_tmpz00_5463,
																						BgL_callz00_2741);
																				}
																			}
																		}
																	else
																		{	/* SawBbv/bbv.scm 395 */
																			BFALSE;
																		}
																}
															}
															{
																obj_t BgL_l1564z00_5467;

																BgL_l1564z00_5467 = CDR(BgL_l1564z00_2750);
																BgL_l1564z00_2750 = BgL_l1564z00_5467;
																goto BgL_zc3z04anonymousza32146ze3z87_2751;
															}
														}
													else
														{	/* SawBbv/bbv.scm 403 */
															((bool_t) 1);
														}
												}
											}
										}
										{	/* SawBbv/bbv.scm 414 */
											BgL_blockz00_bglt BgL_i1237z00_2689;

											BgL_i1237z00_2689 =
												((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2681)));
											{	/* SawBbv/bbv.scm 415 */
												obj_t BgL_arg2105z00_2690;
												obj_t BgL_arg2106z00_2691;

												{	/* SawBbv/bbv.scm 415 */
													obj_t BgL_arg2107z00_2692;
													obj_t BgL_arg2108z00_2693;

													BgL_arg2107z00_2692 =
														(((BgL_blockz00_bglt) COBJECT(BgL_i1237z00_2689))->
														BgL_succsz00);
													BgL_arg2108z00_2693 = CDR(((obj_t) BgL_bsz00_2681));
													BgL_arg2105z00_2690 =
														BGl_appendzd221011zd2zzsaw_bbvz00
														(BgL_arg2107z00_2692, BgL_arg2108z00_2693);
												}
												{	/* SawBbv/bbv.scm 415 */
													obj_t BgL_arg2109z00_2694;

													BgL_arg2109z00_2694 = CAR(((obj_t) BgL_bsz00_2681));
													BgL_arg2106z00_2691 =
														MAKE_YOUNG_PAIR(BgL_arg2109z00_2694,
														BgL_accz00_2682);
												}
												{
													obj_t BgL_accz00_5481;
													obj_t BgL_bsz00_5480;

													BgL_bsz00_5480 = BgL_arg2105z00_2690;
													BgL_accz00_5481 = BgL_arg2106z00_2691;
													BgL_accz00_2682 = BgL_accz00_5481;
													BgL_bsz00_2681 = BgL_bsz00_5480;
													goto BgL_zc3z04anonymousza32099ze3z87_2683;
												}
											}
										}
									}
							}
					}
				}
			}
		}

	}



/* normalize-goto! */
	obj_t BGl_normaliza7ezd2gotoz12z67zzsaw_bbvz00(BgL_blockz00_bglt BgL_bz00_102)
	{
		{	/* SawBbv/bbv.scm 425 */
			{
				BgL_blockz00_bglt BgL_bz00_2780;

				{	/* SawBbv/bbv.scm 441 */
					obj_t BgL_g1243z00_2760;

					{	/* SawBbv/bbv.scm 441 */
						obj_t BgL_list2162z00_2779;

						BgL_list2162z00_2779 =
							MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_102), BNIL);
						BgL_g1243z00_2760 = BgL_list2162z00_2779;
					}
					{
						obj_t BgL_bsz00_2763;
						obj_t BgL_accz00_2764;

						BgL_bsz00_2763 = BgL_g1243z00_2760;
						BgL_accz00_2764 = BNIL;
					BgL_zc3z04anonymousza32150ze3z87_2765:
						if (NULLP(BgL_bsz00_2763))
							{	/* SawBbv/bbv.scm 444 */
								return bgl_reverse(BgL_accz00_2764);
							}
						else
							{	/* SawBbv/bbv.scm 444 */
								if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(CAR(
												((obj_t) BgL_bsz00_2763)), BgL_accz00_2764)))
									{	/* SawBbv/bbv.scm 447 */
										obj_t BgL_arg2154z00_2769;

										BgL_arg2154z00_2769 = CDR(((obj_t) BgL_bsz00_2763));
										{
											obj_t BgL_bsz00_5494;

											BgL_bsz00_5494 = BgL_arg2154z00_2769;
											BgL_bsz00_2763 = BgL_bsz00_5494;
											goto BgL_zc3z04anonymousza32150ze3z87_2765;
										}
									}
								else
									{	/* SawBbv/bbv.scm 446 */
										{	/* SawBbv/bbv.scm 449 */
											obj_t BgL_arg2155z00_2770;

											BgL_arg2155z00_2770 = CAR(((obj_t) BgL_bsz00_2763));
											BgL_bz00_2780 = ((BgL_blockz00_bglt) BgL_arg2155z00_2770);
											if (NULLP(
													(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2780))->
														BgL_succsz00)))
												{	/* SawBbv/bbv.scm 429 */
													BFALSE;
												}
											else
												{	/* SawBbv/bbv.scm 430 */
													obj_t BgL_lpz00_2785;

													BgL_lpz00_2785 =
														BGl_lastzd2pairzd2zz__r4_pairs_and_lists_6_3z00(
														(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2780))->
															BgL_firstz00));
													{	/* SawBbv/bbv.scm 430 */
														obj_t BgL_lastz00_2786;

														BgL_lastz00_2786 = CAR(BgL_lpz00_2785);
														{	/* SawBbv/bbv.scm 431 */

															{	/* SawBbv/bbv.scm 432 */
																bool_t BgL_test2557z00_5503;

																if (BGl_rtl_inszd2gozf3z21zzsaw_bbvzd2typeszd2(
																		((BgL_rtl_insz00_bglt) BgL_lastz00_2786)))
																	{	/* SawBbv/bbv.scm 432 */
																		BgL_test2557z00_5503 = ((bool_t) 1);
																	}
																else
																	{	/* SawBbv/bbv.scm 432 */
																		BgL_test2557z00_5503 =
																			BGl_rtl_inszd2failzf3z21zzsaw_bbvzd2typeszd2
																			(((BgL_rtl_insz00_bglt)
																				BgL_lastz00_2786));
																	}
																if (BgL_test2557z00_5503)
																	{	/* SawBbv/bbv.scm 432 */
																		BFALSE;
																	}
																else
																	{	/* SawBbv/bbv.scm 433 */
																		BgL_rtl_insz00_bglt BgL_goz00_2789;

																		{	/* SawBbv/bbv.scm 433 */
																			BgL_rtl_insz00_bglt BgL_new1240z00_2792;

																			{	/* SawBbv/bbv.scm 433 */
																				BgL_rtl_insz00_bglt BgL_new1239z00_2797;

																				BgL_new1239z00_2797 =
																					((BgL_rtl_insz00_bglt)
																					BOBJECT(GC_MALLOC(sizeof(struct
																								BgL_rtl_insz00_bgl))));
																				{	/* SawBbv/bbv.scm 433 */
																					long BgL_arg2172z00_2798;

																					BgL_arg2172z00_2798 =
																						BGL_CLASS_NUM
																						(BGl_rtl_insz00zzsaw_defsz00);
																					BGL_OBJECT_CLASS_NUM_SET((
																							(BgL_objectz00_bglt)
																							BgL_new1239z00_2797),
																						BgL_arg2172z00_2798);
																				}
																				{	/* SawBbv/bbv.scm 433 */
																					BgL_objectz00_bglt BgL_tmpz00_5513;

																					BgL_tmpz00_5513 =
																						((BgL_objectz00_bglt)
																						BgL_new1239z00_2797);
																					BGL_OBJECT_WIDENING_SET
																						(BgL_tmpz00_5513, BFALSE);
																				}
																				((BgL_objectz00_bglt)
																					BgL_new1239z00_2797);
																				BgL_new1240z00_2792 =
																					BgL_new1239z00_2797;
																			}
																			((((BgL_rtl_insz00_bglt)
																						COBJECT(BgL_new1240z00_2792))->
																					BgL_locz00) =
																				((obj_t) BFALSE), BUNSPEC);
																			((((BgL_rtl_insz00_bglt)
																						COBJECT(BgL_new1240z00_2792))->
																					BgL_z52spillz52) =
																				((obj_t) BNIL), BUNSPEC);
																			((((BgL_rtl_insz00_bglt)
																						COBJECT(BgL_new1240z00_2792))->
																					BgL_destz00) =
																				((obj_t) BFALSE), BUNSPEC);
																			{
																				BgL_rtl_funz00_bglt BgL_auxz00_5520;

																				{	/* SawBbv/bbv.scm 435 */
																					BgL_rtl_goz00_bglt
																						BgL_new1242z00_2793;
																					{	/* SawBbv/bbv.scm 436 */
																						BgL_rtl_goz00_bglt
																							BgL_new1241z00_2795;
																						BgL_new1241z00_2795 =
																							((BgL_rtl_goz00_bglt)
																							BOBJECT(GC_MALLOC(sizeof(struct
																										BgL_rtl_goz00_bgl))));
																						{	/* SawBbv/bbv.scm 436 */
																							long BgL_arg2171z00_2796;

																							{	/* SawBbv/bbv.scm 436 */
																								obj_t BgL_classz00_3811;

																								BgL_classz00_3811 =
																									BGl_rtl_goz00zzsaw_defsz00;
																								BgL_arg2171z00_2796 =
																									BGL_CLASS_NUM
																									(BgL_classz00_3811);
																							}
																							BGL_OBJECT_CLASS_NUM_SET(
																								((BgL_objectz00_bglt)
																									BgL_new1241z00_2795),
																								BgL_arg2171z00_2796);
																						}
																						BgL_new1242z00_2793 =
																							BgL_new1241z00_2795;
																					}
																					((((BgL_rtl_funz00_bglt) COBJECT(
																									((BgL_rtl_funz00_bglt)
																										BgL_new1242z00_2793)))->
																							BgL_locz00) =
																						((obj_t) (((BgL_rtl_insz00_bglt)
																									COBJECT(((BgL_rtl_insz00_bglt)
																											BgL_lastz00_2786)))->
																								BgL_locz00)), BUNSPEC);
																					{
																						BgL_blockz00_bglt BgL_auxz00_5529;

																						{	/* SawBbv/bbv.scm 437 */
																							obj_t BgL_pairz00_3815;

																							BgL_pairz00_3815 =
																								(((BgL_blockz00_bglt)
																									COBJECT(BgL_bz00_2780))->
																								BgL_succsz00);
																							BgL_auxz00_5529 =
																								((BgL_blockz00_bglt)
																								CAR(BgL_pairz00_3815));
																						}
																						((((BgL_rtl_goz00_bglt)
																									COBJECT
																									(BgL_new1242z00_2793))->
																								BgL_toz00) =
																							((BgL_blockz00_bglt)
																								BgL_auxz00_5529), BUNSPEC);
																					}
																					BgL_auxz00_5520 =
																						((BgL_rtl_funz00_bglt)
																						BgL_new1242z00_2793);
																				}
																				((((BgL_rtl_insz00_bglt)
																							COBJECT(BgL_new1240z00_2792))->
																						BgL_funz00) =
																					((BgL_rtl_funz00_bglt)
																						BgL_auxz00_5520), BUNSPEC);
																			}
																			((((BgL_rtl_insz00_bglt)
																						COBJECT(BgL_new1240z00_2792))->
																					BgL_argsz00) =
																				((obj_t) BNIL), BUNSPEC);
																			BgL_goz00_2789 = BgL_new1240z00_2792;
																		}
																		{	/* SawBbv/bbv.scm 439 */
																			obj_t BgL_arg2168z00_2790;

																			{	/* SawBbv/bbv.scm 439 */
																				obj_t BgL_list2169z00_2791;

																				BgL_list2169z00_2791 =
																					MAKE_YOUNG_PAIR(
																					((obj_t) BgL_goz00_2789), BNIL);
																				BgL_arg2168z00_2790 =
																					BgL_list2169z00_2791;
																			}
																			SET_CDR(BgL_lpz00_2785,
																				BgL_arg2168z00_2790);
										}}}}}}}
										{	/* SawBbv/bbv.scm 450 */
											BgL_blockz00_bglt BgL_i1245z00_2771;

											BgL_i1245z00_2771 =
												((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2763)));
											{	/* SawBbv/bbv.scm 451 */
												obj_t BgL_arg2156z00_2772;
												obj_t BgL_arg2157z00_2773;

												{	/* SawBbv/bbv.scm 451 */
													obj_t BgL_arg2158z00_2774;
													obj_t BgL_arg2159z00_2775;

													BgL_arg2158z00_2774 =
														(((BgL_blockz00_bglt) COBJECT(BgL_i1245z00_2771))->
														BgL_succsz00);
													BgL_arg2159z00_2775 = CDR(((obj_t) BgL_bsz00_2763));
													BgL_arg2156z00_2772 =
														BGl_appendzd221011zd2zzsaw_bbvz00
														(BgL_arg2158z00_2774, BgL_arg2159z00_2775);
												}
												{	/* SawBbv/bbv.scm 451 */
													obj_t BgL_arg2160z00_2776;

													BgL_arg2160z00_2776 = CAR(((obj_t) BgL_bsz00_2763));
													BgL_arg2157z00_2773 =
														MAKE_YOUNG_PAIR(BgL_arg2160z00_2776,
														BgL_accz00_2764);
												}
												{
													obj_t BgL_accz00_5552;
													obj_t BgL_bsz00_5551;

													BgL_bsz00_5551 = BgL_arg2156z00_2772;
													BgL_accz00_5552 = BgL_arg2157z00_2773;
													BgL_accz00_2764 = BgL_accz00_5552;
													BgL_bsz00_2763 = BgL_bsz00_5551;
													goto BgL_zc3z04anonymousza32150ze3z87_2765;
												}
											}
										}
									}
							}
					}
				}
			}
		}

	}



/* remove-temps! */
	BgL_blockz00_bglt BGl_removezd2tempsz12zc0zzsaw_bbvz00(BgL_blockz00_bglt
		BgL_bz00_103)
	{
		{	/* SawBbv/bbv.scm 456 */
			{
				BgL_blockz00_bglt BgL_bz00_2846;

				{	/* SawBbv/bbv.scm 479 */
					obj_t BgL_g1250z00_2805;

					{	/* SawBbv/bbv.scm 479 */
						obj_t BgL_list2187z00_2824;

						BgL_list2187z00_2824 =
							MAKE_YOUNG_PAIR(((obj_t) BgL_bz00_103), BNIL);
						BgL_g1250z00_2805 = BgL_list2187z00_2824;
					}
					{
						obj_t BgL_bsz00_2808;
						obj_t BgL_accz00_2809;

						BgL_bsz00_2808 = BgL_g1250z00_2805;
						BgL_accz00_2809 = BNIL;
					BgL_zc3z04anonymousza32175ze3z87_2810:
						if (NULLP(BgL_bsz00_2808))
							{	/* SawBbv/bbv.scm 482 */
								return BgL_bz00_103;
							}
						else
							{	/* SawBbv/bbv.scm 482 */
								if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(CAR(
												((obj_t) BgL_bsz00_2808)), BgL_accz00_2809)))
									{	/* SawBbv/bbv.scm 485 */
										obj_t BgL_arg2179z00_2814;

										BgL_arg2179z00_2814 = CDR(((obj_t) BgL_bsz00_2808));
										{
											obj_t BgL_bsz00_5564;

											BgL_bsz00_5564 = BgL_arg2179z00_2814;
											BgL_bsz00_2808 = BgL_bsz00_5564;
											goto BgL_zc3z04anonymousza32175ze3z87_2810;
										}
									}
								else
									{	/* SawBbv/bbv.scm 487 */
										BgL_blockz00_bglt BgL_i1252z00_2815;

										BgL_i1252z00_2815 =
											((BgL_blockz00_bglt) CAR(((obj_t) BgL_bsz00_2808)));
										{	/* SawBbv/bbv.scm 488 */
											obj_t BgL_arg2180z00_2816;

											BgL_arg2180z00_2816 = CAR(((obj_t) BgL_bsz00_2808));
											BgL_bz00_2846 = ((BgL_blockz00_bglt) BgL_arg2180z00_2816);
											{
												obj_t BgL_auxz00_5570;

												{	/* SawBbv/bbv.scm 477 */
													obj_t BgL_l01569z00_2849;

													BgL_l01569z00_2849 =
														(((BgL_blockz00_bglt) COBJECT(BgL_bz00_2846))->
														BgL_firstz00);
													{
														obj_t BgL_l1568z00_2851;

														BgL_l1568z00_2851 = BgL_l01569z00_2849;
													BgL_zc3z04anonymousza32200ze3z87_2852:
														if (NULLP(BgL_l1568z00_2851))
															{	/* SawBbv/bbv.scm 477 */
																BgL_auxz00_5570 = BgL_l01569z00_2849;
															}
														else
															{	/* SawBbv/bbv.scm 477 */
																{	/* SawBbv/bbv.scm 477 */
																	BgL_rtl_insz00_bglt BgL_arg2202z00_2854;

																	{	/* SawBbv/bbv.scm 477 */
																		obj_t BgL_arg2203z00_2855;

																		BgL_arg2203z00_2855 =
																			CAR(((obj_t) BgL_l1568z00_2851));
																		BgL_arg2202z00_2854 =
																			BGl_removezd2inszd2tempsz12ze70zf5zzsaw_bbvz00
																			(((BgL_rtl_insz00_bglt)
																				BgL_arg2203z00_2855));
																	}
																	{	/* SawBbv/bbv.scm 477 */
																		obj_t BgL_auxz00_5580;
																		obj_t BgL_tmpz00_5578;

																		BgL_auxz00_5580 =
																			((obj_t) BgL_arg2202z00_2854);
																		BgL_tmpz00_5578 =
																			((obj_t) BgL_l1568z00_2851);
																		SET_CAR(BgL_tmpz00_5578, BgL_auxz00_5580);
																	}
																}
																{	/* SawBbv/bbv.scm 477 */
																	obj_t BgL_arg2204z00_2856;

																	BgL_arg2204z00_2856 =
																		CDR(((obj_t) BgL_l1568z00_2851));
																	{
																		obj_t BgL_l1568z00_5585;

																		BgL_l1568z00_5585 = BgL_arg2204z00_2856;
																		BgL_l1568z00_2851 = BgL_l1568z00_5585;
																		goto BgL_zc3z04anonymousza32200ze3z87_2852;
																	}
																}
															}
													}
												}
												((((BgL_blockz00_bglt) COBJECT(BgL_bz00_2846))->
														BgL_firstz00) = ((obj_t) BgL_auxz00_5570), BUNSPEC);
											}
										}
										{	/* SawBbv/bbv.scm 489 */
											obj_t BgL_arg2181z00_2817;
											obj_t BgL_arg2182z00_2818;

											{	/* SawBbv/bbv.scm 489 */
												obj_t BgL_arg2183z00_2819;
												obj_t BgL_arg2184z00_2820;

												BgL_arg2183z00_2819 =
													(((BgL_blockz00_bglt) COBJECT(BgL_i1252z00_2815))->
													BgL_succsz00);
												BgL_arg2184z00_2820 = CDR(((obj_t) BgL_bsz00_2808));
												BgL_arg2181z00_2817 =
													BGl_appendzd221011zd2zzsaw_bbvz00(BgL_arg2183z00_2819,
													BgL_arg2184z00_2820);
											}
											{	/* SawBbv/bbv.scm 489 */
												obj_t BgL_arg2185z00_2821;

												BgL_arg2185z00_2821 = CAR(((obj_t) BgL_bsz00_2808));
												BgL_arg2182z00_2818 =
													MAKE_YOUNG_PAIR(BgL_arg2185z00_2821, BgL_accz00_2809);
											}
											{
												obj_t BgL_accz00_5596;
												obj_t BgL_bsz00_5595;

												BgL_bsz00_5595 = BgL_arg2181z00_2817;
												BgL_accz00_5596 = BgL_arg2182z00_2818;
												BgL_accz00_2809 = BgL_accz00_5596;
												BgL_bsz00_2808 = BgL_bsz00_5595;
												goto BgL_zc3z04anonymousza32175ze3z87_2810;
											}
										}
									}
							}
					}
				}
			}
		}

	}



/* remove-ins-temps!~0 */
	BgL_rtl_insz00_bglt
		BGl_removezd2inszd2tempsz12ze70zf5zzsaw_bbvz00(BgL_rtl_insz00_bglt
		BgL_insz00_2825)
	{
		{	/* SawBbv/bbv.scm 473 */
			{
				obj_t BgL_argsz00_2830;

				BgL_argsz00_2830 =
					(((BgL_rtl_insz00_bglt) COBJECT(BgL_insz00_2825))->BgL_argsz00);
			BgL_zc3z04anonymousza32190ze3z87_2831:
				if (NULLP(BgL_argsz00_2830))
					{	/* SawBbv/bbv.scm 461 */
						return BgL_insz00_2825;
					}
				else
					{	/* SawBbv/bbv.scm 463 */
						obj_t BgL_g1247z00_2833;

						BgL_g1247z00_2833 = CAR(((obj_t) BgL_argsz00_2830));
						{
							obj_t BgL_argz00_2835;

							BgL_argz00_2835 = BgL_g1247z00_2833;
						BgL_zc3z04anonymousza32192ze3z87_2836:
							{	/* SawBbv/bbv.scm 464 */
								bool_t BgL_test2563z00_5601;

								{	/* SawBbv/bbv.scm 464 */
									obj_t BgL_classz00_3826;

									BgL_classz00_3826 = BGl_rtl_insz00zzsaw_defsz00;
									if (BGL_OBJECTP(BgL_argz00_2835))
										{	/* SawBbv/bbv.scm 464 */
											BgL_objectz00_bglt BgL_arg1801z00_3828;

											BgL_arg1801z00_3828 =
												(BgL_objectz00_bglt) (BgL_argz00_2835);
											if (BGL_CONDEXPAND_ISA_ARCH64())
												{	/* SawBbv/bbv.scm 464 */
													long BgL_idxz00_3834;

													BgL_idxz00_3834 =
														BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_3828);
													BgL_test2563z00_5601 =
														(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
															(BgL_idxz00_3834 + 1L)) == BgL_classz00_3826);
												}
											else
												{	/* SawBbv/bbv.scm 464 */
													bool_t BgL_res2335z00_3856;

													{	/* SawBbv/bbv.scm 464 */
														obj_t BgL_oclassz00_3842;

														{	/* SawBbv/bbv.scm 464 */
															long BgL_arg1808z00_3848;

															{	/* SawBbv/bbv.scm 464 */
																long BgL_arg1809z00_3849;

																BgL_arg1809z00_3849 =
																	BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_3828);
																BgL_arg1808z00_3848 =
																	(BgL_arg1809z00_3849 - OBJECT_TYPE);
															}
															BgL_oclassz00_3842 =
																VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
																BgL_arg1808z00_3848);
														}
														{	/* SawBbv/bbv.scm 464 */
															bool_t BgL__ortest_1115z00_3843;

															BgL__ortest_1115z00_3843 =
																(BgL_classz00_3826 == BgL_oclassz00_3842);
															if (BgL__ortest_1115z00_3843)
																{	/* SawBbv/bbv.scm 464 */
																	BgL_res2335z00_3856 =
																		BgL__ortest_1115z00_3843;
																}
															else
																{	/* SawBbv/bbv.scm 464 */
																	long BgL_odepthz00_3844;

																	BgL_odepthz00_3844 =
																		BGL_CLASS_DEPTH(BgL_oclassz00_3842);
																	if ((1L < BgL_odepthz00_3844))
																		{	/* SawBbv/bbv.scm 464 */
																			obj_t BgL_arg1797z00_3846;

																			BgL_arg1797z00_3846 =
																				BGL_CLASS_ANCESTORS_REF
																				(BgL_oclassz00_3842, 1L);
																			BgL_res2335z00_3856 =
																				(BgL_arg1797z00_3846 ==
																				BgL_classz00_3826);
																		}
																	else
																		{	/* SawBbv/bbv.scm 464 */
																			BgL_res2335z00_3856 = ((bool_t) 0);
																		}
																}
														}
													}
													BgL_test2563z00_5601 = BgL_res2335z00_3856;
												}
										}
									else
										{	/* SawBbv/bbv.scm 464 */
											BgL_test2563z00_5601 = ((bool_t) 0);
										}
								}
								if (BgL_test2563z00_5601)
									{	/* SawBbv/bbv.scm 464 */
										if (BGl_rtl_inszd2movzf3z21zzsaw_bbvzd2typeszd2(
												((BgL_rtl_insz00_bglt) BgL_argz00_2835)))
											{	/* SawBbv/bbv.scm 467 */
												obj_t BgL_arg2195z00_2840;

												{	/* SawBbv/bbv.scm 467 */
													obj_t BgL_pairz00_3857;

													BgL_pairz00_3857 =
														(((BgL_rtl_insz00_bglt) COBJECT(
																((BgL_rtl_insz00_bglt) BgL_argz00_2835)))->
														BgL_argsz00);
													BgL_arg2195z00_2840 = CAR(BgL_pairz00_3857);
												}
												{
													obj_t BgL_argz00_5627;

													BgL_argz00_5627 = BgL_arg2195z00_2840;
													BgL_argz00_2835 = BgL_argz00_5627;
													goto BgL_zc3z04anonymousza32192ze3z87_2836;
												}
											}
										else
											{	/* SawBbv/bbv.scm 465 */
												BGl_removezd2inszd2tempsz12ze70zf5zzsaw_bbvz00(
													((BgL_rtl_insz00_bglt) BgL_argz00_2835));
												{	/* SawBbv/bbv.scm 470 */
													obj_t BgL_arg2197z00_2842;

													BgL_arg2197z00_2842 = CDR(((obj_t) BgL_argsz00_2830));
													{
														obj_t BgL_argsz00_5632;

														BgL_argsz00_5632 = BgL_arg2197z00_2842;
														BgL_argsz00_2830 = BgL_argsz00_5632;
														goto BgL_zc3z04anonymousza32190ze3z87_2831;
													}
												}
											}
									}
								else
									{	/* SawBbv/bbv.scm 464 */
										{	/* SawBbv/bbv.scm 472 */
											obj_t BgL_tmpz00_5633;

											BgL_tmpz00_5633 = ((obj_t) BgL_argsz00_2830);
											SET_CAR(BgL_tmpz00_5633, BgL_argz00_2835);
										}
										{	/* SawBbv/bbv.scm 473 */
											obj_t BgL_arg2198z00_2843;

											BgL_arg2198z00_2843 = CDR(((obj_t) BgL_argsz00_2830));
											{
												obj_t BgL_argsz00_5638;

												BgL_argsz00_5638 = BgL_arg2198z00_2843;
												BgL_argsz00_2830 = BgL_argsz00_5638;
												goto BgL_zc3z04anonymousza32190ze3z87_2831;
											}
										}
									}
							}
						}
					}
			}
		}

	}



/* object-init */
	obj_t BGl_objectzd2initzd2zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			return BUNSPEC;
		}

	}



/* generic-init */
	obj_t BGl_genericzd2initzd2zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			return BUNSPEC;
		}

	}



/* method-init */
	obj_t BGl_methodzd2initzd2zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			return BUNSPEC;
		}

	}



/* imported-modules-init */
	obj_t BGl_importedzd2moduleszd2initz00zzsaw_bbvz00(void)
	{
		{	/* SawBbv/bbv.scm 15 */
			BGl_modulezd2initializa7ationz75zztools_tracez00(54713316L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzengine_paramz00(517137079L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzast_varz00(90839984L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzast_nodez00(469732712L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zztype_typez00(515343395L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zztype_cachez00(346491734L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zztools_shapez00(365925558L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zztools_speekz00(61247943L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzbackend_backendz00(216206620L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_libz00(57049157L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_defsz00(404844772L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_regsetz00(454038607L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_regutilsz00(237915200L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2configzd2(32101684L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2typeszd2(226177408L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2specializa7ez75(506937389L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2cachezd2(242097300L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2utilszd2(384498962L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2mergezd2(376575453L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2livenesszd2(156090797L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			BGl_modulezd2initializa7ationz75zzsaw_bbvzd2optimzd2(363206606L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
			return
				BGl_modulezd2initializa7ationz75zzsaw_bbvzd2debugzd2(50428158L,
				BSTRING_TO_STRING(BGl_string2362z00zzsaw_bbvz00));
		}

	}

#ifdef __cplusplus
}
#endif
