/*===========================================================================*/
/*   (R5rs/syntax.scm)                                                       */
/*   Bigloo (4.7a)                                                           */
/*   Inria -- Sophia Antipolis (c)       Thu Feb 19 09:11:58 AM CET 2026     */
/*===========================================================================*/
/* COMPILATION: (/home/serrano/prgm/project/bigloo/4.7a/bin/bigloo -srfi bigloo-unsafe -O3 -fcfa-arithmetic -q -lib-dir /home/serrano/prgm/project/bigloo/4.7a/lib/bigloo/4.7a +rm -mklib -cc gcc -fsharing -q -no-hello -unsafe -safee -O4 -stdc -c R5rs/syntax.scm -indent -o objs/obj_u/R5rs/syntax.c) */
/* 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___R5_MACRO_4_3_SYNTAX_TYPE_DEFINITIONS
#define BGL___R5_MACRO_4_3_SYNTAX_TYPE_DEFINITIONS
#endif													// BGL___R5_MACRO_4_3_SYNTAX_TYPE_DEFINITIONS
#endif													// BGL_MODULE_TYPE_DEFINITIONS

	BGL_EXPORTED_DECL obj_t
		BGl_expandzd2letreczd2syntaxz00zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	extern bool_t BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00(obj_t);
	static obj_t BGl_symbol2560z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2450z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2451z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2370z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2533z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2485z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2371z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2534z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2372z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2535z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2487z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2536z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2377z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_syntaxzd2getzd2framesz00zz__r5_macro_4_3_syntaxz00(obj_t,
		obj_t, obj_t);
	static bool_t BGl_ellipsiszf3zf3zz__r5_macro_4_3_syntaxz00(obj_t);
	static obj_t BGl_symbol2490z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2492z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2541z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2460z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2542z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2461z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2380z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2543z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2381z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2577z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2544z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2545z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2464z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2465z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2384z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	extern obj_t bstring_to_keyword(obj_t);
	static obj_t BGl_list2466z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2387z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2469z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2388z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_requirezd2initializa7ationz75zz__r5_macro_4_3_syntaxz00 =
		BUNSPEC;
	static obj_t BGl_list2389z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_hygienezd2markzd2zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t
		BGl_syntaxzd2matcheszd2patternzf3zf3zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_expandzd2letzd2syntaxz00zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_list2470z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2552z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static bool_t BGl_hygienezd2eqzf3z21zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_list2473z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2474z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2394z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2557z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2395z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2558z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2477z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2396z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2559z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2478z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2397z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2479z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2398z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2399z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	extern bool_t BGl_equalzf3zf3zz__r4_equivalence_6_2z00(obj_t, obj_t);
	extern obj_t BGl_typezd2errorzd2zz__errorz00(obj_t, obj_t, obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_modulezd2initializa7ationz75zz__r5_macro_4_3_syntaxz00(long, char *);
	extern obj_t
		BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_flonum_dtoaz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5z00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__bexitz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__threadz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__errorz00(long, char *);
	extern obj_t BGl_installzd2expanderzd2zz__macroz00(obj_t, obj_t);
	static obj_t BGl_list2480z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2595z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2562z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2481z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2563z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2482z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_list2564z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2483z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2565z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2484z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2566z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2567z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static long BGl_hygienezd2prefixzd2lenz00zz__r5_macro_4_3_syntaxz00 = 0L;
	static obj_t BGl_list2568z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2569z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2489z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_genvarsz00zz__r5_macro_4_3_syntaxz00(obj_t);
	static obj_t
		BGl_initzd2syntaxzd2expandersz12z12zz__r5_macro_4_3_syntaxz00(void);
	static obj_t
		BGl_z62syntaxzd2ruleszd2ze3expanderz81zz__r5_macro_4_3_syntaxz00(obj_t,
		obj_t, obj_t, obj_t);
	static obj_t BGl_list2570z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2571z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2572z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_toplevelzd2initzd2zz__r5_macro_4_3_syntaxz00(void);
	static obj_t BGl_list2573z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2574z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2494z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_unhygieniza7eza7zz__r5_macro_4_3_syntaxz00(obj_t);
	static obj_t BGl_list2495z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2496z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2497z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t
		BGl_z62zc3z04anonymousza31284ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_list2498z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2499z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_installzd2syntaxzd2expanderz00zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t
		BGl_z62installzd2syntaxzd2expanderz62zz__r5_macro_4_3_syntaxz00(obj_t,
		obj_t, obj_t);
	extern obj_t BGl_assqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
	static obj_t BGl_cnstzd2initzd2zz__r5_macro_4_3_syntaxz00(void);
	extern bool_t BGl_listzf3zf3zz__r4_pairs_and_lists_6_3z00(obj_t);
	extern obj_t bgl_reverse(obj_t);
	static obj_t BGl_genericzd2initzd2zz__r5_macro_4_3_syntaxz00(void);
	extern obj_t BGl_stringzd2copyzd2zz__r4_strings_6_7z00(obj_t);
	extern long bgl_list_length(obj_t);
	static obj_t BGl_importedzd2moduleszd2initz00zz__r5_macro_4_3_syntaxz00(void);
	static obj_t BGl_gczd2rootszd2initz00zz__r5_macro_4_3_syntaxz00(void);
	static obj_t
		BGl_z62expandzd2definezd2syntaxz62zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t
		BGl_z62zc3z04anonymousza31375ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_objectzd2initzd2zz__r5_macro_4_3_syntaxz00(void);
	static obj_t BGl_hygienezd2valueza2z70zz__r5_macro_4_3_syntaxz00(obj_t);
	extern obj_t BGl_memqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
	extern bool_t bigloo_strcmp_at(obj_t, obj_t, long);
	static obj_t
		BGl_z62zc3z04anonymousza31295ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_expandzd2definezd2syntaxz00zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_syntaxzd2expanderszd2mutexz00zz__r5_macro_4_3_syntaxz00 =
		BUNSPEC;
	static obj_t BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2339z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_gennameze70ze7zz__r5_macro_4_3_syntaxz00(obj_t);
	static obj_t BGl_symbol2420z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	extern obj_t bstring_to_symbol(obj_t);
	static obj_t BGl_symbol2503z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2341z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_symbol2505z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2425z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	extern obj_t c_substring(obj_t, long, long);
	static obj_t BGl_symbol2348z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	extern obj_t BGl_gensymz00zz__r4_symbols_6_4z00(obj_t);
	static obj_t BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_syntaxzd2expandzd2patternz00zz__r5_macro_4_3_syntaxz00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2400z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_methodzd2initzd2zz__r5_macro_4_3_syntaxz00(void);
	static obj_t BGl_symbol2515z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2434z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2401z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2353z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2402z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2403z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2355z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2404z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2438z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2405z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2406z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2407z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2408z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2409z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t
		BGl_z62zc3z04anonymousza31332ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_getzd2ellipsiszd2framesz00zz__r5_macro_4_3_syntaxz00(obj_t,
		obj_t);
	static obj_t BGl_symbol2361z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2524z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2443z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2410z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2363z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2413z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2414z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2529z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2415z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_list2416z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_loopze71ze7zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_list2417z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_loopze72ze7zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_loopze73ze7zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_symbol2531z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2500z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2452z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2501z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2502z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2454z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2422z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2537z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2423z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2375z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2424z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2427z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2509z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2428z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2429z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t
		BGl_z62zc3z04anonymousza31415ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_hygienezd2valuezd2zz__r5_macro_4_3_syntaxz00(obj_t);
	static obj_t BGl_subze70ze7zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	extern obj_t string_append(obj_t, obj_t);
	static obj_t BGl_symbol2462z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2511z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2430z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2512z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2431z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t
		BGl_z62expandzd2letreczd2syntaxz62zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_symbol2546z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2513z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2432z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2514z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2433z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2352z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2548z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2467z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2517z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2436z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2518z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2437z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_z62expandzd2letzd2syntaxz62zz__r5_macro_4_3_syntaxz00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_list2519z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2357z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2358z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2359z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t
		BGl_z62zc3z04anonymousza31408ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_keyword2593z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2550z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2390z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2553z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2520z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2521z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2440z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2392z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2555z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2522z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2441z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2360z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2523z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2442z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	extern obj_t BGl_errorz00zz__errorz00(obj_t, obj_t, obj_t);
	static obj_t BGl_list2526z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2445z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_syntaxzd2expanderzd2zz__r5_macro_4_3_syntaxz00(obj_t, obj_t);
	static obj_t BGl_list2527z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2446z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2528z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2447z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2448z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_list2367z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_flattenz00zz__r5_macro_4_3_syntaxz00(obj_t);
	static obj_t BGl_list2449z00zz__r5_macro_4_3_syntaxz00 = BUNSPEC;
	static obj_t BGl_z62syntaxzd2expanderzb0zz__r5_macro_4_3_syntaxz00(obj_t,
		obj_t, obj_t);
	static obj_t *__cnst;


	   
		 
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_installzd2syntaxzd2expanderzd2envzd2zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762installza7d2syn2598z00,
		BGl_z62installzd2syntaxzd2expanderz62zz__r5_macro_4_3_syntaxz00, 0L,
		BUNSPEC, 2);
	      BGL_DEFINE_STRING(BGl_string2412z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2412za700za7za7_2599za7, "case", 4);
	      BGL_DEFINE_STRING(BGl_string2419z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2419za700za7za7_2600za7, "key", 3);
	      BGL_DEFINE_STRING(BGl_string2421z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2421za700za7za7_2601za7, "clauses", 7);
	      BGL_DEFINE_STRING(BGl_string2340z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2340za700za7za7_2602za7, "hygiene.r5rs.mark", 17);
	      BGL_DEFINE_STRING(BGl_string2504z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2504za700za7za7_2603za7, "var1", 4);
	      BGL_DEFINE_STRING(BGl_string2342z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2342za700za7za7_2604za7, "mutex", 5);
	      BGL_DEFINE_STRING(BGl_string2343z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2343za700za7za7_2605za7,
		"/tmp/bigloo/runtime/R5rs/syntax.scm", 35);
	      BGL_DEFINE_STRING(BGl_string2506z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2506za700za7za7_2606za7, "init1", 5);
	      BGL_DEFINE_STRING(BGl_string2344z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2344za700za7za7_2607za7, "&install-syntax-expander", 24);
	      BGL_DEFINE_STRING(BGl_string2426z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2426za700za7za7_2608za7, "atom-key", 8);
	      BGL_DEFINE_STRING(BGl_string2345z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2345za700za7za7_2609za7, "symbol", 6);
	      BGL_DEFINE_STRING(BGl_string2508z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2508za700za7za7_2610za7, "body", 4);
	      BGL_DEFINE_STRING(BGl_string2346z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2346za700za7za7_2611za7, "procedure", 9);
	      BGL_DEFINE_STRING(BGl_string2349z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2349za700za7za7_2612za7, "quote", 5);
	      BGL_DEFINE_STRING(BGl_string2510z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2510za700za7za7_2613za7, "generate temp names", 19);
	      BGL_DEFINE_STRING(BGl_string2351z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2351za700za7za7_2614za7, "cond", 4);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_expandzd2definezd2syntaxzd2envzd2zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762expandza7d2defi2615z00,
		BGl_z62expandzd2definezd2syntaxz62zz__r5_macro_4_3_syntaxz00, 0L, BUNSPEC,
		2);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2347z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762za7c3za704anonymo2616za7,
		BGl_z62zc3z04anonymousza31284ze3ze5zz__r5_macro_4_3_syntaxz00, 0L, BUNSPEC,
		2);
	      BGL_DEFINE_STRING(BGl_string2516z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2516za700za7za7_2617za7, "temp1", 5);
	      BGL_DEFINE_STRING(BGl_string2435z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2435za700za7za7_2618za7, "atoms", 5);
	      BGL_DEFINE_STRING(BGl_string2354z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2354za700za7za7_2619za7, "else", 4);
	      BGL_DEFINE_STRING(BGl_string2356z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2356za700za7za7_2620za7, "=>", 2);
	      BGL_DEFINE_STRING(BGl_string2439z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2439za700za7za7_2621za7, "memv", 4);
	      BGL_DEFINE_STRING(BGl_string2362z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2362za700za7za7_2622za7, "result1", 7);
	      BGL_DEFINE_STRING(BGl_string2525z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2525za700za7za7_2623za7, "set!", 4);
	      BGL_DEFINE_STRING(BGl_string2444z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2444za700za7za7_2624za7, "clause", 6);
	      BGL_DEFINE_STRING(BGl_string2364z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2364za700za7za7_2625za7, "result2", 7);
	      BGL_DEFINE_STRING(BGl_string2366z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2366za700za7za7_2626za7, "...", 3);
	      BGL_DEFINE_STRING(BGl_string2369z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2369za700za7za7_2627za7, "begin", 5);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_expandzd2letzd2syntaxzd2envzd2zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762expandza7d2letza72628za7,
		BGl_z62expandzd2letzd2syntaxz62zz__r5_macro_4_3_syntaxz00, 0L, BUNSPEC, 2);
	      BGL_DEFINE_STRING(BGl_string2530z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2530za700za7za7_2629za7, "x", 1);
	      BGL_DEFINE_STRING(BGl_string2532z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2532za700za7za7_2630za7, "y", 1);
	      BGL_DEFINE_STRING(BGl_string2453z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2453za700za7za7_2631za7, "name", 4);
	      BGL_DEFINE_STRING(BGl_string2455z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2455za700za7za7_2632za7, "val", 3);
	      BGL_DEFINE_STRING(BGl_string2374z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2374za700za7za7_2633za7, "test", 4);
	      BGL_DEFINE_STRING(BGl_string2538z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2538za700za7za7_2634za7, "newtemp", 7);
	      BGL_DEFINE_STRING(BGl_string2457z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2457za700za7za7_2635za7, "body1", 5);
	      BGL_DEFINE_STRING(BGl_string2376z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2376za700za7za7_2636za7, "result", 6);
	      BGL_DEFINE_STRING(BGl_string2459z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2459za700za7za7_2637za7, "body2", 5);
	      BGL_DEFINE_STRING(BGl_string2379z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2379za700za7za7_2638za7, "let", 3);
	     
		DEFINE_STATIC_BGL_PROCEDURE
		(BGl_syntaxzd2expanderzd2envz00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762syntaxza7d2expa2639z00,
		BGl_z62syntaxzd2expanderzb0zz__r5_macro_4_3_syntaxz00, 0L, BUNSPEC, 2);
	      BGL_DEFINE_STRING(BGl_string2540z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2540za700za7za7_2640za7, "do", 2);
	      BGL_DEFINE_STRING(BGl_string2463z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2463za700za7za7_2641za7, "lambda", 6);
	      BGL_DEFINE_STRING(BGl_string2383z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2383za700za7za7_2642za7, "temp", 4);
	      BGL_DEFINE_STRING(BGl_string2547z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2547za700za7za7_2643za7, "var", 3);
	      BGL_DEFINE_STRING(BGl_string2386z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2386za700za7za7_2644za7, "if", 2);
	      BGL_DEFINE_STRING(BGl_string2549z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2549za700za7za7_2645za7, "init", 4);
	      BGL_DEFINE_STRING(BGl_string2468z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2468za700za7za7_2646za7, "tag", 3);
	      BGL_DEFINE_STRING(BGl_string2551z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2551za700za7za7_2647za7, "step", 4);
	      BGL_DEFINE_STRING(BGl_string2472z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2472za700za7za7_2648za7, "letrec", 6);
	      BGL_DEFINE_STRING(BGl_string2391z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2391za700za7za7_2649za7, "clause1", 7);
	      BGL_DEFINE_STRING(BGl_string2554z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2554za700za7za7_2650za7, "expr", 4);
	      BGL_DEFINE_STRING(BGl_string2393z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2393za700za7za7_2651za7, "clause2", 7);
	      BGL_DEFINE_STRING(BGl_string2556z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2556za700za7za7_2652za7, "command", 7);
	      BGL_DEFINE_STRING(BGl_string2476z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2476za700za7za7_2653za7, "let*", 4);
	      BGL_DEFINE_STRING(BGl_string2561z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2561za700za7za7_2654za7, "loop", 4);
	      BGL_DEFINE_STRING(BGl_string2486z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2486za700za7za7_2655za7, "name1", 5);
	      BGL_DEFINE_STRING(BGl_string2488z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2488za700za7za7_2656za7, "val1", 4);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_syntaxzd2ruleszd2ze3expanderzd2envz31zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762syntaxza7d2rule2657z00,
		BGl_z62syntaxzd2ruleszd2ze3expanderz81zz__r5_macro_4_3_syntaxz00, 0L,
		BUNSPEC, 3);
	      BGL_DEFINE_STRING(BGl_string2491z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2491za700za7za7_2658za7, "name2", 5);
	      BGL_DEFINE_STRING(BGl_string2493z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2493za700za7za7_2659za7, "val2", 4);
	      BGL_DEFINE_STRING(BGl_string2578z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2578za700za7za7_2660za7, "syntax-rules", 12);
	      BGL_DEFINE_STRING(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2579za700za7za7_2661za7, "define-syntax", 13);
	      BGL_DEFINE_STRING(BGl_string2580z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2580za700za7za7_2662za7, "Illegal form", 12);
	      BGL_DEFINE_STRING(BGl_string2581z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2581za700za7za7_2663za7, "&expand-define-syntax", 21);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2575z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762za7c3za704anonymo2664za7,
		BGl_z62zc3z04anonymousza31295ze3ze5zz__r5_macro_4_3_syntaxz00, 0L, BUNSPEC,
		2);
	      BGL_DEFINE_STRING(BGl_string2582z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2582za700za7za7_2665za7, "letrec-syntax", 13);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2576z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762za7c3za704anonymo2666za7,
		BGl_z62zc3z04anonymousza31332ze3ze5zz__r5_macro_4_3_syntaxz00, 0L, BUNSPEC,
		2);
	      BGL_DEFINE_STRING(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2583za700za7za7_2667za7, "let-syntax", 10);
	      BGL_DEFINE_STRING(BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2584za700za7za7_2668za7, "Illegal bindings", 16);
	      BGL_DEFINE_STRING(BGl_string2585z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2585za700za7za7_2669za7, "&expand-letrec-syntax", 21);
	      BGL_DEFINE_STRING(BGl_string2586z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2586za700za7za7_2670za7, "&expand-let-syntax", 18);
	      BGL_DEFINE_STRING(BGl_string2587z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2587za700za7za7_2671za7, "Illegal declaration", 19);
	      BGL_DEFINE_STRING(BGl_string2588z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2588za700za7za7_2672za7, "&syntax-rules->expander", 23);
	      BGL_DEFINE_STRING(BGl_string2589z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2589za700za7za7_2673za7, "pair-nil", 8);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_expandzd2letreczd2syntaxzd2envzd2zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_za762expandza7d2letr2674z00,
		BGl_z62expandzd2letreczd2syntaxz62zz__r5_macro_4_3_syntaxz00, 0L, BUNSPEC,
		2);
	      BGL_DEFINE_STRING(BGl_string2590z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2590za700za7za7_2675za7, "No matching clause", 18);
	      BGL_DEFINE_STRING(BGl_string2591z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2591za700za7za7_2676za7, "Illegal clause", 14);
	      BGL_DEFINE_STRING(BGl_string2592z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2592za700za7za7_2677za7, "Illegal ellipsis", 16);
	      BGL_DEFINE_STRING(BGl_string2594z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2594za700za7za7_2678za7, "ellipsis", 8);
	      BGL_DEFINE_STRING(BGl_string2596z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2596za700za7za7_2679za7, "bind-exit", 9);
	      BGL_DEFINE_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00,
		BgL_bgl_string2597za700za7za7_2680za7, "__r5_macro_4_3_syntax", 21);

/* contant bindings */
	static void bgl_constant_bindings()
	{
		BGL_BIND_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2597za700za7za7_2680za7);
		BGL_BIND_STRING(BGl_string2596z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2596za700za7za7_2679za7);
		BGL_BIND_STRING(BGl_string2594z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2594za700za7za7_2678za7);
		BGL_BIND_STRING(BGl_string2592z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2592za700za7za7_2677za7);
		BGL_BIND_STRING(BGl_string2591z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2591za700za7za7_2676za7);
		BGL_BIND_STRING(BGl_string2590z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2590za700za7za7_2675za7);
		BGL_BIND_PROCEDURE
			(BGl_expandzd2letreczd2syntaxzd2envzd2zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762expandza7d2letr2674z00);
		BGL_BIND_STRING(BGl_string2589z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2589za700za7za7_2673za7);
		BGL_BIND_STRING(BGl_string2588z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2588za700za7za7_2672za7);
		BGL_BIND_STRING(BGl_string2587z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2587za700za7za7_2671za7);
		BGL_BIND_STRING(BGl_string2586z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2586za700za7za7_2670za7);
		BGL_BIND_STRING(BGl_string2585z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2585za700za7za7_2669za7);
		BGL_BIND_STRING(BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2584za700za7za7_2668za7);
		BGL_BIND_STRING(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2583za700za7za7_2667za7);
		BGL_BIND_PROCEDURE(BGl_proc2576z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762za7c3za704anonymo2666za7);
		BGL_BIND_STRING(BGl_string2582z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2582za700za7za7_2665za7);
		BGL_BIND_PROCEDURE(BGl_proc2575z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762za7c3za704anonymo2664za7);
		BGL_BIND_STRING(BGl_string2581z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2581za700za7za7_2663za7);
		BGL_BIND_STRING(BGl_string2580z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2580za700za7za7_2662za7);
		BGL_BIND_STRING(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2579za700za7za7_2661za7);
		BGL_BIND_STRING(BGl_string2578z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2578za700za7za7_2660za7);
		BGL_BIND_STRING(BGl_string2493z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2493za700za7za7_2659za7);
		BGL_BIND_STRING(BGl_string2491z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2491za700za7za7_2658za7);
		BGL_BIND_PROCEDURE
			(BGl_syntaxzd2ruleszd2ze3expanderzd2envz31zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762syntaxza7d2rule2657z00);
		BGL_BIND_STRING(BGl_string2488z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2488za700za7za7_2656za7);
		BGL_BIND_STRING(BGl_string2486z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2486za700za7za7_2655za7);
		BGL_BIND_STRING(BGl_string2561z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2561za700za7za7_2654za7);
		BGL_BIND_STRING(BGl_string2476z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2476za700za7za7_2653za7);
		BGL_BIND_STRING(BGl_string2556z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2556za700za7za7_2652za7);
		BGL_BIND_STRING(BGl_string2393z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2393za700za7za7_2651za7);
		BGL_BIND_STRING(BGl_string2554z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2554za700za7za7_2650za7);
		BGL_BIND_STRING(BGl_string2391z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2391za700za7za7_2649za7);
		BGL_BIND_STRING(BGl_string2472z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2472za700za7za7_2648za7);
		BGL_BIND_STRING(BGl_string2551z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2551za700za7za7_2647za7);
		BGL_BIND_STRING(BGl_string2468z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2468za700za7za7_2646za7);
		BGL_BIND_STRING(BGl_string2549z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2549za700za7za7_2645za7);
		BGL_BIND_STRING(BGl_string2386z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2386za700za7za7_2644za7);
		BGL_BIND_STRING(BGl_string2547z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2547za700za7za7_2643za7);
		BGL_BIND_STRING(BGl_string2383z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2383za700za7za7_2642za7);
		BGL_BIND_STRING(BGl_string2463z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2463za700za7za7_2641za7);
		BGL_BIND_STRING(BGl_string2540z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2540za700za7za7_2640za7);
		BGL_BIND_PROCEDURE(BGl_syntaxzd2expanderzd2envz00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762syntaxza7d2expa2639z00);
		BGL_BIND_STRING(BGl_string2379z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2379za700za7za7_2638za7);
		BGL_BIND_STRING(BGl_string2459z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2459za700za7za7_2637za7);
		BGL_BIND_STRING(BGl_string2376z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2376za700za7za7_2636za7);
		BGL_BIND_STRING(BGl_string2457z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2457za700za7za7_2635za7);
		BGL_BIND_STRING(BGl_string2538z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2538za700za7za7_2634za7);
		BGL_BIND_STRING(BGl_string2374z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2374za700za7za7_2633za7);
		BGL_BIND_STRING(BGl_string2455z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2455za700za7za7_2632za7);
		BGL_BIND_STRING(BGl_string2453z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2453za700za7za7_2631za7);
		BGL_BIND_STRING(BGl_string2532z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2532za700za7za7_2630za7);
		BGL_BIND_STRING(BGl_string2530z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2530za700za7za7_2629za7);
		BGL_BIND_PROCEDURE
			(BGl_expandzd2letzd2syntaxzd2envzd2zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762expandza7d2letza72628za7);
		BGL_BIND_STRING(BGl_string2369z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2369za700za7za7_2627za7);
		BGL_BIND_STRING(BGl_string2366z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2366za700za7za7_2626za7);
		BGL_BIND_STRING(BGl_string2364z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2364za700za7za7_2625za7);
		BGL_BIND_STRING(BGl_string2444z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2444za700za7za7_2624za7);
		BGL_BIND_STRING(BGl_string2525z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2525za700za7za7_2623za7);
		BGL_BIND_STRING(BGl_string2362z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2362za700za7za7_2622za7);
		BGL_BIND_STRING(BGl_string2439z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2439za700za7za7_2621za7);
		BGL_BIND_STRING(BGl_string2356z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2356za700za7za7_2620za7);
		BGL_BIND_STRING(BGl_string2354z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2354za700za7za7_2619za7);
		BGL_BIND_STRING(BGl_string2435z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2435za700za7za7_2618za7);
		BGL_BIND_STRING(BGl_string2516z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2516za700za7za7_2617za7);
		BGL_BIND_PROCEDURE(BGl_proc2347z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762za7c3za704anonymo2616za7);
		BGL_BIND_PROCEDURE
			(BGl_expandzd2definezd2syntaxzd2envzd2zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762expandza7d2defi2615z00);
		BGL_BIND_STRING(BGl_string2351z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2351za700za7za7_2614za7);
		BGL_BIND_STRING(BGl_string2510z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2510za700za7za7_2613za7);
		BGL_BIND_STRING(BGl_string2349z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2349za700za7za7_2612za7);
		BGL_BIND_STRING(BGl_string2346z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2346za700za7za7_2611za7);
		BGL_BIND_STRING(BGl_string2508z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2508za700za7za7_2610za7);
		BGL_BIND_STRING(BGl_string2345z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2345za700za7za7_2609za7);
		BGL_BIND_STRING(BGl_string2426z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2426za700za7za7_2608za7);
		BGL_BIND_STRING(BGl_string2344z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2344za700za7za7_2607za7);
		BGL_BIND_STRING(BGl_string2506z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2506za700za7za7_2606za7);
		BGL_BIND_STRING(BGl_string2343z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2343za700za7za7_2605za7);
		BGL_BIND_STRING(BGl_string2342z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2342za700za7za7_2604za7);
		BGL_BIND_STRING(BGl_string2504z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2504za700za7za7_2603za7);
		BGL_BIND_STRING(BGl_string2340z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2340za700za7za7_2602za7);
		BGL_BIND_STRING(BGl_string2421z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2421za700za7za7_2601za7);
		BGL_BIND_STRING(BGl_string2419z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2419za700za7za7_2600za7);
		BGL_BIND_STRING(BGl_string2412z00zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_string2412za700za7za7_2599za7);
		BGL_BIND_PROCEDURE
			(BGl_installzd2syntaxzd2expanderzd2envzd2zz__r5_macro_4_3_syntaxz00,
			BgL_bgl_za762installza7d2syn2598z00);
	}

