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

/* unsafe mode */
#define BIGLOO_UNSAFE 1

/* traces mode */
#define BIGLOO_TRACE 0

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

#ifdef __cplusplus
extern "C"
{
#endif
#ifndef BGL_MODULE_TYPE_DEFINITIONS
#define BGL_MODULE_TYPE_DEFINITIONS
#ifndef BGL_SAW_JVM_LD_TYPE_DEFINITIONS
#define BGL_SAW_JVM_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_SAW_JVM_LD_TYPE_DEFINITIONS
#endif													// BGL_MODULE_TYPE_DEFINITIONS

	static obj_t BGl_libraryzd2ze3za7ipsz96zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_za2jvmzd2javaza2zd2zzengine_paramz00;
	static obj_t BGl_zc3z04exitza31778ze3ze70z60zzsaw_jvm_ldz00(void);
	extern obj_t BGl_modulezd2ze3qualifiedzd2typeze3zzread_jvmz00(obj_t);
	static obj_t BGl_listzd2ze3pathzd2stringze3zzsaw_jvm_ldz00(obj_t, obj_t);
	extern obj_t BGl_za2jvmzd2bigloozd2classpathza2z00zzengine_paramz00;
	BGL_IMPORT obj_t BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(obj_t,
		obj_t);
	BGL_IMPORT obj_t BGl_stringzd2replacezd2zz__r4_strings_6_7z00(obj_t,
		unsigned char, unsigned char);
	extern obj_t BGl_za2destza2z00zzengine_paramz00;
	static obj_t BGl_generatezd2shzd2jvmzd2manifestzd2zzsaw_jvm_ldz00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_requirezd2initializa7ationz75zzsaw_jvm_ldz00 = BUNSPEC;
	BGL_IMPORT obj_t BGl_makezd2sharedzd2libzd2namezd2zz__osz00(obj_t, obj_t);
	BGL_IMPORT obj_t BGl_withzd2outputzd2tozd2filezd2zz__r4_ports_6_10_1z00(obj_t,
		obj_t);
	static bool_t BGl_generatezd2jvmzd2msdoszd2scriptzd2zzsaw_jvm_ldz00(obj_t,
		obj_t, obj_t, obj_t);
	BGL_IMPORT obj_t bgl_display_obj(obj_t, obj_t);
	static obj_t BGl_generatezd2msdoszd2jvmzd2manifestzd2zzsaw_jvm_ldz00(obj_t,
		obj_t, obj_t);
	extern obj_t BGl_za2srczd2filesza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_za2classesza2z00zz__objectz00;
	BGL_IMPORT obj_t BGl_warningz00zz__errorz00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza31598ze3ze5zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_jvmzd2classzd2withzd2directoryzd2zzread_jvmz00(obj_t);
	BGL_IMPORT obj_t BGl_systemz00zz__osz00(obj_t);
	static obj_t BGl_findzd2jvmzd2mainz00zzsaw_jvm_ldz00(obj_t);
	BGL_IMPORT obj_t unwind_stack_until(obj_t, obj_t, obj_t, obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza31947ze3ze5zzsaw_jvm_ldz00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza31777ze3ze5zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_unprofzd2srczd2namez00zzengine_linkz00(obj_t);
	extern obj_t BGl_uncygdrivez00zztools_miscz00(obj_t);
	extern obj_t BGl_za2additionalzd2bigloozd2za7ipsza2za7zzengine_paramz00;
	BGL_IMPORT obj_t BGl_formatz00zz__r4_output_6_10_3z00(obj_t, obj_t);
	BGL_IMPORT obj_t bgl_reverse(obj_t);
	static obj_t BGl_genericzd2initzd2zzsaw_jvm_ldz00(void);
	BGL_IMPORT obj_t BGl_stringzd2copyzd2zz__r4_strings_6_7z00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza31965ze3ze5zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_za2jvmzd2jarpathza2zd2zzengine_paramz00;
	static obj_t BGl_objectzd2initzd2zzsaw_jvm_ldz00(void);
	BGL_IMPORT obj_t BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00(obj_t,
		unsigned char, unsigned char);
	extern obj_t BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_za2inheritancesza2z00zz__objectz00;
	extern obj_t BGl_za2additionalzd2bigloozd2librariesza2z00zzengine_paramz00;
	BGL_IMPORT obj_t BGl_dirnamez00zz__osz00(obj_t);
	BGL_IMPORT obj_t string_append_3(obj_t, obj_t, obj_t);
	static obj_t BGl_objectszd2ze3classesz31zzsaw_jvm_ldz00(obj_t);
	static bool_t BGl_generatezd2jvmzd2scriptz00zzsaw_jvm_ldz00(obj_t, obj_t,
		obj_t, obj_t);
	BGL_IMPORT obj_t bstring_to_symbol(obj_t);
	extern obj_t BGl_thezd2backendzd2zzbackend_backendz00(void);
	BGL_IMPORT obj_t BGl_makezd2filezd2namez00zz__osz00(obj_t, obj_t);
	BGL_IMPORT obj_t BGl_basenamez00zz__osz00(obj_t);
	BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t, obj_t);
	BGL_IMPORT obj_t BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00(obj_t,
		obj_t, obj_t);
	static obj_t BGl_appendzd221011zd2zzsaw_jvm_ldz00(obj_t, obj_t);
	static obj_t BGl_methodzd2initzd2zzsaw_jvm_ldz00(void);
	static obj_t BGl_z62zc3z04anonymousza32037ze3ze5zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_za2jvmzd2classpathza2zd2zzengine_paramz00;
	extern obj_t BGl_za2jvmzd2pathzd2separatorza2z00zzengine_paramz00;
	static obj_t BGl_z62zc3z04anonymousza31987ze3ze5zzsaw_jvm_ldz00(obj_t);
	static obj_t BGl_uniquez00zzsaw_jvm_ldz00(obj_t);
	BGL_IMPORT obj_t string_append(obj_t, obj_t);
	static obj_t BGl_userzd2libraryzd2zzsaw_jvm_ldz00(obj_t);
	BGL_EXPORTED_DECL obj_t BGl_jvmzd2ldzd2zzsaw_jvm_ldz00(obj_t);
	BGL_IMPORT obj_t BGl_errorz00zz__errorz00(obj_t, obj_t, obj_t);
	static obj_t BGl_z62zc3z04anonymousza32073ze3ze5zzsaw_jvm_ldz00(obj_t);
	BGL_IMPORT obj_t BGl_hashtablezd2ze3listz31zz__hashz00(obj_t);
	static obj_t BGl_zc3z04anonymousza31438ze3ze70z60zzsaw_jvm_ldz00(obj_t);
	BGL_IMPORT obj_t bgl_append2(obj_t, obj_t);
	extern obj_t BGl_za2jvmzd2mainclassza2zd2zzengine_paramz00;
	extern obj_t BGl_za2moduleza2z00zzmodule_modulez00;
	BGL_IMPORT obj_t BGl_makezd2hashtablezd2zz__hashz00(obj_t);
	BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzsaw_jvm_ldz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzbackend_backendz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzobject_slotsz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzobject_classz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzread_jvmz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzast_nodez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzbackend_cplibz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzmodule_modulez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzread_readerz00(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 *);
	extern obj_t BGl_modulezd2initializa7ationz75zzengine_linkz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzengine_configurez00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_vectors_6_8z00(long,
		char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(long,
		char *);
	BGL_IMPORT obj_t
		BGl_modulezd2initializa7ationz75zz__r4_characters_6_6z00(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__readerz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
	BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__hashz00(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 *);
	extern obj_t BGl_za2bigloozd2nameza2zd2zzengine_paramz00;
	extern obj_t BGl_sourcezd2ze3qualifiedzd2typeze3zzread_jvmz00(obj_t);
	static obj_t BGl_listzd2ze3shzd2pathzd2stringz31zzsaw_jvm_ldz00(obj_t);
	BGL_IMPORT bool_t fexists(char *);
	BGL_IMPORT obj_t BGl_stringzd2appendzd2zz__r4_strings_6_7z00(obj_t);
	static obj_t BGl_findzd2jvmzd2mainclassz00zzsaw_jvm_ldz00(obj_t);
	static obj_t BGl_generatezd2jvmzd2manifestz00zzsaw_jvm_ldz00(obj_t, obj_t,
		obj_t, obj_t);
	static bool_t BGl_generatezd2jvmzd2shzd2scriptzd2zzsaw_jvm_ldz00(obj_t, obj_t,
		obj_t);
	static obj_t BGl_makezd2manifestzd2namez00zzsaw_jvm_ldz00(void);
	BGL_IMPORT obj_t BGl_suffixz00zz__osz00(obj_t);
	extern obj_t BGl_za2libzd2dirza2zd2zzengine_paramz00;
	static obj_t BGl_z62generatezd2jvmzd2envz62zzsaw_jvm_ldz00(void);
	extern obj_t BGl_za2jvmzd2jarzf3za2z21zzengine_paramz00;
	extern obj_t BGl_za2unsafezd2libraryza2zd2zzengine_paramz00;
	static obj_t BGl_cnstzd2initzd2zzsaw_jvm_ldz00(void);
	static obj_t BGl_libraryzd2moduleszd2initz00zzsaw_jvm_ldz00(void);
	extern obj_t BGl_compilerzd2readzd2zzread_readerz00(obj_t);
	static obj_t BGl_listzd2ze3msdoszd2pathzd2stringz31zzsaw_jvm_ldz00(obj_t);
	static obj_t BGl_importedzd2moduleszd2initz00zzsaw_jvm_ldz00(void);
	BGL_IMPORT obj_t BGl_prefixz00zz__osz00(obj_t);
	static obj_t BGl_gczd2rootszd2initz00zzsaw_jvm_ldz00(void);
	static obj_t BGl_manifestzd2classpathzd2formatz00zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_findzd2srczd2filez00zzengine_linkz00(obj_t, obj_t);
	extern obj_t BGl_za2ozd2filesza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_bigloozd2configzd2zz__configurez00(obj_t);
	static obj_t BGl_splitzd272zd2zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_za2jvmzd2directoryza2zd2zzengine_paramz00;
	BGL_IMPORT obj_t BGl_displayza2za2zz__r4_output_6_10_3z00(obj_t);
	static obj_t BGl_z62jvmzd2ldzb0zzsaw_jvm_ldz00(obj_t, obj_t);
	BGL_IMPORT obj_t c_substring(obj_t, long, long);
	static obj_t BGl_z62zc3z04anonymousza31824ze3ze5zzsaw_jvm_ldz00(obj_t, obj_t);
	BGL_IMPORT obj_t BGl_hashtablezd2putz12zc0zz__hashz00(obj_t, obj_t, obj_t);
	static obj_t BGl_jvmzd2jarzd2zzsaw_jvm_ldz00(obj_t, obj_t, obj_t);
	BGL_IMPORT obj_t BGl_findzd2filezf2pathz20zz__osz00(obj_t, obj_t);
	static obj_t BGl_sourcezd2ze3jvmzd2classze3zzsaw_jvm_ldz00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza31841ze3ze5zzsaw_jvm_ldz00(obj_t);
	static obj_t BGl_z62zc3z04anonymousza31825ze3ze5zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_jvmzd2classzd2sanszd2directoryzd2zzread_jvmz00(obj_t);
	extern obj_t BGl_za2jvmzd2optionsza2zd2zzengine_paramz00;
	static obj_t BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00(void);
	static obj_t BGl_loopze70ze7zzsaw_jvm_ldz00(obj_t, long);
	BGL_IMPORT obj_t BGl_libraryzd2filezd2namez00zz__libraryz00(obj_t, obj_t,
		obj_t);
	BGL_IMPORT obj_t BGl_withzd2exceptionzd2handlerz00zz__errorz00(obj_t, obj_t);
	static obj_t BGl_z62generatezd2jvmzd2env2200z62zzsaw_jvm_ldz00(void);
	BGL_IMPORT obj_t
		BGl_withzd2inputzd2fromzd2filezd2zz__r4_ports_6_10_1z00(obj_t, obj_t);
	extern obj_t BGl_za2rmzd2tmpzd2filesza2z00zzengine_paramz00;
	static obj_t BGl_z62zc3z04anonymousza31924ze3ze5zzsaw_jvm_ldz00(obj_t);
	extern obj_t BGl_za2jvmzd2envza2zd2zzengine_paramz00;
	extern obj_t BGl_classzd2idzd2ze3typezd2namez31zzbackend_cplibz00(obj_t,
		obj_t);
	BGL_IMPORT bool_t BGl_chmodz00zz__osz00(obj_t, obj_t);
	extern obj_t BGl_globalz00zzast_varz00;
	extern obj_t BGl_za2purifyza2z00zzengine_paramz00;
	extern obj_t BGl_verbosez00zztools_speekz00(obj_t, obj_t);
	extern obj_t BGl_za2mainza2z00zzmodule_modulez00;
	static obj_t __cnst[16];


	   
		 
		DEFINE_STRING(BGl_string2201z00zzsaw_jvm_ldz00,
		BgL_bgl_string2201za700za7za7s2280za7, ".jar", 4);
	      DEFINE_STRING(BGl_string2202z00zzsaw_jvm_ldz00,
		BgL_bgl_string2202za700za7za7s2281za7, "   . jar", 8);
	      DEFINE_STRING(BGl_string2203z00zzsaw_jvm_ldz00,
		BgL_bgl_string2203za700za7za7s2282za7, ")", 1);
	      DEFINE_STRING(BGl_string2204z00zzsaw_jvm_ldz00,
		BgL_bgl_string2204za700za7za7s2283za7, " (", 2);
	      DEFINE_STRING(BGl_string2205z00zzsaw_jvm_ldz00,
		BgL_bgl_string2205za700za7za7s2284za7, ".class", 6);
	      DEFINE_STRING(BGl_string2206z00zzsaw_jvm_ldz00,
		BgL_bgl_string2206za700za7za7s2285za7, "ld", 2);
	      DEFINE_STRING(BGl_string2207z00zzsaw_jvm_ldz00,
		BgL_bgl_string2207za700za7za7s2286za7, "Can't established JVM main class",
		32);
	      DEFINE_STRING(BGl_string2208z00zzsaw_jvm_ldz00,
		BgL_bgl_string2208za700za7za7s2287za7, "see option -jvm-mainclass", 25);
	      DEFINE_STRING(BGl_string2209z00zzsaw_jvm_ldz00,
		BgL_bgl_string2209za700za7za7s2288za7, "msdos", 5);
	      DEFINE_STRING(BGl_string2210z00zzsaw_jvm_ldz00,
		BgL_bgl_string2210za700za7za7s2289za7, "_u", 2);
	      DEFINE_STRING(BGl_string2211z00zzsaw_jvm_ldz00,
		BgL_bgl_string2211za700za7za7s2290za7, "_s", 2);
	      DEFINE_STRING(BGl_string2212z00zzsaw_jvm_ldz00,
		BgL_bgl_string2212za700za7za7s2291za7, "_eu", 3);
	      DEFINE_STRING(BGl_string2213z00zzsaw_jvm_ldz00,
		BgL_bgl_string2213za700za7za7s2292za7, "_es", 3);
	      DEFINE_STRING(BGl_string2214z00zzsaw_jvm_ldz00,
		BgL_bgl_string2214za700za7za7s2293za7,
		"Can't find ~a zip file (~a) for library -- ", 43);
	      DEFINE_STRING(BGl_string2215z00zzsaw_jvm_ldz00,
		BgL_bgl_string2215za700za7za7s2294za7, "ld:", 3);
	      DEFINE_STRING(BGl_string2216z00zzsaw_jvm_ldz00,
		BgL_bgl_string2216za700za7za7s2295za7,
		"Can't find zip file (~a) for library -- ", 40);
	      DEFINE_STRING(BGl_string2217z00zzsaw_jvm_ldz00,
		BgL_bgl_string2217za700za7za7s2296za7, "jar", 3);
	      DEFINE_STRING(BGl_string2218z00zzsaw_jvm_ldz00,
		BgL_bgl_string2218za700za7za7s2297za7, "No main clause found", 20);
	      DEFINE_STRING(BGl_string2220z00zzsaw_jvm_ldz00,
		BgL_bgl_string2220za700za7za7s2298za7, "mco", 3);
	      DEFINE_STRING(BGl_string2222z00zzsaw_jvm_ldz00,
		BgL_bgl_string2222za700za7za7s2299za7, ".", 1);
	      DEFINE_STRING(BGl_string2223z00zzsaw_jvm_ldz00,
		BgL_bgl_string2223za700za7za7s2300za7, "", 0);
	      DEFINE_STRING(BGl_string2225z00zzsaw_jvm_ldz00,
		BgL_bgl_string2225za700za7za7s2301za7, " ", 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2219z00zzsaw_jvm_ldz00,
		BgL_bgl_za762za7c3za704anonymo2302za7,
		BGl_z62zc3z04anonymousza31598ze3ze5zzsaw_jvm_ldz00, 0L, BUNSPEC, 0);
	      DEFINE_STRING(BGl_string2226z00zzsaw_jvm_ldz00,
		BgL_bgl_string2226za700za7za7s2303za7, "-C ", 3);
	      DEFINE_STRING(BGl_string2227z00zzsaw_jvm_ldz00,
		BgL_bgl_string2227za700za7za7s2304za7, "]\n", 2);
	      DEFINE_STRING(BGl_string2228z00zzsaw_jvm_ldz00,
		BgL_bgl_string2228za700za7za7s2305za7, "      [", 7);
	      DEFINE_STRING(BGl_string2229z00zzsaw_jvm_ldz00,
		BgL_bgl_string2229za700za7za7s2306za7, "Can't create jar file", 21);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2221z00zzsaw_jvm_ldz00,
		BgL_bgl_za762za7c3za704anonymo2307za7,
		BGl_z62zc3z04anonymousza31777ze3ze5zzsaw_jvm_ldz00, 0L, BUNSPEC, 0);
	      DEFINE_STRING(BGl_string2230z00zzsaw_jvm_ldz00,
		BgL_bgl_string2230za700za7za7s2308za7, "X", 1);
	      DEFINE_STATIC_BGL_PROCEDURE(BGl_proc2224z00zzsaw_jvm_ldz00,
		BgL_bgl_za762za7c3za704anonymo2309za7,
		BGl_z62zc3z04anonymousza31825ze3ze5zzsaw_jvm_ldz00, 0L, BUNSPEC, 0);
	      DEFINE_STRING(BGl_string2231z00zzsaw_jvm_ldz00,
		BgL_bgl_string2231za700za7za7s2310za7, "Manifest", 8);
	      DEFINE_STRING(BGl_string2232z00zzsaw_jvm_ldz00,
		BgL_bgl_string2232za700za7za7s2311za7, "sh", 2);
	      DEFINE_STRING(BGl_string2233z00zzsaw_jvm_ldz00,
		BgL_bgl_string2233za700za7za7s2312za7, "' -- using `sh'", 15);
	      DEFINE_STRING(BGl_string2234z00zzsaw_jvm_ldz00,
		BgL_bgl_string2234za700za7za7s2313za7, "Illegal shell `", 15);
	      DEFINE_STRING(BGl_string2235z00zzsaw_jvm_ldz00,
		BgL_bgl_string2235za700za7za7s2314za7, "generate-jvm-manifest", 21);
	      DEFINE_STRING(BGl_string2236z00zzsaw_jvm_ldz00,
		BgL_bgl_string2236za700za7za7s2315za7, "\n ", 2);
	      DEFINE_STRING(BGl_string2237z00zzsaw_jvm_ldz00,
		BgL_bgl_string2237za700za7za7s2316za7, "' --using `sh'", 14);
	      DEFINE_STRING(BGl_string2238z00zzsaw_jvm_ldz00,
		BgL_bgl_string2238za700za7za7s2317za7, "Illegal shell `:", 16);
	      DEFINE_STRING(BGl_string2239z00zzsaw_jvm_ldz00,
		BgL_bgl_string2239za700za7za7s2318za7, "manifest-classpath-format", 25);
	      DEFINE_STRING(BGl_string2240z00zzsaw_jvm_ldz00,
		BgL_bgl_string2240za700za7za7s2319za7, "Manifest-Version: 1.0", 21);
	      DEFINE_STRING(BGl_string2241z00zzsaw_jvm_ldz00,
		BgL_bgl_string2241za700za7za7s2320za7, "Main-Class: ", 12);
	      DEFINE_STRING(BGl_string2242z00zzsaw_jvm_ldz00,
		BgL_bgl_string2242za700za7za7s2321za7, "Class-Path: ", 12);
	      DEFINE_STRING(BGl_string2243z00zzsaw_jvm_ldz00,
		BgL_bgl_string2243za700za7za7s2322za7, "\n  ", 3);
	      DEFINE_STRING(BGl_string2244z00zzsaw_jvm_ldz00,
		BgL_bgl_string2244za700za7za7s2323za7, "bigloo_u.zip", 12);
	      DEFINE_STRING(BGl_string2245z00zzsaw_jvm_ldz00,
		BgL_bgl_string2245za700za7za7s2324za7, "bigloo_s.zip", 12);
	      DEFINE_STRING(BGl_string2246z00zzsaw_jvm_ldz00,
		BgL_bgl_string2246za700za7za7s2325za7, "Created-By: ", 12);
	      DEFINE_STRING(BGl_string2247z00zzsaw_jvm_ldz00,
		BgL_bgl_string2247za700za7za7s2326za7, "=$", 2);
	      DEFINE_STRING(BGl_string2248z00zzsaw_jvm_ldz00,
		BgL_bgl_string2248za700za7za7s2327za7, "-Dbigloo.", 9);
	      DEFINE_STRING(BGl_string2249z00zzsaw_jvm_ldz00,
		BgL_bgl_string2249za700za7za7s2328za7, "#!/bin/sh", 9);
	      DEFINE_STRING(BGl_string2250z00zzsaw_jvm_ldz00,
		BgL_bgl_string2250za700za7za7s2329za7, "CLASSPATH=", 10);
	      DEFINE_STRING(BGl_string2251z00zzsaw_jvm_ldz00,
		BgL_bgl_string2251za700za7za7s2330za7, "'", 1);
	      DEFINE_STRING(BGl_string2252z00zzsaw_jvm_ldz00,
		BgL_bgl_string2252za700za7za7s2331za7, "$BUGLOOCLASSPATH", 16);
	      DEFINE_STRING(BGl_string2253z00zzsaw_jvm_ldz00,
		BgL_bgl_string2253za700za7za7s2332za7, "$BIGLOOCLASSPATH", 16);
	      DEFINE_STRING(BGl_string2254z00zzsaw_jvm_ldz00,
		BgL_bgl_string2254za700za7za7s2333za7, "export CLASSPATH", 16);
	      DEFINE_STRING(BGl_string2255z00zzsaw_jvm_ldz00,
		BgL_bgl_string2255za700za7za7s2334za7, "exec ", 5);
	      DEFINE_STRING(BGl_string2256z00zzsaw_jvm_ldz00,
		BgL_bgl_string2256za700za7za7s2335za7, " $BIGLOOJAVAOPT $BUGLOOJAVAOPT ",
		31);
	      DEFINE_STRING(BGl_string2257z00zzsaw_jvm_ldz00,
		BgL_bgl_string2257za700za7za7s2336za7, " $*", 3);
	      DEFINE_STRING(BGl_string2258z00zzsaw_jvm_ldz00,
		BgL_bgl_string2258za700za7za7s2337za7, "CLASSPATH=\"", 11);
	      DEFINE_STRING(BGl_string2259z00zzsaw_jvm_ldz00,
		BgL_bgl_string2259za700za7za7s2338za7, "\"", 1);
	      DEFINE_STRING(BGl_string2260z00zzsaw_jvm_ldz00,
		BgL_bgl_string2260za700za7za7s2339za7, " -jar ", 6);
	      DEFINE_STRING(BGl_string2261z00zzsaw_jvm_ldz00,
		BgL_bgl_string2261za700za7za7s2340za7, "`", 1);
	      DEFINE_STRING(BGl_string2262z00zzsaw_jvm_ldz00,
		BgL_bgl_string2262za700za7za7s2341za7, " $0`", 4);
	      DEFINE_STRING(BGl_string2263z00zzsaw_jvm_ldz00,
		BgL_bgl_string2263za700za7za7s2342za7, ".jar $*", 7);
	      DEFINE_STRING(BGl_string2264z00zzsaw_jvm_ldz00,
		BgL_bgl_string2264za700za7za7s2343za7, "@", 1);
	      DEFINE_STRING(BGl_string2265z00zzsaw_jvm_ldz00,
		BgL_bgl_string2265za700za7za7s2344za7, " -cp \"", 6);
	      DEFINE_STRING(BGl_string2266z00zzsaw_jvm_ldz00,
		BgL_bgl_string2266za700za7za7s2345za7, "\\bigloo_u.zip", 13);
	      DEFINE_STRING(BGl_string2267z00zzsaw_jvm_ldz00,
		BgL_bgl_string2267za700za7za7s2346za7, "\\bigloo_s.zip", 13);
	      DEFINE_STRING(BGl_string2268z00zzsaw_jvm_ldz00,
		BgL_bgl_string2268za700za7za7s2347za7, "%BUGLOOCLASSPATH%", 17);
	      DEFINE_STRING(BGl_string2269z00zzsaw_jvm_ldz00,
		BgL_bgl_string2269za700za7za7s2348za7, "\" ", 2);
	      DEFINE_STRING(BGl_string2270z00zzsaw_jvm_ldz00,
		BgL_bgl_string2270za700za7za7s2349za7, " %BIGLOOJAVAOPT% %BUGLOOJAVAOPT% ",
		33);
	      DEFINE_STRING(BGl_string2271z00zzsaw_jvm_ldz00,
		BgL_bgl_string2271za700za7za7s2350za7, " %*", 3);
	      DEFINE_STRING(BGl_string2272z00zzsaw_jvm_ldz00,
		BgL_bgl_string2272za700za7za7s2351za7, "\\", 1);
	      DEFINE_STRING(BGl_string2273z00zzsaw_jvm_ldz00,
		BgL_bgl_string2273za700za7za7s2352za7, "   . ", 5);
	      DEFINE_STRING(BGl_string2274z00zzsaw_jvm_ldz00,
		BgL_bgl_string2274za700za7za7s2353za7, "generate-jvm-script", 19);
	      DEFINE_STRING(BGl_string2275z00zzsaw_jvm_ldz00,
		BgL_bgl_string2275za700za7za7s2354za7, ":", 1);
	      DEFINE_STRING(BGl_string2276z00zzsaw_jvm_ldz00,
		BgL_bgl_string2276za700za7za7s2355za7, ";", 1);
	      DEFINE_STRING(BGl_string2277z00zzsaw_jvm_ldz00,
		BgL_bgl_string2277za700za7za7s2356za7, "saw_jvm_ld", 10);
	      DEFINE_STRING(BGl_string2278z00zzsaw_jvm_ldz00,
		BgL_bgl_string2278za700za7za7s2357za7,
		"dirname-cmd jflags jvflags read write execute zip-directory jar static export wide-class final-class abstract-class class main module ",
		134);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_jvmzd2ldzd2envz00zzsaw_jvm_ldz00,
		BgL_bgl_za762jvmza7d2ldza7b0za7za72358za7,
		BGl_z62jvmzd2ldzb0zzsaw_jvm_ldz00, 0L, BUNSPEC, 1);

/* GC roots registration */
	static obj_t bgl_gc_roots_register()
	{
#if defined( BGL_GC_ROOTS )
#define ADD_ROOT( addr ) (addr > roots_max ? roots_max = addr : (addr < roots_min ? roots_min = addr : 0))
		void *roots_min = (void *) ULONG_MAX, *roots_max = 0;
		     ADD_ROOT((void *) (&BGl_requirezd2initializa7ationz75zzsaw_jvm_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_modulezd2initializa7ationz75zzsaw_jvm_ldz00(long
		BgL_checksumz00_3304, char *BgL_fromz00_3305)
	{
		{
			if (CBOOL(BGl_requirezd2initializa7ationz75zzsaw_jvm_ldz00))
				{
					BGl_requirezd2initializa7ationz75zzsaw_jvm_ldz00 =
						BBOOL(((bool_t) 0));
					BGl_gczd2rootszd2initz00zzsaw_jvm_ldz00();
					BGl_libraryzd2moduleszd2initz00zzsaw_jvm_ldz00();
					BGl_cnstzd2initzd2zzsaw_jvm_ldz00();
					BGl_importedzd2moduleszd2initz00zzsaw_jvm_ldz00();
					return BGl_methodzd2initzd2zzsaw_jvm_ldz00();
				}
			else
				{
					return BUNSPEC;
				}
		}

	}



/* library-modules-init */
	obj_t BGl_libraryzd2moduleszd2initz00zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 16 */
			BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(0L,
				"saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__osz00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_ports_6_10_1z00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_output_6_10_3z00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__objectz00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__errorz00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__bexitz00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__readerz00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__hashz00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__configurez00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__libraryz00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_characters_6_6z00(0L,
				"saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_equivalence_6_2z00(0L,
				"saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_vectors_6_8z00(0L, "saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5_fixnumz00(0L,
				"saw_jvm_ld");
			BGl_modulezd2initializa7ationz75zz__r4_symbols_6_4z00(0L, "saw_jvm_ld");
			return BUNSPEC;
		}

	}



/* cnst-init */
	obj_t BGl_cnstzd2initzd2zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 16 */
			{	/* SawJvm/jld.scm 16 */
				obj_t BgL_cportz00_3177;

				{	/* SawJvm/jld.scm 16 */
					obj_t BgL_stringz00_3184;

					BgL_stringz00_3184 = BGl_string2278z00zzsaw_jvm_ldz00;
					{	/* SawJvm/jld.scm 16 */
						obj_t BgL_startz00_3185;

						BgL_startz00_3185 = BINT(0L);
						{	/* SawJvm/jld.scm 16 */
							obj_t BgL_endz00_3186;

							BgL_endz00_3186 =
								BINT(STRING_LENGTH(((obj_t) BgL_stringz00_3184)));
							{	/* SawJvm/jld.scm 16 */

								BgL_cportz00_3177 =
									BGl_openzd2inputzd2stringz12z12zz__r4_ports_6_10_1z00
									(BgL_stringz00_3184, BgL_startz00_3185, BgL_endz00_3186);
				}}}}
				{
					long BgL_iz00_3178;

					BgL_iz00_3178 = 15L;
				BgL_loopz00_3179:
					if ((BgL_iz00_3178 == -1L))
						{	/* SawJvm/jld.scm 16 */
							return BUNSPEC;
						}
					else
						{	/* SawJvm/jld.scm 16 */
							{	/* SawJvm/jld.scm 16 */
								obj_t BgL_arg2279z00_3180;

								{	/* SawJvm/jld.scm 16 */

									{	/* SawJvm/jld.scm 16 */
										obj_t BgL_locationz00_3182;

										BgL_locationz00_3182 = BBOOL(((bool_t) 0));
										{	/* SawJvm/jld.scm 16 */

											BgL_arg2279z00_3180 =
												BGl_readz00zz__readerz00(BgL_cportz00_3177,
												BgL_locationz00_3182);
										}
									}
								}
								{	/* SawJvm/jld.scm 16 */
									int BgL_tmpz00_3340;

									BgL_tmpz00_3340 = (int) (BgL_iz00_3178);
									CNST_TABLE_SET(BgL_tmpz00_3340, BgL_arg2279z00_3180);
							}}
							{	/* SawJvm/jld.scm 16 */
								int BgL_auxz00_3183;

								BgL_auxz00_3183 = (int) ((BgL_iz00_3178 - 1L));
								{
									long BgL_iz00_3345;

									BgL_iz00_3345 = (long) (BgL_auxz00_3183);
									BgL_iz00_3178 = BgL_iz00_3345;
									goto BgL_loopz00_3179;
								}
							}
						}
				}
			}
		}

	}



/* gc-roots-init */
	obj_t BGl_gczd2rootszd2initz00zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 16 */
			return bgl_gc_roots_register();
		}

	}



