/*===========================================================================*/
/*   (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-safe -O3 -fcfa-arithmetic -q -lib-dir /home/serrano/prgm/project/bigloo/4.7a/lib/bigloo/4.7a +rm -O3 -mklib -cc gcc -fsharing -q -unsafev -eval (set! *indent* 4) -stdc -c Llib/param.scm -indent -o objs/obj_s/Llib/param.c) */
/* GC selection */
#define THE_GC BOEHM_GC

/* 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);
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);
static obj_t BGl_symbol1680z00zz__paramz00 = BUNSPEC;
static obj_t BGl_symbol1682z00zz__paramz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_bigloozd2loadzd2readerz00zz__paramz00(void);
static obj_t BGl_symbol1687z00zz__paramz00 = BUNSPEC;
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_symbol1692z00zz__paramz00 = BUNSPEC;
static obj_t BGl_z62bigloozd2debugzd2modulez62zz__paramz00(obj_t);
static obj_t BGl_symbol1696z00zz__paramz00 = BUNSPEC;
static obj_t BGl_za2bigloozd2profileza2zd2zz__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_symbol1701z00zz__paramz00 = BUNSPEC;
static obj_t BGl_methodzd2initzd2zz__paramz00(void);
static bool_t BGl_za2bigloozd2initializa7edpza2z75zz__paramz00;
static obj_t BGl_symbol1706z00zz__paramz00 = BUNSPEC;
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_symbol1717z00zz__paramz00 = BUNSPEC;
static obj_t BGl_symbol1719z00zz__paramz00 = BUNSPEC;
extern obj_t BGl_bigloozd2typezd2errorzf2locationzf2zz__errorz00(obj_t, obj_t, obj_t, obj_t, obj_t);
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_z62bigloozd2initializa7edz12z05zz__paramz00(obj_t);
static bool_t BGl_za2bigloozd2strictzd2r5rszd2stringsza2zd2zz__paramz00;
static obj_t BGl_symbol1728z00zz__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_z62bigloozd2initializa7edzf3ze4zz__paramz00(obj_t);
static obj_t BGl_z62bigloozd2tracezd2colorzd2setz12za2zz__paramz00(obj_t, obj_t);
static obj_t BGl_za2bigloozd2traceza2zd2zz__paramz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_bigloozd2libraryzd2pathz00zz__paramz00(void);
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_list1716z00zz__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_za762biglooza7d2dnsza71735za7, BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2loadzd2modulezd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2load1736z00, BGl_z62bigloozd2loadzd2modulez62zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2modulezd2extensionzd2handlerzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2modu1737z00, BGl_z62bigloozd2modulezd2extensionzd2handlerzd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2debugzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2debu1738z00, BGl_z62bigloozd2debugzb0zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2initializa7edz12zd2envzb5zz__paramz00, BgL_bgl_za762biglooza7d2init1739z00, BGl_z62bigloozd2initializa7edz12z05zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2loadzd2readerzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2load1740z00, BGl_z62bigloozd2loadzd2readerz62zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2colorzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2trac1741z00, BGl_z62bigloozd2tracezd2colorzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2debugzd2modulezd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2debu1742z00, BGl_z62bigloozd2debugzd2modulez62zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2modulezd2extensionzd2handlerzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2modu1743z00, BGl_z62bigloozd2modulezd2extensionzd2handlerzb0zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2loadzd2modulezd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2load1744z00, BGl_z62bigloozd2loadzd2modulezd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2trac1745z00, BGl_z62bigloozd2tracezb0zz__paramz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string1700z00zz__paramz00, BgL_bgl_string1700za700za7za7_1746za7, "bigloo-warning", 14 );
BGL_DEFINE_STRING(BGl_string1702z00zz__paramz00, BgL_bgl_string1702za700za7za7_1747za7, "bigloo-warning-set!", 19 );
BGL_DEFINE_STRING(BGl_string1703z00zz__paramz00, BgL_bgl_string1703za700za7za7_1748za7, "Illegal warning level", 21 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2casezd2sensitivezd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2case1749z00, BGl_z62bigloozd2casezd2sensitivez62zz__paramz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string1704z00zz__paramz00, BgL_bgl_string1704za700za7za7_1750za7, "&bigloo-warning-set!", 20 );
BGL_DEFINE_STRING(BGl_string1705z00zz__paramz00, BgL_bgl_string1705za700za7za7_1751za7, "bigloo-profile", 14 );
BGL_DEFINE_STRING(BGl_string1707z00zz__paramz00, BgL_bgl_string1707za700za7za7_1752za7, "bigloo-profile-set!", 19 );
BGL_DEFINE_STRING(BGl_string1708z00zz__paramz00, BgL_bgl_string1708za700za7za7_1753za7, "Illegal profile level", 21 );
BGL_DEFINE_STRING(BGl_string1709z00zz__paramz00, BgL_bgl_string1709za700za7za7_1754za7, "&bigloo-profile-set!", 20 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2trac1755z00, BGl_z62bigloozd2tracezd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2strictzd2r5rszd2stringszd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2stri1756z00, BGl_z62bigloozd2strictzd2r5rszd2stringszb0zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2profilezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2prof1757z00, BGl_z62bigloozd2profilezd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2dnszd2enablezd2cachezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2dnsza71758za7, BGl_z62bigloozd2dnszd2enablezd2cachezd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2evalzd2strictzd2modulezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2eval1759z00, BGl_z62bigloozd2evalzd2strictzd2modulezd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2colorzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2trac1760z00, BGl_z62bigloozd2tracezd2colorz62zz__paramz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string1710z00zz__paramz00, BgL_bgl_string1710za700za7za7_1761za7, "bigloo-trace", 12 );
BGL_DEFINE_STRING(BGl_string1711z00zz__paramz00, BgL_bgl_string1711za700za7za7_1762za7, "pair-nil", 8 );
BGL_DEFINE_STRING(BGl_string1712z00zz__paramz00, BgL_bgl_string1712za700za7za7_1763za7, "&bigloo-trace-set!", 18 );
BGL_DEFINE_STRING(BGl_string1713z00zz__paramz00, BgL_bgl_string1713za700za7za7_1764za7, "&bigloo-trace-stack-depth-set!", 30 );
BGL_DEFINE_STRING(BGl_string1714z00zz__paramz00, BgL_bgl_string1714za700za7za7_1765za7, "bigloo-case-sensitive", 21 );
BGL_DEFINE_STRING(BGl_string1715z00zz__paramz00, BgL_bgl_string1715za700za7za7_1766za7, "symbol", 6 );
BGL_DEFINE_STRING(BGl_string1718z00zz__paramz00, BgL_bgl_string1718za700za7za7_1767za7, "downcase", 8 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2stackzd2depthzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2trac1768z00, BGl_z62bigloozd2tracezd2stackzd2depthzd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2compilerzd2debugzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2comp1769z00, BGl_z62bigloozd2compilerzd2debugz62zz__paramz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string1720z00zz__paramz00, BgL_bgl_string1720za700za7za7_1770za7, "upcase", 6 );
BGL_DEFINE_STRING(BGl_string1721z00zz__paramz00, BgL_bgl_string1721za700za7za7_1771za7, "bigloo-sensitivity-set!", 23 );
BGL_DEFINE_STRING(BGl_string1722z00zz__paramz00, BgL_bgl_string1722za700za7za7_1772za7, "Illegal sensitive value", 23 );
BGL_DEFINE_STRING(BGl_string1723z00zz__paramz00, BgL_bgl_string1723za700za7za7_1773za7, "&bigloo-case-sensitive-set!", 27 );
BGL_DEFINE_STRING(BGl_string1724z00zz__paramz00, BgL_bgl_string1724za700za7za7_1774za7, "bigloo-library-path", 19 );
BGL_DEFINE_STRING(BGl_string1725z00zz__paramz00, BgL_bgl_string1725za700za7za7_1775za7, "every", 5 );
BGL_DEFINE_STRING(BGl_string1726z00zz__paramz00, BgL_bgl_string1726za700za7za7_1776za7, "<@anonymous:1227>", 17 );
BGL_DEFINE_STRING(BGl_string1727z00zz__paramz00, BgL_bgl_string1727za700za7za7_1777za7, "pair", 4 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2compilerzd2debugzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2comp1778z00, BGl_z62bigloozd2compilerzd2debugzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string1729z00zz__paramz00, BgL_bgl_string1729za700za7za7_1779za7, "bigloo-library-path-set!", 24 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2loadzd2readerzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2load1780z00, BGl_z62bigloozd2loadzd2readerzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string1730z00zz__paramz00, BgL_bgl_string1730za700za7za7_1781za7, "Illegal values", 14 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2strictzd2r5rszd2stringszd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2stri1782z00, BGl_z62bigloozd2strictzd2r5rszd2stringszd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string1731z00zz__paramz00, BgL_bgl_string1731za700za7za7_1783za7, "Illegal list", 12 );
BGL_DEFINE_STRING(BGl_string1732z00zz__paramz00, BgL_bgl_string1732za700za7za7_1784za7, "&bigloo-library-path-set!", 25 );
BGL_DEFINE_STRING(BGl_string1733z00zz__paramz00, BgL_bgl_string1733za700za7za7_1785za7, "&bigloo-dns-cache-validity-timeout-set!", 39 );
BGL_DEFINE_STRING(BGl_string1734z00zz__paramz00, BgL_bgl_string1734za700za7za7_1786za7, "__param", 7 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2dnsza71787za7, BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutz62zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2warningzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2warn1788z00, BGl_z62bigloozd2warningzb0zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2casezd2sensitivezd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2case1789z00, BGl_z62bigloozd2casezd2sensitivezd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2debugzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2debu1790z00, BGl_z62bigloozd2debugzd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string1671z00zz__paramz00, BgL_bgl_string1671za700za7za7_1791za7, "param", 5 );
BGL_DEFINE_STRING(BGl_string1672z00zz__paramz00, BgL_bgl_string1672za700za7za7_1792za7, "BIGLOOTRACE", 11 );
BGL_DEFINE_STRING(BGl_string1673z00zz__paramz00, BgL_bgl_string1673za700za7za7_1793za7, "/tmp/bigloo/runtime/Llib/param.scm", 34 );
BGL_DEFINE_STRING(BGl_string1674z00zz__paramz00, BgL_bgl_string1674za700za7za7_1794za7, "toplevel-init", 13 );
BGL_DEFINE_STRING(BGl_string1675z00zz__paramz00, BgL_bgl_string1675za700za7za7_1795za7, "bstring", 7 );
BGL_DEFINE_STRING(BGl_string1676z00zz__paramz00, BgL_bgl_string1676za700za7za7_1796za7, "<@anonymous:1167>", 17 );
BGL_DEFINE_STRING(BGl_string1677z00zz__paramz00, BgL_bgl_string1677za700za7za7_1797za7, "map", 3 );
BGL_DEFINE_STRING(BGl_string1678z00zz__paramz00, BgL_bgl_string1678za700za7za7_1798za7, "list", 4 );
BGL_DEFINE_STRING(BGl_string1679z00zz__paramz00, BgL_bgl_string1679za700za7za7_1799za7, "BIGLOOSTACKDEPTH", 16 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2profilezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2prof1800z00, BGl_z62bigloozd2profilezb0zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2debugzd2modulezd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2debu1801z00, BGl_z62bigloozd2debugzd2modulezd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2initializa7edzf3zd2envz54zz__paramz00, BgL_bgl_za762biglooza7d2init1802z00, BGl_z62bigloozd2initializa7edzf3ze4zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2evalzd2strictzd2modulezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2eval1803z00, BGl_z62bigloozd2evalzd2strictzd2modulezb0zz__paramz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string1681z00zz__paramz00, BgL_bgl_string1681za700za7za7_1804za7, "sensitive", 9 );
BGL_DEFINE_STRING(BGl_string1683z00zz__paramz00, BgL_bgl_string1683za700za7za7_1805za7, "library-directory", 17 );
BGL_DEFINE_STRING(BGl_string1684z00zz__paramz00, BgL_bgl_string1684za700za7za7_1806za7, ".", 1 );
BGL_DEFINE_STRING(BGl_string1685z00zz__paramz00, BgL_bgl_string1685za700za7za7_1807za7, "bigloo-compiler-debug", 21 );
BGL_DEFINE_STRING(BGl_string1686z00zz__paramz00, BgL_bgl_string1686za700za7za7_1808za7, "bint", 4 );
BGL_DEFINE_STRING(BGl_string1688z00zz__paramz00, BgL_bgl_string1688za700za7za7_1809za7, "bigloo-compiler-debug-set!", 26 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2libraryzd2pathzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2libr1810z00, BGl_z62bigloozd2libraryzd2pathz62zz__paramz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string1689z00zz__paramz00, BgL_bgl_string1689za700za7za7_1811za7, "Illegal debug level", 19 );
BGL_DEFINE_STRING(BGl_string1690z00zz__paramz00, BgL_bgl_string1690za700za7za7_1812za7, "&bigloo-compiler-debug-set!", 27 );
BGL_DEFINE_STRING(BGl_string1691z00zz__paramz00, BgL_bgl_string1691za700za7za7_1813za7, "bigloo-debug", 12 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2libraryzd2pathzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2libr1814z00, BGl_z62bigloozd2libraryzd2pathzd2setz12za2zz__paramz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string1693z00zz__paramz00, BgL_bgl_string1693za700za7za7_1815za7, "bigloo-debug-set!", 17 );
BGL_DEFINE_STRING(BGl_string1694z00zz__paramz00, BgL_bgl_string1694za700za7za7_1816za7, "&bigloo-debug-set!", 18 );
BGL_DEFINE_STRING(BGl_string1695z00zz__paramz00, BgL_bgl_string1695za700za7za7_1817za7, "bigloo-debug-module", 19 );
BGL_DEFINE_STRING(BGl_string1697z00zz__paramz00, BgL_bgl_string1697za700za7za7_1818za7, "bigloo-debug-module-set!", 24 );
BGL_DEFINE_STRING(BGl_string1698z00zz__paramz00, BgL_bgl_string1698za700za7za7_1819za7, "Illegal debug module level", 26 );
BGL_DEFINE_STRING(BGl_string1699z00zz__paramz00, BgL_bgl_string1699za700za7za7_1820za7, "&bigloo-debug-module-set!", 25 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2tracezd2stackzd2depthzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2trac1821z00, BGl_z62bigloozd2tracezd2stackzd2depthzb0zz__paramz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2warningzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2warn1822z00, BGl_z62bigloozd2warningzd2setz12z70zz__paramz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2dnszd2enablezd2cachezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2dnsza71823za7, BGl_z62bigloozd2dnszd2enablezd2cachezb0zz__paramz00, 0L, BUNSPEC, 0);

/* contant bindings */
static void bgl_constant_bindings() {
BGL_BIND_PROCEDURE(BGl_bigloozd2dnszd2enablezd2cachezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2dnsza71823za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2warningzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2warn1822z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2stackzd2depthzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2trac1821z00);
BGL_BIND_STRING(BGl_string1699z00zz__paramz00, BgL_bgl_string1699za700za7za7_1820za7);
BGL_BIND_STRING(BGl_string1698z00zz__paramz00, BgL_bgl_string1698za700za7za7_1819za7);
BGL_BIND_STRING(BGl_string1697z00zz__paramz00, BgL_bgl_string1697za700za7za7_1818za7);
BGL_BIND_STRING(BGl_string1695z00zz__paramz00, BgL_bgl_string1695za700za7za7_1817za7);
BGL_BIND_STRING(BGl_string1694z00zz__paramz00, BgL_bgl_string1694za700za7za7_1816za7);
BGL_BIND_STRING(BGl_string1693z00zz__paramz00, BgL_bgl_string1693za700za7za7_1815za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2libraryzd2pathzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2libr1814z00);
BGL_BIND_STRING(BGl_string1691z00zz__paramz00, BgL_bgl_string1691za700za7za7_1813za7);
BGL_BIND_STRING(BGl_string1690z00zz__paramz00, BgL_bgl_string1690za700za7za7_1812za7);
BGL_BIND_STRING(BGl_string1689z00zz__paramz00, BgL_bgl_string1689za700za7za7_1811za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2libraryzd2pathzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2libr1810z00);
BGL_BIND_STRING(BGl_string1688z00zz__paramz00, BgL_bgl_string1688za700za7za7_1809za7);
BGL_BIND_STRING(BGl_string1686z00zz__paramz00, BgL_bgl_string1686za700za7za7_1808za7);
BGL_BIND_STRING(BGl_string1685z00zz__paramz00, BgL_bgl_string1685za700za7za7_1807za7);
BGL_BIND_STRING(BGl_string1684z00zz__paramz00, BgL_bgl_string1684za700za7za7_1806za7);
BGL_BIND_STRING(BGl_string1683z00zz__paramz00, BgL_bgl_string1683za700za7za7_1805za7);
BGL_BIND_STRING(BGl_string1681z00zz__paramz00, BgL_bgl_string1681za700za7za7_1804za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2evalzd2strictzd2modulezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2eval1803z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2initializa7edzf3zd2envz54zz__paramz00, BgL_bgl_za762biglooza7d2init1802z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2debugzd2modulezd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2debu1801z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2profilezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2prof1800z00);
BGL_BIND_STRING(BGl_string1679z00zz__paramz00, BgL_bgl_string1679za700za7za7_1799za7);
BGL_BIND_STRING(BGl_string1678z00zz__paramz00, BgL_bgl_string1678za700za7za7_1798za7);
BGL_BIND_STRING(BGl_string1677z00zz__paramz00, BgL_bgl_string1677za700za7za7_1797za7);
BGL_BIND_STRING(BGl_string1676z00zz__paramz00, BgL_bgl_string1676za700za7za7_1796za7);
BGL_BIND_STRING(BGl_string1675z00zz__paramz00, BgL_bgl_string1675za700za7za7_1795za7);
BGL_BIND_STRING(BGl_string1674z00zz__paramz00, BgL_bgl_string1674za700za7za7_1794za7);
BGL_BIND_STRING(BGl_string1673z00zz__paramz00, BgL_bgl_string1673za700za7za7_1793za7);
BGL_BIND_STRING(BGl_string1672z00zz__paramz00, BgL_bgl_string1672za700za7za7_1792za7);
BGL_BIND_STRING(BGl_string1671z00zz__paramz00, BgL_bgl_string1671za700za7za7_1791za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2debugzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2debu1790z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2casezd2sensitivezd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2case1789z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2warningzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2warn1788z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2dnsza71787za7);
BGL_BIND_STRING(BGl_string1734z00zz__paramz00, BgL_bgl_string1734za700za7za7_1786za7);
BGL_BIND_STRING(BGl_string1733z00zz__paramz00, BgL_bgl_string1733za700za7za7_1785za7);
BGL_BIND_STRING(BGl_string1732z00zz__paramz00, BgL_bgl_string1732za700za7za7_1784za7);
BGL_BIND_STRING(BGl_string1731z00zz__paramz00, BgL_bgl_string1731za700za7za7_1783za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2strictzd2r5rszd2stringszd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2stri1782z00);
BGL_BIND_STRING(BGl_string1730z00zz__paramz00, BgL_bgl_string1730za700za7za7_1781za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2readerzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2load1780z00);
BGL_BIND_STRING(BGl_string1729z00zz__paramz00, BgL_bgl_string1729za700za7za7_1779za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2compilerzd2debugzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2comp1778z00);
BGL_BIND_STRING(BGl_string1727z00zz__paramz00, BgL_bgl_string1727za700za7za7_1777za7);
BGL_BIND_STRING(BGl_string1726z00zz__paramz00, BgL_bgl_string1726za700za7za7_1776za7);
BGL_BIND_STRING(BGl_string1725z00zz__paramz00, BgL_bgl_string1725za700za7za7_1775za7);
BGL_BIND_STRING(BGl_string1724z00zz__paramz00, BgL_bgl_string1724za700za7za7_1774za7);
BGL_BIND_STRING(BGl_string1723z00zz__paramz00, BgL_bgl_string1723za700za7za7_1773za7);
BGL_BIND_STRING(BGl_string1722z00zz__paramz00, BgL_bgl_string1722za700za7za7_1772za7);
BGL_BIND_STRING(BGl_string1721z00zz__paramz00, BgL_bgl_string1721za700za7za7_1771za7);
BGL_BIND_STRING(BGl_string1720z00zz__paramz00, BgL_bgl_string1720za700za7za7_1770za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2compilerzd2debugzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2comp1769z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2stackzd2depthzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2trac1768z00);
BGL_BIND_STRING(BGl_string1718z00zz__paramz00, BgL_bgl_string1718za700za7za7_1767za7);
BGL_BIND_STRING(BGl_string1715z00zz__paramz00, BgL_bgl_string1715za700za7za7_1766za7);
BGL_BIND_STRING(BGl_string1714z00zz__paramz00, BgL_bgl_string1714za700za7za7_1765za7);
BGL_BIND_STRING(BGl_string1713z00zz__paramz00, BgL_bgl_string1713za700za7za7_1764za7);
BGL_BIND_STRING(BGl_string1712z00zz__paramz00, BgL_bgl_string1712za700za7za7_1763za7);
BGL_BIND_STRING(BGl_string1711z00zz__paramz00, BgL_bgl_string1711za700za7za7_1762za7);
BGL_BIND_STRING(BGl_string1710z00zz__paramz00, BgL_bgl_string1710za700za7za7_1761za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2colorzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2trac1760z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2evalzd2strictzd2modulezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2eval1759z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2dnszd2enablezd2cachezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2dnsza71758za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2profilezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2prof1757z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2strictzd2r5rszd2stringszd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2stri1756z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2trac1755z00);
BGL_BIND_STRING(BGl_string1709z00zz__paramz00, BgL_bgl_string1709za700za7za7_1754za7);
BGL_BIND_STRING(BGl_string1708z00zz__paramz00, BgL_bgl_string1708za700za7za7_1753za7);
BGL_BIND_STRING(BGl_string1707z00zz__paramz00, BgL_bgl_string1707za700za7za7_1752za7);
BGL_BIND_STRING(BGl_string1705z00zz__paramz00, BgL_bgl_string1705za700za7za7_1751za7);
BGL_BIND_STRING(BGl_string1704z00zz__paramz00, BgL_bgl_string1704za700za7za7_1750za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2casezd2sensitivezd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2case1749z00);
BGL_BIND_STRING(BGl_string1703z00zz__paramz00, BgL_bgl_string1703za700za7za7_1748za7);
BGL_BIND_STRING(BGl_string1702z00zz__paramz00, BgL_bgl_string1702za700za7za7_1747za7);
BGL_BIND_STRING(BGl_string1700z00zz__paramz00, BgL_bgl_string1700za700za7za7_1746za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2trac1745z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2modulezd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2load1744z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2modulezd2extensionzd2handlerzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2modu1743z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2debugzd2modulezd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2debu1742z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2tracezd2colorzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2trac1741z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2readerzd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2load1740z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2initializa7edz12zd2envzb5zz__paramz00, BgL_bgl_za762biglooza7d2init1739z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2debugzd2envz00zz__paramz00, BgL_bgl_za762biglooza7d2debu1738z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2modulezd2extensionzd2handlerzd2setz12zd2envzc0zz__paramz00, BgL_bgl_za762biglooza7d2modu1737z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2loadzd2modulezd2envzd2zz__paramz00, BgL_bgl_za762biglooza7d2load1736z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12zd2envz12zz__paramz00, BgL_bgl_za762biglooza7d2dnsza71735za7);
}