/* 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_symbol2560z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2450z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2451z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2370z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2533z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2485z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2371z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2534z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2372z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2535z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2487z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2536z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2377z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2490z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2492z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2541z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2460z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2542z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2461z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2380z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2543z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2381z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2577z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2544z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2545z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2464z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2465z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2384z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2466z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2387z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2469z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2388z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void
				*) (&BGl_requirezd2initializa7ationz75zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2389z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_hygienezd2markzd2zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2470z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2552z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2473z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2474z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2394z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2557z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2395z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2558z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2477z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2396z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2559z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2478z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2397z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2479z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2398z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2399z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2480z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2595z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2562z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2481z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2563z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2482z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2564z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2483z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2565z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2484z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2566z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2567z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2568z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2569z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2489z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2570z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2571z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2572z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2573z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2574z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2494z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2495z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2496z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2497z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2498z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2499z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void
				*) (&BGl_syntaxzd2expanderszd2mutexz00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2339z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2420z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2503z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2341z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2505z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2425z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2348z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2400z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2515z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2434z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2401z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2353z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2402z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2403z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2355z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2404z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2438z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2405z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2406z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2407z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2408z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2409z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2361z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2524z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2443z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2410z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2363z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2413z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2414z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2529z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2415z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2416z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2417z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2531z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2500z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2452z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2501z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2502z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2454z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2422z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2537z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2423z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2375z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2424z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2427z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2509z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2428z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2429z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2462z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2511z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2430z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2512z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2431z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2546z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2513z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2432z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2514z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2433z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2352z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2548z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2467z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2517z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2436z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2518z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2437z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2519z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2357z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2358z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2359z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_keyword2593z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2550z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2390z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2553z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2520z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2521z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2440z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2392z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2555z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2522z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2441z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2360z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2523z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2442z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2526z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2445z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2527z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2446z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2528z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2447z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2448z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2367z00zz__r5_macro_4_3_syntaxz00));
		ADD_ROOT((void *) (&BGl_list2449z00zz__r5_macro_4_3_syntaxz00));
#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_modulezd2initializa7ationz75zz__r5_macro_4_3_syntaxz00(long
		BgL_checksumz00_3816, char *BgL_fromz00_3817)
	{
		{
			if (CBOOL(BGl_requirezd2initializa7ationz75zz__r5_macro_4_3_syntaxz00))
				{
					BGl_requirezd2initializa7ationz75zz__r5_macro_4_3_syntaxz00 =
						BBOOL(((bool_t) 0));
					bgl_constant_bindings();
					BGl_gczd2rootszd2initz00zz__r5_macro_4_3_syntaxz00();
					BGl_cnstzd2initzd2zz__r5_macro_4_3_syntaxz00();
					BGl_importedzd2moduleszd2initz00zz__r5_macro_4_3_syntaxz00();
					return BGl_toplevelzd2initzd2zz__r5_macro_4_3_syntaxz00();
				}
			else
				{
					return BUNSPEC;
				}
		}

	}



/* cnst-init */
	obj_t BGl_cnstzd2initzd2zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 17 */
			BGl_symbol2339z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2340z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2341z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2342z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2348z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2349z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2351z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2353z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2354z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2355z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2356z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2352z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2353z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2355z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2361z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2362z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2363z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2364z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2366z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2360z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2353z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2361z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2363z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2359z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2360z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2369z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2367z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2361z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2363z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2358z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2359z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2367z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2374z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2375z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2376z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2372z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2355z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2375z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2371z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2372z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2379z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2383z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2381z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2380z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2381z00zz__r5_macro_4_3_syntaxz00, BNIL);
			BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2386z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2387z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2375z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2384z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2387z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2377z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2380z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2384z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2370z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2371z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2377z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2390z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2391z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2392z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2393z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2389z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2372z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2390z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2392z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2396z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2390z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2392z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2395z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2387z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2396z00zz__r5_macro_4_3_syntaxz00, BNIL))));
			BGl_list2394z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2380z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2395z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2388z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2389z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2394z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2399z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00, BNIL);
			BGl_list2398z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2399z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2397z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2398z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2401z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2399z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2390z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2392z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2403z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2396z00zz__r5_macro_4_3_syntaxz00, BNIL))));
			BGl_list2402z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2380z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2403z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2400z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2401z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2402z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2406z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2361z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2363z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2405z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2406z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2407z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2367z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2404z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2405z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2407z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2409z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2406z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2390z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2392z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2410z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2367z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2396z00zz__r5_macro_4_3_syntaxz00, BNIL))));
			BGl_list2408z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2409z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2410z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2357z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2358z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2370z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2388z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2397z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_list2400z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_list2404z00zz__r5_macro_4_3_syntaxz00,
									MAKE_YOUNG_PAIR(BGl_list2408z00zz__r5_macro_4_3_syntaxz00,
										BNIL)))))));
			BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2412z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2413z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2353z00zz__r5_macro_4_3_syntaxz00, BNIL);
			BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2419z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2417z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2420z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2421z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2416z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2417z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2420z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_symbol2425z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2426z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2424z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2425z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2417z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2423z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2424z00zz__r5_macro_4_3_syntaxz00, BNIL);
			BGl_list2427z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2425z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2420z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2422z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2423z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2427z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2415z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2416z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2422z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2429z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2360z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2428z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2429z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2367z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2434z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2435z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2433z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2434z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2432z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2433z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2361z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2363z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2431z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2432z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_symbol2438z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2439z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2440z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2348z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2433z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2437z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2438z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2440z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2436z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2437z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2367z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2430z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2431z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2436z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2443z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2444z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2442z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2432z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2443z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2420z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
									BNIL))))));
			BGl_list2446z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2418z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2443z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2420z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2445z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2437z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2367z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2446z00zz__r5_macro_4_3_syntaxz00, BNIL))));
			BGl_list2441z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2442z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2445z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2414z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2415z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2428z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2430z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2441z00zz__r5_macro_4_3_syntaxz00, BNIL))));
			BGl_symbol2452z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2453z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2454z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2455z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2451z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2452z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2454z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2450z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2451z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2457z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2459z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2449z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2450z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_symbol2462z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2463z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2464z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2452z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2461z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2462z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2464z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2460z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2461z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2454z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2448z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2449z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2460z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2467z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2468z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2466z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2467z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2450z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
									BNIL))))));
			BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2472z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2474z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2467z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2461z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2473z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2474z00zz__r5_macro_4_3_syntaxz00, BNIL);
			BGl_list2470z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2473z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2467z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2469z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2470z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2454z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2465z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2466z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2469z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2447z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2448z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2465z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2476z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2479z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BNIL,
					MAKE_YOUNG_PAIR(BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2480z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BNIL,
					MAKE_YOUNG_PAIR(BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2478z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2479z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2480z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2485z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2486z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2487z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2488z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2484z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2485z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2487z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2490z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2491z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2492z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2493z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2489z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2490z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2492z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2483z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2484z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2489z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2482z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2483z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2495z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2484z00zz__r5_macro_4_3_syntaxz00, BNIL);
			BGl_list2497z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2489z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2496z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2497z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2456z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2458z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2494z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2495z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2496z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2481z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2482z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2494z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2477z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2478z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2481z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2503z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2504z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2505z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2506z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2502z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2503z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2505z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2501z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2502z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2508z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2500z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2501z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2511z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2503z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2509z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_string2510z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2511z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BNIL,
							MAKE_YOUNG_PAIR(BGl_list2501z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00,
									MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
										BNIL)))))));
			BGl_list2499z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2500z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2509z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2515z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2516z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2514z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2515z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2513z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_string2510z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BNIL,
						MAKE_YOUNG_PAIR(BGl_list2514z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_list2501z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00,
									MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
										BNIL)))))));
			BGl_list2519z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2503z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BUNSPEC, BNIL));
			BGl_list2518z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2519z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2522z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2515z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2505z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2521z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2522z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2524z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2525z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2523z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2524z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2503z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2515z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2520z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2521z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2523z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
									BNIL))))));
			BGl_list2517z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2518z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2520z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2512z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2513z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2517z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2529z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2530z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2531z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2532z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2528z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2529z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2531z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2533z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2527z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_string2510z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2528z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2533z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_list2501z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00,
									MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
										BNIL)))))));
			BGl_list2535z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2531z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2537z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2538z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2536z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2537z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2382z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2534z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_string2510z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2535z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2536z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_list2501z00zz__r5_macro_4_3_syntaxz00,
								MAKE_YOUNG_PAIR(BGl_symbol2507z00zz__r5_macro_4_3_syntaxz00,
									MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
										BNIL)))))));
			BGl_list2526z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2527z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2534z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2498z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2499z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2512z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2526z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2540z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2546z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2547z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2548z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2549z00zz__r5_macro_4_3_syntaxz00);
			BGl_symbol2550z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2551z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2545z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2546z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2548z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2550z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2544z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2545z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_symbol2553z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2554z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2552z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2553z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_symbol2555z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2556z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2543z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2544z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2552z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2555z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_symbol2560z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2561z00zz__r5_macro_4_3_syntaxz00);
			BGl_list2563z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2546z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2566z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BBOOL(((bool_t) 0)),
					MAKE_YOUNG_PAIR(BBOOL(((bool_t) 0)), BNIL)));
			BGl_list2565z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2566z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2553z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2569z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_string2551z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2546z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2550z00zz__r5_macro_4_3_syntaxz00,
							MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
								BNIL)))));
			BGl_list2568z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2560z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2569z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2567z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2555z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2568z00zz__r5_macro_4_3_syntaxz00, BNIL))));
			BGl_list2564z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2385z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2373z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2565z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_list2567z00zz__r5_macro_4_3_syntaxz00, BNIL))));
			BGl_list2562z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2462z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2563z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2564z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2559z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2560z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2562z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2558z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2559z00zz__r5_macro_4_3_syntaxz00, BNIL);
			BGl_list2570z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2560z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2548z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2557z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2558z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2570z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2542z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2543z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2557z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2572z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_string2551z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2529z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_list2571z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2572z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2529z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2574z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_string2551z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_symbol2529z00zz__r5_macro_4_3_syntaxz00,
						MAKE_YOUNG_PAIR(BGl_symbol2531z00zz__r5_macro_4_3_syntaxz00,
							BNIL))));
			BGl_list2573z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2574z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_symbol2531z00zz__r5_macro_4_3_syntaxz00, BNIL));
			BGl_list2541z00zz__r5_macro_4_3_syntaxz00 =
				MAKE_YOUNG_PAIR(BGl_list2542z00zz__r5_macro_4_3_syntaxz00,
				MAKE_YOUNG_PAIR(BGl_list2571z00zz__r5_macro_4_3_syntaxz00,
					MAKE_YOUNG_PAIR(BGl_list2573z00zz__r5_macro_4_3_syntaxz00, BNIL)));
			BGl_symbol2577z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2578z00zz__r5_macro_4_3_syntaxz00);
			BGl_keyword2593z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_keyword(BGl_string2594z00zz__r5_macro_4_3_syntaxz00);
			return (BGl_symbol2595z00zz__r5_macro_4_3_syntaxz00 =
				bstring_to_symbol(BGl_string2596z00zz__r5_macro_4_3_syntaxz00),
				BUNSPEC);
		}

	}



/* gc-roots-init */
	obj_t BGl_gczd2rootszd2initz00zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 17 */
			return bgl_gc_roots_register();
		}

	}



/* toplevel-init */
	obj_t BGl_toplevelzd2initzd2zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 17 */
			BGl_hygienezd2markzd2zz__r5_macro_4_3_syntaxz00 =
				BGl_gensymz00zz__r4_symbols_6_4z00
				(BGl_symbol2339z00zz__r5_macro_4_3_syntaxz00);
			{	/* R5rs/syntax.scm 60 */
				obj_t BgL_symbolz00_2554;

				BgL_symbolz00_2554 = BGl_hygienezd2markzd2zz__r5_macro_4_3_syntaxz00;
				{	/* R5rs/syntax.scm 60 */
					obj_t BgL_arg2128z00_2555;

					BgL_arg2128z00_2555 = SYMBOL_TO_STRING(BgL_symbolz00_2554);
					BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00 =
						BGl_stringzd2copyzd2zz__r4_strings_6_7z00(BgL_arg2128z00_2555);
			}}
			BGl_hygienezd2prefixzd2lenz00zz__r5_macro_4_3_syntaxz00 =
				STRING_LENGTH(BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00);
			BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 = BFALSE;
			{	/* R5rs/syntax.scm 64 */

				{	/* Llib/thread.scm 218 */
					obj_t BgL_namez00_1112;

					BgL_namez00_1112 =
						BGl_gensymz00zz__r4_symbols_6_4z00
						(BGl_symbol2341z00zz__r5_macro_4_3_syntaxz00);
					{	/* Llib/thread.scm 218 */

						BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00 =
							bgl_make_mutex(BgL_namez00_1112);
			}}}
			{	/* R5rs/syntax.scm 65 */

				{	/* Llib/thread.scm 218 */
					obj_t BgL_namez00_1113;

					BgL_namez00_1113 =
						BGl_gensymz00zz__r4_symbols_6_4z00
						(BGl_symbol2341z00zz__r5_macro_4_3_syntaxz00);
					{	/* Llib/thread.scm 218 */

						return (BGl_syntaxzd2expanderszd2mutexz00zz__r5_macro_4_3_syntaxz00
							= bgl_make_mutex(BgL_namez00_1113), BUNSPEC);
					}
				}
			}
		}

	}



/* append-21011 */
	obj_t BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00(obj_t BgL_l1z00_1,
		obj_t BgL_l2z00_2)
	{
		{
			if (NULLP(BgL_l1z00_1))
				{
					return BgL_l2z00_2;
				}
			else
				{
					obj_t BgL_headz00_1115;

					BgL_headz00_1115 = MAKE_YOUNG_PAIR(BNIL, BgL_l2z00_2);
					{
						obj_t BgL_prevz00_2572;
						obj_t BgL_tailz00_2573;

						BgL_prevz00_2572 = BgL_headz00_1115;
						BgL_tailz00_2573 = BgL_l1z00_1;
					BgL_loopz00_2571:
						if (PAIRP(BgL_tailz00_2573))
							{
								obj_t BgL_newzd2prevzd2_2579;

								BgL_newzd2prevzd2_2579 =
									MAKE_YOUNG_PAIR(CAR(BgL_tailz00_2573), BgL_l2z00_2);
								SET_CDR(BgL_prevz00_2572, BgL_newzd2prevzd2_2579);
								{
									obj_t BgL_tailz00_4287;
									obj_t BgL_prevz00_4286;

									BgL_prevz00_4286 = BgL_newzd2prevzd2_2579;
									BgL_tailz00_4287 = CDR(BgL_tailz00_2573);
									BgL_tailz00_2573 = BgL_tailz00_4287;
									BgL_prevz00_2572 = BgL_prevz00_4286;
									goto BgL_loopz00_2571;
								}
							}
						else
							{
								BNIL;
							}
					}
					return CDR(BgL_headz00_1115);
				}
		}

	}