/* append-21011 */
	obj_t BGl_appendzd221011zd2zzsaw_jvm_ldz00(obj_t BgL_l1z00_1,
		obj_t BgL_l2z00_2)
	{
		{
			{
				obj_t BgL_headz00_1738;

				BgL_headz00_1738 = MAKE_YOUNG_PAIR(BNIL, BgL_l2z00_2);
				{
					obj_t BgL_prevz00_1739;
					obj_t BgL_tailz00_1740;

					BgL_prevz00_1739 = BgL_headz00_1738;
					BgL_tailz00_1740 = BgL_l1z00_1;
				BgL_loopz00_1741:
					if (PAIRP(BgL_tailz00_1740))
						{
							obj_t BgL_newzd2prevzd2_1743;

							BgL_newzd2prevzd2_1743 =
								MAKE_YOUNG_PAIR(CAR(BgL_tailz00_1740), BgL_l2z00_2);
							SET_CDR(BgL_prevz00_1739, BgL_newzd2prevzd2_1743);
							{
								obj_t BgL_tailz00_3355;
								obj_t BgL_prevz00_3354;

								BgL_prevz00_3354 = BgL_newzd2prevzd2_1743;
								BgL_tailz00_3355 = CDR(BgL_tailz00_1740);
								BgL_tailz00_1740 = BgL_tailz00_3355;
								BgL_prevz00_1739 = BgL_prevz00_3354;
								goto BgL_loopz00_1741;
							}
						}
					else
						{
							BNIL;
						}
					return CDR(BgL_headz00_1738);
				}
			}
		}

	}



/* jvm-ld */
	BGL_EXPORTED_DEF obj_t BGl_jvmzd2ldzd2zzsaw_jvm_ldz00(obj_t
		BgL_linkzd2mainzd2modulez00_3)
	{
		{	/* SawJvm/jld.scm 39 */
			{	/* SawJvm/jld.scm 40 */
				obj_t BgL_targetz00_1746;

				if (STRINGP(BGl_za2destza2z00zzengine_paramz00))
					{	/* SawJvm/jld.scm 40 */
						BgL_targetz00_1746 = BGl_za2destza2z00zzengine_paramz00;
					}
				else
					{	/* SawJvm/jld.scm 40 */
						BgL_targetz00_1746 = string_to_bstring(BGL_DEFAULT_A_BAT);
					}
				{	/* SawJvm/jld.scm 40 */
					obj_t BgL_jarnamez00_1747;

					BgL_jarnamez00_1747 =
						string_append(BGl_prefixz00zz__osz00(BgL_targetz00_1746),
						BGl_string2201z00zzsaw_jvm_ldz00);
					{	/* SawJvm/jld.scm 43 */
						obj_t BgL_za7ipsza7_1748;

						{	/* SawJvm/jld.scm 45 */
							obj_t BgL_arg1437z00_1777;

							BgL_arg1437z00_1777 =
								BGl_zc3z04anonymousza31438ze3ze70z60zzsaw_jvm_ldz00
								(BGl_za2additionalzd2bigloozd2librariesza2z00zzengine_paramz00);
							BgL_za7ipsza7_1748 =
								BGl_appendzd221011zd2zzsaw_jvm_ldz00(BgL_arg1437z00_1777,
								BGl_za2additionalzd2bigloozd2za7ipsza2za7zzengine_paramz00);
						}
						{	/* SawJvm/jld.scm 44 */

							if (CBOOL(BGl_za2jvmzd2jarzf3za2z21zzengine_paramz00))
								{	/* SawJvm/jld.scm 48 */
									obj_t BgL_manifestz00_1749;

									BgL_manifestz00_1749 =
										BGl_makezd2manifestzd2namez00zzsaw_jvm_ldz00();
									{	/* SawJvm/jld.scm 48 */
										obj_t BgL_ozd2fileszd2_1750;

										{	/* SawJvm/jld.scm 49 */
											obj_t BgL_arg1374z00_1759;

											{	/* SawJvm/jld.scm 49 */
												obj_t BgL_l1316z00_1760;

												BgL_l1316z00_1760 =
													BGl_za2srczd2filesza2zd2zzengine_paramz00;
												if (NULLP(BgL_l1316z00_1760))
													{	/* SawJvm/jld.scm 49 */
														BgL_arg1374z00_1759 = BNIL;
													}
												else
													{	/* SawJvm/jld.scm 49 */
														obj_t BgL_head1318z00_1762;

														{	/* SawJvm/jld.scm 49 */
															obj_t BgL_arg1420z00_1774;

															{	/* SawJvm/jld.scm 49 */
																obj_t BgL_arg1431z00_1775;

																BgL_arg1431z00_1775 =
																	CAR(((obj_t) BgL_l1316z00_1760));
																BgL_arg1420z00_1774 =
																	BGl_sourcezd2ze3jvmzd2classze3zzsaw_jvm_ldz00
																	(BgL_arg1431z00_1775);
															}
															BgL_head1318z00_1762 =
																MAKE_YOUNG_PAIR(BgL_arg1420z00_1774, BNIL);
														}
														{	/* SawJvm/jld.scm 49 */
															obj_t BgL_g1321z00_1763;

															BgL_g1321z00_1763 =
																CDR(((obj_t) BgL_l1316z00_1760));
															{
																obj_t BgL_l1316z00_1765;
																obj_t BgL_tail1319z00_1766;

																BgL_l1316z00_1765 = BgL_g1321z00_1763;
																BgL_tail1319z00_1766 = BgL_head1318z00_1762;
															BgL_zc3z04anonymousza31381ze3z87_1767:
																if (NULLP(BgL_l1316z00_1765))
																	{	/* SawJvm/jld.scm 49 */
																		BgL_arg1374z00_1759 = BgL_head1318z00_1762;
																	}
																else
																	{	/* SawJvm/jld.scm 49 */
																		obj_t BgL_newtail1320z00_1769;

																		{	/* SawJvm/jld.scm 49 */
																			obj_t BgL_arg1407z00_1771;

																			{	/* SawJvm/jld.scm 49 */
																				obj_t BgL_arg1408z00_1772;

																				BgL_arg1408z00_1772 =
																					CAR(((obj_t) BgL_l1316z00_1765));
																				BgL_arg1407z00_1771 =
																					BGl_sourcezd2ze3jvmzd2classze3zzsaw_jvm_ldz00
																					(BgL_arg1408z00_1772);
																			}
																			BgL_newtail1320z00_1769 =
																				MAKE_YOUNG_PAIR(BgL_arg1407z00_1771,
																				BNIL);
																		}
																		SET_CDR(BgL_tail1319z00_1766,
																			BgL_newtail1320z00_1769);
																		{	/* SawJvm/jld.scm 49 */
																			obj_t BgL_arg1397z00_1770;

																			BgL_arg1397z00_1770 =
																				CDR(((obj_t) BgL_l1316z00_1765));
																			{
																				obj_t BgL_tail1319z00_3386;
																				obj_t BgL_l1316z00_3385;

																				BgL_l1316z00_3385 = BgL_arg1397z00_1770;
																				BgL_tail1319z00_3386 =
																					BgL_newtail1320z00_1769;
																				BgL_tail1319z00_1766 =
																					BgL_tail1319z00_3386;
																				BgL_l1316z00_1765 = BgL_l1316z00_3385;
																				goto
																					BgL_zc3z04anonymousza31381ze3z87_1767;
																			}
																		}
																	}
															}
														}
													}
											}
											BgL_ozd2fileszd2_1750 =
												BGl_appendzd221011zd2zzsaw_jvm_ldz00
												(BgL_arg1374z00_1759,
												BGl_za2ozd2filesza2zd2zzengine_paramz00);
										}
										{	/* SawJvm/jld.scm 49 */
											obj_t BgL_allzd2objectszd2_1751;

											BgL_allzd2objectszd2_1751 =
												BGl_uniquez00zzsaw_jvm_ldz00
												(BGl_objectszd2ze3classesz31zzsaw_jvm_ldz00
												(BgL_ozd2fileszd2_1750));
											{	/* SawJvm/jld.scm 51 */

												{	/* SawJvm/jld.scm 52 */
													obj_t BgL_list1364z00_1752;

													BgL_list1364z00_1752 =
														MAKE_YOUNG_PAIR(BGl_string2202z00zzsaw_jvm_ldz00,
														BNIL);
													BGl_verbosez00zztools_speekz00(BINT(1L),
														BgL_list1364z00_1752);
												}
												{	/* SawJvm/jld.scm 53 */
													obj_t BgL_list1365z00_1753;

													{	/* SawJvm/jld.scm 53 */
														obj_t BgL_arg1366z00_1754;

														{	/* SawJvm/jld.scm 53 */
															obj_t BgL_arg1369z00_1755;

															BgL_arg1369z00_1755 =
																MAKE_YOUNG_PAIR
																(BGl_string2203z00zzsaw_jvm_ldz00, BNIL);
															BgL_arg1366z00_1754 =
																MAKE_YOUNG_PAIR(BgL_jarnamez00_1747,
																BgL_arg1369z00_1755);
														}
														BgL_list1365z00_1753 =
															MAKE_YOUNG_PAIR(BGl_string2204z00zzsaw_jvm_ldz00,
															BgL_arg1366z00_1754);
													}
													BGl_verbosez00zztools_speekz00(BINT(2L),
														BgL_list1365z00_1753);
												}
												{	/* SawJvm/jld.scm 54 */
													obj_t BgL_list1370z00_1756;

													BgL_list1370z00_1756 =
														MAKE_YOUNG_PAIR(BCHAR(((unsigned char) 10)), BNIL);
													BGl_verbosez00zztools_speekz00(BINT(1L),
														BgL_list1370z00_1756);
												}
												BGl_generatezd2jvmzd2manifestz00zzsaw_jvm_ldz00
													(BgL_manifestz00_1749,
													BGl_findzd2jvmzd2mainz00zzsaw_jvm_ldz00
													(BgL_ozd2fileszd2_1750), BgL_jarnamez00_1747,
													BgL_za7ipsza7_1748);
												BGl_jvmzd2jarzd2zzsaw_jvm_ldz00(BgL_jarnamez00_1747,
													BgL_manifestz00_1749, BgL_allzd2objectszd2_1751);
								}}}}
							else
								{	/* SawJvm/jld.scm 47 */
									BFALSE;
								}
							{	/* SawJvm/jld.scm 61 */
								obj_t BgL_arg1436z00_1776;

								BgL_arg1436z00_1776 =
									BGl_findzd2jvmzd2mainclassz00zzsaw_jvm_ldz00
									(BgL_linkzd2mainzd2modulez00_3);
								return
									BBOOL(BGl_generatezd2jvmzd2scriptz00zzsaw_jvm_ldz00
									(BgL_targetz00_1746, BgL_arg1436z00_1776, BgL_jarnamez00_1747,
										BgL_za7ipsza7_1748));
							}
						}
					}
				}
			}
		}

	}



/* <@anonymous:1438>~0 */
	obj_t BGl_zc3z04anonymousza31438ze3ze70z60zzsaw_jvm_ldz00(obj_t
		BgL_l1315z00_1779)
	{
		{	/* SawJvm/jld.scm 45 */
			if (NULLP(BgL_l1315z00_1779))
				{	/* SawJvm/jld.scm 45 */
					return BNIL;
				}
			else
				{	/* SawJvm/jld.scm 45 */
					obj_t BgL_arg1450z00_1782;
					obj_t BgL_arg1451z00_1783;

					{	/* SawJvm/jld.scm 45 */
						obj_t BgL_arg1452z00_1784;

						BgL_arg1452z00_1784 = CAR(((obj_t) BgL_l1315z00_1779));
						BgL_arg1450z00_1782 =
							BGl_libraryzd2ze3za7ipsz96zzsaw_jvm_ldz00(BgL_arg1452z00_1784);
					}
					{	/* SawJvm/jld.scm 45 */
						obj_t BgL_arg1453z00_1785;

						BgL_arg1453z00_1785 = CDR(((obj_t) BgL_l1315z00_1779));
						BgL_arg1451z00_1783 =
							BGl_zc3z04anonymousza31438ze3ze70z60zzsaw_jvm_ldz00
							(BgL_arg1453z00_1785);
					}
					return bgl_append2(BgL_arg1450z00_1782, BgL_arg1451z00_1783);
				}
		}

	}



/* &jvm-ld */
	obj_t BGl_z62jvmzd2ldzb0zzsaw_jvm_ldz00(obj_t BgL_envz00_3136,
		obj_t BgL_linkzd2mainzd2modulez00_3137)
	{
		{	/* SawJvm/jld.scm 39 */
			return BGl_jvmzd2ldzd2zzsaw_jvm_ldz00(BgL_linkzd2mainzd2modulez00_3137);
		}

	}



/* source->jvm-class */
	obj_t BGl_sourcezd2ze3jvmzd2classze3zzsaw_jvm_ldz00(obj_t BgL_sz00_4)
	{
		{	/* SawJvm/jld.scm 68 */
			{	/* SawJvm/jld.scm 69 */
				obj_t BgL_qz00_1789;

				BgL_qz00_1789 =
					BGl_sourcezd2ze3qualifiedzd2typeze3zzread_jvmz00(BgL_sz00_4);
				{	/* SawJvm/jld.scm 71 */
					obj_t BgL_arg1491z00_1790;

					if (STRINGP(BgL_qz00_1789))
						{	/* SawJvm/jld.scm 71 */
							BgL_arg1491z00_1790 =
								string_append(BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00
								(BgL_qz00_1789, (char) (((unsigned char) '.')),
									(char) (((unsigned char) '/'))),
								BGl_string2205z00zzsaw_jvm_ldz00);
						}
					else
						{	/* SawJvm/jld.scm 71 */
							BgL_arg1491z00_1790 =
								string_append(BGl_prefixz00zz__osz00(BgL_sz00_4),
								BGl_string2205z00zzsaw_jvm_ldz00);
						}
					return
						BGl_jvmzd2classzd2withzd2directoryzd2zzread_jvmz00
						(BgL_arg1491z00_1790);
				}
			}
		}

	}



/* find-jvm-mainclass */
	obj_t BGl_findzd2jvmzd2mainclassz00zzsaw_jvm_ldz00(obj_t
		BgL_linkzd2mainzd2modulez00_5)
	{
		{	/* SawJvm/jld.scm 78 */
			if (STRINGP(BGl_za2jvmzd2mainclassza2zd2zzengine_paramz00))
				{	/* SawJvm/jld.scm 80 */
					return BGl_za2jvmzd2mainclassza2zd2zzengine_paramz00;
				}
			else
				{	/* SawJvm/jld.scm 80 */
					if (CBOOL(BGl_za2mainza2z00zzmodule_modulez00))
						{	/* SawJvm/jld.scm 82 */
							return
								BGl_modulezd2ze3qualifiedzd2typeze3zzread_jvmz00
								(BGl_za2moduleza2z00zzmodule_modulez00);
						}
					else
						{	/* SawJvm/jld.scm 82 */
							if (SYMBOLP(BgL_linkzd2mainzd2modulez00_5))
								{	/* SawJvm/jld.scm 84 */
									return
										BGl_modulezd2ze3qualifiedzd2typeze3zzread_jvmz00
										(BgL_linkzd2mainzd2modulez00_5);
								}
							else
								{	/* SawJvm/jld.scm 84 */
									return
										BGl_errorz00zz__errorz00(BGl_string2206z00zzsaw_jvm_ldz00,
										BGl_string2207z00zzsaw_jvm_ldz00,
										BGl_string2208z00zzsaw_jvm_ldz00);
								}
						}
				}
		}

	}



