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

/* unsafe mode */
#define BIGLOO_UNSAFE 1

/* traces mode */
#define BIGLOO_TRACE 0

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

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

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


#endif													// BGL_CC_LD_TYPE_DEFINITIONS
#endif													// BGL_MODULE_TYPE_DEFINITIONS

	extern obj_t BGl_za2destza2z00zzengine_paramz00;
	BGL_EXPORTED_DECL obj_t BGl_libraryzd2suffixeszd2zzcc_ldz00(void);
	static obj_t BGl_requirezd2initializa7ationz75zzcc_ldz00 = BUNSPEC;
	BGL_IMPORT obj_t BGl_makezd2sharedzd2libzd2namezd2zz__osz00(obj_t, obj_t);
	static obj_t BGl_profilezd2gczd2debugzd2libraryzd2suffixz00zzcc_ldz00(void);
	extern obj_t BGl_za2stripza2z00zzengine_paramz00;
	extern obj_t BGl_za2staticzd2allzd2bigloozf3za2zf3zzengine_paramz00;
	extern obj_t BGl_za2cczd2optionsza2zd2zzengine_paramz00;
	extern obj_t BGl_za2srczd2filesza2zd2zzengine_paramz00;
	extern obj_t BGl_za2doublezd2ldzd2libszf3za2zf3zzengine_paramz00;
	extern obj_t BGl_za2ldzd2relativeza2zd2zzengine_paramz00;
	static obj_t BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00(obj_t, obj_t, obj_t,
		bool_t, bool_t);
	extern obj_t BGl_za2gczd2customzf3za2z21zzengine_paramz00;
	extern obj_t BGl_za2passza2z00zzengine_paramz00;
	BGL_EXPORTED_DECL obj_t BGl_ldz00zzcc_ldz00(obj_t, bool_t);
	BGL_IMPORT obj_t BGl_formatz00zz__r4_output_6_10_3z00(obj_t, obj_t);
	BGL_IMPORT obj_t bgl_reverse(obj_t);
	extern obj_t BGl_za2ldzd2optionsza2zd2zzengine_paramz00;
	static obj_t BGl_genericzd2initzd2zzcc_ldz00(void);
	BGL_IMPORT obj_t BGl_stringzd2copyzd2zz__r4_strings_6_7z00(obj_t);
	static obj_t BGl_objectzd2initzd2zzcc_ldz00(void);
	BGL_IMPORT obj_t BGl_appendz00zz__r4_pairs_and_lists_6_3z00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza32017ze3ze5zzcc_ldz00(obj_t);
	static obj_t BGl_z62libraryzd2suffixeszb0zzcc_ldz00(obj_t);
	extern obj_t BGl_za2sawza2z00zzengine_paramz00;
	extern obj_t BGl_za2additionalzd2bigloozd2librariesza2z00zzengine_paramz00;
	BGL_IMPORT obj_t string_append_3(obj_t, obj_t, obj_t);
	extern obj_t BGl_userzd2warningzd2zztools_errorz00(obj_t, obj_t, obj_t);
	static obj_t BGl_zc3z04anonymousza31220ze3ze70z60zzcc_ldz00(obj_t);
	extern obj_t BGl_thezd2backendzd2zzbackend_backendz00(void);
	BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t, obj_t);
	static obj_t BGl_win32zd2ldzd2zzcc_ldz00(obj_t);
	BGL_IMPORT obj_t BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_appendzd221011zd2zzcc_ldz00(obj_t, obj_t);
	static obj_t BGl_methodzd2initzd2zzcc_ldz00(void);
	extern obj_t BGl_unixzd2filenamezd2zzcc_execz00(obj_t);
	extern obj_t BGl_za2ccza2z00zzengine_paramz00;
	extern obj_t BGl_execz00zzcc_execz00(obj_t, bool_t, obj_t);
	BGL_IMPORT obj_t bgl_close_input_port(obj_t);
	extern obj_t BGl_za2bdbzd2debugza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t string_append(obj_t, obj_t);
	extern obj_t BGl_za2ldzd2debugzd2optionza2z00zzengine_paramz00;
	extern obj_t BGl_za2gczd2libza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_errorz00zz__errorz00(obj_t, obj_t, obj_t);
	extern obj_t BGl_za2ldzd2optimzd2flagsza2z00zzengine_paramz00;
	extern obj_t BGl_za2staticzd2bigloozf3za2z21zzengine_paramz00;
	extern obj_t BGl_za2ldzd2postzd2optionsza2z00zzengine_paramz00;
	BGL_IMPORT obj_t bgl_append2(obj_t, obj_t);
	BGL_IMPORT obj_t BGl_openzd2inputzd2stringz00zz__r4_ports_6_10_1z00(obj_t,
		obj_t, obj_t);
	extern obj_t BGl_za2multizd2threadedzd2gczf3za2zf3zzengine_paramz00;
	BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzcc_ldz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzmodule_evalz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzengine_configurez00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzcc_execz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzbackend_backendz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztools_miscz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztools_speekz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(long,
		char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_fixnumz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_symbols_6_4z00(long,
		char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__libraryz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__rgcz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__processz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__bexitz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__osz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__errorz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__configurez00(long,
		char *);
	BGL_IMPORT obj_t BGl_makezd2staticzd2libzd2namezd2zz__osz00(obj_t, obj_t);
	extern obj_t BGl_za2profilezd2libraryza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_stringzd2appendzd2zz__r4_strings_6_7z00(obj_t);
	extern obj_t BGl_za2withzd2filesza2zd2zzengine_paramz00;
	extern obj_t BGl_za2czd2objectzd2filezd2extensionza2zd2zzengine_paramz00;
	extern obj_t BGl_za2libzd2dirza2zd2zzengine_paramz00;
	extern obj_t BGl_za2bigloozd2libza2zd2zzengine_paramz00;
	extern obj_t BGl_za2unsafezd2libraryza2zd2zzengine_paramz00;
	static obj_t BGl_cnstzd2initzd2zzcc_ldz00(void);
	static obj_t BGl_libraryzd2moduleszd2initz00zzcc_ldz00(void);
	extern obj_t BGl_za2bigloozd2userzd2libza2z00zzengine_paramz00;
	static obj_t BGl_importedzd2moduleszd2initz00zzcc_ldz00(void);
	BGL_IMPORT obj_t BGl_prefixz00zz__osz00(obj_t);
	static obj_t BGl_gczd2rootszd2initz00zzcc_ldz00(void);
	static obj_t BGl_z62zc3z04anonymousza32371ze3ze5zzcc_ldz00(obj_t);
	static obj_t BGl_z62ldz62zzcc_ldz00(obj_t, obj_t, obj_t);
	static obj_t BGl_unixzd2ldzd2zzcc_ldz00(obj_t, bool_t);
	extern obj_t BGl_za2ozd2filesza2zd2zzengine_paramz00;
	extern obj_t BGl_za2cflagszd2rpathza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_consza2za2zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
	BGL_IMPORT obj_t BGl_bigloozd2configzd2zz__configurez00(obj_t);
	static obj_t BGl_defaultzd2sonameze70z35zzcc_ldz00(obj_t);
	extern obj_t BGl_stringza2zd2ze3stringz93zztools_miscz00(obj_t);
	static obj_t BGl_zc3z04anonymousza32125ze3ze70z60zzcc_ldz00(obj_t);
	BGL_IMPORT obj_t
		BGl_libraryzd2translationzd2tablezd2addz12zc0zz__libraryz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_zc3z04anonymousza32098ze3ze70z60zzcc_ldz00(obj_t);
	extern obj_t BGl_getzd2evalzd2librariesz00zzmodule_evalz00(void);
	extern obj_t BGl_za2ldzd2ozd2optionza2z00zzengine_paramz00;
	BGL_IMPORT obj_t BGl_runzd2processzd2zz__processz00(obj_t, obj_t);
	BGL_IMPORT obj_t BGl_findzd2filezf2pathz20zz__osz00(obj_t, obj_t);
	static obj_t BGl_loopze70ze7zzcc_ldz00(obj_t);
	static obj_t BGl_loopze71ze7zzcc_ldz00(obj_t);
	BGL_IMPORT obj_t BGl_libraryzd2filezd2namez00zz__libraryz00(obj_t, obj_t,
		obj_t);
	extern obj_t BGl_userzd2errorzd2zztools_errorz00(obj_t, obj_t, obj_t, obj_t);
	BGL_IMPORT bool_t rgc_fill_buffer(obj_t);
	BGL_IMPORT obj_t
		BGl_deletezd2duplicateszd2zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
	extern obj_t BGl_stringzd2splitzd2charz00zztools_miscz00(obj_t, obj_t);
	extern obj_t BGl_za2czd2debugza2zd2zzengine_paramz00;
	extern obj_t BGl_verbosez00zztools_speekz00(obj_t, obj_t);
	static obj_t BGl_libraryzd2threadzd2suffixz00zzcc_ldz00(obj_t);
	static obj_t BGl_libraryzd2evalzd2suffixesz00zzcc_ldz00(void);
	static obj_t __cnst[27];


	   
		 
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_ldzd2envzd2zzcc_ldz00,
		BgL_bgl_za762ldza762za7za7cc_ldza72416za7, BGl_z62ldz62zzcc_ldz00, 0L,
		BUNSPEC, 2);
	      DEFINE_STRING(BGl_string2400z00zzcc_ldz00,
		BgL_bgl_string2400za700za7za7c2417za7, "Illegal match", 13);
	      DEFINE_STRING(BGl_string2401z00zzcc_ldz00,
		BgL_bgl_string2401za700za7za7c2418za7, " ", 1);
	      DEFINE_STRING(BGl_string2402z00zzcc_ldz00,
		BgL_bgl_string2402za700za7za7c2419za7, ".", 1);
	      DEFINE_STRING(BGl_string2403z00zzcc_ldz00,
		BgL_bgl_string2403za700za7za7c2420za7, "~( )", 4);
	      DEFINE_STRING(BGl_string2404z00zzcc_ldz00,
		BgL_bgl_string2404za700za7za7c2421za7, "-L", 2);
	      DEFINE_STRING(BGl_string2405z00zzcc_ldz00,
		BgL_bgl_string2405za700za7za7c2422za7, "      [", 7);
	      DEFINE_STRING(BGl_string2406z00zzcc_ldz00,
		BgL_bgl_string2406za700za7za7c2423za7, "out", 3);
	      DEFINE_STRING(BGl_string2407z00zzcc_ldz00,
		BgL_bgl_string2407za700za7za7c2424za7, "bigloo_mt", 9);
	      DEFINE_STRING(BGl_string2408z00zzcc_ldz00,
		BgL_bgl_string2408za700za7za7c2425za7, "/link", 5);
	      DEFINE_STRING(BGl_string2409z00zzcc_ldz00,
		BgL_bgl_string2409za700za7za7c2426za7, "[", 1);
	      DEFINE_STRING(BGl_string2410z00zzcc_ldz00,
		BgL_bgl_string2410za700za7za7c2427za7, "]", 1);
	      DEFINE_STRING(BGl_string2411z00zzcc_ldz00,
		BgL_bgl_string2411za700za7za7c2428za7, "      ", 6);
	      DEFINE_STRING(BGl_string2412z00zzcc_ldz00,
		BgL_bgl_string2412za700za7za7c2429za7, "/LIBPATH:", 9);
	      DEFINE_STRING(BGl_string2413z00zzcc_ldz00,
		BgL_bgl_string2413za700za7za7c2430za7, "cc_ld", 5);
	      DEFINE_STRING(BGl_string2414z00zzcc_ldz00,
		BgL_bgl_string2414za700za7za7c2431za7,
		"(:wait #t) shared-lib-suffix dlopen-lib non-custom-gc-directory c-pic-flag c-strip-flag c-linker-soname-option c-linker-shared-option shared-link-option static-link-option have-shared-library c-ld so c-compiler-rpath (\"_es\") (\"_eu\" \"_es\") (\"_ep\" \"_es\") (\"_s\") (\"_saw_s\" \"_s\") (\"_saw_s\") (\"_u\" \"_s\") (\"_saw_u\" \"_u\" \"_saw_s\") (\"_saw_u\" \"_saw_s\") (\"_p\" \"_s\") (\"_saw_p\" \"_p\" \"_saw_s\" \"_s\") (\"_saw_p\" \"_saw_s\") gc ",
		409);
	      DEFINE_STRING(BGl_string2383z00zzcc_ldz00,
		BgL_bgl_string2383za700za7za7c2432za7, "unix", 4);
	      DEFINE_STRING(BGl_string2384z00zzcc_ldz00,
		BgL_bgl_string2384za700za7za7c2433za7, "mingw", 5);
	      DEFINE_STRING(BGl_string2385z00zzcc_ldz00,
		BgL_bgl_string2385za700za7za7c2434za7, "win32", 5);
	      DEFINE_STRING(BGl_string2386z00zzcc_ldz00,
		BgL_bgl_string2386za700za7za7c2435za7, "ld", 2);
	      DEFINE_STRING(BGl_string2387z00zzcc_ldz00,
		BgL_bgl_string2387za700za7za7c2436za7, "Unknown os", 10);
	      DEFINE_STRING(BGl_string2388z00zzcc_ldz00,
		BgL_bgl_string2388za700za7za7c2437za7, "_mt", 3);
	      DEFINE_STRING(BGl_string2389z00zzcc_ldz00,
		BgL_bgl_string2389za700za7za7c2438za7, "saw", 3);
	      DEFINE_STRING(BGl_string2390z00zzcc_ldz00,
		BgL_bgl_string2390za700za7za7c2439za7, "_p", 2);
	      DEFINE_STRING(BGl_string2391z00zzcc_ldz00,
		BgL_bgl_string2391za700za7za7c2440za7, "", 0);
	      DEFINE_STRING(BGl_string2392z00zzcc_ldz00,
		BgL_bgl_string2392za700za7za7c2441za7, "-l", 2);
	      DEFINE_STRING(BGl_string2393z00zzcc_ldz00,
		BgL_bgl_string2393za700za7za7c2442za7, "Can't find any `~a'", 19);
	      DEFINE_STRING(BGl_string2394z00zzcc_ldz00,
		BgL_bgl_string2394za700za7za7c2443za7, "bigloo", 6);
	      DEFINE_STRING(BGl_string2395z00zzcc_ldz00,
		BgL_bgl_string2395za700za7za7c2444za7, "Can't find library \"~a\" in path",
		31);
	      DEFINE_STRING(BGl_string2396z00zzcc_ldz00,
		BgL_bgl_string2396za700za7za7c2445za7, " ~( )", 5);
	      DEFINE_STRING(BGl_string2397z00zzcc_ldz00,
		BgL_bgl_string2397za700za7za7c2446za7, ")", 1);
	      DEFINE_STRING(BGl_string2398z00zzcc_ldz00,
		BgL_bgl_string2398za700za7za7c2447za7, "   . ld (", 9);
	      DEFINE_STRING(BGl_string2399z00zzcc_ldz00,
		BgL_bgl_string2399za700za7za7c2448za7, "regular-grammar", 15);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_libraryzd2suffixeszd2envz00zzcc_ldz00,
		BgL_bgl_za762libraryza7d2suf2449z00, BGl_z62libraryzd2suffixeszb0zzcc_ldz00,
		0L, BUNSPEC, 0);
	BGL_IMPORT obj_t BGl_equalzf3zd2envz21zz__r4_equivalence_6_2z00;

/* 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_requirezd2initializa7ationz75zzcc_ldz00));
#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_modulezd2initializa7ationz75zzcc_ldz00(long
		BgL_checksumz00_2028, char *BgL_fromz00_2029)
	{
		{
			if (CBOOL(BGl_requirezd2initializa7ationz75zzcc_ldz00))
				{
					BGl_requirezd2initializa7ationz75zzcc_ldz00 = BBOOL(((bool_t) 0));
					BGl_gczd2rootszd2initz00zzcc_ldz00();
					BGl_libraryzd2moduleszd2initz00zzcc_ldz00();
					BGl_cnstzd2initzd2zzcc_ldz00();
					BGl_importedzd2moduleszd2initz00zzcc_ldz00();
					return BGl_methodzd2initzd2zzcc_ldz00();
				}
			else
				{
					return BUNSPEC;
				}
		}

	}



/* library-modules-init */
	obj_t BGl_libraryzd2moduleszd2initz00zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 15 */
			BGl_modulezd2initializa7ationz75zz__osz00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(0L,
				"cc_ld");
			BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__readerz00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__errorz00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__configurez00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__libraryz00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__processz00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__rgcz00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__bexitz00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__r4_symbols_6_4z00(0L, "cc_ld");
			BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_fixnumz00(0L, "cc_ld");
			return BUNSPEC;
		}

	}



/* cnst-init */
	obj_t BGl_cnstzd2initzd2zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 15 */
			{	/* Cc/ld.scm 15 */
				obj_t BgL_cportz00_2017;

				{	/* Cc/ld.scm 15 */
					obj_t BgL_stringz00_2024;

					BgL_stringz00_2024 = BGl_string2414z00zzcc_ldz00;
					{	/* Cc/ld.scm 15 */
						obj_t BgL_startz00_2025;

						BgL_startz00_2025 = BINT(0L);
						{	/* Cc/ld.scm 15 */
							obj_t BgL_endz00_2026;

							BgL_endz00_2026 =
								BINT(STRING_LENGTH(((obj_t) BgL_stringz00_2024)));
							{	/* Cc/ld.scm 15 */

								BgL_cportz00_2017 =
									BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00
									(BgL_stringz00_2024, BgL_startz00_2025, BgL_endz00_2026);
				}}}}
				{
					long BgL_iz00_2018;

					BgL_iz00_2018 = 26L;
				BgL_loopz00_2019:
					if ((BgL_iz00_2018 == -1L))
						{	/* Cc/ld.scm 15 */
							return BUNSPEC;
						}
					else
						{	/* Cc/ld.scm 15 */
							{	/* Cc/ld.scm 15 */
								obj_t BgL_arg2415z00_2020;

								{	/* Cc/ld.scm 15 */

									{	/* Cc/ld.scm 15 */
										obj_t BgL_locationz00_2022;

										BgL_locationz00_2022 = BBOOL(((bool_t) 0));
										{	/* Cc/ld.scm 15 */

											BgL_arg2415z00_2020 =
												BGl_readz00zz__readerz00(BgL_cportz00_2017,
												BgL_locationz00_2022);
										}
									}
								}
								{	/* Cc/ld.scm 15 */
									int BgL_tmpz00_2062;

									BgL_tmpz00_2062 = (int) (BgL_iz00_2018);
									CNST_TABLE_SET(BgL_tmpz00_2062, BgL_arg2415z00_2020);
							}}
							{	/* Cc/ld.scm 15 */
								int BgL_auxz00_2023;

								BgL_auxz00_2023 = (int) ((BgL_iz00_2018 - 1L));
								{
									long BgL_iz00_2067;

									BgL_iz00_2067 = (long) (BgL_auxz00_2023);
									BgL_iz00_2018 = BgL_iz00_2067;
									goto BgL_loopz00_2019;
								}
							}
						}
				}
			}
		}

	}



/* gc-roots-init */
	obj_t BGl_gczd2rootszd2initz00zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 15 */
			return bgl_gc_roots_register();
		}

	}



/* append-21011 */
	obj_t BGl_appendzd221011zd2zzcc_ldz00(obj_t BgL_l1z00_1, obj_t BgL_l2z00_2)
	{
		{
			{
				obj_t BgL_headz00_102;

				BgL_headz00_102 = MAKE_YOUNG_PAIR(BNIL, BgL_l2z00_2);
				{
					obj_t BgL_prevz00_103;
					obj_t BgL_tailz00_104;

					BgL_prevz00_103 = BgL_headz00_102;
					BgL_tailz00_104 = BgL_l1z00_1;
				BgL_loopz00_105:
					if (PAIRP(BgL_tailz00_104))
						{
							obj_t BgL_newzd2prevzd2_107;

							BgL_newzd2prevzd2_107 =
								MAKE_YOUNG_PAIR(CAR(BgL_tailz00_104), BgL_l2z00_2);
							SET_CDR(BgL_prevz00_103, BgL_newzd2prevzd2_107);
							{
								obj_t BgL_tailz00_2077;
								obj_t BgL_prevz00_2076;

								BgL_prevz00_2076 = BgL_newzd2prevzd2_107;
								BgL_tailz00_2077 = CDR(BgL_tailz00_104);
								BgL_tailz00_104 = BgL_tailz00_2077;
								BgL_prevz00_103 = BgL_prevz00_2076;
								goto BgL_loopz00_105;
							}
						}
					else
						{
							BNIL;
						}
					return CDR(BgL_headz00_102);
				}
			}
		}

	}



/* ld */
	BGL_EXPORTED_DEF obj_t BGl_ldz00zzcc_ldz00(obj_t BgL_namez00_3,
		bool_t BgL_needzd2tozd2returnz00_4)
	{
		{	/* Cc/ld.scm 30 */
			{	/* Cc/ld.scm 32 */
				bool_t BgL_test2453z00_2080;

				{	/* Cc/ld.scm 32 */
					obj_t BgL_string1z00_1458;

					BgL_string1z00_1458 = string_to_bstring(OS_CLASS);
					{	/* Cc/ld.scm 32 */
						long BgL_l1z00_1460;

						BgL_l1z00_1460 = STRING_LENGTH(BgL_string1z00_1458);
						if ((BgL_l1z00_1460 == 4L))
							{	/* Cc/ld.scm 32 */
								int BgL_arg1303z00_1463;

								{	/* Cc/ld.scm 32 */
									char *BgL_auxz00_2087;
									char *BgL_tmpz00_2085;

									BgL_auxz00_2087 =
										BSTRING_TO_STRING(BGl_string2383z00zzcc_ldz00);
									BgL_tmpz00_2085 = BSTRING_TO_STRING(BgL_string1z00_1458);
									BgL_arg1303z00_1463 =
										memcmp(BgL_tmpz00_2085, BgL_auxz00_2087, BgL_l1z00_1460);
								}
								BgL_test2453z00_2080 = ((long) (BgL_arg1303z00_1463) == 0L);
							}
						else
							{	/* Cc/ld.scm 32 */
								BgL_test2453z00_2080 = ((bool_t) 0);
							}
					}
				}
				if (BgL_test2453z00_2080)
					{	/* Cc/ld.scm 32 */
						BGL_TAIL return
							BGl_unixzd2ldzd2zzcc_ldz00(BgL_namez00_3,
							BgL_needzd2tozd2returnz00_4);
					}
				else
					{	/* Cc/ld.scm 34 */
						bool_t BgL_test2455z00_2093;

						{	/* Cc/ld.scm 34 */
							obj_t BgL_string1z00_1469;

							BgL_string1z00_1469 = string_to_bstring(OS_CLASS);
							{	/* Cc/ld.scm 34 */
								long BgL_l1z00_1471;

								BgL_l1z00_1471 = STRING_LENGTH(BgL_string1z00_1469);
								if ((BgL_l1z00_1471 == 5L))
									{	/* Cc/ld.scm 34 */
										int BgL_arg1303z00_1474;

										{	/* Cc/ld.scm 34 */
											char *BgL_auxz00_2100;
											char *BgL_tmpz00_2098;

											BgL_auxz00_2100 =
												BSTRING_TO_STRING(BGl_string2384z00zzcc_ldz00);
											BgL_tmpz00_2098 = BSTRING_TO_STRING(BgL_string1z00_1469);
											BgL_arg1303z00_1474 =
												memcmp(BgL_tmpz00_2098, BgL_auxz00_2100,
												BgL_l1z00_1471);
										}
										BgL_test2455z00_2093 = ((long) (BgL_arg1303z00_1474) == 0L);
									}
								else
									{	/* Cc/ld.scm 34 */
										BgL_test2455z00_2093 = ((bool_t) 0);
									}
							}
						}
						if (BgL_test2455z00_2093)
							{	/* Cc/ld.scm 34 */
								BGL_TAIL return
									BGl_unixzd2ldzd2zzcc_ldz00(BgL_namez00_3,
									BgL_needzd2tozd2returnz00_4);
							}
						else
							{	/* Cc/ld.scm 36 */
								bool_t BgL_test2457z00_2106;

								{	/* Cc/ld.scm 36 */
									obj_t BgL_string1z00_1480;

									BgL_string1z00_1480 = string_to_bstring(OS_CLASS);
									{	/* Cc/ld.scm 36 */
										long BgL_l1z00_1482;

										BgL_l1z00_1482 = STRING_LENGTH(BgL_string1z00_1480);
										if ((BgL_l1z00_1482 == 5L))
											{	/* Cc/ld.scm 36 */
												int BgL_arg1303z00_1485;

												{	/* Cc/ld.scm 36 */
													char *BgL_auxz00_2113;
													char *BgL_tmpz00_2111;

													BgL_auxz00_2113 =
														BSTRING_TO_STRING(BGl_string2385z00zzcc_ldz00);
													BgL_tmpz00_2111 =
														BSTRING_TO_STRING(BgL_string1z00_1480);
													BgL_arg1303z00_1485 =
														memcmp(BgL_tmpz00_2111, BgL_auxz00_2113,
														BgL_l1z00_1482);
												}
												BgL_test2457z00_2106 =
													((long) (BgL_arg1303z00_1485) == 0L);
											}
										else
											{	/* Cc/ld.scm 36 */
												BgL_test2457z00_2106 = ((bool_t) 0);
											}
									}
								}
								if (BgL_test2457z00_2106)
									{	/* Cc/ld.scm 36 */
										return BGl_win32zd2ldzd2zzcc_ldz00(BgL_namez00_3);
									}
								else
									{	/* Cc/ld.scm 36 */
										return
											BGl_userzd2errorzd2zztools_errorz00
											(BGl_string2386z00zzcc_ldz00, BGl_string2387z00zzcc_ldz00,
											string_to_bstring(OS_CLASS), BNIL);
									}
							}
					}
			}
		}

	}



/* &ld */
	obj_t BGl_z62ldz62zzcc_ldz00(obj_t BgL_envz00_2004, obj_t BgL_namez00_2005,
		obj_t BgL_needzd2tozd2returnz00_2006)
	{
		{	/* Cc/ld.scm 30 */
			return
				BGl_ldz00zzcc_ldz00(BgL_namez00_2005,
				CBOOL(BgL_needzd2tozd2returnz00_2006));
		}

	}



/* library-thread-suffix */
	obj_t BGl_libraryzd2threadzd2suffixz00zzcc_ldz00(obj_t BgL_suffixesz00_5)
	{
		{	/* Cc/ld.scm 44 */
			if (CBOOL(BGl_za2multizd2threadedzd2gczf3za2zf3zzengine_paramz00))
				{	/* Cc/ld.scm 45 */
					return
						BGl_zc3z04anonymousza31220ze3ze70z60zzcc_ldz00(BgL_suffixesz00_5);
				}
			else
				{	/* Cc/ld.scm 45 */
					return BgL_suffixesz00_5;
				}
		}

	}



/* <@anonymous:1220>~0 */
	obj_t BGl_zc3z04anonymousza31220ze3ze70z60zzcc_ldz00(obj_t BgL_l1172z00_122)
	{
		{	/* Cc/ld.scm 46 */
			if (NULLP(BgL_l1172z00_122))
				{	/* Cc/ld.scm 46 */
					return BNIL;
				}
			else
				{	/* Cc/ld.scm 47 */
					obj_t BgL_arg1222z00_125;
					obj_t BgL_arg1223z00_126;

					{	/* Cc/ld.scm 47 */
						obj_t BgL_sz00_127;

						BgL_sz00_127 = CAR(((obj_t) BgL_l1172z00_122));
						{	/* Cc/ld.scm 47 */
							obj_t BgL_arg1224z00_128;

							BgL_arg1224z00_128 =
								string_append(BgL_sz00_127, BGl_string2388z00zzcc_ldz00);
							{	/* Cc/ld.scm 47 */
								obj_t BgL_list1225z00_129;

								{	/* Cc/ld.scm 47 */
									obj_t BgL_arg1226z00_130;

									BgL_arg1226z00_130 = MAKE_YOUNG_PAIR(BgL_sz00_127, BNIL);
									BgL_list1225z00_129 =
										MAKE_YOUNG_PAIR(BgL_arg1224z00_128, BgL_arg1226z00_130);
								}
								BgL_arg1222z00_125 = BgL_list1225z00_129;
							}
						}
					}
					{	/* Cc/ld.scm 46 */
						obj_t BgL_arg1228z00_131;

						BgL_arg1228z00_131 = CDR(((obj_t) BgL_l1172z00_122));
						BgL_arg1223z00_126 =
							BGl_zc3z04anonymousza31220ze3ze70z60zzcc_ldz00
							(BgL_arg1228z00_131);
					}
					return bgl_append2(BgL_arg1222z00_125, BgL_arg1223z00_126);
				}
		}

	}



/* library-suffixes */
	BGL_EXPORTED_DEF obj_t BGl_libraryzd2suffixeszd2zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 54 */
			{	/* Cc/ld.scm 57 */
				obj_t BgL_arg1232z00_133;

				if (CBOOL(BGl_za2profilezd2libraryza2zd2zzengine_paramz00))
					{	/* Cc/ld.scm 57 */
						if (CBOOL(BGl_za2sawza2z00zzengine_paramz00))
							{	/* Cc/ld.scm 59 */
								bool_t BgL_test2463z00_2141;

								{	/* Cc/ld.scm 59 */
									obj_t BgL_arg1237z00_136;

									BgL_arg1237z00_136 =
										BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(0L));
									{	/* Cc/ld.scm 59 */
										long BgL_l1z00_1496;

										BgL_l1z00_1496 =
											STRING_LENGTH(((obj_t) BgL_arg1237z00_136));
										if ((BgL_l1z00_1496 == 3L))
											{	/* Cc/ld.scm 59 */
												int BgL_arg1303z00_1499;

												{	/* Cc/ld.scm 59 */
													char *BgL_auxz00_2151;
													char *BgL_tmpz00_2148;

													BgL_auxz00_2151 =
														BSTRING_TO_STRING(BGl_string2389z00zzcc_ldz00);
													BgL_tmpz00_2148 =
														BSTRING_TO_STRING(((obj_t) BgL_arg1237z00_136));
													BgL_arg1303z00_1499 =
														memcmp(BgL_tmpz00_2148, BgL_auxz00_2151,
														BgL_l1z00_1496);
												}
												BgL_test2463z00_2141 =
													((long) (BgL_arg1303z00_1499) == 0L);
											}
										else
											{	/* Cc/ld.scm 59 */
												BgL_test2463z00_2141 = ((bool_t) 0);
											}
									}
								}
								if (BgL_test2463z00_2141)
									{	/* Cc/ld.scm 59 */
										BgL_arg1232z00_133 = CNST_TABLE_REF(1L);
									}
								else
									{	/* Cc/ld.scm 59 */
										BgL_arg1232z00_133 = CNST_TABLE_REF(2L);
									}
							}
						else
							{	/* Cc/ld.scm 58 */
								BgL_arg1232z00_133 = CNST_TABLE_REF(3L);
							}
					}
				else
					{	/* Cc/ld.scm 57 */
						if (CBOOL(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
							{	/* Cc/ld.scm 63 */
								if (CBOOL(BGl_za2sawza2z00zzengine_paramz00))
									{	/* Cc/ld.scm 65 */
										bool_t BgL_test2467z00_2163;

										{	/* Cc/ld.scm 65 */
											obj_t BgL_arg1242z00_139;

											BgL_arg1242z00_139 =
												BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
												(0L));
											{	/* Cc/ld.scm 65 */
												long BgL_l1z00_1507;

												BgL_l1z00_1507 =
													STRING_LENGTH(((obj_t) BgL_arg1242z00_139));
												if ((BgL_l1z00_1507 == 3L))
													{	/* Cc/ld.scm 65 */
														int BgL_arg1303z00_1510;

														{	/* Cc/ld.scm 65 */
															char *BgL_auxz00_2173;
															char *BgL_tmpz00_2170;

															BgL_auxz00_2173 =
																BSTRING_TO_STRING(BGl_string2389z00zzcc_ldz00);
															BgL_tmpz00_2170 =
																BSTRING_TO_STRING(((obj_t) BgL_arg1242z00_139));
															BgL_arg1303z00_1510 =
																memcmp(BgL_tmpz00_2170, BgL_auxz00_2173,
																BgL_l1z00_1507);
														}
														BgL_test2467z00_2163 =
															((long) (BgL_arg1303z00_1510) == 0L);
													}
												else
													{	/* Cc/ld.scm 65 */
														BgL_test2467z00_2163 = ((bool_t) 0);
													}
											}
										}
										if (BgL_test2467z00_2163)
											{	/* Cc/ld.scm 65 */
												BgL_arg1232z00_133 = CNST_TABLE_REF(4L);
											}
										else
											{	/* Cc/ld.scm 65 */
												BgL_arg1232z00_133 = CNST_TABLE_REF(5L);
											}
									}
								else
									{	/* Cc/ld.scm 64 */
										BgL_arg1232z00_133 = CNST_TABLE_REF(6L);
									}
							}
						else
							{	/* Cc/ld.scm 63 */
								if (CBOOL(BGl_za2sawza2z00zzengine_paramz00))
									{	/* Cc/ld.scm 70 */
										bool_t BgL_test2470z00_2183;

										{	/* Cc/ld.scm 70 */
											obj_t BgL_arg1246z00_142;

											BgL_arg1246z00_142 =
												BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
												(0L));
											{	/* Cc/ld.scm 70 */
												long BgL_l1z00_1518;

												BgL_l1z00_1518 =
													STRING_LENGTH(((obj_t) BgL_arg1246z00_142));
												if ((BgL_l1z00_1518 == 3L))
													{	/* Cc/ld.scm 70 */
														int BgL_arg1303z00_1521;

														{	/* Cc/ld.scm 70 */
															char *BgL_auxz00_2193;
															char *BgL_tmpz00_2190;

															BgL_auxz00_2193 =
																BSTRING_TO_STRING(BGl_string2389z00zzcc_ldz00);
															BgL_tmpz00_2190 =
																BSTRING_TO_STRING(((obj_t) BgL_arg1246z00_142));
															BgL_arg1303z00_1521 =
																memcmp(BgL_tmpz00_2190, BgL_auxz00_2193,
																BgL_l1z00_1518);
														}
														BgL_test2470z00_2183 =
															((long) (BgL_arg1303z00_1521) == 0L);
													}
												else
													{	/* Cc/ld.scm 70 */
														BgL_test2470z00_2183 = ((bool_t) 0);
													}
											}
										}
										if (BgL_test2470z00_2183)
											{	/* Cc/ld.scm 70 */
												BgL_arg1232z00_133 = CNST_TABLE_REF(7L);
											}
										else
											{	/* Cc/ld.scm 70 */
												BgL_arg1232z00_133 = CNST_TABLE_REF(8L);
											}
									}
								else
									{	/* Cc/ld.scm 69 */
										BgL_arg1232z00_133 = CNST_TABLE_REF(9L);
									}
							}
					}
				return BGl_libraryzd2threadzd2suffixz00zzcc_ldz00(BgL_arg1232z00_133);
			}
		}

	}