/* install-syntax-expander */
	BGL_EXPORTED_DEF obj_t
		BGl_installzd2syntaxzd2expanderz00zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_keywordz00_4, obj_t BgL_expanderz00_5)
	{
		{	/* R5rs/syntax.scm 79 */
			BGL_MUTEX_LOCK(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
			{	/* R5rs/syntax.scm 80 */
				obj_t BgL_tmp2684z00_4290;

				{	/* R5rs/syntax.scm 81 */
					obj_t BgL_arg1282z00_2590;

					BgL_arg1282z00_2590 =
						MAKE_YOUNG_PAIR(BgL_keywordz00_4, BgL_expanderz00_5);
					BgL_tmp2684z00_4290 = (BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
						MAKE_YOUNG_PAIR(BgL_arg1282z00_2590,
							BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
				}
				BGL_MUTEX_UNLOCK(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
				return BgL_tmp2684z00_4290;
			}
		}

	}



/* &install-syntax-expander */
	obj_t BGl_z62installzd2syntaxzd2expanderz62zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3676, obj_t BgL_keywordz00_3677, obj_t BgL_expanderz00_3678)
	{
		{	/* R5rs/syntax.scm 79 */
			{	/* R5rs/syntax.scm 80 */
				obj_t BgL_auxz00_4302;
				obj_t BgL_auxz00_4295;

				if (PROCEDUREP(BgL_expanderz00_3678))
					{	/* R5rs/syntax.scm 80 */
						BgL_auxz00_4302 = BgL_expanderz00_3678;
					}
				else
					{
						obj_t BgL_auxz00_4305;

						BgL_auxz00_4305 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(3110L),
							BGl_string2344z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2346z00zz__r5_macro_4_3_syntaxz00,
							BgL_expanderz00_3678);
						FAILURE(BgL_auxz00_4305, BFALSE, BFALSE);
					}
				if (SYMBOLP(BgL_keywordz00_3677))
					{	/* R5rs/syntax.scm 80 */
						BgL_auxz00_4295 = BgL_keywordz00_3677;
					}
				else
					{
						obj_t BgL_auxz00_4298;

						BgL_auxz00_4298 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(3110L),
							BGl_string2344z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2345z00zz__r5_macro_4_3_syntaxz00, BgL_keywordz00_3677);
						FAILURE(BgL_auxz00_4298, BFALSE, BFALSE);
					}
				return
					BGl_installzd2syntaxzd2expanderz00zz__r5_macro_4_3_syntaxz00
					(BgL_auxz00_4295, BgL_auxz00_4302);
			}
		}

	}



/* init-syntax-expanders! */
	obj_t BGl_initzd2syntaxzd2expandersz12z12zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 86 */
			{	/* R5rs/syntax.scm 91 */
				obj_t BgL_top2688z00_4311;

				BgL_top2688z00_4311 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK
					(BGl_syntaxzd2expanderszd2mutexz00zz__r5_macro_4_3_syntaxz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top2688z00_4311,
					BGl_syntaxzd2expanderszd2mutexz00zz__r5_macro_4_3_syntaxz00);
				BUNSPEC;
				{	/* R5rs/syntax.scm 91 */
					obj_t BgL_tmp2687z00_4310;

					if (CBOOL(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00))
						{	/* R5rs/syntax.scm 92 */
							BgL_tmp2687z00_4310 = BFALSE;
						}
					else
						{	/* R5rs/syntax.scm 92 */
							BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 = BNIL;
							{	/* R5rs/syntax.scm 95 */
								obj_t BgL_keywordz00_2595;

								BgL_keywordz00_2595 =
									BGl_symbol2348z00zz__r5_macro_4_3_syntaxz00;
								BGL_MUTEX_LOCK(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
								{	/* R5rs/syntax.scm 80 */
									obj_t BgL_tmp2690z00_4317;

									{	/* R5rs/syntax.scm 81 */
										obj_t BgL_arg1282z00_2596;

										BgL_arg1282z00_2596 =
											MAKE_YOUNG_PAIR(BgL_keywordz00_2595,
											BGl_proc2347z00zz__r5_macro_4_3_syntaxz00);
										BgL_tmp2690z00_4317 =
											(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
											MAKE_YOUNG_PAIR(BgL_arg1282z00_2596,
												BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
									}
									BGL_MUTEX_UNLOCK
										(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
									BgL_tmp2690z00_4317;
								}
							}
							{	/* R5rs/syntax.scm 97 */
								obj_t BgL_idz00_2597;
								obj_t BgL_literalsz00_2598;
								obj_t BgL_rulesz00_2599;

								BgL_idz00_2597 = BGl_symbol2350z00zz__r5_macro_4_3_syntaxz00;
								BgL_literalsz00_2598 =
									BGl_list2352z00zz__r5_macro_4_3_syntaxz00;
								BgL_rulesz00_2599 = BGl_list2357z00zz__r5_macro_4_3_syntaxz00;
								{	/* R5rs/syntax.scm 89 */
									obj_t BgL_arg1287z00_2600;

									BgL_arg1287z00_2600 =
										BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
										(BgL_idz00_2597, BgL_literalsz00_2598, BgL_rulesz00_2599);
									BGL_MUTEX_LOCK
										(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
									{	/* R5rs/syntax.scm 80 */
										obj_t BgL_tmp2691z00_4323;

										{	/* R5rs/syntax.scm 81 */
											obj_t BgL_arg1282z00_2603;

											BgL_arg1282z00_2603 =
												MAKE_YOUNG_PAIR(BgL_idz00_2597,
												((obj_t) BgL_arg1287z00_2600));
											BgL_tmp2691z00_4323 =
												(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
												MAKE_YOUNG_PAIR(BgL_arg1282z00_2603,
													BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
										}
										BGL_MUTEX_UNLOCK
											(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BgL_tmp2691z00_4323;
									}
								}
							}
							{	/* R5rs/syntax.scm 123 */
								obj_t BgL_idz00_2604;
								obj_t BgL_literalsz00_2605;
								obj_t BgL_rulesz00_2606;

								BgL_idz00_2604 = BGl_symbol2411z00zz__r5_macro_4_3_syntaxz00;
								BgL_literalsz00_2605 =
									BGl_list2413z00zz__r5_macro_4_3_syntaxz00;
								BgL_rulesz00_2606 = BGl_list2414z00zz__r5_macro_4_3_syntaxz00;
								{	/* R5rs/syntax.scm 89 */
									obj_t BgL_arg1287z00_2607;

									BgL_arg1287z00_2607 =
										BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
										(BgL_idz00_2604, BgL_literalsz00_2605, BgL_rulesz00_2606);
									BGL_MUTEX_LOCK
										(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
									{	/* R5rs/syntax.scm 80 */
										obj_t BgL_tmp2692z00_4330;

										{	/* R5rs/syntax.scm 81 */
											obj_t BgL_arg1282z00_2610;

											BgL_arg1282z00_2610 =
												MAKE_YOUNG_PAIR(BgL_idz00_2604,
												((obj_t) BgL_arg1287z00_2607));
											BgL_tmp2692z00_4330 =
												(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
												MAKE_YOUNG_PAIR(BgL_arg1282z00_2610,
													BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
										}
										BGL_MUTEX_UNLOCK
											(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BgL_tmp2692z00_4330;
									}
								}
							}
							{	/* R5rs/syntax.scm 143 */
								obj_t BgL_idz00_2611;
								obj_t BgL_rulesz00_2612;

								BgL_idz00_2611 = BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00;
								BgL_rulesz00_2612 = BGl_list2447z00zz__r5_macro_4_3_syntaxz00;
								{	/* R5rs/syntax.scm 89 */
									obj_t BgL_arg1287z00_2613;

									BgL_arg1287z00_2613 =
										BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
										(BgL_idz00_2611, BNIL, BgL_rulesz00_2612);
									BGL_MUTEX_LOCK
										(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
									{	/* R5rs/syntax.scm 80 */
										obj_t BgL_tmp2693z00_4337;

										{	/* R5rs/syntax.scm 81 */
											obj_t BgL_arg1282z00_2616;

											BgL_arg1282z00_2616 =
												MAKE_YOUNG_PAIR(BgL_idz00_2611,
												((obj_t) BgL_arg1287z00_2613));
											BgL_tmp2693z00_4337 =
												(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
												MAKE_YOUNG_PAIR(BgL_arg1282z00_2616,
													BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
										}
										BGL_MUTEX_UNLOCK
											(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BgL_tmp2693z00_4337;
									}
								}
							}
							{	/* R5rs/syntax.scm 154 */
								obj_t BgL_idz00_2617;
								obj_t BgL_rulesz00_2618;

								BgL_idz00_2617 = BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00;
								BgL_rulesz00_2618 = BGl_list2477z00zz__r5_macro_4_3_syntaxz00;
								{	/* R5rs/syntax.scm 89 */
									obj_t BgL_arg1287z00_2619;

									BgL_arg1287z00_2619 =
										BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
										(BgL_idz00_2617, BNIL, BgL_rulesz00_2618);
									BGL_MUTEX_LOCK
										(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
									{	/* R5rs/syntax.scm 80 */
										obj_t BgL_tmp2694z00_4344;

										{	/* R5rs/syntax.scm 81 */
											obj_t BgL_arg1282z00_2622;

											BgL_arg1282z00_2622 =
												MAKE_YOUNG_PAIR(BgL_idz00_2617,
												((obj_t) BgL_arg1287z00_2619));
											BgL_tmp2694z00_4344 =
												(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
												MAKE_YOUNG_PAIR(BgL_arg1282z00_2622,
													BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
										}
										BGL_MUTEX_UNLOCK
											(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BgL_tmp2694z00_4344;
									}
								}
							}
							{	/* R5rs/syntax.scm 164 */
								obj_t BgL_idz00_2623;
								obj_t BgL_rulesz00_2624;

								BgL_idz00_2623 = BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00;
								BgL_rulesz00_2624 = BGl_list2498z00zz__r5_macro_4_3_syntaxz00;
								{	/* R5rs/syntax.scm 89 */
									obj_t BgL_arg1287z00_2625;

									BgL_arg1287z00_2625 =
										BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
										(BgL_idz00_2623, BNIL, BgL_rulesz00_2624);
									BGL_MUTEX_LOCK
										(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
									{	/* R5rs/syntax.scm 80 */
										obj_t BgL_tmp2695z00_4351;

										{	/* R5rs/syntax.scm 81 */
											obj_t BgL_arg1282z00_2628;

											BgL_arg1282z00_2628 =
												MAKE_YOUNG_PAIR(BgL_idz00_2623,
												((obj_t) BgL_arg1287z00_2625));
											BgL_tmp2695z00_4351 =
												(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
												MAKE_YOUNG_PAIR(BgL_arg1282z00_2628,
													BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
										}
										BGL_MUTEX_UNLOCK
											(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BgL_tmp2695z00_4351;
									}
								}
							}
							{	/* R5rs/syntax.scm 193 */
								obj_t BgL_idz00_2629;
								obj_t BgL_rulesz00_2630;

								BgL_idz00_2629 = BGl_symbol2539z00zz__r5_macro_4_3_syntaxz00;
								BgL_rulesz00_2630 = BGl_list2541z00zz__r5_macro_4_3_syntaxz00;
								{	/* R5rs/syntax.scm 89 */
									obj_t BgL_arg1287z00_2631;

									BgL_arg1287z00_2631 =
										BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
										(BgL_idz00_2629, BNIL, BgL_rulesz00_2630);
									BGL_MUTEX_LOCK
										(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
									{	/* R5rs/syntax.scm 80 */
										obj_t BgL_tmp2696z00_4358;

										{	/* R5rs/syntax.scm 81 */
											obj_t BgL_arg1282z00_2634;

											BgL_arg1282z00_2634 =
												MAKE_YOUNG_PAIR(BgL_idz00_2629,
												((obj_t) BgL_arg1287z00_2631));
											BgL_tmp2696z00_4358 =
												(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00 =
												MAKE_YOUNG_PAIR(BgL_arg1282z00_2634,
													BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00), BUNSPEC);
										}
										BGL_MUTEX_UNLOCK
											(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BgL_tmp2687z00_4310 = BgL_tmp2696z00_4358;
									}
								}
							}
						}
					BGL_EXITD_POP_PROTECT(BgL_top2688z00_4311);
					BUNSPEC;
					BGL_MUTEX_UNLOCK
						(BGl_syntaxzd2expanderszd2mutexz00zz__r5_macro_4_3_syntaxz00);
					return BgL_tmp2687z00_4310;
				}
			}
		}

	}



/* &<@anonymous:1284> */
	obj_t BGl_z62zc3z04anonymousza31284ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3680, obj_t BgL_xz00_3681, obj_t BgL_ez00_3682)
	{
		{	/* R5rs/syntax.scm 95 */
			return BgL_xz00_3681;
		}

	}



/* syntax-expander */
	obj_t BGl_syntaxzd2expanderzd2zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_7,
		obj_t BgL_ez00_8)
	{
		{	/* R5rs/syntax.scm 225 */
			{	/* R5rs/syntax.scm 226 */
				obj_t BgL_e1z00_1139;

				if (PAIRP(BgL_xz00_7))
					{	/* R5rs/syntax.scm 229 */
						obj_t BgL_g1039z00_1150;

						{	/* R5rs/syntax.scm 229 */
							obj_t BgL_arg1331z00_1166;

							BgL_arg1331z00_1166 = CAR(BgL_xz00_7);
							{	/* R5rs/syntax.scm 71 */
								obj_t BgL_idz00_2636;

								BgL_idz00_2636 =
									BGl_hygienezd2valueza2z70zz__r5_macro_4_3_syntaxz00
									(BgL_arg1331z00_1166);
								{	/* R5rs/syntax.scm 71 */
									obj_t BgL_cz00_2637;

									{	/* R5rs/syntax.scm 72 */
										obj_t BgL_top2699z00_4371;

										BgL_top2699z00_4371 = BGL_EXITD_TOP_AS_OBJ();
										BGL_MUTEX_LOCK
											(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BGL_EXITD_PUSH_PROTECT(BgL_top2699z00_4371,
											BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
										BUNSPEC;
										{	/* R5rs/syntax.scm 72 */
											obj_t BgL_tmp2698z00_4370;

											BgL_tmp2698z00_4370 =
												BGl_assqz00zz__r4_pairs_and_lists_6_3z00(BgL_idz00_2636,
												BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00);
											BGL_EXITD_POP_PROTECT(BgL_top2699z00_4371);
											BUNSPEC;
											BGL_MUTEX_UNLOCK
												(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
											BgL_cz00_2637 = BgL_tmp2698z00_4370;
										}
									}
									{	/* R5rs/syntax.scm 72 */

										if (PAIRP(BgL_cz00_2637))
											{	/* R5rs/syntax.scm 73 */
												BgL_g1039z00_1150 = CDR(BgL_cz00_2637);
											}
										else
											{	/* R5rs/syntax.scm 73 */
												BgL_g1039z00_1150 = BFALSE;
											}
									}
								}
							}
						}
						if (CBOOL(BgL_g1039z00_1150))
							{	/* R5rs/syntax.scm 229 */
								BgL_e1z00_1139 = BgL_g1039z00_1150;
							}
						else
							{	/* R5rs/syntax.scm 229 */
								BgL_e1z00_1139 = BGl_proc2575z00zz__r5_macro_4_3_syntaxz00;
							}
					}
				else
					{	/* R5rs/syntax.scm 227 */
						BgL_e1z00_1139 = BGl_proc2576z00zz__r5_macro_4_3_syntaxz00;
					}
				{	/* R5rs/syntax.scm 242 */
					obj_t BgL_newz00_1140;

					BgL_newz00_1140 =
						BGL_PROCEDURE_CALL2(BgL_e1z00_1139, BgL_xz00_7, BgL_ez00_8);
					{	/* R5rs/syntax.scm 243 */
						bool_t BgL_test2702z00_4388;

						if (PAIRP(BgL_newz00_1140))
							{	/* R5rs/syntax.scm 243 */
								if (EPAIRP(BgL_newz00_1140))
									{	/* R5rs/syntax.scm 243 */
										BgL_test2702z00_4388 = ((bool_t) 0);
									}
								else
									{	/* R5rs/syntax.scm 243 */
										BgL_test2702z00_4388 = EPAIRP(BgL_xz00_7);
									}
							}
						else
							{	/* R5rs/syntax.scm 243 */
								BgL_test2702z00_4388 = ((bool_t) 0);
							}
						if (BgL_test2702z00_4388)
							{	/* R5rs/syntax.scm 244 */
								obj_t BgL_arg1291z00_1144;
								obj_t BgL_arg1292z00_1145;
								obj_t BgL_arg1293z00_1146;

								BgL_arg1291z00_1144 = CAR(BgL_newz00_1140);
								BgL_arg1292z00_1145 = CDR(BgL_newz00_1140);
								BgL_arg1293z00_1146 = CER(((obj_t) BgL_xz00_7));
								{	/* R5rs/syntax.scm 244 */
									obj_t BgL_res2314z00_2645;

									BgL_res2314z00_2645 =
										MAKE_YOUNG_EPAIR(BgL_arg1291z00_1144, BgL_arg1292z00_1145,
										BgL_arg1293z00_1146);
									return BgL_res2314z00_2645;
								}
							}
						else
							{	/* R5rs/syntax.scm 243 */
								return BgL_newz00_1140;
							}
					}
				}
			}
		}

	}



/* &syntax-expander */
	obj_t BGl_z62syntaxzd2expanderzb0zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3685, obj_t BgL_xz00_3686, obj_t BgL_ez00_3687)
	{
		{	/* R5rs/syntax.scm 225 */
			return
				BGl_syntaxzd2expanderzd2zz__r5_macro_4_3_syntaxz00(BgL_xz00_3686,
				BgL_ez00_3687);
		}

	}



/* &<@anonymous:1295> */
	obj_t BGl_z62zc3z04anonymousza31295ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3688, obj_t BgL_xz00_3689, obj_t BgL_ez00_3690)
	{
		{	/* R5rs/syntax.scm 233 */
			return
				BGl_loopze73ze7zz__r5_macro_4_3_syntaxz00(BgL_ez00_3690, BgL_xz00_3689);
		}

	}



/* loop~3 */
	obj_t BGl_loopze73ze7zz__r5_macro_4_3_syntaxz00(obj_t BgL_ez00_3733,
		obj_t BgL_xz00_1157)
	{
		{	/* R5rs/syntax.scm 234 */
			if (PAIRP(BgL_xz00_1157))
				{	/* R5rs/syntax.scm 237 */
					obj_t BgL_arg1298z00_1160;
					obj_t BgL_arg1301z00_1161;

					{	/* R5rs/syntax.scm 237 */
						obj_t BgL_arg1322z00_1162;

						BgL_arg1322z00_1162 = CAR(BgL_xz00_1157);
						BgL_arg1298z00_1160 =
							BGL_PROCEDURE_CALL2(BgL_ez00_3733, BgL_arg1322z00_1162,
							BgL_ez00_3733);
					}
					BgL_arg1301z00_1161 =
						BGl_loopze73ze7zz__r5_macro_4_3_syntaxz00(BgL_ez00_3733,
						CDR(BgL_xz00_1157));
					return MAKE_YOUNG_PAIR(BgL_arg1298z00_1160, BgL_arg1301z00_1161);
				}
			else
				{	/* R5rs/syntax.scm 236 */
					if (NULLP(BgL_xz00_1157))
						{	/* R5rs/syntax.scm 238 */
							return BNIL;
						}
					else
						{	/* R5rs/syntax.scm 238 */
							return
								BGL_PROCEDURE_CALL2(BgL_ez00_3733, BgL_xz00_1157,
								BgL_ez00_3733);
						}
				}
		}

	}



/* &<@anonymous:1332> */
	obj_t BGl_z62zc3z04anonymousza31332ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3691, obj_t BgL_xz00_3692, obj_t BgL_ez00_3693)
	{
		{	/* R5rs/syntax.scm 228 */
			return BgL_xz00_3692;
		}

	}



/* expand-define-syntax */
	BGL_EXPORTED_DEF obj_t
		BGl_expandzd2definezd2syntaxz00zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_9,
		obj_t BgL_ez00_10)
	{
		{	/* R5rs/syntax.scm 250 */
			if (PAIRP(BgL_xz00_9))
				{	/* R5rs/syntax.scm 251 */
					obj_t BgL_cdrzd2111zd2_1177;

					BgL_cdrzd2111zd2_1177 = CDR(((obj_t) BgL_xz00_9));
					if (PAIRP(BgL_cdrzd2111zd2_1177))
						{	/* R5rs/syntax.scm 251 */
							obj_t BgL_carzd2115zd2_1179;
							obj_t BgL_cdrzd2116zd2_1180;

							BgL_carzd2115zd2_1179 = CAR(BgL_cdrzd2111zd2_1177);
							BgL_cdrzd2116zd2_1180 = CDR(BgL_cdrzd2111zd2_1177);
							if (SYMBOLP(BgL_carzd2115zd2_1179))
								{	/* R5rs/syntax.scm 251 */
									if (PAIRP(BgL_cdrzd2116zd2_1180))
										{	/* R5rs/syntax.scm 251 */
											obj_t BgL_carzd2122zd2_1183;

											BgL_carzd2122zd2_1183 = CAR(BgL_cdrzd2116zd2_1180);
											if (PAIRP(BgL_carzd2122zd2_1183))
												{	/* R5rs/syntax.scm 251 */
													obj_t BgL_cdrzd2127zd2_1185;

													BgL_cdrzd2127zd2_1185 = CDR(BgL_carzd2122zd2_1183);
													if (
														(CAR(BgL_carzd2122zd2_1183) ==
															BGl_symbol2577z00zz__r5_macro_4_3_syntaxz00))
														{	/* R5rs/syntax.scm 251 */
															if (PAIRP(BgL_cdrzd2127zd2_1185))
																{	/* R5rs/syntax.scm 251 */
																	if (NULLP(CDR(BgL_cdrzd2116zd2_1180)))
																		{	/* R5rs/syntax.scm 251 */
																			obj_t BgL_arg1343z00_1191;
																			obj_t BgL_arg1345z00_1192;

																			BgL_arg1343z00_1191 =
																				CAR(BgL_cdrzd2127zd2_1185);
																			BgL_arg1345z00_1192 =
																				CDR(BgL_cdrzd2127zd2_1185);
																			{	/* R5rs/syntax.scm 253 */
																				obj_t BgL_exz00_2659;

																				BGl_initzd2syntaxzd2expandersz12z12zz__r5_macro_4_3_syntaxz00
																					();
																				BgL_exz00_2659 =
																					BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
																					(BgL_carzd2115zd2_1179,
																					BgL_arg1343z00_1191,
																					BgL_arg1345z00_1192);
																				BGL_MUTEX_LOCK
																					(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
																				{	/* R5rs/syntax.scm 80 */
																					obj_t BgL_tmp2715z00_4447;

																					{	/* R5rs/syntax.scm 81 */
																						obj_t BgL_arg1282z00_2662;

																						BgL_arg1282z00_2662 =
																							MAKE_YOUNG_PAIR
																							(BgL_carzd2115zd2_1179,
																							((obj_t) BgL_exz00_2659));
																						BgL_tmp2715z00_4447 =
																							(BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00
																							=
																							MAKE_YOUNG_PAIR
																							(BgL_arg1282z00_2662,
																								BGl_syntaxesz00zz__r5_macro_4_3_syntaxz00),
																							BUNSPEC);
																					}
																					BGL_MUTEX_UNLOCK
																						(BGl_syntaxzd2mutexzd2zz__r5_macro_4_3_syntaxz00);
																					BgL_tmp2715z00_4447;
																				}
																				BGl_installzd2expanderzd2zz__macroz00
																					(BgL_carzd2115zd2_1179,
																					BgL_exz00_2659);
																				return BUNSPEC;
																			}
																		}
																	else
																		{	/* R5rs/syntax.scm 251 */
																			return
																				BGl_errorz00zz__errorz00
																				(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
																				BGl_string2580z00zz__r5_macro_4_3_syntaxz00,
																				BgL_xz00_9);
																		}
																}
															else
																{	/* R5rs/syntax.scm 251 */
																	return
																		BGl_errorz00zz__errorz00
																		(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
																		BGl_string2580z00zz__r5_macro_4_3_syntaxz00,
																		BgL_xz00_9);
																}
														}
													else
														{	/* R5rs/syntax.scm 251 */
															return
																BGl_errorz00zz__errorz00
																(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
																BGl_string2580z00zz__r5_macro_4_3_syntaxz00,
																BgL_xz00_9);
														}
												}
											else
												{	/* R5rs/syntax.scm 251 */
													return
														BGl_errorz00zz__errorz00
														(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
														BGl_string2580z00zz__r5_macro_4_3_syntaxz00,
														BgL_xz00_9);
												}
										}
									else
										{	/* R5rs/syntax.scm 251 */
											return
												BGl_errorz00zz__errorz00
												(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
												BGl_string2580z00zz__r5_macro_4_3_syntaxz00,
												BgL_xz00_9);
										}
								}
							else
								{	/* R5rs/syntax.scm 251 */
									return
										BGl_errorz00zz__errorz00
										(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
										BGl_string2580z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_9);
								}
						}
					else
						{	/* R5rs/syntax.scm 251 */
							return
								BGl_errorz00zz__errorz00
								(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
								BGl_string2580z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_9);
						}
				}
			else
				{	/* R5rs/syntax.scm 251 */
					return
						BGl_errorz00zz__errorz00
						(BGl_string2579z00zz__r5_macro_4_3_syntaxz00,
						BGl_string2580z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_9);
				}
		}

	}



/* &expand-define-syntax */
	obj_t BGl_z62expandzd2definezd2syntaxz62zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3694, obj_t BgL_xz00_3695, obj_t BgL_ez00_3696)
	{
		{	/* R5rs/syntax.scm 250 */
			{	/* R5rs/syntax.scm 251 */
				obj_t BgL_auxz00_4462;

				if (PROCEDUREP(BgL_ez00_3696))
					{	/* R5rs/syntax.scm 251 */
						BgL_auxz00_4462 = BgL_ez00_3696;
					}
				else
					{
						obj_t BgL_auxz00_4465;

						BgL_auxz00_4465 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(7966L),
							BGl_string2581z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2346z00zz__r5_macro_4_3_syntaxz00, BgL_ez00_3696);
						FAILURE(BgL_auxz00_4465, BFALSE, BFALSE);
					}
				return
					BGl_expandzd2definezd2syntaxz00zz__r5_macro_4_3_syntaxz00
					(BgL_xz00_3695, BgL_auxz00_4462);
			}
		}

	}



/* expand-letrec-syntax */
	BGL_EXPORTED_DEF obj_t
		BGl_expandzd2letreczd2syntaxz00zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_11,
		obj_t BgL_ez00_12)
	{
		{	/* R5rs/syntax.scm 263 */
			{
				obj_t BgL_bsz00_1196;
				obj_t BgL_bodyz00_1197;

				if (PAIRP(BgL_xz00_11))
					{	/* R5rs/syntax.scm 264 */
						obj_t BgL_cdrzd2142zd2_1202;

						BgL_cdrzd2142zd2_1202 = CDR(((obj_t) BgL_xz00_11));
						if (PAIRP(BgL_cdrzd2142zd2_1202))
							{	/* R5rs/syntax.scm 264 */
								BgL_bsz00_1196 = CAR(BgL_cdrzd2142zd2_1202);
								BgL_bodyz00_1197 = CDR(BgL_cdrzd2142zd2_1202);
								{	/* R5rs/syntax.scm 266 */
									obj_t BgL_e1z00_1206;

									BgL_e1z00_1206 =
										BGl_loopze72ze7zz__r5_macro_4_3_syntaxz00(BgL_ez00_12,
										BgL_bsz00_1196);
									{	/* R5rs/syntax.scm 280 */
										obj_t BgL_arg1353z00_1207;

										if (NULLP(BgL_bodyz00_1197))
											{	/* R5rs/syntax.scm 280 */
												BgL_arg1353z00_1207 = BNIL;
											}
										else
											{	/* R5rs/syntax.scm 280 */
												obj_t BgL_head1095z00_1210;

												BgL_head1095z00_1210 = MAKE_YOUNG_PAIR(BNIL, BNIL);
												{
													obj_t BgL_l1093z00_1212;
													obj_t BgL_tail1096z00_1213;

													BgL_l1093z00_1212 = BgL_bodyz00_1197;
													BgL_tail1096z00_1213 = BgL_head1095z00_1210;
												BgL_zc3z04anonymousza31355ze3z87_1214:
													if (NULLP(BgL_l1093z00_1212))
														{	/* R5rs/syntax.scm 280 */
															BgL_arg1353z00_1207 = CDR(BgL_head1095z00_1210);
														}
													else
														{	/* R5rs/syntax.scm 280 */
															obj_t BgL_newtail1097z00_1216;

															{	/* R5rs/syntax.scm 280 */
																obj_t BgL_arg1358z00_1218;

																{	/* R5rs/syntax.scm 280 */
																	obj_t BgL_xz00_1219;

																	BgL_xz00_1219 =
																		CAR(((obj_t) BgL_l1093z00_1212));
																	{	/* R5rs/syntax.scm 280 */
																		obj_t BgL_arg1359z00_1220;

																		BgL_arg1359z00_1220 =
																			BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00
																			(BgL_xz00_1219, BNIL);
																		BgL_arg1358z00_1218 =
																			BGL_PROCEDURE_CALL2(BgL_e1z00_1206,
																			BgL_arg1359z00_1220, BgL_e1z00_1206);
																	}
																}
																BgL_newtail1097z00_1216 =
																	MAKE_YOUNG_PAIR(BgL_arg1358z00_1218, BNIL);
															}
															SET_CDR(BgL_tail1096z00_1213,
																BgL_newtail1097z00_1216);
															{	/* R5rs/syntax.scm 280 */
																obj_t BgL_arg1357z00_1217;

																BgL_arg1357z00_1217 =
																	CDR(((obj_t) BgL_l1093z00_1212));
																{
																	obj_t BgL_tail1096z00_4496;
																	obj_t BgL_l1093z00_4495;

																	BgL_l1093z00_4495 = BgL_arg1357z00_1217;
																	BgL_tail1096z00_4496 =
																		BgL_newtail1097z00_1216;
																	BgL_tail1096z00_1213 = BgL_tail1096z00_4496;
																	BgL_l1093z00_1212 = BgL_l1093z00_4495;
																	goto BgL_zc3z04anonymousza31355ze3z87_1214;
																}
															}
														}
												}
											}
										return
											MAKE_YOUNG_PAIR
											(BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00,
											BgL_arg1353z00_1207);
									}
								}
							}
						else
							{	/* R5rs/syntax.scm 264 */
								return
									BGl_errorz00zz__errorz00
									(BGl_string2582z00zz__r5_macro_4_3_syntaxz00,
									BGl_string2580z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_11);
							}
					}
				else
					{	/* R5rs/syntax.scm 264 */
						return
							BGl_errorz00zz__errorz00
							(BGl_string2582z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2580z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_11);
					}
			}
		}

	}



/* loop~2 */
	obj_t BGl_loopze72ze7zz__r5_macro_4_3_syntaxz00(obj_t BgL_ez00_3732,
		obj_t BgL_bsz00_1223)
	{
		{	/* R5rs/syntax.scm 266 */
			if (NULLP(BgL_bsz00_1223))
				{	/* R5rs/syntax.scm 267 */
					return BgL_ez00_3732;
				}
			else
				{
					obj_t BgL_mz00_1226;
					obj_t BgL_lsz00_1227;
					obj_t BgL_rulesz00_1228;

					{	/* R5rs/syntax.scm 269 */
						obj_t BgL_ezd2151zd2_1231;

						BgL_ezd2151zd2_1231 = CAR(((obj_t) BgL_bsz00_1223));
						if (PAIRP(BgL_ezd2151zd2_1231))
							{	/* R5rs/syntax.scm 269 */
								obj_t BgL_carzd2158zd2_1233;
								obj_t BgL_cdrzd2159zd2_1234;

								BgL_carzd2158zd2_1233 = CAR(BgL_ezd2151zd2_1231);
								BgL_cdrzd2159zd2_1234 = CDR(BgL_ezd2151zd2_1231);
								if (SYMBOLP(BgL_carzd2158zd2_1233))
									{	/* R5rs/syntax.scm 269 */
										if (PAIRP(BgL_cdrzd2159zd2_1234))
											{	/* R5rs/syntax.scm 269 */
												obj_t BgL_carzd2165zd2_1237;

												BgL_carzd2165zd2_1237 = CAR(BgL_cdrzd2159zd2_1234);
												if (PAIRP(BgL_carzd2165zd2_1237))
													{	/* R5rs/syntax.scm 269 */
														obj_t BgL_cdrzd2170zd2_1239;

														BgL_cdrzd2170zd2_1239 = CDR(BgL_carzd2165zd2_1237);
														if (
															(CAR(BgL_carzd2165zd2_1237) ==
																BGl_symbol2577z00zz__r5_macro_4_3_syntaxz00))
															{	/* R5rs/syntax.scm 269 */
																if (PAIRP(BgL_cdrzd2170zd2_1239))
																	{	/* R5rs/syntax.scm 269 */
																		if (NULLP(CDR(BgL_cdrzd2159zd2_1234)))
																			{	/* R5rs/syntax.scm 269 */
																				BgL_mz00_1226 = BgL_carzd2158zd2_1233;
																				BgL_lsz00_1227 =
																					CAR(BgL_cdrzd2170zd2_1239);
																				BgL_rulesz00_1228 =
																					CDR(BgL_cdrzd2170zd2_1239);
																				{	/* R5rs/syntax.scm 271 */
																					obj_t BgL_e3z00_1249;
																					obj_t BgL_e4z00_1250;

																					BGl_initzd2syntaxzd2expandersz12z12zz__r5_macro_4_3_syntaxz00
																						();
																					BgL_e3z00_1249 =
																						BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
																						(BgL_mz00_1226, BgL_lsz00_1227,
																						BgL_rulesz00_1228);
																					{	/* R5rs/syntax.scm 272 */
																						obj_t BgL_arg1380z00_1259;

																						BgL_arg1380z00_1259 =
																							CDR(((obj_t) BgL_bsz00_1223));
																						BgL_e4z00_1250 =
																							BGl_loopze72ze7zz__r5_macro_4_3_syntaxz00
																							(BgL_ez00_3732,
																							BgL_arg1380z00_1259);
																					}
																					{	/* R5rs/syntax.scm 273 */
																						obj_t
																							BgL_zc3z04anonymousza31375ze3z87_3697;
																						BgL_zc3z04anonymousza31375ze3z87_3697
																							=
																							MAKE_FX_PROCEDURE
																							(BGl_z62zc3z04anonymousza31375ze3ze5zz__r5_macro_4_3_syntaxz00,
																							(int) (2L), (int) (3L));
																						PROCEDURE_SET
																							(BgL_zc3z04anonymousza31375ze3z87_3697,
																							(int) (0L), BgL_e4z00_1250);
																						PROCEDURE_SET
																							(BgL_zc3z04anonymousza31375ze3z87_3697,
																							(int) (1L), BgL_e3z00_1249);
																						PROCEDURE_SET
																							(BgL_zc3z04anonymousza31375ze3z87_3697,
																							(int) (2L), BgL_mz00_1226);
																						return
																							BgL_zc3z04anonymousza31375ze3z87_3697;
																					}
																				}
																			}
																		else
																			{	/* R5rs/syntax.scm 269 */
																				return
																					BGl_errorz00zz__errorz00
																					(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
																					BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
																					BgL_bsz00_1223);
																			}
																	}
																else
																	{	/* R5rs/syntax.scm 269 */
																		return
																			BGl_errorz00zz__errorz00
																			(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
																			BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
																			BgL_bsz00_1223);
																	}
															}
														else
															{	/* R5rs/syntax.scm 269 */
																return
																	BGl_errorz00zz__errorz00
																	(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
																	BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
																	BgL_bsz00_1223);
															}
													}
												else
													{	/* R5rs/syntax.scm 269 */
														return
															BGl_errorz00zz__errorz00
															(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
															BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
															BgL_bsz00_1223);
													}
											}
										else
											{	/* R5rs/syntax.scm 269 */
												return
													BGl_errorz00zz__errorz00
													(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
													BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
													BgL_bsz00_1223);
											}
									}
								else
									{	/* R5rs/syntax.scm 269 */
										return
											BGl_errorz00zz__errorz00
											(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
											BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
											BgL_bsz00_1223);
									}
							}
						else
							{	/* R5rs/syntax.scm 269 */
								return
									BGl_errorz00zz__errorz00
									(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
									BGl_string2584z00zz__r5_macro_4_3_syntaxz00, BgL_bsz00_1223);
							}
					}
				}
		}

	}



/* &expand-letrec-syntax */
	obj_t BGl_z62expandzd2letreczd2syntaxz62zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3698, obj_t BgL_xz00_3699, obj_t BgL_ez00_3700)
	{
		{	/* R5rs/syntax.scm 263 */
			{	/* R5rs/syntax.scm 264 */
				obj_t BgL_auxz00_4549;

				if (PROCEDUREP(BgL_ez00_3700))
					{	/* R5rs/syntax.scm 264 */
						BgL_auxz00_4549 = BgL_ez00_3700;
					}
				else
					{
						obj_t BgL_auxz00_4552;

						BgL_auxz00_4552 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(8548L),
							BGl_string2585z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2346z00zz__r5_macro_4_3_syntaxz00, BgL_ez00_3700);
						FAILURE(BgL_auxz00_4552, BFALSE, BFALSE);
					}
				return
					BGl_expandzd2letreczd2syntaxz00zz__r5_macro_4_3_syntaxz00
					(BgL_xz00_3699, BgL_auxz00_4549);
			}
		}

	}



/* &<@anonymous:1375> */
	obj_t BGl_z62zc3z04anonymousza31375ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3701, obj_t BgL_xz00_3705, obj_t BgL_e2z00_3706)
	{
		{	/* R5rs/syntax.scm 273 */
			{	/* R5rs/syntax.scm 274 */
				obj_t BgL_e4z00_3702;
				obj_t BgL_e3z00_3703;
				obj_t BgL_mz00_3704;

				BgL_e4z00_3702 = PROCEDURE_REF(BgL_envz00_3701, (int) (0L));
				BgL_e3z00_3703 = PROCEDURE_REF(BgL_envz00_3701, (int) (1L));
				BgL_mz00_3704 = ((obj_t) PROCEDURE_REF(BgL_envz00_3701, (int) (2L)));
				{	/* R5rs/syntax.scm 274 */
					bool_t BgL_test2730z00_4564;

					if (PAIRP(BgL_xz00_3705))
						{	/* R5rs/syntax.scm 274 */
							BgL_test2730z00_4564 =
								BGl_hygienezd2eqzf3z21zz__r5_macro_4_3_syntaxz00(BgL_mz00_3704,
								CAR(BgL_xz00_3705));
						}
					else
						{	/* R5rs/syntax.scm 274 */
							BgL_test2730z00_4564 = ((bool_t) 0);
						}
					if (BgL_test2730z00_4564)
						{	/* R5rs/syntax.scm 274 */
							return
								BGL_PROCEDURE_CALL2(BgL_e3z00_3703, BgL_xz00_3705,
								BgL_e2z00_3706);
						}
					else
						{	/* R5rs/syntax.scm 274 */
							return
								BGL_PROCEDURE_CALL2(BgL_e4z00_3702, BgL_xz00_3705,
								BgL_e2z00_3706);
						}
				}
			}
		}

	}



/* expand-let-syntax */
	BGL_EXPORTED_DEF obj_t
		BGl_expandzd2letzd2syntaxz00zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_13,
		obj_t BgL_ez00_14)
	{
		{	/* R5rs/syntax.scm 287 */
			{
				obj_t BgL_bsz00_1261;
				obj_t BgL_bodyz00_1262;

				if (PAIRP(BgL_xz00_13))
					{	/* R5rs/syntax.scm 288 */
						obj_t BgL_cdrzd2185zd2_1267;

						BgL_cdrzd2185zd2_1267 = CDR(((obj_t) BgL_xz00_13));
						if (PAIRP(BgL_cdrzd2185zd2_1267))
							{	/* R5rs/syntax.scm 288 */
								BgL_bsz00_1261 = CAR(BgL_cdrzd2185zd2_1267);
								BgL_bodyz00_1262 = CDR(BgL_cdrzd2185zd2_1267);
								{	/* R5rs/syntax.scm 290 */
									obj_t BgL_e1z00_1271;

									BgL_e1z00_1271 =
										BGl_loopze71ze7zz__r5_macro_4_3_syntaxz00(BgL_ez00_14,
										BgL_bsz00_1261);
									{	/* R5rs/syntax.scm 304 */
										obj_t BgL_arg1385z00_1272;

										if (NULLP(BgL_bodyz00_1262))
											{	/* R5rs/syntax.scm 304 */
												BgL_arg1385z00_1272 = BNIL;
											}
										else
											{	/* R5rs/syntax.scm 304 */
												obj_t BgL_head1100z00_1275;

												BgL_head1100z00_1275 = MAKE_YOUNG_PAIR(BNIL, BNIL);
												{
													obj_t BgL_l1098z00_1277;
													obj_t BgL_tail1101z00_1278;

													BgL_l1098z00_1277 = BgL_bodyz00_1262;
													BgL_tail1101z00_1278 = BgL_head1100z00_1275;
												BgL_zc3z04anonymousza31387ze3z87_1279:
													if (NULLP(BgL_l1098z00_1277))
														{	/* R5rs/syntax.scm 304 */
															BgL_arg1385z00_1272 = CDR(BgL_head1100z00_1275);
														}
													else
														{	/* R5rs/syntax.scm 304 */
															obj_t BgL_newtail1102z00_1281;

															{	/* R5rs/syntax.scm 304 */
																obj_t BgL_arg1390z00_1283;

																{	/* R5rs/syntax.scm 304 */
																	obj_t BgL_xz00_1284;

																	BgL_xz00_1284 =
																		CAR(((obj_t) BgL_l1098z00_1277));
																	{	/* R5rs/syntax.scm 304 */
																		obj_t BgL_arg1391z00_1285;

																		BgL_arg1391z00_1285 =
																			BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00
																			(BgL_xz00_1284, BNIL);
																		BgL_arg1390z00_1283 =
																			BGL_PROCEDURE_CALL2(BgL_e1z00_1271,
																			BgL_arg1391z00_1285, BgL_e1z00_1271);
																	}
																}
																BgL_newtail1102z00_1281 =
																	MAKE_YOUNG_PAIR(BgL_arg1390z00_1283, BNIL);
															}
															SET_CDR(BgL_tail1101z00_1278,
																BgL_newtail1102z00_1281);
															{	/* R5rs/syntax.scm 304 */
																obj_t BgL_arg1389z00_1282;

																BgL_arg1389z00_1282 =
																	CDR(((obj_t) BgL_l1098z00_1277));
																{
																	obj_t BgL_tail1101z00_4605;
																	obj_t BgL_l1098z00_4604;

																	BgL_l1098z00_4604 = BgL_arg1389z00_1282;
																	BgL_tail1101z00_4605 =
																		BgL_newtail1102z00_1281;
																	BgL_tail1101z00_1278 = BgL_tail1101z00_4605;
																	BgL_l1098z00_1277 = BgL_l1098z00_4604;
																	goto BgL_zc3z04anonymousza31387ze3z87_1279;
																}
															}
														}
												}
											}
										return
											MAKE_YOUNG_PAIR
											(BGl_symbol2368z00zz__r5_macro_4_3_syntaxz00,
											BgL_arg1385z00_1272);
									}
								}
							}
						else
							{	/* R5rs/syntax.scm 288 */
								return
									BGl_errorz00zz__errorz00
									(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
									BGl_string2580z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_13);
							}
					}
				else
					{	/* R5rs/syntax.scm 288 */
						return
							BGl_errorz00zz__errorz00
							(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2580z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_13);
					}
			}
		}

	}



/* loop~1 */
	obj_t BGl_loopze71ze7zz__r5_macro_4_3_syntaxz00(obj_t BgL_ez00_3731,
		obj_t BgL_bsz00_1288)
	{
		{	/* R5rs/syntax.scm 290 */
			if (NULLP(BgL_bsz00_1288))
				{	/* R5rs/syntax.scm 291 */
					return BgL_ez00_3731;
				}
			else
				{
					obj_t BgL_mz00_1291;
					obj_t BgL_lsz00_1292;
					obj_t BgL_rulesz00_1293;

					{	/* R5rs/syntax.scm 293 */
						obj_t BgL_ezd2194zd2_1296;

						BgL_ezd2194zd2_1296 = CAR(((obj_t) BgL_bsz00_1288));
						if (PAIRP(BgL_ezd2194zd2_1296))
							{	/* R5rs/syntax.scm 293 */
								obj_t BgL_carzd2201zd2_1298;
								obj_t BgL_cdrzd2202zd2_1299;

								BgL_carzd2201zd2_1298 = CAR(BgL_ezd2194zd2_1296);
								BgL_cdrzd2202zd2_1299 = CDR(BgL_ezd2194zd2_1296);
								if (SYMBOLP(BgL_carzd2201zd2_1298))
									{	/* R5rs/syntax.scm 293 */
										if (PAIRP(BgL_cdrzd2202zd2_1299))
											{	/* R5rs/syntax.scm 293 */
												obj_t BgL_carzd2208zd2_1302;

												BgL_carzd2208zd2_1302 = CAR(BgL_cdrzd2202zd2_1299);
												if (PAIRP(BgL_carzd2208zd2_1302))
													{	/* R5rs/syntax.scm 293 */
														obj_t BgL_cdrzd2213zd2_1304;

														BgL_cdrzd2213zd2_1304 = CDR(BgL_carzd2208zd2_1302);
														if (
															(CAR(BgL_carzd2208zd2_1302) ==
																BGl_symbol2577z00zz__r5_macro_4_3_syntaxz00))
															{	/* R5rs/syntax.scm 293 */
																if (PAIRP(BgL_cdrzd2213zd2_1304))
																	{	/* R5rs/syntax.scm 293 */
																		if (NULLP(CDR(BgL_cdrzd2202zd2_1299)))
																			{	/* R5rs/syntax.scm 293 */
																				BgL_mz00_1291 = BgL_carzd2201zd2_1298;
																				BgL_lsz00_1292 =
																					CAR(BgL_cdrzd2213zd2_1304);
																				BgL_rulesz00_1293 =
																					CDR(BgL_cdrzd2213zd2_1304);
																				{	/* R5rs/syntax.scm 295 */
																					obj_t BgL_e3z00_1314;
																					obj_t BgL_e4z00_1315;

																					BGl_initzd2syntaxzd2expandersz12z12zz__r5_macro_4_3_syntaxz00
																						();
																					BgL_e3z00_1314 =
																						BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
																						(BgL_mz00_1291, BgL_lsz00_1292,
																						BgL_rulesz00_1293);
																					{	/* R5rs/syntax.scm 296 */
																						obj_t BgL_arg1413z00_1324;

																						BgL_arg1413z00_1324 =
																							CDR(((obj_t) BgL_bsz00_1288));
																						BgL_e4z00_1315 =
																							BGl_loopze71ze7zz__r5_macro_4_3_syntaxz00
																							(BgL_ez00_3731,
																							BgL_arg1413z00_1324);
																					}
																					{	/* R5rs/syntax.scm 297 */
																						obj_t
																							BgL_zc3z04anonymousza31408ze3z87_3707;
																						BgL_zc3z04anonymousza31408ze3z87_3707
																							=
																							MAKE_FX_PROCEDURE
																							(BGl_z62zc3z04anonymousza31408ze3ze5zz__r5_macro_4_3_syntaxz00,
																							(int) (2L), (int) (4L));
																						PROCEDURE_SET
																							(BgL_zc3z04anonymousza31408ze3z87_3707,
																							(int) (0L), BgL_e4z00_1315);
																						PROCEDURE_SET
																							(BgL_zc3z04anonymousza31408ze3z87_3707,
																							(int) (1L), BgL_e3z00_1314);
																						PROCEDURE_SET
																							(BgL_zc3z04anonymousza31408ze3z87_3707,
																							(int) (2L), BgL_ez00_3731);
																						PROCEDURE_SET
																							(BgL_zc3z04anonymousza31408ze3z87_3707,
																							(int) (3L), BgL_mz00_1291);
																						return
																							BgL_zc3z04anonymousza31408ze3z87_3707;
																					}
																				}
																			}
																		else
																			{	/* R5rs/syntax.scm 293 */
																				return
																					BGl_errorz00zz__errorz00
																					(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
																					BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
																					BgL_bsz00_1288);
																			}
																	}
																else
																	{	/* R5rs/syntax.scm 293 */
																		return
																			BGl_errorz00zz__errorz00
																			(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
																			BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
																			BgL_bsz00_1288);
																	}
															}
														else
															{	/* R5rs/syntax.scm 293 */
																return
																	BGl_errorz00zz__errorz00
																	(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
																	BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
																	BgL_bsz00_1288);
															}
													}
												else
													{	/* R5rs/syntax.scm 293 */
														return
															BGl_errorz00zz__errorz00
															(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
															BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
															BgL_bsz00_1288);
													}
											}
										else
											{	/* R5rs/syntax.scm 293 */
												return
													BGl_errorz00zz__errorz00
													(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
													BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
													BgL_bsz00_1288);
											}
									}
								else
									{	/* R5rs/syntax.scm 293 */
										return
											BGl_errorz00zz__errorz00
											(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
											BGl_string2584z00zz__r5_macro_4_3_syntaxz00,
											BgL_bsz00_1288);
									}
							}
						else
							{	/* R5rs/syntax.scm 293 */
								return
									BGl_errorz00zz__errorz00
									(BGl_string2583z00zz__r5_macro_4_3_syntaxz00,
									BGl_string2584z00zz__r5_macro_4_3_syntaxz00, BgL_bsz00_1288);
							}
					}
				}
		}

	}



/* &expand-let-syntax */
	obj_t BGl_z62expandzd2letzd2syntaxz62zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3708, obj_t BgL_xz00_3709, obj_t BgL_ez00_3710)
	{
		{	/* R5rs/syntax.scm 287 */
			{	/* R5rs/syntax.scm 288 */
				obj_t BgL_auxz00_4660;

				if (PROCEDUREP(BgL_ez00_3710))
					{	/* R5rs/syntax.scm 288 */
						BgL_auxz00_4660 = BgL_ez00_3710;
					}
				else
					{
						obj_t BgL_auxz00_4663;

						BgL_auxz00_4663 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(9399L),
							BGl_string2586z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2346z00zz__r5_macro_4_3_syntaxz00, BgL_ez00_3710);
						FAILURE(BgL_auxz00_4663, BFALSE, BFALSE);
					}
				return
					BGl_expandzd2letzd2syntaxz00zz__r5_macro_4_3_syntaxz00(BgL_xz00_3709,
					BgL_auxz00_4660);
			}
		}

	}



/* &<@anonymous:1408> */
	obj_t BGl_z62zc3z04anonymousza31408ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3711, obj_t BgL_xz00_3716, obj_t BgL_e2z00_3717)
	{
		{	/* R5rs/syntax.scm 297 */
			{	/* R5rs/syntax.scm 298 */
				obj_t BgL_e4z00_3712;
				obj_t BgL_e3z00_3713;
				obj_t BgL_ez00_3714;
				obj_t BgL_mz00_3715;

				BgL_e4z00_3712 = PROCEDURE_REF(BgL_envz00_3711, (int) (0L));
				BgL_e3z00_3713 = PROCEDURE_REF(BgL_envz00_3711, (int) (1L));
				BgL_ez00_3714 = ((obj_t) PROCEDURE_REF(BgL_envz00_3711, (int) (2L)));
				BgL_mz00_3715 = ((obj_t) PROCEDURE_REF(BgL_envz00_3711, (int) (3L)));
				{	/* R5rs/syntax.scm 298 */
					bool_t BgL_test2745z00_4678;

					if (PAIRP(BgL_xz00_3716))
						{	/* R5rs/syntax.scm 298 */
							BgL_test2745z00_4678 =
								BGl_hygienezd2eqzf3z21zz__r5_macro_4_3_syntaxz00(BgL_mz00_3715,
								CAR(BgL_xz00_3716));
						}
					else
						{	/* R5rs/syntax.scm 298 */
							BgL_test2745z00_4678 = ((bool_t) 0);
						}
					if (BgL_test2745z00_4678)
						{	/* R5rs/syntax.scm 298 */
							return
								BGL_PROCEDURE_CALL2(BgL_e3z00_3713, BgL_xz00_3716,
								BgL_ez00_3714);
						}
					else
						{	/* R5rs/syntax.scm 298 */
							return
								BGL_PROCEDURE_CALL2(BgL_e4z00_3712, BgL_xz00_3716,
								BgL_e2z00_3717);
						}
				}
			}
		}

	}



/* syntax-rules->expander */
	BGL_EXPORTED_DEF obj_t
		BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_keywordz00_18, obj_t BgL_literalsz00_19, obj_t BgL_rulesz00_20)
	{
		{	/* R5rs/syntax.scm 318 */
			{	/* R5rs/syntax.scm 319 */
				obj_t BgL_kz00_1326;

				BgL_kz00_1326 = MAKE_YOUNG_PAIR(BgL_keywordz00_18, BgL_literalsz00_19);
				if (BGl_listzf3zf3zz__r4_pairs_and_lists_6_3z00(BgL_rulesz00_20))
					{	/* R5rs/syntax.scm 321 */
						obj_t BgL_zc3z04anonymousza31415ze3z87_3718;

						BgL_zc3z04anonymousza31415ze3z87_3718 =
							MAKE_FX_PROCEDURE
							(BGl_z62zc3z04anonymousza31415ze3ze5zz__r5_macro_4_3_syntaxz00,
							(int) (2L), (int) (3L));
						PROCEDURE_SET(BgL_zc3z04anonymousza31415ze3z87_3718, (int) (0L),
							BgL_kz00_1326);
						PROCEDURE_SET(BgL_zc3z04anonymousza31415ze3z87_3718, (int) (1L),
							BgL_keywordz00_18);
						PROCEDURE_SET(BgL_zc3z04anonymousza31415ze3z87_3718, (int) (2L),
							BgL_rulesz00_20);
						return BgL_zc3z04anonymousza31415ze3z87_3718;
					}
				else
					{	/* R5rs/syntax.scm 320 */
						return
							BGl_errorz00zz__errorz00(BgL_keywordz00_18,
							BGl_string2587z00zz__r5_macro_4_3_syntaxz00, BgL_rulesz00_20);
					}
			}
		}

	}



/* &syntax-rules->expander */
	obj_t BGl_z62syntaxzd2ruleszd2ze3expanderz81zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3719, obj_t BgL_keywordz00_3720, obj_t BgL_literalsz00_3721,
		obj_t BgL_rulesz00_3722)
	{
		{	/* R5rs/syntax.scm 318 */
			{	/* R5rs/syntax.scm 319 */
				obj_t BgL_auxz00_4720;
				obj_t BgL_auxz00_4713;
				obj_t BgL_auxz00_4706;

				if (BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00
					(BgL_rulesz00_3722))
					{	/* R5rs/syntax.scm 319 */
						BgL_auxz00_4720 = BgL_rulesz00_3722;
					}
				else
					{
						obj_t BgL_auxz00_4723;

						BgL_auxz00_4723 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(10634L),
							BGl_string2588z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2589z00zz__r5_macro_4_3_syntaxz00, BgL_rulesz00_3722);
						FAILURE(BgL_auxz00_4723, BFALSE, BFALSE);
					}
				if (BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00
					(BgL_literalsz00_3721))
					{	/* R5rs/syntax.scm 319 */
						BgL_auxz00_4713 = BgL_literalsz00_3721;
					}
				else
					{
						obj_t BgL_auxz00_4716;

						BgL_auxz00_4716 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(10634L),
							BGl_string2588z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2589z00zz__r5_macro_4_3_syntaxz00,
							BgL_literalsz00_3721);
						FAILURE(BgL_auxz00_4716, BFALSE, BFALSE);
					}
				if (SYMBOLP(BgL_keywordz00_3720))
					{	/* R5rs/syntax.scm 319 */
						BgL_auxz00_4706 = BgL_keywordz00_3720;
					}
				else
					{
						obj_t BgL_auxz00_4709;

						BgL_auxz00_4709 =
							BGl_typezd2errorzd2zz__errorz00
							(BGl_string2343z00zz__r5_macro_4_3_syntaxz00, BINT(10634L),
							BGl_string2588z00zz__r5_macro_4_3_syntaxz00,
							BGl_string2345z00zz__r5_macro_4_3_syntaxz00, BgL_keywordz00_3720);
						FAILURE(BgL_auxz00_4709, BFALSE, BFALSE);
					}
				return
					BGl_syntaxzd2ruleszd2ze3expanderze3zz__r5_macro_4_3_syntaxz00
					(BgL_auxz00_4706, BgL_auxz00_4713, BgL_auxz00_4720);
			}
		}

	}



/* &<@anonymous:1415> */
	obj_t BGl_z62zc3z04anonymousza31415ze3ze5zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_envz00_3723, obj_t BgL_xz00_3727, obj_t BgL_ez00_3728)
	{
		{	/* R5rs/syntax.scm 321 */
			{	/* R5rs/syntax.scm 323 */
				obj_t BgL_kz00_3724;
				obj_t BgL_keywordz00_3725;
				obj_t BgL_rulesz00_3726;

				BgL_kz00_3724 = ((obj_t) PROCEDURE_REF(BgL_envz00_3723, (int) (0L)));
				BgL_keywordz00_3725 =
					((obj_t) PROCEDURE_REF(BgL_envz00_3723, (int) (1L)));
				BgL_rulesz00_3726 =
					((obj_t) PROCEDURE_REF(BgL_envz00_3723, (int) (2L)));
				{
					obj_t BgL_rulesz00_3805;

					BgL_rulesz00_3805 = BgL_rulesz00_3726;
				BgL_loopz00_3804:
					if (NULLP(BgL_rulesz00_3805))
						{	/* R5rs/syntax.scm 323 */
							return
								BGl_errorz00zz__errorz00(BgL_keywordz00_3725,
								BGl_string2590z00zz__r5_macro_4_3_syntaxz00, BgL_xz00_3727);
						}
					else
						{
							obj_t BgL_patternz00_3807;
							obj_t BgL_templatez00_3808;

							{	/* R5rs/syntax.scm 325 */
								obj_t BgL_ezd2222zd2_3814;

								BgL_ezd2222zd2_3814 = CAR(((obj_t) BgL_rulesz00_3805));
								if (PAIRP(BgL_ezd2222zd2_3814))
									{	/* R5rs/syntax.scm 325 */
										obj_t BgL_cdrzd2228zd2_3815;

										BgL_cdrzd2228zd2_3815 = CDR(BgL_ezd2222zd2_3814);
										if (PAIRP(BgL_cdrzd2228zd2_3815))
											{	/* R5rs/syntax.scm 325 */
												if (NULLP(CDR(BgL_cdrzd2228zd2_3815)))
													{	/* R5rs/syntax.scm 325 */
														BgL_patternz00_3807 = CAR(BgL_ezd2222zd2_3814);
														BgL_templatez00_3808 = CAR(BgL_cdrzd2228zd2_3815);
														if (CBOOL
															(BGl_syntaxzd2matcheszd2patternzf3zf3zz__r5_macro_4_3_syntaxz00
																(BgL_keywordz00_3725, BgL_patternz00_3807,
																	BgL_xz00_3727, BgL_kz00_3724)))
															{	/* R5rs/syntax.scm 329 */
																obj_t BgL_fsz00_3809;

																BgL_fsz00_3809 =
																	BGl_syntaxzd2getzd2framesz00zz__r5_macro_4_3_syntaxz00
																	(BgL_patternz00_3807, BgL_xz00_3727,
																	BgL_kz00_3724);
																{	/* R5rs/syntax.scm 329 */
																	obj_t BgL_tz00_3810;

																	BgL_tz00_3810 =
																		BGl_syntaxzd2expandzd2patternz00zz__r5_macro_4_3_syntaxz00
																		(BgL_templatez00_3808, BgL_fsz00_3809,
																		BgL_kz00_3724);
																	{	/* R5rs/syntax.scm 330 */
																		obj_t BgL_tez00_3811;

																		BgL_tez00_3811 =
																			BGl_syntaxzd2expanderzd2zz__r5_macro_4_3_syntaxz00
																			(BgL_tz00_3810,
																			BGl_syntaxzd2expanderzd2envz00zz__r5_macro_4_3_syntaxz00);
																		{	/* R5rs/syntax.scm 331 */

																			{	/* R5rs/syntax.scm 332 */
																				obj_t BgL_arg1426z00_3812;

																				BgL_arg1426z00_3812 =
																					BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00
																					(BgL_tez00_3811, BNIL);
																				return
																					BGL_PROCEDURE_CALL2(BgL_ez00_3728,
																					BgL_arg1426z00_3812, BgL_ez00_3728);
																			}
																		}
																	}
																}
															}
														else
															{	/* R5rs/syntax.scm 333 */
																obj_t BgL_arg1427z00_3813;

																BgL_arg1427z00_3813 =
																	CDR(((obj_t) BgL_rulesz00_3805));
																{
																	obj_t BgL_rulesz00_4764;

																	BgL_rulesz00_4764 = BgL_arg1427z00_3813;
																	BgL_rulesz00_3805 = BgL_rulesz00_4764;
																	goto BgL_loopz00_3804;
																}
															}
													}
												else
													{	/* R5rs/syntax.scm 325 */
														return
															BGl_errorz00zz__errorz00(BgL_keywordz00_3725,
															BGl_string2591z00zz__r5_macro_4_3_syntaxz00,
															BgL_ezd2222zd2_3814);
													}
											}
										else
											{	/* R5rs/syntax.scm 325 */
												return
													BGl_errorz00zz__errorz00(BgL_keywordz00_3725,
													BGl_string2591z00zz__r5_macro_4_3_syntaxz00,
													BgL_ezd2222zd2_3814);
											}
									}
								else
									{	/* R5rs/syntax.scm 325 */
										return
											BGl_errorz00zz__errorz00(BgL_keywordz00_3725,
											BGl_string2591z00zz__r5_macro_4_3_syntaxz00,
											BgL_ezd2222zd2_3814);
									}
							}
						}
				}
			}
		}

	}



/* syntax-matches-pattern? */
	obj_t BGl_syntaxzd2matcheszd2patternzf3zf3zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_keywordz00_21, obj_t BgL_pz00_22, obj_t BgL_ez00_23, obj_t BgL_kz00_24)
	{
		{	/* R5rs/syntax.scm 341 */
		BGl_syntaxzd2matcheszd2patternzf3zf3zz__r5_macro_4_3_syntaxz00:
			if (BGl_ellipsiszf3zf3zz__r5_macro_4_3_syntaxz00(BgL_pz00_22))
				{	/* R5rs/syntax.scm 343 */
					if ((bgl_list_length(BgL_pz00_22) == 2L))
						{	/* R5rs/syntax.scm 344 */
							if (BGl_listzf3zf3zz__r4_pairs_and_lists_6_3z00(BgL_ez00_23))
								{	/* R5rs/syntax.scm 347 */
									obj_t BgL_p0z00_1360;

									BgL_p0z00_1360 = CAR(((obj_t) BgL_pz00_22));
									{
										obj_t BgL_l1103z00_1362;

										{	/* R5rs/syntax.scm 348 */
											bool_t BgL_tmpz00_4779;

											BgL_l1103z00_1362 = BgL_ez00_23;
										BgL_zc3z04anonymousza31432ze3z87_1363:
											if (NULLP(BgL_l1103z00_1362))
												{	/* R5rs/syntax.scm 348 */
													BgL_tmpz00_4779 = ((bool_t) 1);
												}
											else
												{	/* R5rs/syntax.scm 349 */
													obj_t BgL_nvz00_1365;

													{	/* R5rs/syntax.scm 349 */
														obj_t BgL_eiz00_1368;

														BgL_eiz00_1368 = CAR(((obj_t) BgL_l1103z00_1362));
														BgL_nvz00_1365 =
															BGl_syntaxzd2matcheszd2patternzf3zf3zz__r5_macro_4_3_syntaxz00
															(BgL_keywordz00_21, BgL_p0z00_1360,
															BgL_eiz00_1368, BgL_kz00_24);
													}
													if (CBOOL(BgL_nvz00_1365))
														{	/* R5rs/syntax.scm 348 */
															obj_t BgL_arg1434z00_1367;

															BgL_arg1434z00_1367 =
																CDR(((obj_t) BgL_l1103z00_1362));
															{
																obj_t BgL_l1103z00_4789;

																BgL_l1103z00_4789 = BgL_arg1434z00_1367;
																BgL_l1103z00_1362 = BgL_l1103z00_4789;
																goto BgL_zc3z04anonymousza31432ze3z87_1363;
															}
														}
													else
														{	/* R5rs/syntax.scm 348 */
															BgL_tmpz00_4779 = ((bool_t) 0);
														}
												}
											return BBOOL(BgL_tmpz00_4779);
										}
									}
								}
							else
								{	/* R5rs/syntax.scm 346 */
									return BFALSE;
								}
						}
					else
						{	/* R5rs/syntax.scm 344 */
							return
								BGl_errorz00zz__errorz00(BgL_keywordz00_21,
								BGl_string2592z00zz__r5_macro_4_3_syntaxz00, BgL_pz00_22);
						}
				}
			else
				{	/* R5rs/syntax.scm 343 */
					if (PAIRP(BgL_pz00_22))
						{	/* R5rs/syntax.scm 351 */
							if (PAIRP(BgL_ez00_23))
								{	/* R5rs/syntax.scm 353 */
									obj_t BgL__andtest_1043z00_1373;

									BgL__andtest_1043z00_1373 =
										BGl_syntaxzd2matcheszd2patternzf3zf3zz__r5_macro_4_3_syntaxz00
										(BgL_keywordz00_21, CAR(BgL_pz00_22), CAR(BgL_ez00_23),
										BgL_kz00_24);
									if (CBOOL(BgL__andtest_1043z00_1373))
										{
											obj_t BgL_ez00_4803;
											obj_t BgL_pz00_4801;

											BgL_pz00_4801 = CDR(BgL_pz00_22);
											BgL_ez00_4803 = CDR(BgL_ez00_23);
											BgL_ez00_23 = BgL_ez00_4803;
											BgL_pz00_22 = BgL_pz00_4801;
											goto
												BGl_syntaxzd2matcheszd2patternzf3zf3zz__r5_macro_4_3_syntaxz00;
										}
									else
										{	/* R5rs/syntax.scm 353 */
											return BFALSE;
										}
								}
							else
								{	/* R5rs/syntax.scm 352 */
									return BFALSE;
								}
						}
					else
						{	/* R5rs/syntax.scm 351 */
							if (SYMBOLP(BgL_pz00_22))
								{	/* R5rs/syntax.scm 355 */
									if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00
											(BgL_pz00_22, BgL_kz00_24)))
										{	/* R5rs/syntax.scm 356 */
											return
												BBOOL(BGl_hygienezd2eqzf3z21zz__r5_macro_4_3_syntaxz00
												(BgL_ez00_23, BgL_pz00_22));
										}
									else
										{	/* R5rs/syntax.scm 356 */
											return BTRUE;
										}
								}
							else
								{	/* R5rs/syntax.scm 355 */
									return
										BBOOL(BGl_equalzf3zf3zz__r4_equivalence_6_2z00(BgL_pz00_22,
											BgL_ez00_23));
								}
						}
				}
		}

	}



/* syntax-get-frames */
	obj_t BGl_syntaxzd2getzd2framesz00zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_pz00_25, obj_t BgL_ez00_26, obj_t BgL_kz00_27)
	{
		{	/* R5rs/syntax.scm 363 */
			if (BGl_ellipsiszf3zf3zz__r5_macro_4_3_syntaxz00(BgL_pz00_25))
				{	/* R5rs/syntax.scm 366 */
					obj_t BgL_p0z00_1381;

					BgL_p0z00_1381 = CAR(((obj_t) BgL_pz00_25));
					{	/* R5rs/syntax.scm 368 */
						obj_t BgL_arg1446z00_1382;

						{	/* R5rs/syntax.scm 368 */
							obj_t BgL_arg1448z00_1384;

							if (NULLP(BgL_ez00_26))
								{	/* R5rs/syntax.scm 368 */
									BgL_arg1448z00_1384 = BNIL;
								}
							else
								{	/* R5rs/syntax.scm 368 */
									obj_t BgL_head1108z00_1387;

									BgL_head1108z00_1387 = MAKE_YOUNG_PAIR(BNIL, BNIL);
									{
										obj_t BgL_l1106z00_2747;
										obj_t BgL_tail1109z00_2748;

										BgL_l1106z00_2747 = BgL_ez00_26;
										BgL_tail1109z00_2748 = BgL_head1108z00_1387;
									BgL_zc3z04anonymousza31450ze3z87_2746:
										if (NULLP(BgL_l1106z00_2747))
											{	/* R5rs/syntax.scm 368 */
												BgL_arg1448z00_1384 = CDR(BgL_head1108z00_1387);
											}
										else
											{	/* R5rs/syntax.scm 368 */
												obj_t BgL_newtail1110z00_2755;

												{	/* R5rs/syntax.scm 368 */
													obj_t BgL_arg1453z00_2756;

													{	/* R5rs/syntax.scm 368 */
														obj_t BgL_eiz00_2757;

														BgL_eiz00_2757 = CAR(((obj_t) BgL_l1106z00_2747));
														BgL_arg1453z00_2756 =
															BGl_syntaxzd2getzd2framesz00zz__r5_macro_4_3_syntaxz00
															(BgL_p0z00_1381, BgL_eiz00_2757, BgL_kz00_27);
													}
													BgL_newtail1110z00_2755 =
														MAKE_YOUNG_PAIR(BgL_arg1453z00_2756, BNIL);
												}
												SET_CDR(BgL_tail1109z00_2748, BgL_newtail1110z00_2755);
												{	/* R5rs/syntax.scm 368 */
													obj_t BgL_arg1452z00_2758;

													BgL_arg1452z00_2758 =
														CDR(((obj_t) BgL_l1106z00_2747));
													{
														obj_t BgL_tail1109z00_4832;
														obj_t BgL_l1106z00_4831;

														BgL_l1106z00_4831 = BgL_arg1452z00_2758;
														BgL_tail1109z00_4832 = BgL_newtail1110z00_2755;
														BgL_tail1109z00_2748 = BgL_tail1109z00_4832;
														BgL_l1106z00_2747 = BgL_l1106z00_4831;
														goto BgL_zc3z04anonymousza31450ze3z87_2746;
													}
												}
											}
									}
								}
							BgL_arg1446z00_1382 =
								MAKE_YOUNG_PAIR(BGl_keyword2593z00zz__r5_macro_4_3_syntaxz00,
								BgL_arg1448z00_1384);
						}
						{	/* R5rs/syntax.scm 367 */
							obj_t BgL_list1447z00_1383;

							BgL_list1447z00_1383 = MAKE_YOUNG_PAIR(BgL_arg1446z00_1382, BNIL);
							return BgL_list1447z00_1383;
						}
					}
				}
			else
				{	/* R5rs/syntax.scm 365 */
					if (PAIRP(BgL_pz00_25))
						{	/* R5rs/syntax.scm 372 */
							obj_t BgL_arg1455z00_1399;
							obj_t BgL_arg1456z00_1400;

							{	/* R5rs/syntax.scm 372 */
								obj_t BgL_arg1457z00_1401;
								obj_t BgL_arg1458z00_1402;

								BgL_arg1457z00_1401 = CAR(BgL_pz00_25);
								BgL_arg1458z00_1402 = CAR(((obj_t) BgL_ez00_26));
								BgL_arg1455z00_1399 =
									BGl_syntaxzd2getzd2framesz00zz__r5_macro_4_3_syntaxz00
									(BgL_arg1457z00_1401, BgL_arg1458z00_1402, BgL_kz00_27);
							}
							{	/* R5rs/syntax.scm 373 */
								obj_t BgL_arg1459z00_1403;
								obj_t BgL_arg1460z00_1404;

								BgL_arg1459z00_1403 = CDR(BgL_pz00_25);
								BgL_arg1460z00_1404 = CDR(((obj_t) BgL_ez00_26));
								BgL_arg1456z00_1400 =
									BGl_syntaxzd2getzd2framesz00zz__r5_macro_4_3_syntaxz00
									(BgL_arg1459z00_1403, BgL_arg1460z00_1404, BgL_kz00_27);
							}
							return
								BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
								(BgL_arg1455z00_1399, BgL_arg1456z00_1400);
						}
					else
						{	/* R5rs/syntax.scm 371 */
							if (SYMBOLP(BgL_pz00_25))
								{	/* R5rs/syntax.scm 374 */
									if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00
											(BgL_pz00_25, BgL_kz00_27)))
										{	/* R5rs/syntax.scm 375 */
											return BNIL;
										}
									else
										{	/* R5rs/syntax.scm 375 */
											obj_t BgL_arg1464z00_1407;

											BgL_arg1464z00_1407 =
												MAKE_YOUNG_PAIR(BgL_pz00_25,
												BGl_unhygieniza7eza7zz__r5_macro_4_3_syntaxz00
												(BgL_ez00_26));
											{	/* R5rs/syntax.scm 375 */
												obj_t BgL_list1465z00_1408;

												BgL_list1465z00_1408 =
													MAKE_YOUNG_PAIR(BgL_arg1464z00_1407, BNIL);
												return BgL_list1465z00_1408;
											}
										}
								}
							else
								{	/* R5rs/syntax.scm 374 */
									return BNIL;
								}
						}
				}
		}

	}



/* syntax-expand-pattern */
	obj_t BGl_syntaxzd2expandzd2patternz00zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_pz00_28, obj_t BgL_envz00_29, obj_t BgL_kz00_30)
	{
		{	/* R5rs/syntax.scm 382 */
			{
				obj_t BgL_p0z00_1425;
				obj_t BgL_envz00_1426;
				obj_t BgL_kz00_1427;

				if (BGl_ellipsiszf3zf3zz__r5_macro_4_3_syntaxz00(BgL_pz00_28))
					{	/* R5rs/syntax.scm 395 */
						obj_t BgL_arg1468z00_1412;
						obj_t BgL_arg1469z00_1413;

						{	/* R5rs/syntax.scm 395 */
							obj_t BgL_arg1470z00_1414;

							BgL_arg1470z00_1414 = CAR(((obj_t) BgL_pz00_28));
							BgL_p0z00_1425 = BgL_arg1470z00_1414;
							BgL_envz00_1426 = BgL_envz00_29;
							BgL_kz00_1427 = BgL_kz00_30;
							{	/* R5rs/syntax.scm 385 */
								obj_t BgL_varsz00_1429;

								BgL_varsz00_1429 =
									BGl_subze70ze7zz__r5_macro_4_3_syntaxz00(BgL_kz00_1427,
									BgL_p0z00_1425);
								{	/* R5rs/syntax.scm 385 */
									obj_t BgL_framesz00_1430;

									BgL_framesz00_1430 =
										BGl_getzd2ellipsiszd2framesz00zz__r5_macro_4_3_syntaxz00
										(BgL_varsz00_1429, BgL_envz00_1426);
									{	/* R5rs/syntax.scm 386 */

										if (BGl_listzf3zf3zz__r4_pairs_and_lists_6_3z00
											(BgL_framesz00_1430))
											{	/* R5rs/syntax.scm 387 */
												if (NULLP(BgL_framesz00_1430))
													{	/* R5rs/syntax.scm 389 */
														BgL_arg1468z00_1412 = BNIL;
													}
												else
													{	/* R5rs/syntax.scm 389 */
														obj_t BgL_head1113z00_1434;

														BgL_head1113z00_1434 = MAKE_YOUNG_PAIR(BNIL, BNIL);
														{
															obj_t BgL_l1111z00_1436;
															obj_t BgL_tail1114z00_1437;

															BgL_l1111z00_1436 = BgL_framesz00_1430;
															BgL_tail1114z00_1437 = BgL_head1113z00_1434;
														BgL_zc3z04anonymousza31483ze3z87_1438:
															if (NULLP(BgL_l1111z00_1436))
																{	/* R5rs/syntax.scm 389 */
																	BgL_arg1468z00_1412 =
																		CDR(BgL_head1113z00_1434);
																}
															else
																{	/* R5rs/syntax.scm 389 */
																	obj_t BgL_newtail1115z00_1440;

																	{	/* R5rs/syntax.scm 389 */
																		obj_t BgL_arg1487z00_1442;

																		{	/* R5rs/syntax.scm 389 */
																			obj_t BgL_fz00_1443;

																			BgL_fz00_1443 =
																				CAR(((obj_t) BgL_l1111z00_1436));
																			BgL_arg1487z00_1442 =
																				BGl_syntaxzd2expandzd2patternz00zz__r5_macro_4_3_syntaxz00
																				(BgL_p0z00_1425,
																				BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
																				(BgL_fz00_1443, BgL_envz00_1426),
																				BgL_kz00_1427);
																		}
																		BgL_newtail1115z00_1440 =
																			MAKE_YOUNG_PAIR(BgL_arg1487z00_1442,
																			BNIL);
																	}
																	SET_CDR(BgL_tail1114z00_1437,
																		BgL_newtail1115z00_1440);
																	{	/* R5rs/syntax.scm 389 */
																		obj_t BgL_arg1486z00_1441;

																		BgL_arg1486z00_1441 =
																			CDR(((obj_t) BgL_l1111z00_1436));
																		{
																			obj_t BgL_tail1114z00_4877;
																			obj_t BgL_l1111z00_4876;

																			BgL_l1111z00_4876 = BgL_arg1486z00_1441;
																			BgL_tail1114z00_4877 =
																				BgL_newtail1115z00_1440;
																			BgL_tail1114z00_1437 =
																				BgL_tail1114z00_4877;
																			BgL_l1111z00_1436 = BgL_l1111z00_4876;
																			goto
																				BgL_zc3z04anonymousza31483ze3z87_1438;
																		}
																	}
																}
														}
													}
											}
										else
											{	/* R5rs/syntax.scm 387 */
												BgL_arg1468z00_1412 = BNIL;
											}
									}
								}
							}
						}
						{	/* R5rs/syntax.scm 396 */
							obj_t BgL_arg1471z00_1415;

							{	/* R5rs/syntax.scm 396 */
								obj_t BgL_pairz00_2777;

								BgL_pairz00_2777 = CDR(((obj_t) BgL_pz00_28));
								BgL_arg1471z00_1415 = CDR(BgL_pairz00_2777);
							}
							BgL_arg1469z00_1413 =
								BGl_syntaxzd2expandzd2patternz00zz__r5_macro_4_3_syntaxz00
								(BgL_arg1471z00_1415, BgL_envz00_29, BgL_kz00_30);
						}
						return
							BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
							(BgL_arg1468z00_1412, BgL_arg1469z00_1413);
					}
				else
					{	/* R5rs/syntax.scm 394 */
						if (PAIRP(BgL_pz00_28))
							{	/* R5rs/syntax.scm 397 */
								return
									MAKE_YOUNG_PAIR
									(BGl_syntaxzd2expandzd2patternz00zz__r5_macro_4_3_syntaxz00
									(CAR(BgL_pz00_28), BgL_envz00_29, BgL_kz00_30),
									BGl_syntaxzd2expandzd2patternz00zz__r5_macro_4_3_syntaxz00(CDR
										(BgL_pz00_28), BgL_envz00_29, BgL_kz00_30));
							}
						else
							{	/* R5rs/syntax.scm 397 */
								if (SYMBOLP(BgL_pz00_28))
									{	/* R5rs/syntax.scm 400 */
										if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00
												(BgL_pz00_28, BgL_kz00_30)))
											{	/* R5rs/syntax.scm 401 */
												return BgL_pz00_28;
											}
										else
											{	/* R5rs/syntax.scm 403 */
												obj_t BgL_xz00_1423;

												BgL_xz00_1423 =
													BGl_assqz00zz__r4_pairs_and_lists_6_3z00(BgL_pz00_28,
													BgL_envz00_29);
												if (PAIRP(BgL_xz00_1423))
													{	/* R5rs/syntax.scm 404 */
														return CDR(BgL_xz00_1423);
													}
												else
													{	/* R5rs/syntax.scm 404 */
														return BgL_pz00_28;
													}
											}
									}
								else
									{	/* R5rs/syntax.scm 400 */
										return BgL_pz00_28;
									}
							}
					}
			}
		}

	}