/* library->zips */
	obj_t BGl_libraryzd2ze3za7ipsz96zzsaw_jvm_ldz00(obj_t BgL_libz00_6)
	{
		{	/* SawJvm/jld.scm 94 */
			{	/* SawJvm/jld.scm 95 */
				obj_t BgL_dirz00_1796;

				{	/* SawJvm/jld.scm 95 */
					bool_t BgL_test2371z00_3437;

					{	/* SawJvm/jld.scm 95 */
						obj_t BgL_string1z00_2679;

						BgL_string1z00_2679 = BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
						{	/* SawJvm/jld.scm 95 */
							long BgL_l1z00_2681;

							BgL_l1z00_2681 = STRING_LENGTH(BgL_string1z00_2679);
							if ((BgL_l1z00_2681 == 5L))
								{	/* SawJvm/jld.scm 95 */
									int BgL_arg1303z00_2684;

									{	/* SawJvm/jld.scm 95 */
										char *BgL_auxz00_3443;
										char *BgL_tmpz00_3441;

										BgL_auxz00_3443 =
											BSTRING_TO_STRING(BGl_string2209z00zzsaw_jvm_ldz00);
										BgL_tmpz00_3441 = BSTRING_TO_STRING(BgL_string1z00_2679);
										BgL_arg1303z00_2684 =
											memcmp(BgL_tmpz00_3441, BgL_auxz00_3443, BgL_l1z00_2681);
									}
									BgL_test2371z00_3437 = ((long) (BgL_arg1303z00_2684) == 0L);
								}
							else
								{	/* SawJvm/jld.scm 95 */
									BgL_test2371z00_3437 = ((bool_t) 0);
								}
						}
					}
					if (BgL_test2371z00_3437)
						{	/* SawJvm/jld.scm 96 */
							obj_t BgL_arg1581z00_1830;

							BgL_arg1581z00_1830 =
								BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00();
							BgL_dirz00_1796 =
								MAKE_YOUNG_PAIR(BgL_arg1581z00_1830,
								BGl_za2libzd2dirza2zd2zzengine_paramz00);
						}
					else
						{	/* SawJvm/jld.scm 95 */
							BgL_dirz00_1796 = BGl_za2libzd2dirza2zd2zzengine_paramz00;
						}
				}
				{	/* SawJvm/jld.scm 95 */
					obj_t BgL_bez00_1797;

					{	/* SawJvm/jld.scm 98 */
						obj_t BgL_arg1578z00_1828;

						BgL_arg1578z00_1828 = BGl_thezd2backendzd2zzbackend_backendz00();
						BgL_bez00_1797 =
							(((BgL_backendz00_bglt) COBJECT(
									((BgL_backendz00_bglt) BgL_arg1578z00_1828)))->BgL_srfi0z00);
					}
					{	/* SawJvm/jld.scm 98 */
						obj_t BgL_nz00_1798;

						{	/* SawJvm/jld.scm 100 */
							obj_t BgL_arg1575z00_1826;

							{	/* SawJvm/jld.scm 100 */
								bool_t BgL_test2373z00_3453;

								if (CBOOL(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
									{	/* SawJvm/jld.scm 100 */
										if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
											{	/* SawJvm/jld.scm 100 */
												BgL_test2373z00_3453 = ((bool_t) 0);
											}
										else
											{	/* SawJvm/jld.scm 100 */
												BgL_test2373z00_3453 = ((bool_t) 1);
											}
									}
								else
									{	/* SawJvm/jld.scm 100 */
										BgL_test2373z00_3453 = ((bool_t) 0);
									}
								if (BgL_test2373z00_3453)
									{	/* SawJvm/jld.scm 100 */
										BgL_arg1575z00_1826 = BGl_string2210z00zzsaw_jvm_ldz00;
									}
								else
									{	/* SawJvm/jld.scm 100 */
										BgL_arg1575z00_1826 = BGl_string2211z00zzsaw_jvm_ldz00;
									}
							}
							BgL_nz00_1798 =
								BGl_libraryzd2filezd2namez00zz__libraryz00(BgL_libz00_6,
								BgL_arg1575z00_1826, BgL_bez00_1797);
						}
						{	/* SawJvm/jld.scm 99 */
							obj_t BgL_fz00_1799;

							BgL_fz00_1799 =
								BGl_findzd2filezf2pathz20zz__osz00
								(BGl_makezd2sharedzd2libzd2namezd2zz__osz00(BgL_nz00_1798,
									BgL_bez00_1797), BgL_dirz00_1796);
							{	/* SawJvm/jld.scm 103 */
								obj_t BgL_nez00_1800;

								{	/* SawJvm/jld.scm 106 */
									obj_t BgL_arg1560z00_1822;

									{	/* SawJvm/jld.scm 106 */
										obj_t BgL_arg1563z00_1823;

										{	/* SawJvm/jld.scm 106 */
											bool_t BgL_test2376z00_3461;

											if (CBOOL(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
												{	/* SawJvm/jld.scm 106 */
													if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
														{	/* SawJvm/jld.scm 106 */
															BgL_test2376z00_3461 = ((bool_t) 0);
														}
													else
														{	/* SawJvm/jld.scm 106 */
															BgL_test2376z00_3461 = ((bool_t) 1);
														}
												}
											else
												{	/* SawJvm/jld.scm 106 */
													BgL_test2376z00_3461 = ((bool_t) 0);
												}
											if (BgL_test2376z00_3461)
												{	/* SawJvm/jld.scm 106 */
													BgL_arg1563z00_1823 =
														BGl_string2212z00zzsaw_jvm_ldz00;
												}
											else
												{	/* SawJvm/jld.scm 106 */
													BgL_arg1563z00_1823 =
														BGl_string2213z00zzsaw_jvm_ldz00;
												}
										}
										BgL_arg1560z00_1822 =
											BGl_libraryzd2filezd2namez00zz__libraryz00(BgL_libz00_6,
											BgL_arg1563z00_1823, BgL_bez00_1797);
									}
									BgL_nez00_1800 =
										BGl_makezd2sharedzd2libzd2namezd2zz__osz00
										(BgL_arg1560z00_1822, BgL_bez00_1797);
								}
								{	/* SawJvm/jld.scm 104 */
									obj_t BgL_fez00_1801;

									BgL_fez00_1801 =
										BGl_findzd2filezf2pathz20zz__osz00(BgL_nez00_1800,
										BgL_dirz00_1796);
									{	/* SawJvm/jld.scm 108 */

										{	/* SawJvm/jld.scm 110 */
											bool_t BgL_test2379z00_3469;

											if (STRINGP(BgL_fz00_1799))
												{	/* SawJvm/jld.scm 110 */
													BgL_test2379z00_3469 = STRINGP(BgL_fez00_1801);
												}
											else
												{	/* SawJvm/jld.scm 110 */
													BgL_test2379z00_3469 = ((bool_t) 0);
												}
											if (BgL_test2379z00_3469)
												{	/* SawJvm/jld.scm 111 */
													obj_t BgL_list1501z00_1804;

													{	/* SawJvm/jld.scm 111 */
														obj_t BgL_arg1519z00_1805;

														BgL_arg1519z00_1805 =
															MAKE_YOUNG_PAIR(BgL_fez00_1801, BNIL);
														BgL_list1501z00_1804 =
															MAKE_YOUNG_PAIR(BgL_fz00_1799,
															BgL_arg1519z00_1805);
													}
													return BgL_list1501z00_1804;
												}
											else
												{	/* SawJvm/jld.scm 110 */
													if (STRINGP(BgL_fz00_1799))
														{	/* SawJvm/jld.scm 112 */
															{	/* SawJvm/jld.scm 115 */
																obj_t BgL_arg1528z00_1807;

																{	/* SawJvm/jld.scm 115 */
																	obj_t BgL_arg1541z00_1811;

																	{	/* SawJvm/jld.scm 115 */
																		bool_t BgL_test2382z00_3477;

																		if (CBOOL
																			(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
																			{	/* SawJvm/jld.scm 115 */
																				if (CBOOL
																					(BGl_za2purifyza2z00zzengine_paramz00))
																					{	/* SawJvm/jld.scm 115 */
																						BgL_test2382z00_3477 = ((bool_t) 0);
																					}
																				else
																					{	/* SawJvm/jld.scm 115 */
																						BgL_test2382z00_3477 = ((bool_t) 1);
																					}
																			}
																		else
																			{	/* SawJvm/jld.scm 115 */
																				BgL_test2382z00_3477 = ((bool_t) 0);
																			}
																		if (BgL_test2382z00_3477)
																			{	/* SawJvm/jld.scm 115 */
																				BgL_arg1541z00_1811 =
																					BGl_string2212z00zzsaw_jvm_ldz00;
																			}
																		else
																			{	/* SawJvm/jld.scm 115 */
																				BgL_arg1541z00_1811 =
																					BGl_string2213z00zzsaw_jvm_ldz00;
																			}
																	}
																	{	/* SawJvm/jld.scm 114 */
																		obj_t BgL_list1542z00_1812;

																		{	/* SawJvm/jld.scm 114 */
																			obj_t BgL_arg1545z00_1813;

																			BgL_arg1545z00_1813 =
																				MAKE_YOUNG_PAIR(BgL_nez00_1800, BNIL);
																			BgL_list1542z00_1812 =
																				MAKE_YOUNG_PAIR(BgL_arg1541z00_1811,
																				BgL_arg1545z00_1813);
																		}
																		BgL_arg1528z00_1807 =
																			BGl_formatz00zz__r4_output_6_10_3z00
																			(BGl_string2214z00zzsaw_jvm_ldz00,
																			BgL_list1542z00_1812);
																	}
																}
																{	/* SawJvm/jld.scm 113 */
																	obj_t BgL_list1529z00_1808;

																	{	/* SawJvm/jld.scm 113 */
																		obj_t BgL_arg1532z00_1809;

																		{	/* SawJvm/jld.scm 113 */
																			obj_t BgL_arg1534z00_1810;

																			BgL_arg1534z00_1810 =
																				MAKE_YOUNG_PAIR(BgL_libz00_6, BNIL);
																			BgL_arg1532z00_1809 =
																				MAKE_YOUNG_PAIR(BgL_arg1528z00_1807,
																				BgL_arg1534z00_1810);
																		}
																		BgL_list1529z00_1808 =
																			MAKE_YOUNG_PAIR
																			(BGl_string2215z00zzsaw_jvm_ldz00,
																			BgL_arg1532z00_1809);
																	}
																	BGl_warningz00zz__errorz00
																		(BgL_list1529z00_1808);
																}
															}
															{	/* SawJvm/jld.scm 118 */
																obj_t BgL_list1548z00_1815;

																BgL_list1548z00_1815 =
																	MAKE_YOUNG_PAIR(BgL_fz00_1799, BNIL);
																return BgL_list1548z00_1815;
															}
														}
													else
														{	/* SawJvm/jld.scm 112 */
															{	/* SawJvm/jld.scm 121 */
																obj_t BgL_arg1550z00_1816;

																{	/* SawJvm/jld.scm 121 */
																	obj_t BgL_list1556z00_1820;

																	BgL_list1556z00_1820 =
																		MAKE_YOUNG_PAIR(BgL_nz00_1798, BNIL);
																	BgL_arg1550z00_1816 =
																		BGl_formatz00zz__r4_output_6_10_3z00
																		(BGl_string2216z00zzsaw_jvm_ldz00,
																		BgL_list1556z00_1820);
																}
																{	/* SawJvm/jld.scm 120 */
																	obj_t BgL_list1551z00_1817;

																	{	/* SawJvm/jld.scm 120 */
																		obj_t BgL_arg1554z00_1818;

																		{	/* SawJvm/jld.scm 120 */
																			obj_t BgL_arg1555z00_1819;

																			BgL_arg1555z00_1819 =
																				MAKE_YOUNG_PAIR(BgL_libz00_6, BNIL);
																			BgL_arg1554z00_1818 =
																				MAKE_YOUNG_PAIR(BgL_arg1550z00_1816,
																				BgL_arg1555z00_1819);
																		}
																		BgL_list1551z00_1817 =
																			MAKE_YOUNG_PAIR
																			(BGl_string2215z00zzsaw_jvm_ldz00,
																			BgL_arg1554z00_1818);
																	}
																	BGl_warningz00zz__errorz00
																		(BgL_list1551z00_1817);
																}
															}
															return BNIL;
														}
												}
										}
									}
								}
							}
						}
					}
				}
			}
		}

	}



/* find-jvm-main */
	obj_t BGl_findzd2jvmzd2mainz00zzsaw_jvm_ldz00(obj_t BgL_ozd2fileszd2_7)
	{
		{	/* SawJvm/jld.scm 128 */
			{	/* SawJvm/jld.scm 129 */
				bool_t BgL_test2385z00_3496;

				{	/* SawJvm/jld.scm 129 */
					obj_t BgL_objz00_2694;

					BgL_objz00_2694 = BGl_za2mainza2z00zzmodule_modulez00;
					{	/* SawJvm/jld.scm 129 */
						obj_t BgL_classz00_2695;

						BgL_classz00_2695 = BGl_globalz00zzast_varz00;
						if (BGL_OBJECTP(BgL_objz00_2694))
							{	/* SawJvm/jld.scm 129 */
								BgL_objectz00_bglt BgL_arg1801z00_2697;

								BgL_arg1801z00_2697 = (BgL_objectz00_bglt) (BgL_objz00_2694);
								if (BGL_CONDEXPAND_ISA_ARCH64())
									{	/* SawJvm/jld.scm 129 */
										long BgL_idxz00_2703;

										BgL_idxz00_2703 =
											BGL_OBJECT_INHERITANCE_NUM(BgL_arg1801z00_2697);
										BgL_test2385z00_3496 =
											(VECTOR_REF(BGl_za2inheritancesza2z00zz__objectz00,
												(BgL_idxz00_2703 + 2L)) == BgL_classz00_2695);
									}
								else
									{	/* SawJvm/jld.scm 129 */
										bool_t BgL_res2198z00_2725;

										{	/* SawJvm/jld.scm 129 */
											obj_t BgL_oclassz00_2711;

											{	/* SawJvm/jld.scm 129 */
												long BgL_arg1808z00_2717;

												{	/* SawJvm/jld.scm 129 */
													long BgL_arg1809z00_2718;

													BgL_arg1809z00_2718 =
														BGL_OBJECT_CLASS_NUM(BgL_arg1801z00_2697);
													BgL_arg1808z00_2717 =
														(BgL_arg1809z00_2718 - OBJECT_TYPE);
												}
												BgL_oclassz00_2711 =
													VECTOR_REF(BGl_za2classesza2z00zz__objectz00,
													BgL_arg1808z00_2717);
											}
											{	/* SawJvm/jld.scm 129 */
												bool_t BgL__ortest_1115z00_2712;

												BgL__ortest_1115z00_2712 =
													(BgL_classz00_2695 == BgL_oclassz00_2711);
												if (BgL__ortest_1115z00_2712)
													{	/* SawJvm/jld.scm 129 */
														BgL_res2198z00_2725 = BgL__ortest_1115z00_2712;
													}
												else
													{	/* SawJvm/jld.scm 129 */
														long BgL_odepthz00_2713;

														BgL_odepthz00_2713 =
															BGL_CLASS_DEPTH(BgL_oclassz00_2711);
														if ((2L < BgL_odepthz00_2713))
															{	/* SawJvm/jld.scm 129 */
																obj_t BgL_arg1797z00_2715;

																BgL_arg1797z00_2715 =
																	BGL_CLASS_ANCESTORS_REF(BgL_oclassz00_2711,
																	2L);
																BgL_res2198z00_2725 =
																	(BgL_arg1797z00_2715 == BgL_classz00_2695);
															}
														else
															{	/* SawJvm/jld.scm 129 */
																BgL_res2198z00_2725 = ((bool_t) 0);
															}
													}
											}
										}
										BgL_test2385z00_3496 = BgL_res2198z00_2725;
									}
							}
						else
							{	/* SawJvm/jld.scm 129 */
								BgL_test2385z00_3496 = ((bool_t) 0);
							}
					}
				}
				if (BgL_test2385z00_3496)
					{	/* SawJvm/jld.scm 129 */
						return
							BGl_prefixz00zz__osz00(CAR
							(BGl_za2srczd2filesza2zd2zzengine_paramz00));
					}
				else
					{
						obj_t BgL_ozd2fileszd2_1834;

						BgL_ozd2fileszd2_1834 = BgL_ozd2fileszd2_7;
					BgL_zc3z04anonymousza31587ze3z87_1835:
						if (NULLP(BgL_ozd2fileszd2_1834))
							{	/* SawJvm/jld.scm 132 */
								return
									BGl_errorz00zz__errorz00(BGl_string2217z00zzsaw_jvm_ldz00,
									BGl_string2218z00zzsaw_jvm_ldz00, BgL_ozd2fileszd2_1834);
							}
						else
							{	/* SawJvm/jld.scm 134 */
								obj_t BgL_prefz00_1837;

								{	/* SawJvm/jld.scm 134 */
									obj_t BgL_arg1661z00_1883;

									{	/* SawJvm/jld.scm 134 */
										obj_t BgL_arg1669z00_1884;

										BgL_arg1669z00_1884 = CAR(((obj_t) BgL_ozd2fileszd2_1834));
										BgL_arg1661z00_1883 =
											BGl_prefixz00zz__osz00(BgL_arg1669z00_1884);
									}
									BgL_prefz00_1837 =
										BGl_unprofzd2srczd2namez00zzengine_linkz00
										(BgL_arg1661z00_1883);
								}
								{	/* SawJvm/jld.scm 134 */
									obj_t BgL_bprefz00_1838;

									BgL_bprefz00_1838 =
										BGl_basenamez00zz__osz00(BgL_prefz00_1837);
									{	/* SawJvm/jld.scm 135 */
										obj_t BgL_scmzd2filezd2_1839;

										BgL_scmzd2filezd2_1839 =
											BGl_findzd2srczd2filez00zzengine_linkz00(BgL_prefz00_1837,
											BgL_bprefz00_1838);
										{	/* SawJvm/jld.scm 136 */

											{	/* SawJvm/jld.scm 137 */
												bool_t BgL_test2391z00_3527;

												if (STRINGP(BgL_scmzd2filezd2_1839))
													{	/* SawJvm/jld.scm 137 */
														if (fexists(BSTRING_TO_STRING
																(BgL_scmzd2filezd2_1839)))
															{	/* SawJvm/jld.scm 138 */
																BgL_test2391z00_3527 = ((bool_t) 0);
															}
														else
															{	/* SawJvm/jld.scm 138 */
																BgL_test2391z00_3527 = ((bool_t) 1);
															}
													}
												else
													{	/* SawJvm/jld.scm 137 */
														BgL_test2391z00_3527 = ((bool_t) 1);
													}
												if (BgL_test2391z00_3527)
													{	/* SawJvm/jld.scm 139 */
														obj_t BgL_arg1592z00_1843;

														BgL_arg1592z00_1843 =
															CDR(((obj_t) BgL_ozd2fileszd2_1834));
														{
															obj_t BgL_ozd2fileszd2_3535;

															BgL_ozd2fileszd2_3535 = BgL_arg1592z00_1843;
															BgL_ozd2fileszd2_1834 = BgL_ozd2fileszd2_3535;
															goto BgL_zc3z04anonymousza31587ze3z87_1835;
														}
													}
												else
													{	/* SawJvm/jld.scm 140 */
														obj_t BgL__ortest_1108z00_1844;

														BgL__ortest_1108z00_1844 =
															BGl_withzd2inputzd2fromzd2filezd2zz__r4_ports_6_10_1z00
															(BgL_scmzd2filezd2_1839,
															BGl_proc2219z00zzsaw_jvm_ldz00);
														if (CBOOL(BgL__ortest_1108z00_1844))
															{	/* SawJvm/jld.scm 140 */
																return BgL__ortest_1108z00_1844;
															}
														else
															{	/* SawJvm/jld.scm 146 */
																obj_t BgL_arg1595z00_1845;

																BgL_arg1595z00_1845 =
																	CDR(((obj_t) BgL_ozd2fileszd2_1834));
																{
																	obj_t BgL_ozd2fileszd2_3541;

																	BgL_ozd2fileszd2_3541 = BgL_arg1595z00_1845;
																	BgL_ozd2fileszd2_1834 = BgL_ozd2fileszd2_3541;
																	goto BgL_zc3z04anonymousza31587ze3z87_1835;
																}
															}
													}
											}
										}
									}
								}
							}
					}
			}
		}

	}



/* &<@anonymous:1598> */
	obj_t BGl_z62zc3z04anonymousza31598ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3139)
	{
		{	/* SawJvm/jld.scm 141 */
			{	/* SawJvm/jld.scm 142 */
				obj_t BgL_ezd2105zd2_3188;

				BgL_ezd2105zd2_3188 = BGl_compilerzd2readzd2zzread_readerz00(BNIL);
				if (PAIRP(BgL_ezd2105zd2_3188))
					{	/* SawJvm/jld.scm 141 */
						obj_t BgL_cdrzd2109zd2_3189;

						BgL_cdrzd2109zd2_3189 = CDR(BgL_ezd2105zd2_3188);
						if ((CAR(BgL_ezd2105zd2_3188) == CNST_TABLE_REF(0L)))
							{	/* SawJvm/jld.scm 141 */
								if (PAIRP(BgL_cdrzd2109zd2_3189))
									{
										obj_t BgL_gzd2114zd2_3191;

										BgL_gzd2114zd2_3191 = CDR(BgL_cdrzd2109zd2_3189);
									BgL_zc3z04anonymousza31610ze3z87_3190:
										if (PAIRP(BgL_gzd2114zd2_3191))
											{	/* SawJvm/jld.scm 141 */
												obj_t BgL_carzd2116zd2_3192;

												BgL_carzd2116zd2_3192 = CAR(BgL_gzd2114zd2_3191);
												if (PAIRP(BgL_carzd2116zd2_3192))
													{	/* SawJvm/jld.scm 141 */
														obj_t BgL_cdrzd2119zd2_3193;

														BgL_cdrzd2119zd2_3193 = CDR(BgL_carzd2116zd2_3192);
														if (
															(CAR(BgL_carzd2116zd2_3192) ==
																CNST_TABLE_REF(1L)))
															{	/* SawJvm/jld.scm 141 */
																if (PAIRP(BgL_cdrzd2119zd2_3193))
																	{	/* SawJvm/jld.scm 141 */
																		if (NULLP(CDR(BgL_cdrzd2119zd2_3193)))
																			{	/* SawJvm/jld.scm 141 */
																				obj_t BgL_arg1620z00_3194;

																				BgL_arg1620z00_3194 =
																					CAR(((obj_t) BgL_cdrzd2109zd2_3189));
																				return
																					BGl_modulezd2ze3qualifiedzd2typeze3zzread_jvmz00
																					(BgL_arg1620z00_3194);
																			}
																		else
																			{
																				obj_t BgL_gzd2114zd2_3570;

																				BgL_gzd2114zd2_3570 =
																					CDR(BgL_gzd2114zd2_3191);
																				BgL_gzd2114zd2_3191 =
																					BgL_gzd2114zd2_3570;
																				goto
																					BgL_zc3z04anonymousza31610ze3z87_3190;
																			}
																	}
																else
																	{
																		obj_t BgL_gzd2114zd2_3572;

																		BgL_gzd2114zd2_3572 =
																			CDR(BgL_gzd2114zd2_3191);
																		BgL_gzd2114zd2_3191 = BgL_gzd2114zd2_3572;
																		goto BgL_zc3z04anonymousza31610ze3z87_3190;
																	}
															}
														else
															{
																obj_t BgL_gzd2114zd2_3574;

																BgL_gzd2114zd2_3574 = CDR(BgL_gzd2114zd2_3191);
																BgL_gzd2114zd2_3191 = BgL_gzd2114zd2_3574;
																goto BgL_zc3z04anonymousza31610ze3z87_3190;
															}
													}
												else
													{
														obj_t BgL_gzd2114zd2_3576;

														BgL_gzd2114zd2_3576 = CDR(BgL_gzd2114zd2_3191);
														BgL_gzd2114zd2_3191 = BgL_gzd2114zd2_3576;
														goto BgL_zc3z04anonymousza31610ze3z87_3190;
													}
											}
										else
											{	/* SawJvm/jld.scm 141 */
												return BFALSE;
											}
									}
								else
									{	/* SawJvm/jld.scm 141 */
										return BFALSE;
									}
							}
						else
							{	/* SawJvm/jld.scm 141 */
								return BFALSE;
							}
					}
				else
					{	/* SawJvm/jld.scm 141 */
						return BFALSE;
					}
			}
		}

	}



/* objects->classes */
	obj_t BGl_objectszd2ze3classesz31zzsaw_jvm_ldz00(obj_t BgL_objectsz00_8)
	{
		{	/* SawJvm/jld.scm 151 */
			{
				obj_t BgL_sourcez00_1992;

				{
					obj_t BgL_objectsz00_1892;
					obj_t BgL_classesz00_1893;

					BgL_objectsz00_1892 = BgL_objectsz00_8;
					BgL_classesz00_1893 = BNIL;
				BgL_zc3z04anonymousza31670ze3z87_1894:
					if (NULLP(BgL_objectsz00_1892))
						{	/* SawJvm/jld.scm 220 */
							return BgL_classesz00_1893;
						}
					else
						{	/* SawJvm/jld.scm 222 */
							obj_t BgL_objectz00_1896;

							BgL_objectz00_1896 = CAR(((obj_t) BgL_objectsz00_1892));
							{	/* SawJvm/jld.scm 222 */
								obj_t BgL_prefz00_1897;

								BgL_prefz00_1897 =
									BGl_unprofzd2srczd2namez00zzengine_linkz00
									(BGl_prefixz00zz__osz00(BgL_objectz00_1896));
								{	/* SawJvm/jld.scm 223 */
									obj_t BgL_bprefz00_1898;

									BgL_bprefz00_1898 =
										BGl_basenamez00zz__osz00(BgL_prefz00_1897);
									{	/* SawJvm/jld.scm 224 */
										obj_t BgL_scmzd2filezd2_1899;

										BgL_scmzd2filezd2_1899 =
											BGl_findzd2srczd2filez00zzengine_linkz00(BgL_prefz00_1897,
											BgL_bprefz00_1898);
										{	/* SawJvm/jld.scm 225 */

											{	/* SawJvm/jld.scm 226 */
												bool_t BgL_test2404z00_3587;

												if (STRINGP(BgL_scmzd2filezd2_1899))
													{	/* SawJvm/jld.scm 226 */
														BgL_test2404z00_3587 =
															fexists(BSTRING_TO_STRING
															(BgL_scmzd2filezd2_1899));
													}
												else
													{	/* SawJvm/jld.scm 226 */
														BgL_test2404z00_3587 = ((bool_t) 0);
													}
												if (BgL_test2404z00_3587)
													{	/* SawJvm/jld.scm 227 */
														obj_t BgL_arg1675z00_1902;
														obj_t BgL_arg1678z00_1903;

														BgL_arg1675z00_1902 =
															CDR(((obj_t) BgL_objectsz00_1892));
														{	/* SawJvm/jld.scm 228 */
															obj_t BgL_tmpz00_3594;

															{	/* SawJvm/jld.scm 229 */
																obj_t BgL_auxz00_3595;

																BgL_sourcez00_1992 = BgL_scmzd2filezd2_1899;
																{	/* SawJvm/jld.scm 201 */
																	bool_t BgL_test2406z00_3596;

																	{	/* SawJvm/jld.scm 201 */
																		bool_t BgL_test2407z00_3597;

																		{	/* SawJvm/jld.scm 201 */
																			obj_t BgL_arg1827z00_2035;

																			BgL_arg1827z00_2035 =
																				BGl_suffixz00zz__osz00
																				(BgL_sourcez00_1992);
																			{	/* SawJvm/jld.scm 201 */
																				long BgL_l1z00_2792;

																				BgL_l1z00_2792 =
																					STRING_LENGTH(BgL_arg1827z00_2035);
																				if ((BgL_l1z00_2792 == 3L))
																					{	/* SawJvm/jld.scm 201 */
																						int BgL_arg1303z00_2795;

																						{	/* SawJvm/jld.scm 201 */
																							char *BgL_auxz00_3604;
																							char *BgL_tmpz00_3602;

																							BgL_auxz00_3604 =
																								BSTRING_TO_STRING
																								(BGl_string2220z00zzsaw_jvm_ldz00);
																							BgL_tmpz00_3602 =
																								BSTRING_TO_STRING
																								(BgL_arg1827z00_2035);
																							BgL_arg1303z00_2795 =
																								memcmp(BgL_tmpz00_3602,
																								BgL_auxz00_3604,
																								BgL_l1z00_2792);
																						}
																						BgL_test2407z00_3597 =
																							(
																							(long) (BgL_arg1303z00_2795) ==
																							0L);
																					}
																				else
																					{	/* SawJvm/jld.scm 201 */
																						BgL_test2407z00_3597 = ((bool_t) 0);
																					}
																			}
																		}
																		if (BgL_test2407z00_3597)
																			{	/* SawJvm/jld.scm 201 */
																				BgL_test2406z00_3596 = ((bool_t) 0);
																			}
																		else
																			{	/* SawJvm/jld.scm 201 */
																				BgL_test2406z00_3596 =
																					fexists(BSTRING_TO_STRING
																					(BgL_sourcez00_1992));
																			}
																	}
																	if (BgL_test2406z00_3596)
																		{	/* SawJvm/jld.scm 201 */
																			BgL_auxz00_3595 =
																				BGl_withzd2inputzd2fromzd2filezd2zz__r4_ports_6_10_1z00
																				(BgL_sourcez00_1992,
																				BGl_proc2221z00zzsaw_jvm_ldz00);
																		}
																	else
																		{	/* SawJvm/jld.scm 201 */
																			BgL_auxz00_3595 = BNIL;
																		}
																}
																BgL_tmpz00_3594 =
																	BGl_appendzd221011zd2zzsaw_jvm_ldz00
																	(BgL_auxz00_3595, BgL_classesz00_1893);
															}
															BgL_arg1678z00_1903 =
																MAKE_YOUNG_PAIR(BgL_objectz00_1896,
																BgL_tmpz00_3594);
														}
														{
															obj_t BgL_classesz00_3615;
															obj_t BgL_objectsz00_3614;

															BgL_objectsz00_3614 = BgL_arg1675z00_1902;
															BgL_classesz00_3615 = BgL_arg1678z00_1903;
															BgL_classesz00_1893 = BgL_classesz00_3615;
															BgL_objectsz00_1892 = BgL_objectsz00_3614;
															goto BgL_zc3z04anonymousza31670ze3z87_1894;
														}
													}
												else
													{	/* SawJvm/jld.scm 230 */
														obj_t BgL_arg1686z00_1906;
														obj_t BgL_arg1690z00_1907;

														BgL_arg1686z00_1906 =
															CDR(((obj_t) BgL_objectsz00_1892));
														BgL_arg1690z00_1907 =
															MAKE_YOUNG_PAIR(BgL_objectz00_1896,
															BgL_classesz00_1893);
														{
															obj_t BgL_classesz00_3620;
															obj_t BgL_objectsz00_3619;

															BgL_objectsz00_3619 = BgL_arg1686z00_1906;
															BgL_classesz00_3620 = BgL_arg1690z00_1907;
															BgL_classesz00_1893 = BgL_classesz00_3620;
															BgL_objectsz00_1892 = BgL_objectsz00_3619;
															goto BgL_zc3z04anonymousza31670ze3z87_1894;
														}
													}
											}
										}
									}
								}
							}
						}
				}
			}
		}

	}



/* &<@anonymous:1777> */
	obj_t BGl_z62zc3z04anonymousza31777ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3143)
	{
		{	/* SawJvm/jld.scm 204 */
			return BGl_zc3z04exitza31778ze3ze70z60zzsaw_jvm_ldz00();
		}

	}



/* <@exit:1778>~0 */
	obj_t BGl_zc3z04exitza31778ze3ze70z60zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 205 */
			{
				obj_t BgL_idz00_1911;
				obj_t BgL_modz00_1985;
				obj_t BgL_modz00_1937;
				obj_t BgL_basez00_1938;
				obj_t BgL_clausesz00_1939;
				jmp_buf_t jmpbuf;
				void *BgL_an_exit1110z00_2001;

				if (SET_EXIT(BgL_an_exit1110z00_2001))
					{
						return BGL_EXIT_VALUE();
					}
				else
					{
#if( SIGSETJMP_SAVESIGS == 0 )
					 // MS: CARE 5 jan 2021: see runtime/Clib/csystem.c
					 // bgl_restore_signal_handlers();
#endif

						BgL_an_exit1110z00_2001 = (void *) jmpbuf;
						{	/* SawJvm/jld.scm 205 */
							obj_t BgL_env1114z00_2002;

							BgL_env1114z00_2002 = BGL_CURRENT_DYNAMIC_ENV();
							PUSH_ENV_EXIT(BgL_env1114z00_2002, BgL_an_exit1110z00_2001, 1L);
							{	/* SawJvm/jld.scm 205 */
								obj_t BgL_an_exitd1111z00_2003;

								BgL_an_exitd1111z00_2003 =
									BGL_ENV_EXITD_TOP_AS_OBJ(BgL_env1114z00_2002);
								{	/* SawJvm/jld.scm 206 */
									obj_t BgL_res1113z00_2006;

									{	/* SawJvm/jld.scm 206 */
										obj_t BgL_mz00_2007;

										{	/* SawJvm/jld.scm 207 */
											obj_t BgL_zc3z04anonymousza31824ze3z87_3140;

											BgL_zc3z04anonymousza31824ze3z87_3140 =
												MAKE_FX_PROCEDURE
												(BGl_z62zc3z04anonymousza31824ze3ze5zzsaw_jvm_ldz00,
												(int) (1L), (int) (1L));
											PROCEDURE_SET(BgL_zc3z04anonymousza31824ze3z87_3140,
												(int) (0L), BgL_an_exitd1111z00_2003);
											BgL_mz00_2007 =
												BGl_withzd2exceptionzd2handlerz00zz__errorz00
												(BgL_zc3z04anonymousza31824ze3z87_3140,
												BGl_proc2224z00zzsaw_jvm_ldz00);
										}
										if (PAIRP(BgL_mz00_2007))
											{	/* SawJvm/jld.scm 209 */
												obj_t BgL_cdrzd2161zd2_2014;

												BgL_cdrzd2161zd2_2014 = CDR(((obj_t) BgL_mz00_2007));
												if (
													(CAR(((obj_t) BgL_mz00_2007)) == CNST_TABLE_REF(0L)))
													{	/* SawJvm/jld.scm 209 */
														if (PAIRP(BgL_cdrzd2161zd2_2014))
															{	/* SawJvm/jld.scm 209 */
																obj_t BgL_arg1798z00_2018;
																obj_t BgL_arg1799z00_2019;

																BgL_arg1798z00_2018 =
																	CAR(BgL_cdrzd2161zd2_2014);
																BgL_arg1799z00_2019 =
																	CDR(BgL_cdrzd2161zd2_2014);
																BgL_modz00_1937 = BgL_arg1798z00_2018;
																{	/* SawJvm/jld.scm 212 */
																	obj_t BgL_auxz00_3722;

																	BgL_modz00_1985 = BgL_arg1798z00_2018;
																	{	/* SawJvm/jld.scm 193 */
																		obj_t BgL_dz00_1987;

																		BgL_dz00_1987 =
																			BGl_dirnamez00zz__osz00
																			(BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00
																			(BGl_modulezd2ze3qualifiedzd2typeze3zzread_jvmz00
																				(BgL_modz00_1985),
																				(char) (((unsigned char) '.')),
																				FILE_SEPARATOR));
																		{	/* SawJvm/jld.scm 197 */
																			bool_t BgL_test2427z00_3727;

																			{	/* SawJvm/jld.scm 197 */
																				long BgL_l1z00_2781;

																				BgL_l1z00_2781 =
																					STRING_LENGTH(BgL_dz00_1987);
																				if ((BgL_l1z00_2781 == 1L))
																					{	/* SawJvm/jld.scm 197 */
																						int BgL_arg1303z00_2784;

																						{	/* SawJvm/jld.scm 197 */
																							char *BgL_auxz00_3733;
																							char *BgL_tmpz00_3731;

																							BgL_auxz00_3733 =
																								BSTRING_TO_STRING
																								(BGl_string2222z00zzsaw_jvm_ldz00);
																							BgL_tmpz00_3731 =
																								BSTRING_TO_STRING
																								(BgL_dz00_1987);
																							BgL_arg1303z00_2784 =
																								memcmp(BgL_tmpz00_3731,
																								BgL_auxz00_3733,
																								BgL_l1z00_2781);
																						}
																						BgL_test2427z00_3727 =
																							(
																							(long) (BgL_arg1303z00_2784) ==
																							0L);
																					}
																				else
																					{	/* SawJvm/jld.scm 197 */
																						BgL_test2427z00_3727 = ((bool_t) 0);
																					}
																			}
																			if (BgL_test2427z00_3727)
																				{	/* SawJvm/jld.scm 197 */
																					BgL_auxz00_3722 =
																						BGl_string2223z00zzsaw_jvm_ldz00;
																				}
																			else
																				{	/* SawJvm/jld.scm 197 */
																					BgL_auxz00_3722 = BgL_dz00_1987;
																				}
																		}
																	}
																	BgL_basez00_1938 =
																		BGl_jvmzd2classzd2withzd2directoryzd2zzread_jvmz00
																		(BgL_auxz00_3722);
																}
																BgL_clausesz00_1939 = BgL_arg1799z00_2019;
																{
																	obj_t BgL_clausesz00_1943;
																	obj_t BgL_classesz00_1944;

																	BgL_clausesz00_1943 = BgL_clausesz00_1939;
																	BgL_classesz00_1944 = BNIL;
																BgL_zc3z04anonymousza31734ze3z87_1945:
																	if (NULLP(BgL_clausesz00_1943))
																		{	/* SawJvm/jld.scm 168 */
																			BgL_res1113z00_2006 = BgL_classesz00_1944;
																		}
																	else
																		{
																			obj_t BgL_statexpz00_1947;

																			{	/* SawJvm/jld.scm 170 */
																				obj_t BgL_ezd2132zd2_1950;

																				BgL_ezd2132zd2_1950 =
																					CAR(((obj_t) BgL_clausesz00_1943));
																				if (PAIRP(BgL_ezd2132zd2_1950))
																					{	/* SawJvm/jld.scm 170 */
																						obj_t BgL_carzd2135zd2_1952;
																						obj_t BgL_cdrzd2136zd2_1953;

																						BgL_carzd2135zd2_1952 =
																							CAR(BgL_ezd2132zd2_1950);
																						BgL_cdrzd2136zd2_1953 =
																							CDR(BgL_ezd2132zd2_1950);
																						if (
																							(BgL_carzd2135zd2_1952 ==
																								CNST_TABLE_REF(6L)))
																							{	/* SawJvm/jld.scm 170 */
																								BgL_statexpz00_1947 =
																									BgL_cdrzd2136zd2_1953;
																							BgL_tagzd2130zd2_1948:
																								{
																									obj_t BgL_statexpz00_1955;
																									obj_t BgL_classesz00_1956;

																									BgL_statexpz00_1955 =
																										BgL_statexpz00_1947;
																									BgL_classesz00_1956 =
																										BgL_classesz00_1944;
																								BgL_zc3z04anonymousza31737ze3z87_1957:
																									if (NULLP
																										(BgL_statexpz00_1955))
																										{	/* SawJvm/jld.scm 175 */
																											obj_t BgL_arg1739z00_1959;

																											BgL_arg1739z00_1959 =
																												CDR(
																												((obj_t)
																													BgL_clausesz00_1943));
																											{
																												obj_t
																													BgL_classesz00_3662;
																												obj_t
																													BgL_clausesz00_3661;
																												BgL_clausesz00_3661 =
																													BgL_arg1739z00_1959;
																												BgL_classesz00_3662 =
																													BgL_classesz00_1956;
																												BgL_classesz00_1944 =
																													BgL_classesz00_3662;
																												BgL_clausesz00_1943 =
																													BgL_clausesz00_3661;
																												goto
																													BgL_zc3z04anonymousza31734ze3z87_1945;
																											}
																										}
																									else
																										{
																											obj_t BgL_identz00_1960;

																											{	/* SawJvm/jld.scm 177 */
																												obj_t
																													BgL_ezd2141zd2_1963;
																												BgL_ezd2141zd2_1963 =
																													CAR(((obj_t)
																														BgL_statexpz00_1955));
																												if (PAIRP
																													(BgL_ezd2141zd2_1963))
																													{	/* SawJvm/jld.scm 177 */
																														obj_t
																															BgL_carzd2144zd2_1965;
																														obj_t
																															BgL_cdrzd2145zd2_1966;
																														BgL_carzd2144zd2_1965
																															=
																															CAR
																															(BgL_ezd2141zd2_1963);
																														BgL_cdrzd2145zd2_1966
																															=
																															CDR
																															(BgL_ezd2141zd2_1963);
																														{

																															if (
																																(BgL_carzd2144zd2_1965
																																	==
																																	CNST_TABLE_REF
																																	(2L)))
																																{	/* SawJvm/jld.scm 177 */
																																BgL_kapzd2146zd2_1967:
																																	if (PAIRP
																																		(BgL_cdrzd2145zd2_1966))
																																		{	/* SawJvm/jld.scm 177 */
																																			BgL_identz00_1960
																																				=
																																				CAR
																																				(BgL_cdrzd2145zd2_1966);
																																			{	/* SawJvm/jld.scm 180 */
																																				obj_t
																																					BgL_idz00_1975;
																																				BgL_idz00_1911
																																					=
																																					BgL_identz00_1960;
																																				{	/* SawJvm/jld.scm 153 */
																																					obj_t
																																						BgL_stringz00_1913;
																																					{	/* SawJvm/jld.scm 153 */
																																						obj_t
																																							BgL_arg1454z00_2744;
																																						BgL_arg1454z00_2744
																																							=
																																							SYMBOL_TO_STRING
																																							(((obj_t) BgL_idz00_1911));
																																						BgL_stringz00_1913
																																							=
																																							BGl_stringzd2copyzd2zz__r4_strings_6_7z00
																																							(BgL_arg1454z00_2744);
																																					}
																																					{	/* SawJvm/jld.scm 153 */
																																						long
																																							BgL_lenz00_1914;
																																						BgL_lenz00_1914
																																							=
																																							STRING_LENGTH
																																							(BgL_stringz00_1913);
																																						{	/* SawJvm/jld.scm 154 */

																																							{
																																								long
																																									BgL_walkerz00_1916;
																																								BgL_walkerz00_1916
																																									=
																																									0L;
																																							BgL_zc3z04anonymousza31695ze3z87_1917:
																																								if ((BgL_walkerz00_1916 == BgL_lenz00_1914))
																																									{	/* SawJvm/jld.scm 157 */
																																										BgL_idz00_1975
																																											=
																																											BgL_idz00_1911;
																																									}
																																								else
																																									{	/* SawJvm/jld.scm 159 */
																																										bool_t
																																											BgL_test2420z00_3680;
																																										if ((STRING_REF(BgL_stringz00_1913, BgL_walkerz00_1916) == ((unsigned char) ':')))
																																											{	/* SawJvm/jld.scm 159 */
																																												if ((BgL_walkerz00_1916 < (BgL_lenz00_1914 - 1L)))
																																													{	/* SawJvm/jld.scm 160 */
																																														BgL_test2420z00_3680
																																															=
																																															(STRING_REF
																																															(BgL_stringz00_1913,
																																																(BgL_walkerz00_1916
																																																	+
																																																	1L))
																																															==
																																															((unsigned char) ':'));
																																													}
																																												else
																																													{	/* SawJvm/jld.scm 160 */
																																														BgL_test2420z00_3680
																																															=
																																															(
																																															(bool_t)
																																															0);
																																													}
																																											}
																																										else
																																											{	/* SawJvm/jld.scm 159 */
																																												BgL_test2420z00_3680
																																													=
																																													(
																																													(bool_t)
																																													0);
																																											}
																																										if (BgL_test2420z00_3680)
																																											{	/* SawJvm/jld.scm 159 */
																																												BgL_idz00_1975
																																													=
																																													bstring_to_symbol
																																													(c_substring
																																													(BgL_stringz00_1913,
																																														0L,
																																														BgL_walkerz00_1916));
																																											}
																																										else
																																											{
																																												long
																																													BgL_walkerz00_3692;
																																												BgL_walkerz00_3692
																																													=
																																													(BgL_walkerz00_1916
																																													+
																																													1L);
																																												BgL_walkerz00_1916
																																													=
																																													BgL_walkerz00_3692;
																																												goto
																																													BgL_zc3z04anonymousza31695ze3z87_1917;
																																											}
																																									}
																																							}
																																						}
																																					}
																																				}
																																				{	/* SawJvm/jld.scm 180 */
																																					obj_t
																																						BgL_mglz00_1976;
																																					BgL_mglz00_1976
																																						=
																																						BGl_classzd2idzd2ze3typezd2namez31zzbackend_cplibz00
																																						(BgL_idz00_1975,
																																						BgL_modz00_1937);
																																					{	/* SawJvm/jld.scm 181 */

																																						{	/* SawJvm/jld.scm 182 */
																																							obj_t
																																								BgL_arg1748z00_1977;
																																							obj_t
																																								BgL_arg1749z00_1978;
																																							BgL_arg1748z00_1977
																																								=
																																								CDR
																																								(
																																								((obj_t) BgL_statexpz00_1955));
																																							BgL_arg1749z00_1978
																																								=
																																								MAKE_YOUNG_PAIR
																																								(BGl_makezd2filezd2namez00zz__osz00
																																								(BgL_basez00_1938,
																																									string_append
																																									(BgL_mglz00_1976,
																																										BGl_string2205z00zzsaw_jvm_ldz00)),
																																								BgL_classesz00_1956);
																																							{
																																								obj_t
																																									BgL_classesz00_3701;
																																								obj_t
																																									BgL_statexpz00_3700;
																																								BgL_statexpz00_3700
																																									=
																																									BgL_arg1748z00_1977;
																																								BgL_classesz00_3701
																																									=
																																									BgL_arg1749z00_1978;
																																								BgL_classesz00_1956
																																									=
																																									BgL_classesz00_3701;
																																								BgL_statexpz00_1955
																																									=
																																									BgL_statexpz00_3700;
																																								goto
																																									BgL_zc3z04anonymousza31737ze3z87_1957;
																																							}
																																						}
																																					}
																																				}
																																			}
																																		}
																																	else
																																		{	/* SawJvm/jld.scm 177 */
																																		BgL_tagzd2140zd2_1962:
																																			{	/* SawJvm/jld.scm 188 */
																																				obj_t
																																					BgL_arg1752z00_1981;
																																				BgL_arg1752z00_1981
																																					=
																																					CDR((
																																						(obj_t)
																																						BgL_statexpz00_1955));
																																				{
																																					obj_t
																																						BgL_statexpz00_3705;
																																					BgL_statexpz00_3705
																																						=
																																						BgL_arg1752z00_1981;
																																					BgL_statexpz00_1955
																																						=
																																						BgL_statexpz00_3705;
																																					goto
																																						BgL_zc3z04anonymousza31737ze3z87_1957;
																																				}
																																			}
																																		}
																																}
																															else
																																{	/* SawJvm/jld.scm 177 */
																																	if (
																																		(BgL_carzd2144zd2_1965
																																			==
																																			CNST_TABLE_REF
																																			(3L)))
																																		{	/* SawJvm/jld.scm 177 */
																																			goto
																																				BgL_kapzd2146zd2_1967;
																																		}
																																	else
																																		{	/* SawJvm/jld.scm 177 */
																																			if (
																																				(BgL_carzd2144zd2_1965
																																					==
																																					CNST_TABLE_REF
																																					(4L)))
																																				{	/* SawJvm/jld.scm 177 */
																																					goto
																																						BgL_kapzd2146zd2_1967;
																																				}
																																			else
																																				{	/* SawJvm/jld.scm 177 */
																																					if (
																																						(BgL_carzd2144zd2_1965
																																							==
																																							CNST_TABLE_REF
																																							(5L)))
																																						{	/* SawJvm/jld.scm 177 */
																																							goto
																																								BgL_kapzd2146zd2_1967;
																																						}
																																					else
																																						{	/* SawJvm/jld.scm 177 */
																																							goto
																																								BgL_tagzd2140zd2_1962;
																																						}
																																				}
																																		}
																																}
																														}
																													}
																												else
																													{	/* SawJvm/jld.scm 177 */
																														goto
																															BgL_tagzd2140zd2_1962;
																													}
																											}
																										}
																								}
																							}
																						else
																							{	/* SawJvm/jld.scm 170 */
																								if (
																									(BgL_carzd2135zd2_1952 ==
																										CNST_TABLE_REF(7L)))
																									{
																										obj_t BgL_statexpz00_3718;

																										BgL_statexpz00_3718 =
																											BgL_cdrzd2136zd2_1953;
																										BgL_statexpz00_1947 =
																											BgL_statexpz00_3718;
																										goto BgL_tagzd2130zd2_1948;
																									}
																								else
																									{	/* SawJvm/jld.scm 170 */
																									BgL_tagzd2131zd2_1949:
																										{	/* SawJvm/jld.scm 191 */
																											obj_t BgL_arg1753z00_1983;

																											BgL_arg1753z00_1983 =
																												CDR(
																												((obj_t)
																													BgL_clausesz00_1943));
																											{
																												obj_t
																													BgL_clausesz00_3721;
																												BgL_clausesz00_3721 =
																													BgL_arg1753z00_1983;
																												BgL_clausesz00_1943 =
																													BgL_clausesz00_3721;
																												goto
																													BgL_zc3z04anonymousza31734ze3z87_1945;
																											}
																										}
																									}
																							}
																					}
																				else
																					{	/* SawJvm/jld.scm 170 */
																						goto BgL_tagzd2131zd2_1949;
																					}
																			}
																		}
																}
															}
														else
															{	/* SawJvm/jld.scm 209 */
																BgL_res1113z00_2006 = BNIL;
															}
													}
												else
													{	/* SawJvm/jld.scm 209 */
														BgL_res1113z00_2006 = BNIL;
													}
											}
										else
											{	/* SawJvm/jld.scm 209 */
												BgL_res1113z00_2006 = BNIL;
											}
									}
									POP_ENV_EXIT(BgL_env1114z00_2002);
									return BgL_res1113z00_2006;
								}
							}
						}
					}
			}
		}

	}



/* &<@anonymous:1825> */
	obj_t BGl_z62zc3z04anonymousza31825ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3144)
	{
		{	/* SawJvm/jld.scm 208 */
			{	/* SawJvm/jld.scm 208 */
				obj_t BgL_arg1826z00_3195;

				{	/* SawJvm/jld.scm 208 */
					obj_t BgL_tmpz00_3740;

					BgL_tmpz00_3740 = BGL_CURRENT_DYNAMIC_ENV();
					BgL_arg1826z00_3195 = BGL_ENV_CURRENT_INPUT_PORT(BgL_tmpz00_3740);
				}
				{	/* SawJvm/jld.scm 208 */

					{	/* SawJvm/jld.scm 208 */

						return BGl_readz00zz__readerz00(BgL_arg1826z00_3195, BFALSE);
					}
				}
			}
		}

	}



/* &<@anonymous:1824> */
	obj_t BGl_z62zc3z04anonymousza31824ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3145, obj_t BgL__z00_3147)
	{
		{	/* SawJvm/jld.scm 207 */
			return
				unwind_stack_until(PROCEDURE_REF(BgL_envz00_3145,
					(int) (0L)), BFALSE, BNIL, BFALSE, BFALSE);
		}

	}