/* &library-suffixes */
	obj_t BGl_z62libraryzd2suffixeszb0zzcc_ldz00(obj_t BgL_envz00_2007)
	{
		{	/* Cc/ld.scm 54 */
			return BGl_libraryzd2suffixeszd2zzcc_ldz00();
		}

	}



/* library-eval-suffixes */
	obj_t BGl_libraryzd2evalzd2suffixesz00zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 79 */
			{	/* Cc/ld.scm 82 */
				obj_t BgL_arg1247z00_143;

				if (CBOOL(BGl_za2profilezd2libraryza2zd2zzengine_paramz00))
					{	/* Cc/ld.scm 82 */
						BgL_arg1247z00_143 = CNST_TABLE_REF(10L);
					}
				else
					{	/* Cc/ld.scm 82 */
						if (CBOOL(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
							{	/* Cc/ld.scm 83 */
								BgL_arg1247z00_143 = CNST_TABLE_REF(11L);
							}
						else
							{	/* Cc/ld.scm 83 */
								BgL_arg1247z00_143 = CNST_TABLE_REF(12L);
							}
					}
				return BGl_libraryzd2threadzd2suffixz00zzcc_ldz00(BgL_arg1247z00_143);
			}
		}

	}



/* profile-gc-debug-library-suffix */
	obj_t BGl_profilezd2gczd2debugzd2libraryzd2suffixz00zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 95 */
			if (CBOOL(BGl_za2profilezd2libraryza2zd2zzengine_paramz00))
				{	/* Cc/ld.scm 97 */
					return BGl_string2390z00zzcc_ldz00;
				}
			else
				{	/* Cc/ld.scm 97 */
					return BGl_string2391z00zzcc_ldz00;
				}
		}

	}



/* library->os-file */
	obj_t BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00(obj_t BgL_libraryz00_6,
		obj_t BgL_suffixesz00_7, obj_t BgL_staticpz00_8, bool_t BgL_forcepz00_9,
		bool_t BgL_foreignpz00_10)
	{
		{	/* Cc/ld.scm 103 */
		BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00:
			{
				obj_t BgL_libraryz00_166;
				obj_t BgL_backendz00_167;

				{	/* Cc/ld.scm 116 */
					obj_t BgL_backendz00_145;

					{	/* Cc/ld.scm 116 */
						obj_t BgL_arg1265z00_165;

						BgL_arg1265z00_165 = BGl_thezd2backendzd2zzbackend_backendz00();
						BgL_backendz00_145 =
							(((BgL_backendz00_bglt) COBJECT(
									((BgL_backendz00_bglt) BgL_arg1265z00_165)))->BgL_srfi0z00);
					}
					if (BgL_foreignpz00_10)
						{	/* Cc/ld.scm 118 */
							obj_t BgL_arg1248z00_146;

							{	/* Cc/ld.scm 118 */
								obj_t BgL_arg1454z00_1563;

								BgL_arg1454z00_1563 =
									SYMBOL_TO_STRING(((obj_t) BgL_libraryz00_6));
								BgL_arg1248z00_146 =
									BGl_stringzd2copyzd2zz__r4_strings_6_7z00
									(BgL_arg1454z00_1563);
							}
							BgL_libraryz00_166 = BgL_arg1248z00_146;
							BgL_backendz00_167 = BgL_backendz00_145;
						BgL_zc3z04anonymousza31266ze3z87_168:
							{	/* Cc/ld.scm 107 */
								obj_t BgL_arg1275z00_169;

								{	/* Cc/ld.scm 107 */
									bool_t BgL_test2476z00_2220;

									{	/* Cc/ld.scm 107 */
										bool_t BgL_test2477z00_2221;

										{	/* Cc/ld.scm 107 */
											obj_t BgL_string1z00_1527;

											BgL_string1z00_1527 = string_to_bstring(OS_CLASS);
											{	/* Cc/ld.scm 107 */
												long BgL_l1z00_1529;

												BgL_l1z00_1529 = STRING_LENGTH(BgL_string1z00_1527);
												if ((BgL_l1z00_1529 == 4L))
													{	/* Cc/ld.scm 107 */
														int BgL_arg1303z00_1532;

														{	/* Cc/ld.scm 107 */
															char *BgL_auxz00_2228;
															char *BgL_tmpz00_2226;

															BgL_auxz00_2228 =
																BSTRING_TO_STRING(BGl_string2383z00zzcc_ldz00);
															BgL_tmpz00_2226 =
																BSTRING_TO_STRING(BgL_string1z00_1527);
															BgL_arg1303z00_1532 =
																memcmp(BgL_tmpz00_2226, BgL_auxz00_2228,
																BgL_l1z00_1529);
														}
														BgL_test2477z00_2221 =
															((long) (BgL_arg1303z00_1532) == 0L);
													}
												else
													{	/* Cc/ld.scm 107 */
														BgL_test2477z00_2221 = ((bool_t) 0);
													}
											}
										}
										if (BgL_test2477z00_2221)
											{	/* Cc/ld.scm 107 */
												BgL_test2476z00_2220 = ((bool_t) 1);
											}
										else
											{	/* Cc/ld.scm 108 */
												obj_t BgL_string1z00_1538;

												BgL_string1z00_1538 = string_to_bstring(OS_CLASS);
												{	/* Cc/ld.scm 108 */
													long BgL_l1z00_1540;

													BgL_l1z00_1540 = STRING_LENGTH(BgL_string1z00_1538);
													if ((BgL_l1z00_1540 == 5L))
														{	/* Cc/ld.scm 108 */
															int BgL_arg1303z00_1543;

															{	/* Cc/ld.scm 108 */
																char *BgL_auxz00_2239;
																char *BgL_tmpz00_2237;

																BgL_auxz00_2239 =
																	BSTRING_TO_STRING
																	(BGl_string2384z00zzcc_ldz00);
																BgL_tmpz00_2237 =
																	BSTRING_TO_STRING(BgL_string1z00_1538);
																BgL_arg1303z00_1543 =
																	memcmp(BgL_tmpz00_2237, BgL_auxz00_2239,
																	BgL_l1z00_1540);
															}
															BgL_test2476z00_2220 =
																((long) (BgL_arg1303z00_1543) == 0L);
														}
													else
														{	/* Cc/ld.scm 108 */
															BgL_test2476z00_2220 = ((bool_t) 0);
														}
												}
											}
									}
									if (BgL_test2476z00_2220)
										{	/* Cc/ld.scm 107 */
											BgL_arg1275z00_169 = BGl_string2392z00zzcc_ldz00;
										}
									else
										{	/* Cc/ld.scm 110 */
											bool_t BgL_test2480z00_2244;

											{	/* Cc/ld.scm 110 */
												obj_t BgL_string1z00_1549;

												BgL_string1z00_1549 = string_to_bstring(OS_CLASS);
												{	/* Cc/ld.scm 110 */
													long BgL_l1z00_1551;

													BgL_l1z00_1551 = STRING_LENGTH(BgL_string1z00_1549);
													if ((BgL_l1z00_1551 == 5L))
														{	/* Cc/ld.scm 110 */
															int BgL_arg1303z00_1554;

															{	/* Cc/ld.scm 110 */
																char *BgL_auxz00_2251;
																char *BgL_tmpz00_2249;

																BgL_auxz00_2251 =
																	BSTRING_TO_STRING
																	(BGl_string2385z00zzcc_ldz00);
																BgL_tmpz00_2249 =
																	BSTRING_TO_STRING(BgL_string1z00_1549);
																BgL_arg1303z00_1554 =
																	memcmp(BgL_tmpz00_2249, BgL_auxz00_2251,
																	BgL_l1z00_1551);
															}
															BgL_test2480z00_2244 =
																((long) (BgL_arg1303z00_1554) == 0L);
														}
													else
														{	/* Cc/ld.scm 110 */
															BgL_test2480z00_2244 = ((bool_t) 0);
														}
												}
											}
											if (BgL_test2480z00_2244)
												{	/* Cc/ld.scm 110 */
													BgL_arg1275z00_169 = BGl_string2391z00zzcc_ldz00;
												}
											else
												{	/* Cc/ld.scm 110 */
													BgL_arg1275z00_169 =
														BGl_userzd2errorzd2zztools_errorz00
														(BGl_string2386z00zzcc_ldz00,
														BGl_string2387z00zzcc_ldz00,
														string_to_bstring(OS_CLASS), BNIL);
												}
										}
								}
								return string_append(BgL_arg1275z00_169, BgL_libraryz00_166);
							}
						}
					else
						{
							obj_t BgL_ssz00_148;

							BgL_ssz00_148 = BgL_suffixesz00_7;
						BgL_zc3z04anonymousza31249ze3z87_149:
							if (NULLP(BgL_ssz00_148))
								{	/* Cc/ld.scm 120 */
									if (CBOOL(BgL_staticpz00_8))
										{	/* Cc/ld.scm 123 */
											obj_t BgL_arg1252z00_151;

											{	/* Cc/ld.scm 123 */
												obj_t BgL_list1253z00_152;

												BgL_list1253z00_152 =
													MAKE_YOUNG_PAIR(BgL_libraryz00_6, BNIL);
												BgL_arg1252z00_151 =
													BGl_formatz00zz__r4_output_6_10_3z00
													(BGl_string2393z00zzcc_ldz00, BgL_list1253z00_152);
											}
											return
												BGl_errorz00zz__errorz00(BGl_string2394z00zzcc_ldz00,
												BgL_arg1252z00_151,
												BGl_za2libzd2dirza2zd2zzengine_paramz00);
										}
									else
										{
											obj_t BgL_staticpz00_2266;

											BgL_staticpz00_2266 = BTRUE;
											BgL_staticpz00_8 = BgL_staticpz00_2266;
											goto BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00;
										}
								}
							else
								{	/* Cc/ld.scm 126 */
									obj_t BgL_lnamez00_153;

									{	/* Cc/ld.scm 126 */
										obj_t BgL_arg1260z00_163;

										BgL_arg1260z00_163 = CAR(((obj_t) BgL_ssz00_148));
										BgL_lnamez00_153 =
											BGl_libraryzd2filezd2namez00zz__libraryz00
											(BgL_libraryz00_6, BgL_arg1260z00_163,
											BgL_backendz00_145);
									}
									{	/* Cc/ld.scm 126 */
										obj_t BgL_fnamez00_154;

										if (CBOOL(BgL_staticpz00_8))
											{	/* Cc/ld.scm 127 */
												BgL_fnamez00_154 =
													BGl_makezd2staticzd2libzd2namezd2zz__osz00
													(BgL_lnamez00_153, BgL_backendz00_145);
											}
										else
											{	/* Cc/ld.scm 127 */
												BgL_fnamez00_154 =
													BGl_makezd2sharedzd2libzd2namezd2zz__osz00
													(BgL_lnamez00_153, BgL_backendz00_145);
											}
										{	/* Cc/ld.scm 127 */
											obj_t BgL_namez00_155;

											BgL_namez00_155 =
												BGl_findzd2filezf2pathz20zz__osz00(BgL_fnamez00_154,
												BGl_za2libzd2dirza2zd2zzengine_paramz00);
											{	/* Cc/ld.scm 131 */

												if (STRINGP(BgL_namez00_155))
													{	/* Cc/ld.scm 133 */
														bool_t BgL_test2486z00_2277;

														if (CBOOL
															(BGl_za2ldzd2relativeza2zd2zzengine_paramz00))
															{	/* Cc/ld.scm 133 */
																if (CBOOL
																	(BGl_za2profilezd2libraryza2zd2zzengine_paramz00))
																	{	/* Cc/ld.scm 134 */
																		BgL_test2486z00_2277 = ((bool_t) 0);
																	}
																else
																	{	/* Cc/ld.scm 135 */
																		bool_t BgL_test2489z00_2282;

																		if (CBOOL(BgL_staticpz00_8))
																			{	/* Cc/ld.scm 135 */
																				BgL_test2489z00_2282 = ((bool_t) 1);
																			}
																		else
																			{	/* Cc/ld.scm 135 */
																				if (CBOOL
																					(BGl_za2staticzd2allzd2bigloozf3za2zf3zzengine_paramz00))
																					{	/* Cc/ld.scm 135 */
																						BgL_test2489z00_2282 = ((bool_t) 1);
																					}
																				else
																					{	/* Cc/ld.scm 135 */
																						BgL_test2489z00_2282 =
																							CBOOL
																							(BGl_za2staticzd2bigloozf3za2z21zzengine_paramz00);
																					}
																			}
																		if (BgL_test2489z00_2282)
																			{	/* Cc/ld.scm 135 */
																				BgL_test2486z00_2277 = ((bool_t) 0);
																			}
																		else
																			{	/* Cc/ld.scm 135 */
																				BgL_test2486z00_2277 = ((bool_t) 1);
																			}
																	}
															}
														else
															{	/* Cc/ld.scm 133 */
																BgL_test2486z00_2277 = ((bool_t) 0);
															}
														if (BgL_test2486z00_2277)
															{
																obj_t BgL_backendz00_2289;
																obj_t BgL_libraryz00_2288;

																BgL_libraryz00_2288 = BgL_lnamez00_153;
																BgL_backendz00_2289 = BgL_backendz00_145;
																BgL_backendz00_167 = BgL_backendz00_2289;
																BgL_libraryz00_166 = BgL_libraryz00_2288;
																goto BgL_zc3z04anonymousza31266ze3z87_168;
															}
														else
															{	/* Cc/ld.scm 133 */
																return BgL_namez00_155;
															}
													}
												else
													{	/* Cc/ld.scm 132 */
														{	/* Cc/ld.scm 142 */
															obj_t BgL_arg1257z00_160;

															{	/* Cc/ld.scm 142 */
																obj_t BgL_list1258z00_161;

																BgL_list1258z00_161 =
																	MAKE_YOUNG_PAIR(BgL_fnamez00_154, BNIL);
																BgL_arg1257z00_160 =
																	BGl_formatz00zz__r4_output_6_10_3z00
																	(BGl_string2395z00zzcc_ldz00,
																	BgL_list1258z00_161);
															}
															BGl_userzd2warningzd2zztools_errorz00
																(BGl_string2386z00zzcc_ldz00,
																BgL_arg1257z00_160,
																BGl_za2libzd2dirza2zd2zzengine_paramz00);
														}
														{	/* Cc/ld.scm 144 */
															obj_t BgL_arg1259z00_162;

															BgL_arg1259z00_162 = CDR(((obj_t) BgL_ssz00_148));
															{
																obj_t BgL_ssz00_2295;

																BgL_ssz00_2295 = BgL_arg1259z00_162;
																BgL_ssz00_148 = BgL_ssz00_2295;
																goto BgL_zc3z04anonymousza31249ze3z87_149;
															}
														}
													}
											}
										}
									}
								}
						}
				}
			}
		}

	}