/* get-ellipsis-frames */
	obj_t BGl_getzd2ellipsiszd2framesz00zz__r5_macro_4_3_syntaxz00(obj_t
		BgL_varsz00_31, obj_t BgL_framesz00_32)
	{
		{	/* R5rs/syntax.scm 413 */
			{
				obj_t BgL_varsz00_1449;
				obj_t BgL_resz00_1450;

				BgL_varsz00_1449 = BgL_varsz00_31;
				BgL_resz00_1450 = BNIL;
			BgL_zc3z04anonymousza31489ze3z87_1451:
				if (NULLP(BgL_varsz00_1449))
					{	/* R5rs/syntax.scm 416 */
						return BgL_resz00_1450;
					}
				else
					{	/* R5rs/syntax.scm 418 */
						obj_t BgL_vz00_1453;

						BgL_vz00_1453 = CAR(((obj_t) BgL_varsz00_1449));
						{	/* R5rs/syntax.scm 419 */
							obj_t BgL_fz00_1454;

							{
								obj_t BgL_l1122z00_1514;

								BgL_l1122z00_1514 = BgL_framesz00_32;
							BgL_zc3z04anonymousza31524ze3z87_1515:
								if (NULLP(BgL_l1122z00_1514))
									{	/* R5rs/syntax.scm 419 */
										BgL_fz00_1454 = BFALSE;
									}
								else
									{	/* R5rs/syntax.scm 420 */
										obj_t BgL__ortest_1124z00_1517;

										{	/* R5rs/syntax.scm 420 */
											obj_t BgL_fz00_1519;

											BgL_fz00_1519 = CAR(((obj_t) BgL_l1122z00_1514));
											if (
												(CAR(
														((obj_t) BgL_fz00_1519)) ==
													BGl_keyword2593z00zz__r5_macro_4_3_syntaxz00))
												{	/* R5rs/syntax.scm 421 */
													obj_t BgL_ez00_1522;

													{	/* R5rs/syntax.scm 421 */
														obj_t BgL_hook1120z00_1524;

														BgL_hook1120z00_1524 =
															MAKE_YOUNG_PAIR(BFALSE, BNIL);
														{	/* R5rs/syntax.scm 421 */
															obj_t BgL_g1121z00_1525;

															BgL_g1121z00_1525 = CDR(((obj_t) BgL_fz00_1519));
															{
																obj_t BgL_l1117z00_1527;
																obj_t BgL_h1118z00_1528;

																BgL_l1117z00_1527 = BgL_g1121z00_1525;
																BgL_h1118z00_1528 = BgL_hook1120z00_1524;
															BgL_zc3z04anonymousza31530ze3z87_1529:
																if (NULLP(BgL_l1117z00_1527))
																	{	/* R5rs/syntax.scm 421 */
																		BgL_ez00_1522 = CDR(BgL_hook1120z00_1524);
																	}
																else
																	{	/* R5rs/syntax.scm 421 */
																		if (CBOOL
																			(BGl_assqz00zz__r4_pairs_and_lists_6_3z00
																				(BgL_vz00_1453,
																					CAR(((obj_t) BgL_l1117z00_1527)))))
																			{	/* R5rs/syntax.scm 421 */
																				obj_t BgL_nh1119z00_1533;

																				{	/* R5rs/syntax.scm 421 */
																					obj_t BgL_arg1534z00_1535;

																					BgL_arg1534z00_1535 =
																						CAR(((obj_t) BgL_l1117z00_1527));
																					BgL_nh1119z00_1533 =
																						MAKE_YOUNG_PAIR(BgL_arg1534z00_1535,
																						BNIL);
																				}
																				SET_CDR(BgL_h1118z00_1528,
																					BgL_nh1119z00_1533);
																				{	/* R5rs/syntax.scm 421 */
																					obj_t BgL_arg1533z00_1534;

																					BgL_arg1533z00_1534 =
																						CDR(((obj_t) BgL_l1117z00_1527));
																					{
																						obj_t BgL_h1118z00_4929;
																						obj_t BgL_l1117z00_4928;

																						BgL_l1117z00_4928 =
																							BgL_arg1533z00_1534;
																						BgL_h1118z00_4929 =
																							BgL_nh1119z00_1533;
																						BgL_h1118z00_1528 =
																							BgL_h1118z00_4929;
																						BgL_l1117z00_1527 =
																							BgL_l1117z00_4928;
																						goto
																							BgL_zc3z04anonymousza31530ze3z87_1529;
																					}
																				}
																			}
																		else
																			{	/* R5rs/syntax.scm 421 */
																				obj_t BgL_arg1537z00_1536;

																				BgL_arg1537z00_1536 =
																					CDR(((obj_t) BgL_l1117z00_1527));
																				{
																					obj_t BgL_l1117z00_4932;

																					BgL_l1117z00_4932 =
																						BgL_arg1537z00_1536;
																					BgL_l1117z00_1527 = BgL_l1117z00_4932;
																					goto
																						BgL_zc3z04anonymousza31530ze3z87_1529;
																				}
																			}
																	}
															}
														}
													}
													if (PAIRP(BgL_ez00_1522))
														{	/* R5rs/syntax.scm 422 */
															BgL__ortest_1124z00_1517 = BgL_ez00_1522;
														}
													else
														{	/* R5rs/syntax.scm 422 */
															BgL__ortest_1124z00_1517 = BFALSE;
														}
												}
											else
												{	/* R5rs/syntax.scm 420 */
													BgL__ortest_1124z00_1517 = BFALSE;
												}
										}
										if (CBOOL(BgL__ortest_1124z00_1517))
											{	/* R5rs/syntax.scm 419 */
												BgL_fz00_1454 = BgL__ortest_1124z00_1517;
											}
										else
											{	/* R5rs/syntax.scm 419 */
												obj_t BgL_arg1526z00_1518;

												BgL_arg1526z00_1518 = CDR(((obj_t) BgL_l1122z00_1514));
												{
													obj_t BgL_l1122z00_4939;

													BgL_l1122z00_4939 = BgL_arg1526z00_1518;
													BgL_l1122z00_1514 = BgL_l1122z00_4939;
													goto BgL_zc3z04anonymousza31524ze3z87_1515;
												}
											}
									}
							}
							if (CBOOL(BgL_fz00_1454))
								{	/* R5rs/syntax.scm 425 */
									obj_t BgL_g1045z00_1455;

									BgL_g1045z00_1455 = CDR(((obj_t) BgL_varsz00_1449));
									{
										obj_t BgL_ovarsz00_1458;
										obj_t BgL_nvarsz00_1459;

										BgL_ovarsz00_1458 = BgL_g1045z00_1455;
										BgL_nvarsz00_1459 = BNIL;
									BgL_zc3z04anonymousza31491ze3z87_1460:
										if (NULLP(BgL_ovarsz00_1458))
											{	/* R5rs/syntax.scm 428 */
												if (NULLP(BgL_resz00_1450))
													{
														obj_t BgL_resz00_4949;
														obj_t BgL_varsz00_4948;

														BgL_varsz00_4948 = BgL_nvarsz00_1459;
														BgL_resz00_4949 = BgL_fz00_1454;
														BgL_resz00_1450 = BgL_resz00_4949;
														BgL_varsz00_1449 = BgL_varsz00_4948;
														goto BgL_zc3z04anonymousza31489ze3z87_1451;
													}
												else
													{	/* R5rs/syntax.scm 431 */
														obj_t BgL_arg1494z00_1463;

														if (NULLP(BgL_fz00_1454))
															{	/* R5rs/syntax.scm 431 */
																BgL_arg1494z00_1463 = BNIL;
															}
														else
															{	/* R5rs/syntax.scm 431 */
																obj_t BgL_head1127z00_1467;

																{	/* R5rs/syntax.scm 431 */
																	obj_t BgL_arg1505z00_1483;

																	{	/* R5rs/syntax.scm 431 */
																		obj_t BgL_arg1506z00_1484;
																		obj_t BgL_arg1507z00_1485;

																		BgL_arg1506z00_1484 =
																			CAR(((obj_t) BgL_fz00_1454));
																		BgL_arg1507z00_1485 =
																			CAR(((obj_t) BgL_resz00_1450));
																		BgL_arg1505z00_1483 =
																			BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
																			(BgL_arg1506z00_1484,
																			BgL_arg1507z00_1485);
																	}
																	BgL_head1127z00_1467 =
																		MAKE_YOUNG_PAIR(BgL_arg1505z00_1483, BNIL);
																}
																{	/* R5rs/syntax.scm 431 */
																	obj_t BgL_g1131z00_1468;
																	obj_t BgL_g1132z00_1469;

																	BgL_g1131z00_1468 =
																		CDR(((obj_t) BgL_fz00_1454));
																	BgL_g1132z00_1469 =
																		CDR(((obj_t) BgL_resz00_1450));
																	{
																		obj_t BgL_ll1125z00_2822;
																		obj_t BgL_ll1126z00_2823;
																		obj_t BgL_tail1128z00_2824;

																		BgL_ll1125z00_2822 = BgL_g1131z00_1468;
																		BgL_ll1126z00_2823 = BgL_g1132z00_1469;
																		BgL_tail1128z00_2824 = BgL_head1127z00_1467;
																	BgL_zc3z04anonymousza31496ze3z87_2821:
																		if (NULLP(BgL_ll1125z00_2822))
																			{	/* R5rs/syntax.scm 431 */
																				BgL_arg1494z00_1463 =
																					BgL_head1127z00_1467;
																			}
																		else
																			{	/* R5rs/syntax.scm 431 */
																				obj_t BgL_newtail1129z00_2833;

																				{	/* R5rs/syntax.scm 431 */
																					obj_t BgL_arg1500z00_2834;

																					{	/* R5rs/syntax.scm 431 */
																						obj_t BgL_arg1501z00_2835;
																						obj_t BgL_arg1502z00_2836;

																						BgL_arg1501z00_2835 =
																							CAR(((obj_t) BgL_ll1125z00_2822));
																						BgL_arg1502z00_2836 =
																							CAR(((obj_t) BgL_ll1126z00_2823));
																						BgL_arg1500z00_2834 =
																							BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
																							(BgL_arg1501z00_2835,
																							BgL_arg1502z00_2836);
																					}
																					BgL_newtail1129z00_2833 =
																						MAKE_YOUNG_PAIR(BgL_arg1500z00_2834,
																						BNIL);
																				}
																				SET_CDR(BgL_tail1128z00_2824,
																					BgL_newtail1129z00_2833);
																				{	/* R5rs/syntax.scm 431 */
																					obj_t BgL_arg1498z00_2837;
																					obj_t BgL_arg1499z00_2838;

																					BgL_arg1498z00_2837 =
																						CDR(((obj_t) BgL_ll1125z00_2822));
																					BgL_arg1499z00_2838 =
																						CDR(((obj_t) BgL_ll1126z00_2823));
																					{
																						obj_t BgL_tail1128z00_4977;
																						obj_t BgL_ll1126z00_4976;
																						obj_t BgL_ll1125z00_4975;

																						BgL_ll1125z00_4975 =
																							BgL_arg1498z00_2837;
																						BgL_ll1126z00_4976 =
																							BgL_arg1499z00_2838;
																						BgL_tail1128z00_4977 =
																							BgL_newtail1129z00_2833;
																						BgL_tail1128z00_2824 =
																							BgL_tail1128z00_4977;
																						BgL_ll1126z00_2823 =
																							BgL_ll1126z00_4976;
																						BgL_ll1125z00_2822 =
																							BgL_ll1125z00_4975;
																						goto
																							BgL_zc3z04anonymousza31496ze3z87_2821;
																					}
																				}
																			}
																	}
																}
															}
														{
															obj_t BgL_resz00_4979;
															obj_t BgL_varsz00_4978;

															BgL_varsz00_4978 = BgL_nvarsz00_1459;
															BgL_resz00_4979 = BgL_arg1494z00_1463;
															BgL_resz00_1450 = BgL_resz00_4979;
															BgL_varsz00_1449 = BgL_varsz00_4978;
															goto BgL_zc3z04anonymousza31489ze3z87_1451;
														}
													}
											}
										else
											{	/* R5rs/syntax.scm 432 */
												bool_t BgL_test2792z00_4980;

												{
													obj_t BgL_l1133z00_1502;

													BgL_l1133z00_1502 = BgL_fz00_1454;
												BgL_zc3z04anonymousza31518ze3z87_1503:
													if (NULLP(BgL_l1133z00_1502))
														{	/* R5rs/syntax.scm 432 */
															BgL_test2792z00_4980 = ((bool_t) 0);
														}
													else
														{	/* R5rs/syntax.scm 432 */
															bool_t BgL__ortest_1135z00_1505;

															{	/* R5rs/syntax.scm 432 */
																obj_t BgL_tmpz00_4983;

																BgL_tmpz00_4983 =
																	BGl_assqz00zz__r4_pairs_and_lists_6_3z00(CAR(
																		((obj_t) BgL_ovarsz00_1458)),
																	CAR(((obj_t) BgL_l1133z00_1502)));
																BgL__ortest_1135z00_1505 =
																	PAIRP(BgL_tmpz00_4983);
															}
															if (BgL__ortest_1135z00_1505)
																{	/* R5rs/syntax.scm 432 */
																	BgL_test2792z00_4980 =
																		BgL__ortest_1135z00_1505;
																}
															else
																{
																	obj_t BgL_l1133z00_4991;

																	BgL_l1133z00_4991 =
																		CDR(((obj_t) BgL_l1133z00_1502));
																	BgL_l1133z00_1502 = BgL_l1133z00_4991;
																	goto BgL_zc3z04anonymousza31518ze3z87_1503;
																}
														}
												}
												if (BgL_test2792z00_4980)
													{	/* R5rs/syntax.scm 433 */
														obj_t BgL_arg1514z00_1497;

														BgL_arg1514z00_1497 =
															CDR(((obj_t) BgL_ovarsz00_1458));
														{
															obj_t BgL_ovarsz00_4996;

															BgL_ovarsz00_4996 = BgL_arg1514z00_1497;
															BgL_ovarsz00_1458 = BgL_ovarsz00_4996;
															goto BgL_zc3z04anonymousza31491ze3z87_1460;
														}
													}
												else
													{	/* R5rs/syntax.scm 435 */
														obj_t BgL_arg1515z00_1498;
														obj_t BgL_arg1516z00_1499;

														BgL_arg1515z00_1498 =
															CDR(((obj_t) BgL_ovarsz00_1458));
														{	/* R5rs/syntax.scm 435 */
															obj_t BgL_arg1517z00_1500;

															BgL_arg1517z00_1500 =
																CAR(((obj_t) BgL_ovarsz00_1458));
															BgL_arg1516z00_1499 =
																MAKE_YOUNG_PAIR(BgL_arg1517z00_1500,
																BgL_nvarsz00_1459);
														}
														{
															obj_t BgL_nvarsz00_5003;
															obj_t BgL_ovarsz00_5002;

															BgL_ovarsz00_5002 = BgL_arg1515z00_1498;
															BgL_nvarsz00_5003 = BgL_arg1516z00_1499;
															BgL_nvarsz00_1459 = BgL_nvarsz00_5003;
															BgL_ovarsz00_1458 = BgL_ovarsz00_5002;
															goto BgL_zc3z04anonymousza31491ze3z87_1460;
														}
													}
											}
									}
								}
							else
								{	/* R5rs/syntax.scm 436 */
									obj_t BgL_arg1523z00_1512;

									BgL_arg1523z00_1512 = CDR(((obj_t) BgL_varsz00_1449));
									{
										obj_t BgL_varsz00_5006;

										BgL_varsz00_5006 = BgL_arg1523z00_1512;
										BgL_varsz00_1449 = BgL_varsz00_5006;
										goto BgL_zc3z04anonymousza31489ze3z87_1451;
									}
								}
						}
					}
			}
		}

	}