/* unique */
	obj_t BGl_uniquez00zzsaw_jvm_ldz00(obj_t BgL_lstz00_9)
	{
		{	/* SawJvm/jld.scm 236 */
			{	/* SawJvm/jld.scm 237 */
				obj_t BgL_tz00_2040;

				BgL_tz00_2040 = BGl_makezd2hashtablezd2zz__hashz00(BNIL);
				{
					obj_t BgL_l1322z00_2042;

					BgL_l1322z00_2042 = BgL_lstz00_9;
				BgL_zc3z04anonymousza31828ze3z87_2043:
					if (PAIRP(BgL_l1322z00_2042))
						{	/* SawJvm/jld.scm 238 */
							{	/* SawJvm/jld.scm 238 */
								obj_t BgL_fz00_2045;

								BgL_fz00_2045 = CAR(BgL_l1322z00_2042);
								BGl_hashtablezd2putz12zc0zz__hashz00(BgL_tz00_2040,
									BgL_fz00_2045, BgL_fz00_2045);
							}
							{
								obj_t BgL_l1322z00_3752;

								BgL_l1322z00_3752 = CDR(BgL_l1322z00_2042);
								BgL_l1322z00_2042 = BgL_l1322z00_3752;
								goto BgL_zc3z04anonymousza31828ze3z87_2043;
							}
						}
					else
						{	/* SawJvm/jld.scm 238 */
							((bool_t) 1);
						}
				}
				return BGl_hashtablezd2ze3listz31zz__hashz00(BgL_tz00_2040);
			}
		}

	}