/* unix-ld */
	obj_t BGl_unixzd2ldzd2zzcc_ldz00(obj_t BgL_namez00_11,
		bool_t BgL_needzd2tozd2returnz00_12)
	{
		{	/* Cc/ld.scm 149 */
			{

				{	/* Cc/ld.scm 173 */
					obj_t BgL_compz00_186;

					if ((BGl_za2passza2z00zzengine_paramz00 == CNST_TABLE_REF(14L)))
						{	/* Cc/ld.scm 173 */
							BgL_compz00_186 =
								BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(15L));
						}
					else
						{	/* Cc/ld.scm 173 */
							BgL_compz00_186 = BGl_za2ccza2z00zzengine_paramz00;
						}
					{	/* Cc/ld.scm 177 */
						obj_t BgL_list1293z00_187;

						{	/* Cc/ld.scm 177 */
							obj_t BgL_arg1294z00_188;

							{	/* Cc/ld.scm 177 */
								obj_t BgL_arg1322z00_189;

								{	/* Cc/ld.scm 177 */
									obj_t BgL_arg1323z00_190;

									BgL_arg1323z00_190 =
										MAKE_YOUNG_PAIR(BCHAR(((unsigned char) 10)), BNIL);
									BgL_arg1322z00_189 =
										MAKE_YOUNG_PAIR(BGl_string2397z00zzcc_ldz00,
										BgL_arg1323z00_190);
								}
								BgL_arg1294z00_188 =
									MAKE_YOUNG_PAIR(BgL_compz00_186, BgL_arg1322z00_189);
							}
							BgL_list1293z00_187 =
								MAKE_YOUNG_PAIR(BGl_string2398z00zzcc_ldz00,
								BgL_arg1294z00_188);
						}
						BGl_verbosez00zztools_speekz00(BINT(1L), BgL_list1293z00_187);
					}
					{	/* Cc/ld.scm 179 */
						obj_t BgL_staticpz00_191;

						{	/* Cc/ld.scm 179 */
							bool_t BgL__ortest_1048z00_379;

							if (CBOOL(BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
										(16L))))
								{	/* Cc/ld.scm 179 */
									BgL__ortest_1048z00_379 = ((bool_t) 0);
								}
							else
								{	/* Cc/ld.scm 179 */
									BgL__ortest_1048z00_379 = ((bool_t) 1);
								}
							if (BgL__ortest_1048z00_379)
								{	/* Cc/ld.scm 179 */
									BgL_staticpz00_191 = BBOOL(BgL__ortest_1048z00_379);
								}
							else
								{	/* Cc/ld.scm 180 */
									obj_t BgL_port1049z00_380;

									{	/* Cc/ld.scm 180 */
										obj_t BgL_stringz00_804;

										BgL_stringz00_804 =
											BGl_za2ldzd2optionsza2zd2zzengine_paramz00;
										{	/* Cc/ld.scm 180 */
											long BgL_endz00_806;

											BgL_endz00_806 =
												STRING_LENGTH(((obj_t) BgL_stringz00_804));
											{	/* Cc/ld.scm 180 */

												BgL_port1049z00_380 =
													BGl_openzd2inputzd2stringz00zz__r4_ports_6_10_1z00
													(BgL_stringz00_804, BINT(0L), BINT(BgL_endz00_806));
									}}}
									{	/* Cc/ld.scm 180 */
										obj_t BgL_exitd1050z00_381;

										BgL_exitd1050z00_381 = BGL_EXITD_TOP_AS_OBJ();
										{	/* Cc/ld.scm 180 */
											obj_t BgL_zc3z04anonymousza32017ze3z87_2008;

											BgL_zc3z04anonymousza32017ze3z87_2008 =
												MAKE_FX_PROCEDURE
												(BGl_z62zc3z04anonymousza32017ze3ze5zzcc_ldz00,
												(int) (0L), (int) (1L));
											PROCEDURE_SET(BgL_zc3z04anonymousza32017ze3z87_2008,
												(int) (0L), BgL_port1049z00_380);
											{	/* Cc/ld.scm 180 */
												obj_t BgL_arg1820z00_1580;

												{	/* Cc/ld.scm 180 */
													obj_t BgL_arg1821z00_1581;

													BgL_arg1821z00_1581 =
														BGL_EXITD_PROTECT(BgL_exitd1050z00_381);
													BgL_arg1820z00_1580 =
														MAKE_YOUNG_PAIR
														(BgL_zc3z04anonymousza32017ze3z87_2008,
														BgL_arg1821z00_1581);
												}
												BGL_EXITD_PROTECT_SET(BgL_exitd1050z00_381,
													BgL_arg1820z00_1580);
												BUNSPEC;
											}
											{	/* Cc/ld.scm 180 */
												obj_t BgL_tmp1052z00_383;

												{
													obj_t BgL_iportz00_425;
													long BgL_lastzd2matchzd2_426;
													long BgL_forwardz00_427;
													long BgL_bufposz00_428;
													obj_t BgL_iportz00_442;
													long BgL_lastzd2matchzd2_443;
													long BgL_forwardz00_444;
													long BgL_bufposz00_445;
													obj_t BgL_iportz00_463;
													long BgL_lastzd2matchzd2_464;
													long BgL_forwardz00_465;
													long BgL_bufposz00_466;
													obj_t BgL_iportz00_479;
													long BgL_lastzd2matchzd2_480;
													long BgL_forwardz00_481;
													long BgL_bufposz00_482;
													obj_t BgL_iportz00_499;
													long BgL_lastzd2matchzd2_500;
													long BgL_forwardz00_501;
													long BgL_bufposz00_502;
													obj_t BgL_iportz00_519;
													long BgL_lastzd2matchzd2_520;
													long BgL_forwardz00_521;
													long BgL_bufposz00_522;
													obj_t BgL_iportz00_539;
													long BgL_lastzd2matchzd2_540;
													long BgL_forwardz00_541;
													long BgL_bufposz00_542;
													obj_t BgL_iportz00_559;
													long BgL_lastzd2matchzd2_560;
													long BgL_forwardz00_561;
													long BgL_bufposz00_562;
													obj_t BgL_iportz00_579;
													long BgL_lastzd2matchzd2_580;
													long BgL_forwardz00_581;
													long BgL_bufposz00_582;
													obj_t BgL_iportz00_599;
													long BgL_lastzd2matchzd2_600;
													long BgL_forwardz00_601;
													long BgL_bufposz00_602;
													obj_t BgL_iportz00_622;
													long BgL_lastzd2matchzd2_623;
													long BgL_forwardz00_624;
													long BgL_bufposz00_625;

													RGC_START_MATCH(BgL_port1049z00_380);
													{	/* Cc/ld.scm 180 */
														long BgL_matchz00_756;

														{	/* Cc/ld.scm 180 */
															long BgL_arg2015z00_761;
															long BgL_arg2016z00_762;

															BgL_arg2015z00_761 =
																RGC_BUFFER_FORWARD(BgL_port1049z00_380);
															BgL_arg2016z00_762 =
																RGC_BUFFER_BUFPOS(BgL_port1049z00_380);
															BgL_iportz00_622 = BgL_port1049z00_380;
															BgL_lastzd2matchzd2_623 = 1L;
															BgL_forwardz00_624 = BgL_arg2015z00_761;
															BgL_bufposz00_625 = BgL_arg2016z00_762;
														BgL_zc3z04anonymousza31916ze3z87_626:
															if ((BgL_forwardz00_624 == BgL_bufposz00_625))
																{	/* Cc/ld.scm 180 */
																	if (rgc_fill_buffer(BgL_iportz00_622))
																		{	/* Cc/ld.scm 180 */
																			long BgL_arg1920z00_629;
																			long BgL_arg1921z00_630;

																			BgL_arg1920z00_629 =
																				RGC_BUFFER_FORWARD(BgL_iportz00_622);
																			BgL_arg1921z00_630 =
																				RGC_BUFFER_BUFPOS(BgL_iportz00_622);
																			{
																				long BgL_bufposz00_2338;
																				long BgL_forwardz00_2337;

																				BgL_forwardz00_2337 =
																					BgL_arg1920z00_629;
																				BgL_bufposz00_2338 = BgL_arg1921z00_630;
																				BgL_bufposz00_625 = BgL_bufposz00_2338;
																				BgL_forwardz00_624 =
																					BgL_forwardz00_2337;
																				goto
																					BgL_zc3z04anonymousza31916ze3z87_626;
																			}
																		}
																	else
																		{	/* Cc/ld.scm 180 */
																			BgL_matchz00_756 =
																				BgL_lastzd2matchzd2_623;
																		}
																}
															else
																{	/* Cc/ld.scm 180 */
																	int BgL_curz00_631;

																	BgL_curz00_631 =
																		RGC_BUFFER_GET_CHAR(BgL_iportz00_622,
																		BgL_forwardz00_624);
																	{	/* Cc/ld.scm 180 */

																		if (((long) (BgL_curz00_631) == 45L))
																			{	/* Cc/ld.scm 180 */
																				BgL_iportz00_442 = BgL_iportz00_622;
																				BgL_lastzd2matchzd2_443 =
																					BgL_lastzd2matchzd2_623;
																				BgL_forwardz00_444 =
																					(1L + BgL_forwardz00_624);
																				BgL_bufposz00_445 = BgL_bufposz00_625;
																			BgL_zc3z04anonymousza31752ze3z87_446:
																				{	/* Cc/ld.scm 180 */
																					long BgL_newzd2matchzd2_447;

																					RGC_STOP_MATCH(BgL_iportz00_442,
																						BgL_forwardz00_444);
																					BgL_newzd2matchzd2_447 = 1L;
																					if (
																						(BgL_forwardz00_444 ==
																							BgL_bufposz00_445))
																						{	/* Cc/ld.scm 180 */
																							if (rgc_fill_buffer
																								(BgL_iportz00_442))
																								{	/* Cc/ld.scm 180 */
																									long BgL_arg1759z00_450;
																									long BgL_arg1760z00_451;

																									BgL_arg1759z00_450 =
																										RGC_BUFFER_FORWARD
																										(BgL_iportz00_442);
																									BgL_arg1760z00_451 =
																										RGC_BUFFER_BUFPOS
																										(BgL_iportz00_442);
																									{
																										long BgL_bufposz00_2351;
																										long BgL_forwardz00_2350;

																										BgL_forwardz00_2350 =
																											BgL_arg1759z00_450;
																										BgL_bufposz00_2351 =
																											BgL_arg1760z00_451;
																										BgL_bufposz00_445 =
																											BgL_bufposz00_2351;
																										BgL_forwardz00_444 =
																											BgL_forwardz00_2350;
																										goto
																											BgL_zc3z04anonymousza31752ze3z87_446;
																									}
																								}
																							else
																								{	/* Cc/ld.scm 180 */
																									BgL_matchz00_756 =
																										BgL_newzd2matchzd2_447;
																								}
																						}
																					else
																						{	/* Cc/ld.scm 180 */
																							int BgL_curz00_452;

																							BgL_curz00_452 =
																								RGC_BUFFER_GET_CHAR
																								(BgL_iportz00_442,
																								BgL_forwardz00_444);
																							{	/* Cc/ld.scm 180 */

																								if (
																									((long) (BgL_curz00_452) ==
																										115L))
																									{	/* Cc/ld.scm 180 */
																										BgL_iportz00_499 =
																											BgL_iportz00_442;
																										BgL_lastzd2matchzd2_500 =
																											BgL_newzd2matchzd2_447;
																										BgL_forwardz00_501 =
																											(1L + BgL_forwardz00_444);
																										BgL_bufposz00_502 =
																											BgL_bufposz00_445;
																									BgL_zc3z04anonymousza31831ze3z87_503:
																										if (
																											(BgL_forwardz00_501 ==
																												BgL_bufposz00_502))
																											{	/* Cc/ld.scm 180 */
																												if (rgc_fill_buffer
																													(BgL_iportz00_499))
																													{	/* Cc/ld.scm 180 */
																														long
																															BgL_arg1834z00_506;
																														long
																															BgL_arg1835z00_507;
																														BgL_arg1834z00_506 =
																															RGC_BUFFER_FORWARD
																															(BgL_iportz00_499);
																														BgL_arg1835z00_507 =
																															RGC_BUFFER_BUFPOS
																															(BgL_iportz00_499);
																														{
																															long
																																BgL_bufposz00_2363;
																															long
																																BgL_forwardz00_2362;
																															BgL_forwardz00_2362
																																=
																																BgL_arg1834z00_506;
																															BgL_bufposz00_2363
																																=
																																BgL_arg1835z00_507;
																															BgL_bufposz00_502
																																=
																																BgL_bufposz00_2363;
																															BgL_forwardz00_501
																																=
																																BgL_forwardz00_2362;
																															goto
																																BgL_zc3z04anonymousza31831ze3z87_503;
																														}
																													}
																												else
																													{	/* Cc/ld.scm 180 */
																														BgL_matchz00_756 =
																															BgL_lastzd2matchzd2_500;
																													}
																											}
																										else
																											{	/* Cc/ld.scm 180 */
																												int BgL_curz00_508;

																												BgL_curz00_508 =
																													RGC_BUFFER_GET_CHAR
																													(BgL_iportz00_499,
																													BgL_forwardz00_501);
																												{	/* Cc/ld.scm 180 */

																													if (
																														((long)
																															(BgL_curz00_508)
																															== 116L))
																														{	/* Cc/ld.scm 180 */
																															BgL_iportz00_519 =
																																BgL_iportz00_499;
																															BgL_lastzd2matchzd2_520
																																=
																																BgL_lastzd2matchzd2_500;
																															BgL_forwardz00_521
																																=
																																(1L +
																																BgL_forwardz00_501);
																															BgL_bufposz00_522
																																=
																																BgL_bufposz00_502;
																														BgL_zc3z04anonymousza31844ze3z87_523:
																															if (
																																(BgL_forwardz00_521
																																	==
																																	BgL_bufposz00_522))
																																{	/* Cc/ld.scm 180 */
																																	if (rgc_fill_buffer(BgL_iportz00_519))
																																		{	/* Cc/ld.scm 180 */
																																			long
																																				BgL_arg1848z00_526;
																																			long
																																				BgL_arg1850z00_527;
																																			BgL_arg1848z00_526
																																				=
																																				RGC_BUFFER_FORWARD
																																				(BgL_iportz00_519);
																																			BgL_arg1850z00_527
																																				=
																																				RGC_BUFFER_BUFPOS
																																				(BgL_iportz00_519);
																																			{
																																				long
																																					BgL_bufposz00_2375;
																																				long
																																					BgL_forwardz00_2374;
																																				BgL_forwardz00_2374
																																					=
																																					BgL_arg1848z00_526;
																																				BgL_bufposz00_2375
																																					=
																																					BgL_arg1850z00_527;
																																				BgL_bufposz00_522
																																					=
																																					BgL_bufposz00_2375;
																																				BgL_forwardz00_521
																																					=
																																					BgL_forwardz00_2374;
																																				goto
																																					BgL_zc3z04anonymousza31844ze3z87_523;
																																			}
																																		}
																																	else
																																		{	/* Cc/ld.scm 180 */
																																			BgL_matchz00_756
																																				=
																																				BgL_lastzd2matchzd2_520;
																																		}
																																}
																															else
																																{	/* Cc/ld.scm 180 */
																																	int
																																		BgL_curz00_528;
																																	BgL_curz00_528
																																		=
																																		RGC_BUFFER_GET_CHAR
																																		(BgL_iportz00_519,
																																		BgL_forwardz00_521);
																																	{	/* Cc/ld.scm 180 */

																																		if (
																																			((long)
																																				(BgL_curz00_528)
																																				== 97L))
																																			{	/* Cc/ld.scm 180 */
																																				BgL_iportz00_539
																																					=
																																					BgL_iportz00_519;
																																				BgL_lastzd2matchzd2_540
																																					=
																																					BgL_lastzd2matchzd2_520;
																																				BgL_forwardz00_541
																																					=
																																					(1L +
																																					BgL_forwardz00_521);
																																				BgL_bufposz00_542
																																					=
																																					BgL_bufposz00_522;
																																			BgL_zc3z04anonymousza31861ze3z87_543:
																																				if (
																																					(BgL_forwardz00_541
																																						==
																																						BgL_bufposz00_542))
																																					{	/* Cc/ld.scm 180 */
																																						if (rgc_fill_buffer(BgL_iportz00_539))
																																							{	/* Cc/ld.scm 180 */
																																								long
																																									BgL_arg1864z00_546;
																																								long
																																									BgL_arg1866z00_547;
																																								BgL_arg1864z00_546
																																									=
																																									RGC_BUFFER_FORWARD
																																									(BgL_iportz00_539);
																																								BgL_arg1866z00_547
																																									=
																																									RGC_BUFFER_BUFPOS
																																									(BgL_iportz00_539);
																																								{
																																									long
																																										BgL_bufposz00_2387;
																																									long
																																										BgL_forwardz00_2386;
																																									BgL_forwardz00_2386
																																										=
																																										BgL_arg1864z00_546;
																																									BgL_bufposz00_2387
																																										=
																																										BgL_arg1866z00_547;
																																									BgL_bufposz00_542
																																										=
																																										BgL_bufposz00_2387;
																																									BgL_forwardz00_541
																																										=
																																										BgL_forwardz00_2386;
																																									goto
																																										BgL_zc3z04anonymousza31861ze3z87_543;
																																								}
																																							}
																																						else
																																							{	/* Cc/ld.scm 180 */
																																								BgL_matchz00_756
																																									=
																																									BgL_lastzd2matchzd2_540;
																																							}
																																					}
																																				else
																																					{	/* Cc/ld.scm 180 */
																																						int
																																							BgL_curz00_548;
																																						BgL_curz00_548
																																							=
																																							RGC_BUFFER_GET_CHAR
																																							(BgL_iportz00_539,
																																							BgL_forwardz00_541);
																																						{	/* Cc/ld.scm 180 */

																																							if (((long) (BgL_curz00_548) == 116L))
																																								{	/* Cc/ld.scm 180 */
																																									BgL_iportz00_559
																																										=
																																										BgL_iportz00_539;
																																									BgL_lastzd2matchzd2_560
																																										=
																																										BgL_lastzd2matchzd2_540;
																																									BgL_forwardz00_561
																																										=
																																										(1L
																																										+
																																										BgL_forwardz00_541);
																																									BgL_bufposz00_562
																																										=
																																										BgL_bufposz00_542;
																																								BgL_zc3z04anonymousza31876ze3z87_563:
																																									if ((BgL_forwardz00_561 == BgL_bufposz00_562))
																																										{	/* Cc/ld.scm 180 */
																																											if (rgc_fill_buffer(BgL_iportz00_559))
																																												{	/* Cc/ld.scm 180 */
																																													long
																																														BgL_arg1879z00_566;
																																													long
																																														BgL_arg1880z00_567;
																																													BgL_arg1879z00_566
																																														=
																																														RGC_BUFFER_FORWARD
																																														(BgL_iportz00_559);
																																													BgL_arg1880z00_567
																																														=
																																														RGC_BUFFER_BUFPOS
																																														(BgL_iportz00_559);
																																													{
																																														long
																																															BgL_bufposz00_2399;
																																														long
																																															BgL_forwardz00_2398;
																																														BgL_forwardz00_2398
																																															=
																																															BgL_arg1879z00_566;
																																														BgL_bufposz00_2399
																																															=
																																															BgL_arg1880z00_567;
																																														BgL_bufposz00_562
																																															=
																																															BgL_bufposz00_2399;
																																														BgL_forwardz00_561
																																															=
																																															BgL_forwardz00_2398;
																																														goto
																																															BgL_zc3z04anonymousza31876ze3z87_563;
																																													}
																																												}
																																											else
																																												{	/* Cc/ld.scm 180 */
																																													BgL_matchz00_756
																																														=
																																														BgL_lastzd2matchzd2_560;
																																												}
																																										}
																																									else
																																										{	/* Cc/ld.scm 180 */
																																											int
																																												BgL_curz00_568;
																																											BgL_curz00_568
																																												=
																																												RGC_BUFFER_GET_CHAR
																																												(BgL_iportz00_559,
																																												BgL_forwardz00_561);
																																											{	/* Cc/ld.scm 180 */

																																												if (((long) (BgL_curz00_568) == 105L))
																																													{	/* Cc/ld.scm 180 */
																																														BgL_iportz00_579
																																															=
																																															BgL_iportz00_559;
																																														BgL_lastzd2matchzd2_580
																																															=
																																															BgL_lastzd2matchzd2_560;
																																														BgL_forwardz00_581
																																															=
																																															(1L
																																															+
																																															BgL_forwardz00_561);
																																														BgL_bufposz00_582
																																															=
																																															BgL_bufposz00_562;
																																													BgL_zc3z04anonymousza31889ze3z87_583:
																																														if ((BgL_forwardz00_581 == BgL_bufposz00_582))
																																															{	/* Cc/ld.scm 180 */
																																																if (rgc_fill_buffer(BgL_iportz00_579))
																																																	{	/* Cc/ld.scm 180 */
																																																		long
																																																			BgL_arg1892z00_586;
																																																		long
																																																			BgL_arg1893z00_587;
																																																		BgL_arg1892z00_586
																																																			=
																																																			RGC_BUFFER_FORWARD
																																																			(BgL_iportz00_579);
																																																		BgL_arg1893z00_587
																																																			=
																																																			RGC_BUFFER_BUFPOS
																																																			(BgL_iportz00_579);
																																																		{
																																																			long
																																																				BgL_bufposz00_2411;
																																																			long
																																																				BgL_forwardz00_2410;
																																																			BgL_forwardz00_2410
																																																				=
																																																				BgL_arg1892z00_586;
																																																			BgL_bufposz00_2411
																																																				=
																																																				BgL_arg1893z00_587;
																																																			BgL_bufposz00_582
																																																				=
																																																				BgL_bufposz00_2411;
																																																			BgL_forwardz00_581
																																																				=
																																																				BgL_forwardz00_2410;
																																																			goto
																																																				BgL_zc3z04anonymousza31889ze3z87_583;
																																																		}
																																																	}
																																																else
																																																	{	/* Cc/ld.scm 180 */
																																																		BgL_matchz00_756
																																																			=
																																																			BgL_lastzd2matchzd2_580;
																																																	}
																																															}
																																														else
																																															{	/* Cc/ld.scm 180 */
																																																int
																																																	BgL_curz00_588;
																																																BgL_curz00_588
																																																	=
																																																	RGC_BUFFER_GET_CHAR
																																																	(BgL_iportz00_579,
																																																	BgL_forwardz00_581);
																																																{	/* Cc/ld.scm 180 */

																																																	if (((long) (BgL_curz00_588) == 99L))
																																																		{	/* Cc/ld.scm 180 */
																																																			BgL_iportz00_599
																																																				=
																																																				BgL_iportz00_579;
																																																			BgL_lastzd2matchzd2_600
																																																				=
																																																				BgL_lastzd2matchzd2_580;
																																																			BgL_forwardz00_601
																																																				=
																																																				(1L
																																																				+
																																																				BgL_forwardz00_581);
																																																			BgL_bufposz00_602
																																																				=
																																																				BgL_bufposz00_582;
																																																		BgL_zc3z04anonymousza31902ze3z87_603:
																																																			{	/* Cc/ld.scm 180 */
																																																				long
																																																					BgL_newzd2matchzd2_604;
																																																				RGC_STOP_MATCH
																																																					(BgL_iportz00_599,
																																																					BgL_forwardz00_601);
																																																				BgL_newzd2matchzd2_604
																																																					=
																																																					0L;
																																																				if ((BgL_forwardz00_601 == BgL_bufposz00_602))
																																																					{	/* Cc/ld.scm 180 */
																																																						if (rgc_fill_buffer(BgL_iportz00_599))
																																																							{	/* Cc/ld.scm 180 */
																																																								long
																																																									BgL_arg1905z00_607;
																																																								long
																																																									BgL_arg1908z00_608;
																																																								BgL_arg1905z00_607
																																																									=
																																																									RGC_BUFFER_FORWARD
																																																									(BgL_iportz00_599);
																																																								BgL_arg1908z00_608
																																																									=
																																																									RGC_BUFFER_BUFPOS
																																																									(BgL_iportz00_599);
																																																								{
																																																									long
																																																										BgL_bufposz00_2424;
																																																									long
																																																										BgL_forwardz00_2423;
																																																									BgL_forwardz00_2423
																																																										=
																																																										BgL_arg1905z00_607;
																																																									BgL_bufposz00_2424
																																																										=
																																																										BgL_arg1908z00_608;
																																																									BgL_bufposz00_602
																																																										=
																																																										BgL_bufposz00_2424;
																																																									BgL_forwardz00_601
																																																										=
																																																										BgL_forwardz00_2423;
																																																									goto
																																																										BgL_zc3z04anonymousza31902ze3z87_603;
																																																								}
																																																							}
																																																						else
																																																							{	/* Cc/ld.scm 180 */
																																																								BgL_matchz00_756
																																																									=
																																																									BgL_newzd2matchzd2_604;
																																																							}
																																																					}
																																																				else
																																																					{	/* Cc/ld.scm 180 */
																																																						int
																																																							BgL_curz00_609;
																																																						BgL_curz00_609
																																																							=
																																																							RGC_BUFFER_GET_CHAR
																																																							(BgL_iportz00_599,
																																																							BgL_forwardz00_601);
																																																						{	/* Cc/ld.scm 180 */

																																																							if (((long) (BgL_curz00_609) == 45L))
																																																								{	/* Cc/ld.scm 180 */
																																																									BgL_iportz00_479
																																																										=
																																																										BgL_iportz00_599;
																																																									BgL_lastzd2matchzd2_480
																																																										=
																																																										BgL_newzd2matchzd2_604;
																																																									BgL_forwardz00_481
																																																										=
																																																										(1L
																																																										+
																																																										BgL_forwardz00_601);
																																																									BgL_bufposz00_482
																																																										=
																																																										BgL_bufposz00_602;
																																																								BgL_zc3z04anonymousza31803ze3z87_483:
																																																									if ((BgL_forwardz00_481 == BgL_bufposz00_482))
																																																										{	/* Cc/ld.scm 180 */
																																																											if (rgc_fill_buffer(BgL_iportz00_479))
																																																												{	/* Cc/ld.scm 180 */
																																																													long
																																																														BgL_arg1816z00_486;
																																																													long
																																																														BgL_arg1822z00_487;
																																																													BgL_arg1816z00_486
																																																														=
																																																														RGC_BUFFER_FORWARD
																																																														(BgL_iportz00_479);
																																																													BgL_arg1822z00_487
																																																														=
																																																														RGC_BUFFER_BUFPOS
																																																														(BgL_iportz00_479);
																																																													{
																																																														long
																																																															BgL_bufposz00_2436;
																																																														long
																																																															BgL_forwardz00_2435;
																																																														BgL_forwardz00_2435
																																																															=
																																																															BgL_arg1816z00_486;
																																																														BgL_bufposz00_2436
																																																															=
																																																															BgL_arg1822z00_487;
																																																														BgL_bufposz00_482
																																																															=
																																																															BgL_bufposz00_2436;
																																																														BgL_forwardz00_481
																																																															=
																																																															BgL_forwardz00_2435;
																																																														goto
																																																															BgL_zc3z04anonymousza31803ze3z87_483;
																																																													}
																																																												}
																																																											else
																																																												{	/* Cc/ld.scm 180 */
																																																													BgL_matchz00_756
																																																														=
																																																														BgL_lastzd2matchzd2_480;
																																																												}
																																																										}
																																																									else
																																																										{	/* Cc/ld.scm 180 */
																																																											int
																																																												BgL_curz00_488;
																																																											BgL_curz00_488
																																																												=
																																																												RGC_BUFFER_GET_CHAR
																																																												(BgL_iportz00_479,
																																																												BgL_forwardz00_481);
																																																											{	/* Cc/ld.scm 180 */

																																																												if (((long) (BgL_curz00_488) == 115L))
																																																													{
																																																														long
																																																															BgL_bufposz00_2445;
																																																														long
																																																															BgL_forwardz00_2443;
																																																														long
																																																															BgL_lastzd2matchzd2_2442;
																																																														obj_t
																																																															BgL_iportz00_2441;
																																																														BgL_iportz00_2441
																																																															=
																																																															BgL_iportz00_479;
																																																														BgL_lastzd2matchzd2_2442
																																																															=
																																																															BgL_lastzd2matchzd2_480;
																																																														BgL_forwardz00_2443
																																																															=
																																																															(1L
																																																															+
																																																															BgL_forwardz00_481);
																																																														BgL_bufposz00_2445
																																																															=
																																																															BgL_bufposz00_482;
																																																														BgL_bufposz00_502
																																																															=
																																																															BgL_bufposz00_2445;
																																																														BgL_forwardz00_501
																																																															=
																																																															BgL_forwardz00_2443;
																																																														BgL_lastzd2matchzd2_500
																																																															=
																																																															BgL_lastzd2matchzd2_2442;
																																																														BgL_iportz00_499
																																																															=
																																																															BgL_iportz00_2441;
																																																														goto
																																																															BgL_zc3z04anonymousza31831ze3z87_503;
																																																													}
																																																												else
																																																													{	/* Cc/ld.scm 180 */
																																																														if (((long) (BgL_curz00_488) == 45L))
																																																															{
																																																																long
																																																																	BgL_forwardz00_2449;
																																																																BgL_forwardz00_2449
																																																																	=
																																																																	(1L
																																																																	+
																																																																	BgL_forwardz00_481);
																																																																BgL_forwardz00_481
																																																																	=
																																																																	BgL_forwardz00_2449;
																																																																goto
																																																																	BgL_zc3z04anonymousza31803ze3z87_483;
																																																															}
																																																														else
																																																															{	/* Cc/ld.scm 180 */
																																																																bool_t
																																																																	BgL_test2523z00_2451;
																																																																if (((long) (BgL_curz00_488) == 10L))
																																																																	{	/* Cc/ld.scm 180 */
																																																																		BgL_test2523z00_2451
																																																																			=
																																																																			(
																																																																			(bool_t)
																																																																			1);
																																																																	}
																																																																else
																																																																	{	/* Cc/ld.scm 180 */
																																																																		if (((long) (BgL_curz00_488) == 45L))
																																																																			{	/* Cc/ld.scm 180 */
																																																																				BgL_test2523z00_2451
																																																																					=
																																																																					(
																																																																					(bool_t)
																																																																					1);
																																																																			}
																																																																		else
																																																																			{	/* Cc/ld.scm 180 */
																																																																				BgL_test2523z00_2451
																																																																					=
																																																																					(
																																																																					(long)
																																																																					(BgL_curz00_488)
																																																																					==
																																																																					115L);
																																																																	}}
																																																																if (BgL_test2523z00_2451)
																																																																	{	/* Cc/ld.scm 180 */
																																																																		BgL_matchz00_756
																																																																			=
																																																																			BgL_lastzd2matchzd2_480;
																																																																	}
																																																																else
																																																																	{	/* Cc/ld.scm 180 */
																																																																		BgL_iportz00_463
																																																																			=
																																																																			BgL_iportz00_479;
																																																																		BgL_lastzd2matchzd2_464
																																																																			=
																																																																			BgL_lastzd2matchzd2_480;
																																																																		BgL_forwardz00_465
																																																																			=
																																																																			(1L
																																																																			+
																																																																			BgL_forwardz00_481);
																																																																		BgL_bufposz00_466
																																																																			=
																																																																			BgL_bufposz00_482;
																																																																	BgL_zc3z04anonymousza31774ze3z87_467:
																																																																		if ((BgL_forwardz00_465 == BgL_bufposz00_466))
																																																																			{	/* Cc/ld.scm 180 */
																																																																				if (rgc_fill_buffer(BgL_iportz00_463))
																																																																					{	/* Cc/ld.scm 180 */
																																																																						long
																																																																							BgL_arg1793z00_470;
																																																																						long
																																																																							BgL_arg1794z00_471;
																																																																						BgL_arg1793z00_470
																																																																							=
																																																																							RGC_BUFFER_FORWARD
																																																																							(BgL_iportz00_463);
																																																																						BgL_arg1794z00_471
																																																																							=
																																																																							RGC_BUFFER_BUFPOS
																																																																							(BgL_iportz00_463);
																																																																						{
																																																																							long
																																																																								BgL_bufposz00_2467;
																																																																							long
																																																																								BgL_forwardz00_2466;
																																																																							BgL_forwardz00_2466
																																																																								=
																																																																								BgL_arg1793z00_470;
																																																																							BgL_bufposz00_2467
																																																																								=
																																																																								BgL_arg1794z00_471;
																																																																							BgL_bufposz00_466
																																																																								=
																																																																								BgL_bufposz00_2467;
																																																																							BgL_forwardz00_465
																																																																								=
																																																																								BgL_forwardz00_2466;
																																																																							goto
																																																																								BgL_zc3z04anonymousza31774ze3z87_467;
																																																																						}
																																																																					}
																																																																				else
																																																																					{	/* Cc/ld.scm 180 */
																																																																						BgL_matchz00_756
																																																																							=
																																																																							BgL_lastzd2matchzd2_464;
																																																																					}
																																																																			}
																																																																		else
																																																																			{	/* Cc/ld.scm 180 */
																																																																				int
																																																																					BgL_curz00_472;
																																																																				BgL_curz00_472
																																																																					=
																																																																					RGC_BUFFER_GET_CHAR
																																																																					(BgL_iportz00_463,
																																																																					BgL_forwardz00_465);
																																																																				{	/* Cc/ld.scm 180 */

																																																																					if (((long) (BgL_curz00_472) == 45L))
																																																																						{
																																																																							long
																																																																								BgL_bufposz00_2476;
																																																																							long
																																																																								BgL_forwardz00_2474;
																																																																							long
																																																																								BgL_lastzd2matchzd2_2473;
																																																																							obj_t
																																																																								BgL_iportz00_2472;
																																																																							BgL_iportz00_2472
																																																																								=
																																																																								BgL_iportz00_463;
																																																																							BgL_lastzd2matchzd2_2473
																																																																								=
																																																																								BgL_lastzd2matchzd2_464;
																																																																							BgL_forwardz00_2474
																																																																								=
																																																																								(1L
																																																																								+
																																																																								BgL_forwardz00_465);
																																																																							BgL_bufposz00_2476
																																																																								=
																																																																								BgL_bufposz00_466;
																																																																							BgL_bufposz00_482
																																																																								=
																																																																								BgL_bufposz00_2476;
																																																																							BgL_forwardz00_481
																																																																								=
																																																																								BgL_forwardz00_2474;
																																																																							BgL_lastzd2matchzd2_480
																																																																								=
																																																																								BgL_lastzd2matchzd2_2473;
																																																																							BgL_iportz00_479
																																																																								=
																																																																								BgL_iportz00_2472;
																																																																							goto
																																																																								BgL_zc3z04anonymousza31803ze3z87_483;
																																																																						}
																																																																					else
																																																																						{	/* Cc/ld.scm 180 */
																																																																							bool_t
																																																																								BgL_test2529z00_2477;
																																																																							if (((long) (BgL_curz00_472) == 10L))
																																																																								{	/* Cc/ld.scm 180 */
																																																																									BgL_test2529z00_2477
																																																																										=
																																																																										(
																																																																										(bool_t)
																																																																										1);
																																																																								}
																																																																							else
																																																																								{	/* Cc/ld.scm 180 */
																																																																									BgL_test2529z00_2477
																																																																										=
																																																																										(
																																																																										(long)
																																																																										(BgL_curz00_472)
																																																																										==
																																																																										45L);
																																																																								}
																																																																							if (BgL_test2529z00_2477)
																																																																								{	/* Cc/ld.scm 180 */
																																																																									BgL_matchz00_756
																																																																										=
																																																																										BgL_lastzd2matchzd2_464;
																																																																								}
																																																																							else
																																																																								{
																																																																									long
																																																																										BgL_forwardz00_2483;
																																																																									BgL_forwardz00_2483
																																																																										=
																																																																										(1L
																																																																										+
																																																																										BgL_forwardz00_465);
																																																																									BgL_forwardz00_465
																																																																										=
																																																																										BgL_forwardz00_2483;
																																																																									goto
																																																																										BgL_zc3z04anonymousza31774ze3z87_467;
																																																																								}
																																																																						}
																																																																				}
																																																																			}
																																																																	}
																																																															}
																																																													}
																																																											}
																																																										}
																																																								}
																																																							else
																																																								{	/* Cc/ld.scm 180 */
																																																									bool_t
																																																										BgL_test2531z00_2487;
																																																									if (((long) (BgL_curz00_609) == 10L))
																																																										{	/* Cc/ld.scm 180 */
																																																											BgL_test2531z00_2487
																																																												=
																																																												(
																																																												(bool_t)
																																																												1);
																																																										}
																																																									else
																																																										{	/* Cc/ld.scm 180 */
																																																											BgL_test2531z00_2487
																																																												=
																																																												(
																																																												(long)
																																																												(BgL_curz00_609)
																																																												==
																																																												45L);
																																																										}
																																																									if (BgL_test2531z00_2487)
																																																										{	/* Cc/ld.scm 180 */
																																																											BgL_matchz00_756
																																																												=
																																																												BgL_newzd2matchzd2_604;
																																																										}
																																																									else
																																																										{
																																																											long
																																																												BgL_bufposz00_2497;
																																																											long
																																																												BgL_forwardz00_2495;
																																																											long
																																																												BgL_lastzd2matchzd2_2494;
																																																											obj_t
																																																												BgL_iportz00_2493;
																																																											BgL_iportz00_2493
																																																												=
																																																												BgL_iportz00_599;
																																																											BgL_lastzd2matchzd2_2494
																																																												=
																																																												BgL_newzd2matchzd2_604;
																																																											BgL_forwardz00_2495
																																																												=
																																																												(1L
																																																												+
																																																												BgL_forwardz00_601);
																																																											BgL_bufposz00_2497
																																																												=
																																																												BgL_bufposz00_602;
																																																											BgL_bufposz00_466
																																																												=
																																																												BgL_bufposz00_2497;
																																																											BgL_forwardz00_465
																																																												=
																																																												BgL_forwardz00_2495;
																																																											BgL_lastzd2matchzd2_464
																																																												=
																																																												BgL_lastzd2matchzd2_2494;
																																																											BgL_iportz00_463
																																																												=
																																																												BgL_iportz00_2493;
																																																											goto
																																																												BgL_zc3z04anonymousza31774ze3z87_467;
																																																										}
																																																								}
																																																						}
																																																					}
																																																			}
																																																		}
																																																	else
																																																		{	/* Cc/ld.scm 180 */
																																																			if (((long) (BgL_curz00_588) == 45L))
																																																				{
																																																					long
																																																						BgL_bufposz00_2506;
																																																					long
																																																						BgL_forwardz00_2504;
																																																					long
																																																						BgL_lastzd2matchzd2_2503;
																																																					obj_t
																																																						BgL_iportz00_2502;
																																																					BgL_iportz00_2502
																																																						=
																																																						BgL_iportz00_579;
																																																					BgL_lastzd2matchzd2_2503
																																																						=
																																																						BgL_lastzd2matchzd2_580;
																																																					BgL_forwardz00_2504
																																																						=
																																																						(1L
																																																						+
																																																						BgL_forwardz00_581);
																																																					BgL_bufposz00_2506
																																																						=
																																																						BgL_bufposz00_582;
																																																					BgL_bufposz00_482
																																																						=
																																																						BgL_bufposz00_2506;
																																																					BgL_forwardz00_481
																																																						=
																																																						BgL_forwardz00_2504;
																																																					BgL_lastzd2matchzd2_480
																																																						=
																																																						BgL_lastzd2matchzd2_2503;
																																																					BgL_iportz00_479
																																																						=
																																																						BgL_iportz00_2502;
																																																					goto
																																																						BgL_zc3z04anonymousza31803ze3z87_483;
																																																				}
																																																			else
																																																				{	/* Cc/ld.scm 180 */
																																																					bool_t
																																																						BgL_test2534z00_2507;
																																																					if (((long) (BgL_curz00_588) == 10L))
																																																						{	/* Cc/ld.scm 180 */
																																																							BgL_test2534z00_2507
																																																								=
																																																								(
																																																								(bool_t)
																																																								1);
																																																						}
																																																					else
																																																						{	/* Cc/ld.scm 180 */
																																																							if (((long) (BgL_curz00_588) == 45L))
																																																								{	/* Cc/ld.scm 180 */
																																																									BgL_test2534z00_2507
																																																										=
																																																										(
																																																										(bool_t)
																																																										1);
																																																								}
																																																							else
																																																								{	/* Cc/ld.scm 180 */
																																																									BgL_test2534z00_2507
																																																										=
																																																										(
																																																										(long)
																																																										(BgL_curz00_588)
																																																										==
																																																										99L);
																																																						}}
																																																					if (BgL_test2534z00_2507)
																																																						{	/* Cc/ld.scm 180 */
																																																							BgL_matchz00_756
																																																								=
																																																								BgL_lastzd2matchzd2_580;
																																																						}
																																																					else
																																																						{
																																																							long
																																																								BgL_bufposz00_2520;
																																																							long
																																																								BgL_forwardz00_2518;
																																																							long
																																																								BgL_lastzd2matchzd2_2517;
																																																							obj_t
																																																								BgL_iportz00_2516;
																																																							BgL_iportz00_2516
																																																								=
																																																								BgL_iportz00_579;
																																																							BgL_lastzd2matchzd2_2517
																																																								=
																																																								BgL_lastzd2matchzd2_580;
																																																							BgL_forwardz00_2518
																																																								=
																																																								(1L
																																																								+
																																																								BgL_forwardz00_581);
																																																							BgL_bufposz00_2520
																																																								=
																																																								BgL_bufposz00_582;
																																																							BgL_bufposz00_466
																																																								=
																																																								BgL_bufposz00_2520;
																																																							BgL_forwardz00_465
																																																								=
																																																								BgL_forwardz00_2518;
																																																							BgL_lastzd2matchzd2_464
																																																								=
																																																								BgL_lastzd2matchzd2_2517;
																																																							BgL_iportz00_463
																																																								=
																																																								BgL_iportz00_2516;
																																																							goto
																																																								BgL_zc3z04anonymousza31774ze3z87_467;
																																																						}
																																																				}
																																																		}
																																																}
																																															}
																																													}
																																												else
																																													{	/* Cc/ld.scm 180 */
																																														if (((long) (BgL_curz00_568) == 45L))
																																															{
																																																long
																																																	BgL_bufposz00_2529;
																																																long
																																																	BgL_forwardz00_2527;
																																																long
																																																	BgL_lastzd2matchzd2_2526;
																																																obj_t
																																																	BgL_iportz00_2525;
																																																BgL_iportz00_2525
																																																	=
																																																	BgL_iportz00_559;
																																																BgL_lastzd2matchzd2_2526
																																																	=
																																																	BgL_lastzd2matchzd2_560;
																																																BgL_forwardz00_2527
																																																	=
																																																	(1L
																																																	+
																																																	BgL_forwardz00_561);
																																																BgL_bufposz00_2529
																																																	=
																																																	BgL_bufposz00_562;
																																																BgL_bufposz00_482
																																																	=
																																																	BgL_bufposz00_2529;
																																																BgL_forwardz00_481
																																																	=
																																																	BgL_forwardz00_2527;
																																																BgL_lastzd2matchzd2_480
																																																	=
																																																	BgL_lastzd2matchzd2_2526;
																																																BgL_iportz00_479
																																																	=
																																																	BgL_iportz00_2525;
																																																goto
																																																	BgL_zc3z04anonymousza31803ze3z87_483;
																																															}
																																														else
																																															{	/* Cc/ld.scm 180 */
																																																bool_t
																																																	BgL_test2538z00_2530;
																																																if (((long) (BgL_curz00_568) == 10L))
																																																	{	/* Cc/ld.scm 180 */
																																																		BgL_test2538z00_2530
																																																			=
																																																			(
																																																			(bool_t)
																																																			1);
																																																	}
																																																else
																																																	{	/* Cc/ld.scm 180 */
																																																		if (((long) (BgL_curz00_568) == 45L))
																																																			{	/* Cc/ld.scm 180 */
																																																				BgL_test2538z00_2530
																																																					=
																																																					(
																																																					(bool_t)
																																																					1);
																																																			}
																																																		else
																																																			{	/* Cc/ld.scm 180 */
																																																				BgL_test2538z00_2530
																																																					=
																																																					(
																																																					(long)
																																																					(BgL_curz00_568)
																																																					==
																																																					105L);
																																																	}}
																																																if (BgL_test2538z00_2530)
																																																	{	/* Cc/ld.scm 180 */
																																																		BgL_matchz00_756
																																																			=
																																																			BgL_lastzd2matchzd2_560;
																																																	}
																																																else
																																																	{
																																																		long
																																																			BgL_bufposz00_2543;
																																																		long
																																																			BgL_forwardz00_2541;
																																																		long
																																																			BgL_lastzd2matchzd2_2540;
																																																		obj_t
																																																			BgL_iportz00_2539;
																																																		BgL_iportz00_2539
																																																			=
																																																			BgL_iportz00_559;
																																																		BgL_lastzd2matchzd2_2540
																																																			=
																																																			BgL_lastzd2matchzd2_560;
																																																		BgL_forwardz00_2541
																																																			=
																																																			(1L
																																																			+
																																																			BgL_forwardz00_561);
																																																		BgL_bufposz00_2543
																																																			=
																																																			BgL_bufposz00_562;
																																																		BgL_bufposz00_466
																																																			=
																																																			BgL_bufposz00_2543;
																																																		BgL_forwardz00_465
																																																			=
																																																			BgL_forwardz00_2541;
																																																		BgL_lastzd2matchzd2_464
																																																			=
																																																			BgL_lastzd2matchzd2_2540;
																																																		BgL_iportz00_463
																																																			=
																																																			BgL_iportz00_2539;
																																																		goto
																																																			BgL_zc3z04anonymousza31774ze3z87_467;
																																																	}
																																															}
																																													}
																																											}
																																										}
																																								}
																																							else
																																								{	/* Cc/ld.scm 180 */
																																									if (((long) (BgL_curz00_548) == 45L))
																																										{
																																											long
																																												BgL_bufposz00_2552;
																																											long
																																												BgL_forwardz00_2550;
																																											long
																																												BgL_lastzd2matchzd2_2549;
																																											obj_t
																																												BgL_iportz00_2548;
																																											BgL_iportz00_2548
																																												=
																																												BgL_iportz00_539;
																																											BgL_lastzd2matchzd2_2549
																																												=
																																												BgL_lastzd2matchzd2_540;
																																											BgL_forwardz00_2550
																																												=
																																												(1L
																																												+
																																												BgL_forwardz00_541);
																																											BgL_bufposz00_2552
																																												=
																																												BgL_bufposz00_542;
																																											BgL_bufposz00_482
																																												=
																																												BgL_bufposz00_2552;
																																											BgL_forwardz00_481
																																												=
																																												BgL_forwardz00_2550;
																																											BgL_lastzd2matchzd2_480
																																												=
																																												BgL_lastzd2matchzd2_2549;
																																											BgL_iportz00_479
																																												=
																																												BgL_iportz00_2548;
																																											goto
																																												BgL_zc3z04anonymousza31803ze3z87_483;
																																										}
																																									else
																																										{	/* Cc/ld.scm 180 */
																																											bool_t
																																												BgL_test2542z00_2553;
																																											if (((long) (BgL_curz00_548) == 10L))
																																												{	/* Cc/ld.scm 180 */
																																													BgL_test2542z00_2553
																																														=
																																														(
																																														(bool_t)
																																														1);
																																												}
																																											else
																																												{	/* Cc/ld.scm 180 */
																																													if (((long) (BgL_curz00_548) == 45L))
																																														{	/* Cc/ld.scm 180 */
																																															BgL_test2542z00_2553
																																																=
																																																(
																																																(bool_t)
																																																1);
																																														}
																																													else
																																														{	/* Cc/ld.scm 180 */
																																															BgL_test2542z00_2553
																																																=
																																																(
																																																(long)
																																																(BgL_curz00_548)
																																																==
																																																116L);
																																												}}
																																											if (BgL_test2542z00_2553)
																																												{	/* Cc/ld.scm 180 */
																																													BgL_matchz00_756
																																														=
																																														BgL_lastzd2matchzd2_540;
																																												}
																																											else
																																												{
																																													long
																																														BgL_bufposz00_2566;
																																													long
																																														BgL_forwardz00_2564;
																																													long
																																														BgL_lastzd2matchzd2_2563;
																																													obj_t
																																														BgL_iportz00_2562;
																																													BgL_iportz00_2562
																																														=
																																														BgL_iportz00_539;
																																													BgL_lastzd2matchzd2_2563
																																														=
																																														BgL_lastzd2matchzd2_540;
																																													BgL_forwardz00_2564
																																														=
																																														(1L
																																														+
																																														BgL_forwardz00_541);
																																													BgL_bufposz00_2566
																																														=
																																														BgL_bufposz00_542;
																																													BgL_bufposz00_466
																																														=
																																														BgL_bufposz00_2566;
																																													BgL_forwardz00_465
																																														=
																																														BgL_forwardz00_2564;
																																													BgL_lastzd2matchzd2_464
																																														=
																																														BgL_lastzd2matchzd2_2563;
																																													BgL_iportz00_463
																																														=
																																														BgL_iportz00_2562;
																																													goto
																																														BgL_zc3z04anonymousza31774ze3z87_467;
																																												}
																																										}
																																								}
																																						}
																																					}
																																			}
																																		else
																																			{	/* Cc/ld.scm 180 */
																																				if (
																																					((long) (BgL_curz00_528) == 45L))
																																					{
																																						long
																																							BgL_bufposz00_2575;
																																						long
																																							BgL_forwardz00_2573;
																																						long
																																							BgL_lastzd2matchzd2_2572;
																																						obj_t
																																							BgL_iportz00_2571;
																																						BgL_iportz00_2571
																																							=
																																							BgL_iportz00_519;
																																						BgL_lastzd2matchzd2_2572
																																							=
																																							BgL_lastzd2matchzd2_520;
																																						BgL_forwardz00_2573
																																							=
																																							(1L
																																							+
																																							BgL_forwardz00_521);
																																						BgL_bufposz00_2575
																																							=
																																							BgL_bufposz00_522;
																																						BgL_bufposz00_482
																																							=
																																							BgL_bufposz00_2575;
																																						BgL_forwardz00_481
																																							=
																																							BgL_forwardz00_2573;
																																						BgL_lastzd2matchzd2_480
																																							=
																																							BgL_lastzd2matchzd2_2572;
																																						BgL_iportz00_479
																																							=
																																							BgL_iportz00_2571;
																																						goto
																																							BgL_zc3z04anonymousza31803ze3z87_483;
																																					}
																																				else
																																					{	/* Cc/ld.scm 180 */
																																						bool_t
																																							BgL_test2546z00_2576;
																																						if (
																																							((long) (BgL_curz00_528) == 10L))
																																							{	/* Cc/ld.scm 180 */
																																								BgL_test2546z00_2576
																																									=
																																									(
																																									(bool_t)
																																									1);
																																							}
																																						else
																																							{	/* Cc/ld.scm 180 */
																																								if (((long) (BgL_curz00_528) == 45L))
																																									{	/* Cc/ld.scm 180 */
																																										BgL_test2546z00_2576
																																											=
																																											(
																																											(bool_t)
																																											1);
																																									}
																																								else
																																									{	/* Cc/ld.scm 180 */
																																										BgL_test2546z00_2576
																																											=
																																											(
																																											(long)
																																											(BgL_curz00_528)
																																											==
																																											97L);
																																							}}
																																						if (BgL_test2546z00_2576)
																																							{	/* Cc/ld.scm 180 */
																																								BgL_matchz00_756
																																									=
																																									BgL_lastzd2matchzd2_520;
																																							}
																																						else
																																							{
																																								long
																																									BgL_bufposz00_2589;
																																								long
																																									BgL_forwardz00_2587;
																																								long
																																									BgL_lastzd2matchzd2_2586;
																																								obj_t
																																									BgL_iportz00_2585;
																																								BgL_iportz00_2585
																																									=
																																									BgL_iportz00_519;
																																								BgL_lastzd2matchzd2_2586
																																									=
																																									BgL_lastzd2matchzd2_520;
																																								BgL_forwardz00_2587
																																									=
																																									(1L
																																									+
																																									BgL_forwardz00_521);
																																								BgL_bufposz00_2589
																																									=
																																									BgL_bufposz00_522;
																																								BgL_bufposz00_466
																																									=
																																									BgL_bufposz00_2589;
																																								BgL_forwardz00_465
																																									=
																																									BgL_forwardz00_2587;
																																								BgL_lastzd2matchzd2_464
																																									=
																																									BgL_lastzd2matchzd2_2586;
																																								BgL_iportz00_463
																																									=
																																									BgL_iportz00_2585;
																																								goto
																																									BgL_zc3z04anonymousza31774ze3z87_467;
																																							}
																																					}
																																			}
																																	}
																																}
																														}
																													else
																														{	/* Cc/ld.scm 180 */
																															if (
																																((long)
																																	(BgL_curz00_508)
																																	== 45L))
																																{
																																	long
																																		BgL_bufposz00_2598;
																																	long
																																		BgL_forwardz00_2596;
																																	long
																																		BgL_lastzd2matchzd2_2595;
																																	obj_t
																																		BgL_iportz00_2594;
																																	BgL_iportz00_2594
																																		=
																																		BgL_iportz00_499;
																																	BgL_lastzd2matchzd2_2595
																																		=
																																		BgL_lastzd2matchzd2_500;
																																	BgL_forwardz00_2596
																																		=
																																		(1L +
																																		BgL_forwardz00_501);
																																	BgL_bufposz00_2598
																																		=
																																		BgL_bufposz00_502;
																																	BgL_bufposz00_482
																																		=
																																		BgL_bufposz00_2598;
																																	BgL_forwardz00_481
																																		=
																																		BgL_forwardz00_2596;
																																	BgL_lastzd2matchzd2_480
																																		=
																																		BgL_lastzd2matchzd2_2595;
																																	BgL_iportz00_479
																																		=
																																		BgL_iportz00_2594;
																																	goto
																																		BgL_zc3z04anonymousza31803ze3z87_483;
																																}
																															else
																																{	/* Cc/ld.scm 180 */
																																	bool_t
																																		BgL_test2550z00_2599;
																																	if (((long)
																																			(BgL_curz00_508)
																																			== 10L))
																																		{	/* Cc/ld.scm 180 */
																																			BgL_test2550z00_2599
																																				=
																																				(
																																				(bool_t)
																																				1);
																																		}
																																	else
																																		{	/* Cc/ld.scm 180 */
																																			if (
																																				((long)
																																					(BgL_curz00_508)
																																					==
																																					45L))
																																				{	/* Cc/ld.scm 180 */
																																					BgL_test2550z00_2599
																																						=
																																						(
																																						(bool_t)
																																						1);
																																				}
																																			else
																																				{	/* Cc/ld.scm 180 */
																																					BgL_test2550z00_2599
																																						=
																																						(
																																						(long)
																																						(BgL_curz00_508)
																																						==
																																						116L);
																																		}}
																																	if (BgL_test2550z00_2599)
																																		{	/* Cc/ld.scm 180 */
																																			BgL_matchz00_756
																																				=
																																				BgL_lastzd2matchzd2_500;
																																		}
																																	else
																																		{
																																			long
																																				BgL_bufposz00_2612;
																																			long
																																				BgL_forwardz00_2610;
																																			long
																																				BgL_lastzd2matchzd2_2609;
																																			obj_t
																																				BgL_iportz00_2608;
																																			BgL_iportz00_2608
																																				=
																																				BgL_iportz00_499;
																																			BgL_lastzd2matchzd2_2609
																																				=
																																				BgL_lastzd2matchzd2_500;
																																			BgL_forwardz00_2610
																																				=
																																				(1L +
																																				BgL_forwardz00_501);
																																			BgL_bufposz00_2612
																																				=
																																				BgL_bufposz00_502;
																																			BgL_bufposz00_466
																																				=
																																				BgL_bufposz00_2612;
																																			BgL_forwardz00_465
																																				=
																																				BgL_forwardz00_2610;
																																			BgL_lastzd2matchzd2_464
																																				=
																																				BgL_lastzd2matchzd2_2609;
																																			BgL_iportz00_463
																																				=
																																				BgL_iportz00_2608;
																																			goto
																																				BgL_zc3z04anonymousza31774ze3z87_467;
																																		}
																																}
																														}
																												}
																											}
																									}
																								else
																									{	/* Cc/ld.scm 180 */
																										if (
																											((long) (BgL_curz00_452)
																												== 45L))
																											{
																												long BgL_bufposz00_2621;
																												long
																													BgL_forwardz00_2619;
																												long
																													BgL_lastzd2matchzd2_2618;
																												obj_t BgL_iportz00_2617;

																												BgL_iportz00_2617 =
																													BgL_iportz00_442;
																												BgL_lastzd2matchzd2_2618
																													=
																													BgL_newzd2matchzd2_447;
																												BgL_forwardz00_2619 =
																													(1L +
																													BgL_forwardz00_444);
																												BgL_bufposz00_2621 =
																													BgL_bufposz00_445;
																												BgL_bufposz00_482 =
																													BgL_bufposz00_2621;
																												BgL_forwardz00_481 =
																													BgL_forwardz00_2619;
																												BgL_lastzd2matchzd2_480
																													=
																													BgL_lastzd2matchzd2_2618;
																												BgL_iportz00_479 =
																													BgL_iportz00_2617;
																												goto
																													BgL_zc3z04anonymousza31803ze3z87_483;
																											}
																										else
																											{	/* Cc/ld.scm 180 */
																												bool_t
																													BgL_test2554z00_2622;
																												if (((long)
																														(BgL_curz00_452) ==
																														10L))
																													{	/* Cc/ld.scm 180 */
																														BgL_test2554z00_2622
																															= ((bool_t) 1);
																													}
																												else
																													{	/* Cc/ld.scm 180 */
																														if (
																															((long)
																																(BgL_curz00_452)
																																== 45L))
																															{	/* Cc/ld.scm 180 */
																																BgL_test2554z00_2622
																																	=
																																	((bool_t) 1);
																															}
																														else
																															{	/* Cc/ld.scm 180 */
																																BgL_test2554z00_2622
																																	=
																																	((long)
																																	(BgL_curz00_452)
																																	== 115L);
																													}}
																												if (BgL_test2554z00_2622)
																													{	/* Cc/ld.scm 180 */
																														BgL_matchz00_756 =
																															BgL_newzd2matchzd2_447;
																													}
																												else
																													{
																														long
																															BgL_bufposz00_2635;
																														long
																															BgL_forwardz00_2633;
																														long
																															BgL_lastzd2matchzd2_2632;
																														obj_t
																															BgL_iportz00_2631;
																														BgL_iportz00_2631 =
																															BgL_iportz00_442;
																														BgL_lastzd2matchzd2_2632
																															=
																															BgL_newzd2matchzd2_447;
																														BgL_forwardz00_2633
																															=
																															(1L +
																															BgL_forwardz00_444);
																														BgL_bufposz00_2635 =
																															BgL_bufposz00_445;
																														BgL_bufposz00_466 =
																															BgL_bufposz00_2635;
																														BgL_forwardz00_465 =
																															BgL_forwardz00_2633;
																														BgL_lastzd2matchzd2_464
																															=
																															BgL_lastzd2matchzd2_2632;
																														BgL_iportz00_463 =
																															BgL_iportz00_2631;
																														goto
																															BgL_zc3z04anonymousza31774ze3z87_467;
																													}
																											}
																									}
																							}
																						}
																				}
																			}
																		else
																			{	/* Cc/ld.scm 180 */
																				if (((long) (BgL_curz00_631) == 10L))
																					{	/* Cc/ld.scm 180 */
																						long BgL_arg1925z00_635;

																						BgL_arg1925z00_635 =
																							(1L + BgL_forwardz00_624);
																						{	/* Cc/ld.scm 180 */
																							long BgL_newzd2matchzd2_1743;

																							RGC_STOP_MATCH(BgL_iportz00_622,
																								BgL_arg1925z00_635);
																							BgL_newzd2matchzd2_1743 = 1L;
																							BgL_matchz00_756 =
																								BgL_newzd2matchzd2_1743;
																					}}
																				else
																					{	/* Cc/ld.scm 180 */
																						BgL_iportz00_425 = BgL_iportz00_622;
																						BgL_lastzd2matchzd2_426 =
																							BgL_lastzd2matchzd2_623;
																						BgL_forwardz00_427 =
																							(1L + BgL_forwardz00_624);
																						BgL_bufposz00_428 =
																							BgL_bufposz00_625;
																					BgL_zc3z04anonymousza31739ze3z87_429:
																						{	/* Cc/ld.scm 180 */
																							long BgL_newzd2matchzd2_430;

																							RGC_STOP_MATCH(BgL_iportz00_425,
																								BgL_forwardz00_427);
																							BgL_newzd2matchzd2_430 = 1L;
																							if (
																								(BgL_forwardz00_427 ==
																									BgL_bufposz00_428))
																								{	/* Cc/ld.scm 180 */
																									if (rgc_fill_buffer
																										(BgL_iportz00_425))
																										{	/* Cc/ld.scm 180 */
																											long BgL_arg1745z00_433;
																											long BgL_arg1746z00_434;

																											BgL_arg1745z00_433 =
																												RGC_BUFFER_FORWARD
																												(BgL_iportz00_425);
																											BgL_arg1746z00_434 =
																												RGC_BUFFER_BUFPOS
																												(BgL_iportz00_425);
																											{
																												long BgL_bufposz00_2650;
																												long
																													BgL_forwardz00_2649;
																												BgL_forwardz00_2649 =
																													BgL_arg1745z00_433;
																												BgL_bufposz00_2650 =
																													BgL_arg1746z00_434;
																												BgL_bufposz00_428 =
																													BgL_bufposz00_2650;
																												BgL_forwardz00_427 =
																													BgL_forwardz00_2649;
																												goto
																													BgL_zc3z04anonymousza31739ze3z87_429;
																											}
																										}
																									else
																										{	/* Cc/ld.scm 180 */
																											BgL_matchz00_756 =
																												BgL_newzd2matchzd2_430;
																										}
																								}
																							else
																								{	/* Cc/ld.scm 180 */
																									int BgL_curz00_435;

																									BgL_curz00_435 =
																										RGC_BUFFER_GET_CHAR
																										(BgL_iportz00_425,
																										BgL_forwardz00_427);
																									{	/* Cc/ld.scm 180 */

																										if (
																											((long) (BgL_curz00_435)
																												== 45L))
																											{
																												long BgL_bufposz00_2659;
																												long
																													BgL_forwardz00_2657;
																												long
																													BgL_lastzd2matchzd2_2656;
																												obj_t BgL_iportz00_2655;

																												BgL_iportz00_2655 =
																													BgL_iportz00_425;
																												BgL_lastzd2matchzd2_2656
																													=
																													BgL_newzd2matchzd2_430;
																												BgL_forwardz00_2657 =
																													(1L +
																													BgL_forwardz00_427);
																												BgL_bufposz00_2659 =
																													BgL_bufposz00_428;
																												BgL_bufposz00_482 =
																													BgL_bufposz00_2659;
																												BgL_forwardz00_481 =
																													BgL_forwardz00_2657;
																												BgL_lastzd2matchzd2_480
																													=
																													BgL_lastzd2matchzd2_2656;
																												BgL_iportz00_479 =
																													BgL_iportz00_2655;
																												goto
																													BgL_zc3z04anonymousza31803ze3z87_483;
																											}
																										else
																											{	/* Cc/ld.scm 180 */
																												bool_t
																													BgL_test2561z00_2660;
																												if (((long)
																														(BgL_curz00_435) ==
																														10L))
																													{	/* Cc/ld.scm 180 */
																														BgL_test2561z00_2660
																															= ((bool_t) 1);
																													}
																												else
																													{	/* Cc/ld.scm 180 */
																														BgL_test2561z00_2660
																															=
																															((long)
																															(BgL_curz00_435)
																															== 45L);
																													}
																												if (BgL_test2561z00_2660)
																													{	/* Cc/ld.scm 180 */
																														BgL_matchz00_756 =
																															BgL_newzd2matchzd2_430;
																													}
																												else
																													{
																														long
																															BgL_bufposz00_2670;
																														long
																															BgL_forwardz00_2668;
																														long
																															BgL_lastzd2matchzd2_2667;
																														obj_t
																															BgL_iportz00_2666;
																														BgL_iportz00_2666 =
																															BgL_iportz00_425;
																														BgL_lastzd2matchzd2_2667
																															=
																															BgL_newzd2matchzd2_430;
																														BgL_forwardz00_2668
																															=
																															(1L +
																															BgL_forwardz00_427);
																														BgL_bufposz00_2670 =
																															BgL_bufposz00_428;
																														BgL_bufposz00_466 =
																															BgL_bufposz00_2670;
																														BgL_forwardz00_465 =
																															BgL_forwardz00_2668;
																														BgL_lastzd2matchzd2_464
																															=
																															BgL_lastzd2matchzd2_2667;
																														BgL_iportz00_463 =
																															BgL_iportz00_2666;
																														goto
																															BgL_zc3z04anonymousza31774ze3z87_467;
																													}
																											}
																									}
																								}
																						}
																					}
																			}
																	}
																}
														}
														RGC_SET_FILEPOS(BgL_port1049z00_380);
														{

															switch (BgL_matchz00_756)
																{
																case 1L:

																	BgL_tmp1052z00_383 = BFALSE;
																	break;
																case 0L:

																	BgL_tmp1052z00_383 = BTRUE;
																	break;
																default:
																	BgL_tmp1052z00_383 =
																		BGl_errorz00zz__errorz00
																		(BGl_string2399z00zzcc_ldz00,
																		BGl_string2400z00zzcc_ldz00,
																		BINT(BgL_matchz00_756));
																}
														}
													}
												}
												{	/* Cc/ld.scm 180 */
													bool_t BgL_test2563z00_2676;

													{	/* Cc/ld.scm 180 */
														obj_t BgL_arg1819z00_1752;

														BgL_arg1819z00_1752 =
															BGL_EXITD_PROTECT(BgL_exitd1050z00_381);
														BgL_test2563z00_2676 = PAIRP(BgL_arg1819z00_1752);
													}
													if (BgL_test2563z00_2676)
														{	/* Cc/ld.scm 180 */
															obj_t BgL_arg1817z00_1753;

															{	/* Cc/ld.scm 180 */
																obj_t BgL_arg1818z00_1754;

																BgL_arg1818z00_1754 =
																	BGL_EXITD_PROTECT(BgL_exitd1050z00_381);
																BgL_arg1817z00_1753 =
																	CDR(((obj_t) BgL_arg1818z00_1754));
															}
															BGL_EXITD_PROTECT_SET(BgL_exitd1050z00_381,
																BgL_arg1817z00_1753);
															BUNSPEC;
														}
													else
														{	/* Cc/ld.scm 180 */
															BFALSE;
														}
												}
												bgl_close_input_port(BgL_port1049z00_380);
												BgL_staticpz00_191 = BgL_tmp1052z00_383;
											}
										}
									}
								}
						}
						if (CBOOL(BgL_staticpz00_191))
							{	/* Cc/ld.scm 185 */
								obj_t BgL_arg1324z00_192;

								BgL_arg1324z00_192 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(17L));
								BGl_za2ldzd2optionsza2zd2zzengine_paramz00 =
									string_append_3(BgL_arg1324z00_192,
									BGl_string2401z00zzcc_ldz00,
									BGl_za2ldzd2optionsza2zd2zzengine_paramz00);
							}
						else
							{	/* Cc/ld.scm 187 */
								obj_t BgL_arg1325z00_193;

								BgL_arg1325z00_193 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(18L));
								BGl_za2ldzd2optionsza2zd2zzengine_paramz00 =
									string_append_3(BgL_arg1325z00_193,
									BGl_string2401z00zzcc_ldz00,
									BGl_za2ldzd2optionsza2zd2zzengine_paramz00);
							}
						if ((BGl_za2passza2z00zzengine_paramz00 == CNST_TABLE_REF(14L)))
							{	/* Cc/ld.scm 190 */
								{	/* Cc/ld.scm 192 */
									obj_t BgL_arg1330z00_194;

									BgL_arg1330z00_194 =
										BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(19L));
									BgL_compz00_186 =
										string_append_3(BgL_compz00_186,
										BGl_string2401z00zzcc_ldz00, BgL_arg1330z00_194);
								}
								{	/* Cc/ld.scm 193 */
									obj_t BgL_sonameoptz00_195;

									BgL_sonameoptz00_195 =
										BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(20L));
									{	/* Cc/ld.scm 195 */
										obj_t BgL_arg1331z00_196;

										{	/* Cc/ld.scm 195 */
											obj_t BgL_arg1332z00_197;

											BgL_arg1332z00_197 =
												BGl_defaultzd2sonameze70z35zzcc_ldz00
												(BGl_za2srczd2filesza2zd2zzengine_paramz00);
											{	/* Cc/ld.scm 195 */
												obj_t BgL_list1333z00_198;

												BgL_list1333z00_198 =
													MAKE_YOUNG_PAIR(BgL_arg1332z00_197, BNIL);
												BgL_arg1331z00_196 =
													BGl_formatz00zz__r4_output_6_10_3z00
													(BgL_sonameoptz00_195, BgL_list1333z00_198);
											}
										}
										BGl_za2ldzd2optionsza2zd2zzengine_paramz00 =
											string_append_3(BgL_arg1331z00_196,
											BGl_string2401z00zzcc_ldz00,
											BGl_za2ldzd2optionsza2zd2zzengine_paramz00);
									}
								}
							}
						else
							{	/* Cc/ld.scm 190 */
								BFALSE;
							}
						{	/* Cc/ld.scm 198 */
							obj_t BgL_destz00_199;

							if (STRINGP(BGl_za2destza2z00zzengine_paramz00))
								{	/* Cc/ld.scm 199 */
									BgL_destz00_199 = BGl_za2destza2z00zzengine_paramz00;
								}
							else
								{	/* Cc/ld.scm 199 */
									if (
										(BGl_za2passza2z00zzengine_paramz00 == CNST_TABLE_REF(14L)))
										{	/* Cc/ld.scm 200 */
											BgL_destz00_199 =
												BGl_defaultzd2sonameze70z35zzcc_ldz00
												(BGl_za2srczd2filesza2zd2zzengine_paramz00);
										}
									else
										{	/* Cc/ld.scm 200 */
											BgL_destz00_199 = string_to_bstring(BGL_DEFAULT_A_OUT);
										}
								}
							{	/* Cc/ld.scm 198 */
								obj_t BgL_bigloozd2libzd2_200;

								{	/* Cc/ld.scm 204 */
									obj_t BgL_arg1735z00_374;
									obj_t BgL_arg1736z00_375;

									BgL_arg1735z00_374 = BGl_libraryzd2suffixeszd2zzcc_ldz00();
									{	/* Cc/ld.scm 205 */
										obj_t BgL__ortest_1079z00_376;

										BgL__ortest_1079z00_376 =
											BGl_za2staticzd2allzd2bigloozf3za2zf3zzengine_paramz00;
										if (CBOOL(BgL__ortest_1079z00_376))
											{	/* Cc/ld.scm 205 */
												BgL_arg1736z00_375 = BgL__ortest_1079z00_376;
											}
										else
											{	/* Cc/ld.scm 205 */
												obj_t BgL__ortest_1080z00_377;

												BgL__ortest_1080z00_377 =
													BGl_za2staticzd2bigloozf3za2z21zzengine_paramz00;
												if (CBOOL(BgL__ortest_1080z00_377))
													{	/* Cc/ld.scm 205 */
														BgL_arg1736z00_375 = BgL__ortest_1080z00_377;
													}
												else
													{	/* Cc/ld.scm 205 */
														BgL_arg1736z00_375 = BgL_staticpz00_191;
													}
											}
									}
									BgL_bigloozd2libzd2_200 =
										BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00
										(BGl_za2bigloozd2libza2zd2zzengine_paramz00,
										BgL_arg1735z00_374, BgL_arg1736z00_375, ((bool_t) 0),
										((bool_t) 0));
								}
								{	/* Cc/ld.scm 203 */
									obj_t BgL_gczd2libzd2_201;

									{	/* Cc/ld.scm 211 */
										obj_t BgL_arg1729z00_365;
										obj_t BgL_arg1730z00_366;
										bool_t BgL_arg1731z00_367;

										{	/* Cc/ld.scm 211 */
											obj_t BgL_arg1732z00_368;

											BgL_arg1732z00_368 =
												BGl_profilezd2gczd2debugzd2libraryzd2suffixz00zzcc_ldz00
												();
											{	/* Cc/ld.scm 211 */
												obj_t BgL_list1733z00_369;

												{	/* Cc/ld.scm 211 */
													obj_t BgL_arg1734z00_370;

													BgL_arg1734z00_370 =
														MAKE_YOUNG_PAIR(BGl_string2391z00zzcc_ldz00, BNIL);
													BgL_list1733z00_369 =
														MAKE_YOUNG_PAIR(BgL_arg1732z00_368,
														BgL_arg1734z00_370);
												}
												BgL_arg1729z00_365 = BgL_list1733z00_369;
											}
										}
										{	/* Cc/ld.scm 213 */
											obj_t BgL__ortest_1081z00_371;

											BgL__ortest_1081z00_371 =
												BGl_za2profilezd2libraryza2zd2zzengine_paramz00;
											if (CBOOL(BgL__ortest_1081z00_371))
												{	/* Cc/ld.scm 213 */
													BgL_arg1730z00_366 = BgL__ortest_1081z00_371;
												}
											else
												{	/* Cc/ld.scm 213 */
													obj_t BgL__ortest_1082z00_372;

													BgL__ortest_1082z00_372 =
														BGl_za2staticzd2allzd2bigloozf3za2zf3zzengine_paramz00;
													if (CBOOL(BgL__ortest_1082z00_372))
														{	/* Cc/ld.scm 213 */
															BgL_arg1730z00_366 = BgL__ortest_1082z00_372;
														}
													else
														{	/* Cc/ld.scm 213 */
															obj_t BgL__ortest_1083z00_373;

															BgL__ortest_1083z00_373 =
																BGl_za2staticzd2bigloozf3za2z21zzengine_paramz00;
															if (CBOOL(BgL__ortest_1083z00_373))
																{	/* Cc/ld.scm 213 */
																	BgL_arg1730z00_366 = BgL__ortest_1083z00_373;
																}
															else
																{	/* Cc/ld.scm 213 */
																	BgL_arg1730z00_366 = BgL_staticpz00_191;
																}
														}
												}
										}
										if (CBOOL(BGl_za2gczd2customzf3za2z21zzengine_paramz00))
											{	/* Cc/ld.scm 218 */
												BgL_arg1731z00_367 = ((bool_t) 0);
											}
										else
											{	/* Cc/ld.scm 218 */
												BgL_arg1731z00_367 = ((bool_t) 1);
											}
										BgL_gczd2libzd2_201 =
											BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00
											(BGl_za2gczd2libza2zd2zzengine_paramz00,
											BgL_arg1729z00_365, BgL_arg1730z00_366, ((bool_t) 0),
											BgL_arg1731z00_367);
									}
									{	/* Cc/ld.scm 210 */
										obj_t BgL_evalzd2libszd2_202;

										{	/* Cc/ld.scm 220 */
											obj_t BgL_g1085z00_351;

											BgL_g1085z00_351 =
												BGl_getzd2evalzd2librariesz00zzmodule_evalz00();
											{
												obj_t BgL_libz00_353;
												obj_t BgL_resz00_354;

												BgL_libz00_353 = BgL_g1085z00_351;
												BgL_resz00_354 = BGl_string2391z00zzcc_ldz00;
											BgL_zc3z04anonymousza31707ze3z87_355:
												if (NULLP(BgL_libz00_353))
													{	/* Cc/ld.scm 222 */
														BgL_evalzd2libszd2_202 = BgL_resz00_354;
													}
												else
													{	/* Cc/ld.scm 224 */
														obj_t BgL_arg1710z00_357;
														obj_t BgL_arg1712z00_358;

														BgL_arg1710z00_357 = CDR(((obj_t) BgL_libz00_353));
														{	/* Cc/ld.scm 227 */
															obj_t BgL_arg1714z00_359;

															{	/* Cc/ld.scm 227 */
																obj_t BgL_arg1715z00_360;
																obj_t BgL_arg1717z00_361;
																obj_t BgL_arg1718z00_362;

																BgL_arg1715z00_360 =
																	CAR(((obj_t) BgL_libz00_353));
																BgL_arg1717z00_361 =
																	BGl_libraryzd2evalzd2suffixesz00zzcc_ldz00();
																{	/* Cc/ld.scm 229 */
																	obj_t BgL__ortest_1086z00_363;

																	BgL__ortest_1086z00_363 =
																		BGl_za2staticzd2allzd2bigloozf3za2zf3zzengine_paramz00;
																	if (CBOOL(BgL__ortest_1086z00_363))
																		{	/* Cc/ld.scm 229 */
																			BgL_arg1718z00_362 =
																				BgL__ortest_1086z00_363;
																		}
																	else
																		{	/* Cc/ld.scm 229 */
																			BgL_arg1718z00_362 = BgL_staticpz00_191;
																		}
																}
																BgL_arg1714z00_359 =
																	BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00
																	(BgL_arg1715z00_360, BgL_arg1717z00_361,
																	BgL_arg1718z00_362, ((bool_t) 0),
																	((bool_t) 0));
															}
															BgL_arg1712z00_358 =
																string_append_3(BgL_arg1714z00_359,
																BGl_string2401z00zzcc_ldz00, BgL_resz00_354);
														}
														{
															obj_t BgL_resz00_2742;
															obj_t BgL_libz00_2741;

															BgL_libz00_2741 = BgL_arg1710z00_357;
															BgL_resz00_2742 = BgL_arg1712z00_358;
															BgL_resz00_354 = BgL_resz00_2742;
															BgL_libz00_353 = BgL_libz00_2741;
															goto BgL_zc3z04anonymousza31707ze3z87_355;
														}
													}
											}
										}
										{	/* Cc/ld.scm 220 */
											obj_t BgL_addzd2libszd2_203;

											{	/* Cc/ld.scm 234 */
												obj_t BgL_g1087z00_335;

												{	/* Cc/ld.scm 235 */
													obj_t BgL_g1937z00_349;

													BgL_g1937z00_349 =
														BGl_za2additionalzd2bigloozd2librariesza2z00zzengine_paramz00;
													{	/* Cc/ld.scm 234 */

														BgL_g1087z00_335 =
															BGl_deletezd2duplicateszd2zz__r4_pairs_and_lists_6_3z00
															(BgL_g1937z00_349,
															BGl_equalzf3zd2envz21zz__r4_equivalence_6_2z00);
													}
												}
												{
													obj_t BgL_libz00_337;
													obj_t BgL_resz00_338;

													BgL_libz00_337 = BgL_g1087z00_335;
													BgL_resz00_338 = BGl_string2391z00zzcc_ldz00;
												BgL_zc3z04anonymousza31687ze3z87_339:
													if (NULLP(BgL_libz00_337))
														{	/* Cc/ld.scm 237 */
															BgL_addzd2libszd2_203 = BgL_resz00_338;
														}
													else
														{	/* Cc/ld.scm 239 */
															obj_t BgL_arg1690z00_341;
															obj_t BgL_arg1693z00_342;

															BgL_arg1690z00_341 =
																CDR(((obj_t) BgL_libz00_337));
															{	/* Cc/ld.scm 242 */
																obj_t BgL_arg1695z00_343;

																{	/* Cc/ld.scm 242 */
																	obj_t BgL_arg1696z00_344;
																	obj_t BgL_arg1698z00_345;
																	obj_t BgL_arg1706z00_346;

																	BgL_arg1696z00_344 =
																		CAR(((obj_t) BgL_libz00_337));
																	BgL_arg1698z00_345 =
																		BGl_libraryzd2suffixeszd2zzcc_ldz00();
																	{	/* Cc/ld.scm 244 */
																		obj_t BgL__ortest_1088z00_347;

																		BgL__ortest_1088z00_347 =
																			BGl_za2staticzd2allzd2bigloozf3za2zf3zzengine_paramz00;
																		if (CBOOL(BgL__ortest_1088z00_347))
																			{	/* Cc/ld.scm 244 */
																				BgL_arg1706z00_346 =
																					BgL__ortest_1088z00_347;
																			}
																		else
																			{	/* Cc/ld.scm 244 */
																				BgL_arg1706z00_346 = BgL_staticpz00_191;
																			}
																	}
																	BgL_arg1695z00_343 =
																		BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00
																		(BgL_arg1696z00_344, BgL_arg1698z00_345,
																		BgL_arg1706z00_346, ((bool_t) 0),
																		((bool_t) 0));
																}
																BgL_arg1693z00_342 =
																	string_append_3(BgL_arg1695z00_343,
																	BGl_string2401z00zzcc_ldz00, BgL_resz00_338);
															}
															{
																obj_t BgL_resz00_2756;
																obj_t BgL_libz00_2755;

																BgL_libz00_2755 = BgL_arg1690z00_341;
																BgL_resz00_2756 = BgL_arg1693z00_342;
																BgL_resz00_338 = BgL_resz00_2756;
																BgL_libz00_337 = BgL_libz00_2755;
																goto BgL_zc3z04anonymousza31687ze3z87_339;
															}
														}
												}
											}
											{	/* Cc/ld.scm 234 */
												obj_t BgL_otherzd2libszd2_204;

												{	/* Cc/ld.scm 249 */
													obj_t BgL_g1089z00_325;

													BgL_g1089z00_325 =
														bgl_reverse
														(BGl_za2bigloozd2userzd2libza2z00zzengine_paramz00);
													{
														obj_t BgL_libz00_327;
														obj_t BgL_resz00_328;

														BgL_libz00_327 = BgL_g1089z00_325;
														BgL_resz00_328 = BGl_string2391z00zzcc_ldz00;
													BgL_zc3z04anonymousza31680ze3z87_329:
														if (NULLP(BgL_libz00_327))
															{	/* Cc/ld.scm 251 */
																BgL_otherzd2libszd2_204 = BgL_resz00_328;
															}
														else
															{	/* Cc/ld.scm 253 */
																obj_t BgL_arg1684z00_331;
																obj_t BgL_arg1685z00_332;

																BgL_arg1684z00_331 =
																	CDR(((obj_t) BgL_libz00_327));
																{	/* Cc/ld.scm 254 */
																	obj_t BgL_arg1686z00_333;

																	BgL_arg1686z00_333 =
																		CAR(((obj_t) BgL_libz00_327));
																	BgL_arg1685z00_332 =
																		string_append_3(BgL_arg1686z00_333,
																		BGl_string2401z00zzcc_ldz00,
																		BgL_resz00_328);
																}
																{
																	obj_t BgL_resz00_2766;
																	obj_t BgL_libz00_2765;

																	BgL_libz00_2765 = BgL_arg1684z00_331;
																	BgL_resz00_2766 = BgL_arg1685z00_332;
																	BgL_resz00_328 = BgL_resz00_2766;
																	BgL_libz00_327 = BgL_libz00_2765;
																	goto BgL_zc3z04anonymousza31680ze3z87_329;
																}
															}
													}
												}
												{	/* Cc/ld.scm 249 */
													obj_t BgL_ldzd2argszd2_205;

													{	/* Cc/ld.scm 257 */
														obj_t BgL_arg1343z00_211;
														obj_t BgL_arg1344z00_212;
														obj_t BgL_arg1346z00_213;
														obj_t BgL_arg1347z00_214;
														obj_t BgL_arg1348z00_215;
														obj_t BgL_arg1352z00_216;
														obj_t BgL_arg1354z00_217;
														obj_t BgL_arg1361z00_218;
														obj_t BgL_arg1363z00_219;
														obj_t BgL_arg1366z00_220;
														obj_t BgL_arg1369z00_221;
														obj_t BgL_arg1372z00_222;
														obj_t BgL_arg1373z00_223;
														obj_t BgL_arg1374z00_224;
														obj_t BgL_arg1375z00_225;

														{	/* Cc/ld.scm 257 */
															obj_t BgL_list1566z00_261;

															{	/* Cc/ld.scm 257 */
																obj_t BgL_arg1575z00_262;

																{	/* Cc/ld.scm 257 */
																	obj_t BgL_arg1576z00_263;

																	BgL_arg1576z00_263 =
																		MAKE_YOUNG_PAIR
																		(BGl_za2czd2objectzd2filezd2extensionza2zd2zzengine_paramz00,
																		BNIL);
																	BgL_arg1575z00_262 =
																		MAKE_YOUNG_PAIR(BGl_string2402z00zzcc_ldz00,
																		BgL_arg1576z00_263);
																}
																BgL_list1566z00_261 =
																	MAKE_YOUNG_PAIR(BgL_namez00_11,
																	BgL_arg1575z00_262);
															}
															BgL_arg1343z00_211 =
																BGl_unixzd2filenamezd2zzcc_execz00
																(BgL_list1566z00_261);
														}
														{	/* Cc/ld.scm 259 */
															obj_t BgL_arg1578z00_264;

															{	/* Cc/ld.scm 259 */
																obj_t BgL_l1180z00_265;

																BgL_l1180z00_265 =
																	BGl_za2withzd2filesza2zd2zzengine_paramz00;
																if (NULLP(BgL_l1180z00_265))
																	{	/* Cc/ld.scm 259 */
																		BgL_arg1578z00_264 = BNIL;
																	}
																else
																	{	/* Cc/ld.scm 259 */
																		obj_t BgL_head1182z00_267;

																		{	/* Cc/ld.scm 259 */
																			obj_t BgL_arg1595z00_280;

																			{	/* Cc/ld.scm 259 */
																				obj_t BgL_arg1597z00_281;

																				BgL_arg1597z00_281 =
																					CAR(((obj_t) BgL_l1180z00_265));
																				{	/* Cc/ld.scm 259 */
																					obj_t BgL_list1598z00_282;

																					BgL_list1598z00_282 =
																						MAKE_YOUNG_PAIR(BgL_arg1597z00_281,
																						BNIL);
																					BgL_arg1595z00_280 =
																						BGl_unixzd2filenamezd2zzcc_execz00
																						(BgL_list1598z00_282);
																				}
																			}
																			BgL_head1182z00_267 =
																				MAKE_YOUNG_PAIR(BgL_arg1595z00_280,
																				BNIL);
																		}
																		{	/* Cc/ld.scm 259 */
																			obj_t BgL_g1186z00_268;

																			BgL_g1186z00_268 =
																				CDR(((obj_t) BgL_l1180z00_265));
																			{
																				obj_t BgL_l1180z00_270;
																				obj_t BgL_tail1183z00_271;

																				BgL_l1180z00_270 = BgL_g1186z00_268;
																				BgL_tail1183z00_271 =
																					BgL_head1182z00_267;
																			BgL_zc3z04anonymousza31580ze3z87_272:
																				if (NULLP(BgL_l1180z00_270))
																					{	/* Cc/ld.scm 259 */
																						BgL_arg1578z00_264 =
																							BgL_head1182z00_267;
																					}
																				else
																					{	/* Cc/ld.scm 259 */
																						obj_t BgL_newtail1184z00_274;

																						{	/* Cc/ld.scm 259 */
																							obj_t BgL_arg1590z00_276;

																							{	/* Cc/ld.scm 259 */
																								obj_t BgL_arg1592z00_277;

																								BgL_arg1592z00_277 =
																									CAR(
																									((obj_t) BgL_l1180z00_270));
																								{	/* Cc/ld.scm 259 */
																									obj_t BgL_list1593z00_278;

																									BgL_list1593z00_278 =
																										MAKE_YOUNG_PAIR
																										(BgL_arg1592z00_277, BNIL);
																									BgL_arg1590z00_276 =
																										BGl_unixzd2filenamezd2zzcc_execz00
																										(BgL_list1593z00_278);
																								}
																							}
																							BgL_newtail1184z00_274 =
																								MAKE_YOUNG_PAIR
																								(BgL_arg1590z00_276, BNIL);
																						}
																						SET_CDR(BgL_tail1183z00_271,
																							BgL_newtail1184z00_274);
																						{	/* Cc/ld.scm 259 */
																							obj_t BgL_arg1586z00_275;

																							BgL_arg1586z00_275 =
																								CDR(((obj_t) BgL_l1180z00_270));
																							{
																								obj_t BgL_tail1183z00_2791;
																								obj_t BgL_l1180z00_2790;

																								BgL_l1180z00_2790 =
																									BgL_arg1586z00_275;
																								BgL_tail1183z00_2791 =
																									BgL_newtail1184z00_274;
																								BgL_tail1183z00_271 =
																									BgL_tail1183z00_2791;
																								BgL_l1180z00_270 =
																									BgL_l1180z00_2790;
																								goto
																									BgL_zc3z04anonymousza31580ze3z87_272;
																							}
																						}
																					}
																			}
																		}
																	}
															}
															BgL_arg1344z00_212 =
																BGl_stringza2zd2ze3stringz93zztools_miscz00
																(BgL_arg1578z00_264);
														}
														{	/* Cc/ld.scm 261 */
															obj_t BgL_arg1606z00_283;

															{	/* Cc/ld.scm 261 */
																obj_t BgL_l1187z00_284;

																BgL_l1187z00_284 =
																	BGl_za2ozd2filesza2zd2zzengine_paramz00;
																if (NULLP(BgL_l1187z00_284))
																	{	/* Cc/ld.scm 261 */
																		BgL_arg1606z00_283 = BNIL;
																	}
																else
																	{	/* Cc/ld.scm 261 */
																		obj_t BgL_head1189z00_286;

																		{	/* Cc/ld.scm 261 */
																			obj_t BgL_arg1620z00_299;

																			{	/* Cc/ld.scm 261 */
																				obj_t BgL_arg1621z00_300;

																				BgL_arg1621z00_300 =
																					CAR(((obj_t) BgL_l1187z00_284));
																				{	/* Cc/ld.scm 261 */
																					obj_t BgL_list1622z00_301;

																					BgL_list1622z00_301 =
																						MAKE_YOUNG_PAIR(BgL_arg1621z00_300,
																						BNIL);
																					BgL_arg1620z00_299 =
																						BGl_unixzd2filenamezd2zzcc_execz00
																						(BgL_list1622z00_301);
																				}
																			}
																			BgL_head1189z00_286 =
																				MAKE_YOUNG_PAIR(BgL_arg1620z00_299,
																				BNIL);
																		}
																		{	/* Cc/ld.scm 261 */
																			obj_t BgL_g1192z00_287;

																			BgL_g1192z00_287 =
																				CDR(((obj_t) BgL_l1187z00_284));
																			{
																				obj_t BgL_l1187z00_289;
																				obj_t BgL_tail1190z00_290;

																				BgL_l1187z00_289 = BgL_g1192z00_287;
																				BgL_tail1190z00_290 =
																					BgL_head1189z00_286;
																			BgL_zc3z04anonymousza31608ze3z87_291:
																				if (NULLP(BgL_l1187z00_289))
																					{	/* Cc/ld.scm 261 */
																						BgL_arg1606z00_283 =
																							BgL_head1189z00_286;
																					}
																				else
																					{	/* Cc/ld.scm 261 */
																						obj_t BgL_newtail1191z00_293;

																						{	/* Cc/ld.scm 261 */
																							obj_t BgL_arg1614z00_295;

																							{	/* Cc/ld.scm 261 */
																								obj_t BgL_arg1615z00_296;

																								BgL_arg1615z00_296 =
																									CAR(
																									((obj_t) BgL_l1187z00_289));
																								{	/* Cc/ld.scm 261 */
																									obj_t BgL_list1616z00_297;

																									BgL_list1616z00_297 =
																										MAKE_YOUNG_PAIR
																										(BgL_arg1615z00_296, BNIL);
																									BgL_arg1614z00_295 =
																										BGl_unixzd2filenamezd2zzcc_execz00
																										(BgL_list1616z00_297);
																								}
																							}
																							BgL_newtail1191z00_293 =
																								MAKE_YOUNG_PAIR
																								(BgL_arg1614z00_295, BNIL);
																						}
																						SET_CDR(BgL_tail1190z00_290,
																							BgL_newtail1191z00_293);
																						{	/* Cc/ld.scm 261 */
																							obj_t BgL_arg1613z00_294;

																							BgL_arg1613z00_294 =
																								CDR(((obj_t) BgL_l1187z00_289));
																							{
																								obj_t BgL_tail1190z00_2813;
																								obj_t BgL_l1187z00_2812;

																								BgL_l1187z00_2812 =
																									BgL_arg1613z00_294;
																								BgL_tail1190z00_2813 =
																									BgL_newtail1191z00_293;
																								BgL_tail1190z00_290 =
																									BgL_tail1190z00_2813;
																								BgL_l1187z00_289 =
																									BgL_l1187z00_2812;
																								goto
																									BgL_zc3z04anonymousza31608ze3z87_291;
																							}
																						}
																					}
																			}
																		}
																	}
															}
															BgL_arg1346z00_213 =
																BGl_stringza2zd2ze3stringz93zztools_miscz00
																(BgL_arg1606z00_283);
														}
														{	/* Cc/ld.scm 263 */
															obj_t BgL_list1623z00_302;

															BgL_list1623z00_302 =
																MAKE_YOUNG_PAIR(BgL_destz00_199, BNIL);
															BgL_arg1347z00_214 =
																BGl_unixzd2filenamezd2zzcc_execz00
																(BgL_list1623z00_302);
														}
														{	/* Cc/ld.scm 265 */
															obj_t BgL_list1624z00_303;

															BgL_list1624z00_303 =
																MAKE_YOUNG_PAIR
																(BGl_za2cczd2optionsza2zd2zzengine_paramz00,
																BNIL);
															BgL_arg1348z00_215 =
																BGl_formatz00zz__r4_output_6_10_3z00
																(BGl_string2403z00zzcc_ldz00,
																BgL_list1624z00_303);
														}
														{	/* Cc/ld.scm 152 */
															obj_t BgL_rpathfmtz00_819;

															BgL_rpathfmtz00_819 =
																BGl_bigloozd2configzd2zz__configurez00
																(CNST_TABLE_REF(13L));
															if ((STRING_LENGTH(((obj_t) BgL_rpathfmtz00_819))
																	== 0L))
																{	/* Cc/ld.scm 153 */
																	BgL_arg1352z00_216 =
																		BGl_string2391z00zzcc_ldz00;
																}
															else
																{	/* Cc/ld.scm 156 */
																	obj_t BgL_arg2029z00_821;

																	{	/* Cc/ld.scm 156 */
																		obj_t BgL_l1173z00_823;

																		{	/* Cc/ld.scm 158 */
																			obj_t BgL_g1937z00_837;

																			BgL_g1937z00_837 =
																				BGl_za2cflagszd2rpathza2zd2zzengine_paramz00;
																			{	/* Cc/ld.scm 158 */

																				BgL_l1173z00_823 =
																					BGl_deletezd2duplicateszd2zz__r4_pairs_and_lists_6_3z00
																					(BgL_g1937z00_837,
																					BGl_equalzf3zd2envz21zz__r4_equivalence_6_2z00);
																			}
																		}
																		if (NULLP(BgL_l1173z00_823))
																			{	/* Cc/ld.scm 156 */
																				BgL_arg2029z00_821 = BNIL;
																			}
																		else
																			{	/* Cc/ld.scm 156 */
																				obj_t BgL_head1175z00_825;

																				BgL_head1175z00_825 =
																					MAKE_YOUNG_PAIR(BNIL, BNIL);
																				{
																					obj_t BgL_l1173z00_827;
																					obj_t BgL_tail1176z00_828;

																					BgL_l1173z00_827 = BgL_l1173z00_823;
																					BgL_tail1176z00_828 =
																						BgL_head1175z00_825;
																				BgL_zc3z04anonymousza32032ze3z87_829:
																					if (NULLP(BgL_l1173z00_827))
																						{	/* Cc/ld.scm 156 */
																							BgL_arg2029z00_821 =
																								CDR(BgL_head1175z00_825);
																						}
																					else
																						{	/* Cc/ld.scm 156 */
																							obj_t BgL_newtail1177z00_831;

																							{	/* Cc/ld.scm 156 */
																								obj_t BgL_arg2036z00_833;

																								{	/* Cc/ld.scm 156 */
																									obj_t BgL_pathz00_834;

																									BgL_pathz00_834 =
																										CAR(
																										((obj_t) BgL_l1173z00_827));
																									{	/* Cc/ld.scm 157 */
																										obj_t BgL_list2037z00_835;

																										BgL_list2037z00_835 =
																											MAKE_YOUNG_PAIR
																											(BgL_pathz00_834, BNIL);
																										BgL_arg2036z00_833 =
																											BGl_formatz00zz__r4_output_6_10_3z00
																											(BgL_rpathfmtz00_819,
																											BgL_list2037z00_835);
																									}
																								}
																								BgL_newtail1177z00_831 =
																									MAKE_YOUNG_PAIR
																									(BgL_arg2036z00_833, BNIL);
																							}
																							SET_CDR(BgL_tail1176z00_828,
																								BgL_newtail1177z00_831);
																							{	/* Cc/ld.scm 156 */
																								obj_t BgL_arg2034z00_832;

																								BgL_arg2034z00_832 =
																									CDR(
																									((obj_t) BgL_l1173z00_827));
																								{
																									obj_t BgL_tail1176z00_2841;
																									obj_t BgL_l1173z00_2840;

																									BgL_l1173z00_2840 =
																										BgL_arg2034z00_832;
																									BgL_tail1176z00_2841 =
																										BgL_newtail1177z00_831;
																									BgL_tail1176z00_828 =
																										BgL_tail1176z00_2841;
																									BgL_l1173z00_827 =
																										BgL_l1173z00_2840;
																									goto
																										BgL_zc3z04anonymousza32032ze3z87_829;
																								}
																							}
																						}
																				}
																			}
																	}
																	{	/* Cc/ld.scm 155 */
																		obj_t BgL_list2030z00_822;

																		BgL_list2030z00_822 =
																			MAKE_YOUNG_PAIR(BgL_arg2029z00_821, BNIL);
																		BgL_arg1352z00_216 =
																			BGl_formatz00zz__r4_output_6_10_3z00
																			(BGl_string2396z00zzcc_ldz00,
																			BgL_list2030z00_822);
																	}
																}
														}
														{	/* Cc/ld.scm 269 */
															bool_t BgL_test2586z00_2844;

															if (CBOOL
																(BGl_za2czd2debugza2zd2zzengine_paramz00))
																{	/* Cc/ld.scm 269 */
																	BgL_test2586z00_2844 = ((bool_t) 1);
																}
															else
																{	/* Cc/ld.scm 269 */
																	BgL_test2586z00_2844 =
																		(
																		(long)
																		CINT
																		(BGl_za2bdbzd2debugza2zd2zzengine_paramz00)
																		> 0L);
																}
															if (BgL_test2586z00_2844)
																{	/* Cc/ld.scm 269 */
																	BgL_arg1354z00_217 =
																		string_append(BGl_string2401z00zzcc_ldz00,
																		BGl_za2ldzd2debugzd2optionza2z00zzengine_paramz00);
																}
															else
																{	/* Cc/ld.scm 269 */
																	BgL_arg1354z00_217 =
																		BGl_string2391z00zzcc_ldz00;
																}
														}
														{	/* Cc/ld.scm 273 */
															bool_t BgL_test2588z00_2850;

															if (CBOOL(BGl_za2stripza2z00zzengine_paramz00))
																{	/* Cc/ld.scm 273 */
																	if (
																		(BGl_za2passza2z00zzengine_paramz00 ==
																			CNST_TABLE_REF(14L)))
																		{	/* Cc/ld.scm 273 */
																			BgL_test2588z00_2850 = ((bool_t) 0);
																		}
																	else
																		{	/* Cc/ld.scm 273 */
																			BgL_test2588z00_2850 = ((bool_t) 1);
																		}
																}
															else
																{	/* Cc/ld.scm 273 */
																	BgL_test2588z00_2850 = ((bool_t) 0);
																}
															if (BgL_test2588z00_2850)
																{	/* Cc/ld.scm 273 */
																	BgL_arg1361z00_218 =
																		string_append(BGl_string2401z00zzcc_ldz00,
																		BGl_bigloozd2configzd2zz__configurez00
																		(CNST_TABLE_REF(21L)));
																}
															else
																{	/* Cc/ld.scm 273 */
																	BgL_arg1361z00_218 =
																		BGl_string2391z00zzcc_ldz00;
																}
														}
														BgL_arg1363z00_219 =
															string_append(BGl_string2401z00zzcc_ldz00,
															BGl_bigloozd2configzd2zz__configurez00
															(CNST_TABLE_REF(22L)));
														BgL_arg1366z00_220 =
															BGl_loopze71ze7zzcc_ldz00
															(BGl_za2libzd2dirza2zd2zzengine_paramz00);
														{	/* Cc/ld.scm 288 */
															obj_t BgL_sz00_320;

															BgL_sz00_320 =
																BGl_bigloozd2configzd2zz__configurez00
																(CNST_TABLE_REF(23L));
															if ((STRING_LENGTH(((obj_t) BgL_sz00_320)) > 0L))
																{	/* Cc/ld.scm 289 */
																	BgL_arg1369z00_221 =
																		string_append(BGl_string2404z00zzcc_ldz00,
																		BgL_sz00_320);
																}
															else
																{	/* Cc/ld.scm 289 */
																	BgL_arg1369z00_221 =
																		BGl_string2391z00zzcc_ldz00;
																}
														}
														if (CBOOL(BGl_za2czd2debugza2zd2zzengine_paramz00))
															{	/* Cc/ld.scm 293 */
																BgL_arg1372z00_222 =
																	BGl_string2391z00zzcc_ldz00;
															}
														else
															{	/* Cc/ld.scm 293 */
																BgL_arg1372z00_222 =
																	string_append(BGl_string2401z00zzcc_ldz00,
																	BGl_za2ldzd2optimzd2flagsza2z00zzengine_paramz00);
															}
														BgL_arg1373z00_223 =
															BGl_bigloozd2configzd2zz__configurez00
															(CNST_TABLE_REF(24L));
														if (CBOOL
															(BGl_za2doublezd2ldzd2libszf3za2zf3zzengine_paramz00))
															{	/* Cc/ld.scm 309 */
																BgL_arg1374z00_224 = BgL_addzd2libszd2_203;
															}
														else
															{	/* Cc/ld.scm 309 */
																BgL_arg1374z00_224 =
																	BGl_string2391z00zzcc_ldz00;
															}
														{	/* Cc/ld.scm 311 */
															obj_t BgL_list1679z00_324;

															BgL_list1679z00_324 =
																MAKE_YOUNG_PAIR
																(BGl_za2ldzd2postzd2optionsza2z00zzengine_paramz00,
																BNIL);
															BgL_arg1375z00_225 =
																BGl_formatz00zz__r4_output_6_10_3z00
																(BGl_string2403z00zzcc_ldz00,
																BgL_list1679z00_324);
														}
														{	/* Cc/ld.scm 255 */
															obj_t BgL_list1376z00_226;

															{	/* Cc/ld.scm 255 */
																obj_t BgL_arg1377z00_227;

																{	/* Cc/ld.scm 255 */
																	obj_t BgL_arg1379z00_228;

																	{	/* Cc/ld.scm 255 */
																		obj_t BgL_arg1397z00_229;

																		{	/* Cc/ld.scm 255 */
																			obj_t BgL_arg1407z00_230;

																			{	/* Cc/ld.scm 255 */
																				obj_t BgL_arg1408z00_231;

																				{	/* Cc/ld.scm 255 */
																					obj_t BgL_arg1420z00_232;

																					{	/* Cc/ld.scm 255 */
																						obj_t BgL_arg1431z00_233;

																						{	/* Cc/ld.scm 255 */
																							obj_t BgL_arg1436z00_234;

																							{	/* Cc/ld.scm 255 */
																								obj_t BgL_arg1437z00_235;

																								{	/* Cc/ld.scm 255 */
																									obj_t BgL_arg1450z00_236;

																									{	/* Cc/ld.scm 255 */
																										obj_t BgL_arg1451z00_237;

																										{	/* Cc/ld.scm 255 */
																											obj_t BgL_arg1452z00_238;

																											{	/* Cc/ld.scm 255 */
																												obj_t
																													BgL_arg1453z00_239;
																												{	/* Cc/ld.scm 255 */
																													obj_t
																														BgL_arg1479z00_240;
																													{	/* Cc/ld.scm 255 */
																														obj_t
																															BgL_arg1491z00_241;
																														{	/* Cc/ld.scm 255 */
																															obj_t
																																BgL_arg1492z00_242;
																															{	/* Cc/ld.scm 255 */
																																obj_t
																																	BgL_arg1494z00_243;
																																{	/* Cc/ld.scm 255 */
																																	obj_t
																																		BgL_arg1496z00_244;
																																	{	/* Cc/ld.scm 255 */
																																		obj_t
																																			BgL_arg1497z00_245;
																																		{	/* Cc/ld.scm 255 */
																																			obj_t
																																				BgL_arg1519z00_246;
																																			{	/* Cc/ld.scm 255 */
																																				obj_t
																																					BgL_arg1528z00_247;
																																				{	/* Cc/ld.scm 255 */
																																					obj_t
																																						BgL_arg1532z00_248;
																																					{	/* Cc/ld.scm 255 */
																																						obj_t
																																							BgL_arg1534z00_249;
																																						{	/* Cc/ld.scm 255 */
																																							obj_t
																																								BgL_arg1541z00_250;
																																							{	/* Cc/ld.scm 255 */
																																								obj_t
																																									BgL_arg1545z00_251;
																																								{	/* Cc/ld.scm 255 */
																																									obj_t
																																										BgL_arg1546z00_252;
																																									{	/* Cc/ld.scm 255 */
																																										obj_t
																																											BgL_arg1547z00_253;
																																										{	/* Cc/ld.scm 255 */
																																											obj_t
																																												BgL_arg1550z00_254;
																																											{	/* Cc/ld.scm 255 */
																																												obj_t
																																													BgL_arg1554z00_255;
																																												{	/* Cc/ld.scm 255 */
																																													obj_t
																																														BgL_arg1555z00_256;
																																													{	/* Cc/ld.scm 255 */
																																														obj_t
																																															BgL_arg1560z00_257;
																																														{	/* Cc/ld.scm 255 */
																																															obj_t
																																																BgL_arg1563z00_258;
																																															{	/* Cc/ld.scm 255 */
																																																obj_t
																																																	BgL_arg1564z00_259;
																																																{	/* Cc/ld.scm 255 */
																																																	obj_t
																																																		BgL_arg1565z00_260;
																																																	BgL_arg1565z00_260
																																																		=
																																																		MAKE_YOUNG_PAIR
																																																		(BgL_arg1375z00_225,
																																																		BNIL);
																																																	BgL_arg1564z00_259
																																																		=
																																																		MAKE_YOUNG_PAIR
																																																		(BGl_string2401z00zzcc_ldz00,
																																																		BgL_arg1565z00_260);
																																																}
																																																BgL_arg1563z00_258
																																																	=
																																																	MAKE_YOUNG_PAIR
																																																	(BgL_arg1374z00_224,
																																																	BgL_arg1564z00_259);
																																															}
																																															BgL_arg1560z00_257
																																																=
																																																MAKE_YOUNG_PAIR
																																																(BGl_string2401z00zzcc_ldz00,
																																																BgL_arg1563z00_258);
																																														}
																																														BgL_arg1555z00_256
																																															=
																																															MAKE_YOUNG_PAIR
																																															(BgL_otherzd2libszd2_204,
																																															BgL_arg1560z00_257);
																																													}
																																													BgL_arg1554z00_255
																																														=
																																														MAKE_YOUNG_PAIR
																																														(BGl_string2401z00zzcc_ldz00,
																																														BgL_arg1555z00_256);
																																												}
																																												BgL_arg1550z00_254
																																													=
																																													MAKE_YOUNG_PAIR
																																													(BgL_arg1373z00_223,
																																													BgL_arg1554z00_255);
																																											}
																																											BgL_arg1547z00_253
																																												=
																																												MAKE_YOUNG_PAIR
																																												(BGl_string2401z00zzcc_ldz00,
																																												BgL_arg1550z00_254);
																																										}
																																										BgL_arg1546z00_252
																																											=
																																											MAKE_YOUNG_PAIR
																																											(BgL_gczd2libzd2_201,
																																											BgL_arg1547z00_253);
																																									}
																																									BgL_arg1545z00_251
																																										=
																																										MAKE_YOUNG_PAIR
																																										(BGl_string2401z00zzcc_ldz00,
																																										BgL_arg1546z00_252);
																																								}
																																								BgL_arg1541z00_250
																																									=
																																									MAKE_YOUNG_PAIR
																																									(BgL_bigloozd2libzd2_200,
																																									BgL_arg1545z00_251);
																																							}
																																							BgL_arg1534z00_249
																																								=
																																								MAKE_YOUNG_PAIR
																																								(BGl_string2401z00zzcc_ldz00,
																																								BgL_arg1541z00_250);
																																						}
																																						BgL_arg1532z00_248
																																							=
																																							MAKE_YOUNG_PAIR
																																							(BgL_addzd2libszd2_203,
																																							BgL_arg1534z00_249);
																																					}
																																					BgL_arg1528z00_247
																																						=
																																						MAKE_YOUNG_PAIR
																																						(BGl_string2401z00zzcc_ldz00,
																																						BgL_arg1532z00_248);
																																				}
																																				BgL_arg1519z00_246
																																					=
																																					MAKE_YOUNG_PAIR
																																					(BgL_evalzd2libszd2_202,
																																					BgL_arg1528z00_247);
																																			}
																																			BgL_arg1497z00_245
																																				=
																																				MAKE_YOUNG_PAIR
																																				(BGl_string2401z00zzcc_ldz00,
																																				BgL_arg1519z00_246);
																																		}
																																		BgL_arg1496z00_244
																																			=
																																			MAKE_YOUNG_PAIR
																																			(BgL_arg1372z00_222,
																																			BgL_arg1497z00_245);
																																	}
																																	BgL_arg1494z00_243
																																		=
																																		MAKE_YOUNG_PAIR
																																		(BgL_arg1369z00_221,
																																		BgL_arg1496z00_244);
																																}
																																BgL_arg1492z00_242
																																	=
																																	MAKE_YOUNG_PAIR
																																	(BgL_arg1366z00_220,
																																	BgL_arg1494z00_243);
																															}
																															BgL_arg1491z00_241
																																=
																																MAKE_YOUNG_PAIR
																																(BGl_string2401z00zzcc_ldz00,
																																BgL_arg1492z00_242);
																														}
																														BgL_arg1479z00_240 =
																															MAKE_YOUNG_PAIR
																															(BGl_za2ldzd2optionsza2zd2zzengine_paramz00,
																															BgL_arg1491z00_241);
																													}
																													BgL_arg1453z00_239 =
																														MAKE_YOUNG_PAIR
																														(BGl_string2401z00zzcc_ldz00,
																														BgL_arg1479z00_240);
																												}
																												BgL_arg1452z00_238 =
																													MAKE_YOUNG_PAIR
																													(BgL_arg1363z00_219,
																													BgL_arg1453z00_239);
																											}
																											BgL_arg1451z00_237 =
																												MAKE_YOUNG_PAIR
																												(BgL_arg1361z00_218,
																												BgL_arg1452z00_238);
																										}
																										BgL_arg1450z00_236 =
																											MAKE_YOUNG_PAIR
																											(BgL_arg1354z00_217,
																											BgL_arg1451z00_237);
																									}
																									BgL_arg1437z00_235 =
																										MAKE_YOUNG_PAIR
																										(BgL_arg1352z00_216,
																										BgL_arg1450z00_236);
																								}
																								BgL_arg1436z00_234 =
																									MAKE_YOUNG_PAIR
																									(BgL_arg1348z00_215,
																									BgL_arg1437z00_235);
																							}
																							BgL_arg1431z00_233 =
																								MAKE_YOUNG_PAIR
																								(BGl_string2401z00zzcc_ldz00,
																								BgL_arg1436z00_234);
																						}
																						BgL_arg1420z00_232 =
																							MAKE_YOUNG_PAIR
																							(BgL_arg1347z00_214,
																							BgL_arg1431z00_233);
																					}
																					BgL_arg1408z00_231 =
																						MAKE_YOUNG_PAIR
																						(BGl_za2ldzd2ozd2optionza2z00zzengine_paramz00,
																						BgL_arg1420z00_232);
																				}
																				BgL_arg1407z00_230 =
																					MAKE_YOUNG_PAIR
																					(BGl_string2401z00zzcc_ldz00,
																					BgL_arg1408z00_231);
																			}
																			BgL_arg1397z00_229 =
																				MAKE_YOUNG_PAIR(BgL_arg1346z00_213,
																				BgL_arg1407z00_230);
																		}
																		BgL_arg1379z00_228 =
																			MAKE_YOUNG_PAIR(BgL_arg1344z00_212,
																			BgL_arg1397z00_229);
																	}
																	BgL_arg1377z00_227 =
																		MAKE_YOUNG_PAIR(BGl_string2401z00zzcc_ldz00,
																		BgL_arg1379z00_228);
																}
																BgL_list1376z00_226 =
																	MAKE_YOUNG_PAIR(BgL_arg1343z00_211,
																	BgL_arg1377z00_227);
															}
															BgL_ldzd2argszd2_205 =
																BGl_stringzd2appendzd2zz__r4_strings_6_7z00
																(BgL_list1376z00_226);
														}
													}
													{	/* Cc/ld.scm 255 */
														obj_t BgL_cmdz00_206;

														BgL_cmdz00_206 =
															string_append_3(BgL_compz00_186,
															BGl_string2401z00zzcc_ldz00,
															BgL_ldzd2argszd2_205);
														{	/* Cc/ld.scm 312 */

															{	/* Cc/ld.scm 313 */
																obj_t BgL_list1334z00_207;

																{	/* Cc/ld.scm 313 */
																	obj_t BgL_arg1337z00_208;

																	{	/* Cc/ld.scm 313 */
																		obj_t BgL_arg1338z00_209;

																		{	/* Cc/ld.scm 313 */
																			obj_t BgL_arg1341z00_210;

																			BgL_arg1341z00_210 =
																				MAKE_YOUNG_PAIR(BCHAR(((unsigned char)
																						10)), BNIL);
																			BgL_arg1338z00_209 =
																				MAKE_YOUNG_PAIR(BCHAR(((unsigned char)
																						']')), BgL_arg1341z00_210);
																		}
																		BgL_arg1337z00_208 =
																			MAKE_YOUNG_PAIR(BgL_cmdz00_206,
																			BgL_arg1338z00_209);
																	}
																	BgL_list1334z00_207 =
																		MAKE_YOUNG_PAIR(BGl_string2405z00zzcc_ldz00,
																		BgL_arg1337z00_208);
																}
																BGl_verbosez00zztools_speekz00(BINT(2L),
																	BgL_list1334z00_207);
															}
															return
																BGl_execz00zzcc_execz00(BgL_cmdz00_206,
																BgL_needzd2tozd2returnz00_12,
																BGl_string2386z00zzcc_ldz00);
														}
													}
												}
											}
										}
									}
								}
							}
						}
					}
				}
			}
		}

	}