/* sub~0 */
	obj_t BGl_subze70ze7zz__r5_macro_4_3_syntaxz00(obj_t BgL_kz00_3730,
		obj_t BgL_pz00_1543)
	{
		{	/* R5rs/syntax.scm 442 */
			if (BGl_ellipsiszf3zf3zz__r5_macro_4_3_syntaxz00(BgL_pz00_1543))
				{	/* R5rs/syntax.scm 445 */
					obj_t BgL_arg1541z00_1546;
					obj_t BgL_arg1542z00_1547;

					{	/* R5rs/syntax.scm 445 */
						obj_t BgL_arg1543z00_1548;

						BgL_arg1543z00_1548 = CAR(((obj_t) BgL_pz00_1543));
						BgL_arg1541z00_1546 =
							BGl_subze70ze7zz__r5_macro_4_3_syntaxz00(BgL_kz00_3730,
							BgL_arg1543z00_1548);
					}
					{	/* R5rs/syntax.scm 445 */
						obj_t BgL_arg1545z00_1549;

						{	/* R5rs/syntax.scm 445 */
							obj_t BgL_pairz00_2855;

							BgL_pairz00_2855 = CDR(((obj_t) BgL_pz00_1543));
							BgL_arg1545z00_1549 = CDR(BgL_pairz00_2855);
						}
						BgL_arg1542z00_1547 =
							BGl_subze70ze7zz__r5_macro_4_3_syntaxz00(BgL_kz00_3730,
							BgL_arg1545z00_1549);
					}
					return MAKE_YOUNG_PAIR(BgL_arg1541z00_1546, BgL_arg1542z00_1547);
				}
			else
				{	/* R5rs/syntax.scm 444 */
					if (PAIRP(BgL_pz00_1543))
						{	/* R5rs/syntax.scm 446 */
							return
								BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
								(BGl_subze70ze7zz__r5_macro_4_3_syntaxz00(BgL_kz00_3730,
									CAR(BgL_pz00_1543)),
								BGl_subze70ze7zz__r5_macro_4_3_syntaxz00(BgL_kz00_3730,
									CDR(BgL_pz00_1543)));
						}
					else
						{	/* R5rs/syntax.scm 446 */
							if (SYMBOLP(BgL_pz00_1543))
								{	/* R5rs/syntax.scm 448 */
									if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00
											(BgL_pz00_1543, BgL_kz00_3730)))
										{	/* R5rs/syntax.scm 449 */
											return BNIL;
										}
									else
										{	/* R5rs/syntax.scm 449 */
											obj_t BgL_list1555z00_1557;

											BgL_list1555z00_1557 =
												MAKE_YOUNG_PAIR(BgL_pz00_1543, BNIL);
											return BgL_list1555z00_1557;
										}
								}
							else
								{	/* R5rs/syntax.scm 448 */
									return BNIL;
								}
						}
				}
		}

	}