/* jvm-jar */
	obj_t BGl_jvmzd2jarzd2zzsaw_jvm_ldz00(obj_t BgL_targetz00_10,
		obj_t BgL_manifestz00_11, obj_t BgL_objectsz00_12)
	{
		{	/* SawJvm/jld.scm 244 */
			{	/* SawJvm/jld.scm 245 */
				obj_t BgL_cmdz00_2049;

				if (STRINGP(BGl_za2jvmzd2directoryza2zd2zzengine_paramz00))
					{
						obj_t BgL_objectsz00_2066;
						obj_t BgL_cmdz00_2067;

						BgL_objectsz00_2066 = BgL_objectsz00_12;
						BgL_cmdz00_2067 = BGl_string2223z00zzsaw_jvm_ldz00;
					BgL_zc3z04anonymousza31843ze3z87_2068:
						if (NULLP(BgL_objectsz00_2066))
							{	/* SawJvm/jld.scm 249 */
								obj_t BgL_arg1845z00_2070;

								BgL_arg1845z00_2070 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(8L));
								{	/* SawJvm/jld.scm 249 */
									obj_t BgL_list1846z00_2071;

									{	/* SawJvm/jld.scm 249 */
										obj_t BgL_arg1848z00_2072;

										{	/* SawJvm/jld.scm 249 */
											obj_t BgL_arg1850z00_2073;

											{	/* SawJvm/jld.scm 249 */
												obj_t BgL_arg1851z00_2074;

												{	/* SawJvm/jld.scm 249 */
													obj_t BgL_arg1852z00_2075;

													{	/* SawJvm/jld.scm 249 */
														obj_t BgL_arg1853z00_2076;

														{	/* SawJvm/jld.scm 249 */
															obj_t BgL_arg1854z00_2077;

															BgL_arg1854z00_2077 =
																MAKE_YOUNG_PAIR(BgL_cmdz00_2067, BNIL);
															BgL_arg1853z00_2076 =
																MAKE_YOUNG_PAIR
																(BGl_string2225z00zzsaw_jvm_ldz00,
																BgL_arg1854z00_2077);
														}
														BgL_arg1852z00_2075 =
															MAKE_YOUNG_PAIR(BgL_targetz00_10,
															BgL_arg1853z00_2076);
													}
													BgL_arg1851z00_2074 =
														MAKE_YOUNG_PAIR(BGl_string2225z00zzsaw_jvm_ldz00,
														BgL_arg1852z00_2075);
												}
												BgL_arg1850z00_2073 =
													MAKE_YOUNG_PAIR(BgL_manifestz00_11,
													BgL_arg1851z00_2074);
											}
											BgL_arg1848z00_2072 =
												MAKE_YOUNG_PAIR(BGl_string2225z00zzsaw_jvm_ldz00,
												BgL_arg1850z00_2073);
										}
										BgL_list1846z00_2071 =
											MAKE_YOUNG_PAIR(BgL_arg1845z00_2070, BgL_arg1848z00_2072);
									}
									BgL_cmdz00_2049 =
										BGl_stringzd2appendzd2zz__r4_strings_6_7z00
										(BgL_list1846z00_2071);
								}
							}
						else
							{	/* SawJvm/jld.scm 253 */
								obj_t BgL_arg1855z00_2078;
								obj_t BgL_arg1856z00_2079;

								BgL_arg1855z00_2078 = CDR(((obj_t) BgL_objectsz00_2066));
								{	/* SawJvm/jld.scm 256 */
									obj_t BgL_arg1857z00_2080;

									{	/* SawJvm/jld.scm 256 */
										obj_t BgL_arg1868z00_2087;

										BgL_arg1868z00_2087 = CAR(((obj_t) BgL_objectsz00_2066));
										BgL_arg1857z00_2080 =
											BGl_jvmzd2classzd2sanszd2directoryzd2zzread_jvmz00
											(BgL_arg1868z00_2087);
									}
									{	/* SawJvm/jld.scm 254 */
										obj_t BgL_list1858z00_2081;

										{	/* SawJvm/jld.scm 254 */
											obj_t BgL_arg1860z00_2082;

											{	/* SawJvm/jld.scm 254 */
												obj_t BgL_arg1861z00_2083;

												{	/* SawJvm/jld.scm 254 */
													obj_t BgL_arg1864z00_2084;

													{	/* SawJvm/jld.scm 254 */
														obj_t BgL_arg1866z00_2085;

														{	/* SawJvm/jld.scm 254 */
															obj_t BgL_arg1867z00_2086;

															BgL_arg1867z00_2086 =
																MAKE_YOUNG_PAIR(BgL_cmdz00_2067, BNIL);
															BgL_arg1866z00_2085 =
																MAKE_YOUNG_PAIR
																(BGl_string2225z00zzsaw_jvm_ldz00,
																BgL_arg1867z00_2086);
														}
														BgL_arg1864z00_2084 =
															MAKE_YOUNG_PAIR(BgL_arg1857z00_2080,
															BgL_arg1866z00_2085);
													}
													BgL_arg1861z00_2083 =
														MAKE_YOUNG_PAIR(BGl_string2225z00zzsaw_jvm_ldz00,
														BgL_arg1864z00_2084);
												}
												BgL_arg1860z00_2082 =
													MAKE_YOUNG_PAIR
													(BGl_za2jvmzd2directoryza2zd2zzengine_paramz00,
													BgL_arg1861z00_2083);
											}
											BgL_list1858z00_2081 =
												MAKE_YOUNG_PAIR(BGl_string2226z00zzsaw_jvm_ldz00,
												BgL_arg1860z00_2082);
										}
										BgL_arg1856z00_2079 =
											BGl_stringzd2appendzd2zz__r4_strings_6_7z00
											(BgL_list1858z00_2081);
									}
								}
								{
									obj_t BgL_cmdz00_3782;
									obj_t BgL_objectsz00_3781;

									BgL_objectsz00_3781 = BgL_arg1855z00_2078;
									BgL_cmdz00_3782 = BgL_arg1856z00_2079;
									BgL_cmdz00_2067 = BgL_cmdz00_3782;
									BgL_objectsz00_2066 = BgL_objectsz00_3781;
									goto BgL_zc3z04anonymousza31843ze3z87_2068;
								}
							}
					}
				else
					{
						obj_t BgL_objectsz00_2090;
						obj_t BgL_cmdz00_2091;

						BgL_objectsz00_2090 = BgL_objectsz00_12;
						BgL_cmdz00_2091 = BGl_string2223z00zzsaw_jvm_ldz00;
					BgL_zc3z04anonymousza31869ze3z87_2092:
						if (NULLP(BgL_objectsz00_2090))
							{	/* SawJvm/jld.scm 260 */
								obj_t BgL_arg1872z00_2094;

								BgL_arg1872z00_2094 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(8L));
								{	/* SawJvm/jld.scm 260 */
									obj_t BgL_list1873z00_2095;

									{	/* SawJvm/jld.scm 260 */
										obj_t BgL_arg1875z00_2096;

										{	/* SawJvm/jld.scm 260 */
											obj_t BgL_arg1876z00_2097;

											{	/* SawJvm/jld.scm 260 */
												obj_t BgL_arg1877z00_2098;

												{	/* SawJvm/jld.scm 260 */
													obj_t BgL_arg1879z00_2099;

													{	/* SawJvm/jld.scm 260 */
														obj_t BgL_arg1880z00_2100;

														{	/* SawJvm/jld.scm 260 */
															obj_t BgL_arg1881z00_2101;

															BgL_arg1881z00_2101 =
																MAKE_YOUNG_PAIR(BgL_cmdz00_2091, BNIL);
															BgL_arg1880z00_2100 =
																MAKE_YOUNG_PAIR
																(BGl_string2225z00zzsaw_jvm_ldz00,
																BgL_arg1881z00_2101);
														}
														BgL_arg1879z00_2099 =
															MAKE_YOUNG_PAIR(BgL_targetz00_10,
															BgL_arg1880z00_2100);
													}
													BgL_arg1877z00_2098 =
														MAKE_YOUNG_PAIR(BGl_string2225z00zzsaw_jvm_ldz00,
														BgL_arg1879z00_2099);
												}
												BgL_arg1876z00_2097 =
													MAKE_YOUNG_PAIR(BgL_manifestz00_11,
													BgL_arg1877z00_2098);
											}
											BgL_arg1875z00_2096 =
												MAKE_YOUNG_PAIR(BGl_string2225z00zzsaw_jvm_ldz00,
												BgL_arg1876z00_2097);
										}
										BgL_list1873z00_2095 =
											MAKE_YOUNG_PAIR(BgL_arg1872z00_2094, BgL_arg1875z00_2096);
									}
									BgL_cmdz00_2049 =
										BGl_stringzd2appendzd2zz__r4_strings_6_7z00
										(BgL_list1873z00_2095);
								}
							}
						else
							{	/* SawJvm/jld.scm 264 */
								obj_t BgL_arg1882z00_2102;
								obj_t BgL_arg1883z00_2103;

								BgL_arg1882z00_2102 = CDR(((obj_t) BgL_objectsz00_2090));
								{	/* SawJvm/jld.scm 265 */
									obj_t BgL_arg1884z00_2104;

									BgL_arg1884z00_2104 = CAR(((obj_t) BgL_objectsz00_2090));
									BgL_arg1883z00_2103 =
										string_append_3(BgL_arg1884z00_2104,
										BGl_string2225z00zzsaw_jvm_ldz00, BgL_cmdz00_2091);
								}
								{
									obj_t BgL_cmdz00_3801;
									obj_t BgL_objectsz00_3800;

									BgL_objectsz00_3800 = BgL_arg1882z00_2102;
									BgL_cmdz00_3801 = BgL_arg1883z00_2103;
									BgL_cmdz00_2091 = BgL_cmdz00_3801;
									BgL_objectsz00_2090 = BgL_objectsz00_3800;
									goto BgL_zc3z04anonymousza31869ze3z87_2092;
								}
							}
					}
				{	/* SawJvm/jld.scm 267 */
					obj_t BgL_list1832z00_2050;

					{	/* SawJvm/jld.scm 267 */
						obj_t BgL_arg1833z00_2051;

						{	/* SawJvm/jld.scm 267 */
							obj_t BgL_arg1834z00_2052;

							BgL_arg1834z00_2052 =
								MAKE_YOUNG_PAIR(BGl_string2227z00zzsaw_jvm_ldz00, BNIL);
							BgL_arg1833z00_2051 =
								MAKE_YOUNG_PAIR(BgL_cmdz00_2049, BgL_arg1834z00_2052);
						}
						BgL_list1832z00_2050 =
							MAKE_YOUNG_PAIR(BGl_string2228z00zzsaw_jvm_ldz00,
							BgL_arg1833z00_2051);
					}
					BGl_verbosez00zztools_speekz00(BINT(2L), BgL_list1832z00_2050);
				}
				{	/* SawJvm/jld.scm 268 */
					obj_t BgL_exitd1117z00_2053;

					BgL_exitd1117z00_2053 = BGL_EXITD_TOP_AS_OBJ();
					{	/* SawJvm/jld.scm 272 */
						obj_t BgL_zc3z04anonymousza31841ze3z87_3148;

						BgL_zc3z04anonymousza31841ze3z87_3148 =
							MAKE_FX_PROCEDURE
							(BGl_z62zc3z04anonymousza31841ze3ze5zzsaw_jvm_ldz00, (int) (0L),
							(int) (1L));
						PROCEDURE_SET(BgL_zc3z04anonymousza31841ze3z87_3148, (int) (0L),
							BgL_manifestz00_11);
						{	/* SawJvm/jld.scm 268 */
							obj_t BgL_arg1820z00_2824;

							{	/* SawJvm/jld.scm 268 */
								obj_t BgL_arg1821z00_2825;

								BgL_arg1821z00_2825 = BGL_EXITD_PROTECT(BgL_exitd1117z00_2053);
								BgL_arg1820z00_2824 =
									MAKE_YOUNG_PAIR(BgL_zc3z04anonymousza31841ze3z87_3148,
									BgL_arg1821z00_2825);
							}
							BGL_EXITD_PROTECT_SET(BgL_exitd1117z00_2053, BgL_arg1820z00_2824);
							BUNSPEC;
						}
						{	/* SawJvm/jld.scm 269 */
							obj_t BgL_tmp1119z00_2055;

							{	/* SawJvm/jld.scm 269 */
								bool_t BgL_test2433z00_3816;

								{	/* SawJvm/jld.scm 269 */
									obj_t BgL_arg1839z00_2060;

									{	/* SawJvm/jld.scm 269 */
										obj_t BgL_list1840z00_2061;

										BgL_list1840z00_2061 =
											MAKE_YOUNG_PAIR(BgL_cmdz00_2049, BNIL);
										BgL_arg1839z00_2060 =
											BGl_systemz00zz__osz00(BgL_list1840z00_2061);
									}
									BgL_test2433z00_3816 =
										((long) CINT(BgL_arg1839z00_2060) == 0L);
								}
								if (BgL_test2433z00_3816)
									{	/* SawJvm/jld.scm 269 */
										BgL_tmp1119z00_2055 = BTRUE;
									}
								else
									{	/* SawJvm/jld.scm 269 */
										BgL_tmp1119z00_2055 =
											BGl_errorz00zz__errorz00
											(BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
												(8L)), BGl_string2229z00zzsaw_jvm_ldz00,
											BgL_targetz00_10);
									}
							}
							{	/* SawJvm/jld.scm 268 */
								bool_t BgL_test2434z00_3824;

								{	/* SawJvm/jld.scm 268 */
									obj_t BgL_arg1819z00_2828;

									BgL_arg1819z00_2828 =
										BGL_EXITD_PROTECT(BgL_exitd1117z00_2053);
									BgL_test2434z00_3824 = PAIRP(BgL_arg1819z00_2828);
								}
								if (BgL_test2434z00_3824)
									{	/* SawJvm/jld.scm 268 */
										obj_t BgL_arg1817z00_2829;

										{	/* SawJvm/jld.scm 268 */
											obj_t BgL_arg1818z00_2830;

											BgL_arg1818z00_2830 =
												BGL_EXITD_PROTECT(BgL_exitd1117z00_2053);
											BgL_arg1817z00_2829 = CDR(((obj_t) BgL_arg1818z00_2830));
										}
										BGL_EXITD_PROTECT_SET(BgL_exitd1117z00_2053,
											BgL_arg1817z00_2829);
										BUNSPEC;
									}
								else
									{	/* SawJvm/jld.scm 268 */
										BFALSE;
									}
							}
							BGl_z62zc3z04anonymousza31841ze3ze5zzsaw_jvm_ldz00
								(BgL_zc3z04anonymousza31841ze3z87_3148);
							return BgL_tmp1119z00_2055;
						}
					}
				}
			}
		}

	}



/* &<@anonymous:1841> */
	obj_t BGl_z62zc3z04anonymousza31841ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3149)
	{
		{	/* SawJvm/jld.scm 268 */
			{	/* SawJvm/jld.scm 272 */
				obj_t BgL_manifestz00_3150;

				BgL_manifestz00_3150 =
					((obj_t) PROCEDURE_REF(BgL_envz00_3149, (int) (0L)));
				{	/* SawJvm/jld.scm 272 */
					bool_t BgL_tmpz00_3835;

					if (CBOOL(BGl_za2rmzd2tmpzd2filesza2z00zzengine_paramz00))
						{	/* SawJvm/jld.scm 273 */
							char *BgL_stringz00_3196;

							BgL_stringz00_3196 = BSTRING_TO_STRING(BgL_manifestz00_3150);
							if (unlink(BgL_stringz00_3196))
								{	/* SawJvm/jld.scm 273 */
									BgL_tmpz00_3835 = ((bool_t) 0);
								}
							else
								{	/* SawJvm/jld.scm 273 */
									BgL_tmpz00_3835 = ((bool_t) 1);
								}
						}
					else
						{	/* SawJvm/jld.scm 272 */
							BgL_tmpz00_3835 = ((bool_t) 0);
						}
					return BBOOL(BgL_tmpz00_3835);
				}
			}
		}

	}



/* make-manifest-name */
	obj_t BGl_makezd2manifestzd2namez00zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 278 */
			{
				obj_t BgL_namez00_2834;

				BgL_namez00_2834 = BGl_string2231z00zzsaw_jvm_ldz00;
			BgL_loopz00_2833:
				if (fexists(BSTRING_TO_STRING(BgL_namez00_2834)))
					{
						obj_t BgL_namez00_3845;

						BgL_namez00_3845 =
							string_append(BgL_namez00_2834, BGl_string2230z00zzsaw_jvm_ldz00);
						BgL_namez00_2834 = BgL_namez00_3845;
						goto BgL_loopz00_2833;
					}
				else
					{	/* SawJvm/jld.scm 280 */
						return BgL_namez00_2834;
					}
			}
		}

	}



/* jvm-bigloo-classpath */
	obj_t BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 287 */
			{	/* SawJvm/jld.scm 289 */
				obj_t BgL_arg1889z00_2112;

				if (STRINGP(BGl_za2jvmzd2bigloozd2classpathza2z00zzengine_paramz00))
					{	/* SawJvm/jld.scm 289 */
						BgL_arg1889z00_2112 =
							BGl_za2jvmzd2bigloozd2classpathza2z00zzengine_paramz00;
					}
				else
					{	/* SawJvm/jld.scm 289 */
						BgL_arg1889z00_2112 =
							BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(9L));
					}
				return BGl_uncygdrivez00zztools_miscz00(BgL_arg1889z00_2112);
			}
		}

	}



/* generate-jvm-manifest */
	obj_t BGl_generatezd2jvmzd2manifestz00zzsaw_jvm_ldz00(obj_t BgL_fnamez00_14,
		obj_t BgL_mainz00_15, obj_t BgL_jarnamez00_16, obj_t BgL_za7ipsza7_17)
	{
		{	/* SawJvm/jld.scm 304 */
			{	/* SawJvm/jld.scm 306 */
				bool_t BgL_test2439z00_3852;

				{	/* SawJvm/jld.scm 306 */
					obj_t BgL_string1z00_2841;

					BgL_string1z00_2841 = BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
					{	/* SawJvm/jld.scm 306 */
						long BgL_l1z00_2843;

						BgL_l1z00_2843 = STRING_LENGTH(BgL_string1z00_2841);
						if ((BgL_l1z00_2843 == 2L))
							{	/* SawJvm/jld.scm 306 */
								int BgL_arg1303z00_2846;

								{	/* SawJvm/jld.scm 306 */
									char *BgL_auxz00_3858;
									char *BgL_tmpz00_3856;

									BgL_auxz00_3858 =
										BSTRING_TO_STRING(BGl_string2232z00zzsaw_jvm_ldz00);
									BgL_tmpz00_3856 = BSTRING_TO_STRING(BgL_string1z00_2841);
									BgL_arg1303z00_2846 =
										memcmp(BgL_tmpz00_3856, BgL_auxz00_3858, BgL_l1z00_2843);
								}
								BgL_test2439z00_3852 = ((long) (BgL_arg1303z00_2846) == 0L);
							}
						else
							{	/* SawJvm/jld.scm 306 */
								BgL_test2439z00_3852 = ((bool_t) 0);
							}
					}
				}
				if (BgL_test2439z00_3852)
					{	/* SawJvm/jld.scm 306 */
						return
							BGl_generatezd2shzd2jvmzd2manifestzd2zzsaw_jvm_ldz00
							(BgL_fnamez00_14, BgL_mainz00_15, BgL_za7ipsza7_17);
					}
				else
					{	/* SawJvm/jld.scm 308 */
						bool_t BgL_test2441z00_3864;

						{	/* SawJvm/jld.scm 308 */
							obj_t BgL_string1z00_2852;

							BgL_string1z00_2852 = BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
							{	/* SawJvm/jld.scm 308 */
								long BgL_l1z00_2854;

								BgL_l1z00_2854 = STRING_LENGTH(BgL_string1z00_2852);
								if ((BgL_l1z00_2854 == 5L))
									{	/* SawJvm/jld.scm 308 */
										int BgL_arg1303z00_2857;

										{	/* SawJvm/jld.scm 308 */
											char *BgL_auxz00_3870;
											char *BgL_tmpz00_3868;

											BgL_auxz00_3870 =
												BSTRING_TO_STRING(BGl_string2209z00zzsaw_jvm_ldz00);
											BgL_tmpz00_3868 = BSTRING_TO_STRING(BgL_string1z00_2852);
											BgL_arg1303z00_2857 =
												memcmp(BgL_tmpz00_3868, BgL_auxz00_3870,
												BgL_l1z00_2854);
										}
										BgL_test2441z00_3864 = ((long) (BgL_arg1303z00_2857) == 0L);
									}
								else
									{	/* SawJvm/jld.scm 308 */
										BgL_test2441z00_3864 = ((bool_t) 0);
									}
							}
						}
						if (BgL_test2441z00_3864)
							{	/* SawJvm/jld.scm 308 */
								return
									BGl_generatezd2msdoszd2jvmzd2manifestzd2zzsaw_jvm_ldz00
									(BgL_fnamez00_14, BgL_mainz00_15, BgL_jarnamez00_16);
							}
						else
							{	/* SawJvm/jld.scm 308 */
								{	/* SawJvm/jld.scm 311 */
									obj_t BgL_list1894z00_2117;

									{	/* SawJvm/jld.scm 311 */
										obj_t BgL_arg1895z00_2118;

										{	/* SawJvm/jld.scm 311 */
											obj_t BgL_arg1896z00_2119;

											{	/* SawJvm/jld.scm 311 */
												obj_t BgL_arg1897z00_2120;

												BgL_arg1897z00_2120 =
													MAKE_YOUNG_PAIR(BGl_string2233z00zzsaw_jvm_ldz00,
													BNIL);
												BgL_arg1896z00_2119 =
													MAKE_YOUNG_PAIR
													(BGl_za2jvmzd2shellza2zd2zzengine_paramz00,
													BgL_arg1897z00_2120);
											}
											BgL_arg1895z00_2118 =
												MAKE_YOUNG_PAIR(BGl_string2234z00zzsaw_jvm_ldz00,
												BgL_arg1896z00_2119);
										}
										BgL_list1894z00_2117 =
											MAKE_YOUNG_PAIR(BGl_string2235z00zzsaw_jvm_ldz00,
											BgL_arg1895z00_2118);
									}
									BGl_warningz00zz__errorz00(BgL_list1894z00_2117);
								}
								return
									BGl_generatezd2shzd2jvmzd2manifestzd2zzsaw_jvm_ldz00
									(BgL_fnamez00_14, BgL_mainz00_15, BgL_za7ipsza7_17);
							}
					}
			}
		}

	}



/* split-72 */
	obj_t BGl_splitzd272zd2zzsaw_jvm_ldz00(obj_t BgL_strz00_18)
	{
		{	/* SawJvm/jld.scm 318 */
			return BGl_loopze70ze7zzsaw_jvm_ldz00(BgL_strz00_18, 0L);
		}

	}



/* loop~0 */
	obj_t BGl_loopze70ze7zzsaw_jvm_ldz00(obj_t BgL_strz00_3176,
		long BgL_oz00_2122)
	{
		{	/* SawJvm/jld.scm 319 */
			if (((STRING_LENGTH(((obj_t) BgL_strz00_3176)) - BgL_oz00_2122) <= 72L))
				{	/* SawJvm/jld.scm 320 */
					if ((BgL_oz00_2122 == 0L))
						{	/* SawJvm/jld.scm 321 */
							return BgL_strz00_3176;
						}
					else
						{	/* SawJvm/jld.scm 323 */
							long BgL_arg1905z00_2128;

							BgL_arg1905z00_2128 = STRING_LENGTH(((obj_t) BgL_strz00_3176));
							return
								c_substring(
								((obj_t) BgL_strz00_3176), BgL_oz00_2122, BgL_arg1905z00_2128);
						}
				}
			else
				{	/* SawJvm/jld.scm 324 */
					obj_t BgL_arg1908z00_2129;
					obj_t BgL_arg1909z00_2130;

					{	/* SawJvm/jld.scm 324 */
						long BgL_arg1911z00_2131;

						BgL_arg1911z00_2131 = (BgL_oz00_2122 + 71L);
						BgL_arg1908z00_2129 =
							c_substring(
							((obj_t) BgL_strz00_3176), BgL_oz00_2122, BgL_arg1911z00_2131);
					}
					BgL_arg1909z00_2130 =
						BGl_loopze70ze7zzsaw_jvm_ldz00(BgL_strz00_3176,
						(BgL_oz00_2122 + 72L));
					return
						string_append_3(BgL_arg1908z00_2129,
						BGl_string2236z00zzsaw_jvm_ldz00, BgL_arg1909z00_2130);
				}
		}

	}



/* manifest-classpath-format */
	obj_t BGl_manifestzd2classpathzd2formatz00zzsaw_jvm_ldz00(obj_t
		BgL_classpathz00_19)
	{
		{	/* SawJvm/jld.scm 332 */
			{	/* SawJvm/jld.scm 333 */
				bool_t BgL_test2445z00_3900;

				{	/* SawJvm/jld.scm 333 */
					obj_t BgL_string1z00_2877;

					BgL_string1z00_2877 = BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
					{	/* SawJvm/jld.scm 333 */
						long BgL_l1z00_2879;

						BgL_l1z00_2879 = STRING_LENGTH(BgL_string1z00_2877);
						if ((BgL_l1z00_2879 == 2L))
							{	/* SawJvm/jld.scm 333 */
								int BgL_arg1303z00_2882;

								{	/* SawJvm/jld.scm 333 */
									char *BgL_auxz00_3906;
									char *BgL_tmpz00_3904;

									BgL_auxz00_3906 =
										BSTRING_TO_STRING(BGl_string2232z00zzsaw_jvm_ldz00);
									BgL_tmpz00_3904 = BSTRING_TO_STRING(BgL_string1z00_2877);
									BgL_arg1303z00_2882 =
										memcmp(BgL_tmpz00_3904, BgL_auxz00_3906, BgL_l1z00_2879);
								}
								BgL_test2445z00_3900 = ((long) (BgL_arg1303z00_2882) == 0L);
							}
						else
							{	/* SawJvm/jld.scm 333 */
								BgL_test2445z00_3900 = ((bool_t) 0);
							}
					}
				}
				if (BgL_test2445z00_3900)
					{	/* SawJvm/jld.scm 333 */
						return
							BGl_stringzd2replacezd2zz__r4_strings_6_7z00(BgL_classpathz00_19,
							(char) (((unsigned char) ':')), (char) (((unsigned char) ' ')));
					}
				else
					{	/* SawJvm/jld.scm 335 */
						bool_t BgL_test2447z00_3914;

						{	/* SawJvm/jld.scm 335 */
							obj_t BgL_string1z00_2888;

							BgL_string1z00_2888 = BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
							{	/* SawJvm/jld.scm 335 */
								long BgL_l1z00_2890;

								BgL_l1z00_2890 = STRING_LENGTH(BgL_string1z00_2888);
								if ((BgL_l1z00_2890 == 5L))
									{	/* SawJvm/jld.scm 335 */
										int BgL_arg1303z00_2893;

										{	/* SawJvm/jld.scm 335 */
											char *BgL_auxz00_3920;
											char *BgL_tmpz00_3918;

											BgL_auxz00_3920 =
												BSTRING_TO_STRING(BGl_string2209z00zzsaw_jvm_ldz00);
											BgL_tmpz00_3918 = BSTRING_TO_STRING(BgL_string1z00_2888);
											BgL_arg1303z00_2893 =
												memcmp(BgL_tmpz00_3918, BgL_auxz00_3920,
												BgL_l1z00_2890);
										}
										BgL_test2447z00_3914 = ((long) (BgL_arg1303z00_2893) == 0L);
									}
								else
									{	/* SawJvm/jld.scm 335 */
										BgL_test2447z00_3914 = ((bool_t) 0);
									}
							}
						}
						if (BgL_test2447z00_3914)
							{	/* SawJvm/jld.scm 335 */
								return
									BGl_stringzd2replacezd2zz__r4_strings_6_7z00
									(BgL_classpathz00_19, (char) (((unsigned char) ';')),
									(char) (((unsigned char) ' ')));
							}
						else
							{	/* SawJvm/jld.scm 335 */
								{	/* SawJvm/jld.scm 338 */
									obj_t BgL_list1919z00_2138;

									{	/* SawJvm/jld.scm 338 */
										obj_t BgL_arg1920z00_2139;

										{	/* SawJvm/jld.scm 338 */
											obj_t BgL_arg1921z00_2140;

											{	/* SawJvm/jld.scm 338 */
												obj_t BgL_arg1922z00_2141;

												BgL_arg1922z00_2141 =
													MAKE_YOUNG_PAIR(BGl_string2237z00zzsaw_jvm_ldz00,
													BNIL);
												BgL_arg1921z00_2140 =
													MAKE_YOUNG_PAIR
													(BGl_za2jvmzd2shellza2zd2zzengine_paramz00,
													BgL_arg1922z00_2141);
											}
											BgL_arg1920z00_2139 =
												MAKE_YOUNG_PAIR(BGl_string2238z00zzsaw_jvm_ldz00,
												BgL_arg1921z00_2140);
										}
										BgL_list1919z00_2138 =
											MAKE_YOUNG_PAIR(BGl_string2239z00zzsaw_jvm_ldz00,
											BgL_arg1920z00_2139);
									}
									BGl_warningz00zz__errorz00(BgL_list1919z00_2138);
								}
								return
									BGl_stringzd2replacezd2zz__r4_strings_6_7z00
									(BgL_classpathz00_19, (char) (((unsigned char) ':')),
									(char) (((unsigned char) ' ')));
		}}}}

	}



