/*===========================================================================*/
/*   (Llib/param.scm)                                                        */
/*   Bigloo (4.7a)                                                           */
/*   Inria -- Sophia Antipolis (c)       Thu Feb 19 09:11:58 AM CET 2026     */
/*===========================================================================*/
/* COMPILATION: (/home/serrano/prgm/project/bigloo/4.7a/bin/bigloo -srfi bigloo-unsafe -O3 -fcfa-arithmetic -q -lib-dir /home/serrano/prgm/project/bigloo/4.7a/lib/bigloo/4.7a +rm -mklib -cc gcc -fsharing -q -no-hello -unsafe -safee -O4 -stdc -c Llib/param.scm -indent -o objs/obj_u/Llib/param.c) */
/* GC selection */
#define THE_GC BOEHM_GC

/* unsafe mode */
#define BIGLOO_UNSAFE 1

/* traces mode */
#define BIGLOO_TRACE 0

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

#ifdef __cplusplus
extern "C"
{
#endif
#ifndef BGL_MODULE_TYPE_DEFINITIONS
#define BGL_MODULE_TYPE_DEFINITIONS
#ifndef BGL___PARAM_TYPE_DEFINITIONS
#define BGL___PARAM_TYPE_DEFINITIONS
#endif													// BGL___PARAM_TYPE_DEFINITIONS
#endif													// BGL_MODULE_TYPE_DEFINITIONS

	static obj_t
		BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutz62zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2loadzd2modulezd2setz12za2zz__paramz00(obj_t,
		obj_t);
	static obj_t BGl_z62bigloozd2profilezb0zz__paramz00(obj_t);
	extern bool_t BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00(obj_t);
	static obj_t BGl_z62bigloozd2debugzd2modulezd2setz12za2zz__paramz00(obj_t,
		obj_t);
	static obj_t BGl_symbol1670z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_symbol1676z00zz__paramz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2tracezd2setz12z12zz__paramz00(obj_t);
	BGL_EXPORTED_DECL bool_t
		BGl_bigloozd2strictzd2r5rszd2stringszd2zz__paramz00(void);
	static obj_t BGl_za2parameterzd2mutexza2zd2zz__paramz00 = BUNSPEC;
	static obj_t BGl_z62bigloozd2profilezd2setz12z70zz__paramz00(obj_t, obj_t);
	static bool_t BGl_za2bigloozd2evalzd2strictzd2moduleza2zd2zz__paramz00;
	BGL_EXPORTED_DECL int BGl_bigloozd2warningzd2zz__paramz00(void);
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2loadzd2readerz00zz__paramz00(void);
	static obj_t BGl_z62bigloozd2debugzd2setz12z70zz__paramz00(obj_t, obj_t);
	static obj_t BGl_requirezd2initializa7ationz75zz__paramz00 = BUNSPEC;
	static obj_t BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00 = BUNSPEC;
	static obj_t
		BGl_z62bigloozd2tracezd2stackzd2depthzd2setz12z70zz__paramz00(obj_t, obj_t);
	static obj_t BGl_z62bigloozd2tracezd2stackzd2depthzb0zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2debugzd2modulez62zz__paramz00(obj_t);
	static obj_t BGl_za2bigloozd2profileza2zd2zz__paramz00 = BUNSPEC;
	static obj_t BGl_list1667z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_z62bigloozd2evalzd2strictzd2modulezb0zz__paramz00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12zc0zz__paramz00(long);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2compilerzd2debugzd2setz12zc0zz__paramz00(int);
	static obj_t BGl_za2bigloozd2warningza2zd2zz__paramz00 = BUNSPEC;
	static obj_t BGl_z62bigloozd2debugzb0zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2strictzd2r5rszd2stringszb0zz__paramz00(obj_t);
	extern obj_t BGl_typezd2errorzd2zz__errorz00(obj_t, obj_t, obj_t, obj_t,
		obj_t);
	BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zz__paramz00(long,
		char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__osz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__configurez00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__threadz00(long, char *);
	extern obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2loadzd2modulez00zz__paramz00(void);
	static obj_t
		BGl_z62bigloozd2dnszd2enablezd2cachezd2setz12z70zz__paramz00(obj_t, obj_t);
	static obj_t BGl_za2bigloozd2debugza2zd2zz__paramz00 = BUNSPEC;
	static obj_t
		BGl_z62bigloozd2evalzd2strictzd2modulezd2setz12z70zz__paramz00(obj_t,
		obj_t);
	static obj_t BGl_z62bigloozd2loadzd2readerz62zz__paramz00(obj_t);
	BGL_EXPORTED_DECL long bgl_dns_cache_validity_timeout(void);
	static obj_t BGl_toplevelzd2initzd2zz__paramz00(void);
	BGL_EXPORTED_DECL int bgl_debug(void);
	static bool_t BGl_za2bigloozd2dnszd2enablezd2cacheza2zd2zz__paramz00;
	static obj_t BGl_z62bigloozd2compilerzd2debugzd2setz12za2zz__paramz00(obj_t,
		obj_t);
	static obj_t BGl_za2bigloozd2loadzd2readerza2z00zz__paramz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2dnszd2enablezd2cachezd2setz12z12zz__paramz00(bool_t);
	static obj_t BGl_z62bigloozd2warningzd2setz12z70zz__paramz00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2initializa7edz12z67zz__paramz00(void);
	static obj_t BGl_z62bigloozd2loadzd2modulez62zz__paramz00(obj_t);
	BGL_EXPORTED_DECL bool_t bgl_dns_enable_cache(void);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2casezd2sensitivezd2setz12zc0zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2dnszd2enablezd2cachezb0zz__paramz00(obj_t);
	extern obj_t BGl_getenvz00zz__osz00(obj_t);
	BGL_EXPORTED_DECL obj_t bgl_debug_set(int);
	static obj_t BGl_cnstzd2initzd2zz__paramz00(void);
	BGL_EXPORTED_DECL int BGl_bigloozd2profilezd2zz__paramz00(void);
	extern bool_t BGl_listzf3zf3zz__r4_pairs_and_lists_6_3z00(obj_t);
	static obj_t BGl_z62bigloozd2tracezb0zz__paramz00(obj_t);
	static obj_t BGl_genericzd2initzd2zz__paramz00(void);
	BGL_EXPORTED_DECL bool_t BGl_bigloozd2initializa7edzf3z86zz__paramz00(void);
	BGL_EXPORTED_DECL bool_t
		BGl_bigloozd2evalzd2strictzd2modulezd2zz__paramz00(void);
	static obj_t BGl_importedzd2moduleszd2initz00zz__paramz00(void);
	static obj_t BGl_gczd2rootszd2initz00zz__paramz00(void);
	static obj_t BGl_objectzd2initzd2zz__paramz00(void);
	static obj_t BGl_z62bigloozd2libraryzd2pathz62zz__paramz00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2modulezd2extensionzd2handlerzd2zz__paramz00(void);
	static obj_t
		BGl_z62bigloozd2modulezd2extensionzd2handlerzb0zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2casezd2sensitivezd2setz12za2zz__paramz00(obj_t,
		obj_t);
	extern obj_t BGl_memqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2libraryzd2pathzd2setz12zc0zz__paramz00(obj_t);
	static obj_t BGl_za2bigloozd2modulezd2extensionzd2handlerza2zd2zz__paramz00 =
		BUNSPEC;
	static bool_t BGl_za2bigloozd2tracezd2colorza2z00zz__paramz00;
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2tracezd2zz__paramz00(void);
	extern obj_t BGl_bigloozd2configzd2zz__configurez00(obj_t);
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2casezd2sensitivez00zz__paramz00(void);
	extern obj_t BGl_stringzd2splitzd2zz__r4_strings_6_7z00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2profilezd2setz12z12zz__paramz00(int);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2evalzd2strictzd2modulezd2setz12z12zz__paramz00(bool_t);
	BGL_EXPORTED_DECL bool_t BGl_bigloozd2tracezd2colorz00zz__paramz00(void);
	static obj_t BGl_za2bigloozd2loadzd2moduleza2z00zz__paramz00 = BUNSPEC;
	BGL_EXPORTED_DECL int BGl_bigloozd2compilerzd2debugz00zz__paramz00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2debugzd2modulezd2setz12zc0zz__paramz00(int);
	extern obj_t bstring_to_symbol(obj_t);
	BGL_EXPORTED_DECL int BGl_bigloozd2debugzd2modulez00zz__paramz00(void);
	static obj_t
		BGl_z62bigloozd2modulezd2extensionzd2handlerzd2setz12z70zz__paramz00(obj_t,
		obj_t);
	static long BGl_za2bigloozd2dnszd2cachezd2validityzd2timeoutza2z00zz__paramz00
		= 0L;
	static obj_t BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_methodzd2initzd2zz__paramz00(void);
	static bool_t BGl_za2bigloozd2initializa7edpza2z75zz__paramz00;
	static obj_t BGl_z62bigloozd2warningzb0zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2tracezd2colorz62zz__paramz00(obj_t);
	static obj_t BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2strictzd2r5rszd2stringszd2setz12z12zz__paramz00(bool_t);
	static obj_t
		BGl_z62bigloozd2strictzd2r5rszd2stringszd2setz12z70zz__paramz00(obj_t,
		obj_t);
	BGL_EXPORTED_DECL int BGl_bigloozd2tracezd2stackzd2depthzd2zz__paramz00(void);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2modulezd2extensionzd2handlerzd2setz12z12zz__paramz00(obj_t);
	static obj_t BGl_symbol1638z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_z62bigloozd2casezd2sensitivez62zz__paramz00(obj_t);
	static obj_t
		BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12za2zz__paramz00
		(obj_t, obj_t);
	static obj_t BGl_z62bigloozd2tracezd2setz12z70zz__paramz00(obj_t, obj_t);
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2warningzd2setz12z12zz__paramz00(int);
	static obj_t BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_symbol1640z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_symbol1643z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_z62bigloozd2initializa7edz12z05zz__paramz00(obj_t);
	static bool_t BGl_za2bigloozd2strictzd2r5rszd2stringsza2zd2zz__paramz00;
	static obj_t BGl_symbol1649z00zz__paramz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2tracezd2stackzd2depthzd2setz12z12zz__paramz00(int);
	static obj_t BGl_z62bigloozd2libraryzd2pathzd2setz12za2zz__paramz00(obj_t,
		obj_t);
	static obj_t BGl_z62bigloozd2compilerzd2debugz62zz__paramz00(obj_t);
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2tracezd2colorzd2setz12zc0zz__paramz00(bool_t);
	static obj_t BGl_symbol1652z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_z62bigloozd2initializa7edzf3ze4zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2tracezd2colorzd2setz12za2zz__paramz00(obj_t,
		obj_t);
	static obj_t BGl_symbol1656z00zz__paramz00 = BUNSPEC;
	static obj_t BGl_za2bigloozd2traceza2zd2zz__paramz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t BGl_bigloozd2libraryzd2pathz00zz__paramz00(void);
	static obj_t BGl_symbol1660z00zz__paramz00 = BUNSPEC;
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2loadzd2readerzd2setz12zc0zz__paramz00(obj_t);
	static obj_t BGl_z62bigloozd2loadzd2readerzd2setz12za2zz__paramz00(obj_t,
		obj_t);
	extern obj_t BGl_errorz00zz__errorz00(obj_t, obj_t, obj_t);
	static obj_t BGl_symbol1668z00zz__paramz00 = BUNSPEC;
	static long BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00 = 0L;
	BGL_EXPORTED_DECL obj_t
		BGl_bigloozd2loadzd2modulezd2setz12zc0zz__paramz00(obj_t);
	static obj_t *__cnst;


	   
		 
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2dnsza71683za7,
		BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12za2zz__paramz00,
		0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2loadzd2modulezd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2load1684z00,
		BGl_z62bigloozd2loadzd2modulez62zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2modulezd2extensionzd2handlerzd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2modu1685z00,
		BGl_z62bigloozd2modulezd2extensionzd2handlerzd2setz12z70zz__paramz00, 0L,
		BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2debugzd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2debu1686z00, BGl_z62bigloozd2debugzb0zz__paramz00,
		0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2initializa7edz12zd2envzb5zz__paramz00,
		BgL_bgl_za762biglooza7d2init1687z00,
		BGl_z62bigloozd2initializa7edz12z05zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2loadzd2readerzd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2load1688z00,
		BGl_z62bigloozd2loadzd2readerz62zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2tracezd2colorzd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2trac1689z00,
		BGl_z62bigloozd2tracezd2colorzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2debugzd2modulezd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2debu1690z00,
		BGl_z62bigloozd2debugzd2modulez62zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2modulezd2extensionzd2handlerzd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2modu1691z00,
		BGl_z62bigloozd2modulezd2extensionzd2handlerzb0zz__paramz00, 0L, BUNSPEC,
		0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2loadzd2modulezd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2load1692z00,
		BGl_z62bigloozd2loadzd2modulezd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2trac1693z00, BGl_z62bigloozd2tracezb0zz__paramz00,
		0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2casezd2sensitivezd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2case1694z00,
		BGl_z62bigloozd2casezd2sensitivez62zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2tracezd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2trac1695z00,
		BGl_z62bigloozd2tracezd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2strictzd2r5rszd2stringszd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2stri1696z00,
		BGl_z62bigloozd2strictzd2r5rszd2stringszb0zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2profilezd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2prof1697z00,
		BGl_z62bigloozd2profilezd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2dnszd2enablezd2cachezd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2dnsza71698za7,
		BGl_z62bigloozd2dnszd2enablezd2cachezd2setz12z70zz__paramz00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2evalzd2strictzd2modulezd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2eval1699z00,
		BGl_z62bigloozd2evalzd2strictzd2modulezd2setz12z70zz__paramz00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2colorzd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2trac1700z00,
		BGl_z62bigloozd2tracezd2colorz62zz__paramz00, 0L, BUNSPEC, 0);
	      BGL_DEFINE_STRING(BGl_string1635z00zz__paramz00,
		BgL_bgl_string1635za700za7za7_1701za7, "param", 5);
	      BGL_DEFINE_STRING(BGl_string1636z00zz__paramz00,
		BgL_bgl_string1636za700za7za7_1702za7, "BIGLOOTRACE", 11);
	      BGL_DEFINE_STRING(BGl_string1637z00zz__paramz00,
		BgL_bgl_string1637za700za7za7_1703za7, "BIGLOOSTACKDEPTH", 16);
	      BGL_DEFINE_STRING(BGl_string1639z00zz__paramz00,
		BgL_bgl_string1639za700za7za7_1704za7, "sensitive", 9);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2tracezd2stackzd2depthzd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2trac1705z00,
		BGl_z62bigloozd2tracezd2stackzd2depthzd2setz12z70zz__paramz00, 0L, BUNSPEC,
		1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2compilerzd2debugzd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2comp1706z00,
		BGl_z62bigloozd2compilerzd2debugz62zz__paramz00, 0L, BUNSPEC, 0);
	      BGL_DEFINE_STRING(BGl_string1641z00zz__paramz00,
		BgL_bgl_string1641za700za7za7_1707za7, "library-directory", 17);
	      BGL_DEFINE_STRING(BGl_string1642z00zz__paramz00,
		BgL_bgl_string1642za700za7za7_1708za7, ".", 1);
	      BGL_DEFINE_STRING(BGl_string1644z00zz__paramz00,
		BgL_bgl_string1644za700za7za7_1709za7, "bigloo-compiler-debug-set!", 26);
	      BGL_DEFINE_STRING(BGl_string1645z00zz__paramz00,
		BgL_bgl_string1645za700za7za7_1710za7, "Illegal debug level", 19);
	      BGL_DEFINE_STRING(BGl_string1646z00zz__paramz00,
		BgL_bgl_string1646za700za7za7_1711za7, "/tmp/bigloo/runtime/Llib/param.scm",
		34);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2compilerzd2debugzd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2comp1712z00,
		BGl_z62bigloozd2compilerzd2debugzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
	      BGL_DEFINE_STRING(BGl_string1647z00zz__paramz00,
		BgL_bgl_string1647za700za7za7_1713za7, "&bigloo-compiler-debug-set!", 27);
	      BGL_DEFINE_STRING(BGl_string1648z00zz__paramz00,
		BgL_bgl_string1648za700za7za7_1714za7, "bint", 4);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2loadzd2readerzd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2load1715z00,
		BGl_z62bigloozd2loadzd2readerzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2strictzd2r5rszd2stringszd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2stri1716z00,
		BGl_z62bigloozd2strictzd2r5rszd2stringszd2setz12z70zz__paramz00, 0L,
		BUNSPEC, 1);
	      BGL_DEFINE_STRING(BGl_string1650z00zz__paramz00,
		BgL_bgl_string1650za700za7za7_1717za7, "bigloo-debug-set!", 17);
	      BGL_DEFINE_STRING(BGl_string1651z00zz__paramz00,
		BgL_bgl_string1651za700za7za7_1718za7, "&bigloo-debug-set!", 18);
	      BGL_DEFINE_STRING(BGl_string1653z00zz__paramz00,
		BgL_bgl_string1653za700za7za7_1719za7, "bigloo-debug-module-set!", 24);
	      BGL_DEFINE_STRING(BGl_string1654z00zz__paramz00,
		BgL_bgl_string1654za700za7za7_1720za7, "Illegal debug module level", 26);
	      BGL_DEFINE_STRING(BGl_string1655z00zz__paramz00,
		BgL_bgl_string1655za700za7za7_1721za7, "&bigloo-debug-module-set!", 25);
	      BGL_DEFINE_STRING(BGl_string1657z00zz__paramz00,
		BgL_bgl_string1657za700za7za7_1722za7, "bigloo-warning-set!", 19);
	      BGL_DEFINE_STRING(BGl_string1658z00zz__paramz00,
		BgL_bgl_string1658za700za7za7_1723za7, "Illegal warning level", 21);
	      BGL_DEFINE_STRING(BGl_string1659z00zz__paramz00,
		BgL_bgl_string1659za700za7za7_1724za7, "&bigloo-warning-set!", 20);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2dnsza71725za7,
		BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutz62zz__paramz00, 0L,
		BUNSPEC, 0);
	      BGL_DEFINE_STRING(BGl_string1661z00zz__paramz00,
		BgL_bgl_string1661za700za7za7_1726za7, "bigloo-profile-set!", 19);
	      BGL_DEFINE_STRING(BGl_string1662z00zz__paramz00,
		BgL_bgl_string1662za700za7za7_1727za7, "Illegal profile level", 21);
	      BGL_DEFINE_STRING(BGl_string1663z00zz__paramz00,
		BgL_bgl_string1663za700za7za7_1728za7, "&bigloo-profile-set!", 20);
	      BGL_DEFINE_STRING(BGl_string1664z00zz__paramz00,
		BgL_bgl_string1664za700za7za7_1729za7, "&bigloo-trace-set!", 18);
	      BGL_DEFINE_STRING(BGl_string1665z00zz__paramz00,
		BgL_bgl_string1665za700za7za7_1730za7, "pair-nil", 8);
	      BGL_DEFINE_STRING(BGl_string1666z00zz__paramz00,
		BgL_bgl_string1666za700za7za7_1731za7, "&bigloo-trace-stack-depth-set!",
		30);
	      BGL_DEFINE_STRING(BGl_string1669z00zz__paramz00,
		BgL_bgl_string1669za700za7za7_1732za7, "downcase", 8);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2warningzd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2warn1733z00, BGl_z62bigloozd2warningzb0zz__paramz00,
		0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2casezd2sensitivezd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2case1734z00,
		BGl_z62bigloozd2casezd2sensitivezd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2debugzd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2debu1735z00,
		BGl_z62bigloozd2debugzd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
	      BGL_DEFINE_STRING(BGl_string1671z00zz__paramz00,
		BgL_bgl_string1671za700za7za7_1736za7, "upcase", 6);
	      BGL_DEFINE_STRING(BGl_string1672z00zz__paramz00,
		BgL_bgl_string1672za700za7za7_1737za7, "bigloo-sensitivity-set!", 23);
	      BGL_DEFINE_STRING(BGl_string1673z00zz__paramz00,
		BgL_bgl_string1673za700za7za7_1738za7, "Illegal sensitive value", 23);
	      BGL_DEFINE_STRING(BGl_string1674z00zz__paramz00,
		BgL_bgl_string1674za700za7za7_1739za7, "&bigloo-case-sensitive-set!", 27);
	      BGL_DEFINE_STRING(BGl_string1675z00zz__paramz00,
		BgL_bgl_string1675za700za7za7_1740za7, "symbol", 6);
	      BGL_DEFINE_STRING(BGl_string1677z00zz__paramz00,
		BgL_bgl_string1677za700za7za7_1741za7, "bigloo-library-path-set!", 24);
	      BGL_DEFINE_STRING(BGl_string1678z00zz__paramz00,
		BgL_bgl_string1678za700za7za7_1742za7, "Illegal values", 14);
	      BGL_DEFINE_STRING(BGl_string1679z00zz__paramz00,
		BgL_bgl_string1679za700za7za7_1743za7, "Illegal list", 12);
	      DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2profilezd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2prof1744z00, BGl_z62bigloozd2profilezb0zz__paramz00,
		0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2debugzd2modulezd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2debu1745z00,
		BGl_z62bigloozd2debugzd2modulezd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2initializa7edzf3zd2envz54zz__paramz00,
		BgL_bgl_za762biglooza7d2init1746z00,
		BGl_z62bigloozd2initializa7edzf3ze4zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2evalzd2strictzd2modulezd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2eval1747z00,
		BGl_z62bigloozd2evalzd2strictzd2modulezb0zz__paramz00, 0L, BUNSPEC, 0);
	      BGL_DEFINE_STRING(BGl_string1680z00zz__paramz00,
		BgL_bgl_string1680za700za7za7_1748za7, "&bigloo-library-path-set!", 25);
	      BGL_DEFINE_STRING(BGl_string1681z00zz__paramz00,
		BgL_bgl_string1681za700za7za7_1749za7,
		"&bigloo-dns-cache-validity-timeout-set!", 39);
	      BGL_DEFINE_STRING(BGl_string1682z00zz__paramz00,
		BgL_bgl_string1682za700za7za7_1750za7, "__param", 7);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2libraryzd2pathzd2envzd2zz__paramz00,
		BgL_bgl_za762biglooza7d2libr1751z00,
		BGl_z62bigloozd2libraryzd2pathz62zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2libraryzd2pathzd2setz12zd2envz12zz__paramz00,
		BgL_bgl_za762biglooza7d2libr1752z00,
		BGl_z62bigloozd2libraryzd2pathzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2tracezd2stackzd2depthzd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2trac1753z00,
		BGl_z62bigloozd2tracezd2stackzd2depthzb0zz__paramz00, 0L, BUNSPEC, 0);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2warningzd2setz12zd2envzc0zz__paramz00,
		BgL_bgl_za762biglooza7d2warn1754z00,
		BGl_z62bigloozd2warningzd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
	     
		DEFINE_EXPORT_BGL_PROCEDURE
		(BGl_bigloozd2dnszd2enablezd2cachezd2envz00zz__paramz00,
		BgL_bgl_za762biglooza7d2dnsza71755za7,
		BGl_z62bigloozd2dnszd2enablezd2cachezb0zz__paramz00, 0L, BUNSPEC, 0);