/* default-soname~0 */
	obj_t BGl_defaultzd2sonameze70z35zzcc_ldz00(obj_t BgL_filesz00_808)
	{
		{	/* Cc/ld.scm 170 */
			{	/* Cc/ld.scm 161 */
				obj_t BgL_namez00_810;

				if (STRINGP(BGl_za2destza2z00zzengine_paramz00))
					{	/* Cc/ld.scm 162 */
						BgL_namez00_810 = BGl_za2destza2z00zzengine_paramz00;
					}
				else
					{	/* Cc/ld.scm 162 */
						if (PAIRP(BgL_filesz00_808))
							{	/* Cc/ld.scm 163 */
								BgL_namez00_810 = CAR(BgL_filesz00_808);
							}
						else
							{	/* Cc/ld.scm 163 */
								BgL_namez00_810 = BGl_string2406z00zzcc_ldz00;
							}
					}
				{	/* Cc/ld.scm 166 */
					obj_t BgL_arg2020z00_811;
					obj_t BgL_arg2021z00_812;

					{	/* Cc/ld.scm 166 */
						obj_t BgL_arg2023z00_813;

						if (STRINGP(BgL_namez00_810))
							{	/* Cc/ld.scm 166 */
								BgL_arg2023z00_813 = BgL_namez00_810;
							}
						else
							{	/* Cc/ld.scm 168 */
								obj_t BgL_arg1454z00_1577;

								BgL_arg1454z00_1577 =
									SYMBOL_TO_STRING(((obj_t) BgL_namez00_810));
								BgL_arg2023z00_813 =
									BGl_stringzd2copyzd2zz__r4_strings_6_7z00
									(BgL_arg1454z00_1577);
							}
						BgL_arg2020z00_811 = BGl_prefixz00zz__osz00(BgL_arg2023z00_813);
					}
					BgL_arg2021z00_812 =
						BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(25L));
					return
						string_append_3(BgL_arg2020z00_811, BGl_string2402z00zzcc_ldz00,
						BgL_arg2021z00_812);
				}
			}
		}

	}