/* ellipsis? */
	bool_t BGl_ellipsiszf3zf3zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_35)
	{
		{	/* R5rs/syntax.scm 456 */
			if (PAIRP(BgL_xz00_35))
				{	/* R5rs/syntax.scm 458 */
					bool_t BgL_test2800z00_5032;

					{	/* R5rs/syntax.scm 458 */
						obj_t BgL_tmpz00_5033;

						BgL_tmpz00_5033 = CDR(BgL_xz00_35);
						BgL_test2800z00_5032 = PAIRP(BgL_tmpz00_5033);
					}
					if (BgL_test2800z00_5032)
						{	/* R5rs/syntax.scm 458 */
							return
								(CAR(CDR(BgL_xz00_35)) ==
								BGl_symbol2365z00zz__r5_macro_4_3_syntaxz00);
						}
					else
						{	/* R5rs/syntax.scm 458 */
							return ((bool_t) 0);
						}
				}
			else
				{	/* R5rs/syntax.scm 457 */
					return ((bool_t) 0);
				}
		}

	}



/* hygiene-value* */
	obj_t BGl_hygienezd2valueza2z70zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_38)
	{
		{	/* R5rs/syntax.scm 477 */
			if (SYMBOLP(BgL_xz00_38))
				{	/* R5rs/syntax.scm 482 */
					obj_t BgL_sz00_1568;

					{	/* R5rs/syntax.scm 482 */
						obj_t BgL_arg2128z00_2876;

						BgL_arg2128z00_2876 = SYMBOL_TO_STRING(BgL_xz00_38);
						BgL_sz00_1568 =
							BGl_stringzd2copyzd2zz__r4_strings_6_7z00(BgL_arg2128z00_2876);
					}
					{
						obj_t BgL_sz00_1570;

						BgL_sz00_1570 = BgL_sz00_1568;
					BgL_zc3z04anonymousza31565ze3z87_1571:
						if (bigloo_strcmp_at(BgL_sz00_1570,
								BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00, 0L))
							{	/* R5rs/syntax.scm 485 */
								obj_t BgL_arg1568z00_1573;

								{	/* R5rs/syntax.scm 485 */
									long BgL_arg1569z00_1574;

									BgL_arg1569z00_1574 = STRING_LENGTH(BgL_sz00_1570);
									BgL_arg1568z00_1573 =
										c_substring(BgL_sz00_1570,
										BGl_hygienezd2prefixzd2lenz00zz__r5_macro_4_3_syntaxz00,
										BgL_arg1569z00_1574);
								}
								{
									obj_t BgL_sz00_5047;

									BgL_sz00_5047 = BgL_arg1568z00_1573;
									BgL_sz00_1570 = BgL_sz00_5047;
									goto BgL_zc3z04anonymousza31565ze3z87_1571;
								}
							}
						else
							{	/* R5rs/syntax.scm 484 */
								return bstring_to_symbol(BgL_sz00_1570);
							}
					}
				}
			else
				{	/* R5rs/syntax.scm 480 */
					return BgL_xz00_38;
				}
		}

	}



/* hygiene-value */
	obj_t BGl_hygienezd2valuezd2zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_39)
	{
		{	/* R5rs/syntax.scm 491 */
			if (SYMBOLP(BgL_xz00_39))
				{	/* R5rs/syntax.scm 494 */
					obj_t BgL_sz00_1577;

					{	/* R5rs/syntax.scm 494 */
						obj_t BgL_arg2128z00_2883;

						BgL_arg2128z00_2883 = SYMBOL_TO_STRING(BgL_xz00_39);
						BgL_sz00_1577 =
							BGl_stringzd2copyzd2zz__r4_strings_6_7z00(BgL_arg2128z00_2883);
					}
					if (bigloo_strcmp_at(BgL_sz00_1577,
							BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00, 0L))
						{	/* R5rs/syntax.scm 497 */
							obj_t BgL_arg1573z00_1579;

							{	/* R5rs/syntax.scm 497 */
								long BgL_arg1574z00_1580;

								BgL_arg1574z00_1580 = STRING_LENGTH(BgL_sz00_1577);
								BgL_arg1573z00_1579 =
									c_substring(BgL_sz00_1577,
									BGl_hygienezd2prefixzd2lenz00zz__r5_macro_4_3_syntaxz00,
									BgL_arg1574z00_1580);
							}
							return bstring_to_symbol(BgL_arg1573z00_1579);
						}
					else
						{	/* R5rs/syntax.scm 495 */
							return BgL_xz00_39;
						}
				}
			else
				{	/* R5rs/syntax.scm 492 */
					return BgL_xz00_39;
				}
		}

	}



/* hygiene-eq? */
	bool_t BGl_hygienezd2eqzf3z21zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_40,
		obj_t BgL_idz00_41)
	{
		{	/* R5rs/syntax.scm 503 */
		BGl_hygienezd2eqzf3z21zz__r5_macro_4_3_syntaxz00:
			{	/* R5rs/syntax.scm 504 */
				bool_t BgL_test2805z00_5058;

				if (SYMBOLP(BgL_idz00_41))
					{	/* R5rs/syntax.scm 504 */
						BgL_test2805z00_5058 = SYMBOLP(BgL_xz00_40);
					}
				else
					{	/* R5rs/syntax.scm 504 */
						BgL_test2805z00_5058 = ((bool_t) 0);
					}
				if (BgL_test2805z00_5058)
					{	/* R5rs/syntax.scm 505 */
						bool_t BgL__ortest_1049z00_1583;

						BgL__ortest_1049z00_1583 = (BgL_xz00_40 == BgL_idz00_41);
						if (BgL__ortest_1049z00_1583)
							{	/* R5rs/syntax.scm 505 */
								return BgL__ortest_1049z00_1583;
							}
						else
							{	/* R5rs/syntax.scm 506 */
								bool_t BgL_test2808z00_5064;

								{	/* R5rs/syntax.scm 471 */
									obj_t BgL_sz00_2889;

									{	/* R5rs/syntax.scm 471 */
										obj_t BgL_arg2128z00_2891;

										BgL_arg2128z00_2891 = SYMBOL_TO_STRING(BgL_xz00_40);
										BgL_sz00_2889 =
											BGl_stringzd2copyzd2zz__r4_strings_6_7z00
											(BgL_arg2128z00_2891);
									}
									BgL_test2808z00_5064 =
										bigloo_strcmp_at(BgL_sz00_2889,
										BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00, 0L);
								}
								if (BgL_test2808z00_5064)
									{
										obj_t BgL_xz00_5068;

										BgL_xz00_5068 =
											BGl_hygienezd2valuezd2zz__r5_macro_4_3_syntaxz00
											(BgL_xz00_40);
										BgL_xz00_40 = BgL_xz00_5068;
										goto BGl_hygienezd2eqzf3z21zz__r5_macro_4_3_syntaxz00;
									}
								else
									{	/* R5rs/syntax.scm 506 */
										return ((bool_t) 0);
									}
							}
					}
				else
					{	/* R5rs/syntax.scm 504 */
						return ((bool_t) 0);
					}
			}
		}

	}



/* unhygienize */
	obj_t BGl_unhygieniza7eza7zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_42)
	{
		{	/* R5rs/syntax.scm 511 */
			if (SYMBOLP(BgL_xz00_42))
				{	/* R5rs/syntax.scm 465 */
					obj_t BgL_arg1561z00_2892;

					{	/* R5rs/syntax.scm 465 */
						obj_t BgL_arg1562z00_2893;
						obj_t BgL_arg1563z00_2894;

						{	/* R5rs/syntax.scm 465 */
							obj_t BgL_symbolz00_2895;

							BgL_symbolz00_2895 =
								BGl_hygienezd2markzd2zz__r5_macro_4_3_syntaxz00;
							{	/* R5rs/syntax.scm 465 */
								obj_t BgL_arg2128z00_2896;

								BgL_arg2128z00_2896 = SYMBOL_TO_STRING(BgL_symbolz00_2895);
								BgL_arg1562z00_2893 =
									BGl_stringzd2copyzd2zz__r4_strings_6_7z00
									(BgL_arg2128z00_2896);
							}
						}
						{	/* R5rs/syntax.scm 465 */
							obj_t BgL_arg2128z00_2898;

							BgL_arg2128z00_2898 = SYMBOL_TO_STRING(BgL_xz00_42);
							BgL_arg1563z00_2894 =
								BGl_stringzd2copyzd2zz__r4_strings_6_7z00(BgL_arg2128z00_2898);
						}
						BgL_arg1561z00_2892 =
							string_append(BgL_arg1562z00_2893, BgL_arg1563z00_2894);
					}
					return bstring_to_symbol(BgL_arg1561z00_2892);
				}
			else
				{	/* R5rs/syntax.scm 513 */
					if (PAIRP(BgL_xz00_42))
						{	/* R5rs/syntax.scm 515 */
							return
								MAKE_YOUNG_PAIR(BGl_unhygieniza7eza7zz__r5_macro_4_3_syntaxz00
								(CAR(BgL_xz00_42)),
								BGl_unhygieniza7eza7zz__r5_macro_4_3_syntaxz00(CDR
									(BgL_xz00_42)));
						}
					else
						{	/* R5rs/syntax.scm 515 */
							return BgL_xz00_42;
						}
				}
		}

	}