/* 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_za2parameterzd2mutexza2zd2zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1680z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1682z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1687z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_requirezd2initializa7ationz75zz__paramz00) );
ADD_ROOT( (void *)(&BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1692z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1696z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_za2bigloozd2profileza2zd2zz__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_symbol1701z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1706z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1717z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1719z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_symbol1728z00zz__paramz00) );
ADD_ROOT( (void *)(&BGl_za2bigloozd2traceza2zd2zz__paramz00) );
ADD_ROOT( (void *)(&BGl_list1716z00zz__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_1904, char * BgL_fromz00_1905)
{
{ 
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_symbol1680z00zz__paramz00 = 
bstring_to_symbol(BGl_string1681z00zz__paramz00); 
BGl_symbol1682z00zz__paramz00 = 
bstring_to_symbol(BGl_string1683z00zz__paramz00); 
BGl_symbol1687z00zz__paramz00 = 
bstring_to_symbol(BGl_string1688z00zz__paramz00); 
BGl_symbol1692z00zz__paramz00 = 
bstring_to_symbol(BGl_string1693z00zz__paramz00); 
BGl_symbol1696z00zz__paramz00 = 
bstring_to_symbol(BGl_string1697z00zz__paramz00); 
BGl_symbol1701z00zz__paramz00 = 
bstring_to_symbol(BGl_string1702z00zz__paramz00); 
BGl_symbol1706z00zz__paramz00 = 
bstring_to_symbol(BGl_string1707z00zz__paramz00); 
BGl_symbol1717z00zz__paramz00 = 
bstring_to_symbol(BGl_string1718z00zz__paramz00); 
BGl_symbol1719z00zz__paramz00 = 
bstring_to_symbol(BGl_string1720z00zz__paramz00); 
BGl_list1716z00zz__paramz00 = 
MAKE_YOUNG_PAIR(BGl_symbol1680z00zz__paramz00, 
MAKE_YOUNG_PAIR(BGl_symbol1717z00zz__paramz00, 
MAKE_YOUNG_PAIR(BGl_symbol1719z00zz__paramz00, BNIL))); 
return ( 
BGl_symbol1728z00zz__paramz00 = 
bstring_to_symbol(BGl_string1729z00zz__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_string1671z00zz__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_string1672z00zz__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_1110;
{ /* Llib/param.scm 208 */
 obj_t BgL_arg1192z00_1111;