/* contant bindings */
	static void bgl_constant_bindings()
	{
		BGL_BIND_PROCEDURE(BGl_bigloozd2dnszd2enablezd2cachezd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2dnsza71755za7);
		BGL_BIND_PROCEDURE(BGl_bigloozd2warningzd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2warn1754z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2stackzd2depthzd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2trac1753z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2libraryzd2pathzd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2libr1752z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2libraryzd2pathzd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2libr1751z00);
		BGL_BIND_STRING(BGl_string1682z00zz__paramz00,
			BgL_bgl_string1682za700za7za7_1750za7);
		BGL_BIND_STRING(BGl_string1681z00zz__paramz00,
			BgL_bgl_string1681za700za7za7_1749za7);
		BGL_BIND_STRING(BGl_string1680z00zz__paramz00,
			BgL_bgl_string1680za700za7za7_1748za7);
		BGL_BIND_PROCEDURE(BGl_bigloozd2evalzd2strictzd2modulezd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2eval1747z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2initializa7edzf3zd2envz54zz__paramz00,
			BgL_bgl_za762biglooza7d2init1746z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2debugzd2modulezd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2debu1745z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2profilezd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2prof1744z00);
		BGL_BIND_STRING(BGl_string1679z00zz__paramz00,
			BgL_bgl_string1679za700za7za7_1743za7);
		BGL_BIND_STRING(BGl_string1678z00zz__paramz00,
			BgL_bgl_string1678za700za7za7_1742za7);
		BGL_BIND_STRING(BGl_string1677z00zz__paramz00,
			BgL_bgl_string1677za700za7za7_1741za7);
		BGL_BIND_STRING(BGl_string1675z00zz__paramz00,
			BgL_bgl_string1675za700za7za7_1740za7);
		BGL_BIND_STRING(BGl_string1674z00zz__paramz00,
			BgL_bgl_string1674za700za7za7_1739za7);
		BGL_BIND_STRING(BGl_string1673z00zz__paramz00,
			BgL_bgl_string1673za700za7za7_1738za7);
		BGL_BIND_STRING(BGl_string1672z00zz__paramz00,
			BgL_bgl_string1672za700za7za7_1737za7);
		BGL_BIND_STRING(BGl_string1671z00zz__paramz00,
			BgL_bgl_string1671za700za7za7_1736za7);
		BGL_BIND_PROCEDURE(BGl_bigloozd2debugzd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2debu1735z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2casezd2sensitivezd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2case1734z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2warningzd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2warn1733z00);
		BGL_BIND_STRING(BGl_string1669z00zz__paramz00,
			BgL_bgl_string1669za700za7za7_1732za7);
		BGL_BIND_STRING(BGl_string1666z00zz__paramz00,
			BgL_bgl_string1666za700za7za7_1731za7);
		BGL_BIND_STRING(BGl_string1665z00zz__paramz00,
			BgL_bgl_string1665za700za7za7_1730za7);
		BGL_BIND_STRING(BGl_string1664z00zz__paramz00,
			BgL_bgl_string1664za700za7za7_1729za7);
		BGL_BIND_STRING(BGl_string1663z00zz__paramz00,
			BgL_bgl_string1663za700za7za7_1728za7);
		BGL_BIND_STRING(BGl_string1662z00zz__paramz00,
			BgL_bgl_string1662za700za7za7_1727za7);
		BGL_BIND_STRING(BGl_string1661z00zz__paramz00,
			BgL_bgl_string1661za700za7za7_1726za7);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2dnsza71725za7);
		BGL_BIND_STRING(BGl_string1659z00zz__paramz00,
			BgL_bgl_string1659za700za7za7_1724za7);
		BGL_BIND_STRING(BGl_string1658z00zz__paramz00,
			BgL_bgl_string1658za700za7za7_1723za7);
		BGL_BIND_STRING(BGl_string1657z00zz__paramz00,
			BgL_bgl_string1657za700za7za7_1722za7);
		BGL_BIND_STRING(BGl_string1655z00zz__paramz00,
			BgL_bgl_string1655za700za7za7_1721za7);
		BGL_BIND_STRING(BGl_string1654z00zz__paramz00,
			BgL_bgl_string1654za700za7za7_1720za7);
		BGL_BIND_STRING(BGl_string1653z00zz__paramz00,
			BgL_bgl_string1653za700za7za7_1719za7);
		BGL_BIND_STRING(BGl_string1651z00zz__paramz00,
			BgL_bgl_string1651za700za7za7_1718za7);
		BGL_BIND_STRING(BGl_string1650z00zz__paramz00,
			BgL_bgl_string1650za700za7za7_1717za7);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2strictzd2r5rszd2stringszd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2stri1716z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2readerzd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2load1715z00);
		BGL_BIND_STRING(BGl_string1648z00zz__paramz00,
			BgL_bgl_string1648za700za7za7_1714za7);
		BGL_BIND_STRING(BGl_string1647z00zz__paramz00,
			BgL_bgl_string1647za700za7za7_1713za7);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2compilerzd2debugzd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2comp1712z00);
		BGL_BIND_STRING(BGl_string1646z00zz__paramz00,
			BgL_bgl_string1646za700za7za7_1711za7);
		BGL_BIND_STRING(BGl_string1645z00zz__paramz00,
			BgL_bgl_string1645za700za7za7_1710za7);
		BGL_BIND_STRING(BGl_string1644z00zz__paramz00,
			BgL_bgl_string1644za700za7za7_1709za7);
		BGL_BIND_STRING(BGl_string1642z00zz__paramz00,
			BgL_bgl_string1642za700za7za7_1708za7);
		BGL_BIND_STRING(BGl_string1641z00zz__paramz00,
			BgL_bgl_string1641za700za7za7_1707za7);
		BGL_BIND_PROCEDURE(BGl_bigloozd2compilerzd2debugzd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2comp1706z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2tracezd2stackzd2depthzd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2trac1705z00);
		BGL_BIND_STRING(BGl_string1639z00zz__paramz00,
			BgL_bgl_string1639za700za7za7_1704za7);
		BGL_BIND_STRING(BGl_string1637z00zz__paramz00,
			BgL_bgl_string1637za700za7za7_1703za7);
		BGL_BIND_STRING(BGl_string1636z00zz__paramz00,
			BgL_bgl_string1636za700za7za7_1702za7);
		BGL_BIND_STRING(BGl_string1635z00zz__paramz00,
			BgL_bgl_string1635za700za7za7_1701za7);
		BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2colorzd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2trac1700z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2evalzd2strictzd2modulezd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2eval1699z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2dnszd2enablezd2cachezd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2dnsza71698za7);
		BGL_BIND_PROCEDURE(BGl_bigloozd2profilezd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2prof1697z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2strictzd2r5rszd2stringszd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2stri1696z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2trac1695z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2casezd2sensitivezd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2case1694z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2trac1693z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2modulezd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2load1692z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2modulezd2extensionzd2handlerzd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2modu1691z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2debugzd2modulezd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2debu1690z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2colorzd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2trac1689z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2readerzd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2load1688z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2initializa7edz12zd2envzb5zz__paramz00,
			BgL_bgl_za762biglooza7d2init1687z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2debugzd2envz00zz__paramz00,
			BgL_bgl_za762biglooza7d2debu1686z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2modulezd2extensionzd2handlerzd2setz12zd2envzc0zz__paramz00,
			BgL_bgl_za762biglooza7d2modu1685z00);
		BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2modulezd2envzd2zz__paramz00,
			BgL_bgl_za762biglooza7d2load1684z00);
		BGL_BIND_PROCEDURE
			(BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12zd2envz12zz__paramz00,
			BgL_bgl_za762biglooza7d2dnsza71683za7);
	}