/* hygienize */
	obj_t BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00(obj_t BgL_xz00_43,
		obj_t BgL_envz00_44)
	{
		{	/* R5rs/syntax.scm 523 */
			{
				obj_t BgL_bindingsz00_1610;
				obj_t BgL_bodyz00_1611;
				obj_t BgL_bindingsz00_1607;
				obj_t BgL_bodyz00_1608;
				obj_t BgL_bindingsz00_1604;
				obj_t BgL_bodyz00_1605;
				obj_t BgL_loopz00_1600;
				obj_t BgL_bindingsz00_1601;
				obj_t BgL_bodyz00_1602;
				obj_t BgL_varsz00_1597;
				obj_t BgL_bodyz00_1598;
				obj_t BgL_varz00_1593;

				if (SYMBOLP(BgL_xz00_43))
					{	/* R5rs/syntax.scm 524 */
						BgL_varz00_1593 = BgL_xz00_43;
						{	/* R5rs/syntax.scm 526 */
							bool_t BgL_test2812z00_5087;

							{	/* R5rs/syntax.scm 471 */
								obj_t BgL_sz00_2902;

								{	/* R5rs/syntax.scm 471 */
									obj_t BgL_arg2128z00_2904;

									BgL_arg2128z00_2904 = SYMBOL_TO_STRING(((obj_t) BgL_xz00_43));
									BgL_sz00_2902 =
										BGl_stringzd2copyzd2zz__r4_strings_6_7z00
										(BgL_arg2128z00_2904);
								}
								BgL_test2812z00_5087 =
									bigloo_strcmp_at(BgL_sz00_2902,
									BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00, 0L);
							}
							if (BgL_test2812z00_5087)
								{	/* R5rs/syntax.scm 526 */
									return
										BGl_hygienezd2valuezd2zz__r5_macro_4_3_syntaxz00
										(BgL_xz00_43);
								}
							else
								{	/* R5rs/syntax.scm 528 */
									obj_t BgL_oz00_1866;

									BgL_oz00_1866 =
										BGl_assqz00zz__r4_pairs_and_lists_6_3z00(BgL_varz00_1593,
										BgL_envz00_44);
									if (PAIRP(BgL_oz00_1866))
										{	/* R5rs/syntax.scm 529 */
											return CDR(BgL_oz00_1866);
										}
									else
										{	/* R5rs/syntax.scm 529 */
											return BgL_varz00_1593;
										}
								}
						}
					}
				else
					{	/* R5rs/syntax.scm 524 */
						if (PAIRP(BgL_xz00_43))
							{	/* R5rs/syntax.scm 524 */
								if (
									(CAR(
											((obj_t) BgL_xz00_43)) ==
										BGl_symbol2348z00zz__r5_macro_4_3_syntaxz00))
									{	/* R5rs/syntax.scm 524 */
										obj_t BgL_arg1595z00_1623;

										BgL_arg1595z00_1623 = CDR(((obj_t) BgL_xz00_43));
										{	/* R5rs/syntax.scm 533 */
											obj_t BgL_arg1841z00_3296;

											BgL_arg1841z00_3296 =
												BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00(BgL_envz00_44,
												BgL_arg1595z00_1623);
											return
												MAKE_YOUNG_PAIR
												(BGl_symbol2348z00zz__r5_macro_4_3_syntaxz00,
												BgL_arg1841z00_3296);
										}
									}
								else
									{	/* R5rs/syntax.scm 524 */
										obj_t BgL_cdrzd2271zd2_1624;

										BgL_cdrzd2271zd2_1624 = CDR(((obj_t) BgL_xz00_43));
										if (
											(CAR(
													((obj_t) BgL_xz00_43)) ==
												BGl_symbol2462z00zz__r5_macro_4_3_syntaxz00))
											{	/* R5rs/syntax.scm 524 */
												if (PAIRP(BgL_cdrzd2271zd2_1624))
													{	/* R5rs/syntax.scm 524 */
														BgL_varsz00_1597 = CAR(BgL_cdrzd2271zd2_1624);
														BgL_bodyz00_1598 = CDR(BgL_cdrzd2271zd2_1624);
														{	/* R5rs/syntax.scm 535 */
															obj_t BgL_nvarsz00_1869;

															BgL_nvarsz00_1869 =
																BGl_genvarsz00zz__r5_macro_4_3_syntaxz00
																(BgL_varsz00_1597);
															{	/* R5rs/syntax.scm 535 */
																obj_t BgL_nenvz00_1870;

																{	/* R5rs/syntax.scm 536 */
																	obj_t BgL_arg1846z00_1873;

																	{	/* R5rs/syntax.scm 536 */
																		obj_t BgL_ll1136z00_1874;
																		obj_t BgL_ll1137z00_1875;

																		BgL_ll1136z00_1874 =
																			BGl_flattenz00zz__r5_macro_4_3_syntaxz00
																			(BgL_varsz00_1597);
																		BgL_ll1137z00_1875 =
																			BGl_flattenz00zz__r5_macro_4_3_syntaxz00
																			(BgL_nvarsz00_1869);
																		if (NULLP(BgL_ll1136z00_1874))
																			{	/* R5rs/syntax.scm 536 */
																				BgL_arg1846z00_1873 = BNIL;
																			}
																		else
																			{	/* R5rs/syntax.scm 536 */
																				obj_t BgL_head1138z00_1877;

																				{	/* R5rs/syntax.scm 536 */
																					obj_t BgL_arg1857z00_1893;

																					{	/* R5rs/syntax.scm 536 */
																						obj_t BgL_arg1858z00_1894;
																						obj_t BgL_arg1859z00_1895;

																						BgL_arg1858z00_1894 =
																							CAR(BgL_ll1136z00_1874);
																						BgL_arg1859z00_1895 =
																							CAR(((obj_t) BgL_ll1137z00_1875));
																						BgL_arg1857z00_1893 =
																							MAKE_YOUNG_PAIR
																							(BgL_arg1858z00_1894,
																							BgL_arg1859z00_1895);
																					}
																					BgL_head1138z00_1877 =
																						MAKE_YOUNG_PAIR(BgL_arg1857z00_1893,
																						BNIL);
																				}
																				{	/* R5rs/syntax.scm 536 */
																					obj_t BgL_g1142z00_1878;
																					obj_t BgL_g1143z00_1879;

																					BgL_g1142z00_1878 =
																						CDR(BgL_ll1136z00_1874);
																					BgL_g1143z00_1879 =
																						CDR(((obj_t) BgL_ll1137z00_1875));
																					{
																						obj_t BgL_ll1136z00_2936;
																						obj_t BgL_ll1137z00_2937;
																						obj_t BgL_tail1139z00_2938;

																						BgL_ll1136z00_2936 =
																							BgL_g1142z00_1878;
																						BgL_ll1137z00_2937 =
																							BgL_g1143z00_1879;
																						BgL_tail1139z00_2938 =
																							BgL_head1138z00_1877;
																					BgL_zc3z04anonymousza31848ze3z87_2935:
																						if (NULLP
																							(BgL_ll1136z00_2936))
																							{	/* R5rs/syntax.scm 536 */
																								BgL_arg1846z00_1873 =
																									BgL_head1138z00_1877;
																							}
																						else
																							{	/* R5rs/syntax.scm 536 */
																								obj_t BgL_newtail1140z00_2947;

																								{	/* R5rs/syntax.scm 536 */
																									obj_t BgL_arg1853z00_2948;

																									{	/* R5rs/syntax.scm 536 */
																										obj_t BgL_arg1854z00_2949;
																										obj_t BgL_arg1856z00_2950;

																										BgL_arg1854z00_2949 =
																											CAR(
																											((obj_t)
																												BgL_ll1136z00_2936));
																										BgL_arg1856z00_2950 =
																											CAR(((obj_t)
																												BgL_ll1137z00_2937));
																										BgL_arg1853z00_2948 =
																											MAKE_YOUNG_PAIR
																											(BgL_arg1854z00_2949,
																											BgL_arg1856z00_2950);
																									}
																									BgL_newtail1140z00_2947 =
																										MAKE_YOUNG_PAIR
																										(BgL_arg1853z00_2948, BNIL);
																								}
																								SET_CDR(BgL_tail1139z00_2938,
																									BgL_newtail1140z00_2947);
																								{	/* R5rs/syntax.scm 536 */
																									obj_t BgL_arg1851z00_2951;
																									obj_t BgL_arg1852z00_2952;

																									BgL_arg1851z00_2951 =
																										CDR(
																										((obj_t)
																											BgL_ll1136z00_2936));
																									BgL_arg1852z00_2952 =
																										CDR(((obj_t)
																											BgL_ll1137z00_2937));
																									{
																										obj_t BgL_tail1139z00_5143;
																										obj_t BgL_ll1137z00_5142;
																										obj_t BgL_ll1136z00_5141;

																										BgL_ll1136z00_5141 =
																											BgL_arg1851z00_2951;
																										BgL_ll1137z00_5142 =
																											BgL_arg1852z00_2952;
																										BgL_tail1139z00_5143 =
																											BgL_newtail1140z00_2947;
																										BgL_tail1139z00_2938 =
																											BgL_tail1139z00_5143;
																										BgL_ll1137z00_2937 =
																											BgL_ll1137z00_5142;
																										BgL_ll1136z00_2936 =
																											BgL_ll1136z00_5141;
																										goto
																											BgL_zc3z04anonymousza31848ze3z87_2935;
																									}
																								}
																							}
																					}
																				}
																			}
																	}
																	BgL_nenvz00_1870 =
																		BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
																		(BgL_arg1846z00_1873, BgL_envz00_44);
																}
																{	/* R5rs/syntax.scm 536 */

																	{	/* R5rs/syntax.scm 538 */
																		obj_t BgL_arg1842z00_1871;

																		BgL_arg1842z00_1871 =
																			MAKE_YOUNG_PAIR(BgL_nvarsz00_1869,
																			BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																			(BgL_nenvz00_1870, BgL_bodyz00_1598));
																		return
																			MAKE_YOUNG_PAIR
																			(BGl_symbol2462z00zz__r5_macro_4_3_syntaxz00,
																			BgL_arg1842z00_1871);
																	}
																}
															}
														}
													}
												else
													{	/* R5rs/syntax.scm 524 */
														BGL_TAIL return
															BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
															(BgL_envz00_44, BgL_xz00_43);
													}
											}
										else
											{	/* R5rs/syntax.scm 524 */
												if (
													(CAR(
															((obj_t) BgL_xz00_43)) ==
														BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00))
													{	/* R5rs/syntax.scm 524 */
														if (PAIRP(BgL_cdrzd2271zd2_1624))
															{	/* R5rs/syntax.scm 524 */
																obj_t BgL_carzd2316zd2_1634;
																obj_t BgL_cdrzd2317zd2_1635;

																BgL_carzd2316zd2_1634 =
																	CAR(BgL_cdrzd2271zd2_1624);
																BgL_cdrzd2317zd2_1635 =
																	CDR(BgL_cdrzd2271zd2_1624);
																if (SYMBOLP(BgL_carzd2316zd2_1634))
																	{	/* R5rs/syntax.scm 524 */
																		if (PAIRP(BgL_cdrzd2317zd2_1635))
																			{	/* R5rs/syntax.scm 524 */
																				BgL_loopz00_1600 =
																					BgL_carzd2316zd2_1634;
																				BgL_bindingsz00_1601 =
																					CAR(BgL_cdrzd2317zd2_1635);
																				BgL_bodyz00_1602 =
																					CDR(BgL_cdrzd2317zd2_1635);
																				{	/* R5rs/syntax.scm 540 */
																					obj_t BgL_nloopz00_1896;

																					BgL_nloopz00_1896 =
																						BGl_genvarsz00zz__r5_macro_4_3_syntaxz00
																						(BgL_loopz00_1600);
																					{	/* R5rs/syntax.scm 540 */
																						obj_t BgL_nvarsz00_1897;

																						{	/* R5rs/syntax.scm 541 */
																							obj_t BgL_arg1889z00_1945;

																							if (NULLP(BgL_bindingsz00_1601))
																								{	/* R5rs/syntax.scm 541 */
																									BgL_arg1889z00_1945 = BNIL;
																								}
																							else
																								{	/* R5rs/syntax.scm 541 */
																									obj_t BgL_head1146z00_1948;

																									{	/* R5rs/syntax.scm 541 */
																										obj_t BgL_arg1897z00_1960;

																										{	/* R5rs/syntax.scm 541 */
																											obj_t BgL_pairz00_2959;

																											BgL_pairz00_2959 =
																												CAR(
																												((obj_t)
																													BgL_bindingsz00_1601));
																											BgL_arg1897z00_1960 =
																												CAR(BgL_pairz00_2959);
																										}
																										BgL_head1146z00_1948 =
																											MAKE_YOUNG_PAIR
																											(BgL_arg1897z00_1960,
																											BNIL);
																									}
																									{	/* R5rs/syntax.scm 541 */
																										obj_t BgL_g1149z00_1949;

																										BgL_g1149z00_1949 =
																											CDR(
																											((obj_t)
																												BgL_bindingsz00_1601));
																										{
																											obj_t BgL_l1144z00_2980;
																											obj_t
																												BgL_tail1147z00_2981;
																											BgL_l1144z00_2980 =
																												BgL_g1149z00_1949;
																											BgL_tail1147z00_2981 =
																												BgL_head1146z00_1948;
																										BgL_zc3z04anonymousza31891ze3z87_2979:
																											if (NULLP
																												(BgL_l1144z00_2980))
																												{	/* R5rs/syntax.scm 541 */
																													BgL_arg1889z00_1945 =
																														BgL_head1146z00_1948;
																												}
																											else
																												{	/* R5rs/syntax.scm 541 */
																													obj_t
																														BgL_newtail1148z00_2988;
																													{	/* R5rs/syntax.scm 541 */
																														obj_t
																															BgL_arg1894z00_2989;
																														{	/* R5rs/syntax.scm 541 */
																															obj_t
																																BgL_pairz00_2993;
																															BgL_pairz00_2993 =
																																CAR(((obj_t)
																																	BgL_l1144z00_2980));
																															BgL_arg1894z00_2989
																																=
																																CAR
																																(BgL_pairz00_2993);
																														}
																														BgL_newtail1148z00_2988
																															=
																															MAKE_YOUNG_PAIR
																															(BgL_arg1894z00_2989,
																															BNIL);
																													}
																													SET_CDR
																														(BgL_tail1147z00_2981,
																														BgL_newtail1148z00_2988);
																													{	/* R5rs/syntax.scm 541 */
																														obj_t
																															BgL_arg1893z00_2991;
																														BgL_arg1893z00_2991
																															=
																															CDR(((obj_t)
																																BgL_l1144z00_2980));
																														{
																															obj_t
																																BgL_tail1147z00_5182;
																															obj_t
																																BgL_l1144z00_5181;
																															BgL_l1144z00_5181
																																=
																																BgL_arg1893z00_2991;
																															BgL_tail1147z00_5182
																																=
																																BgL_newtail1148z00_2988;
																															BgL_tail1147z00_2981
																																=
																																BgL_tail1147z00_5182;
																															BgL_l1144z00_2980
																																=
																																BgL_l1144z00_5181;
																															goto
																																BgL_zc3z04anonymousza31891ze3z87_2979;
																														}
																													}
																												}
																										}
																									}
																								}
																							BgL_nvarsz00_1897 =
																								BGl_genvarsz00zz__r5_macro_4_3_syntaxz00
																								(BgL_arg1889z00_1945);
																						}
																						{	/* R5rs/syntax.scm 541 */
																							obj_t BgL_nenvz00_1898;

																							{	/* R5rs/syntax.scm 542 */
																								obj_t BgL_arg1878z00_1924;
																								obj_t BgL_arg1879z00_1925;

																								BgL_arg1878z00_1924 =
																									MAKE_YOUNG_PAIR
																									(BgL_loopz00_1600,
																									BgL_nloopz00_1896);
																								{	/* R5rs/syntax.scm 543 */
																									obj_t BgL_arg1881z00_1926;

																									if (NULLP
																										(BgL_bindingsz00_1601))
																										{	/* R5rs/syntax.scm 543 */
																											BgL_arg1881z00_1926 =
																												BNIL;
																										}
																									else
																										{	/* R5rs/syntax.scm 543 */
																											obj_t
																												BgL_head1152z00_1930;
																											BgL_head1152z00_1930 =
																												MAKE_YOUNG_PAIR(BNIL,
																												BNIL);
																											{
																												obj_t
																													BgL_ll1150z00_3027;
																												obj_t
																													BgL_ll1151z00_3028;
																												obj_t
																													BgL_tail1153z00_3029;
																												BgL_ll1150z00_3027 =
																													BgL_bindingsz00_1601;
																												BgL_ll1151z00_3028 =
																													BgL_nvarsz00_1897;
																												BgL_tail1153z00_3029 =
																													BgL_head1152z00_1930;
																											BgL_zc3z04anonymousza31883ze3z87_3026:
																												if (NULLP
																													(BgL_ll1150z00_3027))
																													{	/* R5rs/syntax.scm 543 */
																														BgL_arg1881z00_1926
																															=
																															CDR
																															(BgL_head1152z00_1930);
																													}
																												else
																													{	/* R5rs/syntax.scm 543 */
																														obj_t
																															BgL_newtail1154z00_3039;
																														{	/* R5rs/syntax.scm 543 */
																															obj_t
																																BgL_arg1887z00_3040;
																															{	/* R5rs/syntax.scm 543 */
																																obj_t
																																	BgL_bz00_3041;
																																obj_t
																																	BgL_vz00_3042;
																																BgL_bz00_3041 =
																																	CAR(((obj_t)
																																		BgL_ll1150z00_3027));
																																BgL_vz00_3042 =
																																	CAR(((obj_t)
																																		BgL_ll1151z00_3028));
																																{	/* R5rs/syntax.scm 544 */
																																	obj_t
																																		BgL_arg1888z00_3043;
																																	BgL_arg1888z00_3043
																																		=
																																		CAR(((obj_t)
																																			BgL_bz00_3041));
																																	BgL_arg1887z00_3040
																																		=
																																		MAKE_YOUNG_PAIR
																																		(BgL_arg1888z00_3043,
																																		BgL_vz00_3042);
																																}
																															}
																															BgL_newtail1154z00_3039
																																=
																																MAKE_YOUNG_PAIR
																																(BgL_arg1887z00_3040,
																																BNIL);
																														}
																														SET_CDR
																															(BgL_tail1153z00_3029,
																															BgL_newtail1154z00_3039);
																														{	/* R5rs/syntax.scm 543 */
																															obj_t
																																BgL_arg1885z00_3044;
																															obj_t
																																BgL_arg1886z00_3045;
																															BgL_arg1885z00_3044
																																=
																																CDR(((obj_t)
																																	BgL_ll1150z00_3027));
																															BgL_arg1886z00_3045
																																=
																																CDR(((obj_t)
																																	BgL_ll1151z00_3028));
																															{
																																obj_t
																																	BgL_tail1153z00_5206;
																																obj_t
																																	BgL_ll1151z00_5205;
																																obj_t
																																	BgL_ll1150z00_5204;
																																BgL_ll1150z00_5204
																																	=
																																	BgL_arg1885z00_3044;
																																BgL_ll1151z00_5205
																																	=
																																	BgL_arg1886z00_3045;
																																BgL_tail1153z00_5206
																																	=
																																	BgL_newtail1154z00_3039;
																																BgL_tail1153z00_3029
																																	=
																																	BgL_tail1153z00_5206;
																																BgL_ll1151z00_3028
																																	=
																																	BgL_ll1151z00_5205;
																																BgL_ll1150z00_3027
																																	=
																																	BgL_ll1150z00_5204;
																																goto
																																	BgL_zc3z04anonymousza31883ze3z87_3026;
																															}
																														}
																													}
																											}
																										}
																									BgL_arg1879z00_1925 =
																										BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
																										(BgL_arg1881z00_1926,
																										BgL_envz00_44);
																								}
																								BgL_nenvz00_1898 =
																									MAKE_YOUNG_PAIR
																									(BgL_arg1878z00_1924,
																									BgL_arg1879z00_1925);
																							}
																							{	/* R5rs/syntax.scm 542 */

																								{	/* R5rs/syntax.scm 547 */
																									obj_t BgL_arg1860z00_1899;

																									{	/* R5rs/syntax.scm 547 */
																										obj_t BgL_arg1861z00_1900;

																										{	/* R5rs/syntax.scm 547 */
																											obj_t BgL_arg1862z00_1901;
																											obj_t BgL_arg1863z00_1902;

																											if (NULLP
																												(BgL_bindingsz00_1601))
																												{	/* R5rs/syntax.scm 547 */
																													BgL_arg1862z00_1901 =
																														BNIL;
																												}
																											else
																												{	/* R5rs/syntax.scm 547 */
																													obj_t
																														BgL_head1158z00_1906;
																													BgL_head1158z00_1906 =
																														MAKE_YOUNG_PAIR
																														(BNIL, BNIL);
																													{
																														obj_t
																															BgL_ll1156z00_1908;
																														obj_t
																															BgL_ll1157z00_1909;
																														obj_t
																															BgL_tail1159z00_1910;
																														BgL_ll1156z00_1908 =
																															BgL_bindingsz00_1601;
																														BgL_ll1157z00_1909 =
																															BgL_nvarsz00_1897;
																														BgL_tail1159z00_1910
																															=
																															BgL_head1158z00_1906;
																													BgL_zc3z04anonymousza31865ze3z87_1911:
																														if (NULLP
																															(BgL_ll1156z00_1908))
																															{	/* R5rs/syntax.scm 547 */
																																BgL_arg1862z00_1901
																																	=
																																	CDR
																																	(BgL_head1158z00_1906);
																															}
																														else
																															{	/* R5rs/syntax.scm 547 */
																																obj_t
																																	BgL_newtail1160z00_1913;
																																{	/* R5rs/syntax.scm 547 */
																																	obj_t
																																		BgL_arg1869z00_1916;
																																	{	/* R5rs/syntax.scm 547 */
																																		obj_t
																																			BgL_bz00_1917;
																																		obj_t
																																			BgL_vz00_1918;
																																		BgL_bz00_1917
																																			=
																																			CAR((
																																				(obj_t)
																																				BgL_ll1156z00_1908));
																																		BgL_vz00_1918
																																			=
																																			CAR((
																																				(obj_t)
																																				BgL_ll1157z00_1909));
																																		{	/* R5rs/syntax.scm 548 */
																																			obj_t
																																				BgL_arg1870z00_1919;
																																			{	/* R5rs/syntax.scm 548 */
																																				obj_t
																																					BgL_arg1876z00_1922;
																																				{	/* R5rs/syntax.scm 548 */
																																					obj_t
																																						BgL_pairz00_3059;
																																					BgL_pairz00_3059
																																						=
																																						CDR(
																																						((obj_t) BgL_bz00_1917));
																																					BgL_arg1876z00_1922
																																						=
																																						CAR
																																						(BgL_pairz00_3059);
																																				}
																																				BgL_arg1870z00_1919
																																					=
																																					BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00
																																					(BgL_arg1876z00_1922,
																																					BgL_envz00_44);
																																			}
																																			{	/* R5rs/syntax.scm 548 */
																																				obj_t
																																					BgL_list1871z00_1920;
																																				{	/* R5rs/syntax.scm 548 */
																																					obj_t
																																						BgL_arg1873z00_1921;
																																					BgL_arg1873z00_1921
																																						=
																																						MAKE_YOUNG_PAIR
																																						(BgL_arg1870z00_1919,
																																						BNIL);
																																					BgL_list1871z00_1920
																																						=
																																						MAKE_YOUNG_PAIR
																																						(BgL_vz00_1918,
																																						BgL_arg1873z00_1921);
																																				}
																																				BgL_arg1869z00_1916
																																					=
																																					BgL_list1871z00_1920;
																																			}
																																		}
																																	}
																																	BgL_newtail1160z00_1913
																																		=
																																		MAKE_YOUNG_PAIR
																																		(BgL_arg1869z00_1916,
																																		BNIL);
																																}
																																SET_CDR
																																	(BgL_tail1159z00_1910,
																																	BgL_newtail1160z00_1913);
																																{	/* R5rs/syntax.scm 547 */
																																	obj_t
																																		BgL_arg1867z00_1914;
																																	obj_t
																																		BgL_arg1868z00_1915;
																																	BgL_arg1867z00_1914
																																		=
																																		CDR(((obj_t)
																																			BgL_ll1156z00_1908));
																																	BgL_arg1868z00_1915
																																		=
																																		CDR(((obj_t)
																																			BgL_ll1157z00_1909));
																																	{
																																		obj_t
																																			BgL_tail1159z00_5233;
																																		obj_t
																																			BgL_ll1157z00_5232;
																																		obj_t
																																			BgL_ll1156z00_5231;
																																		BgL_ll1156z00_5231
																																			=
																																			BgL_arg1867z00_1914;
																																		BgL_ll1157z00_5232
																																			=
																																			BgL_arg1868z00_1915;
																																		BgL_tail1159z00_5233
																																			=
																																			BgL_newtail1160z00_1913;
																																		BgL_tail1159z00_1910
																																			=
																																			BgL_tail1159z00_5233;
																																		BgL_ll1157z00_1909
																																			=
																																			BgL_ll1157z00_5232;
																																		BgL_ll1156z00_1908
																																			=
																																			BgL_ll1156z00_5231;
																																		goto
																																			BgL_zc3z04anonymousza31865ze3z87_1911;
																																	}
																																}
																															}
																													}
																												}
																											BgL_arg1863z00_1902 =
																												BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																												(BgL_nenvz00_1898,
																												BgL_bodyz00_1602);
																											BgL_arg1861z00_1900 =
																												MAKE_YOUNG_PAIR
																												(BgL_arg1862z00_1901,
																												BgL_arg1863z00_1902);
																										}
																										BgL_arg1860z00_1899 =
																											MAKE_YOUNG_PAIR
																											(BgL_nloopz00_1896,
																											BgL_arg1861z00_1900);
																									}
																									return
																										MAKE_YOUNG_PAIR
																										(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
																										BgL_arg1860z00_1899);
																								}
																							}
																						}
																					}
																				}
																			}
																		else
																			{	/* R5rs/syntax.scm 524 */
																				obj_t BgL_cdrzd2333zd2_1640;

																				BgL_cdrzd2333zd2_1640 =
																					CDR(((obj_t) BgL_xz00_43));
																				{	/* R5rs/syntax.scm 524 */
																					obj_t BgL_arg1610z00_1641;
																					obj_t BgL_arg1612z00_1642;

																					BgL_arg1610z00_1641 =
																						CAR(
																						((obj_t) BgL_cdrzd2333zd2_1640));
																					BgL_arg1612z00_1642 =
																						CDR(
																						((obj_t) BgL_cdrzd2333zd2_1640));
																					BgL_bindingsz00_1604 =
																						BgL_arg1610z00_1641;
																					BgL_bodyz00_1605 =
																						BgL_arg1612z00_1642;
																				BgL_tagzd2238zd2_1606:
																					{	/* R5rs/syntax.scm 552 */
																						obj_t BgL_nvarsz00_1962;

																						{	/* R5rs/syntax.scm 552 */
																							obj_t BgL_arg1926z00_2007;

																							if (NULLP(BgL_bindingsz00_1604))
																								{	/* R5rs/syntax.scm 552 */
																									BgL_arg1926z00_2007 = BNIL;
																								}
																							else
																								{	/* R5rs/syntax.scm 552 */
																									obj_t BgL_head1164z00_2010;

																									{	/* R5rs/syntax.scm 552 */
																										obj_t BgL_arg1934z00_2022;

																										{	/* R5rs/syntax.scm 552 */
																											obj_t BgL_pairz00_3065;

																											BgL_pairz00_3065 =
																												CAR(
																												((obj_t)
																													BgL_bindingsz00_1604));
																											BgL_arg1934z00_2022 =
																												CAR(BgL_pairz00_3065);
																										}
																										BgL_head1164z00_2010 =
																											MAKE_YOUNG_PAIR
																											(BgL_arg1934z00_2022,
																											BNIL);
																									}
																									{	/* R5rs/syntax.scm 552 */
																										obj_t BgL_g1167z00_2011;

																										BgL_g1167z00_2011 =
																											CDR(
																											((obj_t)
																												BgL_bindingsz00_1604));
																										{
																											obj_t BgL_l1162z00_3086;
																											obj_t
																												BgL_tail1165z00_3087;
																											BgL_l1162z00_3086 =
																												BgL_g1167z00_2011;
																											BgL_tail1165z00_3087 =
																												BgL_head1164z00_2010;
																										BgL_zc3z04anonymousza31928ze3z87_3085:
																											if (NULLP
																												(BgL_l1162z00_3086))
																												{	/* R5rs/syntax.scm 552 */
																													BgL_arg1926z00_2007 =
																														BgL_head1164z00_2010;
																												}
																											else
																												{	/* R5rs/syntax.scm 552 */
																													obj_t
																														BgL_newtail1166z00_3094;
																													{	/* R5rs/syntax.scm 552 */
																														obj_t
																															BgL_arg1932z00_3095;
																														{	/* R5rs/syntax.scm 552 */
																															obj_t
																																BgL_pairz00_3099;
																															BgL_pairz00_3099 =
																																CAR(((obj_t)
																																	BgL_l1162z00_3086));
																															BgL_arg1932z00_3095
																																=
																																CAR
																																(BgL_pairz00_3099);
																														}
																														BgL_newtail1166z00_3094
																															=
																															MAKE_YOUNG_PAIR
																															(BgL_arg1932z00_3095,
																															BNIL);
																													}
																													SET_CDR
																														(BgL_tail1165z00_3087,
																														BgL_newtail1166z00_3094);
																													{	/* R5rs/syntax.scm 552 */
																														obj_t
																															BgL_arg1931z00_3097;
																														BgL_arg1931z00_3097
																															=
																															CDR(((obj_t)
																																BgL_l1162z00_3086));
																														{
																															obj_t
																																BgL_tail1165z00_5264;
																															obj_t
																																BgL_l1162z00_5263;
																															BgL_l1162z00_5263
																																=
																																BgL_arg1931z00_3097;
																															BgL_tail1165z00_5264
																																=
																																BgL_newtail1166z00_3094;
																															BgL_tail1165z00_3087
																																=
																																BgL_tail1165z00_5264;
																															BgL_l1162z00_3086
																																=
																																BgL_l1162z00_5263;
																															goto
																																BgL_zc3z04anonymousza31928ze3z87_3085;
																														}
																													}
																												}
																										}
																									}
																								}
																							BgL_nvarsz00_1962 =
																								BGl_genvarsz00zz__r5_macro_4_3_syntaxz00
																								(BgL_arg1926z00_2007);
																						}
																						{	/* R5rs/syntax.scm 552 */
																							obj_t BgL_nenvz00_1963;

																							{	/* R5rs/syntax.scm 553 */
																								obj_t BgL_arg1918z00_1988;

																								if (NULLP(BgL_bindingsz00_1604))
																									{	/* R5rs/syntax.scm 553 */
																										BgL_arg1918z00_1988 = BNIL;
																									}
																								else
																									{	/* R5rs/syntax.scm 553 */
																										obj_t BgL_head1170z00_1992;

																										BgL_head1170z00_1992 =
																											MAKE_YOUNG_PAIR(BNIL,
																											BNIL);
																										{
																											obj_t BgL_ll1168z00_3133;
																											obj_t BgL_ll1169z00_3134;
																											obj_t
																												BgL_tail1171z00_3135;
																											BgL_ll1168z00_3133 =
																												BgL_bindingsz00_1604;
																											BgL_ll1169z00_3134 =
																												BgL_nvarsz00_1962;
																											BgL_tail1171z00_3135 =
																												BgL_head1170z00_1992;
																										BgL_zc3z04anonymousza31920ze3z87_3132:
																											if (NULLP
																												(BgL_ll1168z00_3133))
																												{	/* R5rs/syntax.scm 553 */
																													BgL_arg1918z00_1988 =
																														CDR
																														(BgL_head1170z00_1992);
																												}
																											else
																												{	/* R5rs/syntax.scm 553 */
																													obj_t
																														BgL_newtail1172z00_3145;
																													{	/* R5rs/syntax.scm 553 */
																														obj_t
																															BgL_arg1924z00_3146;
																														{	/* R5rs/syntax.scm 553 */
																															obj_t
																																BgL_bz00_3147;
																															obj_t
																																BgL_vz00_3148;
																															BgL_bz00_3147 =
																																CAR(((obj_t)
																																	BgL_ll1168z00_3133));
																															BgL_vz00_3148 =
																																CAR(((obj_t)
																																	BgL_ll1169z00_3134));
																															{	/* R5rs/syntax.scm 554 */
																																obj_t
																																	BgL_arg1925z00_3149;
																																BgL_arg1925z00_3149
																																	=
																																	CAR(((obj_t)
																																		BgL_bz00_3147));
																																BgL_arg1924z00_3146
																																	=
																																	MAKE_YOUNG_PAIR
																																	(BgL_arg1925z00_3149,
																																	BgL_vz00_3148);
																															}
																														}
																														BgL_newtail1172z00_3145
																															=
																															MAKE_YOUNG_PAIR
																															(BgL_arg1924z00_3146,
																															BNIL);
																													}
																													SET_CDR
																														(BgL_tail1171z00_3135,
																														BgL_newtail1172z00_3145);
																													{	/* R5rs/syntax.scm 553 */
																														obj_t
																															BgL_arg1922z00_3150;
																														obj_t
																															BgL_arg1923z00_3151;
																														BgL_arg1922z00_3150
																															=
																															CDR(((obj_t)
																																BgL_ll1168z00_3133));
																														BgL_arg1923z00_3151
																															=
																															CDR(((obj_t)
																																BgL_ll1169z00_3134));
																														{
																															obj_t
																																BgL_tail1171z00_5287;
																															obj_t
																																BgL_ll1169z00_5286;
																															obj_t
																																BgL_ll1168z00_5285;
																															BgL_ll1168z00_5285
																																=
																																BgL_arg1922z00_3150;
																															BgL_ll1169z00_5286
																																=
																																BgL_arg1923z00_3151;
																															BgL_tail1171z00_5287
																																=
																																BgL_newtail1172z00_3145;
																															BgL_tail1171z00_3135
																																=
																																BgL_tail1171z00_5287;
																															BgL_ll1169z00_3134
																																=
																																BgL_ll1169z00_5286;
																															BgL_ll1168z00_3133
																																=
																																BgL_ll1168z00_5285;
																															goto
																																BgL_zc3z04anonymousza31920ze3z87_3132;
																														}
																													}
																												}
																										}
																									}
																								BgL_nenvz00_1963 =
																									BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
																									(BgL_arg1918z00_1988,
																									BgL_envz00_44);
																							}
																							{	/* R5rs/syntax.scm 553 */

																								{	/* R5rs/syntax.scm 557 */
																									obj_t BgL_arg1899z00_1964;

																									{	/* R5rs/syntax.scm 557 */
																										obj_t BgL_arg1901z00_1965;
																										obj_t BgL_arg1903z00_1966;

																										if (NULLP
																											(BgL_bindingsz00_1604))
																											{	/* R5rs/syntax.scm 557 */
																												BgL_arg1901z00_1965 =
																													BNIL;
																											}
																										else
																											{	/* R5rs/syntax.scm 557 */
																												obj_t
																													BgL_head1176z00_1970;
																												BgL_head1176z00_1970 =
																													MAKE_YOUNG_PAIR(BNIL,
																													BNIL);
																												{
																													obj_t
																														BgL_ll1174z00_1972;
																													obj_t
																														BgL_ll1175z00_1973;
																													obj_t
																														BgL_tail1177z00_1974;
																													BgL_ll1174z00_1972 =
																														BgL_bindingsz00_1604;
																													BgL_ll1175z00_1973 =
																														BgL_nvarsz00_1962;
																													BgL_tail1177z00_1974 =
																														BgL_head1176z00_1970;
																												BgL_zc3z04anonymousza31905ze3z87_1975:
																													if (NULLP
																														(BgL_ll1174z00_1972))
																														{	/* R5rs/syntax.scm 557 */
																															BgL_arg1901z00_1965
																																=
																																CDR
																																(BgL_head1176z00_1970);
																														}
																													else
																														{	/* R5rs/syntax.scm 557 */
																															obj_t
																																BgL_newtail1178z00_1977;
																															{	/* R5rs/syntax.scm 557 */
																																obj_t
																																	BgL_arg1911z00_1980;
																																{	/* R5rs/syntax.scm 557 */
																																	obj_t
																																		BgL_bz00_1981;
																																	obj_t
																																		BgL_vz00_1982;
																																	BgL_bz00_1981
																																		=
																																		CAR(((obj_t)
																																			BgL_ll1174z00_1972));
																																	BgL_vz00_1982
																																		=
																																		CAR(((obj_t)
																																			BgL_ll1175z00_1973));
																																	{	/* R5rs/syntax.scm 558 */
																																		obj_t
																																			BgL_arg1914z00_1983;
																																		{	/* R5rs/syntax.scm 558 */
																																			obj_t
																																				BgL_arg1917z00_1986;
																																			{	/* R5rs/syntax.scm 558 */
																																				obj_t
																																					BgL_pairz00_3165;
																																				BgL_pairz00_3165
																																					=
																																					CDR((
																																						(obj_t)
																																						BgL_bz00_1981));
																																				BgL_arg1917z00_1986
																																					=
																																					CAR
																																					(BgL_pairz00_3165);
																																			}
																																			BgL_arg1914z00_1983
																																				=
																																				BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00
																																				(BgL_arg1917z00_1986,
																																				BgL_envz00_44);
																																		}
																																		{	/* R5rs/syntax.scm 558 */
																																			obj_t
																																				BgL_list1915z00_1984;
																																			{	/* R5rs/syntax.scm 558 */
																																				obj_t
																																					BgL_arg1916z00_1985;
																																				BgL_arg1916z00_1985
																																					=
																																					MAKE_YOUNG_PAIR
																																					(BgL_arg1914z00_1983,
																																					BNIL);
																																				BgL_list1915z00_1984
																																					=
																																					MAKE_YOUNG_PAIR
																																					(BgL_vz00_1982,
																																					BgL_arg1916z00_1985);
																																			}
																																			BgL_arg1911z00_1980
																																				=
																																				BgL_list1915z00_1984;
																																		}
																																	}
																																}
																																BgL_newtail1178z00_1977
																																	=
																																	MAKE_YOUNG_PAIR
																																	(BgL_arg1911z00_1980,
																																	BNIL);
																															}
																															SET_CDR
																																(BgL_tail1177z00_1974,
																																BgL_newtail1178z00_1977);
																															{	/* R5rs/syntax.scm 557 */
																																obj_t
																																	BgL_arg1907z00_1978;
																																obj_t
																																	BgL_arg1908z00_1979;
																																BgL_arg1907z00_1978
																																	=
																																	CDR(((obj_t)
																																		BgL_ll1174z00_1972));
																																BgL_arg1908z00_1979
																																	=
																																	CDR(((obj_t)
																																		BgL_ll1175z00_1973));
																																{
																																	obj_t
																																		BgL_tail1177z00_5313;
																																	obj_t
																																		BgL_ll1175z00_5312;
																																	obj_t
																																		BgL_ll1174z00_5311;
																																	BgL_ll1174z00_5311
																																		=
																																		BgL_arg1907z00_1978;
																																	BgL_ll1175z00_5312
																																		=
																																		BgL_arg1908z00_1979;
																																	BgL_tail1177z00_5313
																																		=
																																		BgL_newtail1178z00_1977;
																																	BgL_tail1177z00_1974
																																		=
																																		BgL_tail1177z00_5313;
																																	BgL_ll1175z00_1973
																																		=
																																		BgL_ll1175z00_5312;
																																	BgL_ll1174z00_1972
																																		=
																																		BgL_ll1174z00_5311;
																																	goto
																																		BgL_zc3z04anonymousza31905ze3z87_1975;
																																}
																															}
																														}
																												}
																											}
																										BgL_arg1903z00_1966 =
																											BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																											(BgL_nenvz00_1963,
																											BgL_bodyz00_1605);
																										BgL_arg1899z00_1964 =
																											MAKE_YOUNG_PAIR
																											(BgL_arg1901z00_1965,
																											BgL_arg1903z00_1966);
																									}
																									return
																										MAKE_YOUNG_PAIR
																										(BGl_symbol2378z00zz__r5_macro_4_3_syntaxz00,
																										BgL_arg1899z00_1964);
																								}
																							}
																						}
																					}
																				}
																			}
																	}
																else
																	{	/* R5rs/syntax.scm 524 */
																		obj_t BgL_cdrzd2349zd2_1643;

																		BgL_cdrzd2349zd2_1643 =
																			CDR(((obj_t) BgL_xz00_43));
																		{	/* R5rs/syntax.scm 524 */
																			obj_t BgL_arg1613z00_1644;
																			obj_t BgL_arg1614z00_1645;

																			BgL_arg1613z00_1644 =
																				CAR(((obj_t) BgL_cdrzd2349zd2_1643));
																			BgL_arg1614z00_1645 =
																				CDR(((obj_t) BgL_cdrzd2349zd2_1643));
																			{
																				obj_t BgL_bodyz00_5324;
																				obj_t BgL_bindingsz00_5323;

																				BgL_bindingsz00_5323 =
																					BgL_arg1613z00_1644;
																				BgL_bodyz00_5324 = BgL_arg1614z00_1645;
																				BgL_bodyz00_1605 = BgL_bodyz00_5324;
																				BgL_bindingsz00_1604 =
																					BgL_bindingsz00_5323;
																				goto BgL_tagzd2238zd2_1606;
																			}
																		}
																	}
															}
														else
															{	/* R5rs/syntax.scm 524 */
																BGL_TAIL return
																	BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																	(BgL_envz00_44, BgL_xz00_43);
															}
													}
												else
													{	/* R5rs/syntax.scm 524 */
														obj_t BgL_cdrzd2388zd2_1646;

														BgL_cdrzd2388zd2_1646 = CDR(((obj_t) BgL_xz00_43));
														if (
															(CAR(
																	((obj_t) BgL_xz00_43)) ==
																BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00))
															{	/* R5rs/syntax.scm 524 */
																if (PAIRP(BgL_cdrzd2388zd2_1646))
																	{	/* R5rs/syntax.scm 524 */
																		BgL_bindingsz00_1607 =
																			CAR(BgL_cdrzd2388zd2_1646);
																		BgL_bodyz00_1608 =
																			CDR(BgL_cdrzd2388zd2_1646);
																		{
																			obj_t BgL_bindingsz00_2026;
																			obj_t BgL_nbindingsz00_2027;
																			obj_t BgL_nenvz00_2028;

																			BgL_bindingsz00_2026 =
																				BgL_bindingsz00_1607;
																			BgL_nbindingsz00_2027 = BNIL;
																			BgL_nenvz00_2028 = BgL_envz00_44;
																		BgL_zc3z04anonymousza31936ze3z87_2029:
																			if (NULLP(BgL_bindingsz00_2026))
																				{	/* R5rs/syntax.scm 566 */
																					obj_t BgL_arg1938z00_2031;

																					BgL_arg1938z00_2031 =
																						MAKE_YOUNG_PAIR(bgl_reverse
																						(BgL_nbindingsz00_2027),
																						BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																						(BgL_nenvz00_2028,
																							BgL_bodyz00_1608));
																					return
																						MAKE_YOUNG_PAIR
																						(BGl_symbol2475z00zz__r5_macro_4_3_syntaxz00,
																						BgL_arg1938z00_2031);
																				}
																			else
																				{	/* R5rs/syntax.scm 567 */
																					obj_t BgL_varz00_2034;

																					{	/* R5rs/syntax.scm 567 */
																						obj_t BgL_pairz00_3173;

																						BgL_pairz00_3173 =
																							CAR(
																							((obj_t) BgL_bindingsz00_2026));
																						BgL_varz00_2034 =
																							CAR(BgL_pairz00_3173);
																					}
																					{	/* R5rs/syntax.scm 568 */
																						obj_t BgL_nvarz00_2036;

																						BgL_nvarz00_2036 =
																							BGl_genvarsz00zz__r5_macro_4_3_syntaxz00
																							(BgL_varz00_2034);
																						{	/* R5rs/syntax.scm 569 */
																							obj_t BgL_nenvz00_2037;

																							{	/* R5rs/syntax.scm 570 */
																								obj_t BgL_arg1947z00_2044;

																								BgL_arg1947z00_2044 =
																									MAKE_YOUNG_PAIR
																									(BgL_varz00_2034,
																									BgL_nvarz00_2036);
																								BgL_nenvz00_2037 =
																									MAKE_YOUNG_PAIR
																									(BgL_arg1947z00_2044,
																									BgL_envz00_44);
																							}
																							{	/* R5rs/syntax.scm 570 */

																								{	/* R5rs/syntax.scm 571 */
																									obj_t BgL_arg1941z00_2038;
																									obj_t BgL_arg1942z00_2039;

																									BgL_arg1941z00_2038 =
																										CDR(
																										((obj_t)
																											BgL_bindingsz00_2026));
																									{	/* R5rs/syntax.scm 572 */
																										obj_t BgL_arg1943z00_2040;

																										{	/* R5rs/syntax.scm 572 */
																											obj_t BgL_arg1944z00_2041;

																											BgL_arg1944z00_2041 =
																												BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00
																												(BgL_varz00_2034,
																												BgL_envz00_44);
																											{	/* R5rs/syntax.scm 572 */
																												obj_t
																													BgL_list1945z00_2042;
																												{	/* R5rs/syntax.scm 572 */
																													obj_t
																														BgL_arg1946z00_2043;
																													BgL_arg1946z00_2043 =
																														MAKE_YOUNG_PAIR
																														(BgL_arg1944z00_2041,
																														BNIL);
																													BgL_list1945z00_2042 =
																														MAKE_YOUNG_PAIR
																														(BgL_varz00_2034,
																														BgL_arg1946z00_2043);
																												}
																												BgL_arg1943z00_2040 =
																													BgL_list1945z00_2042;
																											}
																										}
																										BgL_arg1942z00_2039 =
																											MAKE_YOUNG_PAIR
																											(BgL_arg1943z00_2040,
																											BgL_nbindingsz00_2027);
																									}
																									{
																										obj_t BgL_nenvz00_5354;
																										obj_t BgL_nbindingsz00_5353;
																										obj_t BgL_bindingsz00_5352;

																										BgL_bindingsz00_5352 =
																											BgL_arg1941z00_2038;
																										BgL_nbindingsz00_5353 =
																											BgL_arg1942z00_2039;
																										BgL_nenvz00_5354 =
																											BgL_nenvz00_2037;
																										BgL_nenvz00_2028 =
																											BgL_nenvz00_5354;
																										BgL_nbindingsz00_2027 =
																											BgL_nbindingsz00_5353;
																										BgL_bindingsz00_2026 =
																											BgL_bindingsz00_5352;
																										goto
																											BgL_zc3z04anonymousza31936ze3z87_2029;
																									}
																								}
																							}
																						}
																					}
																				}
																		}
																	}
																else
																	{	/* R5rs/syntax.scm 524 */
																		BGL_TAIL return
																			BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																			(BgL_envz00_44, BgL_xz00_43);
																	}
															}
														else
															{	/* R5rs/syntax.scm 524 */
																if (
																	(CAR(
																			((obj_t) BgL_xz00_43)) ==
																		BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00))
																	{	/* R5rs/syntax.scm 524 */
																		if (PAIRP(BgL_cdrzd2388zd2_1646))
																			{	/* R5rs/syntax.scm 524 */
																				BgL_bindingsz00_1610 =
																					CAR(BgL_cdrzd2388zd2_1646);
																				BgL_bodyz00_1611 =
																					CDR(BgL_cdrzd2388zd2_1646);
																				{	/* R5rs/syntax.scm 575 */
																					obj_t BgL_nvarsz00_2046;

																					{	/* R5rs/syntax.scm 575 */
																						obj_t BgL_arg1969z00_2091;

																						if (NULLP(BgL_bindingsz00_1610))
																							{	/* R5rs/syntax.scm 575 */
																								BgL_arg1969z00_2091 = BNIL;
																							}
																						else
																							{	/* R5rs/syntax.scm 575 */
																								obj_t BgL_head1182z00_2094;

																								{	/* R5rs/syntax.scm 575 */
																									obj_t BgL_arg1979z00_2106;

																									{	/* R5rs/syntax.scm 575 */
																										obj_t BgL_pairz00_3183;

																										BgL_pairz00_3183 =
																											CAR(
																											((obj_t)
																												BgL_bindingsz00_1610));
																										BgL_arg1979z00_2106 =
																											CAR(BgL_pairz00_3183);
																									}
																									BgL_head1182z00_2094 =
																										MAKE_YOUNG_PAIR
																										(BgL_arg1979z00_2106, BNIL);
																								}
																								{	/* R5rs/syntax.scm 575 */
																									obj_t BgL_g1185z00_2095;

																									BgL_g1185z00_2095 =
																										CDR(
																										((obj_t)
																											BgL_bindingsz00_1610));
																									{
																										obj_t BgL_l1180z00_3204;
																										obj_t BgL_tail1183z00_3205;

																										BgL_l1180z00_3204 =
																											BgL_g1185z00_2095;
																										BgL_tail1183z00_3205 =
																											BgL_head1182z00_2094;
																									BgL_zc3z04anonymousza31971ze3z87_3203:
																										if (NULLP
																											(BgL_l1180z00_3204))
																											{	/* R5rs/syntax.scm 575 */
																												BgL_arg1969z00_2091 =
																													BgL_head1182z00_2094;
																											}
																										else
																											{	/* R5rs/syntax.scm 575 */
																												obj_t
																													BgL_newtail1184z00_3212;
																												{	/* R5rs/syntax.scm 575 */
																													obj_t
																														BgL_arg1977z00_3213;
																													{	/* R5rs/syntax.scm 575 */
																														obj_t
																															BgL_pairz00_3217;
																														BgL_pairz00_3217 =
																															CAR(((obj_t)
																																BgL_l1180z00_3204));
																														BgL_arg1977z00_3213
																															=
																															CAR
																															(BgL_pairz00_3217);
																													}
																													BgL_newtail1184z00_3212
																														=
																														MAKE_YOUNG_PAIR
																														(BgL_arg1977z00_3213,
																														BNIL);
																												}
																												SET_CDR
																													(BgL_tail1183z00_3205,
																													BgL_newtail1184z00_3212);
																												{	/* R5rs/syntax.scm 575 */
																													obj_t
																														BgL_arg1975z00_3215;
																													BgL_arg1975z00_3215 =
																														CDR(((obj_t)
																															BgL_l1180z00_3204));
																													{
																														obj_t
																															BgL_tail1183z00_5382;
																														obj_t
																															BgL_l1180z00_5381;
																														BgL_l1180z00_5381 =
																															BgL_arg1975z00_3215;
																														BgL_tail1183z00_5382
																															=
																															BgL_newtail1184z00_3212;
																														BgL_tail1183z00_3205
																															=
																															BgL_tail1183z00_5382;
																														BgL_l1180z00_3204 =
																															BgL_l1180z00_5381;
																														goto
																															BgL_zc3z04anonymousza31971ze3z87_3203;
																													}
																												}
																											}
																									}
																								}
																							}
																						BgL_nvarsz00_2046 =
																							BGl_genvarsz00zz__r5_macro_4_3_syntaxz00
																							(BgL_arg1969z00_2091);
																					}
																					{	/* R5rs/syntax.scm 575 */
																						obj_t BgL_nenvz00_2047;

																						{	/* R5rs/syntax.scm 576 */
																							obj_t BgL_arg1961z00_2072;

																							if (NULLP(BgL_bindingsz00_1610))
																								{	/* R5rs/syntax.scm 576 */
																									BgL_arg1961z00_2072 = BNIL;
																								}
																							else
																								{	/* R5rs/syntax.scm 576 */
																									obj_t BgL_head1188z00_2076;

																									BgL_head1188z00_2076 =
																										MAKE_YOUNG_PAIR(BNIL, BNIL);
																									{
																										obj_t BgL_ll1186z00_3251;
																										obj_t BgL_ll1187z00_3252;
																										obj_t BgL_tail1189z00_3253;

																										BgL_ll1186z00_3251 =
																											BgL_bindingsz00_1610;
																										BgL_ll1187z00_3252 =
																											BgL_nvarsz00_2046;
																										BgL_tail1189z00_3253 =
																											BgL_head1188z00_2076;
																									BgL_zc3z04anonymousza31963ze3z87_3250:
																										if (NULLP
																											(BgL_ll1186z00_3251))
																											{	/* R5rs/syntax.scm 576 */
																												BgL_arg1961z00_2072 =
																													CDR
																													(BgL_head1188z00_2076);
																											}
																										else
																											{	/* R5rs/syntax.scm 576 */
																												obj_t
																													BgL_newtail1190z00_3263;
																												{	/* R5rs/syntax.scm 576 */
																													obj_t
																														BgL_arg1967z00_3264;
																													{	/* R5rs/syntax.scm 576 */
																														obj_t BgL_bz00_3265;
																														obj_t BgL_vz00_3266;

																														BgL_bz00_3265 =
																															CAR(
																															((obj_t)
																																BgL_ll1186z00_3251));
																														BgL_vz00_3266 =
																															CAR(((obj_t)
																																BgL_ll1187z00_3252));
																														{	/* R5rs/syntax.scm 577 */
																															obj_t
																																BgL_arg1968z00_3267;
																															BgL_arg1968z00_3267
																																=
																																CAR(((obj_t)
																																	BgL_bz00_3265));
																															BgL_arg1967z00_3264
																																=
																																MAKE_YOUNG_PAIR
																																(BgL_arg1968z00_3267,
																																BgL_vz00_3266);
																														}
																													}
																													BgL_newtail1190z00_3263
																														=
																														MAKE_YOUNG_PAIR
																														(BgL_arg1967z00_3264,
																														BNIL);
																												}
																												SET_CDR
																													(BgL_tail1189z00_3253,
																													BgL_newtail1190z00_3263);
																												{	/* R5rs/syntax.scm 576 */
																													obj_t
																														BgL_arg1965z00_3268;
																													obj_t
																														BgL_arg1966z00_3269;
																													BgL_arg1965z00_3268 =
																														CDR(((obj_t)
																															BgL_ll1186z00_3251));
																													BgL_arg1966z00_3269 =
																														CDR(((obj_t)
																															BgL_ll1187z00_3252));
																													{
																														obj_t
																															BgL_tail1189z00_5405;
																														obj_t
																															BgL_ll1187z00_5404;
																														obj_t
																															BgL_ll1186z00_5403;
																														BgL_ll1186z00_5403 =
																															BgL_arg1965z00_3268;
																														BgL_ll1187z00_5404 =
																															BgL_arg1966z00_3269;
																														BgL_tail1189z00_5405
																															=
																															BgL_newtail1190z00_3263;
																														BgL_tail1189z00_3253
																															=
																															BgL_tail1189z00_5405;
																														BgL_ll1187z00_3252 =
																															BgL_ll1187z00_5404;
																														BgL_ll1186z00_3251 =
																															BgL_ll1186z00_5403;
																														goto
																															BgL_zc3z04anonymousza31963ze3z87_3250;
																													}
																												}
																											}
																									}
																								}
																							BgL_nenvz00_2047 =
																								BGl_appendzd221011zd2zz__r5_macro_4_3_syntaxz00
																								(BgL_arg1961z00_2072,
																								BgL_envz00_44);
																						}
																						{	/* R5rs/syntax.scm 576 */

																							{	/* R5rs/syntax.scm 580 */
																								obj_t BgL_arg1948z00_2048;

																								{	/* R5rs/syntax.scm 580 */
																									obj_t BgL_arg1949z00_2049;
																									obj_t BgL_arg1950z00_2050;

																									if (NULLP
																										(BgL_bindingsz00_1610))
																										{	/* R5rs/syntax.scm 580 */
																											BgL_arg1949z00_2049 =
																												BNIL;
																										}
																									else
																										{	/* R5rs/syntax.scm 580 */
																											obj_t
																												BgL_head1194z00_2054;
																											BgL_head1194z00_2054 =
																												MAKE_YOUNG_PAIR(BNIL,
																												BNIL);
																											{
																												obj_t
																													BgL_ll1192z00_2056;
																												obj_t
																													BgL_ll1193z00_2057;
																												obj_t
																													BgL_tail1195z00_2058;
																												BgL_ll1192z00_2056 =
																													BgL_bindingsz00_1610;
																												BgL_ll1193z00_2057 =
																													BgL_nvarsz00_2046;
																												BgL_tail1195z00_2058 =
																													BgL_head1194z00_2054;
																											BgL_zc3z04anonymousza31952ze3z87_2059:
																												if (NULLP
																													(BgL_ll1192z00_2056))
																													{	/* R5rs/syntax.scm 580 */
																														BgL_arg1949z00_2049
																															=
																															CDR
																															(BgL_head1194z00_2054);
																													}
																												else
																													{	/* R5rs/syntax.scm 580 */
																														obj_t
																															BgL_newtail1196z00_2061;
																														{	/* R5rs/syntax.scm 580 */
																															obj_t
																																BgL_arg1956z00_2064;
																															{	/* R5rs/syntax.scm 580 */
																																obj_t
																																	BgL_bz00_2065;
																																obj_t
																																	BgL_vz00_2066;
																																BgL_bz00_2065 =
																																	CAR(((obj_t)
																																		BgL_ll1192z00_2056));
																																BgL_vz00_2066 =
																																	CAR(((obj_t)
																																		BgL_ll1193z00_2057));
																																{	/* R5rs/syntax.scm 581 */
																																	obj_t
																																		BgL_arg1957z00_2067;
																																	{	/* R5rs/syntax.scm 581 */
																																		obj_t
																																			BgL_arg1960z00_2070;
																																		{	/* R5rs/syntax.scm 581 */
																																			obj_t
																																				BgL_pairz00_3283;
																																			BgL_pairz00_3283
																																				=
																																				CDR((
																																					(obj_t)
																																					BgL_bz00_2065));
																																			BgL_arg1960z00_2070
																																				=
																																				CAR
																																				(BgL_pairz00_3283);
																																		}
																																		BgL_arg1957z00_2067
																																			=
																																			BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00
																																			(BgL_arg1960z00_2070,
																																			BgL_nenvz00_2047);
																																	}
																																	{	/* R5rs/syntax.scm 581 */
																																		obj_t
																																			BgL_list1958z00_2068;
																																		{	/* R5rs/syntax.scm 581 */
																																			obj_t
																																				BgL_arg1959z00_2069;
																																			BgL_arg1959z00_2069
																																				=
																																				MAKE_YOUNG_PAIR
																																				(BgL_arg1957z00_2067,
																																				BNIL);
																																			BgL_list1958z00_2068
																																				=
																																				MAKE_YOUNG_PAIR
																																				(BgL_vz00_2066,
																																				BgL_arg1959z00_2069);
																																		}
																																		BgL_arg1956z00_2064
																																			=
																																			BgL_list1958z00_2068;
																																	}
																																}
																															}
																															BgL_newtail1196z00_2061
																																=
																																MAKE_YOUNG_PAIR
																																(BgL_arg1956z00_2064,
																																BNIL);
																														}
																														SET_CDR
																															(BgL_tail1195z00_2058,
																															BgL_newtail1196z00_2061);
																														{	/* R5rs/syntax.scm 580 */
																															obj_t
																																BgL_arg1954z00_2062;
																															obj_t
																																BgL_arg1955z00_2063;
																															BgL_arg1954z00_2062
																																=
																																CDR(((obj_t)
																																	BgL_ll1192z00_2056));
																															BgL_arg1955z00_2063
																																=
																																CDR(((obj_t)
																																	BgL_ll1193z00_2057));
																															{
																																obj_t
																																	BgL_tail1195z00_5431;
																																obj_t
																																	BgL_ll1193z00_5430;
																																obj_t
																																	BgL_ll1192z00_5429;
																																BgL_ll1192z00_5429
																																	=
																																	BgL_arg1954z00_2062;
																																BgL_ll1193z00_5430
																																	=
																																	BgL_arg1955z00_2063;
																																BgL_tail1195z00_5431
																																	=
																																	BgL_newtail1196z00_2061;
																																BgL_tail1195z00_2058
																																	=
																																	BgL_tail1195z00_5431;
																																BgL_ll1193z00_2057
																																	=
																																	BgL_ll1193z00_5430;
																																BgL_ll1192z00_2056
																																	=
																																	BgL_ll1192z00_5429;
																																goto
																																	BgL_zc3z04anonymousza31952ze3z87_2059;
																															}
																														}
																													}
																											}
																										}
																									BgL_arg1950z00_2050 =
																										BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																										(BgL_nenvz00_2047,
																										BgL_bodyz00_1611);
																									BgL_arg1948z00_2048 =
																										MAKE_YOUNG_PAIR
																										(BgL_arg1949z00_2049,
																										BgL_arg1950z00_2050);
																								}
																								return
																									MAKE_YOUNG_PAIR
																									(BGl_symbol2471z00zz__r5_macro_4_3_syntaxz00,
																									BgL_arg1948z00_2048);
																							}
																						}
																					}
																				}
																			}
																		else
																			{	/* R5rs/syntax.scm 524 */
																				BGL_TAIL return
																					BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																					(BgL_envz00_44, BgL_xz00_43);
																			}
																	}
																else
																	{	/* R5rs/syntax.scm 524 */
																		obj_t BgL_cdrzd2426zd2_1658;

																		BgL_cdrzd2426zd2_1658 =
																			CDR(((obj_t) BgL_xz00_43));
																		if (
																			(CAR(
																					((obj_t) BgL_xz00_43)) ==
																				BGl_symbol2595z00zz__r5_macro_4_3_syntaxz00))
																			{	/* R5rs/syntax.scm 524 */
																				if (PAIRP(BgL_cdrzd2426zd2_1658))
																					{	/* R5rs/syntax.scm 524 */
																						obj_t BgL_carzd2429zd2_1662;

																						BgL_carzd2429zd2_1662 =
																							CAR(BgL_cdrzd2426zd2_1658);
																						if (PAIRP(BgL_carzd2429zd2_1662))
																							{	/* R5rs/syntax.scm 524 */
																								if (NULLP(CDR
																										(BgL_carzd2429zd2_1662)))
																									{	/* R5rs/syntax.scm 524 */
																										obj_t BgL_arg1632z00_1666;
																										obj_t BgL_arg1633z00_1667;

																										BgL_arg1632z00_1666 =
																											CAR
																											(BgL_carzd2429zd2_1662);
																										BgL_arg1633z00_1667 =
																											CDR
																											(BgL_cdrzd2426zd2_1658);
																										{	/* R5rs/syntax.scm 585 */
																											obj_t BgL_nvarz00_3327;

																											BgL_nvarz00_3327 =
																												BGl_genvarsz00zz__r5_macro_4_3_syntaxz00
																												(BgL_arg1632z00_1666);
																											{	/* R5rs/syntax.scm 585 */
																												obj_t BgL_nenvz00_3328;

																												{	/* R5rs/syntax.scm 586 */
																													obj_t
																														BgL_arg1984z00_3329;
																													BgL_arg1984z00_3329 =
																														MAKE_YOUNG_PAIR
																														(BgL_arg1632z00_1666,
																														BgL_nvarz00_3327);
																													BgL_nenvz00_3328 =
																														MAKE_YOUNG_PAIR
																														(BgL_arg1984z00_3329,
																														BgL_envz00_44);
																												}
																												{	/* R5rs/syntax.scm 586 */

																													{	/* R5rs/syntax.scm 587 */
																														obj_t
																															BgL_arg1981z00_3330;
																														{	/* R5rs/syntax.scm 587 */
																															obj_t
																																BgL_arg1982z00_3331;
																															obj_t
																																BgL_arg1983z00_3332;
																															BgL_arg1982z00_3331
																																=
																																MAKE_YOUNG_PAIR
																																(BgL_nvarz00_3327,
																																BNIL);
																															BgL_arg1983z00_3332
																																=
																																BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																																(BgL_nenvz00_3328,
																																BgL_arg1633z00_1667);
																															BgL_arg1981z00_3330
																																=
																																MAKE_YOUNG_PAIR
																																(BgL_arg1982z00_3331,
																																BgL_arg1983z00_3332);
																														}
																														return
																															MAKE_YOUNG_PAIR
																															(BGl_symbol2595z00zz__r5_macro_4_3_syntaxz00,
																															BgL_arg1981z00_3330);
																													}
																												}
																											}
																										}
																									}
																								else
																									{	/* R5rs/syntax.scm 524 */
																										BGL_TAIL return
																											BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																											(BgL_envz00_44,
																											BgL_xz00_43);
																									}
																							}
																						else
																							{	/* R5rs/syntax.scm 524 */
																								BGL_TAIL return
																									BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																									(BgL_envz00_44, BgL_xz00_43);
																							}
																					}
																				else
																					{	/* R5rs/syntax.scm 524 */
																						BGL_TAIL return
																							BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																							(BgL_envz00_44, BgL_xz00_43);
																					}
																			}
																		else
																			{	/* R5rs/syntax.scm 524 */
																				BGL_TAIL return
																					BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00
																					(BgL_envz00_44, BgL_xz00_43);
																			}
																	}
															}
													}
											}
									}
							}
						else
							{	/* R5rs/syntax.scm 524 */
								return BgL_xz00_43;
							}
					}
			}
		}

	}