/* generate-sh-jvm-manifest */
	obj_t BGl_generatezd2shzd2jvmzd2manifestzd2zzsaw_jvm_ldz00(obj_t
		BgL_fnamez00_20, obj_t BgL_mainz00_21, obj_t BgL_za7ipsza7_22)
	{
		{	/* SawJvm/jld.scm 345 */
			{	/* SawJvm/jld.scm 348 */
				obj_t BgL_zc3z04anonymousza31924ze3z87_3151;

				BgL_zc3z04anonymousza31924ze3z87_3151 =
					MAKE_FX_PROCEDURE(BGl_z62zc3z04anonymousza31924ze3ze5zzsaw_jvm_ldz00,
					(int) (0L), (int) (2L));
				PROCEDURE_SET(BgL_zc3z04anonymousza31924ze3z87_3151,
					(int) (0L), BgL_mainz00_21);
				PROCEDURE_SET(BgL_zc3z04anonymousza31924ze3z87_3151,
					(int) (1L), BgL_za7ipsza7_22);
				return
					BGl_withzd2outputzd2tozd2filezd2zz__r4_ports_6_10_1z00
					(BgL_fnamez00_20, BgL_zc3z04anonymousza31924ze3z87_3151);
			}
		}

	}



/* &<@anonymous:1924> */
	obj_t BGl_z62zc3z04anonymousza31924ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3152)
	{
		{	/* SawJvm/jld.scm 347 */
			{	/* SawJvm/jld.scm 348 */
				obj_t BgL_mainz00_3153;
				obj_t BgL_za7ipsza7_3154;

				BgL_mainz00_3153 = PROCEDURE_REF(BgL_envz00_3152, (int) (0L));
				BgL_za7ipsza7_3154 = PROCEDURE_REF(BgL_envz00_3152, (int) (1L));
				{	/* SawJvm/jld.scm 348 */
					obj_t BgL_port1324z00_3197;

					{	/* SawJvm/jld.scm 348 */
						obj_t BgL_tmpz00_3948;

						BgL_tmpz00_3948 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1324z00_3197 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3948);
					}
					bgl_display_string(BGl_string2240z00zzsaw_jvm_ldz00,
						BgL_port1324z00_3197);
					bgl_display_char(((unsigned char) 10), BgL_port1324z00_3197);
				}
				{	/* SawJvm/jld.scm 349 */
					obj_t BgL_port1325z00_3198;

					{	/* SawJvm/jld.scm 349 */
						obj_t BgL_tmpz00_3953;

						BgL_tmpz00_3953 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1325z00_3198 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3953);
					}
					bgl_display_string(BGl_string2241z00zzsaw_jvm_ldz00,
						BgL_port1325z00_3198);
					bgl_display_obj(BgL_mainz00_3153, BgL_port1325z00_3198);
					bgl_display_char(((unsigned char) 10), BgL_port1325z00_3198);
				}
				{	/* SawJvm/jld.scm 351 */
					obj_t BgL_arg1925z00_3199;

					BgL_arg1925z00_3199 =
						BGl_splitzd272zd2zzsaw_jvm_ldz00
						(BGl_manifestzd2classpathzd2formatz00zzsaw_jvm_ldz00
						(BGl_za2jvmzd2classpathza2zd2zzengine_paramz00));
					{	/* SawJvm/jld.scm 350 */
						obj_t BgL_list1926z00_3200;

						{	/* SawJvm/jld.scm 350 */
							obj_t BgL_arg1927z00_3201;

							BgL_arg1927z00_3201 = MAKE_YOUNG_PAIR(BgL_arg1925z00_3199, BNIL);
							BgL_list1926z00_3200 =
								MAKE_YOUNG_PAIR(BGl_string2242z00zzsaw_jvm_ldz00,
								BgL_arg1927z00_3201);
						}
						BGl_displayza2za2zz__r4_output_6_10_3z00(BgL_list1926z00_3200);
				}}
				{	/* SawJvm/jld.scm 354 */
					obj_t BgL_arg1929z00_3202;

					{	/* SawJvm/jld.scm 354 */
						obj_t BgL_tmpz00_3964;

						BgL_tmpz00_3964 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1929z00_3202 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3964);
					}
					bgl_display_string(BGl_string2243z00zzsaw_jvm_ldz00,
						BgL_arg1929z00_3202);
				}
				{	/* SawJvm/jld.scm 357 */
					obj_t BgL_arg1930z00_3203;
					obj_t BgL_arg1931z00_3204;

					{	/* SawJvm/jld.scm 357 */
						obj_t BgL_arg1933z00_3205;

						{	/* SawJvm/jld.scm 357 */
							obj_t BgL_arg1934z00_3206;
							obj_t BgL_arg1935z00_3207;

							BgL_arg1934z00_3206 =
								BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00();
							{	/* SawJvm/jld.scm 358 */
								bool_t BgL_test2449z00_3969;

								if (CBOOL(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
									{	/* SawJvm/jld.scm 358 */
										if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
											{	/* SawJvm/jld.scm 358 */
												BgL_test2449z00_3969 = ((bool_t) 0);
											}
										else
											{	/* SawJvm/jld.scm 358 */
												BgL_test2449z00_3969 = ((bool_t) 1);
											}
									}
								else
									{	/* SawJvm/jld.scm 358 */
										BgL_test2449z00_3969 = ((bool_t) 0);
									}
								if (BgL_test2449z00_3969)
									{	/* SawJvm/jld.scm 358 */
										BgL_arg1935z00_3207 = BGl_string2244z00zzsaw_jvm_ldz00;
									}
								else
									{	/* SawJvm/jld.scm 358 */
										BgL_arg1935z00_3207 = BGl_string2245z00zzsaw_jvm_ldz00;
									}
							}
							BgL_arg1933z00_3205 =
								BGl_makezd2filezd2namez00zz__osz00(BgL_arg1934z00_3206,
								BgL_arg1935z00_3207);
						}
						BgL_arg1930z00_3203 =
							BGl_splitzd272zd2zzsaw_jvm_ldz00(BgL_arg1933z00_3205);
					}
					{	/* SawJvm/jld.scm 355 */
						obj_t BgL_tmpz00_3976;

						BgL_tmpz00_3976 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1931z00_3204 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3976);
					}
					bgl_display_obj(BgL_arg1930z00_3203, BgL_arg1931z00_3204);
				}
				{
					obj_t BgL_l1326z00_3209;

					BgL_l1326z00_3209 = BgL_za7ipsza7_3154;
				BgL_zc3z04anonymousza31937ze3z87_3208:
					if (PAIRP(BgL_l1326z00_3209))
						{	/* SawJvm/jld.scm 361 */
							{	/* SawJvm/jld.scm 365 */
								obj_t BgL_lz00_3210;

								BgL_lz00_3210 = CAR(BgL_l1326z00_3209);
								{	/* SawJvm/jld.scm 365 */
									obj_t BgL_arg1939z00_3211;

									{	/* SawJvm/jld.scm 365 */
										obj_t BgL_tmpz00_3983;

										BgL_tmpz00_3983 = BGL_CURRENT_DYNAMIC_ENV();
										BgL_arg1939z00_3211 =
											BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3983);
									}
									bgl_display_string(BGl_string2243z00zzsaw_jvm_ldz00,
										BgL_arg1939z00_3211);
								}
								{	/* SawJvm/jld.scm 366 */
									obj_t BgL_arg1940z00_3212;
									obj_t BgL_arg1941z00_3213;

									BgL_arg1940z00_3212 =
										BGl_splitzd272zd2zzsaw_jvm_ldz00
										(BGl_userzd2libraryzd2zzsaw_jvm_ldz00(BgL_lz00_3210));
									{	/* SawJvm/jld.scm 366 */
										obj_t BgL_tmpz00_3989;

										BgL_tmpz00_3989 = BGL_CURRENT_DYNAMIC_ENV();
										BgL_arg1941z00_3213 =
											BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3989);
									}
									bgl_display_obj(BgL_arg1940z00_3212, BgL_arg1941z00_3213);
								}
							}
							{
								obj_t BgL_l1326z00_3993;

								BgL_l1326z00_3993 = CDR(BgL_l1326z00_3209);
								BgL_l1326z00_3209 = BgL_l1326z00_3993;
								goto BgL_zc3z04anonymousza31937ze3z87_3208;
							}
						}
					else
						{	/* SawJvm/jld.scm 361 */
							((bool_t) 1);
						}
				}
				{	/* SawJvm/jld.scm 368 */
					obj_t BgL_arg1944z00_3214;

					{	/* SawJvm/jld.scm 368 */
						obj_t BgL_tmpz00_3995;

						BgL_tmpz00_3995 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1944z00_3214 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3995);
					}
					bgl_display_char(((unsigned char) 10), BgL_arg1944z00_3214);
				}
				{	/* SawJvm/jld.scm 369 */
					obj_t BgL_port1328z00_3215;

					{	/* SawJvm/jld.scm 369 */
						obj_t BgL_tmpz00_3999;

						BgL_tmpz00_3999 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1328z00_3215 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_3999);
					}
					bgl_display_string(BGl_string2246z00zzsaw_jvm_ldz00,
						BgL_port1328z00_3215);
					bgl_display_obj(BGl_za2bigloozd2nameza2zd2zzengine_paramz00,
						BgL_port1328z00_3215);
					bgl_display_char(((unsigned char) 10), BgL_port1328z00_3215);
				}
				{	/* SawJvm/jld.scm 370 */
					obj_t BgL_arg1945z00_3216;

					{	/* SawJvm/jld.scm 370 */
						obj_t BgL_tmpz00_4005;

						BgL_tmpz00_4005 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1945z00_3216 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4005);
					}
					return bgl_display_char(((unsigned char) 10), BgL_arg1945z00_3216);
		}}}

	}



/* generate-msdos-jvm-manifest */
	obj_t BGl_generatezd2msdoszd2jvmzd2manifestzd2zzsaw_jvm_ldz00(obj_t
		BgL_fnamez00_23, obj_t BgL_mainz00_24, obj_t BgL_jarnamez00_25)
	{
		{	/* SawJvm/jld.scm 375 */
			{	/* SawJvm/jld.scm 378 */
				obj_t BgL_zc3z04anonymousza31947ze3z87_3155;

				BgL_zc3z04anonymousza31947ze3z87_3155 =
					MAKE_FX_PROCEDURE(BGl_z62zc3z04anonymousza31947ze3ze5zzsaw_jvm_ldz00,
					(int) (0L), (int) (1L));
				PROCEDURE_SET(BgL_zc3z04anonymousza31947ze3z87_3155,
					(int) (0L), BgL_mainz00_24);
				return
					BGl_withzd2outputzd2tozd2filezd2zz__r4_ports_6_10_1z00
					(BgL_fnamez00_23, BgL_zc3z04anonymousza31947ze3z87_3155);
			}
		}

	}



/* &<@anonymous:1947> */
	obj_t BGl_z62zc3z04anonymousza31947ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3156)
	{
		{	/* SawJvm/jld.scm 377 */
			{	/* SawJvm/jld.scm 378 */
				obj_t BgL_mainz00_3157;

				BgL_mainz00_3157 = PROCEDURE_REF(BgL_envz00_3156, (int) (0L));
				{	/* SawJvm/jld.scm 378 */
					obj_t BgL_port1329z00_3217;

					{	/* SawJvm/jld.scm 378 */
						obj_t BgL_tmpz00_4017;

						BgL_tmpz00_4017 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1329z00_3217 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4017);
					}
					bgl_display_string(BGl_string2240z00zzsaw_jvm_ldz00,
						BgL_port1329z00_3217);
					bgl_display_char(((unsigned char) 10), BgL_port1329z00_3217);
				}
				{	/* SawJvm/jld.scm 379 */
					obj_t BgL_port1330z00_3218;

					{	/* SawJvm/jld.scm 379 */
						obj_t BgL_tmpz00_4022;

						BgL_tmpz00_4022 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1330z00_3218 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4022);
					}
					bgl_display_string(BGl_string2241z00zzsaw_jvm_ldz00,
						BgL_port1330z00_3218);
					bgl_display_obj(BgL_mainz00_3157, BgL_port1330z00_3218);
					bgl_display_char(((unsigned char) 10), BgL_port1330z00_3218);
				}
				{	/* SawJvm/jld.scm 380 */
					obj_t BgL_port1331z00_3219;

					{	/* SawJvm/jld.scm 380 */
						obj_t BgL_tmpz00_4028;

						BgL_tmpz00_4028 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1331z00_3219 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4028);
					}
					bgl_display_string(BGl_string2246z00zzsaw_jvm_ldz00,
						BgL_port1331z00_3219);
					bgl_display_obj(BGl_za2bigloozd2nameza2zd2zzengine_paramz00,
						BgL_port1331z00_3219);
					bgl_display_char(((unsigned char) 10), BgL_port1331z00_3219);
				}
				{	/* SawJvm/jld.scm 381 */
					obj_t BgL_arg1948z00_3220;

					{	/* SawJvm/jld.scm 381 */
						obj_t BgL_tmpz00_4034;

						BgL_tmpz00_4034 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1948z00_3220 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4034);
					}
					return bgl_display_char(((unsigned char) 10), BgL_arg1948z00_3220);
		}}}

	}



/* generate-jvm-sh-script */
	bool_t BGl_generatezd2jvmzd2shzd2scriptzd2zzsaw_jvm_ldz00(obj_t
		BgL_targetz00_26, obj_t BgL_mainzd2classzd2_27, obj_t BgL_za7ipsza7_28)
	{
		{	/* SawJvm/jld.scm 386 */
			{

				if (CBOOL(BGl_za2jvmzd2jarzf3za2z21zzengine_paramz00))
					{	/* SawJvm/jld.scm 451 */
						{	/* SawJvm/jld.scm 400 */
							obj_t BgL_zc3z04anonymousza31965ze3z87_3160;

							BgL_zc3z04anonymousza31965ze3z87_3160 =
								MAKE_FX_PROCEDURE
								(BGl_z62zc3z04anonymousza31965ze3ze5zzsaw_jvm_ldz00, (int) (0L),
								(int) (1L));
							PROCEDURE_SET(BgL_zc3z04anonymousza31965ze3z87_3160, (int) (0L),
								BgL_targetz00_26);
							BGl_withzd2outputzd2tozd2filezd2zz__r4_ports_6_10_1z00
								(BgL_targetz00_26, BgL_zc3z04anonymousza31965ze3z87_3160);
						}
						{	/* SawJvm/jld.scm 421 */
							obj_t BgL_list1982z00_2226;

							{	/* SawJvm/jld.scm 421 */
								obj_t BgL_arg1983z00_2227;

								{	/* SawJvm/jld.scm 421 */
									obj_t BgL_arg1984z00_2228;

									BgL_arg1984z00_2228 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(10L), BNIL);
									BgL_arg1983z00_2227 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(11L), BgL_arg1984z00_2228);
								}
								BgL_list1982z00_2226 =
									MAKE_YOUNG_PAIR(CNST_TABLE_REF(12L), BgL_arg1983z00_2227);
							}
							return
								BGl_chmodz00zz__osz00(BgL_targetz00_26, BgL_list1982z00_2226);
						}
					}
				else
					{	/* SawJvm/jld.scm 451 */
						{	/* SawJvm/jld.scm 425 */
							obj_t BgL_zc3z04anonymousza31987ze3z87_3159;

							BgL_zc3z04anonymousza31987ze3z87_3159 =
								MAKE_FX_PROCEDURE
								(BGl_z62zc3z04anonymousza31987ze3ze5zzsaw_jvm_ldz00, (int) (0L),
								(int) (2L));
							PROCEDURE_SET(BgL_zc3z04anonymousza31987ze3z87_3159, (int) (0L),
								BgL_za7ipsza7_28);
							PROCEDURE_SET(BgL_zc3z04anonymousza31987ze3z87_3159, (int) (1L),
								BgL_mainzd2classzd2_27);
							BGl_withzd2outputzd2tozd2filezd2zz__r4_ports_6_10_1z00
								(BgL_targetz00_26, BgL_zc3z04anonymousza31987ze3z87_3159);
						}
						{	/* SawJvm/jld.scm 450 */
							obj_t BgL_list2014z00_2270;

							{	/* SawJvm/jld.scm 450 */
								obj_t BgL_arg2015z00_2271;

								{	/* SawJvm/jld.scm 450 */
									obj_t BgL_arg2016z00_2272;

									BgL_arg2016z00_2272 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(10L), BNIL);
									BgL_arg2015z00_2271 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(11L), BgL_arg2016z00_2272);
								}
								BgL_list2014z00_2270 =
									MAKE_YOUNG_PAIR(CNST_TABLE_REF(12L), BgL_arg2015z00_2271);
							}
							return
								BGl_chmodz00zz__osz00(BgL_targetz00_26, BgL_list2014z00_2270);
						}
					}
			}
		}

	}



/* &generate-jvm-env */
	obj_t BGl_z62generatezd2jvmzd2envz62zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 396 */
			{
				obj_t BgL_envz00_2187;
				obj_t BgL_resz00_2188;

				BgL_envz00_2187 = BGl_za2jvmzd2envza2zd2zzengine_paramz00;
				BgL_resz00_2188 = BGl_string2223z00zzsaw_jvm_ldz00;
			BgL_zc3z04anonymousza31951ze3z87_2189:
				if (NULLP(BgL_envz00_2187))
					{	/* SawJvm/jld.scm 392 */
						return BgL_resz00_2188;
					}
				else
					{	/* SawJvm/jld.scm 394 */
						obj_t BgL_arg1953z00_2191;
						obj_t BgL_arg1954z00_2192;

						BgL_arg1953z00_2191 = CDR(((obj_t) BgL_envz00_2187));
						{	/* SawJvm/jld.scm 395 */
							obj_t BgL_arg1955z00_2193;
							obj_t BgL_arg1956z00_2194;

							BgL_arg1955z00_2193 = CAR(((obj_t) BgL_envz00_2187));
							BgL_arg1956z00_2194 = CAR(((obj_t) BgL_envz00_2187));
							{	/* SawJvm/jld.scm 395 */
								obj_t BgL_list1957z00_2195;

								{	/* SawJvm/jld.scm 395 */
									obj_t BgL_arg1958z00_2196;

									{	/* SawJvm/jld.scm 395 */
										obj_t BgL_arg1959z00_2197;

										{	/* SawJvm/jld.scm 395 */
											obj_t BgL_arg1960z00_2198;

											{	/* SawJvm/jld.scm 395 */
												obj_t BgL_arg1961z00_2199;

												{	/* SawJvm/jld.scm 395 */
													obj_t BgL_arg1962z00_2200;

													BgL_arg1962z00_2200 =
														MAKE_YOUNG_PAIR(BgL_resz00_2188, BNIL);
													BgL_arg1961z00_2199 =
														MAKE_YOUNG_PAIR(BGl_string2225z00zzsaw_jvm_ldz00,
														BgL_arg1962z00_2200);
												}
												BgL_arg1960z00_2198 =
													MAKE_YOUNG_PAIR(BgL_arg1956z00_2194,
													BgL_arg1961z00_2199);
											}
											BgL_arg1959z00_2197 =
												MAKE_YOUNG_PAIR(BGl_string2247z00zzsaw_jvm_ldz00,
												BgL_arg1960z00_2198);
										}
										BgL_arg1958z00_2196 =
											MAKE_YOUNG_PAIR(BgL_arg1955z00_2193, BgL_arg1959z00_2197);
									}
									BgL_list1957z00_2195 =
										MAKE_YOUNG_PAIR(BGl_string2248z00zzsaw_jvm_ldz00,
										BgL_arg1958z00_2196);
								}
								BgL_arg1954z00_2192 =
									BGl_stringzd2appendzd2zz__r4_strings_6_7z00
									(BgL_list1957z00_2195);
							}
						}
						{
							obj_t BgL_resz00_4084;
							obj_t BgL_envz00_4083;

							BgL_envz00_4083 = BgL_arg1953z00_2191;
							BgL_resz00_4084 = BgL_arg1954z00_2192;
							BgL_resz00_2188 = BgL_resz00_4084;
							BgL_envz00_2187 = BgL_envz00_4083;
							goto BgL_zc3z04anonymousza31951ze3z87_2189;
						}
					}
			}
		}

	}



/* &<@anonymous:1987> */
	obj_t BGl_z62zc3z04anonymousza31987ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3161)
	{
		{	/* SawJvm/jld.scm 424 */
			{	/* SawJvm/jld.scm 425 */
				obj_t BgL_za7ipsza7_3162;
				obj_t BgL_mainzd2classzd2_3163;

				BgL_za7ipsza7_3162 = PROCEDURE_REF(BgL_envz00_3161, (int) (0L));
				BgL_mainzd2classzd2_3163 = PROCEDURE_REF(BgL_envz00_3161, (int) (1L));
				{	/* SawJvm/jld.scm 425 */
					obj_t BgL_port1336z00_3221;

					{	/* SawJvm/jld.scm 425 */
						obj_t BgL_tmpz00_4089;

						BgL_tmpz00_4089 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1336z00_3221 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4089);
					}
					bgl_display_string(BGl_string2249z00zzsaw_jvm_ldz00,
						BgL_port1336z00_3221);
					bgl_display_char(((unsigned char) 10), BgL_port1336z00_3221);
				}
				{	/* SawJvm/jld.scm 426 */
					obj_t BgL_arg1988z00_3222;

					{	/* SawJvm/jld.scm 426 */
						obj_t BgL_tmpz00_4094;

						BgL_tmpz00_4094 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1988z00_3222 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4094);
					}
					bgl_display_char(((unsigned char) 10), BgL_arg1988z00_3222);
				}
				{	/* SawJvm/jld.scm 427 */
					obj_t BgL_port1342z00_3223;

					{	/* SawJvm/jld.scm 427 */
						obj_t BgL_tmpz00_4098;

						BgL_tmpz00_4098 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1342z00_3223 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4098);
					}
					bgl_display_string(BGl_string2250z00zzsaw_jvm_ldz00,
						BgL_port1342z00_3223);
					{	/* SawJvm/jld.scm 433 */
						obj_t BgL_arg1989z00_3224;

						{	/* SawJvm/jld.scm 433 */
							obj_t BgL_arg1990z00_3225;

							{	/* SawJvm/jld.scm 433 */
								obj_t BgL_arg1991z00_3226;

								{	/* SawJvm/jld.scm 433 */
									obj_t BgL_arg1992z00_3227;

									{	/* SawJvm/jld.scm 433 */
										obj_t BgL_arg1993z00_3228;

										{	/* SawJvm/jld.scm 433 */
											obj_t BgL_arg1994z00_3229;
											obj_t BgL_arg1995z00_3230;

											{	/* SawJvm/jld.scm 433 */
												obj_t BgL_arg1996z00_3231;

												{	/* SawJvm/jld.scm 433 */
													obj_t BgL_arg1997z00_3232;
													obj_t BgL_arg1998z00_3233;

													BgL_arg1997z00_3232 =
														BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00();
													{	/* SawJvm/jld.scm 434 */
														bool_t BgL_test2455z00_4103;

														if (CBOOL
															(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
															{	/* SawJvm/jld.scm 434 */
																if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
																	{	/* SawJvm/jld.scm 435 */
																		BgL_test2455z00_4103 = ((bool_t) 0);
																	}
																else
																	{	/* SawJvm/jld.scm 435 */
																		BgL_test2455z00_4103 = ((bool_t) 1);
																	}
															}
														else
															{	/* SawJvm/jld.scm 434 */
																BgL_test2455z00_4103 = ((bool_t) 0);
															}
														if (BgL_test2455z00_4103)
															{	/* SawJvm/jld.scm 434 */
																BgL_arg1998z00_3233 =
																	BGl_string2244z00zzsaw_jvm_ldz00;
															}
														else
															{	/* SawJvm/jld.scm 434 */
																BgL_arg1998z00_3233 =
																	BGl_string2245z00zzsaw_jvm_ldz00;
															}
													}
													BgL_arg1996z00_3231 =
														BGl_makezd2filezd2namez00zz__osz00
														(BgL_arg1997z00_3232, BgL_arg1998z00_3233);
												}
												BgL_arg1994z00_3229 =
													string_append_3(BGl_string2251z00zzsaw_jvm_ldz00,
													BgL_arg1996z00_3231,
													BGl_string2251z00zzsaw_jvm_ldz00);
											}
											{	/* SawJvm/jld.scm 438 */
												obj_t BgL_arg2000z00_3234;

												if (NULLP(BgL_za7ipsza7_3162))
													{	/* SawJvm/jld.scm 438 */
														BgL_arg2000z00_3234 = BNIL;
													}
												else
													{	/* SawJvm/jld.scm 438 */
														obj_t BgL_head1339z00_3235;

														BgL_head1339z00_3235 = MAKE_YOUNG_PAIR(BNIL, BNIL);
														{
															obj_t BgL_l1337z00_3237;
															obj_t BgL_tail1340z00_3238;

															BgL_l1337z00_3237 = BgL_za7ipsza7_3162;
															BgL_tail1340z00_3238 = BgL_head1339z00_3235;
														BgL_zc3z04anonymousza32002ze3z87_3236:
															if (NULLP(BgL_l1337z00_3237))
																{	/* SawJvm/jld.scm 438 */
																	BgL_arg2000z00_3234 =
																		CDR(BgL_head1339z00_3235);
																}
															else
																{	/* SawJvm/jld.scm 438 */
																	obj_t BgL_newtail1341z00_3239;

																	{	/* SawJvm/jld.scm 438 */
																		obj_t BgL_arg2006z00_3240;

																		{	/* SawJvm/jld.scm 438 */
																			obj_t BgL_fz00_3241;

																			BgL_fz00_3241 =
																				CAR(((obj_t) BgL_l1337z00_3237));
																			BgL_arg2006z00_3240 =
																				string_append_3
																				(BGl_string2251z00zzsaw_jvm_ldz00,
																				BGl_userzd2libraryzd2zzsaw_jvm_ldz00
																				(BgL_fz00_3241),
																				BGl_string2251z00zzsaw_jvm_ldz00);
																		}
																		BgL_newtail1341z00_3239 =
																			MAKE_YOUNG_PAIR(BgL_arg2006z00_3240,
																			BNIL);
																	}
																	SET_CDR(BgL_tail1340z00_3238,
																		BgL_newtail1341z00_3239);
																	{	/* SawJvm/jld.scm 438 */
																		obj_t BgL_arg2004z00_3242;

																		BgL_arg2004z00_3242 =
																			CDR(((obj_t) BgL_l1337z00_3237));
																		{
																			obj_t BgL_tail1340z00_4125;
																			obj_t BgL_l1337z00_4124;

																			BgL_l1337z00_4124 = BgL_arg2004z00_3242;
																			BgL_tail1340z00_4125 =
																				BgL_newtail1341z00_3239;
																			BgL_tail1340z00_3238 =
																				BgL_tail1340z00_4125;
																			BgL_l1337z00_3237 = BgL_l1337z00_4124;
																			goto
																				BgL_zc3z04anonymousza32002ze3z87_3236;
																		}
																	}
																}
														}
													}
												BgL_arg1995z00_3230 =
													BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00
													(BgL_arg2000z00_3234, BNIL);
											}
											BgL_arg1993z00_3228 =
												MAKE_YOUNG_PAIR(BgL_arg1994z00_3229,
												BgL_arg1995z00_3230);
										}
										BgL_arg1992z00_3227 =
											MAKE_YOUNG_PAIR(BGl_string2252z00zzsaw_jvm_ldz00,
											BgL_arg1993z00_3228);
									}
									BgL_arg1991z00_3226 =
										MAKE_YOUNG_PAIR(BGl_string2253z00zzsaw_jvm_ldz00,
										BgL_arg1992z00_3227);
								}
								BgL_arg1990z00_3225 =
									MAKE_YOUNG_PAIR(BGl_za2jvmzd2classpathza2zd2zzengine_paramz00,
									BgL_arg1991z00_3226);
							}
							BgL_arg1989z00_3224 =
								BGl_listzd2ze3shzd2pathzd2stringz31zzsaw_jvm_ldz00
								(BgL_arg1990z00_3225);
						}
						bgl_display_obj(BgL_arg1989z00_3224, BgL_port1342z00_3223);
					}
					bgl_display_char(((unsigned char) 10), BgL_port1342z00_3223);
				}
				{	/* SawJvm/jld.scm 439 */
					obj_t BgL_port1343z00_3243;

					{	/* SawJvm/jld.scm 439 */
						obj_t BgL_tmpz00_4134;

						BgL_tmpz00_4134 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1343z00_3243 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4134);
					}
					bgl_display_string(BGl_string2254z00zzsaw_jvm_ldz00,
						BgL_port1343z00_3243);
					bgl_display_char(((unsigned char) 10), BgL_port1343z00_3243);
				}
				{	/* SawJvm/jld.scm 440 */
					obj_t BgL_arg2008z00_3244;

					{	/* SawJvm/jld.scm 440 */
						obj_t BgL_tmpz00_4139;

						BgL_tmpz00_4139 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg2008z00_3244 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4139);
					}
					bgl_display_char(((unsigned char) 10), BgL_arg2008z00_3244);
				}
				{	/* SawJvm/jld.scm 441 */
					obj_t BgL_port1344z00_3245;

					{	/* SawJvm/jld.scm 441 */
						obj_t BgL_tmpz00_4143;

						BgL_tmpz00_4143 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1344z00_3245 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4143);
					}
					bgl_display_string(BGl_string2255z00zzsaw_jvm_ldz00,
						BgL_port1344z00_3245);
					bgl_display_obj(BGl_za2jvmzd2javaza2zd2zzengine_paramz00,
						BgL_port1344z00_3245);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1344z00_3245);
					{	/* SawJvm/jld.scm 442 */
						obj_t BgL_arg2009z00_3246;

						if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
							{	/* SawJvm/jld.scm 442 */
								BgL_arg2009z00_3246 = BGl_string2223z00zzsaw_jvm_ldz00;
							}
						else
							{	/* SawJvm/jld.scm 442 */
								BgL_arg2009z00_3246 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(13L));
							}
						bgl_display_obj(BgL_arg2009z00_3246, BgL_port1344z00_3245);
					}
					bgl_display_string(BGl_string2256z00zzsaw_jvm_ldz00,
						BgL_port1344z00_3245);
					bgl_display_obj(BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
							(14L)), BgL_port1344z00_3245);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1344z00_3245);
					bgl_display_obj(BGl_za2jvmzd2optionsza2zd2zzengine_paramz00,
						BgL_port1344z00_3245);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1344z00_3245);
					bgl_display_obj(BGl_z62generatezd2jvmzd2envz62zzsaw_jvm_ldz00(),
						BgL_port1344z00_3245);
					bgl_display_obj(BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00
						(BgL_mainzd2classzd2_3163, FILE_SEPARATOR,
							(char) (((unsigned char) '.'))), BgL_port1344z00_3245);
					bgl_display_string(BGl_string2257z00zzsaw_jvm_ldz00,
						BgL_port1344z00_3245);
					return bgl_display_char(((unsigned char) 10), BgL_port1344z00_3245);
		}}}

	}