BgL_arg1192z00_1111 = 
CAR(BgL_l1072z00_1095); 
{ /* Llib/param.scm 208 */
 obj_t BgL_stringz00_1596;
if(
STRINGP(BgL_arg1192z00_1111))
{ /* Llib/param.scm 208 */
BgL_stringz00_1596 = BgL_arg1192z00_1111; }  else 
{ 
 obj_t BgL_auxz00_1943;
BgL_auxz00_1943 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(7800L), BGl_string1674z00zz__paramz00, BGl_string1675z00zz__paramz00, BgL_arg1192z00_1111); 
FAILURE(BgL_auxz00_1943,BFALSE,BFALSE);} 
BgL_arg1189z00_1110 = 
bstring_to_symbol(BgL_stringz00_1596); } } 
BgL_head1074z00_1097 = 
MAKE_YOUNG_PAIR(BgL_arg1189z00_1110, BNIL); } 
{ /* Llib/param.scm 208 */
 obj_t BgL_g1077z00_1098;
BgL_g1077z00_1098 = 
CDR(BgL_l1072z00_1095); 
{ 
 obj_t BgL_l1072z00_1100; obj_t BgL_tail1075z00_1101;
BgL_l1072z00_1100 = BgL_g1077z00_1098; 
BgL_tail1075z00_1101 = BgL_head1074z00_1097; 
BgL_zc3z04anonymousza31167ze3z87_1102:
if(
PAIRP(BgL_l1072z00_1100))
{ /* Llib/param.scm 208 */
 obj_t BgL_newtail1076z00_1104;
{ /* Llib/param.scm 208 */
 obj_t BgL_arg1170z00_1106;
{ /* Llib/param.scm 208 */
 obj_t BgL_arg1187z00_1107;
BgL_arg1187z00_1107 = 
CAR(BgL_l1072z00_1100); 
{ /* Llib/param.scm 208 */
 obj_t BgL_stringz00_1599;
if(
STRINGP(BgL_arg1187z00_1107))
{ /* Llib/param.scm 208 */
BgL_stringz00_1599 = BgL_arg1187z00_1107; }  else 
{ 
 obj_t BgL_auxz00_1955;
BgL_auxz00_1955 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(7800L), BGl_string1676z00zz__paramz00, BGl_string1675z00zz__paramz00, BgL_arg1187z00_1107); 
FAILURE(BgL_auxz00_1955,BFALSE,BFALSE);} 
BgL_arg1170z00_1106 = 
bstring_to_symbol(BgL_stringz00_1599); } } 
BgL_newtail1076z00_1104 = 
MAKE_YOUNG_PAIR(BgL_arg1170z00_1106, BNIL); } 
SET_CDR(BgL_tail1075z00_1101, BgL_newtail1076z00_1104); 
{ 
 obj_t BgL_tail1075z00_1964; obj_t BgL_l1072z00_1962;
BgL_l1072z00_1962 = 
CDR(BgL_l1072z00_1100); 
BgL_tail1075z00_1964 = BgL_newtail1076z00_1104; 
BgL_tail1075z00_1101 = BgL_tail1075z00_1964; 
BgL_l1072z00_1100 = BgL_l1072z00_1962; 
goto BgL_zc3z04anonymousza31167ze3z87_1102;} }  else 
{ /* Llib/param.scm 208 */
if(
NULLP(BgL_l1072z00_1100))
{ /* Llib/param.scm 208 */
BGl_za2bigloozd2traceza2zd2zz__paramz00 = BgL_head1074z00_1097; }  else 
{ /* Llib/param.scm 208 */
BGl_za2bigloozd2traceza2zd2zz__paramz00 = 
BGl_bigloozd2typezd2errorzf2locationzf2zz__errorz00(BGl_string1677z00zz__paramz00, BGl_string1678z00zz__paramz00, BgL_l1072z00_1100, BGl_string1673z00zz__paramz00, 
BINT(7800L)); } } } } } }  else 
{ /* Llib/param.scm 207 */
BGl_za2bigloozd2traceza2zd2zz__paramz00 = BNIL; } } 
{ /* Llib/param.scm 217 */
 obj_t BgL_envzd2valuezd2_1113;
BgL_envzd2valuezd2_1113 = 
BGl_getenvz00zz__osz00(BGl_string1679z00zz__paramz00); 
if(
STRINGP(BgL_envzd2valuezd2_1113))
{ /* Llib/param.scm 219 */
 char * BgL_tmpz00_1972;
BgL_tmpz00_1972 = 
BSTRING_TO_STRING(BgL_envzd2valuezd2_1113); 
BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00 = 
BGL_STRTOL(BgL_tmpz00_1972, 0L, 10L); }  else 
{ /* Llib/param.scm 218 */
BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00 = 10L; } } 
BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00 = BGl_symbol1680z00zz__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_1115;
BgL_arg1195z00_1115 = 
BGl_bigloozd2configzd2zz__configurez00(BGl_symbol1682z00zz__paramz00); 
{ /* Llib/param.scm 281 */
 obj_t BgL_list1196z00_1116;
{ /* Llib/param.scm 281 */
 obj_t BgL_arg1197z00_1117;
BgL_arg1197z00_1117 = 
MAKE_YOUNG_PAIR(BgL_arg1195z00_1115, BNIL); 
BgL_list1196z00_1116 = 
MAKE_YOUNG_PAIR(BGl_string1684z00zz__paramz00, BgL_arg1197z00_1117); } 
BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 = BgL_list1196z00_1116; } } 
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_1803)
{
{ /* 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_tmp1832z00_1980;
BgL_tmp1832z00_1980 = ( 
BGl_za2bigloozd2strictzd2r5rszd2stringsza2zd2zz__paramz00 = BgL_vz00_3, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1832z00_1980; } 
return 
BBOOL(BgL_vz00_3);} 

}



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

}



/* bigloo-compiler-debug */
BGL_EXPORTED_DEF int BGl_bigloozd2compilerzd2debugz00zz__paramz00(void)
{
{ /* Llib/param.scm 142 */
{ /* Llib/param.scm 142 */
 obj_t BgL_tmpz00_1986;
{ /* Llib/param.scm 142 */
 obj_t BgL_aux1639z00_1860;
BgL_aux1639z00_1860 = BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00; 
if(
INTEGERP(BgL_aux1639z00_1860))
{ /* Llib/param.scm 142 */
BgL_tmpz00_1986 = BgL_aux1639z00_1860
; }  else 
{ 
 obj_t BgL_auxz00_1989;
BgL_auxz00_1989 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(4861L), BGl_string1685z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_aux1639z00_1860); 
FAILURE(BgL_auxz00_1989,BFALSE,BFALSE);} } 
return 
CINT(BgL_tmpz00_1986);} } 

}



/* &bigloo-compiler-debug */
obj_t BGl_z62bigloozd2compilerzd2debugz62zz__paramz00(obj_t BgL_envz00_1806)
{
{ /* 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_top1835z00_1997;
BgL_top1835z00_1997 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); 
BGL_EXITD_PUSH_PROTECT(BgL_top1835z00_1997, BGl_za2parameterzd2mutexza2zd2zz__paramz00); BUNSPEC; 
{ /* Llib/param.scm 142 */
 obj_t BgL_tmp1834z00_1996;
if(
(
(long)(BgL_vz00_4)<0L))
{ /* Llib/param.scm 145 */
BgL_tmp1834z00_1996 = ( 
BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_symbol1687z00zz__paramz00, BGl_string1689z00zz__paramz00, 
BINT(BgL_vz00_4)), BUNSPEC) ; }  else 
{ /* Llib/param.scm 145 */
BgL_tmp1834z00_1996 = ( 
BGl_za2bigloozd2compilerzd2debugza2z00zz__paramz00 = 
BINT(BgL_vz00_4), BUNSPEC) ; } 
BGL_EXITD_POP_PROTECT(BgL_top1835z00_1997); BUNSPEC; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1834z00_1996; } } 
return 
BINT(BgL_vz00_4);} 

}