/* 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_symbol1670z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1676z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2parameterzd2mutexza2zd2zz__paramz00));
		ADD_ROOT((void *) (&BGl_requirezd2initializa7ationz75zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2profileza2zd2zz__paramz00));
		ADD_ROOT((void *) (&BGl_list1667z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2warningza2zd2zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2debugza2zd2zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2loadzd2readerza2z00zz__paramz00));
		ADD_ROOT((void
				*) (&BGl_za2bigloozd2modulezd2extensionzd2handlerza2zd2zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2loadzd2moduleza2z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1638z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1640z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1643z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1649z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1652z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1656z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_za2bigloozd2traceza2zd2zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1660z00zz__paramz00));
		ADD_ROOT((void *) (&BGl_symbol1668z00zz__paramz00));
#undef ADD_ROOT
		if (roots_max > 0)
			GC_add_roots(roots_min, ((void **) roots_max) + 1);
#endif
		return BUNSPEC;
	}



/* module-initialization */
	BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zz__paramz00(long
		BgL_checksumz00_1884, char *BgL_fromz00_1885)
	{
		{
			if (CBOOL(BGl_requirezd2initializa7ationz75zz__paramz00))
				{
					BGl_requirezd2initializa7ationz75zz__paramz00 = BBOOL(((bool_t) 0));
					bgl_constant_bindings();
					BGl_gczd2rootszd2initz00zz__paramz00();
					BGl_cnstzd2initzd2zz__paramz00();
					BGl_importedzd2moduleszd2initz00zz__paramz00();
					return BGl_toplevelzd2initzd2zz__paramz00();
				}
			else
				{
					return BUNSPEC;
				}
		}

	}