/* &<@anonymous:1965> */
	obj_t BGl_z62zc3z04anonymousza31965ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3164)
	{
		{	/* SawJvm/jld.scm 399 */
			{	/* SawJvm/jld.scm 400 */
				obj_t BgL_targetz00_3165;

				BgL_targetz00_3165 =
					((obj_t) PROCEDURE_REF(BgL_envz00_3164, (int) (0L)));
				{	/* SawJvm/jld.scm 400 */
					obj_t BgL_port1332z00_3247;

					{	/* SawJvm/jld.scm 400 */
						obj_t BgL_tmpz00_4171;

						BgL_tmpz00_4171 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1332z00_3247 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4171);
					}
					bgl_display_string(BGl_string2249z00zzsaw_jvm_ldz00,
						BgL_port1332z00_3247);
					bgl_display_char(((unsigned char) 10), BgL_port1332z00_3247);
				}
				{	/* SawJvm/jld.scm 401 */
					obj_t BgL_arg1966z00_3248;

					{	/* SawJvm/jld.scm 401 */
						obj_t BgL_tmpz00_4176;

						BgL_tmpz00_4176 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1966z00_3248 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4176);
					}
					bgl_display_char(((unsigned char) 10), BgL_arg1966z00_3248);
				}
				{	/* SawJvm/jld.scm 402 */
					obj_t BgL_port1333z00_3249;

					{	/* SawJvm/jld.scm 402 */
						obj_t BgL_tmpz00_4180;

						BgL_tmpz00_4180 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1333z00_3249 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4180);
					}
					bgl_display_string(BGl_string2258z00zzsaw_jvm_ldz00,
						BgL_port1333z00_3249);
					{	/* SawJvm/jld.scm 404 */
						obj_t BgL_arg1967z00_3250;

						{	/* SawJvm/jld.scm 404 */
							obj_t BgL_arg1968z00_3251;

							{	/* SawJvm/jld.scm 404 */
								obj_t BgL_arg1969z00_3252;

								BgL_arg1969z00_3252 =
									MAKE_YOUNG_PAIR(BGl_string2252z00zzsaw_jvm_ldz00, BNIL);
								BgL_arg1968z00_3251 =
									MAKE_YOUNG_PAIR(BGl_za2jvmzd2classpathza2zd2zzengine_paramz00,
									BgL_arg1969z00_3252);
							}
							BgL_arg1967z00_3250 =
								BGl_listzd2ze3shzd2pathzd2stringz31zzsaw_jvm_ldz00
								(BgL_arg1968z00_3251);
						}
						bgl_display_obj(BgL_arg1967z00_3250, BgL_port1333z00_3249);
					}
					bgl_display_string(BGl_string2259z00zzsaw_jvm_ldz00,
						BgL_port1333z00_3249);
					bgl_display_char(((unsigned char) 10), BgL_port1333z00_3249);
				}
				{	/* SawJvm/jld.scm 406 */
					obj_t BgL_port1334z00_3253;

					{	/* SawJvm/jld.scm 406 */
						obj_t BgL_tmpz00_4190;

						BgL_tmpz00_4190 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1334z00_3253 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4190);
					}
					bgl_display_string(BGl_string2254z00zzsaw_jvm_ldz00,
						BgL_port1334z00_3253);
					bgl_display_char(((unsigned char) 10), BgL_port1334z00_3253);
				}
				{	/* SawJvm/jld.scm 407 */
					obj_t BgL_arg1970z00_3254;

					{	/* SawJvm/jld.scm 407 */
						obj_t BgL_tmpz00_4195;

						BgL_tmpz00_4195 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_arg1970z00_3254 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4195);
					}
					bgl_display_char(((unsigned char) 10), BgL_arg1970z00_3254);
				}
				{	/* SawJvm/jld.scm 408 */
					obj_t BgL_port1335z00_3255;

					{	/* SawJvm/jld.scm 408 */
						obj_t BgL_tmpz00_4199;

						BgL_tmpz00_4199 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1335z00_3255 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4199);
					}
					bgl_display_string(BGl_string2255z00zzsaw_jvm_ldz00,
						BgL_port1335z00_3255);
					bgl_display_obj(BGl_za2jvmzd2javaza2zd2zzengine_paramz00,
						BgL_port1335z00_3255);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1335z00_3255);
					{	/* SawJvm/jld.scm 409 */
						obj_t BgL_arg1971z00_3256;

						if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
							{	/* SawJvm/jld.scm 409 */
								BgL_arg1971z00_3256 = BGl_string2223z00zzsaw_jvm_ldz00;
							}
						else
							{	/* SawJvm/jld.scm 409 */
								BgL_arg1971z00_3256 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(13L));
							}
						bgl_display_obj(BgL_arg1971z00_3256, BgL_port1335z00_3255);
					}
					bgl_display_string(BGl_string2256z00zzsaw_jvm_ldz00,
						BgL_port1335z00_3255);
					bgl_display_obj(BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
							(14L)), BgL_port1335z00_3255);
					bgl_display_string(BGl_string2260z00zzsaw_jvm_ldz00,
						BgL_port1335z00_3255);
					bgl_display_obj(BGl_za2jvmzd2optionsza2zd2zzengine_paramz00,
						BgL_port1335z00_3255);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1335z00_3255);
					bgl_display_obj(BGl_z62generatezd2jvmzd2envz62zzsaw_jvm_ldz00(),
						BgL_port1335z00_3255);
					{	/* SawJvm/jld.scm 414 */
						obj_t BgL_arg1974z00_3257;

						{	/* SawJvm/jld.scm 414 */
							bool_t BgL_test2462z00_4219;

							{	/* SawJvm/jld.scm 414 */
								obj_t BgL_arg1981z00_3258;

								BgL_arg1981z00_3258 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(15L));
								{	/* SawJvm/jld.scm 414 */
									long BgL_l1z00_3259;

									BgL_l1z00_3259 = STRING_LENGTH(((obj_t) BgL_arg1981z00_3258));
									if ((BgL_l1z00_3259 == 0L))
										{	/* SawJvm/jld.scm 414 */
											int BgL_arg1303z00_3260;

											{	/* SawJvm/jld.scm 414 */
												char *BgL_auxz00_4229;
												char *BgL_tmpz00_4226;

												BgL_auxz00_4229 =
													BSTRING_TO_STRING(BGl_string2223z00zzsaw_jvm_ldz00);
												BgL_tmpz00_4226 =
													BSTRING_TO_STRING(((obj_t) BgL_arg1981z00_3258));
												BgL_arg1303z00_3260 =
													memcmp(BgL_tmpz00_4226, BgL_auxz00_4229,
													BgL_l1z00_3259);
											}
											BgL_test2462z00_4219 =
												((long) (BgL_arg1303z00_3260) == 0L);
										}
									else
										{	/* SawJvm/jld.scm 414 */
											BgL_test2462z00_4219 = ((bool_t) 0);
										}
								}
							}
							if (BgL_test2462z00_4219)
								{	/* SawJvm/jld.scm 414 */
									BgL_arg1974z00_3257 =
										BGl_prefixz00zz__osz00(BgL_targetz00_3165);
								}
							else
								{	/* SawJvm/jld.scm 414 */
									BgL_arg1974z00_3257 =
										BGl_makezd2filezd2namez00zz__osz00(string_append_3
										(BGl_string2261z00zzsaw_jvm_ldz00,
											BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
												(15L)), BGl_string2262z00zzsaw_jvm_ldz00),
										BGl_prefixz00zz__osz00(BGl_basenamez00zz__osz00
											(BgL_targetz00_3165)));
								}
						}
						bgl_display_obj(BgL_arg1974z00_3257, BgL_port1335z00_3255);
					}
					bgl_display_string(BGl_string2263z00zzsaw_jvm_ldz00,
						BgL_port1335z00_3255);
					return bgl_display_char(((unsigned char) 10), BgL_port1335z00_3255);
		}}}

	}



/* generate-jvm-msdos-script */
	bool_t BGl_generatezd2jvmzd2msdoszd2scriptzd2zzsaw_jvm_ldz00(obj_t
		BgL_targetz00_29, obj_t BgL_mainzd2classzd2_30, obj_t BgL_jarnamez00_31,
		obj_t BgL_za7ipsza7_32)
	{
		{	/* SawJvm/jld.scm 458 */
			{

				if (CBOOL(BGl_za2jvmzd2jarzf3za2z21zzengine_paramz00))
					{	/* SawJvm/jld.scm 523 */
						{	/* SawJvm/jld.scm 470 */
							obj_t BgL_zc3z04anonymousza32037ze3z87_3168;

							BgL_zc3z04anonymousza32037ze3z87_3168 =
								MAKE_FX_PROCEDURE
								(BGl_z62zc3z04anonymousza32037ze3ze5zzsaw_jvm_ldz00, (int) (0L),
								(int) (3L));
							PROCEDURE_SET(BgL_zc3z04anonymousza32037ze3z87_3168, (int) (0L),
								BgL_jarnamez00_31);
							PROCEDURE_SET(BgL_zc3z04anonymousza32037ze3z87_3168, (int) (1L),
								BgL_za7ipsza7_32);
							PROCEDURE_SET(BgL_zc3z04anonymousza32037ze3z87_3168, (int) (2L),
								BgL_mainzd2classzd2_30);
							BGl_withzd2outputzd2tozd2filezd2zz__r4_ports_6_10_1z00
								(BgL_targetz00_29, BgL_zc3z04anonymousza32037ze3z87_3168);
						}
						{	/* SawJvm/jld.scm 495 */
							obj_t BgL_list2068z00_2336;

							{	/* SawJvm/jld.scm 495 */
								obj_t BgL_arg2069z00_2337;

								{	/* SawJvm/jld.scm 495 */
									obj_t BgL_arg2070z00_2338;

									BgL_arg2070z00_2338 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(10L), BNIL);
									BgL_arg2069z00_2337 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(11L), BgL_arg2070z00_2338);
								}
								BgL_list2068z00_2336 =
									MAKE_YOUNG_PAIR(CNST_TABLE_REF(12L), BgL_arg2069z00_2337);
							}
							return
								BGl_chmodz00zz__osz00(BgL_targetz00_29, BgL_list2068z00_2336);
						}
					}
				else
					{	/* SawJvm/jld.scm 523 */
						{	/* SawJvm/jld.scm 499 */
							obj_t BgL_zc3z04anonymousza32073ze3z87_3167;

							BgL_zc3z04anonymousza32073ze3z87_3167 =
								MAKE_FX_PROCEDURE
								(BGl_z62zc3z04anonymousza32073ze3ze5zzsaw_jvm_ldz00, (int) (0L),
								(int) (2L));
							PROCEDURE_SET(BgL_zc3z04anonymousza32073ze3z87_3167, (int) (0L),
								BgL_za7ipsza7_32);
							PROCEDURE_SET(BgL_zc3z04anonymousza32073ze3z87_3167, (int) (1L),
								BgL_mainzd2classzd2_30);
							BGl_withzd2outputzd2tozd2filezd2zz__r4_ports_6_10_1z00
								(BgL_targetz00_29, BgL_zc3z04anonymousza32073ze3z87_3167);
						}
						{	/* SawJvm/jld.scm 522 */
							obj_t BgL_list2098z00_2373;

							{	/* SawJvm/jld.scm 522 */
								obj_t BgL_arg2099z00_2374;

								{	/* SawJvm/jld.scm 522 */
									obj_t BgL_arg2100z00_2375;

									BgL_arg2100z00_2375 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(10L), BNIL);
									BgL_arg2099z00_2374 =
										MAKE_YOUNG_PAIR(CNST_TABLE_REF(11L), BgL_arg2100z00_2375);
								}
								BgL_list2098z00_2373 =
									MAKE_YOUNG_PAIR(CNST_TABLE_REF(12L), BgL_arg2099z00_2374);
							}
							return
								BGl_chmodz00zz__osz00(BgL_targetz00_29, BgL_list2098z00_2373);
						}
					}
			}
		}

	}



/* &generate-jvm-env2200 */
	obj_t BGl_z62generatezd2jvmzd2env2200z62zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 466 */
			{
				obj_t BgL_envz00_2282;
				obj_t BgL_resz00_2283;

				BgL_envz00_2282 = BGl_za2jvmzd2envza2zd2zzengine_paramz00;
				BgL_resz00_2283 = BGl_string2223z00zzsaw_jvm_ldz00;
			BgL_zc3z04anonymousza32018ze3z87_2284:
				if (NULLP(BgL_envz00_2282))
					{	/* SawJvm/jld.scm 462 */
						return BgL_resz00_2283;
					}
				else
					{	/* SawJvm/jld.scm 464 */
						obj_t BgL_arg2020z00_2286;
						obj_t BgL_arg2021z00_2287;

						BgL_arg2020z00_2286 = CDR(((obj_t) BgL_envz00_2282));
						{	/* SawJvm/jld.scm 465 */
							obj_t BgL_arg2023z00_2288;
							obj_t BgL_arg2024z00_2289;

							BgL_arg2023z00_2288 = CAR(((obj_t) BgL_envz00_2282));
							BgL_arg2024z00_2289 = CAR(((obj_t) BgL_envz00_2282));
							{	/* SawJvm/jld.scm 465 */
								obj_t BgL_list2025z00_2290;

								{	/* SawJvm/jld.scm 465 */
									obj_t BgL_arg2028z00_2291;

									{	/* SawJvm/jld.scm 465 */
										obj_t BgL_arg2029z00_2292;

										{	/* SawJvm/jld.scm 465 */
											obj_t BgL_arg2031z00_2293;

											{	/* SawJvm/jld.scm 465 */
												obj_t BgL_arg2032z00_2294;

												{	/* SawJvm/jld.scm 465 */
													obj_t BgL_arg2033z00_2295;

													BgL_arg2033z00_2295 =
														MAKE_YOUNG_PAIR(BgL_resz00_2283, BNIL);
													BgL_arg2032z00_2294 =
														MAKE_YOUNG_PAIR(BGl_string2225z00zzsaw_jvm_ldz00,
														BgL_arg2033z00_2295);
												}
												BgL_arg2031z00_2293 =
													MAKE_YOUNG_PAIR(BgL_arg2024z00_2289,
													BgL_arg2032z00_2294);
											}
											BgL_arg2029z00_2292 =
												MAKE_YOUNG_PAIR(BGl_string2247z00zzsaw_jvm_ldz00,
												BgL_arg2031z00_2293);
										}
										BgL_arg2028z00_2291 =
											MAKE_YOUNG_PAIR(BgL_arg2023z00_2288, BgL_arg2029z00_2292);
									}
									BgL_list2025z00_2290 =
										MAKE_YOUNG_PAIR(BGl_string2248z00zzsaw_jvm_ldz00,
										BgL_arg2028z00_2291);
								}
								BgL_arg2021z00_2287 =
									BGl_stringzd2appendzd2zz__r4_strings_6_7z00
									(BgL_list2025z00_2290);
							}
						}
						{
							obj_t BgL_resz00_4294;
							obj_t BgL_envz00_4293;

							BgL_envz00_4293 = BgL_arg2020z00_2286;
							BgL_resz00_4294 = BgL_arg2021z00_2287;
							BgL_resz00_2283 = BgL_resz00_4294;
							BgL_envz00_2282 = BgL_envz00_4293;
							goto BgL_zc3z04anonymousza32018ze3z87_2284;
						}
					}
			}
		}

	}