/* &bigloo-compiler-debug-set! */
obj_t BGl_z62bigloozd2compilerzd2debugzd2setz12za2zz__paramz00(obj_t BgL_envz00_1807, obj_t BgL_vz00_1808)
{
{ /* Llib/param.scm 142 */
{ /* Llib/param.scm 142 */
 int BgL_auxz00_2010;
{ /* Llib/param.scm 142 */
 obj_t BgL_tmpz00_2011;
if(
INTEGERP(BgL_vz00_1808))
{ /* Llib/param.scm 142 */
BgL_tmpz00_2011 = BgL_vz00_1808
; }  else 
{ 
 obj_t BgL_auxz00_2014;
BgL_auxz00_2014 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(4861L), BGl_string1690z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_vz00_1808); 
FAILURE(BgL_auxz00_2014,BFALSE,BFALSE);} 
BgL_auxz00_2010 = 
CINT(BgL_tmpz00_2011); } 
return 
BGl_bigloozd2compilerzd2debugzd2setz12zc0zz__paramz00(BgL_auxz00_2010);} } 

}



/* bigloo-debug */
BGL_EXPORTED_DEF int bgl_debug(void)
{
{ /* Llib/param.scm 154 */
{ /* Llib/param.scm 154 */
 obj_t BgL_tmpz00_2020;
{ /* Llib/param.scm 154 */
 obj_t BgL_aux1641z00_1862;
BgL_aux1641z00_1862 = BGl_za2bigloozd2debugza2zd2zz__paramz00; 
if(
INTEGERP(BgL_aux1641z00_1862))
{ /* Llib/param.scm 154 */
BgL_tmpz00_2020 = BgL_aux1641z00_1862
; }  else 
{ 
 obj_t BgL_auxz00_2023;
BgL_auxz00_2023 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(5414L), BGl_string1691z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_aux1641z00_1862); 
FAILURE(BgL_auxz00_2023,BFALSE,BFALSE);} } 
return 
CINT(BgL_tmpz00_2020);} } 

}