/* cnst-init */
	obj_t BGl_cnstzd2initzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 15 */
			BGl_symbol1638z00zz__paramz00 =
				bstring_to_symbol(BGl_string1639z00zz__paramz00);
			BGl_symbol1640z00zz__paramz00 =
				bstring_to_symbol(BGl_string1641z00zz__paramz00);
			BGl_symbol1643z00zz__paramz00 =
				bstring_to_symbol(BGl_string1644z00zz__paramz00);
			BGl_symbol1649z00zz__paramz00 =
				bstring_to_symbol(BGl_string1650z00zz__paramz00);
			BGl_symbol1652z00zz__paramz00 =
				bstring_to_symbol(BGl_string1653z00zz__paramz00);
			BGl_symbol1656z00zz__paramz00 =
				bstring_to_symbol(BGl_string1657z00zz__paramz00);
			BGl_symbol1660z00zz__paramz00 =
				bstring_to_symbol(BGl_string1661z00zz__paramz00);
			BGl_symbol1668z00zz__paramz00 =
				bstring_to_symbol(BGl_string1669z00zz__paramz00);
			BGl_symbol1670z00zz__paramz00 =
				bstring_to_symbol(BGl_string1671z00zz__paramz00);
			BGl_list1667z00zz__paramz00 =
				MAKE_YOUNG_PAIR(BGl_symbol1638z00zz__paramz00,
				MAKE_YOUNG_PAIR(BGl_symbol1668z00zz__paramz00,
					MAKE_YOUNG_PAIR(BGl_symbol1670z00zz__paramz00, BNIL)));
			return (BGl_symbol1676z00zz__paramz00 =
				bstring_to_symbol(BGl_string1677z00zz__paramz00), BUNSPEC);
		}

	}



/* gc-roots-init */
	obj_t BGl_gczd2rootszd2initz00zz__paramz00(void)
	{
		{	/* Llib/param.scm 15 */
			return bgl_gc_roots_register();
		}

	}



/* toplevel-init */
	obj_t BGl_toplevelzd2initzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 15 */
			BGl_za2parameterzd2mutexza2zd2zz__paramz00 =
				bgl_make_mutex(BGl_string1635z00zz__paramz00);
			BGl_za2bigloozd2strictzd2r5rszd2stringsza2zd2zz__paramz00 = ((bool_t) 0);
			BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00 = BINT(0L);
			BGl_za2bigloozd2debugza2zd2zz__paramz00 = BINT(0L);
			BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00 = BINT(0L);
			BGl_za2bigloozd2warningza2zd2zz__paramz00 = BINT(1L);
			BGl_za2bigloozd2profileza2zd2zz__paramz00 = BINT(0L);
			BGl_za2bigloozd2tracezd2colorza2z00zz__paramz00 = ((bool_t) 1);
			{	/* Llib/param.scm 206 */
				obj_t BgL_envzd2valuezd2_1093;

				BgL_envzd2valuezd2_1093 =
					BGl_getenvz00zz__osz00(BGl_string1636z00zz__paramz00);
				if (STRINGP(BgL_envzd2valuezd2_1093))
					{	/* Llib/param.scm 208 */
						obj_t BgL_l1072z00_1095;

						BgL_l1072z00_1095 =
							BGl_stringzd2splitzd2zz__r4_strings_6_7z00
							(BgL_envzd2valuezd2_1093, BNIL);
						if (NULLP(BgL_l1072z00_1095))
							{	/* Llib/param.scm 208 */
								BGl_za2bigloozd2traceza2zd2zz__paramz00 = BNIL;
							}
						else
							{	/* Llib/param.scm 208 */
								obj_t BgL_head1074z00_1097;

								{	/* Llib/param.scm 208 */
									obj_t BgL_arg1189z00_1109;

									{	/* Llib/param.scm 208 */
										obj_t BgL_arg1192z00_1110;

										BgL_arg1192z00_1110 = CAR(BgL_l1072z00_1095);
										BgL_arg1189z00_1109 =
											bstring_to_symbol(((obj_t) BgL_arg1192z00_1110));
									}
									BgL_head1074z00_1097 =
										MAKE_YOUNG_PAIR(BgL_arg1189z00_1109, BNIL);
								}
								{	/* Llib/param.scm 208 */
									obj_t BgL_g1077z00_1098;

									BgL_g1077z00_1098 = CDR(BgL_l1072z00_1095);
									{
										obj_t BgL_l1072z00_1602;
										obj_t BgL_tail1075z00_1603;

										BgL_l1072z00_1602 = BgL_g1077z00_1098;
										BgL_tail1075z00_1603 = BgL_head1074z00_1097;
									BgL_zc3z04anonymousza31167ze3z87_1601:
										if (NULLP(BgL_l1072z00_1602))
											{	/* Llib/param.scm 208 */
												BGl_za2bigloozd2traceza2zd2zz__paramz00 =
													BgL_head1074z00_1097;
											}
										else
											{	/* Llib/param.scm 208 */
												obj_t BgL_newtail1076z00_1610;

												{	/* Llib/param.scm 208 */
													obj_t BgL_arg1170z00_1611;

													{	/* Llib/param.scm 208 */
														obj_t BgL_arg1187z00_1612;

														BgL_arg1187z00_1612 =
															CAR(((obj_t) BgL_l1072z00_1602));
														BgL_arg1170z00_1611 =
															bstring_to_symbol(((obj_t) BgL_arg1187z00_1612));
													}
													BgL_newtail1076z00_1610 =
														MAKE_YOUNG_PAIR(BgL_arg1170z00_1611, BNIL);
												}
												SET_CDR(BgL_tail1075z00_1603, BgL_newtail1076z00_1610);
												{	/* Llib/param.scm 208 */
													obj_t BgL_arg1169z00_1613;

													BgL_arg1169z00_1613 =
														CDR(((obj_t) BgL_l1072z00_1602));
													{
														obj_t BgL_tail1075z00_1936;
														obj_t BgL_l1072z00_1935;

														BgL_l1072z00_1935 = BgL_arg1169z00_1613;
														BgL_tail1075z00_1936 = BgL_newtail1076z00_1610;
														BgL_tail1075z00_1603 = BgL_tail1075z00_1936;
														BgL_l1072z00_1602 = BgL_l1072z00_1935;
														goto BgL_zc3z04anonymousza31167ze3z87_1601;
													}
												}
											}
									}
								}
							}
					}
				else
					{	/* Llib/param.scm 207 */
						BGl_za2bigloozd2traceza2zd2zz__paramz00 = BNIL;
					}
			}
			{	/* Llib/param.scm 217 */
				obj_t BgL_envzd2valuezd2_1112;

				BgL_envzd2valuezd2_1112 =
					BGl_getenvz00zz__osz00(BGl_string1637z00zz__paramz00);
				if (STRINGP(BgL_envzd2valuezd2_1112))
					{	/* Llib/param.scm 219 */
						char *BgL_tmpz00_1940;

						BgL_tmpz00_1940 = BSTRING_TO_STRING(BgL_envzd2valuezd2_1112);
						BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00 =
							BGL_STRTOL(BgL_tmpz00_1940, 0L, 10L);
					}
				else
					{	/* Llib/param.scm 218 */
						BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00 = 10L;
					}
			}
			BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00 =
				BGl_symbol1638z00zz__paramz00;
			BGl_za2bigloozd2initializa7edpza2z75zz__paramz00 = ((bool_t) 0);
			BGl_za2bigloozd2loadzd2readerza2z00zz__paramz00 = BFALSE;
			BGl_za2bigloozd2loadzd2moduleza2z00zz__paramz00 = BFALSE;
			BGl_za2bigloozd2modulezd2extensionzd2handlerza2zd2zz__paramz00 = BFALSE;
			BGl_za2bigloozd2evalzd2strictzd2moduleza2zd2zz__paramz00 = ((bool_t) 1);
			{	/* Llib/param.scm 281 */
				obj_t BgL_arg1195z00_1114;

				BgL_arg1195z00_1114 =
					BGl_bigloozd2configzd2zz__configurez00(BGl_symbol1640z00zz__paramz00);
				{	/* Llib/param.scm 281 */
					obj_t BgL_list1196z00_1115;

					{	/* Llib/param.scm 281 */
						obj_t BgL_arg1197z00_1116;

						BgL_arg1197z00_1116 = MAKE_YOUNG_PAIR(BgL_arg1195z00_1114, BNIL);
						BgL_list1196z00_1115 =
							MAKE_YOUNG_PAIR(BGl_string1642z00zz__paramz00,
							BgL_arg1197z00_1116);
					}
					BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 =
						BgL_list1196z00_1115;
				}
			}
			BGl_za2bigloozd2dnszd2enablezd2cacheza2zd2zz__paramz00 = ((bool_t) 1);
			return (BGl_za2bigloozd2dnszd2cachezd2validityzd2timeoutza2z00zz__paramz00
				= 20L, BUNSPEC);
		}

	}



/* bigloo-strict-r5rs-strings */
	BGL_EXPORTED_DEF bool_t
		BGl_bigloozd2strictzd2r5rszd2stringszd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 135 */
			return BGl_za2bigloozd2strictzd2r5rszd2stringsza2zd2zz__paramz00;
		}

	}



/* &bigloo-strict-r5rs-strings */
	obj_t BGl_z62bigloozd2strictzd2r5rszd2stringszb0zz__paramz00(obj_t
		BgL_envz00_1808)
	{
		{	/* Llib/param.scm 135 */
			return BBOOL(BGl_bigloozd2strictzd2r5rszd2stringszd2zz__paramz00());
		}

	}



/* bigloo-strict-r5rs-strings-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2strictzd2r5rszd2stringszd2setz12z12zz__paramz00(bool_t
		BgL_vz00_3)
	{
		{	/* Llib/param.scm 135 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 135 */
				obj_t BgL_tmp1761z00_1948;

				BgL_tmp1761z00_1948 =
					(BGl_za2bigloozd2strictzd2r5rszd2stringsza2zd2zz__paramz00 =
					BgL_vz00_3, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1761z00_1948;
			}
			return BBOOL(BgL_vz00_3);
		}

	}



/* &bigloo-strict-r5rs-strings-set! */
	obj_t BGl_z62bigloozd2strictzd2r5rszd2stringszd2setz12z70zz__paramz00(obj_t
		BgL_envz00_1809, obj_t BgL_vz00_1810)
	{
		{	/* Llib/param.scm 135 */
			return
				BGl_bigloozd2strictzd2r5rszd2stringszd2setz12z12zz__paramz00(CBOOL
				(BgL_vz00_1810));
		}

	}



/* bigloo-compiler-debug */
	BGL_EXPORTED_DEF int BGl_bigloozd2compilerzd2debugz00zz__paramz00(void)
	{
		{	/* Llib/param.scm 142 */
			return CINT(BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00);
		}

	}