/* &<@anonymous:2073> */
	obj_t BGl_z62zc3z04anonymousza32073ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3169)
	{
		{	/* SawJvm/jld.scm 498 */
			{	/* SawJvm/jld.scm 499 */
				obj_t BgL_za7ipsza7_3170;
				obj_t BgL_mainzd2classzd2_3171;

				BgL_za7ipsza7_3170 = PROCEDURE_REF(BgL_envz00_3169, (int) (0L));
				BgL_mainzd2classzd2_3171 = PROCEDURE_REF(BgL_envz00_3169, (int) (1L));
				{	/* SawJvm/jld.scm 499 */
					obj_t BgL_port1356z00_3261;

					{	/* SawJvm/jld.scm 499 */
						obj_t BgL_tmpz00_4299;

						BgL_tmpz00_4299 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1356z00_3261 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4299);
					}
					bgl_display_string(BGl_string2264z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					bgl_display_obj(BGl_za2jvmzd2javaza2zd2zzengine_paramz00,
						BgL_port1356z00_3261);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					bgl_display_obj(BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
							(14L)), BgL_port1356z00_3261);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					{	/* SawJvm/jld.scm 501 */
						obj_t BgL_arg2076z00_3262;

						if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
							{	/* SawJvm/jld.scm 501 */
								BgL_arg2076z00_3262 = BGl_string2223z00zzsaw_jvm_ldz00;
							}
						else
							{	/* SawJvm/jld.scm 501 */
								BgL_arg2076z00_3262 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(13L));
							}
						bgl_display_obj(BgL_arg2076z00_3262, BgL_port1356z00_3261);
					}
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					bgl_display_obj(BGl_za2jvmzd2optionsza2zd2zzengine_paramz00,
						BgL_port1356z00_3261);
					bgl_display_string(BGl_string2265z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					{	/* SawJvm/jld.scm 509 */
						obj_t BgL_arg2077z00_3263;

						{	/* SawJvm/jld.scm 509 */
							obj_t BgL_arg2078z00_3264;

							{	/* SawJvm/jld.scm 509 */
								obj_t BgL_arg2079z00_3265;

								{	/* SawJvm/jld.scm 509 */
									obj_t BgL_arg2080z00_3266;

									{	/* SawJvm/jld.scm 509 */
										obj_t BgL_arg2081z00_3267;
										obj_t BgL_arg2082z00_3268;

										{	/* SawJvm/jld.scm 509 */
											obj_t BgL_arg2083z00_3269;
											obj_t BgL_arg2085z00_3270;

											BgL_arg2083z00_3269 =
												BGl_stringzd2replacezd2zz__r4_strings_6_7z00
												(BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00(),
												(char) (((unsigned char) '/')),
												(char) (((unsigned char) '\\')));
											if (CBOOL(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
												{	/* SawJvm/jld.scm 511 */
													BgL_arg2085z00_3270 =
														BGl_string2266z00zzsaw_jvm_ldz00;
												}
											else
												{	/* SawJvm/jld.scm 511 */
													BgL_arg2085z00_3270 =
														BGl_string2267z00zzsaw_jvm_ldz00;
												}
											BgL_arg2081z00_3267 =
												string_append(BgL_arg2083z00_3269, BgL_arg2085z00_3270);
										}
										{	/* SawJvm/jld.scm 514 */
											obj_t BgL_arg2087z00_3271;

											if (NULLP(BgL_za7ipsza7_3170))
												{	/* SawJvm/jld.scm 514 */
													BgL_arg2087z00_3271 = BNIL;
												}
											else
												{	/* SawJvm/jld.scm 514 */
													obj_t BgL_head1353z00_3272;

													BgL_head1353z00_3272 = MAKE_YOUNG_PAIR(BNIL, BNIL);
													{
														obj_t BgL_l1351z00_3274;
														obj_t BgL_tail1354z00_3275;

														BgL_l1351z00_3274 = BgL_za7ipsza7_3170;
														BgL_tail1354z00_3275 = BgL_head1353z00_3272;
													BgL_zc3z04anonymousza32089ze3z87_3273:
														if (NULLP(BgL_l1351z00_3274))
															{	/* SawJvm/jld.scm 514 */
																BgL_arg2087z00_3271 = CDR(BgL_head1353z00_3272);
															}
														else
															{	/* SawJvm/jld.scm 514 */
																obj_t BgL_newtail1355z00_3276;

																{	/* SawJvm/jld.scm 514 */
																	obj_t BgL_arg2093z00_3277;

																	{	/* SawJvm/jld.scm 514 */
																		obj_t BgL_xz00_3278;

																		BgL_xz00_3278 =
																			CAR(((obj_t) BgL_l1351z00_3274));
																		BgL_arg2093z00_3277 =
																			BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00
																			(BGl_userzd2libraryzd2zzsaw_jvm_ldz00
																			(BgL_xz00_3278),
																			(char) (((unsigned char) '/')),
																			(char) (((unsigned char) '\\')));
																	}
																	BgL_newtail1355z00_3276 =
																		MAKE_YOUNG_PAIR(BgL_arg2093z00_3277, BNIL);
																}
																SET_CDR(BgL_tail1354z00_3275,
																	BgL_newtail1355z00_3276);
																{	/* SawJvm/jld.scm 514 */
																	obj_t BgL_arg2091z00_3279;

																	BgL_arg2091z00_3279 =
																		CDR(((obj_t) BgL_l1351z00_3274));
																	{
																		obj_t BgL_tail1354z00_4341;
																		obj_t BgL_l1351z00_4340;

																		BgL_l1351z00_4340 = BgL_arg2091z00_3279;
																		BgL_tail1354z00_4341 =
																			BgL_newtail1355z00_3276;
																		BgL_tail1354z00_3275 = BgL_tail1354z00_4341;
																		BgL_l1351z00_3274 = BgL_l1351z00_4340;
																		goto BgL_zc3z04anonymousza32089ze3z87_3273;
																	}
																}
															}
													}
												}
											BgL_arg2082z00_3268 =
												BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00
												(BgL_arg2087z00_3271, BNIL);
										}
										BgL_arg2080z00_3266 =
											MAKE_YOUNG_PAIR(BgL_arg2081z00_3267, BgL_arg2082z00_3268);
									}
									BgL_arg2079z00_3265 =
										MAKE_YOUNG_PAIR(BGl_string2268z00zzsaw_jvm_ldz00,
										BgL_arg2080z00_3266);
								}
								BgL_arg2078z00_3264 =
									MAKE_YOUNG_PAIR(BGl_za2jvmzd2classpathza2zd2zzengine_paramz00,
									BgL_arg2079z00_3265);
							}
							BgL_arg2077z00_3263 =
								BGl_listzd2ze3msdoszd2pathzd2stringz31zzsaw_jvm_ldz00
								(BgL_arg2078z00_3264);
						}
						bgl_display_obj(BgL_arg2077z00_3263, BgL_port1356z00_3261);
					}
					bgl_display_string(BGl_string2269z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					bgl_display_obj(BGl_z62generatezd2jvmzd2env2200z62zzsaw_jvm_ldz00(),
						BgL_port1356z00_3261);
					bgl_display_string(BGl_string2270z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					bgl_display_obj(BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00
						(BgL_mainzd2classzd2_3171, FILE_SEPARATOR,
							(char) (((unsigned char) '.'))), BgL_port1356z00_3261);
					bgl_display_string(BGl_string2271z00zzsaw_jvm_ldz00,
						BgL_port1356z00_3261);
					return bgl_display_char(((unsigned char) 10), BgL_port1356z00_3261);
		}}}

	}



/* &<@anonymous:2037> */
	obj_t BGl_z62zc3z04anonymousza32037ze3ze5zzsaw_jvm_ldz00(obj_t
		BgL_envz00_3172)
	{
		{	/* SawJvm/jld.scm 469 */
			{	/* SawJvm/jld.scm 470 */
				obj_t BgL_jarnamez00_3173;
				obj_t BgL_za7ipsza7_3174;
				obj_t BgL_mainzd2classzd2_3175;

				BgL_jarnamez00_3173 =
					((obj_t) PROCEDURE_REF(BgL_envz00_3172, (int) (0L)));
				BgL_za7ipsza7_3174 = PROCEDURE_REF(BgL_envz00_3172, (int) (1L));
				BgL_mainzd2classzd2_3175 = PROCEDURE_REF(BgL_envz00_3172, (int) (2L));
				{	/* SawJvm/jld.scm 470 */
					obj_t BgL_port1350z00_3280;

					{	/* SawJvm/jld.scm 470 */
						obj_t BgL_tmpz00_4364;

						BgL_tmpz00_4364 = BGL_CURRENT_DYNAMIC_ENV();
						BgL_port1350z00_3280 = BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_4364);
					}
					bgl_display_string(BGl_string2264z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					bgl_display_obj(BGl_za2jvmzd2javaza2zd2zzengine_paramz00,
						BgL_port1350z00_3280);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					bgl_display_obj(BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF
							(14L)), BgL_port1350z00_3280);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					{	/* SawJvm/jld.scm 472 */
						obj_t BgL_arg2039z00_3281;

						if (CBOOL(BGl_za2purifyza2z00zzengine_paramz00))
							{	/* SawJvm/jld.scm 472 */
								BgL_arg2039z00_3281 = BGl_string2223z00zzsaw_jvm_ldz00;
							}
						else
							{	/* SawJvm/jld.scm 472 */
								BgL_arg2039z00_3281 =
									BGl_bigloozd2configzd2zz__configurez00(CNST_TABLE_REF(13L));
							}
						bgl_display_obj(BgL_arg2039z00_3281, BgL_port1350z00_3280);
					}
					bgl_display_string(BGl_string2265z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					{	/* SawJvm/jld.scm 477 */
						obj_t BgL_arg2040z00_3282;

						{	/* SawJvm/jld.scm 477 */
							obj_t BgL_arg2041z00_3283;

							{	/* SawJvm/jld.scm 477 */
								obj_t BgL_arg2042z00_3284;

								{	/* SawJvm/jld.scm 477 */
									obj_t BgL_arg2043z00_3285;

									{	/* SawJvm/jld.scm 477 */
										obj_t BgL_arg2044z00_3286;
										obj_t BgL_arg2046z00_3287;

										{	/* SawJvm/jld.scm 477 */
											obj_t BgL_arg2047z00_3288;
											obj_t BgL_arg2048z00_3289;

											{	/* SawJvm/jld.scm 477 */
												obj_t BgL_arg2049z00_3290;

												BgL_arg2049z00_3290 =
													BGl_dirnamez00zz__osz00(BgL_jarnamez00_3173);
												if (STRINGP
													(BGl_za2jvmzd2jarpathza2zd2zzengine_paramz00))
													{	/* SawJvm/jld.scm 297 */
														BgL_arg2047z00_3288 =
															BGl_za2jvmzd2jarpathza2zd2zzengine_paramz00;
													}
												else
													{	/* SawJvm/jld.scm 297 */
														BgL_arg2047z00_3288 = BgL_arg2049z00_3290;
													}
											}
											BgL_arg2048z00_3289 =
												BGl_basenamez00zz__osz00(BgL_jarnamez00_3173);
											BgL_arg2044z00_3286 =
												string_append_3(BgL_arg2047z00_3288,
												BGl_string2272z00zzsaw_jvm_ldz00, BgL_arg2048z00_3289);
										}
										{	/* SawJvm/jld.scm 481 */
											obj_t BgL_arg2050z00_3291;
											obj_t BgL_arg2051z00_3292;

											{	/* SawJvm/jld.scm 481 */
												obj_t BgL_arg2053z00_3293;
												obj_t BgL_arg2054z00_3294;

												BgL_arg2053z00_3293 =
													BGl_stringzd2replacezd2zz__r4_strings_6_7z00
													(BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00(),
													(char) (((unsigned char) '/')),
													(char) (((unsigned char) '\\')));
												if (CBOOL
													(BGl_za2unsafezd2libraryza2zd2zzengine_paramz00))
													{	/* SawJvm/jld.scm 483 */
														BgL_arg2054z00_3294 =
															BGl_string2266z00zzsaw_jvm_ldz00;
													}
												else
													{	/* SawJvm/jld.scm 483 */
														BgL_arg2054z00_3294 =
															BGl_string2267z00zzsaw_jvm_ldz00;
													}
												BgL_arg2050z00_3291 =
													string_append(BgL_arg2053z00_3293,
													BgL_arg2054z00_3294);
											}
											{	/* SawJvm/jld.scm 486 */
												obj_t BgL_arg2056z00_3295;

												if (NULLP(BgL_za7ipsza7_3174))
													{	/* SawJvm/jld.scm 486 */
														BgL_arg2056z00_3295 = BNIL;
													}
												else
													{	/* SawJvm/jld.scm 486 */
														obj_t BgL_head1347z00_3296;

														BgL_head1347z00_3296 = MAKE_YOUNG_PAIR(BNIL, BNIL);
														{
															obj_t BgL_l1345z00_3298;
															obj_t BgL_tail1348z00_3299;

															BgL_l1345z00_3298 = BgL_za7ipsza7_3174;
															BgL_tail1348z00_3299 = BgL_head1347z00_3296;
														BgL_zc3z04anonymousza32058ze3z87_3297:
															if (NULLP(BgL_l1345z00_3298))
																{	/* SawJvm/jld.scm 486 */
																	BgL_arg2056z00_3295 =
																		CDR(BgL_head1347z00_3296);
																}
															else
																{	/* SawJvm/jld.scm 486 */
																	obj_t BgL_newtail1349z00_3300;

																	{	/* SawJvm/jld.scm 486 */
																		obj_t BgL_arg2061z00_3301;

																		{	/* SawJvm/jld.scm 486 */
																			obj_t BgL_xz00_3302;

																			BgL_xz00_3302 =
																				CAR(((obj_t) BgL_l1345z00_3298));
																			BgL_arg2061z00_3301 =
																				BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00
																				(BGl_userzd2libraryzd2zzsaw_jvm_ldz00
																				(BgL_xz00_3302),
																				(char) (((unsigned char) '/')),
																				(char) (((unsigned char) '\\')));
																		}
																		BgL_newtail1349z00_3300 =
																			MAKE_YOUNG_PAIR(BgL_arg2061z00_3301,
																			BNIL);
																	}
																	SET_CDR(BgL_tail1348z00_3299,
																		BgL_newtail1349z00_3300);
																	{	/* SawJvm/jld.scm 486 */
																		obj_t BgL_arg2060z00_3303;

																		BgL_arg2060z00_3303 =
																			CDR(((obj_t) BgL_l1345z00_3298));
																		{
																			obj_t BgL_tail1348z00_4409;
																			obj_t BgL_l1345z00_4408;

																			BgL_l1345z00_4408 = BgL_arg2060z00_3303;
																			BgL_tail1348z00_4409 =
																				BgL_newtail1349z00_3300;
																			BgL_tail1348z00_3299 =
																				BgL_tail1348z00_4409;
																			BgL_l1345z00_3298 = BgL_l1345z00_4408;
																			goto
																				BgL_zc3z04anonymousza32058ze3z87_3297;
																		}
																	}
																}
														}
													}
												BgL_arg2051z00_3292 =
													BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00
													(BgL_arg2056z00_3295, BNIL);
											}
											BgL_arg2046z00_3287 =
												MAKE_YOUNG_PAIR(BgL_arg2050z00_3291,
												BgL_arg2051z00_3292);
										}
										BgL_arg2043z00_3285 =
											MAKE_YOUNG_PAIR(BgL_arg2044z00_3286, BgL_arg2046z00_3287);
									}
									BgL_arg2042z00_3284 =
										MAKE_YOUNG_PAIR(BGl_string2268z00zzsaw_jvm_ldz00,
										BgL_arg2043z00_3285);
								}
								BgL_arg2041z00_3283 =
									MAKE_YOUNG_PAIR(BGl_za2jvmzd2classpathza2zd2zzengine_paramz00,
									BgL_arg2042z00_3284);
							}
							BgL_arg2040z00_3282 =
								BGl_listzd2ze3msdoszd2pathzd2stringz31zzsaw_jvm_ldz00
								(BgL_arg2041z00_3283);
						}
						bgl_display_obj(BgL_arg2040z00_3282, BgL_port1350z00_3280);
					}
					bgl_display_string(BGl_string2269z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					bgl_display_obj(BGl_za2jvmzd2optionsza2zd2zzengine_paramz00,
						BgL_port1350z00_3280);
					bgl_display_string(BGl_string2225z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					bgl_display_obj(BGl_z62generatezd2jvmzd2env2200z62zzsaw_jvm_ldz00(),
						BgL_port1350z00_3280);
					bgl_display_string(BGl_string2270z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					bgl_display_obj(BGl_stringzd2replacez12zc0zz__r4_strings_6_7z00
						(BgL_mainzd2classzd2_3175, FILE_SEPARATOR,
							(char) (((unsigned char) '.'))), BgL_port1350z00_3280);
					bgl_display_string(BGl_string2271z00zzsaw_jvm_ldz00,
						BgL_port1350z00_3280);
					return bgl_display_char(((unsigned char) 10), BgL_port1350z00_3280);
		}}}

	}



/* generate-jvm-script */
	bool_t BGl_generatezd2jvmzd2scriptz00zzsaw_jvm_ldz00(obj_t BgL_targetz00_33,
		obj_t BgL_mainzd2classzd2_34, obj_t BgL_jarnamez00_35,
		obj_t BgL_za7ipsza7_36)
	{
		{	/* SawJvm/jld.scm 530 */
			{	/* SawJvm/jld.scm 531 */
				obj_t BgL_list2101z00_2379;

				{	/* SawJvm/jld.scm 531 */
					obj_t BgL_arg2102z00_2380;

					BgL_arg2102z00_2380 =
						MAKE_YOUNG_PAIR(BGl_za2jvmzd2shellza2zd2zzengine_paramz00, BNIL);
					BgL_list2101z00_2379 =
						MAKE_YOUNG_PAIR(BGl_string2273z00zzsaw_jvm_ldz00,
						BgL_arg2102z00_2380);
				}
				BGl_verbosez00zztools_speekz00(BINT(1L), BgL_list2101z00_2379);
			}
			{	/* SawJvm/jld.scm 532 */
				obj_t BgL_list2103z00_2381;

				{	/* SawJvm/jld.scm 532 */
					obj_t BgL_arg2104z00_2382;

					{	/* SawJvm/jld.scm 532 */
						obj_t BgL_arg2105z00_2383;

						BgL_arg2105z00_2383 =
							MAKE_YOUNG_PAIR(BGl_string2203z00zzsaw_jvm_ldz00, BNIL);
						BgL_arg2104z00_2382 =
							MAKE_YOUNG_PAIR(BgL_targetz00_33, BgL_arg2105z00_2383);
					}
					BgL_list2103z00_2381 =
						MAKE_YOUNG_PAIR(BGl_string2204z00zzsaw_jvm_ldz00,
						BgL_arg2104z00_2382);
				}
				BGl_verbosez00zztools_speekz00(BINT(2L), BgL_list2103z00_2381);
			}
			{	/* SawJvm/jld.scm 533 */
				obj_t BgL_list2106z00_2384;

				BgL_list2106z00_2384 =
					MAKE_YOUNG_PAIR(BCHAR(((unsigned char) 10)), BNIL);
				BGl_verbosez00zztools_speekz00(BINT(1L), BgL_list2106z00_2384);
			}
			{	/* SawJvm/jld.scm 535 */
				bool_t BgL_test2475z00_4441;

				{	/* SawJvm/jld.scm 535 */
					obj_t BgL_string1z00_3068;

					BgL_string1z00_3068 = BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
					{	/* SawJvm/jld.scm 535 */
						long BgL_l1z00_3070;

						BgL_l1z00_3070 = STRING_LENGTH(BgL_string1z00_3068);
						if ((BgL_l1z00_3070 == 2L))
							{	/* SawJvm/jld.scm 535 */
								int BgL_arg1303z00_3073;

								{	/* SawJvm/jld.scm 535 */
									char *BgL_auxz00_4447;
									char *BgL_tmpz00_4445;

									BgL_auxz00_4447 =
										BSTRING_TO_STRING(BGl_string2232z00zzsaw_jvm_ldz00);
									BgL_tmpz00_4445 = BSTRING_TO_STRING(BgL_string1z00_3068);
									BgL_arg1303z00_3073 =
										memcmp(BgL_tmpz00_4445, BgL_auxz00_4447, BgL_l1z00_3070);
								}
								BgL_test2475z00_4441 = ((long) (BgL_arg1303z00_3073) == 0L);
							}
						else
							{	/* SawJvm/jld.scm 535 */
								BgL_test2475z00_4441 = ((bool_t) 0);
							}
					}
				}
				if (BgL_test2475z00_4441)
					{	/* SawJvm/jld.scm 535 */
						return
							BGl_generatezd2jvmzd2shzd2scriptzd2zzsaw_jvm_ldz00
							(BgL_targetz00_33, BgL_mainzd2classzd2_34, BgL_za7ipsza7_36);
					}
				else
					{	/* SawJvm/jld.scm 537 */
						bool_t BgL_test2477z00_4453;

						{	/* SawJvm/jld.scm 537 */
							obj_t BgL_string1z00_3079;

							BgL_string1z00_3079 = BGl_za2jvmzd2shellza2zd2zzengine_paramz00;
							{	/* SawJvm/jld.scm 537 */
								long BgL_l1z00_3081;

								BgL_l1z00_3081 = STRING_LENGTH(BgL_string1z00_3079);
								if ((BgL_l1z00_3081 == 5L))
									{	/* SawJvm/jld.scm 537 */
										int BgL_arg1303z00_3084;

										{	/* SawJvm/jld.scm 537 */
											char *BgL_auxz00_4459;
											char *BgL_tmpz00_4457;

											BgL_auxz00_4459 =
												BSTRING_TO_STRING(BGl_string2209z00zzsaw_jvm_ldz00);
											BgL_tmpz00_4457 = BSTRING_TO_STRING(BgL_string1z00_3079);
											BgL_arg1303z00_3084 =
												memcmp(BgL_tmpz00_4457, BgL_auxz00_4459,
												BgL_l1z00_3081);
										}
										BgL_test2477z00_4453 = ((long) (BgL_arg1303z00_3084) == 0L);
									}
								else
									{	/* SawJvm/jld.scm 537 */
										BgL_test2477z00_4453 = ((bool_t) 0);
									}
							}
						}
						if (BgL_test2477z00_4453)
							{	/* SawJvm/jld.scm 537 */
								BGL_TAIL return
									BGl_generatezd2jvmzd2msdoszd2scriptzd2zzsaw_jvm_ldz00
									(BgL_targetz00_33, BgL_mainzd2classzd2_34, BgL_jarnamez00_35,
									BgL_za7ipsza7_36);
							}
						else
							{	/* SawJvm/jld.scm 537 */
								{	/* SawJvm/jld.scm 540 */
									obj_t BgL_list2109z00_2387;

									{	/* SawJvm/jld.scm 540 */
										obj_t BgL_arg2110z00_2388;

										{	/* SawJvm/jld.scm 540 */
											obj_t BgL_arg2111z00_2389;

											{	/* SawJvm/jld.scm 540 */
												obj_t BgL_arg2112z00_2390;

												BgL_arg2112z00_2390 =
													MAKE_YOUNG_PAIR(BGl_string2233z00zzsaw_jvm_ldz00,
													BNIL);
												BgL_arg2111z00_2389 =
													MAKE_YOUNG_PAIR
													(BGl_za2jvmzd2shellza2zd2zzengine_paramz00,
													BgL_arg2112z00_2390);
											}
											BgL_arg2110z00_2388 =
												MAKE_YOUNG_PAIR(BGl_string2234z00zzsaw_jvm_ldz00,
												BgL_arg2111z00_2389);
										}
										BgL_list2109z00_2387 =
											MAKE_YOUNG_PAIR(BGl_string2274z00zzsaw_jvm_ldz00,
											BgL_arg2110z00_2388);
									}
									BGl_warningz00zz__errorz00(BgL_list2109z00_2387);
								}
								return
									BGl_generatezd2jvmzd2shzd2scriptzd2zzsaw_jvm_ldz00
									(BgL_targetz00_33, BgL_mainzd2classzd2_34, BgL_za7ipsza7_36);
							}
					}
			}
		}

	}



/* user-library */
	obj_t BGl_userzd2libraryzd2zzsaw_jvm_ldz00(obj_t BgL_libz00_37)
	{
		{	/* SawJvm/jld.scm 547 */
			{
				obj_t BgL_libz00_2394;

				{	/* SawJvm/jld.scm 558 */
					bool_t BgL_test2479z00_4471;

					BgL_libz00_2394 = BgL_libz00_37;
					{	/* SawJvm/jld.scm 549 */
						long BgL_lenz00_2396;

						BgL_lenz00_2396 = STRING_LENGTH(BgL_libz00_2394);
						{
							long BgL_iz00_2398;

							BgL_iz00_2398 = 0L;
						BgL_zc3z04anonymousza32116ze3z87_2399:
							if ((BgL_iz00_2398 == BgL_lenz00_2396))
								{	/* SawJvm/jld.scm 552 */
									BgL_test2479z00_4471 = ((bool_t) 0);
								}
							else
								{	/* SawJvm/jld.scm 552 */
									if (
										(STRING_REF(BgL_libz00_2394, BgL_iz00_2398) ==
											(unsigned char) (FILE_SEPARATOR)))
										{	/* SawJvm/jld.scm 554 */
											BgL_test2479z00_4471 = ((bool_t) 1);
										}
									else
										{
											long BgL_iz00_4479;

											BgL_iz00_4479 = (BgL_iz00_2398 + 1L);
											BgL_iz00_2398 = BgL_iz00_4479;
											goto BgL_zc3z04anonymousza32116ze3z87_2399;
										}
								}
						}
					}
					if (BgL_test2479z00_4471)
						{	/* SawJvm/jld.scm 558 */
							return BgL_libz00_37;
						}
					else
						{	/* SawJvm/jld.scm 558 */
							return
								BGl_makezd2filezd2namez00zz__osz00
								(BGl_jvmzd2bigloozd2classpathz00zzsaw_jvm_ldz00(),
								BgL_libz00_37);
						}
				}
			}
		}

	}



/* list->path-string */
	obj_t BGl_listzd2ze3pathzd2stringze3zzsaw_jvm_ldz00(obj_t BgL_pathz00_38,
		obj_t BgL_separatorz00_39)
	{
		{	/* SawJvm/jld.scm 565 */
			{	/* SawJvm/jld.scm 566 */
				obj_t BgL_rpathz00_2409;

				BgL_rpathz00_2409 = bgl_reverse(BgL_pathz00_38);
				{	/* SawJvm/jld.scm 567 */
					obj_t BgL_g1121z00_2410;
					obj_t BgL_g1122z00_2411;

					BgL_g1121z00_2410 = CDR(((obj_t) BgL_rpathz00_2409));
					BgL_g1122z00_2411 = CAR(((obj_t) BgL_rpathz00_2409));
					{
						obj_t BgL_pathz00_2413;
						obj_t BgL_resz00_2414;

						BgL_pathz00_2413 = BgL_g1121z00_2410;
						BgL_resz00_2414 = BgL_g1122z00_2411;
					BgL_zc3z04anonymousza32125ze3z87_2415:
						if (NULLP(BgL_pathz00_2413))
							{	/* SawJvm/jld.scm 569 */
								return BgL_resz00_2414;
							}
						else
							{	/* SawJvm/jld.scm 571 */
								obj_t BgL_arg2127z00_2417;
								obj_t BgL_arg2128z00_2418;

								BgL_arg2127z00_2417 = CDR(((obj_t) BgL_pathz00_2413));
								{	/* SawJvm/jld.scm 571 */
									obj_t BgL_arg2129z00_2419;

									BgL_arg2129z00_2419 = CAR(((obj_t) BgL_pathz00_2413));
									BgL_arg2128z00_2418 =
										string_append_3(BgL_arg2129z00_2419, BgL_separatorz00_39,
										BgL_resz00_2414);
								}
								{
									obj_t BgL_resz00_4496;
									obj_t BgL_pathz00_4495;

									BgL_pathz00_4495 = BgL_arg2127z00_2417;
									BgL_resz00_4496 = BgL_arg2128z00_2418;
									BgL_resz00_2414 = BgL_resz00_4496;
									BgL_pathz00_2413 = BgL_pathz00_4495;
									goto BgL_zc3z04anonymousza32125ze3z87_2415;
								}
							}
					}
				}
			}
		}

	}



/* list->sh-path-string */
	obj_t BGl_listzd2ze3shzd2pathzd2stringz31zzsaw_jvm_ldz00(obj_t BgL_pathz00_40)
	{
		{	/* SawJvm/jld.scm 576 */
			{	/* SawJvm/jld.scm 578 */
				obj_t BgL_arg2130z00_2421;

				if (STRINGP(BGl_za2jvmzd2pathzd2separatorza2z00zzengine_paramz00))
					{	/* SawJvm/jld.scm 578 */
						BgL_arg2130z00_2421 =
							BGl_za2jvmzd2pathzd2separatorza2z00zzengine_paramz00;
					}
				else
					{	/* SawJvm/jld.scm 578 */
						BgL_arg2130z00_2421 = BGl_string2275z00zzsaw_jvm_ldz00;
					}
				return
					BGl_listzd2ze3pathzd2stringze3zzsaw_jvm_ldz00(BgL_pathz00_40,
					BgL_arg2130z00_2421);
			}
		}

	}



/* list->msdos-path-string */
	obj_t BGl_listzd2ze3msdoszd2pathzd2stringz31zzsaw_jvm_ldz00(obj_t
		BgL_pathz00_41)
	{
		{	/* SawJvm/jld.scm 585 */
			{	/* SawJvm/jld.scm 587 */
				obj_t BgL_arg2132z00_2423;

				if (STRINGP(BGl_za2jvmzd2pathzd2separatorza2z00zzengine_paramz00))
					{	/* SawJvm/jld.scm 587 */
						BgL_arg2132z00_2423 =
							BGl_za2jvmzd2pathzd2separatorza2z00zzengine_paramz00;
					}
				else
					{	/* SawJvm/jld.scm 587 */
						BgL_arg2132z00_2423 = BGl_string2276z00zzsaw_jvm_ldz00;
					}
				return
					BGl_listzd2ze3pathzd2stringze3zzsaw_jvm_ldz00(BgL_pathz00_41,
					BgL_arg2132z00_2423);
			}
		}

	}



/* object-init */
	obj_t BGl_objectzd2initzd2zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 16 */
			return BUNSPEC;
		}

	}



/* generic-init */
	obj_t BGl_genericzd2initzd2zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 16 */
			return BUNSPEC;
		}

	}



/* method-init */
	obj_t BGl_methodzd2initzd2zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 16 */
			return BUNSPEC;
		}

	}



/* imported-modules-init */
	obj_t BGl_importedzd2moduleszd2initz00zzsaw_jvm_ldz00(void)
	{
		{	/* SawJvm/jld.scm 16 */
			BGl_modulezd2initializa7ationz75zzengine_paramz00(517137079L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzengine_configurez00(272817175L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzengine_linkz00(117219619L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zztools_speekz00(61247943L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zztools_errorz00(300504031L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zztools_miscz00(9470071L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzread_readerz00(95801752L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzmodule_modulez00(158397907L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzbackend_cplibz00(395792377L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzast_varz00(90839984L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzast_nodez00(469732712L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zztype_typez00(515343395L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzread_jvmz00(261574382L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzobject_classz00(502007119L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			BGl_modulezd2initializa7ationz75zzobject_slotsz00(151271251L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
			return
				BGl_modulezd2initializa7ationz75zzbackend_backendz00(216206620L,
				BSTRING_TO_STRING(BGl_string2277z00zzsaw_jvm_ldz00));
		}

	}

#ifdef __cplusplus
}
#endif