/* loop~1 */
	obj_t BGl_loopze71ze7zzcc_ldz00(obj_t BgL_pathz00_309)
	{
		{	/* Cc/ld.scm 280 */
			if (NULLP(BgL_pathz00_309))
				{	/* Cc/ld.scm 281 */
					return BGl_string2391z00zzcc_ldz00;
				}
			else
				{	/* Cc/ld.scm 284 */
					obj_t BgL_arg1639z00_312;
					obj_t BgL_arg1649z00_313;

					BgL_arg1639z00_312 = CAR(((obj_t) BgL_pathz00_309));
					{	/* Cc/ld.scm 286 */
						obj_t BgL_arg1673z00_318;

						BgL_arg1673z00_318 = CDR(((obj_t) BgL_pathz00_309));
						BgL_arg1649z00_313 = BGl_loopze71ze7zzcc_ldz00(BgL_arg1673z00_318);
					}
					{	/* Cc/ld.scm 283 */
						obj_t BgL_list1650z00_314;

						{	/* Cc/ld.scm 283 */
							obj_t BgL_arg1658z00_315;

							{	/* Cc/ld.scm 283 */
								obj_t BgL_arg1661z00_316;

								{	/* Cc/ld.scm 283 */
									obj_t BgL_arg1669z00_317;

									BgL_arg1669z00_317 =
										MAKE_YOUNG_PAIR(BgL_arg1649z00_313, BNIL);
									BgL_arg1661z00_316 =
										MAKE_YOUNG_PAIR(BGl_string2401z00zzcc_ldz00,
										BgL_arg1669z00_317);
								}
								BgL_arg1658z00_315 =
									MAKE_YOUNG_PAIR(BgL_arg1639z00_312, BgL_arg1661z00_316);
							}
							BgL_list1650z00_314 =
								MAKE_YOUNG_PAIR(BGl_string2404z00zzcc_ldz00,
								BgL_arg1658z00_315);
						}
						BGL_TAIL return
							BGl_stringzd2appendzd2zz__r4_strings_6_7z00(BgL_list1650z00_314);
					}
				}
		}

	}