/* &bigloo-compiler-debug */
	obj_t BGl_z62bigloozd2compilerzd2debugz62zz__paramz00(obj_t BgL_envz00_1811)
	{
		{	/* Llib/param.scm 142 */
			return BINT(BGl_bigloozd2compilerzd2debugz00zz__paramz00());
		}

	}



/* bigloo-compiler-debug-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2compilerzd2debugzd2setz12zc0zz__paramz00(int BgL_vz00_4)
	{
		{	/* Llib/param.scm 142 */
			{	/* Llib/param.scm 142 */
				obj_t BgL_top1763z00_1958;

				BgL_top1763z00_1958 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top1763z00_1958,
					BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BUNSPEC;
				{	/* Llib/param.scm 142 */
					obj_t BgL_tmp1762z00_1957;

					if (((long) (BgL_vz00_4) < 0L))
						{	/* Llib/param.scm 145 */
							BgL_tmp1762z00_1957 =
								(BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00 =
								BGl_errorz00zz__errorz00(BGl_symbol1643z00zz__paramz00,
									BGl_string1645z00zz__paramz00, BINT(BgL_vz00_4)), BUNSPEC);
						}
					else
						{	/* Llib/param.scm 145 */
							BgL_tmp1762z00_1957 =
								(BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00 =
								BINT(BgL_vz00_4), BUNSPEC);
						}
					BGL_EXITD_POP_PROTECT(BgL_top1763z00_1958);
					BUNSPEC;
					BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
					BgL_tmp1762z00_1957;
				}
			}
			return BINT(BgL_vz00_4);
		}

	}



/* &bigloo-compiler-debug-set! */
	obj_t BGl_z62bigloozd2compilerzd2debugzd2setz12za2zz__paramz00(obj_t
		BgL_envz00_1812, obj_t BgL_vz00_1813)
	{
		{	/* Llib/param.scm 142 */
			{	/* Llib/param.scm 142 */
				int BgL_auxz00_1971;

				{	/* Llib/param.scm 142 */
					obj_t BgL_tmpz00_1972;

					if (INTEGERP(BgL_vz00_1813))
						{	/* Llib/param.scm 142 */
							BgL_tmpz00_1972 = BgL_vz00_1813;
						}
					else
						{
							obj_t BgL_auxz00_1975;

							BgL_auxz00_1975 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
								BINT(4861L), BGl_string1647z00zz__paramz00,
								BGl_string1648z00zz__paramz00, BgL_vz00_1813);
							FAILURE(BgL_auxz00_1975, BFALSE, BFALSE);
						}
					BgL_auxz00_1971 = CINT(BgL_tmpz00_1972);
				}
				return
					BGl_bigloozd2compilerzd2debugzd2setz12zc0zz__paramz00
					(BgL_auxz00_1971);
			}
		}

	}



/* bigloo-debug */
	BGL_EXPORTED_DEF int bgl_debug(void)
	{
		{	/* Llib/param.scm 154 */
			return CINT(BGl_za2bigloozd2debugza2zd2zz__paramz00);
		}

	}



/* &bigloo-debug */
	obj_t BGl_z62bigloozd2debugzb0zz__paramz00(obj_t BgL_envz00_1814)
	{
		{	/* Llib/param.scm 154 */
			return BINT(bgl_debug());
		}

	}



/* bigloo-debug-set! */
	BGL_EXPORTED_DEF obj_t bgl_debug_set(int BgL_vz00_5)
	{
		{	/* Llib/param.scm 154 */
			{	/* Llib/param.scm 154 */
				obj_t BgL_top1767z00_1985;

				BgL_top1767z00_1985 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top1767z00_1985,
					BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BUNSPEC;
				{	/* Llib/param.scm 154 */
					obj_t BgL_tmp1766z00_1984;

					if (((long) (BgL_vz00_5) < 0L))
						{	/* Llib/param.scm 157 */
							BgL_tmp1766z00_1984 = (BGl_za2bigloozd2debugza2zd2zz__paramz00 =
								BGl_errorz00zz__errorz00(BGl_symbol1649z00zz__paramz00,
									BGl_string1645z00zz__paramz00, BINT(BgL_vz00_5)), BUNSPEC);
						}
					else
						{	/* Llib/param.scm 157 */
							BgL_tmp1766z00_1984 = (BGl_za2bigloozd2debugza2zd2zz__paramz00 =
								BINT(BgL_vz00_5), BUNSPEC);
						}
					BGL_EXITD_POP_PROTECT(BgL_top1767z00_1985);
					BUNSPEC;
					BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
					BgL_tmp1766z00_1984;
				}
			}
			return BINT(BgL_vz00_5);
		}

	}



/* &bigloo-debug-set! */
	obj_t BGl_z62bigloozd2debugzd2setz12z70zz__paramz00(obj_t BgL_envz00_1815,
		obj_t BgL_vz00_1816)
	{
		{	/* Llib/param.scm 154 */
			{	/* Llib/param.scm 154 */
				int BgL_auxz00_1998;

				{	/* Llib/param.scm 154 */
					obj_t BgL_tmpz00_1999;

					if (INTEGERP(BgL_vz00_1816))
						{	/* Llib/param.scm 154 */
							BgL_tmpz00_1999 = BgL_vz00_1816;
						}
					else
						{
							obj_t BgL_auxz00_2002;

							BgL_auxz00_2002 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
								BINT(5414L), BGl_string1651z00zz__paramz00,
								BGl_string1648z00zz__paramz00, BgL_vz00_1816);
							FAILURE(BgL_auxz00_2002, BFALSE, BFALSE);
						}
					BgL_auxz00_1998 = CINT(BgL_tmpz00_1999);
				}
				return bgl_debug_set(BgL_auxz00_1998);
			}
		}

	}



/* bigloo-debug-module */
	BGL_EXPORTED_DEF int BGl_bigloozd2debugzd2modulez00zz__paramz00(void)
	{
		{	/* Llib/param.scm 166 */
			return CINT(BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00);
		}

	}



/* &bigloo-debug-module */
	obj_t BGl_z62bigloozd2debugzd2modulez62zz__paramz00(obj_t BgL_envz00_1817)
	{
		{	/* Llib/param.scm 166 */
			return BINT(BGl_bigloozd2debugzd2modulez00zz__paramz00());
		}

	}



/* bigloo-debug-module-set! */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2debugzd2modulezd2setz12zc0zz__paramz00(int
		BgL_vz00_6)
	{
		{	/* Llib/param.scm 166 */
			{	/* Llib/param.scm 166 */
				obj_t BgL_top1771z00_2012;

				BgL_top1771z00_2012 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top1771z00_2012,
					BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BUNSPEC;
				{	/* Llib/param.scm 166 */
					obj_t BgL_tmp1770z00_2011;

					if (((long) (BgL_vz00_6) < 0L))
						{	/* Llib/param.scm 169 */
							BgL_tmp1770z00_2011 =
								(BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00 =
								BGl_errorz00zz__errorz00(BGl_symbol1652z00zz__paramz00,
									BGl_string1654z00zz__paramz00, BINT(BgL_vz00_6)), BUNSPEC);
						}
					else
						{	/* Llib/param.scm 169 */
							BgL_tmp1770z00_2011 =
								(BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00 =
								BINT(BgL_vz00_6), BUNSPEC);
						}
					BGL_EXITD_POP_PROTECT(BgL_top1771z00_2012);
					BUNSPEC;
					BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
					BgL_tmp1770z00_2011;
				}
			}
			return BINT(BgL_vz00_6);
		}

	}



/* &bigloo-debug-module-set! */
	obj_t BGl_z62bigloozd2debugzd2modulezd2setz12za2zz__paramz00(obj_t
		BgL_envz00_1818, obj_t BgL_vz00_1819)
	{
		{	/* Llib/param.scm 166 */
			{	/* Llib/param.scm 166 */
				int BgL_auxz00_2025;

				{	/* Llib/param.scm 166 */
					obj_t BgL_tmpz00_2026;

					if (INTEGERP(BgL_vz00_1819))
						{	/* Llib/param.scm 166 */
							BgL_tmpz00_2026 = BgL_vz00_1819;
						}
					else
						{
							obj_t BgL_auxz00_2029;

							BgL_auxz00_2029 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
								BINT(5946L), BGl_string1655z00zz__paramz00,
								BGl_string1648z00zz__paramz00, BgL_vz00_1819);
							FAILURE(BgL_auxz00_2029, BFALSE, BFALSE);
						}
					BgL_auxz00_2025 = CINT(BgL_tmpz00_2026);
				}
				return
					BGl_bigloozd2debugzd2modulezd2setz12zc0zz__paramz00(BgL_auxz00_2025);
			}
		}

	}



/* bigloo-warning */
	BGL_EXPORTED_DEF int BGl_bigloozd2warningzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 178 */
			return CINT(BGl_za2bigloozd2warningza2zd2zz__paramz00);
		}

	}



/* &bigloo-warning */
	obj_t BGl_z62bigloozd2warningzb0zz__paramz00(obj_t BgL_envz00_1820)
	{
		{	/* Llib/param.scm 178 */
			return BINT(BGl_bigloozd2warningzd2zz__paramz00());
		}

	}



/* bigloo-warning-set! */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2warningzd2setz12z12zz__paramz00(int
		BgL_vz00_7)
	{
		{	/* Llib/param.scm 178 */
			{	/* Llib/param.scm 178 */
				obj_t BgL_top1775z00_2039;

				BgL_top1775z00_2039 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top1775z00_2039,
					BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BUNSPEC;
				{	/* Llib/param.scm 178 */
					obj_t BgL_tmp1774z00_2038;

					if (((long) (BgL_vz00_7) < 0L))
						{	/* Llib/param.scm 181 */
							BgL_tmp1774z00_2038 = (BGl_za2bigloozd2warningza2zd2zz__paramz00 =
								BGl_errorz00zz__errorz00(BGl_symbol1656z00zz__paramz00,
									BGl_string1658z00zz__paramz00, BINT(BgL_vz00_7)), BUNSPEC);
						}
					else
						{	/* Llib/param.scm 181 */
							BgL_tmp1774z00_2038 = (BGl_za2bigloozd2warningza2zd2zz__paramz00 =
								BINT(BgL_vz00_7), BUNSPEC);
						}
					BGL_EXITD_POP_PROTECT(BgL_top1775z00_2039);
					BUNSPEC;
					BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
					BgL_tmp1774z00_2038;
				}
			}
			return BINT(BgL_vz00_7);
		}

	}