/* &bigloo-debug */
obj_t BGl_z62bigloozd2debugzb0zz__paramz00(obj_t BgL_envz00_1809)
{
{ /* 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_top1840z00_2031;
BgL_top1840z00_2031 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); 
BGL_EXITD_PUSH_PROTECT(BgL_top1840z00_2031, BGl_za2parameterzd2mutexza2zd2zz__paramz00); BUNSPEC; 
{ /* Llib/param.scm 154 */
 obj_t BgL_tmp1839z00_2030;
if(
(
(long)(BgL_vz00_5)<0L))
{ /* Llib/param.scm 157 */
BgL_tmp1839z00_2030 = ( 
BGl_za2bigloozd2debugza2zd2zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_symbol1692z00zz__paramz00, BGl_string1689z00zz__paramz00, 
BINT(BgL_vz00_5)), BUNSPEC) ; }  else 
{ /* Llib/param.scm 157 */
BgL_tmp1839z00_2030 = ( 
BGl_za2bigloozd2debugza2zd2zz__paramz00 = 
BINT(BgL_vz00_5), BUNSPEC) ; } 
BGL_EXITD_POP_PROTECT(BgL_top1840z00_2031); BUNSPEC; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1839z00_2030; } } 
return 
BINT(BgL_vz00_5);} 

}



/* &bigloo-debug-set! */
obj_t BGl_z62bigloozd2debugzd2setz12z70zz__paramz00(obj_t BgL_envz00_1810, obj_t BgL_vz00_1811)
{
{ /* Llib/param.scm 154 */
{ /* Llib/param.scm 154 */
 int BgL_auxz00_2044;
{ /* Llib/param.scm 154 */
 obj_t BgL_tmpz00_2045;
if(
INTEGERP(BgL_vz00_1811))
{ /* Llib/param.scm 154 */
BgL_tmpz00_2045 = BgL_vz00_1811
; }  else 
{ 
 obj_t BgL_auxz00_2048;
BgL_auxz00_2048 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(5414L), BGl_string1694z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_vz00_1811); 
FAILURE(BgL_auxz00_2048,BFALSE,BFALSE);} 
BgL_auxz00_2044 = 
CINT(BgL_tmpz00_2045); } 
return 
bgl_debug_set(BgL_auxz00_2044);} } 

}



/* bigloo-debug-module */
BGL_EXPORTED_DEF int BGl_bigloozd2debugzd2modulez00zz__paramz00(void)
{
{ /* Llib/param.scm 166 */
{ /* Llib/param.scm 166 */
 obj_t BgL_tmpz00_2054;
{ /* Llib/param.scm 166 */
 obj_t BgL_aux1643z00_1864;
BgL_aux1643z00_1864 = BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00; 
if(
INTEGERP(BgL_aux1643z00_1864))
{ /* Llib/param.scm 166 */
BgL_tmpz00_2054 = BgL_aux1643z00_1864
; }  else 
{ 
 obj_t BgL_auxz00_2057;
BgL_auxz00_2057 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(5946L), BGl_string1695z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_aux1643z00_1864); 
FAILURE(BgL_auxz00_2057,BFALSE,BFALSE);} } 
return 
CINT(BgL_tmpz00_2054);} } 

}



/* &bigloo-debug-module */
obj_t BGl_z62bigloozd2debugzd2modulez62zz__paramz00(obj_t BgL_envz00_1812)
{
{ /* 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_top1845z00_2065;
BgL_top1845z00_2065 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); 
BGL_EXITD_PUSH_PROTECT(BgL_top1845z00_2065, BGl_za2parameterzd2mutexza2zd2zz__paramz00); BUNSPEC; 
{ /* Llib/param.scm 166 */
 obj_t BgL_tmp1844z00_2064;
if(
(
(long)(BgL_vz00_6)<0L))
{ /* Llib/param.scm 169 */
BgL_tmp1844z00_2064 = ( 
BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_symbol1696z00zz__paramz00, BGl_string1698z00zz__paramz00, 
BINT(BgL_vz00_6)), BUNSPEC) ; }  else 
{ /* Llib/param.scm 169 */
BgL_tmp1844z00_2064 = ( 
BGl_za2bigloozd2debugzd2moduleza2z00zz__paramz00 = 
BINT(BgL_vz00_6), BUNSPEC) ; } 
BGL_EXITD_POP_PROTECT(BgL_top1845z00_2065); BUNSPEC; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1844z00_2064; } } 
return 
BINT(BgL_vz00_6);} 

}



/* &bigloo-debug-module-set! */
obj_t BGl_z62bigloozd2debugzd2modulezd2setz12za2zz__paramz00(obj_t BgL_envz00_1813, obj_t BgL_vz00_1814)
{
{ /* Llib/param.scm 166 */
{ /* Llib/param.scm 166 */
 int BgL_auxz00_2078;
{ /* Llib/param.scm 166 */
 obj_t BgL_tmpz00_2079;
if(
INTEGERP(BgL_vz00_1814))
{ /* Llib/param.scm 166 */
BgL_tmpz00_2079 = BgL_vz00_1814
; }  else 
{ 
 obj_t BgL_auxz00_2082;
BgL_auxz00_2082 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(5946L), BGl_string1699z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_vz00_1814); 
FAILURE(BgL_auxz00_2082,BFALSE,BFALSE);} 
BgL_auxz00_2078 = 
CINT(BgL_tmpz00_2079); } 
return 
BGl_bigloozd2debugzd2modulezd2setz12zc0zz__paramz00(BgL_auxz00_2078);} } 

}



/* bigloo-warning */
BGL_EXPORTED_DEF int BGl_bigloozd2warningzd2zz__paramz00(void)
{
{ /* Llib/param.scm 178 */
{ /* Llib/param.scm 178 */
 obj_t BgL_tmpz00_2088;
{ /* Llib/param.scm 178 */
 obj_t BgL_aux1645z00_1866;
BgL_aux1645z00_1866 = BGl_za2bigloozd2warningza2zd2zz__paramz00; 
if(
INTEGERP(BgL_aux1645z00_1866))
{ /* Llib/param.scm 178 */
BgL_tmpz00_2088 = BgL_aux1645z00_1866
; }  else 
{ 
 obj_t BgL_auxz00_2091;
BgL_auxz00_2091 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(6499L), BGl_string1700z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_aux1645z00_1866); 
FAILURE(BgL_auxz00_2091,BFALSE,BFALSE);} } 
return 
CINT(BgL_tmpz00_2088);} } 

}



/* &bigloo-warning */
obj_t BGl_z62bigloozd2warningzb0zz__paramz00(obj_t BgL_envz00_1815)
{
{ /* 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_top1850z00_2099;
BgL_top1850z00_2099 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); 
BGL_EXITD_PUSH_PROTECT(BgL_top1850z00_2099, BGl_za2parameterzd2mutexza2zd2zz__paramz00); BUNSPEC; 
{ /* Llib/param.scm 178 */
 obj_t BgL_tmp1849z00_2098;
if(
(
(long)(BgL_vz00_7)<0L))
{ /* Llib/param.scm 181 */
BgL_tmp1849z00_2098 = ( 
BGl_za2bigloozd2warningza2zd2zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_symbol1701z00zz__paramz00, BGl_string1703z00zz__paramz00, 
BINT(BgL_vz00_7)), BUNSPEC) ; }  else 
{ /* Llib/param.scm 181 */
BgL_tmp1849z00_2098 = ( 
BGl_za2bigloozd2warningza2zd2zz__paramz00 = 
BINT(BgL_vz00_7), BUNSPEC) ; } 
BGL_EXITD_POP_PROTECT(BgL_top1850z00_2099); BUNSPEC; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1849z00_2098; } } 
return 
BINT(BgL_vz00_7);} 

}