/* &<@anonymous:2017> */
	obj_t BGl_z62zc3z04anonymousza32017ze3ze5zzcc_ldz00(obj_t BgL_envz00_2009)
	{
		{	/* Cc/ld.scm 180 */
			{	/* Cc/ld.scm 180 */
				obj_t BgL_port1049z00_2010;

				BgL_port1049z00_2010 =
					((obj_t) PROCEDURE_REF(BgL_envz00_2009, (int) (0L)));
				return bgl_close_input_port(BgL_port1049z00_2010);
			}
		}

	}



/* win32-ld */
	obj_t BGl_win32zd2ldzd2zzcc_ldz00(obj_t BgL_namez00_13)
	{
		{	/* Cc/ld.scm 319 */
			{	/* Cc/ld.scm 320 */
				obj_t BgL_list2038z00_840;

				{	/* Cc/ld.scm 320 */
					obj_t BgL_arg2039z00_841;

					{	/* Cc/ld.scm 320 */
						obj_t BgL_arg2040z00_842;

						{	/* Cc/ld.scm 320 */
							obj_t BgL_arg2041z00_843;

							BgL_arg2041z00_843 =
								MAKE_YOUNG_PAIR(BCHAR(((unsigned char) 10)), BNIL);
							BgL_arg2040z00_842 =
								MAKE_YOUNG_PAIR(BGl_string2397z00zzcc_ldz00,
								BgL_arg2041z00_843);
						}
						BgL_arg2039z00_841 =
							MAKE_YOUNG_PAIR(BGl_za2ccza2z00zzengine_paramz00,
							BgL_arg2040z00_842);
					}
					BgL_list2038z00_840 =
						MAKE_YOUNG_PAIR(BGl_string2398z00zzcc_ldz00, BgL_arg2039z00_841);
				}
				BGl_verbosez00zztools_speekz00(BINT(1L), BgL_list2038z00_840);
			}
			{	/* Cc/ld.scm 322 */
				obj_t BgL_staticpz00_844;

				{	/* Cc/ld.scm 323 */
					bool_t BgL__ortest_1090z00_967;

					if (CBOOL(BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
								(16L))))
						{	/* Cc/ld.scm 323 */
							BgL__ortest_1090z00_967 = ((bool_t) 0);
						}
					else
						{	/* Cc/ld.scm 323 */
							BgL__ortest_1090z00_967 = ((bool_t) 1);
						}
					if (BgL__ortest_1090z00_967)
						{	/* Cc/ld.scm 323 */
							BgL_staticpz00_844 = BBOOL(BgL__ortest_1090z00_967);
						}
					else
						{	/* Cc/ld.scm 324 */
							obj_t BgL_port1091z00_968;

							{	/* Cc/ld.scm 324 */
								obj_t BgL_stringz00_1392;

								BgL_stringz00_1392 = BGl_za2ldzd2optionsza2zd2zzengine_paramz00;
								{	/* Cc/ld.scm 324 */
									long BgL_endz00_1394;

									BgL_endz00_1394 = STRING_LENGTH(((obj_t) BgL_stringz00_1392));
									{	/* Cc/ld.scm 324 */

										BgL_port1091z00_968 =
											BGl_openzd2inputzd2stringz00zz__r4_ports_6_10_1z00
											(BgL_stringz00_1392, BINT(0L), BINT(BgL_endz00_1394));
							}}}
							{	/* Cc/ld.scm 324 */
								obj_t BgL_exitd1092z00_969;

								BgL_exitd1092z00_969 = BGL_EXITD_TOP_AS_OBJ();
								{	/* Cc/ld.scm 324 */
									obj_t BgL_zc3z04anonymousza32371ze3z87_2014;

									BgL_zc3z04anonymousza32371ze3z87_2014 =
										MAKE_FX_PROCEDURE
										(BGl_z62zc3z04anonymousza32371ze3ze5zzcc_ldz00, (int) (0L),
										(int) (1L));
									PROCEDURE_SET(BgL_zc3z04anonymousza32371ze3z87_2014,
										(int) (0L), BgL_port1091z00_968);
									{	/* Cc/ld.scm 324 */
										obj_t BgL_arg1820z00_1782;

										{	/* Cc/ld.scm 324 */
											obj_t BgL_arg1821z00_1783;

											BgL_arg1821z00_1783 =
												BGL_EXITD_PROTECT(BgL_exitd1092z00_969);
											BgL_arg1820z00_1782 =
												MAKE_YOUNG_PAIR(BgL_zc3z04anonymousza32371ze3z87_2014,
												BgL_arg1821z00_1783);
										}
										BGL_EXITD_PROTECT_SET(BgL_exitd1092z00_969,
											BgL_arg1820z00_1782);
										BUNSPEC;
									}
									{	/* Cc/ld.scm 324 */
										obj_t BgL_tmp1094z00_971;

										{
											obj_t BgL_iportz00_1013;
											long BgL_lastzd2matchzd2_1014;
											long BgL_forwardz00_1015;
											long BgL_bufposz00_1016;
											obj_t BgL_iportz00_1030;
											long BgL_lastzd2matchzd2_1031;
											long BgL_forwardz00_1032;
											long BgL_bufposz00_1033;
											obj_t BgL_iportz00_1051;
											long BgL_lastzd2matchzd2_1052;
											long BgL_forwardz00_1053;
											long BgL_bufposz00_1054;
											obj_t BgL_iportz00_1067;
											long BgL_lastzd2matchzd2_1068;
											long BgL_forwardz00_1069;
											long BgL_bufposz00_1070;
											obj_t BgL_iportz00_1087;
											long BgL_lastzd2matchzd2_1088;
											long BgL_forwardz00_1089;
											long BgL_bufposz00_1090;
											obj_t BgL_iportz00_1107;
											long BgL_lastzd2matchzd2_1108;
											long BgL_forwardz00_1109;
											long BgL_bufposz00_1110;
											obj_t BgL_iportz00_1127;
											long BgL_lastzd2matchzd2_1128;
											long BgL_forwardz00_1129;
											long BgL_bufposz00_1130;
											obj_t BgL_iportz00_1147;
											long BgL_lastzd2matchzd2_1148;
											long BgL_forwardz00_1149;
											long BgL_bufposz00_1150;
											obj_t BgL_iportz00_1167;
											long BgL_lastzd2matchzd2_1168;
											long BgL_forwardz00_1169;
											long BgL_bufposz00_1170;
											obj_t BgL_iportz00_1187;
											long BgL_lastzd2matchzd2_1188;
											long BgL_forwardz00_1189;
											long BgL_bufposz00_1190;
											obj_t BgL_iportz00_1210;
											long BgL_lastzd2matchzd2_1211;
											long BgL_forwardz00_1212;
											long BgL_bufposz00_1213;

											RGC_START_MATCH(BgL_port1091z00_968);
											{	/* Cc/ld.scm 324 */
												long BgL_matchz00_1344;

												{	/* Cc/ld.scm 324 */
													long BgL_arg2369z00_1349;
													long BgL_arg2370z00_1350;

													BgL_arg2369z00_1349 =
														RGC_BUFFER_FORWARD(BgL_port1091z00_968);
													BgL_arg2370z00_1350 =
														RGC_BUFFER_BUFPOS(BgL_port1091z00_968);
													BgL_iportz00_1210 = BgL_port1091z00_968;
													BgL_lastzd2matchzd2_1211 = 1L;
													BgL_forwardz00_1212 = BgL_arg2369z00_1349;
													BgL_bufposz00_1213 = BgL_arg2370z00_1350;
												BgL_zc3z04anonymousza32265ze3z87_1214:
													if ((BgL_forwardz00_1212 == BgL_bufposz00_1213))
														{	/* Cc/ld.scm 324 */
															if (rgc_fill_buffer(BgL_iportz00_1210))
																{	/* Cc/ld.scm 324 */
																	long BgL_arg2268z00_1217;
																	long BgL_arg2269z00_1218;

																	BgL_arg2268z00_1217 =
																		RGC_BUFFER_FORWARD(BgL_iportz00_1210);
																	BgL_arg2269z00_1218 =
																		RGC_BUFFER_BUFPOS(BgL_iportz00_1210);
																	{
																		long BgL_bufposz00_2992;
																		long BgL_forwardz00_2991;

																		BgL_forwardz00_2991 = BgL_arg2268z00_1217;
																		BgL_bufposz00_2992 = BgL_arg2269z00_1218;
																		BgL_bufposz00_1213 = BgL_bufposz00_2992;
																		BgL_forwardz00_1212 = BgL_forwardz00_2991;
																		goto BgL_zc3z04anonymousza32265ze3z87_1214;
																	}
																}
															else
																{	/* Cc/ld.scm 324 */
																	BgL_matchz00_1344 = BgL_lastzd2matchzd2_1211;
																}
														}
													else
														{	/* Cc/ld.scm 324 */
															int BgL_curz00_1219;

															BgL_curz00_1219 =
																RGC_BUFFER_GET_CHAR(BgL_iportz00_1210,
																BgL_forwardz00_1212);
															{	/* Cc/ld.scm 324 */

																if (((long) (BgL_curz00_1219) == 45L))
																	{	/* Cc/ld.scm 324 */
																		BgL_iportz00_1030 = BgL_iportz00_1210;
																		BgL_lastzd2matchzd2_1031 =
																			BgL_lastzd2matchzd2_1211;
																		BgL_forwardz00_1032 =
																			(1L + BgL_forwardz00_1212);
																		BgL_bufposz00_1033 = BgL_bufposz00_1213;
																	BgL_zc3z04anonymousza32152ze3z87_1034:
																		{	/* Cc/ld.scm 324 */
																			long BgL_newzd2matchzd2_1035;

																			RGC_STOP_MATCH(BgL_iportz00_1030,
																				BgL_forwardz00_1032);
																			BgL_newzd2matchzd2_1035 = 1L;
																			if (
																				(BgL_forwardz00_1032 ==
																					BgL_bufposz00_1033))
																				{	/* Cc/ld.scm 324 */
																					if (rgc_fill_buffer
																						(BgL_iportz00_1030))
																						{	/* Cc/ld.scm 324 */
																							long BgL_arg2155z00_1038;
																							long BgL_arg2156z00_1039;

																							BgL_arg2155z00_1038 =
																								RGC_BUFFER_FORWARD
																								(BgL_iportz00_1030);
																							BgL_arg2156z00_1039 =
																								RGC_BUFFER_BUFPOS
																								(BgL_iportz00_1030);
																							{
																								long BgL_bufposz00_3005;
																								long BgL_forwardz00_3004;

																								BgL_forwardz00_3004 =
																									BgL_arg2155z00_1038;
																								BgL_bufposz00_3005 =
																									BgL_arg2156z00_1039;
																								BgL_bufposz00_1033 =
																									BgL_bufposz00_3005;
																								BgL_forwardz00_1032 =
																									BgL_forwardz00_3004;
																								goto
																									BgL_zc3z04anonymousza32152ze3z87_1034;
																							}
																						}
																					else
																						{	/* Cc/ld.scm 324 */
																							BgL_matchz00_1344 =
																								BgL_newzd2matchzd2_1035;
																						}
																				}
																			else
																				{	/* Cc/ld.scm 324 */
																					int BgL_curz00_1040;

																					BgL_curz00_1040 =
																						RGC_BUFFER_GET_CHAR
																						(BgL_iportz00_1030,
																						BgL_forwardz00_1032);
																					{	/* Cc/ld.scm 324 */

																						if (
																							((long) (BgL_curz00_1040) ==
																								115L))
																							{	/* Cc/ld.scm 324 */
																								BgL_iportz00_1087 =
																									BgL_iportz00_1030;
																								BgL_lastzd2matchzd2_1088 =
																									BgL_newzd2matchzd2_1035;
																								BgL_forwardz00_1089 =
																									(1L + BgL_forwardz00_1032);
																								BgL_bufposz00_1090 =
																									BgL_bufposz00_1033;
																							BgL_zc3z04anonymousza32188ze3z87_1091:
																								if (
																									(BgL_forwardz00_1089 ==
																										BgL_bufposz00_1090))
																									{	/* Cc/ld.scm 324 */
																										if (rgc_fill_buffer
																											(BgL_iportz00_1087))
																											{	/* Cc/ld.scm 324 */
																												long
																													BgL_arg2191z00_1094;
																												long
																													BgL_arg2192z00_1095;
																												BgL_arg2191z00_1094 =
																													RGC_BUFFER_FORWARD
																													(BgL_iportz00_1087);
																												BgL_arg2192z00_1095 =
																													RGC_BUFFER_BUFPOS
																													(BgL_iportz00_1087);
																												{
																													long
																														BgL_bufposz00_3017;
																													long
																														BgL_forwardz00_3016;
																													BgL_forwardz00_3016 =
																														BgL_arg2191z00_1094;
																													BgL_bufposz00_3017 =
																														BgL_arg2192z00_1095;
																													BgL_bufposz00_1090 =
																														BgL_bufposz00_3017;
																													BgL_forwardz00_1089 =
																														BgL_forwardz00_3016;
																													goto
																														BgL_zc3z04anonymousza32188ze3z87_1091;
																												}
																											}
																										else
																											{	/* Cc/ld.scm 324 */
																												BgL_matchz00_1344 =
																													BgL_lastzd2matchzd2_1088;
																											}
																									}
																								else
																									{	/* Cc/ld.scm 324 */
																										int BgL_curz00_1096;

																										BgL_curz00_1096 =
																											RGC_BUFFER_GET_CHAR
																											(BgL_iportz00_1087,
																											BgL_forwardz00_1089);
																										{	/* Cc/ld.scm 324 */

																											if (
																												((long)
																													(BgL_curz00_1096) ==
																													116L))
																												{	/* Cc/ld.scm 324 */
																													BgL_iportz00_1107 =
																														BgL_iportz00_1087;
																													BgL_lastzd2matchzd2_1108
																														=
																														BgL_lastzd2matchzd2_1088;
																													BgL_forwardz00_1109 =
																														(1L +
																														BgL_forwardz00_1089);
																													BgL_bufposz00_1110 =
																														BgL_bufposz00_1090;
																												BgL_zc3z04anonymousza32202ze3z87_1111:
																													if (
																														(BgL_forwardz00_1109
																															==
																															BgL_bufposz00_1110))
																														{	/* Cc/ld.scm 324 */
																															if (rgc_fill_buffer(BgL_iportz00_1107))
																																{	/* Cc/ld.scm 324 */
																																	long
																																		BgL_arg2205z00_1114;
																																	long
																																		BgL_arg2206z00_1115;
																																	BgL_arg2205z00_1114
																																		=
																																		RGC_BUFFER_FORWARD
																																		(BgL_iportz00_1107);
																																	BgL_arg2206z00_1115
																																		=
																																		RGC_BUFFER_BUFPOS
																																		(BgL_iportz00_1107);
																																	{
																																		long
																																			BgL_bufposz00_3029;
																																		long
																																			BgL_forwardz00_3028;
																																		BgL_forwardz00_3028
																																			=
																																			BgL_arg2205z00_1114;
																																		BgL_bufposz00_3029
																																			=
																																			BgL_arg2206z00_1115;
																																		BgL_bufposz00_1110
																																			=
																																			BgL_bufposz00_3029;
																																		BgL_forwardz00_1109
																																			=
																																			BgL_forwardz00_3028;
																																		goto
																																			BgL_zc3z04anonymousza32202ze3z87_1111;
																																	}
																																}
																															else
																																{	/* Cc/ld.scm 324 */
																																	BgL_matchz00_1344
																																		=
																																		BgL_lastzd2matchzd2_1108;
																																}
																														}
																													else
																														{	/* Cc/ld.scm 324 */
																															int
																																BgL_curz00_1116;
																															BgL_curz00_1116 =
																																RGC_BUFFER_GET_CHAR
																																(BgL_iportz00_1107,
																																BgL_forwardz00_1109);
																															{	/* Cc/ld.scm 324 */

																																if (
																																	((long)
																																		(BgL_curz00_1116)
																																		== 97L))
																																	{	/* Cc/ld.scm 324 */
																																		BgL_iportz00_1127
																																			=
																																			BgL_iportz00_1107;
																																		BgL_lastzd2matchzd2_1128
																																			=
																																			BgL_lastzd2matchzd2_1108;
																																		BgL_forwardz00_1129
																																			=
																																			(1L +
																																			BgL_forwardz00_1109);
																																		BgL_bufposz00_1130
																																			=
																																			BgL_bufposz00_1110;
																																	BgL_zc3z04anonymousza32215ze3z87_1131:
																																		if (
																																			(BgL_forwardz00_1129
																																				==
																																				BgL_bufposz00_1130))
																																			{	/* Cc/ld.scm 324 */
																																				if (rgc_fill_buffer(BgL_iportz00_1127))
																																					{	/* Cc/ld.scm 324 */
																																						long
																																							BgL_arg2218z00_1134;
																																						long
																																							BgL_arg2219z00_1135;
																																						BgL_arg2218z00_1134
																																							=
																																							RGC_BUFFER_FORWARD
																																							(BgL_iportz00_1127);
																																						BgL_arg2219z00_1135
																																							=
																																							RGC_BUFFER_BUFPOS
																																							(BgL_iportz00_1127);
																																						{
																																							long
																																								BgL_bufposz00_3041;
																																							long
																																								BgL_forwardz00_3040;
																																							BgL_forwardz00_3040
																																								=
																																								BgL_arg2218z00_1134;
																																							BgL_bufposz00_3041
																																								=
																																								BgL_arg2219z00_1135;
																																							BgL_bufposz00_1130
																																								=
																																								BgL_bufposz00_3041;
																																							BgL_forwardz00_1129
																																								=
																																								BgL_forwardz00_3040;
																																							goto
																																								BgL_zc3z04anonymousza32215ze3z87_1131;
																																						}
																																					}
																																				else
																																					{	/* Cc/ld.scm 324 */
																																						BgL_matchz00_1344
																																							=
																																							BgL_lastzd2matchzd2_1128;
																																					}
																																			}
																																		else
																																			{	/* Cc/ld.scm 324 */
																																				int
																																					BgL_curz00_1136;
																																				BgL_curz00_1136
																																					=
																																					RGC_BUFFER_GET_CHAR
																																					(BgL_iportz00_1127,
																																					BgL_forwardz00_1129);
																																				{	/* Cc/ld.scm 324 */

																																					if (
																																						((long) (BgL_curz00_1136) == 116L))
																																						{	/* Cc/ld.scm 324 */
																																							BgL_iportz00_1147
																																								=
																																								BgL_iportz00_1127;
																																							BgL_lastzd2matchzd2_1148
																																								=
																																								BgL_lastzd2matchzd2_1128;
																																							BgL_forwardz00_1149
																																								=
																																								(1L
																																								+
																																								BgL_forwardz00_1129);
																																							BgL_bufposz00_1150
																																								=
																																								BgL_bufposz00_1130;
																																						BgL_zc3z04anonymousza32228ze3z87_1151:
																																							if ((BgL_forwardz00_1149 == BgL_bufposz00_1150))
																																								{	/* Cc/ld.scm 324 */
																																									if (rgc_fill_buffer(BgL_iportz00_1147))
																																										{	/* Cc/ld.scm 324 */
																																											long
																																												BgL_arg2231z00_1154;
																																											long
																																												BgL_arg2232z00_1155;
																																											BgL_arg2231z00_1154
																																												=
																																												RGC_BUFFER_FORWARD
																																												(BgL_iportz00_1147);
																																											BgL_arg2232z00_1155
																																												=
																																												RGC_BUFFER_BUFPOS
																																												(BgL_iportz00_1147);
																																											{
																																												long
																																													BgL_bufposz00_3053;
																																												long
																																													BgL_forwardz00_3052;
																																												BgL_forwardz00_3052
																																													=
																																													BgL_arg2231z00_1154;
																																												BgL_bufposz00_3053
																																													=
																																													BgL_arg2232z00_1155;
																																												BgL_bufposz00_1150
																																													=
																																													BgL_bufposz00_3053;
																																												BgL_forwardz00_1149
																																													=
																																													BgL_forwardz00_3052;
																																												goto
																																													BgL_zc3z04anonymousza32228ze3z87_1151;
																																											}
																																										}
																																									else
																																										{	/* Cc/ld.scm 324 */
																																											BgL_matchz00_1344
																																												=
																																												BgL_lastzd2matchzd2_1148;
																																										}
																																								}
																																							else
																																								{	/* Cc/ld.scm 324 */
																																									int
																																										BgL_curz00_1156;
																																									BgL_curz00_1156
																																										=
																																										RGC_BUFFER_GET_CHAR
																																										(BgL_iportz00_1147,
																																										BgL_forwardz00_1149);
																																									{	/* Cc/ld.scm 324 */

																																										if (((long) (BgL_curz00_1156) == 105L))
																																											{	/* Cc/ld.scm 324 */
																																												BgL_iportz00_1167
																																													=
																																													BgL_iportz00_1147;
																																												BgL_lastzd2matchzd2_1168
																																													=
																																													BgL_lastzd2matchzd2_1148;
																																												BgL_forwardz00_1169
																																													=
																																													(1L
																																													+
																																													BgL_forwardz00_1149);
																																												BgL_bufposz00_1170
																																													=
																																													BgL_bufposz00_1150;
																																											BgL_zc3z04anonymousza32241ze3z87_1171:
																																												if ((BgL_forwardz00_1169 == BgL_bufposz00_1170))
																																													{	/* Cc/ld.scm 324 */
																																														if (rgc_fill_buffer(BgL_iportz00_1167))
																																															{	/* Cc/ld.scm 324 */
																																																long
																																																	BgL_arg2244z00_1174;
																																																long
																																																	BgL_arg2245z00_1175;
																																																BgL_arg2244z00_1174
																																																	=
																																																	RGC_BUFFER_FORWARD
																																																	(BgL_iportz00_1167);
																																																BgL_arg2245z00_1175
																																																	=
																																																	RGC_BUFFER_BUFPOS
																																																	(BgL_iportz00_1167);
																																																{
																																																	long
																																																		BgL_bufposz00_3065;
																																																	long
																																																		BgL_forwardz00_3064;
																																																	BgL_forwardz00_3064
																																																		=
																																																		BgL_arg2244z00_1174;
																																																	BgL_bufposz00_3065
																																																		=
																																																		BgL_arg2245z00_1175;
																																																	BgL_bufposz00_1170
																																																		=
																																																		BgL_bufposz00_3065;
																																																	BgL_forwardz00_1169
																																																		=
																																																		BgL_forwardz00_3064;
																																																	goto
																																																		BgL_zc3z04anonymousza32241ze3z87_1171;
																																																}
																																															}
																																														else
																																															{	/* Cc/ld.scm 324 */
																																																BgL_matchz00_1344
																																																	=
																																																	BgL_lastzd2matchzd2_1168;
																																															}
																																													}
																																												else
																																													{	/* Cc/ld.scm 324 */
																																														int
																																															BgL_curz00_1176;
																																														BgL_curz00_1176
																																															=
																																															RGC_BUFFER_GET_CHAR
																																															(BgL_iportz00_1167,
																																															BgL_forwardz00_1169);
																																														{	/* Cc/ld.scm 324 */

																																															if (((long) (BgL_curz00_1176) == 99L))
																																																{	/* Cc/ld.scm 324 */
																																																	BgL_iportz00_1187
																																																		=
																																																		BgL_iportz00_1167;
																																																	BgL_lastzd2matchzd2_1188
																																																		=
																																																		BgL_lastzd2matchzd2_1168;
																																																	BgL_forwardz00_1189
																																																		=
																																																		(1L
																																																		+
																																																		BgL_forwardz00_1169);
																																																	BgL_bufposz00_1190
																																																		=
																																																		BgL_bufposz00_1170;
																																																BgL_zc3z04anonymousza32254ze3z87_1191:
																																																	{	/* Cc/ld.scm 324 */
																																																		long
																																																			BgL_newzd2matchzd2_1192;
																																																		RGC_STOP_MATCH
																																																			(BgL_iportz00_1187,
																																																			BgL_forwardz00_1189);
																																																		BgL_newzd2matchzd2_1192
																																																			=
																																																			0L;
																																																		if ((BgL_forwardz00_1189 == BgL_bufposz00_1190))
																																																			{	/* Cc/ld.scm 324 */
																																																				if (rgc_fill_buffer(BgL_iportz00_1187))
																																																					{	/* Cc/ld.scm 324 */
																																																						long
																																																							BgL_arg2257z00_1195;
																																																						long
																																																							BgL_arg2258z00_1196;
																																																						BgL_arg2257z00_1195
																																																							=
																																																							RGC_BUFFER_FORWARD
																																																							(BgL_iportz00_1187);
																																																						BgL_arg2258z00_1196
																																																							=
																																																							RGC_BUFFER_BUFPOS
																																																							(BgL_iportz00_1187);
																																																						{
																																																							long
																																																								BgL_bufposz00_3078;
																																																							long
																																																								BgL_forwardz00_3077;
																																																							BgL_forwardz00_3077
																																																								=
																																																								BgL_arg2257z00_1195;
																																																							BgL_bufposz00_3078
																																																								=
																																																								BgL_arg2258z00_1196;
																																																							BgL_bufposz00_1190
																																																								=
																																																								BgL_bufposz00_3078;
																																																							BgL_forwardz00_1189
																																																								=
																																																								BgL_forwardz00_3077;
																																																							goto
																																																								BgL_zc3z04anonymousza32254ze3z87_1191;
																																																						}
																																																					}
																																																				else
																																																					{	/* Cc/ld.scm 324 */
																																																						BgL_matchz00_1344
																																																							=
																																																							BgL_newzd2matchzd2_1192;
																																																					}
																																																			}
																																																		else
																																																			{	/* Cc/ld.scm 324 */
																																																				int
																																																					BgL_curz00_1197;
																																																				BgL_curz00_1197
																																																					=
																																																					RGC_BUFFER_GET_CHAR
																																																					(BgL_iportz00_1187,
																																																					BgL_forwardz00_1189);
																																																				{	/* Cc/ld.scm 324 */

																																																					if (((long) (BgL_curz00_1197) == 45L))
																																																						{	/* Cc/ld.scm 324 */
																																																							BgL_iportz00_1067
																																																								=
																																																								BgL_iportz00_1187;
																																																							BgL_lastzd2matchzd2_1068
																																																								=
																																																								BgL_newzd2matchzd2_1192;
																																																							BgL_forwardz00_1069
																																																								=
																																																								(1L
																																																								+
																																																								BgL_forwardz00_1189);
																																																							BgL_bufposz00_1070
																																																								=
																																																								BgL_bufposz00_1190;
																																																						BgL_zc3z04anonymousza32175ze3z87_1071:
																																																							if ((BgL_forwardz00_1069 == BgL_bufposz00_1070))
																																																								{	/* Cc/ld.scm 324 */
																																																									if (rgc_fill_buffer(BgL_iportz00_1067))
																																																										{	/* Cc/ld.scm 324 */
																																																											long
																																																												BgL_arg2178z00_1074;
																																																											long
																																																												BgL_arg2179z00_1075;
																																																											BgL_arg2178z00_1074
																																																												=
																																																												RGC_BUFFER_FORWARD
																																																												(BgL_iportz00_1067);
																																																											BgL_arg2179z00_1075
																																																												=
																																																												RGC_BUFFER_BUFPOS
																																																												(BgL_iportz00_1067);
																																																											{
																																																												long
																																																													BgL_bufposz00_3090;
																																																												long
																																																													BgL_forwardz00_3089;
																																																												BgL_forwardz00_3089
																																																													=
																																																													BgL_arg2178z00_1074;
																																																												BgL_bufposz00_3090
																																																													=
																																																													BgL_arg2179z00_1075;
																																																												BgL_bufposz00_1070
																																																													=
																																																													BgL_bufposz00_3090;
																																																												BgL_forwardz00_1069
																																																													=
																																																													BgL_forwardz00_3089;
																																																												goto
																																																													BgL_zc3z04anonymousza32175ze3z87_1071;
																																																											}
																																																										}
																																																									else
																																																										{	/* Cc/ld.scm 324 */
																																																											BgL_matchz00_1344
																																																												=
																																																												BgL_lastzd2matchzd2_1068;
																																																										}
																																																								}
																																																							else
																																																								{	/* Cc/ld.scm 324 */
																																																									int
																																																										BgL_curz00_1076;
																																																									BgL_curz00_1076
																																																										=
																																																										RGC_BUFFER_GET_CHAR
																																																										(BgL_iportz00_1067,
																																																										BgL_forwardz00_1069);
																																																									{	/* Cc/ld.scm 324 */

																																																										if (((long) (BgL_curz00_1076) == 115L))
																																																											{
																																																												long
																																																													BgL_bufposz00_3099;
																																																												long
																																																													BgL_forwardz00_3097;
																																																												long
																																																													BgL_lastzd2matchzd2_3096;
																																																												obj_t
																																																													BgL_iportz00_3095;
																																																												BgL_iportz00_3095
																																																													=
																																																													BgL_iportz00_1067;
																																																												BgL_lastzd2matchzd2_3096
																																																													=
																																																													BgL_lastzd2matchzd2_1068;
																																																												BgL_forwardz00_3097
																																																													=
																																																													(1L
																																																													+
																																																													BgL_forwardz00_1069);
																																																												BgL_bufposz00_3099
																																																													=
																																																													BgL_bufposz00_1070;
																																																												BgL_bufposz00_1090
																																																													=
																																																													BgL_bufposz00_3099;
																																																												BgL_forwardz00_1089
																																																													=
																																																													BgL_forwardz00_3097;
																																																												BgL_lastzd2matchzd2_1088
																																																													=
																																																													BgL_lastzd2matchzd2_3096;
																																																												BgL_iportz00_1087
																																																													=
																																																													BgL_iportz00_3095;
																																																												goto
																																																													BgL_zc3z04anonymousza32188ze3z87_1091;
																																																											}
																																																										else
																																																											{	/* Cc/ld.scm 324 */
																																																												if (((long) (BgL_curz00_1076) == 45L))
																																																													{
																																																														long
																																																															BgL_forwardz00_3103;
																																																														BgL_forwardz00_3103
																																																															=
																																																															(1L
																																																															+
																																																															BgL_forwardz00_1069);
																																																														BgL_forwardz00_1069
																																																															=
																																																															BgL_forwardz00_3103;
																																																														goto
																																																															BgL_zc3z04anonymousza32175ze3z87_1071;
																																																													}
																																																												else
																																																													{	/* Cc/ld.scm 324 */
																																																														bool_t
																																																															BgL_test2628z00_3105;
																																																														if (((long) (BgL_curz00_1076) == 10L))
																																																															{	/* Cc/ld.scm 324 */
																																																																BgL_test2628z00_3105
																																																																	=
																																																																	(
																																																																	(bool_t)
																																																																	1);
																																																															}
																																																														else
																																																															{	/* Cc/ld.scm 324 */
																																																																if (((long) (BgL_curz00_1076) == 45L))
																																																																	{	/* Cc/ld.scm 324 */
																																																																		BgL_test2628z00_3105
																																																																			=
																																																																			(
																																																																			(bool_t)
																																																																			1);
																																																																	}
																																																																else
																																																																	{	/* Cc/ld.scm 324 */
																																																																		BgL_test2628z00_3105
																																																																			=
																																																																			(
																																																																			(long)
																																																																			(BgL_curz00_1076)
																																																																			==
																																																																			115L);
																																																															}}
																																																														if (BgL_test2628z00_3105)
																																																															{	/* Cc/ld.scm 324 */
																																																																BgL_matchz00_1344
																																																																	=
																																																																	BgL_lastzd2matchzd2_1068;
																																																															}
																																																														else
																																																															{	/* Cc/ld.scm 324 */
																																																																BgL_iportz00_1051
																																																																	=
																																																																	BgL_iportz00_1067;
																																																																BgL_lastzd2matchzd2_1052
																																																																	=
																																																																	BgL_lastzd2matchzd2_1068;
																																																																BgL_forwardz00_1053
																																																																	=
																																																																	(1L
																																																																	+
																																																																	BgL_forwardz00_1069);
																																																																BgL_bufposz00_1054
																																																																	=
																																																																	BgL_bufposz00_1070;
																																																															BgL_zc3z04anonymousza32165ze3z87_1055:
																																																																if ((BgL_forwardz00_1053 == BgL_bufposz00_1054))
																																																																	{	/* Cc/ld.scm 324 */
																																																																		if (rgc_fill_buffer(BgL_iportz00_1051))
																																																																			{	/* Cc/ld.scm 324 */
																																																																				long
																																																																					BgL_arg2168z00_1058;
																																																																				long
																																																																					BgL_arg2169z00_1059;
																																																																				BgL_arg2168z00_1058
																																																																					=
																																																																					RGC_BUFFER_FORWARD
																																																																					(BgL_iportz00_1051);
																																																																				BgL_arg2169z00_1059
																																																																					=
																																																																					RGC_BUFFER_BUFPOS
																																																																					(BgL_iportz00_1051);
																																																																				{
																																																																					long
																																																																						BgL_bufposz00_3121;
																																																																					long
																																																																						BgL_forwardz00_3120;
																																																																					BgL_forwardz00_3120
																																																																						=
																																																																						BgL_arg2168z00_1058;
																																																																					BgL_bufposz00_3121
																																																																						=
																																																																						BgL_arg2169z00_1059;
																																																																					BgL_bufposz00_1054
																																																																						=
																																																																						BgL_bufposz00_3121;
																																																																					BgL_forwardz00_1053
																																																																						=
																																																																						BgL_forwardz00_3120;
																																																																					goto
																																																																						BgL_zc3z04anonymousza32165ze3z87_1055;
																																																																				}
																																																																			}
																																																																		else
																																																																			{	/* Cc/ld.scm 324 */
																																																																				BgL_matchz00_1344
																																																																					=
																																																																					BgL_lastzd2matchzd2_1052;
																																																																			}
																																																																	}
																																																																else
																																																																	{	/* Cc/ld.scm 324 */
																																																																		int
																																																																			BgL_curz00_1060;
																																																																		BgL_curz00_1060
																																																																			=
																																																																			RGC_BUFFER_GET_CHAR
																																																																			(BgL_iportz00_1051,
																																																																			BgL_forwardz00_1053);
																																																																		{	/* Cc/ld.scm 324 */

																																																																			if (((long) (BgL_curz00_1060) == 45L))
																																																																				{
																																																																					long
																																																																						BgL_bufposz00_3130;
																																																																					long
																																																																						BgL_forwardz00_3128;
																																																																					long
																																																																						BgL_lastzd2matchzd2_3127;
																																																																					obj_t
																																																																						BgL_iportz00_3126;
																																																																					BgL_iportz00_3126
																																																																						=
																																																																						BgL_iportz00_1051;
																																																																					BgL_lastzd2matchzd2_3127
																																																																						=
																																																																						BgL_lastzd2matchzd2_1052;
																																																																					BgL_forwardz00_3128
																																																																						=
																																																																						(1L
																																																																						+
																																																																						BgL_forwardz00_1053);
																																																																					BgL_bufposz00_3130
																																																																						=
																																																																						BgL_bufposz00_1054;
																																																																					BgL_bufposz00_1070
																																																																						=
																																																																						BgL_bufposz00_3130;
																																																																					BgL_forwardz00_1069
																																																																						=
																																																																						BgL_forwardz00_3128;
																																																																					BgL_lastzd2matchzd2_1068
																																																																						=
																																																																						BgL_lastzd2matchzd2_3127;
																																																																					BgL_iportz00_1067
																																																																						=
																																																																						BgL_iportz00_3126;
																																																																					goto
																																																																						BgL_zc3z04anonymousza32175ze3z87_1071;
																																																																				}
																																																																			else
																																																																				{	/* Cc/ld.scm 324 */
																																																																					bool_t
																																																																						BgL_test2634z00_3131;
																																																																					if (((long) (BgL_curz00_1060) == 10L))
																																																																						{	/* Cc/ld.scm 324 */
																																																																							BgL_test2634z00_3131
																																																																								=
																																																																								(
																																																																								(bool_t)
																																																																								1);
																																																																						}
																																																																					else
																																																																						{	/* Cc/ld.scm 324 */
																																																																							BgL_test2634z00_3131
																																																																								=
																																																																								(
																																																																								(long)
																																																																								(BgL_curz00_1060)
																																																																								==
																																																																								45L);
																																																																						}
																																																																					if (BgL_test2634z00_3131)
																																																																						{	/* Cc/ld.scm 324 */
																																																																							BgL_matchz00_1344
																																																																								=
																																																																								BgL_lastzd2matchzd2_1052;
																																																																						}
																																																																					else
																																																																						{
																																																																							long
																																																																								BgL_forwardz00_3137;
																																																																							BgL_forwardz00_3137
																																																																								=
																																																																								(1L
																																																																								+
																																																																								BgL_forwardz00_1053);
																																																																							BgL_forwardz00_1053
																																																																								=
																																																																								BgL_forwardz00_3137;
																																																																							goto
																																																																								BgL_zc3z04anonymousza32165ze3z87_1055;
																																																																						}
																																																																				}
																																																																		}
																																																																	}
																																																															}
																																																													}
																																																											}
																																																									}
																																																								}
																																																						}
																																																					else
																																																						{	/* Cc/ld.scm 324 */
																																																							bool_t
																																																								BgL_test2636z00_3141;
																																																							if (((long) (BgL_curz00_1197) == 10L))
																																																								{	/* Cc/ld.scm 324 */
																																																									BgL_test2636z00_3141
																																																										=
																																																										(
																																																										(bool_t)
																																																										1);
																																																								}
																																																							else
																																																								{	/* Cc/ld.scm 324 */
																																																									BgL_test2636z00_3141
																																																										=
																																																										(
																																																										(long)
																																																										(BgL_curz00_1197)
																																																										==
																																																										45L);
																																																								}
																																																							if (BgL_test2636z00_3141)
																																																								{	/* Cc/ld.scm 324 */
																																																									BgL_matchz00_1344
																																																										=
																																																										BgL_newzd2matchzd2_1192;
																																																								}
																																																							else
																																																								{
																																																									long
																																																										BgL_bufposz00_3151;
																																																									long
																																																										BgL_forwardz00_3149;
																																																									long
																																																										BgL_lastzd2matchzd2_3148;
																																																									obj_t
																																																										BgL_iportz00_3147;
																																																									BgL_iportz00_3147
																																																										=
																																																										BgL_iportz00_1187;
																																																									BgL_lastzd2matchzd2_3148
																																																										=
																																																										BgL_newzd2matchzd2_1192;
																																																									BgL_forwardz00_3149
																																																										=
																																																										(1L
																																																										+
																																																										BgL_forwardz00_1189);
																																																									BgL_bufposz00_3151
																																																										=
																																																										BgL_bufposz00_1190;
																																																									BgL_bufposz00_1054
																																																										=
																																																										BgL_bufposz00_3151;
																																																									BgL_forwardz00_1053
																																																										=
																																																										BgL_forwardz00_3149;
																																																									BgL_lastzd2matchzd2_1052
																																																										=
																																																										BgL_lastzd2matchzd2_3148;
																																																									BgL_iportz00_1051
																																																										=
																																																										BgL_iportz00_3147;
																																																									goto
																																																										BgL_zc3z04anonymousza32165ze3z87_1055;
																																																								}
																																																						}
																																																				}
																																																			}
																																																	}
																																																}
																																															else
																																																{	/* Cc/ld.scm 324 */
																																																	if (((long) (BgL_curz00_1176) == 45L))
																																																		{
																																																			long
																																																				BgL_bufposz00_3160;
																																																			long
																																																				BgL_forwardz00_3158;
																																																			long
																																																				BgL_lastzd2matchzd2_3157;
																																																			obj_t
																																																				BgL_iportz00_3156;
																																																			BgL_iportz00_3156
																																																				=
																																																				BgL_iportz00_1167;
																																																			BgL_lastzd2matchzd2_3157
																																																				=
																																																				BgL_lastzd2matchzd2_1168;
																																																			BgL_forwardz00_3158
																																																				=
																																																				(1L
																																																				+
																																																				BgL_forwardz00_1169);
																																																			BgL_bufposz00_3160
																																																				=
																																																				BgL_bufposz00_1170;
																																																			BgL_bufposz00_1070
																																																				=
																																																				BgL_bufposz00_3160;
																																																			BgL_forwardz00_1069
																																																				=
																																																				BgL_forwardz00_3158;
																																																			BgL_lastzd2matchzd2_1068
																																																				=
																																																				BgL_lastzd2matchzd2_3157;
																																																			BgL_iportz00_1067
																																																				=
																																																				BgL_iportz00_3156;
																																																			goto
																																																				BgL_zc3z04anonymousza32175ze3z87_1071;
																																																		}
																																																	else
																																																		{	/* Cc/ld.scm 324 */
																																																			bool_t
																																																				BgL_test2639z00_3161;
																																																			if (((long) (BgL_curz00_1176) == 10L))
																																																				{	/* Cc/ld.scm 324 */
																																																					BgL_test2639z00_3161
																																																						=
																																																						(
																																																						(bool_t)
																																																						1);
																																																				}
																																																			else
																																																				{	/* Cc/ld.scm 324 */
																																																					if (((long) (BgL_curz00_1176) == 45L))
																																																						{	/* Cc/ld.scm 324 */
																																																							BgL_test2639z00_3161
																																																								=
																																																								(
																																																								(bool_t)
																																																								1);
																																																						}
																																																					else
																																																						{	/* Cc/ld.scm 324 */
																																																							BgL_test2639z00_3161
																																																								=
																																																								(
																																																								(long)
																																																								(BgL_curz00_1176)
																																																								==
																																																								99L);
																																																				}}
																																																			if (BgL_test2639z00_3161)
																																																				{	/* Cc/ld.scm 324 */
																																																					BgL_matchz00_1344
																																																						=
																																																						BgL_lastzd2matchzd2_1168;
																																																				}
																																																			else
																																																				{
																																																					long
																																																						BgL_bufposz00_3174;
																																																					long
																																																						BgL_forwardz00_3172;
																																																					long
																																																						BgL_lastzd2matchzd2_3171;
																																																					obj_t
																																																						BgL_iportz00_3170;
																																																					BgL_iportz00_3170
																																																						=
																																																						BgL_iportz00_1167;
																																																					BgL_lastzd2matchzd2_3171
																																																						=
																																																						BgL_lastzd2matchzd2_1168;
																																																					BgL_forwardz00_3172
																																																						=
																																																						(1L
																																																						+
																																																						BgL_forwardz00_1169);
																																																					BgL_bufposz00_3174
																																																						=
																																																						BgL_bufposz00_1170;
																																																					BgL_bufposz00_1054
																																																						=
																																																						BgL_bufposz00_3174;
																																																					BgL_forwardz00_1053
																																																						=
																																																						BgL_forwardz00_3172;
																																																					BgL_lastzd2matchzd2_1052
																																																						=
																																																						BgL_lastzd2matchzd2_3171;
																																																					BgL_iportz00_1051
																																																						=
																																																						BgL_iportz00_3170;
																																																					goto
																																																						BgL_zc3z04anonymousza32165ze3z87_1055;
																																																				}
																																																		}
																																																}
																																														}
																																													}
																																											}
																																										else
																																											{	/* Cc/ld.scm 324 */
																																												if (((long) (BgL_curz00_1156) == 45L))
																																													{
																																														long
																																															BgL_bufposz00_3183;
																																														long
																																															BgL_forwardz00_3181;
																																														long
																																															BgL_lastzd2matchzd2_3180;
																																														obj_t
																																															BgL_iportz00_3179;
																																														BgL_iportz00_3179
																																															=
																																															BgL_iportz00_1147;
																																														BgL_lastzd2matchzd2_3180
																																															=
																																															BgL_lastzd2matchzd2_1148;
																																														BgL_forwardz00_3181
																																															=
																																															(1L
																																															+
																																															BgL_forwardz00_1149);
																																														BgL_bufposz00_3183
																																															=
																																															BgL_bufposz00_1150;
																																														BgL_bufposz00_1070
																																															=
																																															BgL_bufposz00_3183;
																																														BgL_forwardz00_1069
																																															=
																																															BgL_forwardz00_3181;
																																														BgL_lastzd2matchzd2_1068
																																															=
																																															BgL_lastzd2matchzd2_3180;
																																														BgL_iportz00_1067
																																															=
																																															BgL_iportz00_3179;
																																														goto
																																															BgL_zc3z04anonymousza32175ze3z87_1071;
																																													}
																																												else
																																													{	/* Cc/ld.scm 324 */
																																														bool_t
																																															BgL_test2643z00_3184;
																																														if (((long) (BgL_curz00_1156) == 10L))
																																															{	/* Cc/ld.scm 324 */
																																																BgL_test2643z00_3184
																																																	=
																																																	(
																																																	(bool_t)
																																																	1);
																																															}
																																														else
																																															{	/* Cc/ld.scm 324 */
																																																if (((long) (BgL_curz00_1156) == 45L))
																																																	{	/* Cc/ld.scm 324 */
																																																		BgL_test2643z00_3184
																																																			=
																																																			(
																																																			(bool_t)
																																																			1);
																																																	}
																																																else
																																																	{	/* Cc/ld.scm 324 */
																																																		BgL_test2643z00_3184
																																																			=
																																																			(
																																																			(long)
																																																			(BgL_curz00_1156)
																																																			==
																																																			105L);
																																															}}
																																														if (BgL_test2643z00_3184)
																																															{	/* Cc/ld.scm 324 */
																																																BgL_matchz00_1344
																																																	=
																																																	BgL_lastzd2matchzd2_1148;
																																															}
																																														else
																																															{
																																																long
																																																	BgL_bufposz00_3197;
																																																long
																																																	BgL_forwardz00_3195;
																																																long
																																																	BgL_lastzd2matchzd2_3194;
																																																obj_t
																																																	BgL_iportz00_3193;
																																																BgL_iportz00_3193
																																																	=
																																																	BgL_iportz00_1147;
																																																BgL_lastzd2matchzd2_3194
																																																	=
																																																	BgL_lastzd2matchzd2_1148;
																																																BgL_forwardz00_3195
																																																	=
																																																	(1L
																																																	+
																																																	BgL_forwardz00_1149);
																																																BgL_bufposz00_3197
																																																	=
																																																	BgL_bufposz00_1150;
																																																BgL_bufposz00_1054
																																																	=
																																																	BgL_bufposz00_3197;
																																																BgL_forwardz00_1053
																																																	=
																																																	BgL_forwardz00_3195;
																																																BgL_lastzd2matchzd2_1052
																																																	=
																																																	BgL_lastzd2matchzd2_3194;
																																																BgL_iportz00_1051
																																																	=
																																																	BgL_iportz00_3193;
																																																goto
																																																	BgL_zc3z04anonymousza32165ze3z87_1055;
																																															}
																																													}
																																											}
																																									}
																																								}
																																						}
																																					else
																																						{	/* Cc/ld.scm 324 */
																																							if (((long) (BgL_curz00_1136) == 45L))
																																								{
																																									long
																																										BgL_bufposz00_3206;
																																									long
																																										BgL_forwardz00_3204;
																																									long
																																										BgL_lastzd2matchzd2_3203;
																																									obj_t
																																										BgL_iportz00_3202;
																																									BgL_iportz00_3202
																																										=
																																										BgL_iportz00_1127;
																																									BgL_lastzd2matchzd2_3203
																																										=
																																										BgL_lastzd2matchzd2_1128;
																																									BgL_forwardz00_3204
																																										=
																																										(1L
																																										+
																																										BgL_forwardz00_1129);
																																									BgL_bufposz00_3206
																																										=
																																										BgL_bufposz00_1130;
																																									BgL_bufposz00_1070
																																										=
																																										BgL_bufposz00_3206;
																																									BgL_forwardz00_1069
																																										=
																																										BgL_forwardz00_3204;
																																									BgL_lastzd2matchzd2_1068
																																										=
																																										BgL_lastzd2matchzd2_3203;
																																									BgL_iportz00_1067
																																										=
																																										BgL_iportz00_3202;
																																									goto
																																										BgL_zc3z04anonymousza32175ze3z87_1071;
																																								}
																																							else
																																								{	/* Cc/ld.scm 324 */
																																									bool_t
																																										BgL_test2647z00_3207;
																																									if (((long) (BgL_curz00_1136) == 10L))
																																										{	/* Cc/ld.scm 324 */
																																											BgL_test2647z00_3207
																																												=
																																												(
																																												(bool_t)
																																												1);
																																										}
																																									else
																																										{	/* Cc/ld.scm 324 */
																																											if (((long) (BgL_curz00_1136) == 45L))
																																												{	/* Cc/ld.scm 324 */
																																													BgL_test2647z00_3207
																																														=
																																														(
																																														(bool_t)
																																														1);
																																												}
																																											else
																																												{	/* Cc/ld.scm 324 */
																																													BgL_test2647z00_3207
																																														=
																																														(
																																														(long)
																																														(BgL_curz00_1136)
																																														==
																																														116L);
																																										}}
																																									if (BgL_test2647z00_3207)
																																										{	/* Cc/ld.scm 324 */
																																											BgL_matchz00_1344
																																												=
																																												BgL_lastzd2matchzd2_1128;
																																										}
																																									else
																																										{
																																											long
																																												BgL_bufposz00_3220;
																																											long
																																												BgL_forwardz00_3218;
																																											long
																																												BgL_lastzd2matchzd2_3217;
																																											obj_t
																																												BgL_iportz00_3216;
																																											BgL_iportz00_3216
																																												=
																																												BgL_iportz00_1127;
																																											BgL_lastzd2matchzd2_3217
																																												=
																																												BgL_lastzd2matchzd2_1128;
																																											BgL_forwardz00_3218
																																												=
																																												(1L
																																												+
																																												BgL_forwardz00_1129);
																																											BgL_bufposz00_3220
																																												=
																																												BgL_bufposz00_1130;
																																											BgL_bufposz00_1054
																																												=
																																												BgL_bufposz00_3220;
																																											BgL_forwardz00_1053
																																												=
																																												BgL_forwardz00_3218;
																																											BgL_lastzd2matchzd2_1052
																																												=
																																												BgL_lastzd2matchzd2_3217;
																																											BgL_iportz00_1051
																																												=
																																												BgL_iportz00_3216;
																																											goto
																																												BgL_zc3z04anonymousza32165ze3z87_1055;
																																										}
																																								}
																																						}
																																				}
																																			}
																																	}
																																else
																																	{	/* Cc/ld.scm 324 */
																																		if (
																																			((long)
																																				(BgL_curz00_1116)
																																				== 45L))
																																			{
																																				long
																																					BgL_bufposz00_3229;
																																				long
																																					BgL_forwardz00_3227;
																																				long
																																					BgL_lastzd2matchzd2_3226;
																																				obj_t
																																					BgL_iportz00_3225;
																																				BgL_iportz00_3225
																																					=
																																					BgL_iportz00_1107;
																																				BgL_lastzd2matchzd2_3226
																																					=
																																					BgL_lastzd2matchzd2_1108;
																																				BgL_forwardz00_3227
																																					=
																																					(1L +
																																					BgL_forwardz00_1109);
																																				BgL_bufposz00_3229
																																					=
																																					BgL_bufposz00_1110;
																																				BgL_bufposz00_1070
																																					=
																																					BgL_bufposz00_3229;
																																				BgL_forwardz00_1069
																																					=
																																					BgL_forwardz00_3227;
																																				BgL_lastzd2matchzd2_1068
																																					=
																																					BgL_lastzd2matchzd2_3226;
																																				BgL_iportz00_1067
																																					=
																																					BgL_iportz00_3225;
																																				goto
																																					BgL_zc3z04anonymousza32175ze3z87_1071;
																																			}
																																		else
																																			{	/* Cc/ld.scm 324 */
																																				bool_t
																																					BgL_test2651z00_3230;
																																				if ((
																																						(long)
																																						(BgL_curz00_1116)
																																						==
																																						10L))
																																					{	/* Cc/ld.scm 324 */
																																						BgL_test2651z00_3230
																																							=
																																							(
																																							(bool_t)
																																							1);
																																					}
																																				else
																																					{	/* Cc/ld.scm 324 */
																																						if (
																																							((long) (BgL_curz00_1116) == 45L))
																																							{	/* Cc/ld.scm 324 */
																																								BgL_test2651z00_3230
																																									=
																																									(
																																									(bool_t)
																																									1);
																																							}
																																						else
																																							{	/* Cc/ld.scm 324 */
																																								BgL_test2651z00_3230
																																									=
																																									(
																																									(long)
																																									(BgL_curz00_1116)
																																									==
																																									97L);
																																					}}
																																				if (BgL_test2651z00_3230)
																																					{	/* Cc/ld.scm 324 */
																																						BgL_matchz00_1344
																																							=
																																							BgL_lastzd2matchzd2_1108;
																																					}
																																				else
																																					{
																																						long
																																							BgL_bufposz00_3243;
																																						long
																																							BgL_forwardz00_3241;
																																						long
																																							BgL_lastzd2matchzd2_3240;
																																						obj_t
																																							BgL_iportz00_3239;
																																						BgL_iportz00_3239
																																							=
																																							BgL_iportz00_1107;
																																						BgL_lastzd2matchzd2_3240
																																							=
																																							BgL_lastzd2matchzd2_1108;
																																						BgL_forwardz00_3241
																																							=
																																							(1L
																																							+
																																							BgL_forwardz00_1109);
																																						BgL_bufposz00_3243
																																							=
																																							BgL_bufposz00_1110;
																																						BgL_bufposz00_1054
																																							=
																																							BgL_bufposz00_3243;
																																						BgL_forwardz00_1053
																																							=
																																							BgL_forwardz00_3241;
																																						BgL_lastzd2matchzd2_1052
																																							=
																																							BgL_lastzd2matchzd2_3240;
																																						BgL_iportz00_1051
																																							=
																																							BgL_iportz00_3239;
																																						goto
																																							BgL_zc3z04anonymousza32165ze3z87_1055;
																																					}
																																			}
																																	}
																															}
																														}
																												}
																											else
																												{	/* Cc/ld.scm 324 */
																													if (
																														((long)
																															(BgL_curz00_1096)
																															== 45L))
																														{
																															long
																																BgL_bufposz00_3252;
																															long
																																BgL_forwardz00_3250;
																															long
																																BgL_lastzd2matchzd2_3249;
																															obj_t
																																BgL_iportz00_3248;
																															BgL_iportz00_3248
																																=
																																BgL_iportz00_1087;
																															BgL_lastzd2matchzd2_3249
																																=
																																BgL_lastzd2matchzd2_1088;
																															BgL_forwardz00_3250
																																=
																																(1L +
																																BgL_forwardz00_1089);
																															BgL_bufposz00_3252
																																=
																																BgL_bufposz00_1090;
																															BgL_bufposz00_1070
																																=
																																BgL_bufposz00_3252;
																															BgL_forwardz00_1069
																																=
																																BgL_forwardz00_3250;
																															BgL_lastzd2matchzd2_1068
																																=
																																BgL_lastzd2matchzd2_3249;
																															BgL_iportz00_1067
																																=
																																BgL_iportz00_3248;
																															goto
																																BgL_zc3z04anonymousza32175ze3z87_1071;
																														}
																													else
																														{	/* Cc/ld.scm 324 */
																															bool_t
																																BgL_test2655z00_3253;
																															if (((long)
																																	(BgL_curz00_1096)
																																	== 10L))
																																{	/* Cc/ld.scm 324 */
																																	BgL_test2655z00_3253
																																		=
																																		((bool_t)
																																		1);
																																}
																															else
																																{	/* Cc/ld.scm 324 */
																																	if (
																																		((long)
																																			(BgL_curz00_1096)
																																			== 45L))
																																		{	/* Cc/ld.scm 324 */
																																			BgL_test2655z00_3253
																																				=
																																				(
																																				(bool_t)
																																				1);
																																		}
																																	else
																																		{	/* Cc/ld.scm 324 */
																																			BgL_test2655z00_3253
																																				=
																																				((long)
																																				(BgL_curz00_1096)
																																				==
																																				116L);
																																}}
																															if (BgL_test2655z00_3253)
																																{	/* Cc/ld.scm 324 */
																																	BgL_matchz00_1344
																																		=
																																		BgL_lastzd2matchzd2_1088;
																																}
																															else
																																{
																																	long
																																		BgL_bufposz00_3266;
																																	long
																																		BgL_forwardz00_3264;
																																	long
																																		BgL_lastzd2matchzd2_3263;
																																	obj_t
																																		BgL_iportz00_3262;
																																	BgL_iportz00_3262
																																		=
																																		BgL_iportz00_1087;
																																	BgL_lastzd2matchzd2_3263
																																		=
																																		BgL_lastzd2matchzd2_1088;
																																	BgL_forwardz00_3264
																																		=
																																		(1L +
																																		BgL_forwardz00_1089);
																																	BgL_bufposz00_3266
																																		=
																																		BgL_bufposz00_1090;
																																	BgL_bufposz00_1054
																																		=
																																		BgL_bufposz00_3266;
																																	BgL_forwardz00_1053
																																		=
																																		BgL_forwardz00_3264;
																																	BgL_lastzd2matchzd2_1052
																																		=
																																		BgL_lastzd2matchzd2_3263;
																																	BgL_iportz00_1051
																																		=
																																		BgL_iportz00_3262;
																																	goto
																																		BgL_zc3z04anonymousza32165ze3z87_1055;
																																}
																														}
																												}
																										}
																									}
																							}
																						else
																							{	/* Cc/ld.scm 324 */
																								if (
																									((long) (BgL_curz00_1040) ==
																										45L))
																									{
																										long BgL_bufposz00_3275;
																										long BgL_forwardz00_3273;
																										long
																											BgL_lastzd2matchzd2_3272;
																										obj_t BgL_iportz00_3271;

																										BgL_iportz00_3271 =
																											BgL_iportz00_1030;
																										BgL_lastzd2matchzd2_3272 =
																											BgL_newzd2matchzd2_1035;
																										BgL_forwardz00_3273 =
																											(1L +
																											BgL_forwardz00_1032);
																										BgL_bufposz00_3275 =
																											BgL_bufposz00_1033;
																										BgL_bufposz00_1070 =
																											BgL_bufposz00_3275;
																										BgL_forwardz00_1069 =
																											BgL_forwardz00_3273;
																										BgL_lastzd2matchzd2_1068 =
																											BgL_lastzd2matchzd2_3272;
																										BgL_iportz00_1067 =
																											BgL_iportz00_3271;
																										goto
																											BgL_zc3z04anonymousza32175ze3z87_1071;
																									}
																								else
																									{	/* Cc/ld.scm 324 */
																										bool_t BgL_test2659z00_3276;

																										if (
																											((long) (BgL_curz00_1040)
																												== 10L))
																											{	/* Cc/ld.scm 324 */
																												BgL_test2659z00_3276 =
																													((bool_t) 1);
																											}
																										else
																											{	/* Cc/ld.scm 324 */
																												if (
																													((long)
																														(BgL_curz00_1040) ==
																														45L))
																													{	/* Cc/ld.scm 324 */
																														BgL_test2659z00_3276
																															= ((bool_t) 1);
																													}
																												else
																													{	/* Cc/ld.scm 324 */
																														BgL_test2659z00_3276
																															=
																															((long)
																															(BgL_curz00_1040)
																															== 115L);
																											}}
																										if (BgL_test2659z00_3276)
																											{	/* Cc/ld.scm 324 */
																												BgL_matchz00_1344 =
																													BgL_newzd2matchzd2_1035;
																											}
																										else
																											{
																												long BgL_bufposz00_3289;
																												long
																													BgL_forwardz00_3287;
																												long
																													BgL_lastzd2matchzd2_3286;
																												obj_t BgL_iportz00_3285;

																												BgL_iportz00_3285 =
																													BgL_iportz00_1030;
																												BgL_lastzd2matchzd2_3286
																													=
																													BgL_newzd2matchzd2_1035;
																												BgL_forwardz00_3287 =
																													(1L +
																													BgL_forwardz00_1032);
																												BgL_bufposz00_3289 =
																													BgL_bufposz00_1033;
																												BgL_bufposz00_1054 =
																													BgL_bufposz00_3289;
																												BgL_forwardz00_1053 =
																													BgL_forwardz00_3287;
																												BgL_lastzd2matchzd2_1052
																													=
																													BgL_lastzd2matchzd2_3286;
																												BgL_iportz00_1051 =
																													BgL_iportz00_3285;
																												goto
																													BgL_zc3z04anonymousza32165ze3z87_1055;
																											}
																									}
																							}
																					}
																				}
																		}
																	}
																else
																	{	/* Cc/ld.scm 324 */
																		if (((long) (BgL_curz00_1219) == 10L))
																			{	/* Cc/ld.scm 324 */
																				long BgL_arg2273z00_1223;

																				BgL_arg2273z00_1223 =
																					(1L + BgL_forwardz00_1212);
																				{	/* Cc/ld.scm 324 */
																					long BgL_newzd2matchzd2_1945;

																					RGC_STOP_MATCH(BgL_iportz00_1210,
																						BgL_arg2273z00_1223);
																					BgL_newzd2matchzd2_1945 = 1L;
																					BgL_matchz00_1344 =
																						BgL_newzd2matchzd2_1945;
																			}}
																		else
																			{	/* Cc/ld.scm 324 */
																				BgL_iportz00_1013 = BgL_iportz00_1210;
																				BgL_lastzd2matchzd2_1014 =
																					BgL_lastzd2matchzd2_1211;
																				BgL_forwardz00_1015 =
																					(1L + BgL_forwardz00_1212);
																				BgL_bufposz00_1016 = BgL_bufposz00_1213;
																			BgL_zc3z04anonymousza32141ze3z87_1017:
																				{	/* Cc/ld.scm 324 */
																					long BgL_newzd2matchzd2_1018;

																					RGC_STOP_MATCH(BgL_iportz00_1013,
																						BgL_forwardz00_1015);
																					BgL_newzd2matchzd2_1018 = 1L;
																					if (
																						(BgL_forwardz00_1015 ==
																							BgL_bufposz00_1016))
																						{	/* Cc/ld.scm 324 */
																							if (rgc_fill_buffer
																								(BgL_iportz00_1013))
																								{	/* Cc/ld.scm 324 */
																									long BgL_arg2144z00_1021;
																									long BgL_arg2145z00_1022;

																									BgL_arg2144z00_1021 =
																										RGC_BUFFER_FORWARD
																										(BgL_iportz00_1013);
																									BgL_arg2145z00_1022 =
																										RGC_BUFFER_BUFPOS
																										(BgL_iportz00_1013);
																									{
																										long BgL_bufposz00_3304;
																										long BgL_forwardz00_3303;

																										BgL_forwardz00_3303 =
																											BgL_arg2144z00_1021;
																										BgL_bufposz00_3304 =
																											BgL_arg2145z00_1022;
																										BgL_bufposz00_1016 =
																											BgL_bufposz00_3304;
																										BgL_forwardz00_1015 =
																											BgL_forwardz00_3303;
																										goto
																											BgL_zc3z04anonymousza32141ze3z87_1017;
																									}
																								}
																							else
																								{	/* Cc/ld.scm 324 */
																									BgL_matchz00_1344 =
																										BgL_newzd2matchzd2_1018;
																								}
																						}
																					else
																						{	/* Cc/ld.scm 324 */
																							int BgL_curz00_1023;

																							BgL_curz00_1023 =
																								RGC_BUFFER_GET_CHAR
																								(BgL_iportz00_1013,
																								BgL_forwardz00_1015);
																							{	/* Cc/ld.scm 324 */

																								if (
																									((long) (BgL_curz00_1023) ==
																										45L))
																									{
																										long BgL_bufposz00_3313;
																										long BgL_forwardz00_3311;
																										long
																											BgL_lastzd2matchzd2_3310;
																										obj_t BgL_iportz00_3309;

																										BgL_iportz00_3309 =
																											BgL_iportz00_1013;
																										BgL_lastzd2matchzd2_3310 =
																											BgL_newzd2matchzd2_1018;
																										BgL_forwardz00_3311 =
																											(1L +
																											BgL_forwardz00_1015);
																										BgL_bufposz00_3313 =
																											BgL_bufposz00_1016;
																										BgL_bufposz00_1070 =
																											BgL_bufposz00_3313;
																										BgL_forwardz00_1069 =
																											BgL_forwardz00_3311;
																										BgL_lastzd2matchzd2_1068 =
																											BgL_lastzd2matchzd2_3310;
																										BgL_iportz00_1067 =
																											BgL_iportz00_3309;
																										goto
																											BgL_zc3z04anonymousza32175ze3z87_1071;
																									}
																								else
																									{	/* Cc/ld.scm 324 */
																										bool_t BgL_test2666z00_3314;

																										if (
																											((long) (BgL_curz00_1023)
																												== 10L))
																											{	/* Cc/ld.scm 324 */
																												BgL_test2666z00_3314 =
																													((bool_t) 1);
																											}
																										else
																											{	/* Cc/ld.scm 324 */
																												BgL_test2666z00_3314 =
																													(
																													(long)
																													(BgL_curz00_1023) ==
																													45L);
																											}
																										if (BgL_test2666z00_3314)
																											{	/* Cc/ld.scm 324 */
																												BgL_matchz00_1344 =
																													BgL_newzd2matchzd2_1018;
																											}
																										else
																											{
																												long BgL_bufposz00_3324;
																												long
																													BgL_forwardz00_3322;
																												long
																													BgL_lastzd2matchzd2_3321;
																												obj_t BgL_iportz00_3320;

																												BgL_iportz00_3320 =
																													BgL_iportz00_1013;
																												BgL_lastzd2matchzd2_3321
																													=
																													BgL_newzd2matchzd2_1018;
																												BgL_forwardz00_3322 =
																													(1L +
																													BgL_forwardz00_1015);
																												BgL_bufposz00_3324 =
																													BgL_bufposz00_1016;
																												BgL_bufposz00_1054 =
																													BgL_bufposz00_3324;
																												BgL_forwardz00_1053 =
																													BgL_forwardz00_3322;
																												BgL_lastzd2matchzd2_1052
																													=
																													BgL_lastzd2matchzd2_3321;
																												BgL_iportz00_1051 =
																													BgL_iportz00_3320;
																												goto
																													BgL_zc3z04anonymousza32165ze3z87_1055;
																											}
																									}
																							}
																						}
																				}
																			}
																	}
															}
														}
												}
												RGC_SET_FILEPOS(BgL_port1091z00_968);
												{

													switch (BgL_matchz00_1344)
														{
														case 1L:

															BgL_tmp1094z00_971 = BFALSE;
															break;
														case 0L:

															BgL_tmp1094z00_971 = BTRUE;
															break;
														default:
															BgL_tmp1094z00_971 =
																BGl_errorz00zz__errorz00
																(BGl_string2399z00zzcc_ldz00,
																BGl_string2400z00zzcc_ldz00,
																BINT(BgL_matchz00_1344));
														}
												}
											}
										}
										{	/* Cc/ld.scm 324 */
											bool_t BgL_test2668z00_3330;

											{	/* Cc/ld.scm 324 */
												obj_t BgL_arg1819z00_1954;

												BgL_arg1819z00_1954 =
													BGL_EXITD_PROTECT(BgL_exitd1092z00_969);
												BgL_test2668z00_3330 = PAIRP(BgL_arg1819z00_1954);
											}
											if (BgL_test2668z00_3330)
												{	/* Cc/ld.scm 324 */
													obj_t BgL_arg1817z00_1955;

													{	/* Cc/ld.scm 324 */
														obj_t BgL_arg1818z00_1956;

														BgL_arg1818z00_1956 =
															BGL_EXITD_PROTECT(BgL_exitd1092z00_969);
														BgL_arg1817z00_1955 =
															CDR(((obj_t) BgL_arg1818z00_1956));
													}
													BGL_EXITD_PROTECT_SET(BgL_exitd1092z00_969,
														BgL_arg1817z00_1955);
													BUNSPEC;
												}
											else
												{	/* Cc/ld.scm 324 */
													BFALSE;
												}
										}
										bgl_close_input_port(BgL_port1091z00_968);
										BgL_staticpz00_844 = BgL_tmp1094z00_971;
									}
								}
							}
						}
				}
				if (CBOOL(BgL_staticpz00_844))
					{	/* Cc/ld.scm 330 */
						obj_t BgL_arg2042z00_845;

						BgL_arg2042z00_845 =
							BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(17L));
						BGl_za2ldzd2optionsza2zd2zzengine_paramz00 =
							string_append_3(BgL_arg2042z00_845, BGl_string2401z00zzcc_ldz00,
							BGl_za2ldzd2optionsza2zd2zzengine_paramz00);
					}
				else
					{	/* Cc/ld.scm 332 */
						obj_t BgL_arg2043z00_846;

						BgL_arg2043z00_846 =
							BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(18L));
						BGl_za2ldzd2optionsza2zd2zzengine_paramz00 =
							string_append_3(BgL_arg2043z00_846, BGl_string2401z00zzcc_ldz00,
							BGl_za2ldzd2optionsza2zd2zzengine_paramz00);
					}
				if (CBOOL(BGl_za2multizd2threadedzd2gczf3za2zf3zzengine_paramz00))
					{	/* Cc/ld.scm 336 */
						BGl_libraryzd2translationzd2tablezd2addz12zc0zz__libraryz00
							(BGl_za2bigloozd2libza2zd2zzengine_paramz00,
							BGl_string2407z00zzcc_ldz00, BNIL);
					}
				else
					{	/* Cc/ld.scm 336 */
						BFALSE;
					}
				{	/* Cc/ld.scm 338 */
					obj_t BgL_destz00_848;

					if (STRINGP(BGl_za2destza2z00zzengine_paramz00))
						{	/* Cc/ld.scm 338 */
							BgL_destz00_848 = BGl_za2destza2z00zzengine_paramz00;
						}
					else
						{	/* Cc/ld.scm 338 */
							BgL_destz00_848 = string_to_bstring(BGL_DEFAULT_A_OUT);
						}
					{	/* Cc/ld.scm 338 */
						obj_t BgL_bigloozd2libzd2_849;

						{	/* Cc/ld.scm 343 */
							obj_t BgL_arg2139z00_965;

							BgL_arg2139z00_965 = BGl_libraryzd2suffixeszd2zzcc_ldz00();
							BgL_bigloozd2libzd2_849 =
								BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00
								(BGl_za2bigloozd2libza2zd2zzengine_paramz00, BgL_arg2139z00_965,
								BTRUE, ((bool_t) 0), ((bool_t) 0));
						}
						{	/* Cc/ld.scm 342 */
							obj_t BgL_addzd2libszd2_850;

							{
								obj_t BgL_libz00_953;
								obj_t BgL_resz00_954;

								BgL_libz00_953 =
									BGl_za2additionalzd2bigloozd2librariesza2z00zzengine_paramz00;
								BgL_resz00_954 = BNIL;
							BgL_zc3z04anonymousza32130ze3z87_955:
								if (NULLP(BgL_libz00_953))
									{	/* Cc/ld.scm 348 */
										BgL_addzd2libszd2_850 = BgL_resz00_954;
									}
								else
									{	/* Cc/ld.scm 350 */
										obj_t BgL_arg2132z00_957;
										obj_t BgL_arg2134z00_958;

										BgL_arg2132z00_957 = CDR(((obj_t) BgL_libz00_953));
										{	/* Cc/ld.scm 353 */
											obj_t BgL_arg2135z00_959;

											{	/* Cc/ld.scm 353 */
												obj_t BgL_arg2136z00_960;
												obj_t BgL_arg2137z00_961;
												obj_t BgL_arg2138z00_962;

												BgL_arg2136z00_960 = CAR(((obj_t) BgL_libz00_953));
												BgL_arg2137z00_961 =
													BGl_libraryzd2suffixeszd2zzcc_ldz00();
												{	/* Cc/ld.scm 355 */
													obj_t BgL__ortest_1112z00_963;

													BgL__ortest_1112z00_963 =
														BGl_za2staticzd2allzd2bigloozf3za2zf3zzengine_paramz00;
													if (CBOOL(BgL__ortest_1112z00_963))
														{	/* Cc/ld.scm 355 */
															BgL_arg2138z00_962 = BgL__ortest_1112z00_963;
														}
													else
														{	/* Cc/ld.scm 355 */
															BgL_arg2138z00_962 = BgL_staticpz00_844;
														}
												}
												BgL_arg2135z00_959 =
													BGl_libraryzd2ze3oszd2fileze3zzcc_ldz00
													(BgL_arg2136z00_960, BgL_arg2137z00_961,
													BgL_arg2138z00_962, ((bool_t) 0), ((bool_t) 0));
											}
											BgL_arg2134z00_958 =
												MAKE_YOUNG_PAIR(BgL_arg2135z00_959, BgL_resz00_954);
										}
										{
											obj_t BgL_resz00_3366;
											obj_t BgL_libz00_3365;

											BgL_libz00_3365 = BgL_arg2132z00_957;
											BgL_resz00_3366 = BgL_arg2134z00_958;
											BgL_resz00_954 = BgL_resz00_3366;
											BgL_libz00_953 = BgL_libz00_3365;
											goto BgL_zc3z04anonymousza32130ze3z87_955;
										}
									}
							}
							{	/* Cc/ld.scm 346 */
								obj_t BgL_otherzd2libszd2_851;

								BgL_otherzd2libszd2_851 =
									BGl_za2bigloozd2userzd2libza2z00zzengine_paramz00;
								{	/* Cc/ld.scm 358 */
									obj_t BgL_ldzd2argszd2_852;

									{	/* Cc/ld.scm 361 */
										obj_t BgL_arg2059z00_874;
										obj_t BgL_arg2060z00_875;
										obj_t BgL_arg2061z00_876;
										obj_t BgL_arg2062z00_877;
										obj_t BgL_arg2063z00_878;
										obj_t BgL_arg2066z00_879;
										obj_t BgL_arg2067z00_880;
										obj_t BgL_arg2069z00_881;
										obj_t BgL_arg2070z00_882;
										obj_t BgL_arg2071z00_883;
										obj_t BgL_arg2072z00_884;
										obj_t BgL_arg2073z00_885;
										obj_t BgL_arg2074z00_886;

										{	/* Cc/ld.scm 361 */
											obj_t BgL_arg2094z00_904;

											BgL_arg2094z00_904 =
												string_append_3(BgL_namez00_13,
												BGl_string2402z00zzcc_ldz00,
												BGl_za2czd2objectzd2filezd2extensionza2zd2zzengine_paramz00);
											{	/* Cc/ld.scm 361 */
												obj_t BgL_list2095z00_905;

												BgL_list2095z00_905 =
													MAKE_YOUNG_PAIR(BgL_arg2094z00_904, BNIL);
												BgL_arg2059z00_874 = BgL_list2095z00_905;
											}
										}
										{	/* Cc/ld.scm 369 */
											obj_t BgL_arg2096z00_906;

											BgL_arg2096z00_906 =
												string_append
												(BGl_za2ldzd2ozd2optionza2z00zzengine_paramz00,
												BgL_destz00_848);
											{	/* Cc/ld.scm 369 */
												obj_t BgL_list2097z00_907;

												BgL_list2097z00_907 =
													MAKE_YOUNG_PAIR(BgL_arg2096z00_906, BNIL);
												BgL_arg2060z00_875 = BgL_list2097z00_907;
											}
										}
										BgL_arg2061z00_876 =
											BGl_zc3z04anonymousza32098ze3ze70z60zzcc_ldz00
											(BGl_za2cczd2optionsza2zd2zzengine_paramz00);
										{	/* Cc/ld.scm 375 */
											obj_t BgL_list2103z00_917;

											BgL_list2103z00_917 =
												MAKE_YOUNG_PAIR(BGl_string2408z00zzcc_ldz00, BNIL);
											BgL_arg2062z00_877 = BgL_list2103z00_917;
										}
										{	/* Cc/ld.scm 377 */
											bool_t BgL_test2674z00_3373;

											if (CBOOL(BGl_za2czd2debugza2zd2zzengine_paramz00))
												{	/* Cc/ld.scm 377 */
													BgL_test2674z00_3373 = ((bool_t) 1);
												}
											else
												{	/* Cc/ld.scm 377 */
													BgL_test2674z00_3373 =
														(
														(long)
														CINT(BGl_za2bdbzd2debugza2zd2zzengine_paramz00) >
														0L);
												}
											if (BgL_test2674z00_3373)
												{	/* Cc/ld.scm 377 */
													BgL_arg2063z00_878 =
														BGl_stringzd2splitzd2charz00zztools_miscz00
														(BGl_za2ldzd2debugzd2optionza2z00zzengine_paramz00,
														BCHAR(((unsigned char) ' ')));
												}
											else
												{	/* Cc/ld.scm 377 */
													BgL_arg2063z00_878 = BNIL;
												}
										}
										if (CBOOL(BGl_za2czd2debugza2zd2zzengine_paramz00))
											{	/* Cc/ld.scm 381 */
												BgL_arg2066z00_879 = BNIL;
											}
										else
											{	/* Cc/ld.scm 381 */
												BgL_arg2066z00_879 =
													BGl_stringzd2splitzd2charz00zztools_miscz00
													(BGl_za2ldzd2optimzd2flagsza2z00zzengine_paramz00,
													BCHAR(((unsigned char) ' ')));
											}
										{	/* Cc/ld.scm 385 */
											bool_t BgL_test2677z00_3384;

											if (CBOOL(BGl_za2stripza2z00zzengine_paramz00))
												{	/* Cc/ld.scm 386 */
													bool_t BgL_test2679z00_3387;

													{	/* Cc/ld.scm 386 */
														obj_t BgL_arg2111z00_926;

														BgL_arg2111z00_926 =
															BGl_bigloozd2configzd2zz__configurez00
															(CNST_TABLE_REF(21L));
														{	/* Cc/ld.scm 386 */
															long BgL_l1z00_1970;

															BgL_l1z00_1970 =
																STRING_LENGTH(((obj_t) BgL_arg2111z00_926));
															if ((BgL_l1z00_1970 == 0L))
																{	/* Cc/ld.scm 386 */
																	int BgL_arg1303z00_1973;

																	{	/* Cc/ld.scm 386 */
																		char *BgL_auxz00_3397;
																		char *BgL_tmpz00_3394;

																		BgL_auxz00_3397 =
																			BSTRING_TO_STRING
																			(BGl_string2391z00zzcc_ldz00);
																		BgL_tmpz00_3394 =
																			BSTRING_TO_STRING(((obj_t)
																				BgL_arg2111z00_926));
																		BgL_arg1303z00_1973 =
																			memcmp(BgL_tmpz00_3394, BgL_auxz00_3397,
																			BgL_l1z00_1970);
																	}
																	BgL_test2679z00_3387 =
																		((long) (BgL_arg1303z00_1973) == 0L);
																}
															else
																{	/* Cc/ld.scm 386 */
																	BgL_test2679z00_3387 = ((bool_t) 0);
																}
														}
													}
													if (BgL_test2679z00_3387)
														{	/* Cc/ld.scm 386 */
															BgL_test2677z00_3384 = ((bool_t) 0);
														}
													else
														{	/* Cc/ld.scm 386 */
															BgL_test2677z00_3384 = ((bool_t) 1);
														}
												}
											else
												{	/* Cc/ld.scm 385 */
													BgL_test2677z00_3384 = ((bool_t) 0);
												}
											if (BgL_test2677z00_3384)
												{	/* Cc/ld.scm 387 */
													obj_t BgL_arg2109z00_923;

													BgL_arg2109z00_923 =
														BGl_bigloozd2configzd2zz__configurez00
														(CNST_TABLE_REF(21L));
													{	/* Cc/ld.scm 387 */
														obj_t BgL_list2110z00_924;

														BgL_list2110z00_924 =
															MAKE_YOUNG_PAIR(BgL_arg2109z00_923, BNIL);
														BgL_arg2067z00_880 = BgL_list2110z00_924;
													}
												}
											else
												{	/* Cc/ld.scm 385 */
													BgL_arg2067z00_880 = BNIL;
												}
										}
										BgL_arg2069z00_881 =
											BGl_stringzd2splitzd2charz00zztools_miscz00
											(BGl_za2ldzd2optionsza2zd2zzengine_paramz00,
											BCHAR(((unsigned char) ' ')));
										BgL_arg2070z00_882 =
											BGl_loopze70ze7zzcc_ldz00
											(BGl_za2libzd2dirza2zd2zzengine_paramz00);
										{	/* Cc/ld.scm 400 */
											obj_t BgL_list2118z00_936;

											BgL_list2118z00_936 =
												MAKE_YOUNG_PAIR(BgL_bigloozd2libzd2_849, BNIL);
											BgL_arg2071z00_883 = BgL_list2118z00_936;
										}
										{	/* Cc/ld.scm 402 */
											bool_t BgL_test2681z00_3409;

											{	/* Cc/ld.scm 402 */
												obj_t BgL_arg2124z00_941;

												BgL_arg2124z00_941 =
													BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
													(24L));
												{	/* Cc/ld.scm 402 */
													long BgL_l1z00_1985;

													BgL_l1z00_1985 =
														STRING_LENGTH(((obj_t) BgL_arg2124z00_941));
													if ((BgL_l1z00_1985 == 0L))
														{	/* Cc/ld.scm 402 */
															int BgL_arg1303z00_1988;

															{	/* Cc/ld.scm 402 */
																char *BgL_auxz00_3419;
																char *BgL_tmpz00_3416;

																BgL_auxz00_3419 =
																	BSTRING_TO_STRING
																	(BGl_string2391z00zzcc_ldz00);
																BgL_tmpz00_3416 =
																	BSTRING_TO_STRING(((obj_t)
																		BgL_arg2124z00_941));
																BgL_arg1303z00_1988 =
																	memcmp(BgL_tmpz00_3416, BgL_auxz00_3419,
																	BgL_l1z00_1985);
															}
															BgL_test2681z00_3409 =
																((long) (BgL_arg1303z00_1988) == 0L);
														}
													else
														{	/* Cc/ld.scm 402 */
															BgL_test2681z00_3409 = ((bool_t) 0);
														}
												}
											}
											if (BgL_test2681z00_3409)
												{	/* Cc/ld.scm 402 */
													BgL_arg2072z00_884 = BNIL;
												}
											else
												{	/* Cc/ld.scm 404 */
													obj_t BgL_arg2122z00_939;

													BgL_arg2122z00_939 =
														BGl_bigloozd2configzd2zz__configurez00
														(CNST_TABLE_REF(24L));
													{	/* Cc/ld.scm 404 */
														obj_t BgL_list2123z00_940;

														BgL_list2123z00_940 =
															MAKE_YOUNG_PAIR(BgL_arg2122z00_939, BNIL);
														BgL_arg2072z00_884 = BgL_list2123z00_940;
													}
												}
										}
										if (CBOOL
											(BGl_za2doublezd2ldzd2libszf3za2zf3zzengine_paramz00))
											{	/* Cc/ld.scm 408 */
												BgL_arg2073z00_885 = BgL_addzd2libszd2_850;
											}
										else
											{	/* Cc/ld.scm 408 */
												BgL_arg2073z00_885 = BNIL;
											}
										BgL_arg2074z00_886 =
											BGl_zc3z04anonymousza32125ze3ze70z60zzcc_ldz00
											(BGl_za2ldzd2postzd2optionsza2z00zzengine_paramz00);
										{	/* Cc/ld.scm 359 */
											obj_t BgL_list2075z00_887;

											{	/* Cc/ld.scm 359 */
												obj_t BgL_arg2076z00_888;

												{	/* Cc/ld.scm 359 */
													obj_t BgL_arg2077z00_889;

													{	/* Cc/ld.scm 359 */
														obj_t BgL_arg2078z00_890;

														{	/* Cc/ld.scm 359 */
															obj_t BgL_arg2079z00_891;

															{	/* Cc/ld.scm 359 */
																obj_t BgL_arg2080z00_892;

																{	/* Cc/ld.scm 359 */
																	obj_t BgL_arg2081z00_893;

																	{	/* Cc/ld.scm 359 */
																		obj_t BgL_arg2082z00_894;

																		{	/* Cc/ld.scm 359 */
																			obj_t BgL_arg2083z00_895;

																			{	/* Cc/ld.scm 359 */
																				obj_t BgL_arg2085z00_896;

																				{	/* Cc/ld.scm 359 */
																					obj_t BgL_arg2086z00_897;

																					{	/* Cc/ld.scm 359 */
																						obj_t BgL_arg2087z00_898;

																						{	/* Cc/ld.scm 359 */
																							obj_t BgL_arg2088z00_899;

																							{	/* Cc/ld.scm 359 */
																								obj_t BgL_arg2089z00_900;

																								{	/* Cc/ld.scm 359 */
																									obj_t BgL_arg2090z00_901;

																									{	/* Cc/ld.scm 359 */
																										obj_t BgL_arg2091z00_902;

																										{	/* Cc/ld.scm 359 */
																											obj_t BgL_arg2093z00_903;

																											BgL_arg2093z00_903 =
																												MAKE_YOUNG_PAIR
																												(BgL_arg2074z00_886,
																												BNIL);
																											BgL_arg2091z00_902 =
																												MAKE_YOUNG_PAIR
																												(BgL_arg2073z00_885,
																												BgL_arg2093z00_903);
																										}
																										BgL_arg2090z00_901 =
																											MAKE_YOUNG_PAIR
																											(BgL_otherzd2libszd2_851,
																											BgL_arg2091z00_902);
																									}
																									BgL_arg2089z00_900 =
																										MAKE_YOUNG_PAIR
																										(BgL_arg2072z00_884,
																										BgL_arg2090z00_901);
																								}
																								BgL_arg2088z00_899 =
																									MAKE_YOUNG_PAIR
																									(BgL_arg2071z00_883,
																									BgL_arg2089z00_900);
																							}
																							BgL_arg2087z00_898 =
																								MAKE_YOUNG_PAIR
																								(BgL_addzd2libszd2_850,
																								BgL_arg2088z00_899);
																						}
																						BgL_arg2086z00_897 =
																							MAKE_YOUNG_PAIR
																							(BgL_arg2070z00_882,
																							BgL_arg2087z00_898);
																					}
																					BgL_arg2085z00_896 =
																						MAKE_YOUNG_PAIR(BgL_arg2069z00_881,
																						BgL_arg2086z00_897);
																				}
																				BgL_arg2083z00_895 =
																					MAKE_YOUNG_PAIR(BgL_arg2067z00_880,
																					BgL_arg2085z00_896);
																			}
																			BgL_arg2082z00_894 =
																				MAKE_YOUNG_PAIR(BgL_arg2066z00_879,
																				BgL_arg2083z00_895);
																		}
																		BgL_arg2081z00_893 =
																			MAKE_YOUNG_PAIR(BgL_arg2063z00_878,
																			BgL_arg2082z00_894);
																	}
																	BgL_arg2080z00_892 =
																		MAKE_YOUNG_PAIR(BgL_arg2062z00_877,
																		BgL_arg2081z00_893);
																}
																BgL_arg2079z00_891 =
																	MAKE_YOUNG_PAIR(BgL_arg2061z00_876,
																	BgL_arg2080z00_892);
															}
															BgL_arg2078z00_890 =
																MAKE_YOUNG_PAIR(BgL_arg2060z00_875,
																BgL_arg2079z00_891);
														}
														BgL_arg2077z00_889 =
															MAKE_YOUNG_PAIR
															(BGl_za2ozd2filesza2zd2zzengine_paramz00,
															BgL_arg2078z00_890);
													}
													BgL_arg2076z00_888 =
														MAKE_YOUNG_PAIR
														(BGl_za2withzd2filesza2zd2zzengine_paramz00,
														BgL_arg2077z00_889);
												}
												BgL_list2075z00_887 =
													MAKE_YOUNG_PAIR(BgL_arg2059z00_874,
													BgL_arg2076z00_888);
											}
											BgL_ldzd2argszd2_852 =
												BGl_appendz00zz__r4_pairs_and_lists_6_3z00
												(BgL_list2075z00_887);
										}
									}
									{	/* Cc/ld.scm 359 */

										{	/* Cc/ld.scm 413 */
											obj_t BgL_arg2046z00_853;

											{	/* Cc/ld.scm 413 */
												obj_t BgL_l1199z00_857;

												BgL_l1199z00_857 =
													MAKE_YOUNG_PAIR(BGl_za2ccza2z00zzengine_paramz00,
													BgL_ldzd2argszd2_852);
												{	/* Cc/ld.scm 413 */
													obj_t BgL_head1201z00_859;

													BgL_head1201z00_859 = MAKE_YOUNG_PAIR(BNIL, BNIL);
													{
														obj_t BgL_l1199z00_861;
														obj_t BgL_tail1202z00_862;

														BgL_l1199z00_861 = BgL_l1199z00_857;
														BgL_tail1202z00_862 = BgL_head1201z00_859;
													BgL_zc3z04anonymousza32051ze3z87_863:
														if (NULLP(BgL_l1199z00_861))
															{	/* Cc/ld.scm 413 */
																BgL_arg2046z00_853 = CDR(BgL_head1201z00_859);
															}
														else
															{	/* Cc/ld.scm 413 */
																obj_t BgL_newtail1203z00_865;

																{	/* Cc/ld.scm 413 */
																	obj_t BgL_arg2054z00_867;

																	{	/* Cc/ld.scm 413 */
																		obj_t BgL_strz00_868;

																		BgL_strz00_868 =
																			CAR(((obj_t) BgL_l1199z00_861));
																		BgL_arg2054z00_867 =
																			string_append_3
																			(BGl_string2409z00zzcc_ldz00,
																			BgL_strz00_868,
																			BGl_string2410z00zzcc_ldz00);
																	}
																	BgL_newtail1203z00_865 =
																		MAKE_YOUNG_PAIR(BgL_arg2054z00_867, BNIL);
																}
																SET_CDR(BgL_tail1202z00_862,
																	BgL_newtail1203z00_865);
																{	/* Cc/ld.scm 413 */
																	obj_t BgL_arg2053z00_866;

																	BgL_arg2053z00_866 =
																		CDR(((obj_t) BgL_l1199z00_861));
																	{
																		obj_t BgL_tail1202z00_3461;
																		obj_t BgL_l1199z00_3460;

																		BgL_l1199z00_3460 = BgL_arg2053z00_866;
																		BgL_tail1202z00_3461 =
																			BgL_newtail1203z00_865;
																		BgL_tail1202z00_862 = BgL_tail1202z00_3461;
																		BgL_l1199z00_861 = BgL_l1199z00_3460;
																		goto BgL_zc3z04anonymousza32051ze3z87_863;
																	}
																}
															}
													}
												}
											}
											{	/* Cc/ld.scm 413 */
												obj_t BgL_list2047z00_854;

												{	/* Cc/ld.scm 413 */
													obj_t BgL_arg2048z00_855;

													{	/* Cc/ld.scm 413 */
														obj_t BgL_arg2049z00_856;

														BgL_arg2049z00_856 =
															MAKE_YOUNG_PAIR(BCHAR(((unsigned char) 10)),
															BNIL);
														BgL_arg2048z00_855 =
															MAKE_YOUNG_PAIR(BgL_arg2046z00_853,
															BgL_arg2049z00_856);
													}
													BgL_list2047z00_854 =
														MAKE_YOUNG_PAIR(BGl_string2411z00zzcc_ldz00,
														BgL_arg2048z00_855);
												}
												BGl_verbosez00zztools_speekz00(BINT(2L),
													BgL_list2047z00_854);
										}}
										{	/* Cc/ld.scm 417 */
											obj_t BgL_runner2058z00_873;

											{	/* Cc/ld.scm 417 */
												obj_t BgL_arg2055z00_870;

												BgL_arg2055z00_870 =
													BGl_appendzd221011zd2zzcc_ldz00(BgL_ldzd2argszd2_852,
													CNST_TABLE_REF(26L));
												{	/* Cc/ld.scm 417 */
													obj_t BgL_list2056z00_871;

													BgL_list2056z00_871 =
														MAKE_YOUNG_PAIR(BgL_arg2055z00_870, BNIL);
													BgL_runner2058z00_873 =
														BGl_consza2za2zz__r4_pairs_and_lists_6_3z00
														(BGl_za2ccza2z00zzengine_paramz00,
														BgL_list2056z00_871);
											}}
											{	/* Cc/ld.scm 417 */
												obj_t BgL_aux2057z00_872;

												BgL_aux2057z00_872 = CAR(BgL_runner2058z00_873);
												BgL_runner2058z00_873 = CDR(BgL_runner2058z00_873);
												return
													BGl_runzd2processzd2zz__processz00(BgL_aux2057z00_872,
													BgL_runner2058z00_873);
											}
										}
									}
								}
							}
						}
					}
				}
			}
		}

	}