/* &bigloo-warning-set! */
	obj_t BGl_z62bigloozd2warningzd2setz12z70zz__paramz00(obj_t BgL_envz00_1821,
		obj_t BgL_vz00_1822)
	{
		{	/* Llib/param.scm 178 */
			{	/* Llib/param.scm 178 */
				int BgL_auxz00_2052;

				{	/* Llib/param.scm 178 */
					obj_t BgL_tmpz00_2053;

					if (INTEGERP(BgL_vz00_1822))
						{	/* Llib/param.scm 178 */
							BgL_tmpz00_2053 = BgL_vz00_1822;
						}
					else
						{
							obj_t BgL_auxz00_2056;

							BgL_auxz00_2056 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
								BINT(6499L), BGl_string1659z00zz__paramz00,
								BGl_string1648z00zz__paramz00, BgL_vz00_1822);
							FAILURE(BgL_auxz00_2056, BFALSE, BFALSE);
						}
					BgL_auxz00_2052 = CINT(BgL_tmpz00_2053);
				}
				return BGl_bigloozd2warningzd2setz12z12zz__paramz00(BgL_auxz00_2052);
			}
		}

	}



/* bigloo-profile */
	BGL_EXPORTED_DEF int BGl_bigloozd2profilezd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 190 */
			return CINT(BGl_za2bigloozd2profileza2zd2zz__paramz00);
		}

	}



/* &bigloo-profile */
	obj_t BGl_z62bigloozd2profilezb0zz__paramz00(obj_t BgL_envz00_1823)
	{
		{	/* Llib/param.scm 190 */
			return BINT(BGl_bigloozd2profilezd2zz__paramz00());
		}

	}



/* bigloo-profile-set! */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2profilezd2setz12z12zz__paramz00(int
		BgL_vz00_8)
	{
		{	/* Llib/param.scm 190 */
			{	/* Llib/param.scm 190 */
				obj_t BgL_top1779z00_2066;

				BgL_top1779z00_2066 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top1779z00_2066,
					BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BUNSPEC;
				{	/* Llib/param.scm 190 */
					obj_t BgL_tmp1778z00_2065;

					if (((long) (BgL_vz00_8) < 0L))
						{	/* Llib/param.scm 193 */
							BgL_tmp1778z00_2065 = (BGl_za2bigloozd2profileza2zd2zz__paramz00 =
								BGl_errorz00zz__errorz00(BGl_symbol1660z00zz__paramz00,
									BGl_string1662z00zz__paramz00, BINT(BgL_vz00_8)), BUNSPEC);
						}
					else
						{	/* Llib/param.scm 193 */
							BgL_tmp1778z00_2065 = (BGl_za2bigloozd2profileza2zd2zz__paramz00 =
								BINT(BgL_vz00_8), BUNSPEC);
						}
					BGL_EXITD_POP_PROTECT(BgL_top1779z00_2066);
					BUNSPEC;
					BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
					BgL_tmp1778z00_2065;
				}
			}
			return BINT(BgL_vz00_8);
		}

	}



/* &bigloo-profile-set! */
	obj_t BGl_z62bigloozd2profilezd2setz12z70zz__paramz00(obj_t BgL_envz00_1824,
		obj_t BgL_vz00_1825)
	{
		{	/* Llib/param.scm 190 */
			{	/* Llib/param.scm 190 */
				int BgL_auxz00_2079;

				{	/* Llib/param.scm 190 */
					obj_t BgL_tmpz00_2080;

					if (INTEGERP(BgL_vz00_1825))
						{	/* Llib/param.scm 190 */
							BgL_tmpz00_2080 = BgL_vz00_1825;
						}
					else
						{
							obj_t BgL_auxz00_2083;

							BgL_auxz00_2083 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
								BINT(7037L), BGl_string1663z00zz__paramz00,
								BGl_string1648z00zz__paramz00, BgL_vz00_1825);
							FAILURE(BgL_auxz00_2083, BFALSE, BFALSE);
						}
					BgL_auxz00_2079 = CINT(BgL_tmpz00_2080);
				}
				return BGl_bigloozd2profilezd2setz12z12zz__paramz00(BgL_auxz00_2079);
			}
		}

	}



/* bigloo-trace-color */
	BGL_EXPORTED_DEF bool_t BGl_bigloozd2tracezd2colorz00zz__paramz00(void)
	{
		{	/* Llib/param.scm 200 */
			return BGl_za2bigloozd2tracezd2colorza2z00zz__paramz00;
		}

	}



/* &bigloo-trace-color */
	obj_t BGl_z62bigloozd2tracezd2colorz62zz__paramz00(obj_t BgL_envz00_1826)
	{
		{	/* Llib/param.scm 200 */
			return BBOOL(BGl_bigloozd2tracezd2colorz00zz__paramz00());
		}

	}



/* bigloo-trace-color-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2tracezd2colorzd2setz12zc0zz__paramz00(bool_t BgL_vz00_9)
	{
		{	/* Llib/param.scm 200 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 200 */
				obj_t BgL_tmp1782z00_2091;

				BgL_tmp1782z00_2091 = (BGl_za2bigloozd2tracezd2colorza2z00zz__paramz00 =
					BgL_vz00_9, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1782z00_2091;
			}
			return BBOOL(BgL_vz00_9);
		}

	}



/* &bigloo-trace-color-set! */
	obj_t BGl_z62bigloozd2tracezd2colorzd2setz12za2zz__paramz00(obj_t
		BgL_envz00_1827, obj_t BgL_vz00_1828)
	{
		{	/* Llib/param.scm 200 */
			return
				BGl_bigloozd2tracezd2colorzd2setz12zc0zz__paramz00(CBOOL
				(BgL_vz00_1828));
		}

	}



/* bigloo-trace */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2tracezd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 205 */
			return BGl_za2bigloozd2traceza2zd2zz__paramz00;
		}

	}



/* &bigloo-trace */
	obj_t BGl_z62bigloozd2tracezb0zz__paramz00(obj_t BgL_envz00_1829)
	{
		{	/* Llib/param.scm 205 */
			return BGl_bigloozd2tracezd2zz__paramz00();
		}

	}



/* bigloo-trace-set! */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2tracezd2setz12z12zz__paramz00(obj_t
		BgL_vz00_10)
	{
		{	/* Llib/param.scm 205 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 205 */
				obj_t BgL_tmp1783z00_2098;

				BgL_tmp1783z00_2098 = (BGl_za2bigloozd2traceza2zd2zz__paramz00 =
					BgL_vz00_10, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1783z00_2098;
			}
			return BgL_vz00_10;
		}

	}



/* &bigloo-trace-set! */
	obj_t BGl_z62bigloozd2tracezd2setz12z70zz__paramz00(obj_t BgL_envz00_1830,
		obj_t BgL_vz00_1831)
	{
		{	/* Llib/param.scm 205 */
			{	/* Llib/param.scm 205 */
				obj_t BgL_auxz00_2101;

				if (BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00
					(BgL_vz00_1831))
					{	/* Llib/param.scm 205 */
						BgL_auxz00_2101 = BgL_vz00_1831;
					}
				else
					{
						obj_t BgL_auxz00_2104;

						BgL_auxz00_2104 =
							BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
							BINT(7691L), BGl_string1664z00zz__paramz00,
							BGl_string1665z00zz__paramz00, BgL_vz00_1831);
						FAILURE(BgL_auxz00_2104, BFALSE, BFALSE);
					}
				return BGl_bigloozd2tracezd2setz12z12zz__paramz00(BgL_auxz00_2101);
			}
		}

	}



/* bigloo-trace-stack-depth */
	BGL_EXPORTED_DEF int BGl_bigloozd2tracezd2stackzd2depthzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 216 */
			return (int) (BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00);
		}

	}



/* &bigloo-trace-stack-depth */
	obj_t BGl_z62bigloozd2tracezd2stackzd2depthzb0zz__paramz00(obj_t
		BgL_envz00_1832)
	{
		{	/* Llib/param.scm 216 */
			return BINT(BGl_bigloozd2tracezd2stackzd2depthzd2zz__paramz00());
		}

	}



/* bigloo-trace-stack-depth-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2tracezd2stackzd2depthzd2setz12z12zz__paramz00(int BgL_vz00_11)
	{
		{	/* Llib/param.scm 216 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 216 */
				obj_t BgL_tmp1785z00_2112;

				BgL_tmp1785z00_2112 =
					(BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00 =
					(long) (BgL_vz00_11), BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1785z00_2112;
			}
			return BINT(BgL_vz00_11);
		}

	}



/* &bigloo-trace-stack-depth-set! */
	obj_t BGl_z62bigloozd2tracezd2stackzd2depthzd2setz12z70zz__paramz00(obj_t
		BgL_envz00_1833, obj_t BgL_vz00_1834)
	{
		{	/* Llib/param.scm 216 */
			{	/* Llib/param.scm 216 */
				int BgL_auxz00_2117;

				{	/* Llib/param.scm 216 */
					obj_t BgL_tmpz00_2118;

					if (INTEGERP(BgL_vz00_1834))
						{	/* Llib/param.scm 216 */
							BgL_tmpz00_2118 = BgL_vz00_1834;
						}
					else
						{
							obj_t BgL_auxz00_2121;

							BgL_auxz00_2121 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
								BINT(8227L), BGl_string1666z00zz__paramz00,
								BGl_string1648z00zz__paramz00, BgL_vz00_1834);
							FAILURE(BgL_auxz00_2121, BFALSE, BFALSE);
						}
					BgL_auxz00_2117 = CINT(BgL_tmpz00_2118);
				}
				return
					BGl_bigloozd2tracezd2stackzd2depthzd2setz12z12zz__paramz00
					(BgL_auxz00_2117);
			}
		}

	}



/* bigloo-case-sensitive */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2casezd2sensitivez00zz__paramz00(void)
	{
		{	/* Llib/param.scm 231 */
			return BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00;
		}

	}



/* &bigloo-case-sensitive */
	obj_t BGl_z62bigloozd2casezd2sensitivez62zz__paramz00(obj_t BgL_envz00_1835)
	{
		{	/* Llib/param.scm 231 */
			return BGl_bigloozd2casezd2sensitivez00zz__paramz00();
		}

	}



/* bigloo-case-sensitive-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2casezd2sensitivezd2setz12zc0zz__paramz00(obj_t BgL_vz00_12)
	{
		{	/* Llib/param.scm 231 */
			{	/* Llib/param.scm 231 */
				obj_t BgL_top1788z00_2129;

				BgL_top1788z00_2129 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top1788z00_2129,
					BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BUNSPEC;
				{	/* Llib/param.scm 231 */
					obj_t BgL_tmp1787z00_2128;

					if (CBOOL(BGl_memqz00zz__r4_pairs_and_lists_6_3z00(BgL_vz00_12,
								BGl_list1667z00zz__paramz00)))
						{	/* Llib/param.scm 235 */
							BgL_tmp1787z00_2128 =
								(BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00 =
								BgL_vz00_12, BUNSPEC);
						}
					else
						{	/* Llib/param.scm 235 */
							BgL_tmp1787z00_2128 =
								(BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00 =
								BGl_errorz00zz__errorz00(BGl_string1672z00zz__paramz00,
									BGl_string1673z00zz__paramz00, BgL_vz00_12), BUNSPEC);
						}
					BGL_EXITD_POP_PROTECT(BgL_top1788z00_2129);
					BUNSPEC;
					BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
					BgL_tmp1787z00_2128;
				}
			}
			return BgL_vz00_12;
		}

	}