/* loop~0 */
	obj_t BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00(obj_t BgL_envz00_3729,
		obj_t BgL_xz00_2115)
	{
		{	/* R5rs/syntax.scm 597 */
			if (PAIRP(BgL_xz00_2115))
				{	/* R5rs/syntax.scm 599 */
					return
						MAKE_YOUNG_PAIR(BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00(CAR
							(BgL_xz00_2115), BgL_envz00_3729),
						BGl_loopze70ze7zz__r5_macro_4_3_syntaxz00(BgL_envz00_3729,
							CDR(BgL_xz00_2115)));
				}
			else
				{	/* R5rs/syntax.scm 599 */
					if (NULLP(BgL_xz00_2115))
						{	/* R5rs/syntax.scm 601 */
							return BNIL;
						}
					else
						{	/* R5rs/syntax.scm 601 */
							BGL_TAIL return
								BGl_hygieniza7eza7zz__r5_macro_4_3_syntaxz00(BgL_xz00_2115,
								BgL_envz00_3729);
						}
				}
		}

	}



/* flatten */
	obj_t BGl_flattenz00zz__r5_macro_4_3_syntaxz00(obj_t BgL_lz00_47)
	{
		{	/* R5rs/syntax.scm 609 */
			if (PAIRP(BgL_lz00_47))
				{	/* R5rs/syntax.scm 611 */
					return
						MAKE_YOUNG_PAIR(CAR(BgL_lz00_47),
						BGl_flattenz00zz__r5_macro_4_3_syntaxz00(CDR(BgL_lz00_47)));
				}
			else
				{	/* R5rs/syntax.scm 611 */
					if (NULLP(BgL_lz00_47))
						{	/* R5rs/syntax.scm 612 */
							return BgL_lz00_47;
						}
					else
						{	/* R5rs/syntax.scm 613 */
							obj_t BgL_list1997z00_2129;

							BgL_list1997z00_2129 = MAKE_YOUNG_PAIR(BgL_lz00_47, BNIL);
							return BgL_list1997z00_2129;
						}
				}
		}

	}



/* genvars */
	obj_t BGl_genvarsz00zz__r5_macro_4_3_syntaxz00(obj_t BgL_lz00_48)
	{
		{	/* R5rs/syntax.scm 618 */
			if (PAIRP(BgL_lz00_48))
				{	/* R5rs/syntax.scm 628 */
					return
						MAKE_YOUNG_PAIR(BGl_gennameze70ze7zz__r5_macro_4_3_syntaxz00(CAR
							(BgL_lz00_48)),
						BGl_genvarsz00zz__r5_macro_4_3_syntaxz00(CDR(BgL_lz00_48)));
				}
			else
				{	/* R5rs/syntax.scm 628 */
					if (NULLP(BgL_lz00_48))
						{	/* R5rs/syntax.scm 629 */
							return BgL_lz00_48;
						}
					else
						{	/* R5rs/syntax.scm 629 */
							BGL_TAIL return
								BGl_gennameze70ze7zz__r5_macro_4_3_syntaxz00(BgL_lz00_48);
						}
				}
		}

	}



/* genname~0 */
	obj_t BGl_gennameze70ze7zz__r5_macro_4_3_syntaxz00(obj_t BgL_lz00_2137)
	{
		{	/* R5rs/syntax.scm 626 */
			{

				if (SYMBOLP(BgL_lz00_2137))
					{	/* R5rs/syntax.scm 626 */
						{	/* R5rs/syntax.scm 622 */
							bool_t BgL_test2858z00_5496;

							{	/* R5rs/syntax.scm 471 */
								obj_t BgL_sz00_3478;

								{	/* R5rs/syntax.scm 471 */
									obj_t BgL_arg2128z00_3480;

									BgL_arg2128z00_3480 =
										SYMBOL_TO_STRING(((obj_t) BgL_lz00_2137));
									BgL_sz00_3478 =
										BGl_stringzd2copyzd2zz__r4_strings_6_7z00
										(BgL_arg2128z00_3480);
								}
								BgL_test2858z00_5496 =
									bigloo_strcmp_at(BgL_sz00_3478,
									BGl_hygienezd2prefixzd2zz__r5_macro_4_3_syntaxz00, 0L);
							}
							if (BgL_test2858z00_5496)
								{	/* R5rs/syntax.scm 622 */
									BGL_TAIL return
										BGl_hygienezd2valuezd2zz__r5_macro_4_3_syntaxz00
										(BgL_lz00_2137);
								}
							else
								{	/* R5rs/syntax.scm 622 */
									BGL_TAIL return
										BGl_gensymz00zz__r4_symbols_6_4z00(BgL_lz00_2137);
								}
						}
					}
				else
					{	/* R5rs/syntax.scm 626 */

						{	/* R5rs/syntax.scm 626 */

							BGL_TAIL return BGl_gensymz00zz__r4_symbols_6_4z00(BFALSE);
						}
					}
			}
		}

	}



/* object-init */
	obj_t BGl_objectzd2initzd2zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 17 */
			return BUNSPEC;
		}

	}



/* generic-init */
	obj_t BGl_genericzd2initzd2zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 17 */
			return BUNSPEC;
		}

	}



/* method-init */
	obj_t BGl_methodzd2initzd2zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 17 */
			return BUNSPEC;
		}

	}



/* imported-modules-init */
	obj_t BGl_importedzd2moduleszd2initz00zz__r5_macro_4_3_syntaxz00(void)
	{
		{	/* R5rs/syntax.scm 17 */
			BGl_modulezd2initializa7ationz75zz__errorz00(88804785L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
			BGl_modulezd2initializa7ationz75zz__objectz00(475449627L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
			BGl_modulezd2initializa7ationz75zz__threadz00(149516032L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
			BGl_modulezd2initializa7ationz75zz__bexitz00(443005284L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
			BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(86988580L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
			BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5z00(26840973L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
			BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(185672289L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
			return
				BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_flonum_dtoaz00
				(268155843L,
				BSTRING_TO_STRING(BGl_string2597z00zz__r5_macro_4_3_syntaxz00));
		}

	}

#ifdef __cplusplus
}
#endif