/* <@anonymous:2098>~0 */
	obj_t BGl_zc3z04anonymousza32098ze3ze70z60zzcc_ldz00(obj_t BgL_l1196z00_909)
	{
		{	/* Cc/ld.scm 371 */
			if (NULLP(BgL_l1196z00_909))
				{	/* Cc/ld.scm 371 */
					return BNIL;
				}
			else
				{	/* Cc/ld.scm 372 */
					obj_t BgL_arg2100z00_912;
					obj_t BgL_arg2101z00_913;

					{	/* Cc/ld.scm 372 */
						obj_t BgL_oz00_914;

						BgL_oz00_914 = CAR(((obj_t) BgL_l1196z00_909));
						BgL_arg2100z00_912 =
							BGl_stringzd2splitzd2charz00zztools_miscz00(BgL_oz00_914,
							BCHAR(((unsigned char) ' ')));
					}
					{	/* Cc/ld.scm 371 */
						obj_t BgL_arg2102z00_915;

						BgL_arg2102z00_915 = CDR(((obj_t) BgL_l1196z00_909));
						BgL_arg2101z00_913 =
							BGl_zc3z04anonymousza32098ze3ze70z60zzcc_ldz00
							(BgL_arg2102z00_915);
					}
					return bgl_append2(BgL_arg2100z00_912, BgL_arg2101z00_913);
				}
		}

	}