/* &bigloo-warning-set! */
obj_t BGl_z62bigloozd2warningzd2setz12z70zz__paramz00(obj_t BgL_envz00_1816, obj_t BgL_vz00_1817)
{
{ /* Llib/param.scm 178 */
{ /* Llib/param.scm 178 */
 int BgL_auxz00_2112;
{ /* Llib/param.scm 178 */
 obj_t BgL_tmpz00_2113;
if(
INTEGERP(BgL_vz00_1817))
{ /* Llib/param.scm 178 */
BgL_tmpz00_2113 = BgL_vz00_1817
; }  else 
{ 
 obj_t BgL_auxz00_2116;
BgL_auxz00_2116 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(6499L), BGl_string1704z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_vz00_1817); 
FAILURE(BgL_auxz00_2116,BFALSE,BFALSE);} 
BgL_auxz00_2112 = 
CINT(BgL_tmpz00_2113); } 
return 
BGl_bigloozd2warningzd2setz12z12zz__paramz00(BgL_auxz00_2112);} } 

}



/* bigloo-profile */
BGL_EXPORTED_DEF int BGl_bigloozd2profilezd2zz__paramz00(void)
{
{ /* Llib/param.scm 190 */
{ /* Llib/param.scm 190 */
 obj_t BgL_tmpz00_2122;
{ /* Llib/param.scm 190 */
 obj_t BgL_aux1647z00_1868;
BgL_aux1647z00_1868 = BGl_za2bigloozd2profileza2zd2zz__paramz00; 
if(
INTEGERP(BgL_aux1647z00_1868))
{ /* Llib/param.scm 190 */
BgL_tmpz00_2122 = BgL_aux1647z00_1868
; }  else 
{ 
 obj_t BgL_auxz00_2125;
BgL_auxz00_2125 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(7037L), BGl_string1705z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_aux1647z00_1868); 
FAILURE(BgL_auxz00_2125,BFALSE,BFALSE);} } 
return 
CINT(BgL_tmpz00_2122);} } 

}



/* &bigloo-profile */
obj_t BGl_z62bigloozd2profilezb0zz__paramz00(obj_t BgL_envz00_1818)
{
{ /* 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_top1855z00_2133;
BgL_top1855z00_2133 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); 
BGL_EXITD_PUSH_PROTECT(BgL_top1855z00_2133, BGl_za2parameterzd2mutexza2zd2zz__paramz00); BUNSPEC; 
{ /* Llib/param.scm 190 */
 obj_t BgL_tmp1854z00_2132;
if(
(
(long)(BgL_vz00_8)<0L))
{ /* Llib/param.scm 193 */
BgL_tmp1854z00_2132 = ( 
BGl_za2bigloozd2profileza2zd2zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_symbol1706z00zz__paramz00, BGl_string1708z00zz__paramz00, 
BINT(BgL_vz00_8)), BUNSPEC) ; }  else 
{ /* Llib/param.scm 193 */
BgL_tmp1854z00_2132 = ( 
BGl_za2bigloozd2profileza2zd2zz__paramz00 = 
BINT(BgL_vz00_8), BUNSPEC) ; } 
BGL_EXITD_POP_PROTECT(BgL_top1855z00_2133); BUNSPEC; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1854z00_2132; } } 
return 
BINT(BgL_vz00_8);} 

}



/* &bigloo-profile-set! */
obj_t BGl_z62bigloozd2profilezd2setz12z70zz__paramz00(obj_t BgL_envz00_1819, obj_t BgL_vz00_1820)
{
{ /* Llib/param.scm 190 */
{ /* Llib/param.scm 190 */
 int BgL_auxz00_2146;
{ /* Llib/param.scm 190 */
 obj_t BgL_tmpz00_2147;
if(
INTEGERP(BgL_vz00_1820))
{ /* Llib/param.scm 190 */
BgL_tmpz00_2147 = BgL_vz00_1820
; }  else 
{ 
 obj_t BgL_auxz00_2150;
BgL_auxz00_2150 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(7037L), BGl_string1709z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_vz00_1820); 
FAILURE(BgL_auxz00_2150,BFALSE,BFALSE);} 
BgL_auxz00_2146 = 
CINT(BgL_tmpz00_2147); } 
return 
BGl_bigloozd2profilezd2setz12z12zz__paramz00(BgL_auxz00_2146);} } 

}



/* 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_1821)
{
{ /* 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_tmp1858z00_2158;
BgL_tmp1858z00_2158 = ( 
BGl_za2bigloozd2tracezd2colorza2z00zz__paramz00 = BgL_vz00_9, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1858z00_2158; } 
return 
BBOOL(BgL_vz00_9);} 

}



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

}



/* bigloo-trace */
BGL_EXPORTED_DEF obj_t BGl_bigloozd2tracezd2zz__paramz00(void)
{
{ /* Llib/param.scm 205 */
{ /* Llib/param.scm 205 */
 obj_t BgL_aux1649z00_1870;
BgL_aux1649z00_1870 = BGl_za2bigloozd2traceza2zd2zz__paramz00; 
{ /* Llib/param.scm 205 */
 bool_t BgL_test1859z00_2164;
if(
PAIRP(BgL_aux1649z00_1870))
{ /* Llib/param.scm 205 */
BgL_test1859z00_2164 = ((bool_t)1)
; }  else 
{ /* Llib/param.scm 205 */
BgL_test1859z00_2164 = 
NULLP(BgL_aux1649z00_1870)
; } 
if(BgL_test1859z00_2164)
{ /* Llib/param.scm 205 */
return BgL_aux1649z00_1870;}  else 
{ 
 obj_t BgL_auxz00_2168;
BgL_auxz00_2168 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(7691L), BGl_string1710z00zz__paramz00, BGl_string1711z00zz__paramz00, BgL_aux1649z00_1870); 
FAILURE(BgL_auxz00_2168,BFALSE,BFALSE);} } } } 

}



/* &bigloo-trace */
obj_t BGl_z62bigloozd2tracezb0zz__paramz00(obj_t BgL_envz00_1824)
{
{ /* 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_tmp1861z00_2173;
BgL_tmp1861z00_2173 = ( 
BGl_za2bigloozd2traceza2zd2zz__paramz00 = BgL_vz00_10, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1861z00_2173; } 
return BgL_vz00_10;} 

}



/* &bigloo-trace-set! */
obj_t BGl_z62bigloozd2tracezd2setz12z70zz__paramz00(obj_t BgL_envz00_1825, obj_t BgL_vz00_1826)
{
{ /* Llib/param.scm 205 */
{ /* Llib/param.scm 205 */
 obj_t BgL_auxz00_2176;
if(
BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00(BgL_vz00_1826))
{ /* Llib/param.scm 205 */
BgL_auxz00_2176 = BgL_vz00_1826
; }  else 
{ 
 obj_t BgL_auxz00_2179;
BgL_auxz00_2179 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(7691L), BGl_string1712z00zz__paramz00, BGl_string1711z00zz__paramz00, BgL_vz00_1826); 
FAILURE(BgL_auxz00_2179,BFALSE,BFALSE);} 
return 
BGl_bigloozd2tracezd2setz12z12zz__paramz00(BgL_auxz00_2176);} } 

}



/* 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_1827)
{
{ /* 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_tmp1863z00_2187;
BgL_tmp1863z00_2187 = ( 
BGl_za2bigloozd2tracezd2stackzd2depthza2zd2zz__paramz00 = 
(long)(BgL_vz00_11), BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1863z00_2187; } 
return 
BINT(BgL_vz00_11);} 

}



/* &bigloo-trace-stack-depth-set! */
obj_t BGl_z62bigloozd2tracezd2stackzd2depthzd2setz12z70zz__paramz00(obj_t BgL_envz00_1828, obj_t BgL_vz00_1829)
{
{ /* Llib/param.scm 216 */
{ /* Llib/param.scm 216 */
 int BgL_auxz00_2192;
{ /* Llib/param.scm 216 */
 obj_t BgL_tmpz00_2193;
if(
INTEGERP(BgL_vz00_1829))
{ /* Llib/param.scm 216 */
BgL_tmpz00_2193 = BgL_vz00_1829
; }  else 
{ 
 obj_t BgL_auxz00_2196;
BgL_auxz00_2196 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(8227L), BGl_string1713z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_vz00_1829); 
FAILURE(BgL_auxz00_2196,BFALSE,BFALSE);} 
BgL_auxz00_2192 = 
CINT(BgL_tmpz00_2193); } 
return 
BGl_bigloozd2tracezd2stackzd2depthzd2setz12z12zz__paramz00(BgL_auxz00_2192);} } 

}



/* bigloo-case-sensitive */
BGL_EXPORTED_DEF obj_t BGl_bigloozd2casezd2sensitivez00zz__paramz00(void)
{
{ /* Llib/param.scm 231 */
{ /* Llib/param.scm 231 */
 obj_t BgL_aux1654z00_1875;
BgL_aux1654z00_1875 = BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00; 
if(
SYMBOLP(BgL_aux1654z00_1875))
{ /* Llib/param.scm 231 */
return BgL_aux1654z00_1875;}  else 
{ 
 obj_t BgL_auxz00_2204;
BgL_auxz00_2204 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(9057L), BGl_string1714z00zz__paramz00, BGl_string1715z00zz__paramz00, BgL_aux1654z00_1875); 
FAILURE(BgL_auxz00_2204,BFALSE,BFALSE);} } } 

}