/* &bigloo-case-sensitive-set! */
	obj_t BGl_z62bigloozd2casezd2sensitivezd2setz12za2zz__paramz00(obj_t
		BgL_envz00_1836, obj_t BgL_vz00_1837)
	{
		{	/* Llib/param.scm 231 */
			{	/* Llib/param.scm 231 */
				obj_t BgL_auxz00_2139;

				if (SYMBOLP(BgL_vz00_1837))
					{	/* Llib/param.scm 231 */
						BgL_auxz00_2139 = BgL_vz00_1837;
					}
				else
					{
						obj_t BgL_auxz00_2142;

						BgL_auxz00_2142 =
							BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
							BINT(9057L), BGl_string1674z00zz__paramz00,
							BGl_string1675z00zz__paramz00, BgL_vz00_1837);
						FAILURE(BgL_auxz00_2142, BFALSE, BFALSE);
					}
				return
					BGl_bigloozd2casezd2sensitivezd2setz12zc0zz__paramz00
					(BgL_auxz00_2139);
			}
		}

	}



/* bigloo-initialized! */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2initializa7edz12z67zz__paramz00(void)
	{
		{	/* Llib/param.scm 248 */
			return (BGl_za2bigloozd2initializa7edpza2z75zz__paramz00 =
				((bool_t) 1), BUNSPEC);
		}

	}



/* &bigloo-initialized! */
	obj_t BGl_z62bigloozd2initializa7edz12z05zz__paramz00(obj_t BgL_envz00_1838)
	{
		{	/* Llib/param.scm 248 */
			return BGl_bigloozd2initializa7edz12z67zz__paramz00();
		}

	}



/* bigloo-initialized? */
	BGL_EXPORTED_DEF bool_t BGl_bigloozd2initializa7edzf3z86zz__paramz00(void)
	{
		{	/* Llib/param.scm 254 */
			return BGl_za2bigloozd2initializa7edpza2z75zz__paramz00;
		}

	}



/* &bigloo-initialized? */
	obj_t BGl_z62bigloozd2initializa7edzf3ze4zz__paramz00(obj_t BgL_envz00_1839)
	{
		{	/* Llib/param.scm 254 */
			return BBOOL(BGl_bigloozd2initializa7edzf3z86zz__paramz00());
		}

	}



/* bigloo-load-reader */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2loadzd2readerz00zz__paramz00(void)
	{
		{	/* Llib/param.scm 260 */
			return BGl_za2bigloozd2loadzd2readerza2z00zz__paramz00;
		}

	}



/* &bigloo-load-reader */
	obj_t BGl_z62bigloozd2loadzd2readerz62zz__paramz00(obj_t BgL_envz00_1840)
	{
		{	/* Llib/param.scm 260 */
			return BGl_bigloozd2loadzd2readerz00zz__paramz00();
		}

	}



/* bigloo-load-reader-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2loadzd2readerzd2setz12zc0zz__paramz00(obj_t BgL_vz00_13)
	{
		{	/* Llib/param.scm 260 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 260 */
				obj_t BgL_tmp1791z00_2151;

				BgL_tmp1791z00_2151 = (BGl_za2bigloozd2loadzd2readerza2z00zz__paramz00 =
					BgL_vz00_13, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1791z00_2151;
			}
			return BgL_vz00_13;
		}

	}



/* &bigloo-load-reader-set! */
	obj_t BGl_z62bigloozd2loadzd2readerzd2setz12za2zz__paramz00(obj_t
		BgL_envz00_1841, obj_t BgL_vz00_1842)
	{
		{	/* Llib/param.scm 260 */
			return BGl_bigloozd2loadzd2readerzd2setz12zc0zz__paramz00(BgL_vz00_1842);
		}

	}



/* bigloo-load-module */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2loadzd2modulez00zz__paramz00(void)
	{
		{	/* Llib/param.scm 265 */
			return BGl_za2bigloozd2loadzd2moduleza2z00zz__paramz00;
		}

	}



/* &bigloo-load-module */
	obj_t BGl_z62bigloozd2loadzd2modulez62zz__paramz00(obj_t BgL_envz00_1843)
	{
		{	/* Llib/param.scm 265 */
			return BGl_bigloozd2loadzd2modulez00zz__paramz00();
		}

	}



/* bigloo-load-module-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2loadzd2modulezd2setz12zc0zz__paramz00(obj_t BgL_vz00_14)
	{
		{	/* Llib/param.scm 265 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 265 */
				obj_t BgL_tmp1792z00_2156;

				BgL_tmp1792z00_2156 = (BGl_za2bigloozd2loadzd2moduleza2z00zz__paramz00 =
					BgL_vz00_14, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1792z00_2156;
			}
			return BgL_vz00_14;
		}

	}



/* &bigloo-load-module-set! */
	obj_t BGl_z62bigloozd2loadzd2modulezd2setz12za2zz__paramz00(obj_t
		BgL_envz00_1844, obj_t BgL_vz00_1845)
	{
		{	/* Llib/param.scm 265 */
			return BGl_bigloozd2loadzd2modulezd2setz12zc0zz__paramz00(BgL_vz00_1845);
		}

	}



/* bigloo-module-extension-handler */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2modulezd2extensionzd2handlerzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 270 */
			return BGl_za2bigloozd2modulezd2extensionzd2handlerza2zd2zz__paramz00;
		}

	}



/* &bigloo-module-extension-handler */
	obj_t BGl_z62bigloozd2modulezd2extensionzd2handlerzb0zz__paramz00(obj_t
		BgL_envz00_1846)
	{
		{	/* Llib/param.scm 270 */
			return BGl_bigloozd2modulezd2extensionzd2handlerzd2zz__paramz00();
		}

	}



/* bigloo-module-extension-handler-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2modulezd2extensionzd2handlerzd2setz12z12zz__paramz00(obj_t
		BgL_vz00_15)
	{
		{	/* Llib/param.scm 270 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 270 */
				obj_t BgL_tmp1793z00_2161;

				BgL_tmp1793z00_2161 =
					(BGl_za2bigloozd2modulezd2extensionzd2handlerza2zd2zz__paramz00 =
					BgL_vz00_15, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1793z00_2161;
			}
			return BgL_vz00_15;
		}

	}



/* &bigloo-module-extension-handler-set! */
	obj_t
		BGl_z62bigloozd2modulezd2extensionzd2handlerzd2setz12z70zz__paramz00(obj_t
		BgL_envz00_1847, obj_t BgL_vz00_1848)
	{
		{	/* Llib/param.scm 270 */
			return
				BGl_bigloozd2modulezd2extensionzd2handlerzd2setz12z12zz__paramz00
				(BgL_vz00_1848);
		}

	}



/* bigloo-eval-strict-module */
	BGL_EXPORTED_DEF bool_t
		BGl_bigloozd2evalzd2strictzd2modulezd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 275 */
			return BGl_za2bigloozd2evalzd2strictzd2moduleza2zd2zz__paramz00;
		}

	}



/* &bigloo-eval-strict-module */
	obj_t BGl_z62bigloozd2evalzd2strictzd2modulezb0zz__paramz00(obj_t
		BgL_envz00_1849)
	{
		{	/* Llib/param.scm 275 */
			return BBOOL(BGl_bigloozd2evalzd2strictzd2modulezd2zz__paramz00());
		}

	}



/* bigloo-eval-strict-module-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2evalzd2strictzd2modulezd2setz12z12zz__paramz00(bool_t
		BgL_vz00_16)
	{
		{	/* Llib/param.scm 275 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 275 */
				obj_t BgL_tmp1794z00_2167;

				BgL_tmp1794z00_2167 =
					(BGl_za2bigloozd2evalzd2strictzd2moduleza2zd2zz__paramz00 =
					BgL_vz00_16, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1794z00_2167;
			}
			return BBOOL(BgL_vz00_16);
		}

	}



/* &bigloo-eval-strict-module-set! */
	obj_t BGl_z62bigloozd2evalzd2strictzd2modulezd2setz12z70zz__paramz00(obj_t
		BgL_envz00_1850, obj_t BgL_vz00_1851)
	{
		{	/* Llib/param.scm 275 */
			return
				BGl_bigloozd2evalzd2strictzd2modulezd2setz12z12zz__paramz00(CBOOL
				(BgL_vz00_1851));
		}

	}



/* bigloo-library-path */
	BGL_EXPORTED_DEF obj_t BGl_bigloozd2libraryzd2pathz00zz__paramz00(void)
	{
		{	/* Llib/param.scm 280 */
			return BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00;
		}

	}



/* &bigloo-library-path */
	obj_t BGl_z62bigloozd2libraryzd2pathz62zz__paramz00(obj_t BgL_envz00_1852)
	{
		{	/* Llib/param.scm 280 */
			return BGl_bigloozd2libraryzd2pathz00zz__paramz00();
		}

	}