/* loop~0 */
	obj_t BGl_loopze70ze7zzcc_ldz00(obj_t BgL_pathz00_928)
	{
		{	/* Cc/ld.scm 392 */
			if (NULLP(BgL_pathz00_928))
				{	/* Cc/ld.scm 393 */
					return BNIL;
				}
			else
				{	/* Cc/ld.scm 395 */
					obj_t BgL_arg2114z00_931;
					obj_t BgL_arg2115z00_932;

					{	/* Cc/ld.scm 395 */
						obj_t BgL_arg2116z00_933;

						BgL_arg2116z00_933 = CAR(((obj_t) BgL_pathz00_928));
						BgL_arg2114z00_931 =
							string_append(BGl_string2412z00zzcc_ldz00, BgL_arg2116z00_933);
					}
					{	/* Cc/ld.scm 396 */
						obj_t BgL_arg2117z00_934;

						BgL_arg2117z00_934 = CDR(((obj_t) BgL_pathz00_928));
						BgL_arg2115z00_932 = BGl_loopze70ze7zzcc_ldz00(BgL_arg2117z00_934);
					}
					return MAKE_YOUNG_PAIR(BgL_arg2114z00_931, BgL_arg2115z00_932);
				}
		}

	}



/* <@anonymous:2125>~0 */
	obj_t BGl_zc3z04anonymousza32125ze3ze70z60zzcc_ldz00(obj_t BgL_l1198z00_943)
	{
		{	/* Cc/ld.scm 410 */
			if (NULLP(BgL_l1198z00_943))
				{	/* Cc/ld.scm 410 */
					return BNIL;
				}
			else
				{	/* Cc/ld.scm 411 */
					obj_t BgL_arg2127z00_946;
					obj_t BgL_arg2128z00_947;

					{	/* Cc/ld.scm 411 */
						obj_t BgL_oz00_948;

						BgL_oz00_948 = CAR(((obj_t) BgL_l1198z00_943));
						BgL_arg2127z00_946 =
							BGl_stringzd2splitzd2charz00zztools_miscz00(BgL_oz00_948,
							BCHAR(((unsigned char) ' ')));
					}
					{	/* Cc/ld.scm 410 */
						obj_t BgL_arg2129z00_949;

						BgL_arg2129z00_949 = CDR(((obj_t) BgL_l1198z00_943));
						BgL_arg2128z00_947 =
							BGl_zc3z04anonymousza32125ze3ze70z60zzcc_ldz00
							(BgL_arg2129z00_949);
					}
					return bgl_append2(BgL_arg2127z00_946, BgL_arg2128z00_947);
				}
		}

	}



/* &<@anonymous:2371> */
	obj_t BGl_z62zc3z04anonymousza32371ze3ze5zzcc_ldz00(obj_t BgL_envz00_2015)
	{
		{	/* Cc/ld.scm 324 */
			{	/* Cc/ld.scm 324 */
				obj_t BgL_port1091z00_2016;

				BgL_port1091z00_2016 =
					((obj_t) PROCEDURE_REF(BgL_envz00_2015, (int) (0L)));
				return bgl_close_input_port(BgL_port1091z00_2016);
			}
		}

	}



/* object-init */
	obj_t BGl_objectzd2initzd2zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 15 */
			return BUNSPEC;
		}

	}



/* generic-init */
	obj_t BGl_genericzd2initzd2zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 15 */
			return BUNSPEC;
		}

	}



/* method-init */
	obj_t BGl_methodzd2initzd2zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 15 */
			return BUNSPEC;
		}

	}



/* imported-modules-init */
	obj_t BGl_importedzd2moduleszd2initz00zzcc_ldz00(void)
	{
		{	/* Cc/ld.scm 15 */
			BGl_modulezd2initializa7ationz75zztools_speekz00(61247943L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
			BGl_modulezd2initializa7ationz75zztools_errorz00(300504031L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
			BGl_modulezd2initializa7ationz75zztools_miscz00(9470071L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
			BGl_modulezd2initializa7ationz75zzbackend_backendz00(216206620L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
			BGl_modulezd2initializa7ationz75zzcc_execz00(367900553L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
			BGl_modulezd2initializa7ationz75zzengine_paramz00(517137079L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
			BGl_modulezd2initializa7ationz75zzengine_configurez00(272817175L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
			return
				BGl_modulezd2initializa7ationz75zzmodule_evalz00(428236825L,
				BSTRING_TO_STRING(BGl_string2413z00zzcc_ldz00));
		}

	}

#ifdef __cplusplus
}
#endif