/* &bigloo-case-sensitive */
obj_t BGl_z62bigloozd2casezd2sensitivez62zz__paramz00(obj_t BgL_envz00_1830)
{
{ /* 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_top1867z00_2210;
BgL_top1867z00_2210 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); 
BGL_EXITD_PUSH_PROTECT(BgL_top1867z00_2210, BGl_za2parameterzd2mutexza2zd2zz__paramz00); BUNSPEC; 
{ /* Llib/param.scm 231 */
 obj_t BgL_tmp1866z00_2209;
if(
CBOOL(
BGl_memqz00zz__r4_pairs_and_lists_6_3z00(BgL_vz00_12, BGl_list1716z00zz__paramz00)))
{ /* Llib/param.scm 235 */
BgL_tmp1866z00_2209 = ( 
BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00 = BgL_vz00_12, BUNSPEC) ; }  else 
{ /* Llib/param.scm 235 */
BgL_tmp1866z00_2209 = ( 
BGl_za2bigloozd2casezd2sensitiveza2z00zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_string1721z00zz__paramz00, BGl_string1722z00zz__paramz00, BgL_vz00_12), BUNSPEC) ; } 
BGL_EXITD_POP_PROTECT(BgL_top1867z00_2210); BUNSPEC; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1866z00_2209; } } 
return BgL_vz00_12;} 

}



/* &bigloo-case-sensitive-set! */
obj_t BGl_z62bigloozd2casezd2sensitivezd2setz12za2zz__paramz00(obj_t BgL_envz00_1831, obj_t BgL_vz00_1832)
{
{ /* Llib/param.scm 231 */
{ /* Llib/param.scm 231 */
 obj_t BgL_auxz00_2220;
if(
SYMBOLP(BgL_vz00_1832))
{ /* Llib/param.scm 231 */
BgL_auxz00_2220 = BgL_vz00_1832
; }  else 
{ 
 obj_t BgL_auxz00_2223;
BgL_auxz00_2223 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(9057L), BGl_string1723z00zz__paramz00, BGl_string1715z00zz__paramz00, BgL_vz00_1832); 
FAILURE(BgL_auxz00_2223,BFALSE,BFALSE);} 
return 
BGl_bigloozd2casezd2sensitivezd2setz12zc0zz__paramz00(BgL_auxz00_2220);} } 

}



/* 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_1833)
{
{ /* 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_1834)
{
{ /* 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_1835)
{
{ /* 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_tmp1870z00_2232;
BgL_tmp1870z00_2232 = ( 
BGl_za2bigloozd2loadzd2readerza2z00zz__paramz00 = BgL_vz00_13, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1870z00_2232; } 
return BgL_vz00_13;} 

}



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

}



/* 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_1838)
{
{ /* 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_tmp1871z00_2237;
BgL_tmp1871z00_2237 = ( 
BGl_za2bigloozd2loadzd2moduleza2z00zz__paramz00 = BgL_vz00_14, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1871z00_2237; } 
return BgL_vz00_14;} 

}



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

}



/* 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_1841)
{
{ /* 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_tmp1872z00_2242;
BgL_tmp1872z00_2242 = ( 
BGl_za2bigloozd2modulezd2extensionzd2handlerza2zd2zz__paramz00 = BgL_vz00_15, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1872z00_2242; } 
return BgL_vz00_15;} 

}



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

}



/* 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_1844)
{
{ /* 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_tmp1873z00_2248;
BgL_tmp1873z00_2248 = ( 
BGl_za2bigloozd2evalzd2strictzd2moduleza2zd2zz__paramz00 = BgL_vz00_16, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1873z00_2248; } 
return 
BBOOL(BgL_vz00_16);} 

}



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

}



/* bigloo-library-path */
BGL_EXPORTED_DEF obj_t BGl_bigloozd2libraryzd2pathz00zz__paramz00(void)
{
{ /* Llib/param.scm 280 */
{ /* Llib/param.scm 280 */
 obj_t BgL_aux1658z00_1879;
BgL_aux1658z00_1879 = BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00; 
{ /* Llib/param.scm 280 */
 bool_t BgL_test1874z00_2254;
if(
PAIRP(BgL_aux1658z00_1879))
{ /* Llib/param.scm 280 */
BgL_test1874z00_2254 = ((bool_t)1)
; }  else 
{ /* Llib/param.scm 280 */
BgL_test1874z00_2254 = 
NULLP(BgL_aux1658z00_1879)
; } 
if(BgL_test1874z00_2254)
{ /* Llib/param.scm 280 */
return BgL_aux1658z00_1879;}  else 
{ 
 obj_t BgL_auxz00_2258;
BgL_auxz00_2258 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(11395L), BGl_string1724z00zz__paramz00, BGl_string1711z00zz__paramz00, BgL_aux1658z00_1879); 
FAILURE(BgL_auxz00_2258,BFALSE,BFALSE);} } } } 

}