/* bigloo-library-path-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2libraryzd2pathzd2setz12zc0zz__paramz00(obj_t BgL_vz00_17)
	{
		{	/* Llib/param.scm 280 */
			{	/* Llib/param.scm 280 */
				obj_t BgL_top1796z00_2175;

				BgL_top1796z00_2175 = BGL_EXITD_TOP_AS_OBJ();
				BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BGL_EXITD_PUSH_PROTECT(BgL_top1796z00_2175,
					BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BUNSPEC;
				{	/* Llib/param.scm 280 */
					obj_t BgL_tmp1795z00_2174;

					if (BGl_listzf3zf3zz__r4_pairs_and_lists_6_3z00(BgL_vz00_17))
						{	/* Llib/param.scm 286 */
							bool_t BgL_test1798z00_2181;

							{
								obj_t BgL_l1078z00_1178;

								BgL_l1078z00_1178 = BgL_vz00_17;
							BgL_zc3z04anonymousza31233ze3z87_1179:
								if (NULLP(BgL_l1078z00_1178))
									{	/* Llib/param.scm 286 */
										BgL_test1798z00_2181 = ((bool_t) 1);
									}
								else
									{	/* Llib/param.scm 286 */
										bool_t BgL_test1800z00_2184;

										{	/* Llib/param.scm 286 */
											obj_t BgL_tmpz00_2185;

											BgL_tmpz00_2185 = CAR(((obj_t) BgL_l1078z00_1178));
											BgL_test1800z00_2184 = STRINGP(BgL_tmpz00_2185);
										}
										if (BgL_test1800z00_2184)
											{
												obj_t BgL_l1078z00_2189;

												BgL_l1078z00_2189 = CDR(((obj_t) BgL_l1078z00_1178));
												BgL_l1078z00_1178 = BgL_l1078z00_2189;
												goto BgL_zc3z04anonymousza31233ze3z87_1179;
											}
										else
											{	/* Llib/param.scm 286 */
												BgL_test1798z00_2181 = ((bool_t) 0);
											}
									}
							}
							if (BgL_test1798z00_2181)
								{	/* Llib/param.scm 286 */
									BgL_tmp1795z00_2174 =
										(BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 =
										BgL_vz00_17, BUNSPEC);
								}
							else
								{	/* Llib/param.scm 289 */
									obj_t BgL_arg1224z00_1160;

									{	/* Llib/param.scm 289 */
										obj_t BgL_hook1085z00_1161;

										BgL_hook1085z00_1161 = MAKE_YOUNG_PAIR(BFALSE, BNIL);
										{
											obj_t BgL_l1082z00_1163;
											obj_t BgL_h1083z00_1164;

											BgL_l1082z00_1163 = BgL_vz00_17;
											BgL_h1083z00_1164 = BgL_hook1085z00_1161;
										BgL_zc3z04anonymousza31225ze3z87_1165:
											if (NULLP(BgL_l1082z00_1163))
												{	/* Llib/param.scm 289 */
													BgL_arg1224z00_1160 = CDR(BgL_hook1085z00_1161);
												}
											else
												{	/* Llib/param.scm 289 */
													bool_t BgL_test1802z00_2196;

													{	/* Llib/param.scm 289 */
														bool_t BgL_test1803z00_2197;

														{	/* Llib/param.scm 289 */
															obj_t BgL_tmpz00_2198;

															BgL_tmpz00_2198 =
																CAR(((obj_t) BgL_l1082z00_1163));
															BgL_test1803z00_2197 = STRINGP(BgL_tmpz00_2198);
														}
														if (BgL_test1803z00_2197)
															{	/* Llib/param.scm 289 */
																BgL_test1802z00_2196 = ((bool_t) 0);
															}
														else
															{	/* Llib/param.scm 289 */
																BgL_test1802z00_2196 = ((bool_t) 1);
															}
													}
													if (BgL_test1802z00_2196)
														{	/* Llib/param.scm 289 */
															obj_t BgL_nh1084z00_1170;

															{	/* Llib/param.scm 289 */
																obj_t BgL_arg1231z00_1172;

																BgL_arg1231z00_1172 =
																	CAR(((obj_t) BgL_l1082z00_1163));
																BgL_nh1084z00_1170 =
																	MAKE_YOUNG_PAIR(BgL_arg1231z00_1172, BNIL);
															}
															SET_CDR(BgL_h1083z00_1164, BgL_nh1084z00_1170);
															{	/* Llib/param.scm 289 */
																obj_t BgL_arg1230z00_1171;

																BgL_arg1230z00_1171 =
																	CDR(((obj_t) BgL_l1082z00_1163));
																{
																	obj_t BgL_h1083z00_2209;
																	obj_t BgL_l1082z00_2208;

																	BgL_l1082z00_2208 = BgL_arg1230z00_1171;
																	BgL_h1083z00_2209 = BgL_nh1084z00_1170;
																	BgL_h1083z00_1164 = BgL_h1083z00_2209;
																	BgL_l1082z00_1163 = BgL_l1082z00_2208;
																	goto BgL_zc3z04anonymousza31225ze3z87_1165;
																}
															}
														}
													else
														{	/* Llib/param.scm 289 */
															obj_t BgL_arg1232z00_1173;

															BgL_arg1232z00_1173 =
																CDR(((obj_t) BgL_l1082z00_1163));
															{
																obj_t BgL_l1082z00_2212;

																BgL_l1082z00_2212 = BgL_arg1232z00_1173;
																BgL_l1082z00_1163 = BgL_l1082z00_2212;
																goto BgL_zc3z04anonymousza31225ze3z87_1165;
															}
														}
												}
										}
									}
									BgL_tmp1795z00_2174 =
										(BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 =
										BGl_errorz00zz__errorz00(BGl_symbol1676z00zz__paramz00,
											BGl_string1678z00zz__paramz00, BgL_arg1224z00_1160),
										BUNSPEC);
								}
						}
					else
						{	/* Llib/param.scm 284 */
							BgL_tmp1795z00_2174 =
								(BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 =
								BGl_errorz00zz__errorz00(BGl_symbol1676z00zz__paramz00,
									BGl_string1679z00zz__paramz00, BgL_vz00_17), BUNSPEC);
						}
					BGL_EXITD_POP_PROTECT(BgL_top1796z00_2175);
					BUNSPEC;
					BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
					BgL_tmp1795z00_2174;
				}
			}
			return BgL_vz00_17;
		}

	}



/* &bigloo-library-path-set! */
	obj_t BGl_z62bigloozd2libraryzd2pathzd2setz12za2zz__paramz00(obj_t
		BgL_envz00_1853, obj_t BgL_vz00_1854)
	{
		{	/* Llib/param.scm 280 */
			{	/* Llib/param.scm 280 */
				obj_t BgL_auxz00_2217;

				if (BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00
					(BgL_vz00_1854))
					{	/* Llib/param.scm 280 */
						BgL_auxz00_2217 = BgL_vz00_1854;
					}
				else
					{
						obj_t BgL_auxz00_2220;

						BgL_auxz00_2220 =
							BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
							BINT(11395L), BGl_string1680z00zz__paramz00,
							BGl_string1665z00zz__paramz00, BgL_vz00_1854);
						FAILURE(BgL_auxz00_2220, BFALSE, BFALSE);
					}
				return
					BGl_bigloozd2libraryzd2pathzd2setz12zc0zz__paramz00(BgL_auxz00_2217);
			}
		}

	}



/* bigloo-dns-enable-cache */
	BGL_EXPORTED_DEF bool_t bgl_dns_enable_cache(void)
	{
		{	/* Llib/param.scm 296 */
			return BGl_za2bigloozd2dnszd2enablezd2cacheza2zd2zz__paramz00;
		}

	}



/* &bigloo-dns-enable-cache */
	obj_t BGl_z62bigloozd2dnszd2enablezd2cachezb0zz__paramz00(obj_t
		BgL_envz00_1855)
	{
		{	/* Llib/param.scm 296 */
			return BBOOL(bgl_dns_enable_cache());
		}

	}



/* bigloo-dns-enable-cache-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2dnszd2enablezd2cachezd2setz12z12zz__paramz00(bool_t
		BgL_vz00_18)
	{
		{	/* Llib/param.scm 296 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 296 */
				obj_t BgL_tmp1805z00_2227;

				BgL_tmp1805z00_2227 =
					(BGl_za2bigloozd2dnszd2enablezd2cacheza2zd2zz__paramz00 =
					BgL_vz00_18, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1805z00_2227;
			}
			return BBOOL(BgL_vz00_18);
		}

	}



/* &bigloo-dns-enable-cache-set! */
	obj_t BGl_z62bigloozd2dnszd2enablezd2cachezd2setz12z70zz__paramz00(obj_t
		BgL_envz00_1856, obj_t BgL_vz00_1857)
	{
		{	/* Llib/param.scm 296 */
			return
				BGl_bigloozd2dnszd2enablezd2cachezd2setz12z12zz__paramz00(CBOOL
				(BgL_vz00_1857));
		}

	}



/* bigloo-dns-cache-validity-timeout */
	BGL_EXPORTED_DEF long bgl_dns_cache_validity_timeout(void)
	{
		{	/* Llib/param.scm 301 */
			return BGl_za2bigloozd2dnszd2cachezd2validityzd2timeoutza2z00zz__paramz00;
		}

	}



/* &bigloo-dns-cache-validity-timeout */
	obj_t BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutz62zz__paramz00(obj_t
		BgL_envz00_1858)
	{
		{	/* Llib/param.scm 301 */
			return BINT(bgl_dns_cache_validity_timeout());
		}

	}



/* bigloo-dns-cache-validity-timeout-set! */
	BGL_EXPORTED_DEF obj_t
		BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12zc0zz__paramz00(long
		BgL_vz00_19)
	{
		{	/* Llib/param.scm 301 */
			BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
			{	/* Llib/param.scm 301 */
				obj_t BgL_tmp1806z00_2235;

				BgL_tmp1806z00_2235 =
					(BGl_za2bigloozd2dnszd2cachezd2validityzd2timeoutza2z00zz__paramz00 =
					BgL_vz00_19, BUNSPEC);
				BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00);
				BgL_tmp1806z00_2235;
			}
			return BINT(BgL_vz00_19);
		}

	}



/* &bigloo-dns-cache-validity-timeout-set! */
	obj_t
		BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12za2zz__paramz00
		(obj_t BgL_envz00_1859, obj_t BgL_vz00_1860)
	{
		{	/* Llib/param.scm 301 */
			{	/* Llib/param.scm 301 */
				long BgL_auxz00_2239;

				{	/* Llib/param.scm 301 */
					obj_t BgL_tmpz00_2240;

					if (INTEGERP(BgL_vz00_1860))
						{	/* Llib/param.scm 301 */
							BgL_tmpz00_2240 = BgL_vz00_1860;
						}
					else
						{
							obj_t BgL_auxz00_2243;

							BgL_auxz00_2243 =
								BGl_typezd2errorzd2zz__errorz00(BGl_string1646z00zz__paramz00,
								BINT(12234L), BGl_string1681z00zz__paramz00,
								BGl_string1648z00zz__paramz00, BgL_vz00_1860);
							FAILURE(BgL_auxz00_2243, BFALSE, BFALSE);
						}
					BgL_auxz00_2239 = (long) CINT(BgL_tmpz00_2240);
				}
				return
					BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12zc0zz__paramz00
					(BgL_auxz00_2239);
			}
		}

	}



/* object-init */
	obj_t BGl_objectzd2initzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 15 */
			return BUNSPEC;
		}

	}



/* generic-init */
	obj_t BGl_genericzd2initzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 15 */
			return BUNSPEC;
		}

	}



/* method-init */
	obj_t BGl_methodzd2initzd2zz__paramz00(void)
	{
		{	/* Llib/param.scm 15 */
			return BUNSPEC;
		}

	}



/* imported-modules-init */
	obj_t BGl_importedzd2moduleszd2initz00zz__paramz00(void)
	{
		{	/* Llib/param.scm 15 */
			BGl_modulezd2initializa7ationz75zz__objectz00(475449627L,
				BSTRING_TO_STRING(BGl_string1682z00zz__paramz00));
			BGl_modulezd2initializa7ationz75zz__threadz00(149516032L,
				BSTRING_TO_STRING(BGl_string1682z00zz__paramz00));
			BGl_modulezd2initializa7ationz75zz__configurez00(35034923L,
				BSTRING_TO_STRING(BGl_string1682z00zz__paramz00));
			return
				BGl_modulezd2initializa7ationz75zz__osz00(310000171L,
				BSTRING_TO_STRING(BGl_string1682z00zz__paramz00));
		}

	}

#ifdef __cplusplus
}
#endif