/* &bigloo-library-path */
obj_t BGl_z62bigloozd2libraryzd2pathz62zz__paramz00(obj_t BgL_envz00_1847)
{
{ /* 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_top1877z00_2264;
BgL_top1877z00_2264 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); 
BGL_EXITD_PUSH_PROTECT(BgL_top1877z00_2264, BGl_za2parameterzd2mutexza2zd2zz__paramz00); BUNSPEC; 
{ /* Llib/param.scm 280 */
 obj_t BgL_tmp1876z00_2263;
if(
BGl_listzf3zf3zz__r4_pairs_and_lists_6_3z00(BgL_vz00_17))
{ /* Llib/param.scm 286 */
 bool_t BgL_test1879z00_2270;
{ 
 obj_t BgL_l1078z00_1180;
{ /* Llib/param.scm 286 */
 obj_t BgL_tmpz00_2271;
BgL_l1078z00_1180 = BgL_vz00_17; 
BgL_zc3z04anonymousza31235ze3z87_1181:
if(
NULLP(BgL_l1078z00_1180))
{ /* Llib/param.scm 286 */
BgL_tmpz00_2271 = BTRUE
; }  else 
{ /* Llib/param.scm 286 */
if(
PAIRP(BgL_l1078z00_1180))
{ /* Llib/param.scm 286 */
 bool_t BgL_test1882z00_2276;
{ /* Llib/param.scm 286 */
 obj_t BgL_tmpz00_2277;
BgL_tmpz00_2277 = 
CAR(BgL_l1078z00_1180); 
BgL_test1882z00_2276 = 
STRINGP(BgL_tmpz00_2277); } 
if(BgL_test1882z00_2276)
{ 
 obj_t BgL_l1078z00_2280;
BgL_l1078z00_2280 = 
CDR(BgL_l1078z00_1180); 
BgL_l1078z00_1180 = BgL_l1078z00_2280; 
goto BgL_zc3z04anonymousza31235ze3z87_1181;}  else 
{ /* Llib/param.scm 286 */
BgL_tmpz00_2271 = BFALSE
; } }  else 
{ /* Llib/param.scm 286 */
BgL_tmpz00_2271 = 
BGl_bigloozd2typezd2errorzf2locationzf2zz__errorz00(BGl_string1725z00zz__paramz00, BGl_string1678z00zz__paramz00, BgL_l1078z00_1180, BGl_string1673z00zz__paramz00, 
BINT(11597L))
; } } 
BgL_test1879z00_2270 = 
CBOOL(BgL_tmpz00_2271); } } 
if(BgL_test1879z00_2270)
{ /* Llib/param.scm 286 */
BgL_tmp1876z00_2263 = ( 
BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 = BgL_vz00_17, BUNSPEC) ; }  else 
{ /* Llib/param.scm 289 */
 obj_t BgL_arg1226z00_1162;
{ /* Llib/param.scm 289 */
 obj_t BgL_hook1085z00_1163;
BgL_hook1085z00_1163 = 
MAKE_YOUNG_PAIR(BFALSE, BNIL); 
{ 
 obj_t BgL_l1082z00_1165; obj_t BgL_h1083z00_1166;
BgL_l1082z00_1165 = BgL_vz00_17; 
BgL_h1083z00_1166 = BgL_hook1085z00_1163; 
BgL_zc3z04anonymousza31227ze3z87_1167:
if(
NULLP(BgL_l1082z00_1165))
{ /* Llib/param.scm 289 */
BgL_arg1226z00_1162 = 
CDR(BgL_hook1085z00_1163); }  else 
{ /* Llib/param.scm 289 */
 bool_t BgL_test1884z00_2289;
{ /* Llib/param.scm 289 */
 bool_t BgL_test1885z00_2290;
{ /* Llib/param.scm 289 */
 obj_t BgL_tmpz00_2291;
{ /* Llib/param.scm 289 */
 obj_t BgL_pairz00_1611;
if(
PAIRP(BgL_l1082z00_1165))
{ /* Llib/param.scm 289 */
BgL_pairz00_1611 = BgL_l1082z00_1165; }  else 
{ 
 obj_t BgL_auxz00_2294;
BgL_auxz00_2294 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(11697L), BGl_string1726z00zz__paramz00, BGl_string1727z00zz__paramz00, BgL_l1082z00_1165); 
FAILURE(BgL_auxz00_2294,BFALSE,BFALSE);} 
BgL_tmpz00_2291 = 
CAR(BgL_pairz00_1611); } 
BgL_test1885z00_2290 = 
STRINGP(BgL_tmpz00_2291); } 
if(BgL_test1885z00_2290)
{ /* Llib/param.scm 289 */
BgL_test1884z00_2289 = ((bool_t)0)
; }  else 
{ /* Llib/param.scm 289 */
BgL_test1884z00_2289 = ((bool_t)1)
; } } 
if(BgL_test1884z00_2289)
{ /* Llib/param.scm 289 */
 obj_t BgL_nh1084z00_1172;
{ /* Llib/param.scm 289 */
 obj_t BgL_arg1232z00_1174;
{ /* Llib/param.scm 289 */
 obj_t BgL_pairz00_1612;
if(
PAIRP(BgL_l1082z00_1165))
{ /* Llib/param.scm 289 */
BgL_pairz00_1612 = BgL_l1082z00_1165; }  else 
{ 
 obj_t BgL_auxz00_2302;
BgL_auxz00_2302 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(11677L), BGl_string1726z00zz__paramz00, BGl_string1727z00zz__paramz00, BgL_l1082z00_1165); 
FAILURE(BgL_auxz00_2302,BFALSE,BFALSE);} 
BgL_arg1232z00_1174 = 
CAR(BgL_pairz00_1612); } 
BgL_nh1084z00_1172 = 
MAKE_YOUNG_PAIR(BgL_arg1232z00_1174, BNIL); } 
SET_CDR(BgL_h1083z00_1166, BgL_nh1084z00_1172); 
{ /* Llib/param.scm 289 */
 obj_t BgL_arg1231z00_1173;
{ /* Llib/param.scm 289 */
 obj_t BgL_pairz00_1614;
if(
PAIRP(BgL_l1082z00_1165))
{ /* Llib/param.scm 289 */
BgL_pairz00_1614 = BgL_l1082z00_1165; }  else 
{ 
 obj_t BgL_auxz00_2311;
BgL_auxz00_2311 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(11677L), BGl_string1726z00zz__paramz00, BGl_string1727z00zz__paramz00, BgL_l1082z00_1165); 
FAILURE(BgL_auxz00_2311,BFALSE,BFALSE);} 
BgL_arg1231z00_1173 = 
CDR(BgL_pairz00_1614); } 
{ 
 obj_t BgL_h1083z00_2317; obj_t BgL_l1082z00_2316;
BgL_l1082z00_2316 = BgL_arg1231z00_1173; 
BgL_h1083z00_2317 = BgL_nh1084z00_1172; 
BgL_h1083z00_1166 = BgL_h1083z00_2317; 
BgL_l1082z00_1165 = BgL_l1082z00_2316; 
goto BgL_zc3z04anonymousza31227ze3z87_1167;} } }  else 
{ /* Llib/param.scm 289 */
 obj_t BgL_arg1234z00_1175;
{ /* Llib/param.scm 289 */
 obj_t BgL_pairz00_1615;
if(
PAIRP(BgL_l1082z00_1165))
{ /* Llib/param.scm 289 */
BgL_pairz00_1615 = BgL_l1082z00_1165; }  else 
{ 
 obj_t BgL_auxz00_2320;
BgL_auxz00_2320 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(11677L), BGl_string1726z00zz__paramz00, BGl_string1727z00zz__paramz00, BgL_l1082z00_1165); 
FAILURE(BgL_auxz00_2320,BFALSE,BFALSE);} 
BgL_arg1234z00_1175 = 
CDR(BgL_pairz00_1615); } 
{ 
 obj_t BgL_l1082z00_2325;
BgL_l1082z00_2325 = BgL_arg1234z00_1175; 
BgL_l1082z00_1165 = BgL_l1082z00_2325; 
goto BgL_zc3z04anonymousza31227ze3z87_1167;} } } } } 
BgL_tmp1876z00_2263 = ( 
BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_symbol1728z00zz__paramz00, BGl_string1730z00zz__paramz00, BgL_arg1226z00_1162), BUNSPEC) ; } }  else 
{ /* Llib/param.scm 284 */
BgL_tmp1876z00_2263 = ( 
BGl_za2bigloozd2libraryzd2pathza2z00zz__paramz00 = 
BGl_errorz00zz__errorz00(BGl_symbol1728z00zz__paramz00, BGl_string1731z00zz__paramz00, BgL_vz00_17), BUNSPEC) ; } 
BGL_EXITD_POP_PROTECT(BgL_top1877z00_2264); BUNSPEC; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1876z00_2263; } } 
return BgL_vz00_17;} 

}



/* &bigloo-library-path-set! */
obj_t BGl_z62bigloozd2libraryzd2pathzd2setz12za2zz__paramz00(obj_t BgL_envz00_1848, obj_t BgL_vz00_1849)
{
{ /* Llib/param.scm 280 */
{ /* Llib/param.scm 280 */
 obj_t BgL_auxz00_2330;
if(
BGl_pairzd2orzd2nullzf3zf3zz__r4_pairs_and_lists_6_3z00(BgL_vz00_1849))
{ /* Llib/param.scm 280 */
BgL_auxz00_2330 = BgL_vz00_1849
; }  else 
{ 
 obj_t BgL_auxz00_2333;
BgL_auxz00_2333 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(11395L), BGl_string1732z00zz__paramz00, BGl_string1711z00zz__paramz00, BgL_vz00_1849); 
FAILURE(BgL_auxz00_2333,BFALSE,BFALSE);} 
return 
BGl_bigloozd2libraryzd2pathzd2setz12zc0zz__paramz00(BgL_auxz00_2330);} } 

}



/* 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_1850)
{
{ /* 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_tmp1891z00_2340;
BgL_tmp1891z00_2340 = ( 
BGl_za2bigloozd2dnszd2enablezd2cacheza2zd2zz__paramz00 = BgL_vz00_18, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1891z00_2340; } 
return 
BBOOL(BgL_vz00_18);} 

}



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

}



/* 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_1853)
{
{ /* 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_tmp1892z00_2348;
BgL_tmp1892z00_2348 = ( 
BGl_za2bigloozd2dnszd2cachezd2validityzd2timeoutza2z00zz__paramz00 = BgL_vz00_19, BUNSPEC) ; 
BGL_MUTEX_UNLOCK(BGl_za2parameterzd2mutexza2zd2zz__paramz00); BgL_tmp1892z00_2348; } 
return 
BINT(BgL_vz00_19);} 

}



/* &bigloo-dns-cache-validity-timeout-set! */
obj_t BGl_z62bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12za2zz__paramz00(obj_t BgL_envz00_1854, obj_t BgL_vz00_1855)
{
{ /* Llib/param.scm 301 */
{ /* Llib/param.scm 301 */
 long BgL_auxz00_2352;
{ /* Llib/param.scm 301 */
 obj_t BgL_tmpz00_2353;
if(
INTEGERP(BgL_vz00_1855))
{ /* Llib/param.scm 301 */
BgL_tmpz00_2353 = BgL_vz00_1855
; }  else 
{ 
 obj_t BgL_auxz00_2356;
BgL_auxz00_2356 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string1673z00zz__paramz00, 
BINT(12234L), BGl_string1733z00zz__paramz00, BGl_string1686z00zz__paramz00, BgL_vz00_1855); 
FAILURE(BgL_auxz00_2356,BFALSE,BFALSE);} 
BgL_auxz00_2352 = 
(long)CINT(BgL_tmpz00_2353); } 
return 
BGl_bigloozd2dnszd2cachezd2validityzd2timeoutzd2setz12zc0zz__paramz00(BgL_auxz00_2352);} } 

}



/* 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_string1734z00zz__paramz00)); 
BGl_modulezd2initializa7ationz75zz__threadz00(149516032L, 
BSTRING_TO_STRING(BGl_string1734z00zz__paramz00)); 
BGl_modulezd2initializa7ationz75zz__configurez00(35034923L, 
BSTRING_TO_STRING(BGl_string1734z00zz__paramz00)); 
return 
BGl_modulezd2initializa7ationz75zz__osz00(310000171L, 
BSTRING_TO_STRING(BGl_string1734z00zz__paramz00));} 

}

#ifdef __cplusplus
}
#endif
