/*===========================================================================*/
/*   (Llib/object.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/object.scm -indent -o objs/obj_s/Llib/object.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___OBJECT_TYPE_DEFINITIONS
#define BGL___OBJECT_TYPE_DEFINITIONS

/* object type definitions */
typedef struct BgL_z62conditionz62_bgl {
   header_t header;
   obj_t widening;
} *BgL_z62conditionz62_bglt;

typedef struct BgL_z62exceptionz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
} *BgL_z62exceptionz62_bglt;

typedef struct BgL_z62errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62errorz62_bglt;

typedef struct BgL_z62typezd2errorzb0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
   obj_t BgL_typez00;
} *BgL_z62typezd2errorzb0_bglt;

typedef struct BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
   obj_t BgL_indexz00;
} *BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt;

typedef struct BgL_z62iozd2errorzb0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2errorzb0_bglt;

typedef struct BgL_z62iozd2portzd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2portzd2errorz62_bglt;

typedef struct BgL_z62iozd2readzd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2readzd2errorz62_bglt;

typedef struct BgL_z62iozd2writezd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2writezd2errorz62_bglt;

typedef struct BgL_z62iozd2closedzd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2closedzd2errorz62_bglt;

typedef struct BgL_z62iozd2filezd2notzd2foundzd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt;

typedef struct BgL_z62iozd2parsezd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2parsezd2errorz62_bglt;

typedef struct BgL_z62iozd2unknownzd2hostzd2errorzb0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt;

typedef struct BgL_z62iozd2malformedzd2urlzd2errorzb0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt;

typedef struct BgL_z62iozd2sigpipezd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2sigpipezd2errorz62_bglt;

typedef struct BgL_z62iozd2timeoutzd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2timeoutzd2errorz62_bglt;

typedef struct BgL_z62iozd2connectionzd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62iozd2connectionzd2errorz62_bglt;

typedef struct BgL_z62processzd2exceptionzb0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62processzd2exceptionzb0_bglt;

typedef struct BgL_z62stackzd2overflowzd2errorz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_procz00;
   obj_t BgL_msgz00;
   obj_t BgL_objz00;
} *BgL_z62stackzd2overflowzd2errorz62_bglt;

typedef struct BgL_z62securityzd2exceptionzb0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_messagez00;
} *BgL_z62securityzd2exceptionzb0_bglt;

typedef struct BgL_z62accesszd2controlzd2exceptionz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_messagez00;
   obj_t BgL_objz00;
   obj_t BgL_permissionz00;
} *BgL_z62accesszd2controlzd2exceptionz62_bglt;

typedef struct BgL_z62warningz62_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_argsz00;
} *BgL_z62warningz62_bglt;

typedef struct BgL_z62evalzd2warningzb0_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_fnamez00;
   obj_t BgL_locationz00;
   obj_t BgL_stackz00;
   obj_t BgL_argsz00;
} *BgL_z62evalzd2warningzb0_bglt;


#endif // BGL___OBJECT_TYPE_DEFINITIONS
#endif // BGL_MODULE_TYPE_DEFINITIONS

extern obj_t BGl_vectorzd2ze3listz31zz__r4_vectors_6_8z00(obj_t);
static obj_t BGl_z62lambda1927z62zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_z62objectzd2displayzb0zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62processzd2exceptionzb0zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2allzd2fieldsz62zz__objectz00(obj_t, obj_t);
extern obj_t make_vector_uncollectable(long, obj_t);
static obj_t BGl_list3983z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL long bgl_types_number(void);
static obj_t BGl_z62findzd2methodzb0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_doublezd2nbzd2genericsz12z12zz__objectz00(void);
static obj_t BGl_z62lambda1933z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_list3988z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62lambda1934z62zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_objectzd2wideningzd2zz__objectz00(BgL_objectz00_bglt);
static obj_t BGl_z62z52isa64zd2objectzf2cdepthzf3ze3zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62lambda1938z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda1939z62zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_z62bigloozd2genericzd2bucketzd2siza7ez17zz__objectz00(obj_t);
static obj_t BGl_z62objectzd2wideningzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3702z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3707z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3546z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_classzd2nilzd2initz12z12zz__objectz00(obj_t);
static obj_t BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_symbol3549z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2nilzd2initz12z70zz__objectz00(obj_t, obj_t);
static obj_t BGl_requirezd2initializa7ationz75zz__objectz00 = BUNSPEC;
static obj_t BGl_list3995z00zz__objectz00 = BUNSPEC;
static BgL_objectz00_bglt BGl_z62lambda1860z62zz__objectz00(obj_t);
static BgL_objectz00_bglt BGl_z62lambda1862z62zz__objectz00(obj_t);
static BgL_z62typezd2errorzb0_bglt BGl_z62lambda1945z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62typezd2errorzb0_bglt BGl_z62lambda1947z62zz__objectz00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_z52isazd2objectzf2finalzf3z81zz__objectz00(BgL_objectz00_bglt, obj_t);
static obj_t BGl_z62classzd2subclasseszb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3712z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3551z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_classzd2fieldzf3z21zz__objectz00(obj_t);
static obj_t BGl_z62classzd2fieldzd2mutatorz62zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3554z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3717z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3556z00zz__objectz00 = BUNSPEC;
extern obj_t bigloo_generic_mutex;
static obj_t BGl_symbol3559z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL int BGl_bigloozd2genericzd2bucketzd2powzd2zz__objectz00(void);
extern obj_t bgl_display_obj(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza31864ze3ze5zz__objectz00(obj_t, obj_t);
extern bool_t BGl_equalzf3zf3zz__r4_equivalence_6_2z00(obj_t, obj_t);
static BgL_z62conditionz62_bglt BGl_z62lambda1870z62zz__objectz00(obj_t);
extern obj_t BGl_typezd2errorzd2zz__errorz00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62classzd2numzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda1955z62zz__objectz00(obj_t, obj_t);
static BgL_z62conditionz62_bglt BGl_z62lambda1874z62zz__objectz00(obj_t);
static obj_t BGl_z62lambda1956z62zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_za2classesza2z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_classzd2fieldzd2defaultzd2valuezf3z21zz__objectz00(obj_t);
static obj_t BGl_symbol3803z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3723z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62zc3z04anonymousza32021ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3808z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_classzd2virtualzd2zz__objectz00(obj_t);
static obj_t BGl_symbol3648z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_registerzd2genericz12zc0zz__objectz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2sigpipezd2errorz62zz__objectz00 = BUNSPEC;
extern obj_t BGl_warningz00zz__errorz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_methodzd2arrayzd2refz00zz__objectz00(obj_t, obj_t, int);
BGL_EXPORTED_DECL obj_t BGl_classzd2fieldszd2zz__objectz00(obj_t);
static BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BGl_z62lambda1963z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BGl_z62lambda1965z62zz__objectz00(obj_t);
static BgL_z62exceptionz62_bglt BGl_z62lambda1884z62zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static BgL_z62exceptionz62_bglt BGl_z62lambda1886z62zz__objectz00(obj_t);
static obj_t BGl_symbol3730z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3813z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3651z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3734z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3818z00zz__objectz00 = BUNSPEC;
static obj_t BGl_initializa7ezd2objectsz12z67zz__objectz00(void);
static obj_t BGl_symbol3739z00zz__objectz00 = BUNSPEC;
static obj_t BGl_toplevelzd2initzd2zz__objectz00(void);
static obj_t BGl_symbol3659z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_z62iozd2writezd2errorz62zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3579z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2modulezb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_findzd2methodzd2fromz00zz__objectz00(BgL_objectz00_bglt, obj_t, obj_t);
static obj_t BGl_z62classzd2superzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda1971z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda1972z62zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_z62lambda1893z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda1894z62zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62typezd2errorzb0zz__objectz00 = BUNSPEC;
static obj_t BGl_z62genericzd2memoryzd2statisticsz62zz__objectz00(obj_t);
static obj_t BGl_z62classzd2fieldzd2mutablezf3z91zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3823z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3661z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3743z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3581z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3825z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3582z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2fieldzd2defaultzd2valuezf3z43zz__objectz00(obj_t, obj_t);
extern obj_t BGl_formatz00zz__r4_output_6_10_3z00(obj_t, obj_t);
static obj_t BGl_z62objectzd2equalzf31403z43zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_symbol3584z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3748z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3667z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3586z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3669z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3588z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62evalzd2classzf3z43zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_objectzd2displayzd2zz__objectz00(BgL_objectz00_bglt, obj_t);
static BgL_z62iozd2errorzb0_bglt BGl_z62lambda1981z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62objectzf3z91zz__objectz00(obj_t, obj_t);
static BgL_z62iozd2errorzb0_bglt BGl_z62lambda1983z62zz__objectz00(obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2parsezd2errorz62zz__objectz00 = BUNSPEC;
static obj_t BGl_genericzd2initzd2zz__objectz00(void);
static obj_t BGl_z62objectzd2classzb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2existszd2zz__objectz00(obj_t);
static obj_t BGl_symbol3830z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3590z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3753z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3675z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3838z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3758z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62zc3z04anonymousza32008ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_makezd2classzd2fieldz00zz__objectz00(obj_t, obj_t, obj_t, bool_t, bool_t, obj_t, obj_t, obj_t);
static obj_t BGl_za2nbzd2classeszd2maxza2z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL long BGl_classzd2numzd2zz__objectz00(obj_t);
extern obj_t BGl_displayzd2tracezd2stackz00zz__errorz00(obj_t, obj_t, obj_t);
static obj_t BGl_objectzd2initzd2zz__objectz00(void);
static obj_t BGl_z62zc3z04anonymousza31949ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL long BGl_classzd2indexzd2zz__objectz00(obj_t);
extern obj_t BGl_copyzd2vectorzd2zz__r4_vectors_6_8z00(obj_t, long);
static BgL_z62iozd2portzd2errorz62_bglt BGl_z62lambda1992z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_classzd2fieldzd2mutablezf3zf3zz__objectz00(obj_t);
static BgL_z62iozd2portzd2errorz62_bglt BGl_z62lambda1994z62zz__objectz00(obj_t);
static obj_t BGl_symbol3843z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3681z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3925z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3763z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3927z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62zc3z04anonymousza32033ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3847z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3768z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_za2inheritancesza2z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_z62exceptionz62zz__objectz00 = BUNSPEC;
static obj_t BGl_makezd2classzd2virtualzd2slotszd2vectorz00zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62callzd2virtualzd2setterz62zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza31877ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_objectzd2equalzf3z21zz__objectz00(BgL_objectz00_bglt, BgL_objectz00_bglt);
static obj_t BGl_z62isazf3z91zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_symbol3930z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3852z00zz__objectz00 = BUNSPEC;
static obj_t BGl_extendzd2vectorzd2zz__objectz00(obj_t, obj_t, long);
static obj_t BGl_symbol3691z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3773z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3692z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3857z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62zc3z04anonymousza32107ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3778z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3697z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_findzd2classzd2fieldz00zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_classzd2abstractzf3z21zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza31967ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_genericzd2memoryzd2statisticsz00zz__objectz00(void);
static obj_t BGl_z62classzd2abstractzf3z43zz__objectz00(obj_t, obj_t);
static obj_t BGl_list4000z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2fieldzd2virtualzf3z91zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62exceptionzd2notify1405zb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_list4006z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3943z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3783z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3946z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3948z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62exceptionzd2notifyzd2z62wa1412z00zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3788z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_objectzd2printzd2zz__objectz00(BgL_objectz00_bglt, obj_t, obj_t);
static obj_t BGl_z62widezd2objectzf3z43zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2evdatazd2zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza31895ze3ze5zz__objectz00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_isazf3zf3zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62methodzd2arrayzd2refz62zz__objectz00(obj_t, obj_t, obj_t, obj_t);
extern obj_t bstring_to_symbol(obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2fieldzd2mutatorz00zz__objectz00(obj_t);
extern obj_t make_vector(long, obj_t);
static obj_t BGl_list4014z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3951z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3955z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3793z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62zc3z04anonymousza32044ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32117ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3958z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3798z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62findzd2methodzd2fromz62zz__objectz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_classzd2fieldzd2virtualzf3zf3zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza31985ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza31888ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62genericzd2methodzd2arrayz62zz__objectz00(obj_t, obj_t);
static obj_t BGl_methodzd2initzd2zz__objectz00(void);
static obj_t BGl_symbol3960z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3963z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3966z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62callzd2virtualzd2getterz62zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_objectzd2writezd2zz__objectz00(BgL_objectz00_bglt, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2fieldzd2namez00zz__objectz00(obj_t);
static obj_t BGl_z62objectzd2hashnumberzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3970z00zz__objectz00 = BUNSPEC;
extern obj_t BGl_bigloozd2typezd2errorzf2locationzf2zz__errorz00(obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_symbol3972z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2fieldzd2accessorz62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32054ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32127ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62objectzd2display1392zb0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_symbol3977z00zz__objectz00 = BUNSPEC;
static obj_t BGl_classzd2shrinkzd2zz__objectz00(obj_t);
static obj_t BGl_za2inheritancezd2maxzd2depthza2z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_genericzd2methodzd2arrayz00zz__objectz00(obj_t);
static obj_t BGl_z62makezd2classzd2fieldz62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62objectzd2wideningzd2setz12z70zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_za2classzd2keyza2zd2zz__objectz00 = BUNSPEC;
static obj_t BGl_za2nbzd2genericsza2zd2zz__objectz00 = BUNSPEC;
static obj_t BGl_z62findzd2classzd2byzd2hashzb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL long BGl_classzd2hashzd2zz__objectz00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_z52isazf2cdepthzf3z53zz__objectz00(obj_t, obj_t, long);
static obj_t BGl_symbol3984z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3989z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62findzd2superzd2classzd2methodzb0zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza31996ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2allocatorzd2zz__objectz00(obj_t);
static obj_t BGl_z62callzd2nextzd2virtualzd2setterzb0zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2fieldzd2accessorz00zz__objectz00(obj_t);
static obj_t BGl_z62nilzf3z91zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62classzd2allocatorzb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_classzd2widezf3z21zz__objectz00(obj_t);
extern obj_t BGl_zb2zb2zz__r4_numbers_6_5z00(obj_t);
static obj_t BGl_symbol3991z00zz__objectz00 = BUNSPEC;
static BgL_z62iozd2readzd2errorz62_bglt BGl_z62lambda2004z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32145ze3ze5zz__objectz00(obj_t);
static BgL_z62iozd2readzd2errorz62_bglt BGl_z62lambda2006z62zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza32137ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_symbol3996z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_z52isa32zd2objectzf2cdepthzf3z81zz__objectz00(BgL_objectz00_bglt, obj_t, long);
BGL_EXPORTED_DECL obj_t BGl_objectzd2wideningzd2setz12z12zz__objectz00(BgL_objectz00_bglt, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62securityzd2exceptionzb0zz__objectz00 = BUNSPEC;
static obj_t BGl_z62findzd2classzd2fieldz62zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2unknownzd2hostzd2errorzb0zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2indexzb0zz__objectz00(obj_t, obj_t);
extern obj_t BGl_errorz00zz__errorz00(obj_t, obj_t, obj_t);
static obj_t BGl_z62classzd2hashzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32162ze3ze5zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza32065ze3ze5zz__objectz00(obj_t, obj_t);
static BgL_z62iozd2writezd2errorz62_bglt BGl_z62lambda2017z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62iozd2writezd2errorz62_bglt BGl_z62lambda2019z62zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_callzd2virtualzd2setterz00zz__objectz00(BgL_objectz00_bglt, int, obj_t);
static obj_t BGl_z62registerzd2genericz12za2zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2closedzd2errorz62zz__objectz00 = BUNSPEC;
static obj_t BGl_z62genericzd2addzd2evalzd2methodz12za2zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2fieldzd2infoz00zz__objectz00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_nilzf3zf3zz__objectz00(BgL_objectz00_bglt);
static obj_t BGl_z62classzd2fieldzf3z43zz__objectz00(obj_t, obj_t);
static BgL_z62iozd2connectionzd2errorz62_bglt BGl_z62lambda2103z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62iozd2connectionzd2errorz62_bglt BGl_z62lambda2105z62zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza32155ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62evalzd2warningzb0zz__objectz00 = BUNSPEC;
static BgL_z62iozd2closedzd2errorz62_bglt BGl_z62lambda2029z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62classzd2creatorzb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2constructorzd2zz__objectz00(obj_t);
static BgL_z62iozd2closedzd2errorz62_bglt BGl_z62lambda2031z62zz__objectz00(obj_t);
static BgL_z62processzd2exceptionzb0_bglt BGl_z62lambda2113z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62processzd2exceptionzb0_bglt BGl_z62lambda2115z62zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_exceptionzd2notifyzd2zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2fieldzd2typez00zz__objectz00(obj_t);
static obj_t BGl_z62procedurezd2ze3genericz53zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2malformedzd2urlzd2errorzb0zz__objectz00 = BUNSPEC;
static obj_t BGl_z62callzd2nextzd2virtualzd2getterzb0zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62classzd2fieldzd2namez62zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_z52objectzd2wideningz80zz__objectz00(BgL_objectz00_bglt);
static obj_t BGl_z62classzd2fieldszb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_objectz00_bglt BGl_allocatezd2instancezd2zz__objectz00(obj_t);
static obj_t BGl_methodzd2arrayzd2setz12z12zz__objectz00(obj_t, obj_t, long, obj_t);
static obj_t BGl_list3523z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_z62iozd2filezd2notzd2foundzd2errorz62zz__objectz00 = BUNSPEC;
static BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BGl_z62lambda2040z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62stackzd2overflowzd2errorz62_bglt BGl_z62lambda2123z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BGl_z62lambda2042z62zz__objectz00(obj_t);
extern obj_t BGl_errorzd2notifyzd2zz__errorz00(obj_t);
static BgL_z62stackzd2overflowzd2errorz62_bglt BGl_z62lambda2125z62zz__objectz00(obj_t);
static obj_t BGl_z62exceptionzd2notifyzd2z62er1408z00zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2evdatazd2setz12z12zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32076ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62z52isa32zd2objectzf2cdepthzf3ze3zz__objectz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
BGL_EXPORTED_DECL obj_t BGl_callzd2virtualzd2getterz00zz__objectz00(BgL_objectz00_bglt, int);
static obj_t BGl_z62genericzd2addzd2methodz12z70zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t);
static bool_t BGl_genericszd2addzd2classz12z12zz__objectz00(long, long);
static BgL_z62iozd2parsezd2errorz62_bglt BGl_z62lambda2050z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62errorz62zz__objectz00 = BUNSPEC;
static BgL_z62securityzd2exceptionzb0_bglt BGl_z62lambda2133z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62iozd2parsezd2errorz62_bglt BGl_z62lambda2052z62zz__objectz00(obj_t);
static BgL_z62securityzd2exceptionzb0_bglt BGl_z62lambda2135z62zz__objectz00(obj_t);
static bool_t BGl_doublezd2nbzd2classesz12z12zz__objectz00(void);
BGL_EXPORTED_DECL bool_t BGl_classzf3zf3zz__objectz00(obj_t);
static obj_t BGl_z62classzd2evfieldszd2setz12z70zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_z52isazf2finalzf3z53zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62warningz62zz__objectz00 = BUNSPEC;
static obj_t BGl_z62z52isazd2objectzf2finalzf3ze3zz__objectz00(obj_t, obj_t, obj_t);
extern obj_t BGl_currentzd2threadzd2zz__threadz00(void);
static obj_t BGl_z62classzd2existszb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62objectzd2hashnumber1397zb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_list3545z00zz__objectz00 = BUNSPEC;
static obj_t BGl_list3548z00zz__objectz00 = BUNSPEC;
static obj_t BGl_za2inheritancezd2cntza2zd2zz__objectz00 = BUNSPEC;
static BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BGl_z62lambda2061z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62lambda2143z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda2144z62zz__objectz00(obj_t, obj_t, obj_t);
static BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BGl_z62lambda2063z62zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza32086ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62stackzd2overflowzd2errorz62zz__objectz00 = BUNSPEC;
extern obj_t BGl_vectorzd2appendzd2zz__r4_vectors_6_8z00(obj_t, obj_t);
static obj_t BGl_za2genericsza2z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_z62iozd2portzd2errorz62zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2fieldzd2defaultzd2valuezb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL int BGl_bigloozd2genericzd2bucketzd2maskzd2zz__objectz00(void);
static obj_t BGl_list3553z00zz__objectz00 = BUNSPEC;
extern obj_t bgl_make_generic(obj_t);
static BgL_z62accesszd2controlzd2exceptionz62_bglt BGl_z62lambda2151z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_list3558z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DEF obj_t BGl_z62iozd2connectionzd2errorz62zz__objectz00 = BUNSPEC;
static BgL_z62accesszd2controlzd2exceptionz62_bglt BGl_z62lambda2153z62zz__objectz00(obj_t);
static BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BGl_z62lambda2072z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BGl_z62lambda2074z62zz__objectz00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_objectzf3zf3zz__objectz00(obj_t);
static obj_t BGl_cnstzd2initzd2zz__objectz00(void);
static obj_t BGl_symbol4001z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol4003z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z52addzd2methodz12z92zz__objectz00(obj_t, obj_t, obj_t);
extern obj_t BGl_getzd2tracezd2stackz00zz__errorz00(obj_t);
static obj_t BGl_symbol4007z00zz__objectz00 = BUNSPEC;
extern long bgl_list_length(obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62accesszd2controlzd2exceptionz62zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2fieldzd2infoz62zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2modulezd2zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_registerzd2classz12zc0zz__objectz00(obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2timeoutzd2errorz62zz__objectz00 = BUNSPEC;
static obj_t BGl_list3561z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62classzd2nilzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_gczd2rootszd2initz00zz__objectz00(void);
static obj_t BGl_z62registerzd2classz12za2zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_list3647z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62lambda2160z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62classzd2widezf3z43zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda2161z62zz__objectz00(obj_t, obj_t, obj_t);
static BgL_z62iozd2sigpipezd2errorz62_bglt BGl_z62lambda2082z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32096ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2errorzb0zz__objectz00 = BUNSPEC;
static obj_t BGl_z62zc3z04anonymousza32169ze3ze5zz__objectz00(obj_t);
static BgL_z62iozd2sigpipezd2errorz62_bglt BGl_z62lambda2084z62zz__objectz00(obj_t);
static obj_t BGl_z62lambda2167z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda2168z62zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_symbol4015z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_findzd2classzd2zz__objectz00(obj_t);
static obj_t BGl_list3650z00zz__objectz00 = BUNSPEC;
static obj_t BGl_list3653z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62zc3z04anonymousza31910ze3ze5zz__objectz00(obj_t);
static obj_t BGl_z62zc3z04anonymousza31902ze3ze5zz__objectz00(obj_t);
static obj_t BGl_z62bigloozd2genericzd2bucketzd2maskzb0zz__objectz00(obj_t);
static obj_t BGl_z62classzd2virtualzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_list3658z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62z52isazd2objectzf2cdepthzf3ze3zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32194ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00 = BUNSPEC;
static BgL_z62iozd2timeoutzd2errorz62_bglt BGl_z62lambda2092z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62warningz62_bglt BGl_z62lambda2175z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62iozd2timeoutzd2errorz62_bglt BGl_z62lambda2094z62zz__objectz00(obj_t);
BGL_EXPORTED_DECL long BGl_objectzd2classzd2numz00zz__objectz00(BgL_objectz00_bglt);
BGL_EXPORTED_DEF obj_t BGl_objectz00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62objectzd2printzb0zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static BgL_z62warningz62_bglt BGl_z62lambda2177z62zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_objectzd2classzd2zz__objectz00(BgL_objectz00_bglt);
static obj_t BGl_z62exceptionzd2notifyzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62classzd2fieldzd2typez62zz__objectz00(obj_t, obj_t);
extern obj_t BGl_consza2za2zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
static obj_t BGl_z62classzd2evdatazb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_callzd2nextzd2virtualzd2setterzd2zz__objectz00(obj_t, BgL_objectz00_bglt, int, obj_t);
static obj_t BGl_z62z52objectzd2wideningze2zz__objectz00(obj_t, obj_t);
extern obj_t BGl_writezd2circlezd2zz__pp_circlez00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_findzd2methodzd2zz__objectz00(BgL_objectz00_bglt, obj_t);
static obj_t BGl_list3666z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62lambda2183z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62zc3z04anonymousza32179ze3ze5zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda2184z62zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_z52objectzd2wideningzd2setz12z40zz__objectz00(BgL_objectz00_bglt, obj_t);
static obj_t BGl_z62bigloozd2typeszd2numberz62zz__objectz00(obj_t);
static obj_t BGl_z62objectzd2print1401zb0zz__objectz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2fieldzd2defaultzd2valuezd2zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2namezd2zz__objectz00(obj_t);
static obj_t BGl_z62findzd2classzb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62conditionz62zz__objectz00 = BUNSPEC;
static obj_t BGl_list3674z00zz__objectz00 = BUNSPEC;
static BgL_z62evalzd2warningzb0_bglt BGl_z62lambda2190z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t);
static BgL_z62evalzd2warningzb0_bglt BGl_z62lambda2192z62zz__objectz00(obj_t);
static obj_t BGl_z62objectzd2writezb0zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_genericzd2addzd2evalzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62genericzd2nozd2defaultzd2behaviorzb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2allzd2fieldsz00zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2nilzd2zz__objectz00(obj_t);
static obj_t BGl_z62objectzd2write1395zb0zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_list3680z00zz__objectz00 = BUNSPEC;
static obj_t BGl_list3924z00zz__objectz00 = BUNSPEC;
static obj_t BGl_list3929z00zz__objectz00 = BUNSPEC;
extern long bgl_obj_hash_number(obj_t);
extern obj_t BGl_warningzd2notifyzd2zz__errorz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_findzd2classzd2byzd2hashzd2zz__objectz00(int);
extern obj_t BGl_bigloozd2typezd2errorz00zz__errorz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_genericzd2addzd2methodz12z12zz__objectz00(obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_z62classzd2namezb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62exceptionzd2notifyzd2z62io1410z00zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_widezd2objectzf3z21zz__objectz00(BgL_objectz00_bglt);
extern obj_t BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(obj_t, obj_t, obj_t, obj_t, int, int);
static obj_t BGl_z62z52isazf2cdepthzf3z31zz__objectz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2evfieldszd2setz12z12zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_objectzd2classzd2numzd2setz12zc0zz__objectz00(BgL_objectz00_bglt, long);
static obj_t BGl_z62zc3z04anonymousza31922ze3ze5zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_callzd2nextzd2virtualzd2getterzd2zz__objectz00(obj_t, BgL_objectz00_bglt, int);
BGL_EXPORTED_DECL obj_t BGl_classzd2subclasseszd2zz__objectz00(obj_t);
static obj_t BGl_z62z52isazf2finalzf3z31zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_z62objectzd2equalzf3z43zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_loopze70ze7zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl_list3945z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_classzd2superzd2zz__objectz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_classzd2creatorzd2zz__objectz00(obj_t);
BGL_EXPORTED_DECL bool_t BGl_z52isa64zd2objectzf2cdepthzf3z81zz__objectz00(BgL_objectz00_bglt, obj_t, long);
static obj_t BGl_z62z52objectzd2wideningzd2setz12z22zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_evalzd2classzf3z21zz__objectz00(obj_t);
static obj_t BGl_list3950z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_findzd2superzd2classzd2methodzd2zz__objectz00(BgL_objectz00_bglt, obj_t, obj_t);
static obj_t BGl_z62classzd2constructorzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_list3953z00zz__objectz00 = BUNSPEC;
static obj_t BGl_list3954z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62lambda1900z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda1901z62zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_list3957z00zz__objectz00 = BUNSPEC;
static obj_t BGl_za2nbzd2genericszd2maxza2z00zz__objectz00 = BUNSPEC;
static obj_t BGl_makezd2methodzd2arrayz00zz__objectz00(obj_t);
static obj_t BGl_z62lambda1908z62zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62lambda1909z62zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_z62classzf3z91zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62objectzd2classzd2numz62zz__objectz00(obj_t, obj_t);
static obj_t BGl_za2nbzd2classesza2zd2zz__objectz00 = BUNSPEC;
static BgL_objectz00_bglt BGl_z62allocatezd2instancezb0zz__objectz00(obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_genericzd2defaultzd2zz__objectz00(obj_t);
static obj_t BGl_list3962z00zz__objectz00 = BUNSPEC;
static obj_t BGl_list3965z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62genericzd2defaultzb0zz__objectz00(obj_t, obj_t);
static obj_t BGl_z62classzd2evdatazd2setz12z70zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL int BGl_bigloozd2genericzd2bucketzd2siza7ez75zz__objectz00(void);
static obj_t BGl_z62bigloozd2genericzd2bucketzd2powzb0zz__objectz00(obj_t);
static BgL_z62errorz62_bglt BGl_z62lambda1918z62zz__objectz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DEF obj_t BGl_z62iozd2readzd2errorz62zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3524z00zz__objectz00 = BUNSPEC;
static obj_t BGl_symbol3526z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL bool_t BGl_z52isazd2objectzf2cdepthzf3z81zz__objectz00(BgL_objectz00_bglt, obj_t, long);
static obj_t BGl_list3971z00zz__objectz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_procedurezd2ze3genericz31zz__objectz00(obj_t);
BGL_EXPORTED_DECL long BGl_objectzd2hashnumberzd2zz__objectz00(BgL_objectz00_bglt);
static obj_t BGl_list3974z00zz__objectz00 = BUNSPEC;
static BgL_z62errorz62_bglt BGl_z62lambda1920z62zz__objectz00(obj_t);
static obj_t BGl_list3975z00zz__objectz00 = BUNSPEC;
static obj_t BGl_list3976z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62objectzd2classzd2numzd2setz12za2zz__objectz00(obj_t, obj_t, obj_t);
static obj_t BGl_list3979z00zz__objectz00 = BUNSPEC;
static obj_t BGl_z62lambda1926z62zz__objectz00(obj_t, obj_t);
static obj_t *__cnst;


DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2nilzd2initz12zd2envzc0zz__objectz00, BgL_bgl_za762classza7d2nilza7d4019za7, BGl_z62classzd2nilzd2initz12z70zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2genericzd2bucketzd2siza7ezd2envza7zz__objectz00, BgL_bgl_za762biglooza7d2gene4020z00, BGl_z62bigloozd2genericzd2bucketzd2siza7ez17zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_genericzd2addzd2methodz12zd2envzc0zz__objectz00, BgL_bgl_za762genericza7d2add4021z00, BGl_z62genericzd2addzd2methodz12z70zz__objectz00, 0L, BUNSPEC, 4);
BGL_DEFINE_STRING(BGl_string4002z00zz__objectz00, BgL_bgl_string4002za700za7za7_4022za7, "method1406", 10 );
BGL_DEFINE_STRING(BGl_string4004z00zz__objectz00, BgL_bgl_string4004za700za7za7_4023za7, "exc", 3 );
BGL_DEFINE_STRING(BGl_string4005z00zz__objectz00, BgL_bgl_string4005za700za7za7_4024za7, "exception-notify", 16 );
BGL_DEFINE_STRING(BGl_string4008z00zz__objectz00, BgL_bgl_string4008za700za7za7_4025za7, "fun2225", 7 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_registerzd2genericz12zd2envz12zz__objectz00, BgL_bgl_za762registerza7d2ge4026z00, BGl_z62registerzd2genericz12za2zz__objectz00, 0L, BUNSPEC, 4);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_procedurezd2ze3genericzd2envze3zz__objectz00, BgL_bgl_za762procedureza7d2za74027za7, BGl_z62procedurezd2ze3genericz53zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_GENERIC(BGl_objectzd2hashnumberzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2hash4028z00, BGl_z62objectzd2hashnumberzb0zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string4012z00zz__objectz00, BgL_bgl_string4012za700za7za7_4029za7, "&exception-notify-&wa1412", 25 );
BGL_DEFINE_STRING(BGl_string4013z00zz__objectz00, BgL_bgl_string4013za700za7za7_4030za7, "call-next-method:Wrong number of arguments", 42 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc4009z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4031z00, BGl_z62exceptionzd2notifyzd2z62er1408z00zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string4016z00zz__objectz00, BgL_bgl_string4016za700za7za7_4032za7, "next-method1409", 15 );
BGL_DEFINE_STRING(BGl_string4017z00zz__objectz00, BgL_bgl_string4017za700za7za7_4033za7, "&exception-notify-&io1410", 25 );
BGL_DEFINE_STRING(BGl_string4018z00zz__objectz00, BgL_bgl_string4018za700za7za7_4034za7, "&exception-notify-&er1408", 25 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_findzd2methodzd2fromzd2envzd2zz__objectz00, BgL_bgl_za762findza7d2method4035z00, BGl_z62findzd2methodzd2fromz62zz__objectz00, 0L, BUNSPEC, 3);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2superzd2envz00zz__objectz00, BgL_bgl_za762classza7d2super4036z00, BGl_z62classzd2superzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_objectzd2wideningzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2wide4037z00, BGl_z62objectzd2wideningzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc4010z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4038z00, BGl_z62exceptionzd2notifyzd2z62io1410z00zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2defaultzd2valuezd2envz00zz__objectz00, BgL_bgl_za762classza7d2field4039z00, BGl_z62classzd2fieldzd2defaultzd2valuezb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc4011z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4040z00, BGl_z62exceptionzd2notifyzd2z62wa1412z00zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_evalzd2classzf3zd2envzf3zz__objectz00, BgL_bgl_za762evalza7d2classza74041za7, BGl_z62evalzd2classzf3z43zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_GENERIC(BGl_exceptionzd2notifyzd2envz00zz__objectz00, BgL_bgl_za762exceptionza7d2n4042z00, BGl_z62exceptionzd2notifyzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_findzd2classzd2envz00zz__objectz00, BgL_bgl_za762findza7d2classza74043za7, BGl_z62findzd2classzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_GENERIC(BGl_objectzd2writezd2envz00zz__objectz00, BgL_bgl_za762objectza7d2writ4044z00, va_generic_entry, BGl_z62objectzd2writezb0zz__objectz00, BUNSPEC, -2);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzf3zd2envz21zz__objectz00, BgL_bgl_za762classza7f3za791za7za74045za7, BGl_z62classzf3z91zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2subclasseszd2envz00zz__objectz00, BgL_bgl_za762classza7d2subcl4046z00, BGl_z62classzd2subclasseszb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2creatorzd2envz00zz__objectz00, BgL_bgl_za762classza7d2creat4047z00, BGl_z62classzd2creatorzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_genericzd2methodzd2arrayzd2envzd2zz__objectz00, BgL_bgl_za762genericza7d2met4048z00, BGl_z62genericzd2methodzd2arrayz62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2namezd2envz00zz__objectz00, BgL_bgl_za762classza7d2nameza74049za7, BGl_z62classzd2namezb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2hashzd2envz00zz__objectz00, BgL_bgl_za762classza7d2hashza74050za7, BGl_z62classzd2hashzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2typezd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4051z00, BGl_z62classzd2fieldzd2typez62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_genericzd2nozd2defaultzd2behaviorzd2envz00zz__objectz00, BgL_bgl_za762genericza7d2noza74052za7, va_generic_entry, BGl_z62genericzd2nozd2defaultzd2behaviorzb0zz__objectz00, BUNSPEC, -1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2evdatazd2envz00zz__objectz00, BgL_bgl_za762classza7d2evdat4053z00, BGl_z62classzd2evdatazb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52objectzd2wideningzd2envz52zz__objectz00, BgL_bgl_za762za752objectza7d2w4054za7, BGl_z62z52objectzd2wideningze2zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2mutatorzd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4055z00, BGl_z62classzd2fieldzd2mutatorz62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2accessorzd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4056z00, BGl_z62classzd2fieldzd2accessorz62zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3500z00zz__objectz00, BgL_bgl_string3500za700za7za7_4057za7, "&class-evdata", 13 );
BGL_DEFINE_STRING(BGl_string3501z00zz__objectz00, BgL_bgl_string3501za700za7za7_4058za7, "&class-evdata-set!", 18 );
BGL_DEFINE_STRING(BGl_string3502z00zz__objectz00, BgL_bgl_string3502za700za7za7_4059za7, "class-evfields-set!", 19 );
BGL_DEFINE_STRING(BGl_string3503z00zz__objectz00, BgL_bgl_string3503za700za7za7_4060za7, "Fields already set", 18 );
BGL_DEFINE_STRING(BGl_string3504z00zz__objectz00, BgL_bgl_string3504za700za7za7_4061za7, "Not an eval class", 17 );
BGL_DEFINE_STRING(BGl_string3505z00zz__objectz00, BgL_bgl_string3505za700za7za7_4062za7, "&class-evfields-set!", 20 );
BGL_DEFINE_STRING(BGl_string3506z00zz__objectz00, BgL_bgl_string3506za700za7za7_4063za7, "&class-fields", 13 );
BGL_DEFINE_STRING(BGl_string3507z00zz__objectz00, BgL_bgl_string3507za700za7za7_4064za7, "&class-all-fields", 17 );
BGL_DEFINE_STRING(BGl_string3508z00zz__objectz00, BgL_bgl_string3508za700za7za7_4065za7, "class-field", 11 );
BGL_DEFINE_STRING(BGl_string3509z00zz__objectz00, BgL_bgl_string3509za700za7za7_4066za7, "&find-class-field", 17 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2defaultzd2valuezf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2field4067z00, BGl_z62classzd2fieldzd2defaultzd2valuezf3z43zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3510z00zz__objectz00, BgL_bgl_string3510za700za7za7_4068za7, "&make-class-field", 17 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2virtualzd2envz00zz__objectz00, BgL_bgl_za762classza7d2virtu4069z00, BGl_z62classzd2virtualzb0zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3511z00zz__objectz00, BgL_bgl_string3511za700za7za7_4070za7, "class-field-name", 16 );
BGL_DEFINE_STRING(BGl_string3512z00zz__objectz00, BgL_bgl_string3512za700za7za7_4071za7, "&class-field-name", 17 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_widezd2objectzf3zd2envzf3zz__objectz00, BgL_bgl_za762wideza7d2object4072z00, BGl_z62widezd2objectzf3z43zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3513z00zz__objectz00, BgL_bgl_string3513za700za7za7_4073za7, "&class-field-virtual?", 21 );
BGL_DEFINE_STRING(BGl_string3514z00zz__objectz00, BgL_bgl_string3514za700za7za7_4074za7, "class-field-accessor", 20 );
BGL_DEFINE_STRING(BGl_string3515z00zz__objectz00, BgL_bgl_string3515za700za7za7_4075za7, "procedure", 9 );
BGL_DEFINE_STRING(BGl_string3516z00zz__objectz00, BgL_bgl_string3516za700za7za7_4076za7, "&class-field-accessor", 21 );
BGL_DEFINE_STRING(BGl_string3517z00zz__objectz00, BgL_bgl_string3517za700za7za7_4077za7, "&class-field-mutable?", 21 );
BGL_DEFINE_STRING(BGl_string3518z00zz__objectz00, BgL_bgl_string3518za700za7za7_4078za7, "class-field-mutator", 19 );
BGL_DEFINE_STRING(BGl_string3519z00zz__objectz00, BgL_bgl_string3519za700za7za7_4079za7, "&class-field-mutator", 20 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_callzd2nextzd2virtualzd2getterzd2envz00zz__objectz00, BgL_bgl_za762callza7d2nextza7d4080za7, BGl_z62callzd2nextzd2virtualzd2getterzb0zz__objectz00, 0L, BUNSPEC, 3);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldszd2envz00zz__objectz00, BgL_bgl_za762classza7d2field4081z00, BGl_z62classzd2fieldszb0zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3600z00zz__objectz00, BgL_bgl_string3600za700za7za7_4082za7, ")", 1 );
BGL_DEFINE_STRING(BGl_string3601z00zz__objectz00, BgL_bgl_string3601za700za7za7_4083za7, "@", 1 );
BGL_DEFINE_STRING(BGl_string3520z00zz__objectz00, BgL_bgl_string3520za700za7za7_4084za7, "&class-field-info", 17 );
BGL_DEFINE_STRING(BGl_string3602z00zz__objectz00, BgL_bgl_string3602za700za7za7_4085za7, "\" (", 3 );
BGL_DEFINE_STRING(BGl_string3521z00zz__objectz00, BgL_bgl_string3521za700za7za7_4086za7, "&class-field-default-value?", 27 );
BGL_DEFINE_STRING(BGl_string3603z00zz__objectz00, BgL_bgl_string3603za700za7za7_4087za7, "Dangerous class redefinition: \"", 31 );
BGL_DEFINE_STRING(BGl_string3522z00zz__objectz00, BgL_bgl_string3522za700za7za7_4088za7, "class-field-default-value:Wrong number of arguments", 51 );
BGL_DEFINE_STRING(BGl_string3604z00zz__objectz00, BgL_bgl_string3604za700za7za7_4089za7, "&register-class!", 16 );
BGL_DEFINE_STRING(BGl_string3605z00zz__objectz00, BgL_bgl_string3605za700za7za7_4090za7, "fill-vector-with-virtuals!", 26 );
BGL_DEFINE_STRING(BGl_string3606z00zz__objectz00, BgL_bgl_string3606za700za7za7_4091za7, "<@anonymous:1716>", 17 );
BGL_DEFINE_STRING(BGl_string3525z00zz__objectz00, BgL_bgl_string3525za700za7za7_4092za7, "funcall", 7 );
BGL_DEFINE_STRING(BGl_string3607z00zz__objectz00, BgL_bgl_string3607za700za7za7_4093za7, "pair", 4 );
BGL_DEFINE_STRING(BGl_string3608z00zz__objectz00, BgL_bgl_string3608za700za7za7_4094za7, "for-each", 8 );
BGL_DEFINE_STRING(BGl_string3527z00zz__objectz00, BgL_bgl_string3527za700za7za7_4095za7, "p", 1 );
BGL_DEFINE_STRING(BGl_string3609z00zz__objectz00, BgL_bgl_string3609za700za7za7_4096za7, "make-class-virtual-slots-vector", 31 );
BGL_DEFINE_STRING(BGl_string3528z00zz__objectz00, BgL_bgl_string3528za700za7za7_4097za7, "class-field-default-value", 25 );
BGL_DEFINE_STRING(BGl_string3529z00zz__objectz00, BgL_bgl_string3529za700za7za7_4098za7, "This field has no default value", 31 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52isazf2cdepthzf3zd2envz81zz__objectz00, BgL_bgl_za762za752isaza7f2cdep4099za7, BGl_z62z52isazf2cdepthzf3z31zz__objectz00, 0L, BUNSPEC, 3);
BGL_DEFINE_STRING(BGl_string3610z00zz__objectz00, BgL_bgl_string3610za700za7za7_4100za7, "make-method-array", 17 );
BGL_DEFINE_STRING(BGl_string3611z00zz__objectz00, BgL_bgl_string3611za700za7za7_4101za7, "unoptimal bigloo-generic-bucket-size: ", 38 );
BGL_DEFINE_STRING(BGl_string3530z00zz__objectz00, BgL_bgl_string3530za700za7za7_4102za7, "&class-field-default-value", 26 );
BGL_DEFINE_STRING(BGl_string3612z00zz__objectz00, BgL_bgl_string3612za700za7za7_4103za7, "No default behavior", 19 );
BGL_DEFINE_STRING(BGl_string3531z00zz__objectz00, BgL_bgl_string3531za700za7za7_4104za7, "&class-field-type", 17 );
BGL_DEFINE_STRING(BGl_string3613z00zz__objectz00, BgL_bgl_string3613za700za7za7_4105za7, "&procedure->generic", 19 );
BGL_DEFINE_STRING(BGl_string3532z00zz__objectz00, BgL_bgl_string3532za700za7za7_4106za7, "&class-super", 12 );
BGL_DEFINE_STRING(BGl_string3614z00zz__objectz00, BgL_bgl_string3614za700za7za7_4107za7, "&register-generic!", 18 );
BGL_DEFINE_STRING(BGl_string3533z00zz__objectz00, BgL_bgl_string3533za700za7za7_4108za7, "class-allocator", 15 );
BGL_DEFINE_STRING(BGl_string3615z00zz__objectz00, BgL_bgl_string3615za700za7za7_4109za7, "register-generic-sans-lock!", 27 );
BGL_DEFINE_STRING(BGl_string3534z00zz__objectz00, BgL_bgl_string3534za700za7za7_4110za7, "class-abstract?", 15 );
BGL_DEFINE_STRING(BGl_string3616z00zz__objectz00, BgL_bgl_string3616za700za7za7_4111za7, "laap", 4 );
BGL_DEFINE_STRING(BGl_string3535z00zz__objectz00, BgL_bgl_string3535za700za7za7_4112za7, "&class-abstract?", 16 );
DEFINE_EXPORT_BGL_GENERIC(BGl_objectzd2printzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2prin4113z00, BGl_z62objectzd2printzb0zz__objectz00, 0L, BUNSPEC, 3);
BGL_DEFINE_STRING(BGl_string3617z00zz__objectz00, BgL_bgl_string3617za700za7za7_4114za7, "%add-method!", 12 );
BGL_DEFINE_STRING(BGl_string3536z00zz__objectz00, BgL_bgl_string3536za700za7za7_4115za7, "class-shrink", 12 );
BGL_DEFINE_STRING(BGl_string3618z00zz__objectz00, BgL_bgl_string3618za700za7za7_4116za7, "", 0 );
BGL_DEFINE_STRING(BGl_string3537z00zz__objectz00, BgL_bgl_string3537za700za7za7_4117za7, "&class-wide?", 12 );
BGL_DEFINE_STRING(BGl_string3619z00zz__objectz00, BgL_bgl_string3619za700za7za7_4118za7, "loop~0", 6 );
BGL_DEFINE_STRING(BGl_string3538z00zz__objectz00, BgL_bgl_string3538za700za7za7_4119za7, "&class-subclasses", 17 );
BGL_DEFINE_STRING(BGl_string3539z00zz__objectz00, BgL_bgl_string3539za700za7za7_4120za7, "&class-allocator", 16 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_objectzf3zd2envz21zz__objectz00, BgL_bgl_za762objectza7f3za791za74121z00, BGl_z62objectzf3z91zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_GENERIC(BGl_objectzd2displayzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2disp4122z00, va_generic_entry, BGl_z62objectzd2displayzb0zz__objectz00, BUNSPEC, -2);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_allocatezd2instancezd2envz00zz__objectz00, BgL_bgl_za762allocateza7d2in4123z00, BGl_z62allocatezd2instancezb0zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3620z00zz__objectz00, BgL_bgl_string3620za700za7za7_4124za7, "method/generic arity mismatch, expecting ~a", 43 );
BGL_DEFINE_STRING(BGl_string3621z00zz__objectz00, BgL_bgl_string3621za700za7za7_4125za7, "generic-add-method!", 19 );
BGL_DEFINE_STRING(BGl_string3540z00zz__objectz00, BgL_bgl_string3540za700za7za7_4126za7, "&class-hash", 11 );
BGL_DEFINE_STRING(BGl_string3703z00zz__objectz00, BgL_bgl_string3703za700za7za7_4127za7, "fname", 5 );
BGL_DEFINE_STRING(BGl_string3622z00zz__objectz00, BgL_bgl_string3622za700za7za7_4128za7, "Illegal class for method", 24 );
BGL_DEFINE_STRING(BGl_string3541z00zz__objectz00, BgL_bgl_string3541za700za7za7_4129za7, "&class-constructor", 18 );
BGL_DEFINE_STRING(BGl_string3623z00zz__objectz00, BgL_bgl_string3623za700za7za7_4130za7, "&generic-add-method!", 20 );
BGL_DEFINE_STRING(BGl_string3542z00zz__objectz00, BgL_bgl_string3542za700za7za7_4131za7, "&class-creator", 14 );
BGL_DEFINE_STRING(BGl_string3624z00zz__objectz00, BgL_bgl_string3624za700za7za7_4132za7, "generic-add-eval-method!", 24 );
BGL_DEFINE_STRING(BGl_string3543z00zz__objectz00, BgL_bgl_string3543za700za7za7_4133za7, "class-nil-init!", 15 );
BGL_DEFINE_STRING(BGl_string3625z00zz__objectz00, BgL_bgl_string3625za700za7za7_4134za7, "&generic-add-eval-method!", 25 );
BGL_DEFINE_STRING(BGl_string3544z00zz__objectz00, BgL_bgl_string3544za700za7za7_4135za7, "class-nil-init!:Wrong number of arguments", 41 );
BGL_DEFINE_STRING(BGl_string3626z00zz__objectz00, BgL_bgl_string3626za700za7za7_4136za7, "find-method", 11 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_makezd2classzd2fieldzd2envzd2zz__objectz00, BgL_bgl_za762makeza7d2classza74137za7, BGl_z62makezd2classzd2fieldz62zz__objectz00, 0L, BUNSPEC, 8);
BGL_DEFINE_STRING(BGl_string3708z00zz__objectz00, BgL_bgl_string3708za700za7za7_4138za7, "location", 8 );
BGL_DEFINE_STRING(BGl_string3627z00zz__objectz00, BgL_bgl_string3627za700za7za7_4139za7, "&find-method", 12 );
BGL_DEFINE_STRING(BGl_string3628z00zz__objectz00, BgL_bgl_string3628za700za7za7_4140za7, "find-super-class-method", 23 );
BGL_DEFINE_STRING(BGl_string3547z00zz__objectz00, BgL_bgl_string3547za700za7za7_4141za7, "fun1535", 7 );
BGL_DEFINE_STRING(BGl_string3629z00zz__objectz00, BgL_bgl_string3629za700za7za7_4142za7, "&find-super-class-method", 24 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_findzd2classzd2byzd2hashzd2envz00zz__objectz00, BgL_bgl_za762findza7d2classza74143za7, BGl_z62findzd2classzd2byzd2hashzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3700z00zz__objectz00, BgL_bgl_za762lambda1894za7624144z00, BGl_z62lambda1894z62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3701z00zz__objectz00, BgL_bgl_za762lambda1893za7624145z00, BGl_z62lambda1893z62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3704z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4146za7, BGl_z62zc3z04anonymousza31902ze3ze5zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52isazd2objectzf2cdepthzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isaza7d2obje4147za7, BGl_z62z52isazd2objectzf2cdepthzf3ze3zz__objectz00, 0L, BUNSPEC, 3);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3705z00zz__objectz00, BgL_bgl_za762lambda1901za7624148z00, BGl_z62lambda1901z62zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3630z00zz__objectz00, BgL_bgl_string3630za700za7za7_4149za7, "&find-method-from", 17 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3706z00zz__objectz00, BgL_bgl_za762lambda1900za7624150z00, BGl_z62lambda1900z62zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3631z00zz__objectz00, BgL_bgl_string3631za700za7za7_4151za7, "nil?", 4 );
BGL_DEFINE_STRING(BGl_string3550z00zz__objectz00, BgL_bgl_string3550za700za7za7_4152za7, "fun1532", 7 );
BGL_DEFINE_STRING(BGl_string3713z00zz__objectz00, BgL_bgl_string3713za700za7za7_4153za7, "stack", 5 );
BGL_DEFINE_STRING(BGl_string3632z00zz__objectz00, BgL_bgl_string3632za700za7za7_4154za7, "&nil?", 5 );
BGL_DEFINE_STRING(BGl_string3633z00zz__objectz00, BgL_bgl_string3633za700za7za7_4155za7, "isa?", 4 );
BGL_DEFINE_STRING(BGl_string3552z00zz__objectz00, BgL_bgl_string3552za700za7za7_4156za7, "o", 1 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3709z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4157za7, BGl_z62zc3z04anonymousza31910ze3ze5zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3634z00zz__objectz00, BgL_bgl_string3634za700za7za7_4158za7, "vector-ref", 10 );
BGL_DEFINE_STRING(BGl_string3635z00zz__objectz00, BgL_bgl_string3635za700za7za7_4159za7, "&isa?", 5 );
BGL_DEFINE_STRING(BGl_string3636z00zz__objectz00, BgL_bgl_string3636za700za7za7_4160za7, "%isa/cdepth?", 12 );
BGL_DEFINE_STRING(BGl_string3555z00zz__objectz00, BgL_bgl_string3555za700za7za7_4161za7, "proc", 4 );
BGL_DEFINE_STRING(BGl_string3718z00zz__objectz00, BgL_bgl_string3718za700za7za7_4162za7, "&exception", 10 );
BGL_DEFINE_STRING(BGl_string3637z00zz__objectz00, BgL_bgl_string3637za700za7za7_4163za7, "&%isa/cdepth?", 13 );
BGL_DEFINE_STRING(BGl_string3638z00zz__objectz00, BgL_bgl_string3638za700za7za7_4164za7, "%isa-object/cdepth?", 19 );
BGL_DEFINE_STRING(BGl_string3557z00zz__objectz00, BgL_bgl_string3557za700za7za7_4165za7, "wo", 2 );
BGL_DEFINE_STRING(BGl_string3639z00zz__objectz00, BgL_bgl_string3639za700za7za7_4166za7, "&%isa-object/cdepth?", 20 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2infozd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4167z00, BGl_z62classzd2fieldzd2infoz62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3710z00zz__objectz00, BgL_bgl_za762lambda1909za7624168z00, BGl_z62lambda1909z62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3711z00zz__objectz00, BgL_bgl_za762lambda1908za7624169z00, BGl_z62lambda1908z62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3714z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4170za7, BGl_z62zc3z04anonymousza31888ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3715z00zz__objectz00, BgL_bgl_za762lambda1886za7624171z00, BGl_z62lambda1886z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3640z00zz__objectz00, BgL_bgl_string3640za700za7za7_4172za7, "&%isa32-object/cdepth?", 22 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3716z00zz__objectz00, BgL_bgl_za762lambda1884za7624173z00, BGl_z62lambda1884z62zz__objectz00, 0L, BUNSPEC, 3);
BGL_DEFINE_STRING(BGl_string3641z00zz__objectz00, BgL_bgl_string3641za700za7za7_4174za7, "%isa64-object/cdepth?", 21 );
BGL_DEFINE_STRING(BGl_string3560z00zz__objectz00, BgL_bgl_string3560za700za7za7_4175za7, "fun1536", 7 );
BGL_DEFINE_STRING(BGl_string3804z00zz__objectz00, BgL_bgl_string3804za700za7za7_4176za7, "&io-timeout-error", 17 );
BGL_DEFINE_STRING(BGl_string3642z00zz__objectz00, BgL_bgl_string3642za700za7za7_4177za7, "&%isa64-object/cdepth?", 22 );
BGL_DEFINE_STRING(BGl_string3724z00zz__objectz00, BgL_bgl_string3724za700za7za7_4178za7, "msg", 3 );
BGL_DEFINE_STRING(BGl_string3643z00zz__objectz00, BgL_bgl_string3643za700za7za7_4179za7, "&%isa/final?", 12 );
BGL_DEFINE_STRING(BGl_string3562z00zz__objectz00, BgL_bgl_string3562za700za7za7_4180za7, "&class-nil-init!", 16 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3719z00zz__objectz00, BgL_bgl_za762lambda1927za7624181z00, BGl_z62lambda1927z62zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3644z00zz__objectz00, BgL_bgl_string3644za700za7za7_4182za7, "&%isa-object/final?", 19 );
BGL_DEFINE_STRING(BGl_string3563z00zz__objectz00, BgL_bgl_string3563za700za7za7_4183za7, "class-nil", 9 );
BGL_DEFINE_STRING(BGl_string3645z00zz__objectz00, BgL_bgl_string3645za700za7za7_4184za7, "allocate-instance", 17 );
BGL_DEFINE_STRING(BGl_string3564z00zz__objectz00, BgL_bgl_string3564za700za7za7_4185za7, "&class-nil", 10 );
BGL_DEFINE_STRING(BGl_string3483z00zz__objectz00, BgL_bgl_string3483za700za7za7_4186za7, "/tmp/bigloo/runtime/Llib/object.scm", 35 );
BGL_DEFINE_STRING(BGl_string3646z00zz__objectz00, BgL_bgl_string3646za700za7za7_4187za7, "loop:Wrong number of arguments", 30 );
BGL_DEFINE_STRING(BGl_string3565z00zz__objectz00, BgL_bgl_string3565za700za7za7_4188za7, "initialize-objects!", 19 );
BGL_DEFINE_STRING(BGl_string3484z00zz__objectz00, BgL_bgl_string3484za700za7za7_4189za7, "loop", 4 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2typeszd2numberzd2envzd2zz__objectz00, BgL_bgl_za762biglooza7d2type4190z00, BGl_z62bigloozd2typeszd2numberz62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3809z00zz__objectz00, BgL_bgl_string3809za700za7za7_4191za7, "&io-connection-error", 20 );
BGL_DEFINE_STRING(BGl_string3566z00zz__objectz00, BgL_bgl_string3566za700za7za7_4192za7, "extend-vector", 13 );
BGL_DEFINE_STRING(BGl_string3485z00zz__objectz00, BgL_bgl_string3485za700za7za7_4193za7, "bint", 4 );
BGL_DEFINE_STRING(BGl_string3567z00zz__objectz00, BgL_bgl_string3567za700za7za7_4194za7, "double-nb-classes!", 18 );
BGL_DEFINE_STRING(BGl_string3486z00zz__objectz00, BgL_bgl_string3486za700za7za7_4195za7, "vector", 6 );
BGL_DEFINE_STRING(BGl_string3649z00zz__objectz00, BgL_bgl_string3649za700za7za7_4196za7, "alloc", 5 );
BGL_DEFINE_STRING(BGl_string3568z00zz__objectz00, BgL_bgl_string3568za700za7za7_4197za7, "double-nb-generics!", 19 );
BGL_DEFINE_STRING(BGl_string3487z00zz__objectz00, BgL_bgl_string3487za700za7za7_4198za7, "class", 5 );
BGL_DEFINE_STRING(BGl_string3569z00zz__objectz00, BgL_bgl_string3569za700za7za7_4199za7, "&object-class-num", 17 );
BGL_DEFINE_STRING(BGl_string3488z00zz__objectz00, BgL_bgl_string3488za700za7za7_4200za7, "&class-exists", 13 );
BGL_DEFINE_STRING(BGl_string3489z00zz__objectz00, BgL_bgl_string3489za700za7za7_4201za7, "symbol", 6 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3800z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4202za7, BGl_z62zc3z04anonymousza32096ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3801z00zz__objectz00, BgL_bgl_za762lambda2094za7624203z00, BGl_z62lambda2094z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3720z00zz__objectz00, BgL_bgl_za762lambda1926za7624204z00, BGl_z62lambda1926z62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3802z00zz__objectz00, BgL_bgl_za762lambda2092za7624205z00, BGl_z62lambda2092z62zz__objectz00, 0L, BUNSPEC, 6);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3721z00zz__objectz00, BgL_bgl_za762lambda1934za7624206z00, BGl_z62lambda1934z62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3722z00zz__objectz00, BgL_bgl_za762lambda1933za7624207z00, BGl_z62lambda1933z62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3805z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4208za7, BGl_z62zc3z04anonymousza32107ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3806z00zz__objectz00, BgL_bgl_za762lambda2105za7624209z00, BGl_z62lambda2105z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3731z00zz__objectz00, BgL_bgl_string3731za700za7za7_4210za7, "&error", 6 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3725z00zz__objectz00, BgL_bgl_za762lambda1939za7624211z00, BGl_z62lambda1939z62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3807z00zz__objectz00, BgL_bgl_za762lambda2103za7624212z00, BGl_z62lambda2103z62zz__objectz00, 0L, BUNSPEC, 6);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3726z00zz__objectz00, BgL_bgl_za762lambda1938za7624213z00, BGl_z62lambda1938z62zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3570z00zz__objectz00, BgL_bgl_string3570za700za7za7_4214za7, "object", 6 );
BGL_DEFINE_STRING(BGl_string3814z00zz__objectz00, BgL_bgl_string3814za700za7za7_4215za7, "&process-exception", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3727z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4216za7, BGl_z62zc3z04anonymousza31922ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3652z00zz__objectz00, BgL_bgl_string3652za700za7za7_4217za7, "fun1835", 7 );
BGL_DEFINE_STRING(BGl_string3571z00zz__objectz00, BgL_bgl_string3571za700za7za7_4218za7, "&object-class-num-set!", 22 );
BGL_DEFINE_STRING(BGl_string3490z00zz__objectz00, BgL_bgl_string3490za700za7za7_4219za7, "find-class", 10 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3728z00zz__objectz00, BgL_bgl_za762lambda1920za7624220z00, BGl_z62lambda1920z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3572z00zz__objectz00, BgL_bgl_string3572za700za7za7_4221za7, "&object-class", 13 );
BGL_DEFINE_STRING(BGl_string3491z00zz__objectz00, BgL_bgl_string3491za700za7za7_4222za7, "Cannot find class", 17 );
BGL_DEFINE_STRING(BGl_string3735z00zz__objectz00, BgL_bgl_string3735za700za7za7_4223za7, "type", 4 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3729z00zz__objectz00, BgL_bgl_za762lambda1918za7624224z00, BGl_z62lambda1918z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3654z00zz__objectz00, BgL_bgl_string3654za700za7za7_4225za7, "&allocate-instance", 18 );
BGL_DEFINE_STRING(BGl_string3573z00zz__objectz00, BgL_bgl_string3573za700za7za7_4226za7, "generic-default", 15 );
BGL_DEFINE_STRING(BGl_string3492z00zz__objectz00, BgL_bgl_string3492za700za7za7_4227za7, "&find-class", 11 );
BGL_DEFINE_STRING(BGl_string3655z00zz__objectz00, BgL_bgl_string3655za700za7za7_4228za7, "&wide-object?", 13 );
BGL_DEFINE_STRING(BGl_string3574z00zz__objectz00, BgL_bgl_string3574za700za7za7_4229za7, "&generic-default", 16 );
BGL_DEFINE_STRING(BGl_string3493z00zz__objectz00, BgL_bgl_string3493za700za7za7_4230za7, "&find-class-by-hash", 19 );
BGL_DEFINE_STRING(BGl_string3656z00zz__objectz00, BgL_bgl_string3656za700za7za7_4231za7, "call-virtual-getter", 19 );
BGL_DEFINE_STRING(BGl_string3575z00zz__objectz00, BgL_bgl_string3575za700za7za7_4232za7, "&generic-method-array", 21 );
BGL_DEFINE_STRING(BGl_string3494z00zz__objectz00, BgL_bgl_string3494za700za7za7_4233za7, "eval-class?", 11 );
BGL_DEFINE_STRING(BGl_string3819z00zz__objectz00, BgL_bgl_string3819za700za7za7_4234za7, "&stack-overflow-error", 21 );
BGL_DEFINE_STRING(BGl_string3657z00zz__objectz00, BgL_bgl_string3657za700za7za7_4235za7, "call-virtual-getter:Wrong number of arguments", 45 );
BGL_DEFINE_STRING(BGl_string3576z00zz__objectz00, BgL_bgl_string3576za700za7za7_4236za7, "method-array-ref", 16 );
BGL_DEFINE_STRING(BGl_string3495z00zz__objectz00, BgL_bgl_string3495za700za7za7_4237za7, "&class-name", 11 );
BGL_DEFINE_STRING(BGl_string3577z00zz__objectz00, BgL_bgl_string3577za700za7za7_4238za7, "&method-array-ref", 17 );
BGL_DEFINE_STRING(BGl_string3496z00zz__objectz00, BgL_bgl_string3496za700za7za7_4239za7, "&class-module", 13 );
BGL_DEFINE_STRING(BGl_string3578z00zz__objectz00, BgL_bgl_string3578za700za7za7_4240za7, "method-array-set!", 17 );
BGL_DEFINE_STRING(BGl_string3497z00zz__objectz00, BgL_bgl_string3497za700za7za7_4241za7, "&class-index", 12 );
BGL_DEFINE_STRING(BGl_string3498z00zz__objectz00, BgL_bgl_string3498za700za7za7_4242za7, "&class-num", 10 );
BGL_DEFINE_STRING(BGl_string3499z00zz__objectz00, BgL_bgl_string3499za700za7za7_4243za7, "&class-virtual", 14 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2existszd2envz00zz__objectz00, BgL_bgl_za762classza7d2exist4244z00, BGl_z62classzd2existszb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2nilzd2envz00zz__objectz00, BgL_bgl_za762classza7d2nilza7b4245za7, BGl_z62classzd2nilzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3810z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4246za7, BGl_z62zc3z04anonymousza32117ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3811z00zz__objectz00, BgL_bgl_za762lambda2115za7624247z00, BGl_z62lambda2115z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3812z00zz__objectz00, BgL_bgl_za762lambda2113za7624248z00, BGl_z62lambda2113z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3900z00zz__objectz00, BgL_bgl_string3900za700za7za7_4249za7, "&<@anonymous:1888>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3732z00zz__objectz00, BgL_bgl_za762lambda1956za7624250z00, BGl_z62lambda1956z62zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3901z00zz__objectz00, BgL_bgl_string3901za700za7za7_4251za7, "&lambda1909", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3733z00zz__objectz00, BgL_bgl_za762lambda1955za7624252z00, BGl_z62lambda1955z62zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3902z00zz__objectz00, BgL_bgl_string3902za700za7za7_4253za7, "&lambda1908", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3815z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4254za7, BGl_z62zc3z04anonymousza32127ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3740z00zz__objectz00, BgL_bgl_string3740za700za7za7_4255za7, "&type-error", 11 );
BGL_DEFINE_STRING(BGl_string3903z00zz__objectz00, BgL_bgl_string3903za700za7za7_4256za7, "&lambda1901", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3816z00zz__objectz00, BgL_bgl_za762lambda2125za7624257z00, BGl_z62lambda2125z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3660z00zz__objectz00, BgL_bgl_string3660za700za7za7_4258za7, "getter", 6 );
BGL_DEFINE_STRING(BGl_string3904z00zz__objectz00, BgL_bgl_string3904za700za7za7_4259za7, "&lambda1900", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3817z00zz__objectz00, BgL_bgl_za762lambda2123za7624260z00, BGl_z62lambda2123z62zz__objectz00, 0L, BUNSPEC, 6);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3736z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4261za7, BGl_z62zc3z04anonymousza31949ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3580z00zz__objectz00, BgL_bgl_string3580za700za7za7_4262za7, "generic", 7 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52isa32zd2objectzf2cdepthzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isa32za7d2ob4263za7, BGl_z62z52isa32zd2objectzf2cdepthzf3ze3zz__objectz00, 0L, BUNSPEC, 3);
BGL_DEFINE_STRING(BGl_string3905z00zz__objectz00, BgL_bgl_string3905za700za7za7_4264za7, "&lambda1894", 11 );
BGL_DEFINE_STRING(BGl_string3824z00zz__objectz00, BgL_bgl_string3824za700za7za7_4265za7, "message", 7 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3737z00zz__objectz00, BgL_bgl_za762lambda1947za7624266z00, BGl_z62lambda1947z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3662z00zz__objectz00, BgL_bgl_string3662za700za7za7_4267za7, "obj", 3 );
BGL_DEFINE_STRING(BGl_string3906z00zz__objectz00, BgL_bgl_string3906za700za7za7_4268za7, "&lambda1893", 11 );
BGL_DEFINE_STRING(BGl_string3744z00zz__objectz00, BgL_bgl_string3744za700za7za7_4269za7, "index", 5 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3738z00zz__objectz00, BgL_bgl_za762lambda1945za7624270z00, BGl_z62lambda1945z62zz__objectz00, 0L, BUNSPEC, 7);
BGL_DEFINE_STRING(BGl_string3663z00zz__objectz00, BgL_bgl_string3663za700za7za7_4271za7, "&call-virtual-getter", 20 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2numzd2envz00zz__objectz00, BgL_bgl_za762classza7d2numza7b4272za7, BGl_z62classzd2numzb0zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3907z00zz__objectz00, BgL_bgl_string3907za700za7za7_4273za7, "&<@anonymous:1877>", 18 );
BGL_DEFINE_STRING(BGl_string3826z00zz__objectz00, BgL_bgl_string3826za700za7za7_4274za7, "bstring", 7 );
BGL_DEFINE_STRING(BGl_string3664z00zz__objectz00, BgL_bgl_string3664za700za7za7_4275za7, "call-virtual-setter", 19 );
BGL_DEFINE_STRING(BGl_string3583z00zz__objectz00, BgL_bgl_string3583za700za7za7_4276za7, "mtable-size", 11 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2genericzd2bucketzd2powzd2envz00zz__objectz00, BgL_bgl_za762biglooza7d2gene4277z00, BGl_z62bigloozd2genericzd2bucketzd2powzb0zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3908z00zz__objectz00, BgL_bgl_string3908za700za7za7_4278za7, "&<@anonymous:1864>", 18 );
BGL_DEFINE_STRING(BGl_string3665z00zz__objectz00, BgL_bgl_string3665za700za7za7_4279za7, "call-virtual-setter:Wrong number of arguments", 45 );
BGL_DEFINE_STRING(BGl_string3585z00zz__objectz00, BgL_bgl_string3585za700za7za7_4280za7, "method-array-size", 17 );
BGL_DEFINE_STRING(BGl_string3749z00zz__objectz00, BgL_bgl_string3749za700za7za7_4281za7, "&index-out-of-bounds-error", 26 );
BGL_DEFINE_STRING(BGl_string3668z00zz__objectz00, BgL_bgl_string3668za700za7za7_4282za7, "setter", 6 );
BGL_DEFINE_STRING(BGl_string3587z00zz__objectz00, BgL_bgl_string3587za700za7za7_4283za7, "generic-bucket-size", 19 );
BGL_DEFINE_STRING(BGl_string3589z00zz__objectz00, BgL_bgl_string3589za700za7za7_4284za7, "max-class", 9 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2virtualzf3zd2envz21zz__objectz00, BgL_bgl_za762classza7d2field4285z00, BGl_z62classzd2fieldzd2virtualzf3z91zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2indexzd2envz00zz__objectz00, BgL_bgl_za762classza7d2index4286z00, BGl_z62classzd2indexzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_callzd2virtualzd2getterzd2envzd2zz__objectz00, BgL_bgl_za762callza7d2virtua4287z00, BGl_z62callzd2virtualzd2getterz62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3820z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4288za7, BGl_z62zc3z04anonymousza32145ze3ze5zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3821z00zz__objectz00, BgL_bgl_za762lambda2144za7624289z00, BGl_z62lambda2144z62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3822z00zz__objectz00, BgL_bgl_za762lambda2143za7624290z00, BGl_z62lambda2143z62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3741z00zz__objectz00, BgL_bgl_za762lambda1972za7624291z00, BGl_z62lambda1972z62zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3910z00zz__objectz00, BgL_bgl_string3910za700za7za7_4292za7, "object-display1392", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3742z00zz__objectz00, BgL_bgl_za762lambda1971za7624293z00, BGl_z62lambda1971z62zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3912z00zz__objectz00, BgL_bgl_string3912za700za7za7_4294za7, "object-write1395", 16 );
BGL_DEFINE_STRING(BGl_string3831z00zz__objectz00, BgL_bgl_string3831za700za7za7_4295za7, "&security-exception", 19 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3745z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4296za7, BGl_z62zc3z04anonymousza31967ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3670z00zz__objectz00, BgL_bgl_string3670za700za7za7_4297za7, "value", 5 );
BGL_DEFINE_STRING(BGl_string3914z00zz__objectz00, BgL_bgl_string3914za700za7za7_4298za7, "object-hashnumber1397", 21 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3827z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4299za7, BGl_z62zc3z04anonymousza32137ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3746z00zz__objectz00, BgL_bgl_za762lambda1965za7624300z00, BGl_z62lambda1965z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3671z00zz__objectz00, BgL_bgl_string3671za700za7za7_4301za7, "&call-virtual-setter", 20 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3909z00zz__objectz00, BgL_bgl_za762objectza7d2disp4302z00, va_generic_entry, BGl_z62objectzd2display1392zb0zz__objectz00, BUNSPEC, -2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3828z00zz__objectz00, BgL_bgl_za762lambda2135za7624303z00, BGl_z62lambda2135z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3747z00zz__objectz00, BgL_bgl_za762lambda1963za7624304z00, BGl_z62lambda1963z62zz__objectz00, 0L, BUNSPEC, 7);
BGL_DEFINE_STRING(BGl_string3672z00zz__objectz00, BgL_bgl_string3672za700za7za7_4305za7, "call-next-virtual-getter", 24 );
BGL_DEFINE_STRING(BGl_string3591z00zz__objectz00, BgL_bgl_string3591za700za7za7_4306za7, "max-generic", 11 );
BGL_DEFINE_STRING(BGl_string3916z00zz__objectz00, BgL_bgl_string3916za700za7za7_4307za7, "object-print1401", 16 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3829z00zz__objectz00, BgL_bgl_za762lambda2133za7624308z00, BGl_z62lambda2133z62zz__objectz00, 0L, BUNSPEC, 4);
BGL_DEFINE_STRING(BGl_string3754z00zz__objectz00, BgL_bgl_string3754za700za7za7_4309za7, "&io-error", 9 );
BGL_DEFINE_STRING(BGl_string3673z00zz__objectz00, BgL_bgl_string3673za700za7za7_4310za7, "call-next-virtual-getter:Wrong number of arguments", 50 );
BGL_DEFINE_STRING(BGl_string3592z00zz__objectz00, BgL_bgl_string3592za700za7za7_4311za7, "<@anonymous:1629>", 17 );
BGL_DEFINE_STRING(BGl_string3593z00zz__objectz00, BgL_bgl_string3593za700za7za7_4312za7, "map", 3 );
BGL_DEFINE_STRING(BGl_string3918z00zz__objectz00, BgL_bgl_string3918za700za7za7_4313za7, "object-equal?1403", 17 );
BGL_DEFINE_STRING(BGl_string3594z00zz__objectz00, BgL_bgl_string3594za700za7za7_4314za7, "list", 4 );
BGL_DEFINE_STRING(BGl_string3676z00zz__objectz00, BgL_bgl_string3676za700za7za7_4315za7, "fun1850", 7 );
BGL_DEFINE_STRING(BGl_string3595z00zz__objectz00, BgL_bgl_string3595za700za7za7_4316za7, "new-class!", 10 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_objectzd2classzd2numzd2envzd2zz__objectz00, BgL_bgl_za762objectza7d2clas4317z00, BGl_z62objectzd2classzd2numz62zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3839z00zz__objectz00, BgL_bgl_string3839za700za7za7_4318za7, "permission", 10 );
BGL_DEFINE_STRING(BGl_string3677z00zz__objectz00, BgL_bgl_string3677za700za7za7_4319za7, "&call-next-virtual-getter", 25 );
BGL_DEFINE_STRING(BGl_string3596z00zz__objectz00, BgL_bgl_string3596za700za7za7_4320za7, "vector-set!", 11 );
BGL_DEFINE_STRING(BGl_string3759z00zz__objectz00, BgL_bgl_string3759za700za7za7_4321za7, "&io-port-error", 14 );
BGL_DEFINE_STRING(BGl_string3678z00zz__objectz00, BgL_bgl_string3678za700za7za7_4322za7, "call-next-virtual-setter", 24 );
BGL_DEFINE_STRING(BGl_string3597z00zz__objectz00, BgL_bgl_string3597za700za7za7_4323za7, "Illegal super-class for class", 29 );
BGL_DEFINE_STRING(BGl_string3679z00zz__objectz00, BgL_bgl_string3679za700za7za7_4324za7, "call-next-virtual-setter:Wrong number of arguments", 50 );
BGL_DEFINE_STRING(BGl_string3598z00zz__objectz00, BgL_bgl_string3598za700za7za7_4325za7, "register-class!", 15 );
BGL_DEFINE_STRING(BGl_string3599z00zz__objectz00, BgL_bgl_string3599za700za7za7_4326za7, "Fields not a vector", 19 );
DEFINE_EXPORT_BGL_GENERIC(BGl_objectzd2equalzf3zd2envzf3zz__objectz00, BgL_bgl_za762objectza7d2equa4327z00, BGl_z62objectzd2equalzf3z43zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3911z00zz__objectz00, BgL_bgl_za762objectza7d2writ4328z00, va_generic_entry, BGl_z62objectzd2write1395zb0zz__objectz00, BUNSPEC, -2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3750z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4329za7, BGl_z62zc3z04anonymousza31985ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3913z00zz__objectz00, BgL_bgl_za762objectza7d2hash4330z00, BGl_z62objectzd2hashnumber1397zb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3832z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4331za7, BGl_z62zc3z04anonymousza32162ze3ze5zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3751z00zz__objectz00, BgL_bgl_za762lambda1983za7624332z00, BGl_z62lambda1983z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3920z00zz__objectz00, BgL_bgl_string3920za700za7za7_4333za7, "exception-notify1405", 20 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3833z00zz__objectz00, BgL_bgl_za762lambda2161za7624334z00, BGl_z62lambda2161z62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3752z00zz__objectz00, BgL_bgl_za762lambda1981za7624335z00, BGl_z62lambda1981z62zz__objectz00, 0L, BUNSPEC, 6);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_findzd2methodzd2envz00zz__objectz00, BgL_bgl_za762findza7d2method4336z00, BGl_z62findzd2methodzb0zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3921z00zz__objectz00, BgL_bgl_string3921za700za7za7_4337za7, "*** UNKNOWN EXCEPTION: ", 23 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3915z00zz__objectz00, BgL_bgl_za762objectza7d2prin4338z00, BGl_z62objectzd2print1401zb0zz__objectz00, 0L, BUNSPEC, 3);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3834z00zz__objectz00, BgL_bgl_za762lambda2160za7624339z00, BGl_z62lambda2160z62zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3922z00zz__objectz00, BgL_bgl_string3922za700za7za7_4340za7, " [[", 3 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3835z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4341za7, BGl_z62zc3z04anonymousza32169ze3ze5zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3923z00zz__objectz00, BgL_bgl_string3923za700za7za7_4342za7, "]]", 2 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3917z00zz__objectz00, BgL_bgl_za762objectza7d2equa4343z00, BGl_z62objectzd2equalzf31403z43zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3836z00zz__objectz00, BgL_bgl_za762lambda2168za7624344z00, BGl_z62lambda2168z62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3755z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4345za7, BGl_z62zc3z04anonymousza31996ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3837z00zz__objectz00, BgL_bgl_za762lambda2167za7624346z00, BGl_z62lambda2167z62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3756z00zz__objectz00, BgL_bgl_za762lambda1994za7624347z00, BGl_z62lambda1994z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3919z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4348z00, BGl_z62exceptionzd2notify1405zb0zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3844z00zz__objectz00, BgL_bgl_string3844za700za7za7_4349za7, "&access-control-exception", 25 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3757z00zz__objectz00, BgL_bgl_za762lambda1992za7624350z00, BGl_z62lambda1992z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3682z00zz__objectz00, BgL_bgl_string3682za700za7za7_4351za7, "fun1853", 7 );
BGL_DEFINE_STRING(BGl_string3926z00zz__objectz00, BgL_bgl_string3926za700za7za7_4352za7, "get-value", 9 );
BGL_DEFINE_STRING(BGl_string3764z00zz__objectz00, BgL_bgl_string3764za700za7za7_4353za7, "&io-read-error", 14 );
BGL_DEFINE_STRING(BGl_string3683z00zz__objectz00, BgL_bgl_string3683za700za7za7_4354za7, "&call-next-virtual-setter", 25 );
BGL_DEFINE_STRING(BGl_string3684z00zz__objectz00, BgL_bgl_string3684za700za7za7_4355za7, "&object-widening", 16 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52isa64zd2objectzf2cdepthzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isa64za7d2ob4356za7, BGl_z62z52isa64zd2objectzf2cdepthzf3ze3zz__objectz00, 0L, BUNSPEC, 3);
extern obj_t BGl_displayzd2envzd2zz__r4_output_6_10_3z00;
BGL_DEFINE_STRING(BGl_string3928z00zz__objectz00, BgL_bgl_string3928za700za7za7_4357za7, "obj1", 4 );
BGL_DEFINE_STRING(BGl_string3685z00zz__objectz00, BgL_bgl_string3685za700za7za7_4358za7, "&object-widening-set!", 21 );
BGL_DEFINE_STRING(BGl_string3848z00zz__objectz00, BgL_bgl_string3848za700za7za7_4359za7, "args", 4 );
BGL_DEFINE_STRING(BGl_string3686z00zz__objectz00, BgL_bgl_string3686za700za7za7_4360za7, "&%object-widening", 17 );
BGL_DEFINE_STRING(BGl_string3687z00zz__objectz00, BgL_bgl_string3687za700za7za7_4361za7, "&%object-widening-set!", 22 );
BGL_DEFINE_STRING(BGl_string3769z00zz__objectz00, BgL_bgl_string3769za700za7za7_4362za7, "&io-write-error", 15 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_genericzd2memoryzd2statisticszd2envzd2zz__objectz00, BgL_bgl_za762genericza7d2mem4363z00, BGl_z62genericzd2memoryzd2statisticsz62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2constructorzd2envz00zz__objectz00, BgL_bgl_za762classza7d2const4364z00, BGl_z62classzd2constructorzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3840z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4365za7, BGl_z62zc3z04anonymousza32155ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3841z00zz__objectz00, BgL_bgl_za762lambda2153za7624366z00, BGl_z62lambda2153z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3760z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4367za7, BGl_z62zc3z04anonymousza32008ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_findzd2superzd2classzd2methodzd2envz00zz__objectz00, BgL_bgl_za762findza7d2superza74368za7, BGl_z62findzd2superzd2classzd2methodzb0zz__objectz00, 0L, BUNSPEC, 3);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3842z00zz__objectz00, BgL_bgl_za762lambda2151za7624369z00, BGl_z62lambda2151z62zz__objectz00, 0L, BUNSPEC, 6);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3761z00zz__objectz00, BgL_bgl_za762lambda2006za7624370z00, BGl_z62lambda2006z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3762z00zz__objectz00, BgL_bgl_za762lambda2004za7624371z00, BGl_z62lambda2004z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3931z00zz__objectz00, BgL_bgl_string3931za700za7za7_4372za7, "obj2", 4 );
BGL_DEFINE_STRING(BGl_string3932z00zz__objectz00, BgL_bgl_string3932za700za7za7_4373za7, "&object-equal?1403", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3845z00zz__objectz00, BgL_bgl_za762lambda2184za7624374z00, BGl_z62lambda2184z62zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3933z00zz__objectz00, BgL_bgl_string3933za700za7za7_4375za7, "#|", 2 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3846z00zz__objectz00, BgL_bgl_za762lambda2183za7624376z00, BGl_z62lambda2183z62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3765z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4377za7, BGl_z62zc3z04anonymousza32021ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3934z00zz__objectz00, BgL_bgl_string3934za700za7za7_4378za7, " nil|", 5 );
BGL_DEFINE_STRING(BGl_string3853z00zz__objectz00, BgL_bgl_string3853za700za7za7_4379za7, "&warning", 8 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3766z00zz__objectz00, BgL_bgl_za762lambda2019za7624380z00, BGl_z62lambda2019z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3935z00zz__objectz00, BgL_bgl_string3935za700za7za7_4381za7, " ....|", 6 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3767z00zz__objectz00, BgL_bgl_za762lambda2017za7624382z00, BGl_z62lambda2017z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3936z00zz__objectz00, BgL_bgl_string3936za700za7za7_4383za7, "&object-print1401", 17 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3849z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4384za7, BGl_z62zc3z04anonymousza32179ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3774z00zz__objectz00, BgL_bgl_string3774za700za7za7_4385za7, "&io-closed-error", 16 );
BGL_DEFINE_STRING(BGl_string3693z00zz__objectz00, BgL_bgl_string3693za700za7za7_4386za7, "__object", 8 );
BGL_DEFINE_STRING(BGl_string3937z00zz__objectz00, BgL_bgl_string3937za700za7za7_4387za7, "output-port", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3688z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4388za7, BGl_z62zc3z04anonymousza31864ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_genericzd2addzd2evalzd2methodz12zd2envz12zz__objectz00, BgL_bgl_za762genericza7d2add4389z00, BGl_z62genericzd2addzd2evalzd2methodz12za2zz__objectz00, 0L, BUNSPEC, 4);
BGL_DEFINE_STRING(BGl_string3938z00zz__objectz00, BgL_bgl_string3938za700za7za7_4390za7, "&object-hashnumber1397", 22 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3689z00zz__objectz00, BgL_bgl_za762lambda1862za7624391z00, BGl_z62lambda1862z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3939z00zz__objectz00, BgL_bgl_string3939za700za7za7_4392za7, "&object-write1395", 17 );
BGL_DEFINE_STRING(BGl_string3858z00zz__objectz00, BgL_bgl_string3858za700za7za7_4393za7, "&eval-warning", 13 );
BGL_DEFINE_STRING(BGl_string3859z00zz__objectz00, BgL_bgl_string3859za700za7za7_4394za7, "&<@anonymous:2194>", 18 );
BGL_DEFINE_STRING(BGl_string3779z00zz__objectz00, BgL_bgl_string3779za700za7za7_4395za7, "&io-file-not-found-error", 24 );
BGL_DEFINE_STRING(BGl_string3698z00zz__objectz00, BgL_bgl_string3698za700za7za7_4396za7, "&condition", 10 );
extern obj_t BGl_writezd2envzd2zz__r4_output_6_10_3z00;
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3850z00zz__objectz00, BgL_bgl_za762lambda2177za7624397z00, BGl_z62lambda2177z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3851z00zz__objectz00, BgL_bgl_za762lambda2175za7624398z00, BGl_z62lambda2175z62zz__objectz00, 0L, BUNSPEC, 4);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3770z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4399za7, BGl_z62zc3z04anonymousza32033ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3771z00zz__objectz00, BgL_bgl_za762lambda2031za7624400z00, BGl_z62lambda2031z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3690z00zz__objectz00, BgL_bgl_za762lambda1860za7624401z00, BGl_z62lambda1860z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3940z00zz__objectz00, BgL_bgl_string3940za700za7za7_4402za7, "&object-display1392", 19 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3772z00zz__objectz00, BgL_bgl_za762lambda2029za7624403z00, BGl_z62lambda2029z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3941z00zz__objectz00, BgL_bgl_string3941za700za7za7_4404za7, "object-display", 14 );
BGL_DEFINE_STRING(BGl_string3860z00zz__objectz00, BgL_bgl_string3860za700za7za7_4405za7, "&<@anonymous:2179>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3854z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4406za7, BGl_z62zc3z04anonymousza32194ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3942z00zz__objectz00, BgL_bgl_string3942za700za7za7_4407za7, "pair-nil", 8 );
BGL_DEFINE_STRING(BGl_string3861z00zz__objectz00, BgL_bgl_string3861za700za7za7_4408za7, "&lambda2184", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3855z00zz__objectz00, BgL_bgl_za762lambda2192za7624409z00, BGl_z62lambda2192z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3862z00zz__objectz00, BgL_bgl_string3862za700za7za7_4410za7, "&lambda2183", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3856z00zz__objectz00, BgL_bgl_za762lambda2190za7624411z00, BGl_z62lambda2190z62zz__objectz00, 0L, BUNSPEC, 4);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3775z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4412za7, BGl_z62zc3z04anonymousza32044ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3694z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4413za7, BGl_z62zc3z04anonymousza31877ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3944z00zz__objectz00, BgL_bgl_string3944za700za7za7_4414za7, "Wrong number of arguments", 25 );
BGL_DEFINE_STRING(BGl_string3863z00zz__objectz00, BgL_bgl_string3863za700za7za7_4415za7, "&<@anonymous:2155>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3776z00zz__objectz00, BgL_bgl_za762lambda2042za7624416z00, BGl_z62lambda2042z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3695z00zz__objectz00, BgL_bgl_za762lambda1874za7624417z00, BGl_z62lambda1874z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3864z00zz__objectz00, BgL_bgl_string3864za700za7za7_4418za7, "&lambda2151", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3777z00zz__objectz00, BgL_bgl_za762lambda2040za7624419z00, BGl_z62lambda2040z62zz__objectz00, 0L, BUNSPEC, 6);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3696z00zz__objectz00, BgL_bgl_za762lambda1870za7624420z00, BGl_z62lambda1870z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3865z00zz__objectz00, BgL_bgl_string3865za700za7za7_4421za7, "&lambda2168", 11 );
BGL_DEFINE_STRING(BGl_string3784z00zz__objectz00, BgL_bgl_string3784za700za7za7_4422za7, "&io-parse-error", 15 );
BGL_DEFINE_STRING(BGl_string3947z00zz__objectz00, BgL_bgl_string3947za700za7za7_4423za7, "apply", 5 );
BGL_DEFINE_STRING(BGl_string3866z00zz__objectz00, BgL_bgl_string3866za700za7za7_4424za7, "&lambda2167", 11 );
BGL_DEFINE_STRING(BGl_string3867z00zz__objectz00, BgL_bgl_string3867za700za7za7_4425za7, "&lambda2161", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3699z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4426za7, BGl_z62zc3z04anonymousza31895ze3ze5zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3949z00zz__objectz00, BgL_bgl_string3949za700za7za7_4427za7, "method1394", 10 );
BGL_DEFINE_STRING(BGl_string3868z00zz__objectz00, BgL_bgl_string3868za700za7za7_4428za7, "&lambda2160", 11 );
BGL_DEFINE_STRING(BGl_string3869z00zz__objectz00, BgL_bgl_string3869za700za7za7_4429za7, "&<@anonymous:2137>", 18 );
BGL_DEFINE_STRING(BGl_string3789z00zz__objectz00, BgL_bgl_string3789za700za7za7_4430za7, "&io-unknown-host-error", 22 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2evfieldszd2setz12zd2envzc0zz__objectz00, BgL_bgl_za762classza7d2evfie4431z00, BGl_z62classzd2evfieldszd2setz12z70zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3780z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4432za7, BGl_z62zc3z04anonymousza32054ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3781z00zz__objectz00, BgL_bgl_za762lambda2052za7624433z00, BGl_z62lambda2052z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3782z00zz__objectz00, BgL_bgl_za762lambda2050za7624434z00, BGl_z62lambda2050z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3870z00zz__objectz00, BgL_bgl_string3870za700za7za7_4435za7, "&lambda2133", 11 );
BGL_DEFINE_STRING(BGl_string3952z00zz__objectz00, BgL_bgl_string3952za700za7za7_4436za7, "let", 3 );
BGL_DEFINE_STRING(BGl_string3871z00zz__objectz00, BgL_bgl_string3871za700za7za7_4437za7, "&lambda2144", 11 );
BGL_DEFINE_STRING(BGl_string3872z00zz__objectz00, BgL_bgl_string3872za700za7za7_4438za7, "&lambda2143", 11 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3785z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4439za7, BGl_z62zc3z04anonymousza32065ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3873z00zz__objectz00, BgL_bgl_string3873za700za7za7_4440za7, "&<@anonymous:2127>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3786z00zz__objectz00, BgL_bgl_za762lambda2063za7624441z00, BGl_z62lambda2063z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3874z00zz__objectz00, BgL_bgl_string3874za700za7za7_4442za7, "&<@anonymous:2117>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3787z00zz__objectz00, BgL_bgl_za762lambda2061za7624443z00, BGl_z62lambda2061z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3956z00zz__objectz00, BgL_bgl_string3956za700za7za7_4444za7, "list2222", 8 );
BGL_DEFINE_STRING(BGl_string3875z00zz__objectz00, BgL_bgl_string3875za700za7za7_4445za7, "&<@anonymous:2107>", 18 );
BGL_DEFINE_STRING(BGl_string3794z00zz__objectz00, BgL_bgl_string3794za700za7za7_4446za7, "&io-malformed-url-error", 23 );
BGL_DEFINE_STRING(BGl_string3876z00zz__objectz00, BgL_bgl_string3876za700za7za7_4447za7, "&<@anonymous:2096>", 18 );
BGL_DEFINE_STRING(BGl_string3877z00zz__objectz00, BgL_bgl_string3877za700za7za7_4448za7, "&<@anonymous:2086>", 18 );
BGL_DEFINE_STRING(BGl_string3959z00zz__objectz00, BgL_bgl_string3959za700za7za7_4449za7, "$cons", 5 );
BGL_DEFINE_STRING(BGl_string3878z00zz__objectz00, BgL_bgl_string3878za700za7za7_4450za7, "&<@anonymous:2076>", 18 );
BGL_DEFINE_STRING(BGl_string3879z00zz__objectz00, BgL_bgl_string3879za700za7za7_4451za7, "&<@anonymous:2065>", 18 );
BGL_DEFINE_STRING(BGl_string3799z00zz__objectz00, BgL_bgl_string3799za700za7za7_4452za7, "&io-sigpipe-error", 17 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_callzd2nextzd2virtualzd2setterzd2envz00zz__objectz00, BgL_bgl_za762callza7d2nextza7d4453za7, BGl_z62callzd2nextzd2virtualzd2setterzb0zz__objectz00, 0L, BUNSPEC, 4);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_nilzf3zd2envz21zz__objectz00, BgL_bgl_za762nilza7f3za791za7za7__4454za7, BGl_z62nilzf3z91zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3790z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4455za7, BGl_z62zc3z04anonymousza32076ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3791z00zz__objectz00, BgL_bgl_za762lambda2074za7624456z00, BGl_z62lambda2074z62zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3792z00zz__objectz00, BgL_bgl_za762lambda2072za7624457z00, BGl_z62lambda2072z62zz__objectz00, 0L, BUNSPEC, 6);
BGL_DEFINE_STRING(BGl_string3961z00zz__objectz00, BgL_bgl_string3961za700za7za7_4458za7, "port", 4 );
BGL_DEFINE_STRING(BGl_string3880z00zz__objectz00, BgL_bgl_string3880za700za7za7_4459za7, "&<@anonymous:2054>", 18 );
BGL_DEFINE_STRING(BGl_string3881z00zz__objectz00, BgL_bgl_string3881za700za7za7_4460za7, "&<@anonymous:2044>", 18 );
BGL_DEFINE_STRING(BGl_string3882z00zz__objectz00, BgL_bgl_string3882za700za7za7_4461za7, "&<@anonymous:2033>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3795z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4462za7, BGl_z62zc3z04anonymousza32086ze3ze5zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3964z00zz__objectz00, BgL_bgl_string3964za700za7za7_4463za7, "quote", 5 );
BGL_DEFINE_STRING(BGl_string3883z00zz__objectz00, BgL_bgl_string3883za700za7za7_4464za7, "&<@anonymous:2021>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3796z00zz__objectz00, BgL_bgl_za762lambda2084za7624465z00, BGl_z62lambda2084z62zz__objectz00, 0L, BUNSPEC, 0);
BGL_DEFINE_STRING(BGl_string3884z00zz__objectz00, BgL_bgl_string3884za700za7za7_4466za7, "&<@anonymous:2008>", 18 );
DEFINE_STATIC_BGL_PROCEDURE(BGl_proc3797z00zz__objectz00, BgL_bgl_za762lambda2082za7624467z00, BGl_z62lambda2082z62zz__objectz00, 0L, BUNSPEC, 6);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52objectzd2wideningzd2setz12zd2envz92zz__objectz00, BgL_bgl_za762za752objectza7d2w4468za7, BGl_z62z52objectzd2wideningzd2setz12z22zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3885z00zz__objectz00, BgL_bgl_string3885za700za7za7_4469za7, "&<@anonymous:1996>", 18 );
BGL_DEFINE_STRING(BGl_string3967z00zz__objectz00, BgL_bgl_string3967za700za7za7_4470za7, "cons*", 5 );
BGL_DEFINE_STRING(BGl_string3886z00zz__objectz00, BgL_bgl_string3886za700za7za7_4471za7, "&<@anonymous:1985>", 18 );
BGL_DEFINE_STRING(BGl_string3968z00zz__objectz00, BgL_bgl_string3968za700za7za7_4472za7, "&object-display", 15 );
BGL_DEFINE_STRING(BGl_string3887z00zz__objectz00, BgL_bgl_string3887za700za7za7_4473za7, "&<@anonymous:1967>", 18 );
BGL_DEFINE_STRING(BGl_string3969z00zz__objectz00, BgL_bgl_string3969za700za7za7_4474za7, "object-write", 12 );
BGL_DEFINE_STRING(BGl_string3888z00zz__objectz00, BgL_bgl_string3888za700za7za7_4475za7, "&lambda1972", 11 );
BGL_DEFINE_STRING(BGl_string3889z00zz__objectz00, BgL_bgl_string3889za700za7za7_4476za7, "&lambda1971", 11 );
BGL_DEFINE_STRING(BGl_string3890z00zz__objectz00, BgL_bgl_string3890za700za7za7_4477za7, "&<@anonymous:1949>", 18 );
BGL_DEFINE_STRING(BGl_string3891z00zz__objectz00, BgL_bgl_string3891za700za7za7_4478za7, "&lambda1956", 11 );
BGL_DEFINE_STRING(BGl_string3973z00zz__objectz00, BgL_bgl_string3973za700za7za7_4479za7, "method1396", 10 );
BGL_DEFINE_STRING(BGl_string3892z00zz__objectz00, BgL_bgl_string3892za700za7za7_4480za7, "&lambda1955", 11 );
BGL_DEFINE_STRING(BGl_string3893z00zz__objectz00, BgL_bgl_string3893za700za7za7_4481za7, "&<@anonymous:1922>", 18 );
BGL_DEFINE_STRING(BGl_string3894z00zz__objectz00, BgL_bgl_string3894za700za7za7_4482za7, "&lambda1939", 11 );
BGL_DEFINE_STRING(BGl_string3895z00zz__objectz00, BgL_bgl_string3895za700za7za7_4483za7, "&lambda1938", 11 );
BGL_DEFINE_STRING(BGl_string3896z00zz__objectz00, BgL_bgl_string3896za700za7za7_4484za7, "&lambda1934", 11 );
BGL_DEFINE_STRING(BGl_string3978z00zz__objectz00, BgL_bgl_string3978za700za7za7_4485za7, "list2223", 8 );
BGL_DEFINE_STRING(BGl_string3897z00zz__objectz00, BgL_bgl_string3897za700za7za7_4486za7, "&lambda1933", 11 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_isazf3zd2envz21zz__objectz00, BgL_bgl_za762isaza7f3za791za7za7__4487za7, BGl_z62isazf3z91zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3898z00zz__objectz00, BgL_bgl_string3898za700za7za7_4488za7, "&lambda1927", 11 );
BGL_DEFINE_STRING(BGl_string3899z00zz__objectz00, BgL_bgl_string3899za700za7za7_4489za7, "&lambda1926", 11 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52isazd2objectzf2finalzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isaza7d2obje4490za7, BGl_z62z52isazd2objectzf2finalzf3ze3zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2allzd2fieldszd2envzd2zz__objectz00, BgL_bgl_za762classza7d2allza7d4491za7, BGl_z62classzd2allzd2fieldsz62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2field4492z00, BGl_z62classzd2fieldzf3z43zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2modulezd2envz00zz__objectz00, BgL_bgl_za762classza7d2modul4493z00, BGl_z62classzd2modulezb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_registerzd2classz12zd2envz12zz__objectz00, BgL_bgl_za762registerza7d2cl4494z00, BGl_z62registerzd2classz12za2zz__objectz00, 0L, BUNSPEC, 11);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2widezf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2wideza74495za7, BGl_z62classzd2widezf3z43zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_genericzd2defaultzd2envz00zz__objectz00, BgL_bgl_za762genericza7d2def4496z00, BGl_z62genericzd2defaultzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2evdatazd2setz12zd2envzc0zz__objectz00, BgL_bgl_za762classza7d2evdat4497z00, BGl_z62classzd2evdatazd2setz12z70zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_objectzd2wideningzd2setz12zd2envzc0zz__objectz00, BgL_bgl_za762objectza7d2wide4498z00, BGl_z62objectzd2wideningzd2setz12z70zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3980z00zz__objectz00, BgL_bgl_string3980za700za7za7_4499za7, "&object-write", 13 );
BGL_DEFINE_STRING(BGl_string3981z00zz__objectz00, BgL_bgl_string3981za700za7za7_4500za7, "object-hashnumber", 17 );
BGL_DEFINE_STRING(BGl_string3982z00zz__objectz00, BgL_bgl_string3982za700za7za7_4501za7, "object-hashnumber:Wrong number of arguments", 43 );
BGL_DEFINE_STRING(BGl_string3985z00zz__objectz00, BgL_bgl_string3985za700za7za7_4502za7, "method1400", 10 );
BGL_DEFINE_STRING(BGl_string3986z00zz__objectz00, BgL_bgl_string3986za700za7za7_4503za7, "&object-hashnumber", 18 );
BGL_DEFINE_STRING(BGl_string3987z00zz__objectz00, BgL_bgl_string3987za700za7za7_4504za7, "object-print:Wrong number of arguments", 38 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2mutablezf3zd2envz21zz__objectz00, BgL_bgl_za762classza7d2field4505z00, BGl_z62classzd2fieldzd2mutablezf3z91zz__objectz00, 0L, BUNSPEC, 1);
BGL_DEFINE_STRING(BGl_string3990z00zz__objectz00, BgL_bgl_string3990za700za7za7_4506za7, "method1402", 10 );
BGL_DEFINE_STRING(BGl_string3992z00zz__objectz00, BgL_bgl_string3992za700za7za7_4507za7, "print-slot", 10 );
BGL_DEFINE_STRING(BGl_string3993z00zz__objectz00, BgL_bgl_string3993za700za7za7_4508za7, "&object-print", 13 );
BGL_DEFINE_STRING(BGl_string3994z00zz__objectz00, BgL_bgl_string3994za700za7za7_4509za7, "object-equal?:Wrong number of arguments", 39 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_z52isazf2finalzf3zd2envz81zz__objectz00, BgL_bgl_za762za752isaza7f2fina4510za7, BGl_z62z52isazf2finalzf3z31zz__objectz00, 0L, BUNSPEC, 2);
BGL_DEFINE_STRING(BGl_string3997z00zz__objectz00, BgL_bgl_string3997za700za7za7_4511za7, "method1404", 10 );
BGL_DEFINE_STRING(BGl_string3998z00zz__objectz00, BgL_bgl_string3998za700za7za7_4512za7, "&object-equal?", 14 );
BGL_DEFINE_STRING(BGl_string3999z00zz__objectz00, BgL_bgl_string3999za700za7za7_4513za7, "exception-notify:Wrong number of arguments", 42 );
DEFINE_EXPORT_BGL_PROCEDURE(BGl_findzd2classzd2fieldzd2envzd2zz__objectz00, BgL_bgl_za762findza7d2classza74514za7, BGl_z62findzd2classzd2fieldz62zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_bigloozd2genericzd2bucketzd2maskzd2envz00zz__objectz00, BgL_bgl_za762biglooza7d2gene4515z00, BGl_z62bigloozd2genericzd2bucketzd2maskzb0zz__objectz00, 0L, BUNSPEC, 0);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2allocatorzd2envz00zz__objectz00, BgL_bgl_za762classza7d2alloc4516z00, BGl_z62classzd2allocatorzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_objectzd2classzd2numzd2setz12zd2envz12zz__objectz00, BgL_bgl_za762objectza7d2clas4517z00, BGl_z62objectzd2classzd2numzd2setz12za2zz__objectz00, 0L, BUNSPEC, 2);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_callzd2virtualzd2setterzd2envzd2zz__objectz00, BgL_bgl_za762callza7d2virtua4518z00, BGl_z62callzd2virtualzd2setterz62zz__objectz00, 0L, BUNSPEC, 3);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2fieldzd2namezd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4519z00, BGl_z62classzd2fieldzd2namez62zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_methodzd2arrayzd2refzd2envzd2zz__objectz00, BgL_bgl_za762methodza7d2arra4520z00, BGl_z62methodzd2arrayzd2refz62zz__objectz00, 0L, BUNSPEC, 3);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_objectzd2classzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2clas4521z00, BGl_z62objectzd2classzb0zz__objectz00, 0L, BUNSPEC, 1);
DEFINE_EXPORT_BGL_PROCEDURE(BGl_classzd2abstractzf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2abstr4522z00, BGl_z62classzd2abstractzf3z43zz__objectz00, 0L, BUNSPEC, 1);

/* contant bindings */
static void bgl_constant_bindings() {
BGL_BIND_PROCEDURE(BGl_classzd2abstractzf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2abstr4522z00);
BGL_BIND_PROCEDURE(BGl_objectzd2classzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2clas4521z00);
BGL_BIND_PROCEDURE(BGl_methodzd2arrayzd2refzd2envzd2zz__objectz00, BgL_bgl_za762methodza7d2arra4520z00);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2namezd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4519z00);
BGL_BIND_PROCEDURE(BGl_callzd2virtualzd2setterzd2envzd2zz__objectz00, BgL_bgl_za762callza7d2virtua4518z00);
BGL_BIND_PROCEDURE(BGl_objectzd2classzd2numzd2setz12zd2envz12zz__objectz00, BgL_bgl_za762objectza7d2clas4517z00);
BGL_BIND_PROCEDURE(BGl_classzd2allocatorzd2envz00zz__objectz00, BgL_bgl_za762classza7d2alloc4516z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2genericzd2bucketzd2maskzd2envz00zz__objectz00, BgL_bgl_za762biglooza7d2gene4515z00);
BGL_BIND_PROCEDURE(BGl_findzd2classzd2fieldzd2envzd2zz__objectz00, BgL_bgl_za762findza7d2classza74514za7);
BGL_BIND_STRING(BGl_string3999z00zz__objectz00, BgL_bgl_string3999za700za7za7_4513za7);
BGL_BIND_STRING(BGl_string3998z00zz__objectz00, BgL_bgl_string3998za700za7za7_4512za7);
BGL_BIND_STRING(BGl_string3997z00zz__objectz00, BgL_bgl_string3997za700za7za7_4511za7);
BGL_BIND_PROCEDURE(BGl_z52isazf2finalzf3zd2envz81zz__objectz00, BgL_bgl_za762za752isaza7f2fina4510za7);
BGL_BIND_STRING(BGl_string3994z00zz__objectz00, BgL_bgl_string3994za700za7za7_4509za7);
BGL_BIND_STRING(BGl_string3993z00zz__objectz00, BgL_bgl_string3993za700za7za7_4508za7);
BGL_BIND_STRING(BGl_string3992z00zz__objectz00, BgL_bgl_string3992za700za7za7_4507za7);
BGL_BIND_STRING(BGl_string3990z00zz__objectz00, BgL_bgl_string3990za700za7za7_4506za7);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2mutablezf3zd2envz21zz__objectz00, BgL_bgl_za762classza7d2field4505z00);
BGL_BIND_STRING(BGl_string3987z00zz__objectz00, BgL_bgl_string3987za700za7za7_4504za7);
BGL_BIND_STRING(BGl_string3986z00zz__objectz00, BgL_bgl_string3986za700za7za7_4503za7);
BGL_BIND_STRING(BGl_string3985z00zz__objectz00, BgL_bgl_string3985za700za7za7_4502za7);
BGL_BIND_STRING(BGl_string3982z00zz__objectz00, BgL_bgl_string3982za700za7za7_4501za7);
BGL_BIND_STRING(BGl_string3981z00zz__objectz00, BgL_bgl_string3981za700za7za7_4500za7);
BGL_BIND_STRING(BGl_string3980z00zz__objectz00, BgL_bgl_string3980za700za7za7_4499za7);
BGL_BIND_PROCEDURE(BGl_objectzd2wideningzd2setz12zd2envzc0zz__objectz00, BgL_bgl_za762objectza7d2wide4498z00);
BGL_BIND_PROCEDURE(BGl_classzd2evdatazd2setz12zd2envzc0zz__objectz00, BgL_bgl_za762classza7d2evdat4497z00);
BGL_BIND_PROCEDURE(BGl_genericzd2defaultzd2envz00zz__objectz00, BgL_bgl_za762genericza7d2def4496z00);
BGL_BIND_PROCEDURE(BGl_classzd2widezf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2wideza74495za7);
BGL_BIND_PROCEDURE(BGl_registerzd2classz12zd2envz12zz__objectz00, BgL_bgl_za762registerza7d2cl4494z00);
BGL_BIND_PROCEDURE(BGl_classzd2modulezd2envz00zz__objectz00, BgL_bgl_za762classza7d2modul4493z00);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2field4492z00);
BGL_BIND_PROCEDURE(BGl_classzd2allzd2fieldszd2envzd2zz__objectz00, BgL_bgl_za762classza7d2allza7d4491za7);
BGL_BIND_PROCEDURE(BGl_z52isazd2objectzf2finalzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isaza7d2obje4490za7);
BGL_BIND_STRING(BGl_string3899z00zz__objectz00, BgL_bgl_string3899za700za7za7_4489za7);
BGL_BIND_STRING(BGl_string3898z00zz__objectz00, BgL_bgl_string3898za700za7za7_4488za7);
BGL_BIND_PROCEDURE(BGl_isazf3zd2envz21zz__objectz00, BgL_bgl_za762isaza7f3za791za7za7__4487za7);
BGL_BIND_STRING(BGl_string3897z00zz__objectz00, BgL_bgl_string3897za700za7za7_4486za7);
BGL_BIND_STRING(BGl_string3978z00zz__objectz00, BgL_bgl_string3978za700za7za7_4485za7);
BGL_BIND_STRING(BGl_string3896z00zz__objectz00, BgL_bgl_string3896za700za7za7_4484za7);
BGL_BIND_STRING(BGl_string3895z00zz__objectz00, BgL_bgl_string3895za700za7za7_4483za7);
BGL_BIND_STRING(BGl_string3894z00zz__objectz00, BgL_bgl_string3894za700za7za7_4482za7);
BGL_BIND_STRING(BGl_string3893z00zz__objectz00, BgL_bgl_string3893za700za7za7_4481za7);
BGL_BIND_STRING(BGl_string3892z00zz__objectz00, BgL_bgl_string3892za700za7za7_4480za7);
BGL_BIND_STRING(BGl_string3973z00zz__objectz00, BgL_bgl_string3973za700za7za7_4479za7);
BGL_BIND_STRING(BGl_string3891z00zz__objectz00, BgL_bgl_string3891za700za7za7_4478za7);
BGL_BIND_STRING(BGl_string3890z00zz__objectz00, BgL_bgl_string3890za700za7za7_4477za7);
BGL_BIND_STRING(BGl_string3889z00zz__objectz00, BgL_bgl_string3889za700za7za7_4476za7);
BGL_BIND_STRING(BGl_string3888z00zz__objectz00, BgL_bgl_string3888za700za7za7_4475za7);
BGL_BIND_STRING(BGl_string3969z00zz__objectz00, BgL_bgl_string3969za700za7za7_4474za7);
BGL_BIND_STRING(BGl_string3887z00zz__objectz00, BgL_bgl_string3887za700za7za7_4473za7);
BGL_BIND_STRING(BGl_string3968z00zz__objectz00, BgL_bgl_string3968za700za7za7_4472za7);
BGL_BIND_STRING(BGl_string3886z00zz__objectz00, BgL_bgl_string3886za700za7za7_4471za7);
BGL_BIND_STRING(BGl_string3967z00zz__objectz00, BgL_bgl_string3967za700za7za7_4470za7);
BGL_BIND_STRING(BGl_string3885z00zz__objectz00, BgL_bgl_string3885za700za7za7_4469za7);
BGL_BIND_PROCEDURE(BGl_z52objectzd2wideningzd2setz12zd2envz92zz__objectz00, BgL_bgl_za762za752objectza7d2w4468za7);
BGL_BIND_PROCEDURE(BGl_proc3797z00zz__objectz00, BgL_bgl_za762lambda2082za7624467z00);
BGL_BIND_STRING(BGl_string3884z00zz__objectz00, BgL_bgl_string3884za700za7za7_4466za7);
BGL_BIND_PROCEDURE(BGl_proc3796z00zz__objectz00, BgL_bgl_za762lambda2084za7624465z00);
BGL_BIND_STRING(BGl_string3883z00zz__objectz00, BgL_bgl_string3883za700za7za7_4464za7);
BGL_BIND_STRING(BGl_string3964z00zz__objectz00, BgL_bgl_string3964za700za7za7_4463za7);
BGL_BIND_PROCEDURE(BGl_proc3795z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4462za7);
BGL_BIND_STRING(BGl_string3882z00zz__objectz00, BgL_bgl_string3882za700za7za7_4461za7);
BGL_BIND_STRING(BGl_string3881z00zz__objectz00, BgL_bgl_string3881za700za7za7_4460za7);
BGL_BIND_STRING(BGl_string3880z00zz__objectz00, BgL_bgl_string3880za700za7za7_4459za7);
BGL_BIND_STRING(BGl_string3961z00zz__objectz00, BgL_bgl_string3961za700za7za7_4458za7);
BGL_BIND_PROCEDURE(BGl_proc3792z00zz__objectz00, BgL_bgl_za762lambda2072za7624457z00);
BGL_BIND_PROCEDURE(BGl_proc3791z00zz__objectz00, BgL_bgl_za762lambda2074za7624456z00);
BGL_BIND_PROCEDURE(BGl_proc3790z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4455za7);
BGL_BIND_PROCEDURE(BGl_nilzf3zd2envz21zz__objectz00, BgL_bgl_za762nilza7f3za791za7za7__4454za7);
BGL_BIND_PROCEDURE(BGl_callzd2nextzd2virtualzd2setterzd2envz00zz__objectz00, BgL_bgl_za762callza7d2nextza7d4453za7);
BGL_BIND_STRING(BGl_string3799z00zz__objectz00, BgL_bgl_string3799za700za7za7_4452za7);
BGL_BIND_STRING(BGl_string3879z00zz__objectz00, BgL_bgl_string3879za700za7za7_4451za7);
BGL_BIND_STRING(BGl_string3878z00zz__objectz00, BgL_bgl_string3878za700za7za7_4450za7);
BGL_BIND_STRING(BGl_string3959z00zz__objectz00, BgL_bgl_string3959za700za7za7_4449za7);
BGL_BIND_STRING(BGl_string3877z00zz__objectz00, BgL_bgl_string3877za700za7za7_4448za7);
BGL_BIND_STRING(BGl_string3876z00zz__objectz00, BgL_bgl_string3876za700za7za7_4447za7);
BGL_BIND_STRING(BGl_string3794z00zz__objectz00, BgL_bgl_string3794za700za7za7_4446za7);
BGL_BIND_STRING(BGl_string3875z00zz__objectz00, BgL_bgl_string3875za700za7za7_4445za7);
BGL_BIND_STRING(BGl_string3956z00zz__objectz00, BgL_bgl_string3956za700za7za7_4444za7);
BGL_BIND_PROCEDURE(BGl_proc3787z00zz__objectz00, BgL_bgl_za762lambda2061za7624443z00);
BGL_BIND_STRING(BGl_string3874z00zz__objectz00, BgL_bgl_string3874za700za7za7_4442za7);
BGL_BIND_PROCEDURE(BGl_proc3786z00zz__objectz00, BgL_bgl_za762lambda2063za7624441z00);
BGL_BIND_STRING(BGl_string3873z00zz__objectz00, BgL_bgl_string3873za700za7za7_4440za7);
BGL_BIND_PROCEDURE(BGl_proc3785z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4439za7);
BGL_BIND_STRING(BGl_string3872z00zz__objectz00, BgL_bgl_string3872za700za7za7_4438za7);
BGL_BIND_STRING(BGl_string3871z00zz__objectz00, BgL_bgl_string3871za700za7za7_4437za7);
BGL_BIND_STRING(BGl_string3952z00zz__objectz00, BgL_bgl_string3952za700za7za7_4436za7);
BGL_BIND_STRING(BGl_string3870z00zz__objectz00, BgL_bgl_string3870za700za7za7_4435za7);
BGL_BIND_PROCEDURE(BGl_proc3782z00zz__objectz00, BgL_bgl_za762lambda2050za7624434z00);
BGL_BIND_PROCEDURE(BGl_proc3781z00zz__objectz00, BgL_bgl_za762lambda2052za7624433z00);
BGL_BIND_PROCEDURE(BGl_proc3780z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4432za7);
BGL_BIND_PROCEDURE(BGl_classzd2evfieldszd2setz12zd2envzc0zz__objectz00, BgL_bgl_za762classza7d2evfie4431z00);
BGL_BIND_STRING(BGl_string3789z00zz__objectz00, BgL_bgl_string3789za700za7za7_4430za7);
BGL_BIND_STRING(BGl_string3869z00zz__objectz00, BgL_bgl_string3869za700za7za7_4429za7);
BGL_BIND_STRING(BGl_string3868z00zz__objectz00, BgL_bgl_string3868za700za7za7_4428za7);
BGL_BIND_STRING(BGl_string3949z00zz__objectz00, BgL_bgl_string3949za700za7za7_4427za7);
BGL_BIND_PROCEDURE(BGl_proc3699z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4426za7);
BGL_BIND_STRING(BGl_string3867z00zz__objectz00, BgL_bgl_string3867za700za7za7_4425za7);
BGL_BIND_STRING(BGl_string3866z00zz__objectz00, BgL_bgl_string3866za700za7za7_4424za7);
BGL_BIND_STRING(BGl_string3947z00zz__objectz00, BgL_bgl_string3947za700za7za7_4423za7);
BGL_BIND_STRING(BGl_string3784z00zz__objectz00, BgL_bgl_string3784za700za7za7_4422za7);
BGL_BIND_STRING(BGl_string3865z00zz__objectz00, BgL_bgl_string3865za700za7za7_4421za7);
BGL_BIND_PROCEDURE(BGl_proc3696z00zz__objectz00, BgL_bgl_za762lambda1870za7624420z00);
BGL_BIND_PROCEDURE(BGl_proc3777z00zz__objectz00, BgL_bgl_za762lambda2040za7624419z00);
BGL_BIND_STRING(BGl_string3864z00zz__objectz00, BgL_bgl_string3864za700za7za7_4418za7);
BGL_BIND_PROCEDURE(BGl_proc3695z00zz__objectz00, BgL_bgl_za762lambda1874za7624417z00);
BGL_BIND_PROCEDURE(BGl_proc3776z00zz__objectz00, BgL_bgl_za762lambda2042za7624416z00);
BGL_BIND_STRING(BGl_string3863z00zz__objectz00, BgL_bgl_string3863za700za7za7_4415za7);
BGL_BIND_STRING(BGl_string3944z00zz__objectz00, BgL_bgl_string3944za700za7za7_4414za7);
BGL_BIND_PROCEDURE(BGl_proc3694z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4413za7);
BGL_BIND_PROCEDURE(BGl_proc3775z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4412za7);
BGL_BIND_PROCEDURE(BGl_proc3856z00zz__objectz00, BgL_bgl_za762lambda2190za7624411z00);
BGL_BIND_STRING(BGl_string3862z00zz__objectz00, BgL_bgl_string3862za700za7za7_4410za7);
BGL_BIND_PROCEDURE(BGl_proc3855z00zz__objectz00, BgL_bgl_za762lambda2192za7624409z00);
BGL_BIND_STRING(BGl_string3861z00zz__objectz00, BgL_bgl_string3861za700za7za7_4408za7);
BGL_BIND_STRING(BGl_string3942z00zz__objectz00, BgL_bgl_string3942za700za7za7_4407za7);
BGL_BIND_PROCEDURE(BGl_proc3854z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4406za7);
BGL_BIND_STRING(BGl_string3860z00zz__objectz00, BgL_bgl_string3860za700za7za7_4405za7);
BGL_BIND_STRING(BGl_string3941z00zz__objectz00, BgL_bgl_string3941za700za7za7_4404za7);
BGL_BIND_PROCEDURE(BGl_proc3772z00zz__objectz00, BgL_bgl_za762lambda2029za7624403z00);
BGL_BIND_STRING(BGl_string3940z00zz__objectz00, BgL_bgl_string3940za700za7za7_4402za7);
BGL_BIND_PROCEDURE(BGl_proc3690z00zz__objectz00, BgL_bgl_za762lambda1860za7624401z00);
BGL_BIND_PROCEDURE(BGl_proc3771z00zz__objectz00, BgL_bgl_za762lambda2031za7624400z00);
BGL_BIND_PROCEDURE(BGl_proc3770z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4399za7);
BGL_BIND_PROCEDURE(BGl_proc3851z00zz__objectz00, BgL_bgl_za762lambda2175za7624398z00);
BGL_BIND_PROCEDURE(BGl_proc3850z00zz__objectz00, BgL_bgl_za762lambda2177za7624397z00);
BGL_BIND_STRING(BGl_string3698z00zz__objectz00, BgL_bgl_string3698za700za7za7_4396za7);
BGL_BIND_STRING(BGl_string3779z00zz__objectz00, BgL_bgl_string3779za700za7za7_4395za7);
BGL_BIND_STRING(BGl_string3859z00zz__objectz00, BgL_bgl_string3859za700za7za7_4394za7);
BGL_BIND_STRING(BGl_string3858z00zz__objectz00, BgL_bgl_string3858za700za7za7_4393za7);
BGL_BIND_STRING(BGl_string3939z00zz__objectz00, BgL_bgl_string3939za700za7za7_4392za7);
BGL_BIND_PROCEDURE(BGl_proc3689z00zz__objectz00, BgL_bgl_za762lambda1862za7624391z00);
BGL_BIND_STRING(BGl_string3938z00zz__objectz00, BgL_bgl_string3938za700za7za7_4390za7);
BGL_BIND_PROCEDURE(BGl_genericzd2addzd2evalzd2methodz12zd2envz12zz__objectz00, BgL_bgl_za762genericza7d2add4389z00);
BGL_BIND_PROCEDURE(BGl_proc3688z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4388za7);
BGL_BIND_STRING(BGl_string3937z00zz__objectz00, BgL_bgl_string3937za700za7za7_4387za7);
BGL_BIND_STRING(BGl_string3693z00zz__objectz00, BgL_bgl_string3693za700za7za7_4386za7);
BGL_BIND_STRING(BGl_string3774z00zz__objectz00, BgL_bgl_string3774za700za7za7_4385za7);
BGL_BIND_PROCEDURE(BGl_proc3849z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4384za7);
BGL_BIND_STRING(BGl_string3936z00zz__objectz00, BgL_bgl_string3936za700za7za7_4383za7);
BGL_BIND_PROCEDURE(BGl_proc3767z00zz__objectz00, BgL_bgl_za762lambda2017za7624382z00);
BGL_BIND_STRING(BGl_string3935z00zz__objectz00, BgL_bgl_string3935za700za7za7_4381za7);
BGL_BIND_PROCEDURE(BGl_proc3766z00zz__objectz00, BgL_bgl_za762lambda2019za7624380z00);
BGL_BIND_STRING(BGl_string3853z00zz__objectz00, BgL_bgl_string3853za700za7za7_4379za7);
BGL_BIND_STRING(BGl_string3934z00zz__objectz00, BgL_bgl_string3934za700za7za7_4378za7);
BGL_BIND_PROCEDURE(BGl_proc3765z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4377za7);
BGL_BIND_PROCEDURE(BGl_proc3846z00zz__objectz00, BgL_bgl_za762lambda2183za7624376z00);
BGL_BIND_STRING(BGl_string3933z00zz__objectz00, BgL_bgl_string3933za700za7za7_4375za7);
BGL_BIND_PROCEDURE(BGl_proc3845z00zz__objectz00, BgL_bgl_za762lambda2184za7624374z00);
BGL_BIND_STRING(BGl_string3932z00zz__objectz00, BgL_bgl_string3932za700za7za7_4373za7);
BGL_BIND_STRING(BGl_string3931z00zz__objectz00, BgL_bgl_string3931za700za7za7_4372za7);
BGL_BIND_PROCEDURE(BGl_proc3762z00zz__objectz00, BgL_bgl_za762lambda2004za7624371z00);
BGL_BIND_PROCEDURE(BGl_proc3761z00zz__objectz00, BgL_bgl_za762lambda2006za7624370z00);
BGL_BIND_PROCEDURE(BGl_proc3842z00zz__objectz00, BgL_bgl_za762lambda2151za7624369z00);
BGL_BIND_PROCEDURE(BGl_findzd2superzd2classzd2methodzd2envz00zz__objectz00, BgL_bgl_za762findza7d2superza74368za7);
BGL_BIND_PROCEDURE(BGl_proc3760z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4367za7);
BGL_BIND_PROCEDURE(BGl_proc3841z00zz__objectz00, BgL_bgl_za762lambda2153za7624366z00);
BGL_BIND_PROCEDURE(BGl_proc3840z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4365za7);
BGL_BIND_PROCEDURE(BGl_classzd2constructorzd2envz00zz__objectz00, BgL_bgl_za762classza7d2const4364z00);
BGL_BIND_PROCEDURE(BGl_genericzd2memoryzd2statisticszd2envzd2zz__objectz00, BgL_bgl_za762genericza7d2mem4363z00);
BGL_BIND_STRING(BGl_string3769z00zz__objectz00, BgL_bgl_string3769za700za7za7_4362za7);
BGL_BIND_STRING(BGl_string3687z00zz__objectz00, BgL_bgl_string3687za700za7za7_4361za7);
BGL_BIND_STRING(BGl_string3686z00zz__objectz00, BgL_bgl_string3686za700za7za7_4360za7);
BGL_BIND_STRING(BGl_string3848z00zz__objectz00, BgL_bgl_string3848za700za7za7_4359za7);
BGL_BIND_STRING(BGl_string3685z00zz__objectz00, BgL_bgl_string3685za700za7za7_4358za7);
BGL_BIND_STRING(BGl_string3928z00zz__objectz00, BgL_bgl_string3928za700za7za7_4357za7);
BGL_BIND_PROCEDURE(BGl_z52isa64zd2objectzf2cdepthzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isa64za7d2ob4356za7);
BGL_BIND_STRING(BGl_string3684z00zz__objectz00, BgL_bgl_string3684za700za7za7_4355za7);
BGL_BIND_STRING(BGl_string3683z00zz__objectz00, BgL_bgl_string3683za700za7za7_4354za7);
BGL_BIND_STRING(BGl_string3764z00zz__objectz00, BgL_bgl_string3764za700za7za7_4353za7);
BGL_BIND_STRING(BGl_string3926z00zz__objectz00, BgL_bgl_string3926za700za7za7_4352za7);
BGL_BIND_STRING(BGl_string3682z00zz__objectz00, BgL_bgl_string3682za700za7za7_4351za7);
BGL_BIND_PROCEDURE(BGl_proc3757z00zz__objectz00, BgL_bgl_za762lambda1992za7624350z00);
BGL_BIND_STRING(BGl_string3844z00zz__objectz00, BgL_bgl_string3844za700za7za7_4349za7);
BGL_BIND_PROCEDURE(BGl_proc3919z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4348z00);
BGL_BIND_PROCEDURE(BGl_proc3756z00zz__objectz00, BgL_bgl_za762lambda1994za7624347z00);
BGL_BIND_PROCEDURE(BGl_proc3837z00zz__objectz00, BgL_bgl_za762lambda2167za7624346z00);
BGL_BIND_PROCEDURE(BGl_proc3755z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4345za7);
BGL_BIND_PROCEDURE(BGl_proc3836z00zz__objectz00, BgL_bgl_za762lambda2168za7624344z00);
BGL_BIND_PROCEDURE(BGl_proc3917z00zz__objectz00, BgL_bgl_za762objectza7d2equa4343z00);
BGL_BIND_STRING(BGl_string3923z00zz__objectz00, BgL_bgl_string3923za700za7za7_4342za7);
BGL_BIND_PROCEDURE(BGl_proc3835z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4341za7);
BGL_BIND_STRING(BGl_string3922z00zz__objectz00, BgL_bgl_string3922za700za7za7_4340za7);
BGL_BIND_PROCEDURE(BGl_proc3834z00zz__objectz00, BgL_bgl_za762lambda2160za7624339z00);
BGL_BIND_PROCEDURE(BGl_proc3915z00zz__objectz00, BgL_bgl_za762objectza7d2prin4338z00);
BGL_BIND_STRING(BGl_string3921z00zz__objectz00, BgL_bgl_string3921za700za7za7_4337za7);
BGL_BIND_PROCEDURE(BGl_findzd2methodzd2envz00zz__objectz00, BgL_bgl_za762findza7d2method4336z00);
BGL_BIND_PROCEDURE(BGl_proc3752z00zz__objectz00, BgL_bgl_za762lambda1981za7624335z00);
BGL_BIND_PROCEDURE(BGl_proc3833z00zz__objectz00, BgL_bgl_za762lambda2161za7624334z00);
BGL_BIND_STRING(BGl_string3920z00zz__objectz00, BgL_bgl_string3920za700za7za7_4333za7);
BGL_BIND_PROCEDURE(BGl_proc3751z00zz__objectz00, BgL_bgl_za762lambda1983za7624332z00);
BGL_BIND_PROCEDURE(BGl_proc3832z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4331za7);
BGL_BIND_PROCEDURE(BGl_proc3913z00zz__objectz00, BgL_bgl_za762objectza7d2hash4330z00);
BGL_BIND_PROCEDURE(BGl_proc3750z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4329za7);
BGL_BIND_PROCEDURE(BGl_proc3911z00zz__objectz00, BgL_bgl_za762objectza7d2writ4328z00);
BGL_BIND_PROCEDURE(BGl_objectzd2equalzf3zd2envzf3zz__objectz00, BgL_bgl_za762objectza7d2equa4327z00);
BGL_BIND_STRING(BGl_string3599z00zz__objectz00, BgL_bgl_string3599za700za7za7_4326za7);
BGL_BIND_STRING(BGl_string3598z00zz__objectz00, BgL_bgl_string3598za700za7za7_4325za7);
BGL_BIND_STRING(BGl_string3679z00zz__objectz00, BgL_bgl_string3679za700za7za7_4324za7);
BGL_BIND_STRING(BGl_string3597z00zz__objectz00, BgL_bgl_string3597za700za7za7_4323za7);
BGL_BIND_STRING(BGl_string3678z00zz__objectz00, BgL_bgl_string3678za700za7za7_4322za7);
BGL_BIND_STRING(BGl_string3759z00zz__objectz00, BgL_bgl_string3759za700za7za7_4321za7);
BGL_BIND_STRING(BGl_string3596z00zz__objectz00, BgL_bgl_string3596za700za7za7_4320za7);
BGL_BIND_STRING(BGl_string3677z00zz__objectz00, BgL_bgl_string3677za700za7za7_4319za7);
BGL_BIND_STRING(BGl_string3839z00zz__objectz00, BgL_bgl_string3839za700za7za7_4318za7);
BGL_BIND_PROCEDURE(BGl_objectzd2classzd2numzd2envzd2zz__objectz00, BgL_bgl_za762objectza7d2clas4317z00);
BGL_BIND_STRING(BGl_string3595z00zz__objectz00, BgL_bgl_string3595za700za7za7_4316za7);
BGL_BIND_STRING(BGl_string3676z00zz__objectz00, BgL_bgl_string3676za700za7za7_4315za7);
BGL_BIND_STRING(BGl_string3594z00zz__objectz00, BgL_bgl_string3594za700za7za7_4314za7);
BGL_BIND_STRING(BGl_string3918z00zz__objectz00, BgL_bgl_string3918za700za7za7_4313za7);
BGL_BIND_STRING(BGl_string3593z00zz__objectz00, BgL_bgl_string3593za700za7za7_4312za7);
BGL_BIND_STRING(BGl_string3592z00zz__objectz00, BgL_bgl_string3592za700za7za7_4311za7);
BGL_BIND_STRING(BGl_string3673z00zz__objectz00, BgL_bgl_string3673za700za7za7_4310za7);
BGL_BIND_STRING(BGl_string3754z00zz__objectz00, BgL_bgl_string3754za700za7za7_4309za7);
BGL_BIND_PROCEDURE(BGl_proc3829z00zz__objectz00, BgL_bgl_za762lambda2133za7624308z00);
BGL_BIND_STRING(BGl_string3916z00zz__objectz00, BgL_bgl_string3916za700za7za7_4307za7);
BGL_BIND_STRING(BGl_string3591z00zz__objectz00, BgL_bgl_string3591za700za7za7_4306za7);
BGL_BIND_STRING(BGl_string3672z00zz__objectz00, BgL_bgl_string3672za700za7za7_4305za7);
BGL_BIND_PROCEDURE(BGl_proc3747z00zz__objectz00, BgL_bgl_za762lambda1963za7624304z00);
BGL_BIND_PROCEDURE(BGl_proc3828z00zz__objectz00, BgL_bgl_za762lambda2135za7624303z00);
BGL_BIND_PROCEDURE(BGl_proc3909z00zz__objectz00, BgL_bgl_za762objectza7d2disp4302z00);
BGL_BIND_STRING(BGl_string3671z00zz__objectz00, BgL_bgl_string3671za700za7za7_4301za7);
BGL_BIND_PROCEDURE(BGl_proc3746z00zz__objectz00, BgL_bgl_za762lambda1965za7624300z00);
BGL_BIND_PROCEDURE(BGl_proc3827z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4299za7);
BGL_BIND_STRING(BGl_string3914z00zz__objectz00, BgL_bgl_string3914za700za7za7_4298za7);
BGL_BIND_STRING(BGl_string3670z00zz__objectz00, BgL_bgl_string3670za700za7za7_4297za7);
BGL_BIND_PROCEDURE(BGl_proc3745z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4296za7);
BGL_BIND_STRING(BGl_string3831z00zz__objectz00, BgL_bgl_string3831za700za7za7_4295za7);
BGL_BIND_STRING(BGl_string3912z00zz__objectz00, BgL_bgl_string3912za700za7za7_4294za7);
BGL_BIND_PROCEDURE(BGl_proc3742z00zz__objectz00, BgL_bgl_za762lambda1971za7624293z00);
BGL_BIND_STRING(BGl_string3910z00zz__objectz00, BgL_bgl_string3910za700za7za7_4292za7);
BGL_BIND_PROCEDURE(BGl_proc3741z00zz__objectz00, BgL_bgl_za762lambda1972za7624291z00);
BGL_BIND_PROCEDURE(BGl_proc3822z00zz__objectz00, BgL_bgl_za762lambda2143za7624290z00);
BGL_BIND_PROCEDURE(BGl_proc3821z00zz__objectz00, BgL_bgl_za762lambda2144za7624289z00);
BGL_BIND_PROCEDURE(BGl_proc3820z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4288za7);
BGL_BIND_PROCEDURE(BGl_callzd2virtualzd2getterzd2envzd2zz__objectz00, BgL_bgl_za762callza7d2virtua4287z00);
BGL_BIND_PROCEDURE(BGl_classzd2indexzd2envz00zz__objectz00, BgL_bgl_za762classza7d2index4286z00);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2virtualzf3zd2envz21zz__objectz00, BgL_bgl_za762classza7d2field4285z00);
BGL_BIND_STRING(BGl_string3589z00zz__objectz00, BgL_bgl_string3589za700za7za7_4284za7);
BGL_BIND_STRING(BGl_string3587z00zz__objectz00, BgL_bgl_string3587za700za7za7_4283za7);
BGL_BIND_STRING(BGl_string3668z00zz__objectz00, BgL_bgl_string3668za700za7za7_4282za7);
BGL_BIND_STRING(BGl_string3749z00zz__objectz00, BgL_bgl_string3749za700za7za7_4281za7);
BGL_BIND_STRING(BGl_string3585z00zz__objectz00, BgL_bgl_string3585za700za7za7_4280za7);
BGL_BIND_STRING(BGl_string3665z00zz__objectz00, BgL_bgl_string3665za700za7za7_4279za7);
BGL_BIND_STRING(BGl_string3908z00zz__objectz00, BgL_bgl_string3908za700za7za7_4278za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2genericzd2bucketzd2powzd2envz00zz__objectz00, BgL_bgl_za762biglooza7d2gene4277z00);
BGL_BIND_STRING(BGl_string3583z00zz__objectz00, BgL_bgl_string3583za700za7za7_4276za7);
BGL_BIND_STRING(BGl_string3664z00zz__objectz00, BgL_bgl_string3664za700za7za7_4275za7);
BGL_BIND_STRING(BGl_string3826z00zz__objectz00, BgL_bgl_string3826za700za7za7_4274za7);
BGL_BIND_STRING(BGl_string3907z00zz__objectz00, BgL_bgl_string3907za700za7za7_4273za7);
BGL_BIND_PROCEDURE(BGl_classzd2numzd2envz00zz__objectz00, BgL_bgl_za762classza7d2numza7b4272za7);
BGL_BIND_STRING(BGl_string3663z00zz__objectz00, BgL_bgl_string3663za700za7za7_4271za7);
BGL_BIND_PROCEDURE(BGl_proc3738z00zz__objectz00, BgL_bgl_za762lambda1945za7624270z00);
BGL_BIND_STRING(BGl_string3744z00zz__objectz00, BgL_bgl_string3744za700za7za7_4269za7);
BGL_BIND_STRING(BGl_string3906z00zz__objectz00, BgL_bgl_string3906za700za7za7_4268za7);
BGL_BIND_STRING(BGl_string3662z00zz__objectz00, BgL_bgl_string3662za700za7za7_4267za7);
BGL_BIND_PROCEDURE(BGl_proc3737z00zz__objectz00, BgL_bgl_za762lambda1947za7624266z00);
BGL_BIND_STRING(BGl_string3824z00zz__objectz00, BgL_bgl_string3824za700za7za7_4265za7);
BGL_BIND_STRING(BGl_string3905z00zz__objectz00, BgL_bgl_string3905za700za7za7_4264za7);
BGL_BIND_PROCEDURE(BGl_z52isa32zd2objectzf2cdepthzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isa32za7d2ob4263za7);
BGL_BIND_STRING(BGl_string3580z00zz__objectz00, BgL_bgl_string3580za700za7za7_4262za7);
BGL_BIND_PROCEDURE(BGl_proc3736z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4261za7);
BGL_BIND_PROCEDURE(BGl_proc3817z00zz__objectz00, BgL_bgl_za762lambda2123za7624260z00);
BGL_BIND_STRING(BGl_string3904z00zz__objectz00, BgL_bgl_string3904za700za7za7_4259za7);
BGL_BIND_STRING(BGl_string3660z00zz__objectz00, BgL_bgl_string3660za700za7za7_4258za7);
BGL_BIND_PROCEDURE(BGl_proc3816z00zz__objectz00, BgL_bgl_za762lambda2125za7624257z00);
BGL_BIND_STRING(BGl_string3903z00zz__objectz00, BgL_bgl_string3903za700za7za7_4256za7);
BGL_BIND_STRING(BGl_string3740z00zz__objectz00, BgL_bgl_string3740za700za7za7_4255za7);
BGL_BIND_PROCEDURE(BGl_proc3815z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4254za7);
BGL_BIND_STRING(BGl_string3902z00zz__objectz00, BgL_bgl_string3902za700za7za7_4253za7);
BGL_BIND_PROCEDURE(BGl_proc3733z00zz__objectz00, BgL_bgl_za762lambda1955za7624252z00);
BGL_BIND_STRING(BGl_string3901z00zz__objectz00, BgL_bgl_string3901za700za7za7_4251za7);
BGL_BIND_PROCEDURE(BGl_proc3732z00zz__objectz00, BgL_bgl_za762lambda1956za7624250z00);
BGL_BIND_STRING(BGl_string3900z00zz__objectz00, BgL_bgl_string3900za700za7za7_4249za7);
BGL_BIND_PROCEDURE(BGl_proc3812z00zz__objectz00, BgL_bgl_za762lambda2113za7624248z00);
BGL_BIND_PROCEDURE(BGl_proc3811z00zz__objectz00, BgL_bgl_za762lambda2115za7624247z00);
BGL_BIND_PROCEDURE(BGl_proc3810z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4246za7);
BGL_BIND_PROCEDURE(BGl_classzd2nilzd2envz00zz__objectz00, BgL_bgl_za762classza7d2nilza7b4245za7);
BGL_BIND_PROCEDURE(BGl_classzd2existszd2envz00zz__objectz00, BgL_bgl_za762classza7d2exist4244z00);
BGL_BIND_STRING(BGl_string3499z00zz__objectz00, BgL_bgl_string3499za700za7za7_4243za7);
BGL_BIND_STRING(BGl_string3498z00zz__objectz00, BgL_bgl_string3498za700za7za7_4242za7);
BGL_BIND_STRING(BGl_string3497z00zz__objectz00, BgL_bgl_string3497za700za7za7_4241za7);
BGL_BIND_STRING(BGl_string3578z00zz__objectz00, BgL_bgl_string3578za700za7za7_4240za7);
BGL_BIND_STRING(BGl_string3496z00zz__objectz00, BgL_bgl_string3496za700za7za7_4239za7);
BGL_BIND_STRING(BGl_string3577z00zz__objectz00, BgL_bgl_string3577za700za7za7_4238za7);
BGL_BIND_STRING(BGl_string3495z00zz__objectz00, BgL_bgl_string3495za700za7za7_4237za7);
BGL_BIND_STRING(BGl_string3576z00zz__objectz00, BgL_bgl_string3576za700za7za7_4236za7);
BGL_BIND_STRING(BGl_string3657z00zz__objectz00, BgL_bgl_string3657za700za7za7_4235za7);
BGL_BIND_STRING(BGl_string3819z00zz__objectz00, BgL_bgl_string3819za700za7za7_4234za7);
BGL_BIND_STRING(BGl_string3494z00zz__objectz00, BgL_bgl_string3494za700za7za7_4233za7);
BGL_BIND_STRING(BGl_string3575z00zz__objectz00, BgL_bgl_string3575za700za7za7_4232za7);
BGL_BIND_STRING(BGl_string3656z00zz__objectz00, BgL_bgl_string3656za700za7za7_4231za7);
BGL_BIND_STRING(BGl_string3493z00zz__objectz00, BgL_bgl_string3493za700za7za7_4230za7);
BGL_BIND_STRING(BGl_string3574z00zz__objectz00, BgL_bgl_string3574za700za7za7_4229za7);
BGL_BIND_STRING(BGl_string3655z00zz__objectz00, BgL_bgl_string3655za700za7za7_4228za7);
BGL_BIND_STRING(BGl_string3492z00zz__objectz00, BgL_bgl_string3492za700za7za7_4227za7);
BGL_BIND_STRING(BGl_string3573z00zz__objectz00, BgL_bgl_string3573za700za7za7_4226za7);
BGL_BIND_STRING(BGl_string3654z00zz__objectz00, BgL_bgl_string3654za700za7za7_4225za7);
BGL_BIND_PROCEDURE(BGl_proc3729z00zz__objectz00, BgL_bgl_za762lambda1918za7624224z00);
BGL_BIND_STRING(BGl_string3735z00zz__objectz00, BgL_bgl_string3735za700za7za7_4223za7);
BGL_BIND_STRING(BGl_string3491z00zz__objectz00, BgL_bgl_string3491za700za7za7_4222za7);
BGL_BIND_STRING(BGl_string3572z00zz__objectz00, BgL_bgl_string3572za700za7za7_4221za7);
BGL_BIND_PROCEDURE(BGl_proc3728z00zz__objectz00, BgL_bgl_za762lambda1920za7624220z00);
BGL_BIND_STRING(BGl_string3490z00zz__objectz00, BgL_bgl_string3490za700za7za7_4219za7);
BGL_BIND_STRING(BGl_string3571z00zz__objectz00, BgL_bgl_string3571za700za7za7_4218za7);
BGL_BIND_STRING(BGl_string3652z00zz__objectz00, BgL_bgl_string3652za700za7za7_4217za7);
BGL_BIND_PROCEDURE(BGl_proc3727z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4216za7);
BGL_BIND_STRING(BGl_string3814z00zz__objectz00, BgL_bgl_string3814za700za7za7_4215za7);
BGL_BIND_STRING(BGl_string3570z00zz__objectz00, BgL_bgl_string3570za700za7za7_4214za7);
BGL_BIND_PROCEDURE(BGl_proc3726z00zz__objectz00, BgL_bgl_za762lambda1938za7624213z00);
BGL_BIND_PROCEDURE(BGl_proc3807z00zz__objectz00, BgL_bgl_za762lambda2103za7624212z00);
BGL_BIND_PROCEDURE(BGl_proc3725z00zz__objectz00, BgL_bgl_za762lambda1939za7624211z00);
BGL_BIND_STRING(BGl_string3731z00zz__objectz00, BgL_bgl_string3731za700za7za7_4210za7);
BGL_BIND_PROCEDURE(BGl_proc3806z00zz__objectz00, BgL_bgl_za762lambda2105za7624209z00);
BGL_BIND_PROCEDURE(BGl_proc3805z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4208za7);
BGL_BIND_PROCEDURE(BGl_proc3722z00zz__objectz00, BgL_bgl_za762lambda1933za7624207z00);
BGL_BIND_PROCEDURE(BGl_proc3721z00zz__objectz00, BgL_bgl_za762lambda1934za7624206z00);
BGL_BIND_PROCEDURE(BGl_proc3802z00zz__objectz00, BgL_bgl_za762lambda2092za7624205z00);
BGL_BIND_PROCEDURE(BGl_proc3720z00zz__objectz00, BgL_bgl_za762lambda1926za7624204z00);
BGL_BIND_PROCEDURE(BGl_proc3801z00zz__objectz00, BgL_bgl_za762lambda2094za7624203z00);
BGL_BIND_PROCEDURE(BGl_proc3800z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4202za7);
BGL_BIND_STRING(BGl_string3489z00zz__objectz00, BgL_bgl_string3489za700za7za7_4201za7);
BGL_BIND_STRING(BGl_string3488z00zz__objectz00, BgL_bgl_string3488za700za7za7_4200za7);
BGL_BIND_STRING(BGl_string3569z00zz__objectz00, BgL_bgl_string3569za700za7za7_4199za7);
BGL_BIND_STRING(BGl_string3487z00zz__objectz00, BgL_bgl_string3487za700za7za7_4198za7);
BGL_BIND_STRING(BGl_string3568z00zz__objectz00, BgL_bgl_string3568za700za7za7_4197za7);
BGL_BIND_STRING(BGl_string3649z00zz__objectz00, BgL_bgl_string3649za700za7za7_4196za7);
BGL_BIND_STRING(BGl_string3486z00zz__objectz00, BgL_bgl_string3486za700za7za7_4195za7);
BGL_BIND_STRING(BGl_string3567z00zz__objectz00, BgL_bgl_string3567za700za7za7_4194za7);
BGL_BIND_STRING(BGl_string3485z00zz__objectz00, BgL_bgl_string3485za700za7za7_4193za7);
BGL_BIND_STRING(BGl_string3566z00zz__objectz00, BgL_bgl_string3566za700za7za7_4192za7);
BGL_BIND_STRING(BGl_string3809z00zz__objectz00, BgL_bgl_string3809za700za7za7_4191za7);
BGL_BIND_PROCEDURE(BGl_bigloozd2typeszd2numberzd2envzd2zz__objectz00, BgL_bgl_za762biglooza7d2type4190z00);
BGL_BIND_STRING(BGl_string3484z00zz__objectz00, BgL_bgl_string3484za700za7za7_4189za7);
BGL_BIND_STRING(BGl_string3565z00zz__objectz00, BgL_bgl_string3565za700za7za7_4188za7);
BGL_BIND_STRING(BGl_string3646z00zz__objectz00, BgL_bgl_string3646za700za7za7_4187za7);
BGL_BIND_STRING(BGl_string3483z00zz__objectz00, BgL_bgl_string3483za700za7za7_4186za7);
BGL_BIND_STRING(BGl_string3564z00zz__objectz00, BgL_bgl_string3564za700za7za7_4185za7);
BGL_BIND_STRING(BGl_string3645z00zz__objectz00, BgL_bgl_string3645za700za7za7_4184za7);
BGL_BIND_STRING(BGl_string3563z00zz__objectz00, BgL_bgl_string3563za700za7za7_4183za7);
BGL_BIND_STRING(BGl_string3644z00zz__objectz00, BgL_bgl_string3644za700za7za7_4182za7);
BGL_BIND_PROCEDURE(BGl_proc3719z00zz__objectz00, BgL_bgl_za762lambda1927za7624181z00);
BGL_BIND_STRING(BGl_string3562z00zz__objectz00, BgL_bgl_string3562za700za7za7_4180za7);
BGL_BIND_STRING(BGl_string3643z00zz__objectz00, BgL_bgl_string3643za700za7za7_4179za7);
BGL_BIND_STRING(BGl_string3724z00zz__objectz00, BgL_bgl_string3724za700za7za7_4178za7);
BGL_BIND_STRING(BGl_string3642z00zz__objectz00, BgL_bgl_string3642za700za7za7_4177za7);
BGL_BIND_STRING(BGl_string3804z00zz__objectz00, BgL_bgl_string3804za700za7za7_4176za7);
BGL_BIND_STRING(BGl_string3560z00zz__objectz00, BgL_bgl_string3560za700za7za7_4175za7);
BGL_BIND_STRING(BGl_string3641z00zz__objectz00, BgL_bgl_string3641za700za7za7_4174za7);
BGL_BIND_PROCEDURE(BGl_proc3716z00zz__objectz00, BgL_bgl_za762lambda1884za7624173z00);
BGL_BIND_STRING(BGl_string3640z00zz__objectz00, BgL_bgl_string3640za700za7za7_4172za7);
BGL_BIND_PROCEDURE(BGl_proc3715z00zz__objectz00, BgL_bgl_za762lambda1886za7624171z00);
BGL_BIND_PROCEDURE(BGl_proc3714z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4170za7);
BGL_BIND_PROCEDURE(BGl_proc3711z00zz__objectz00, BgL_bgl_za762lambda1908za7624169z00);
BGL_BIND_PROCEDURE(BGl_proc3710z00zz__objectz00, BgL_bgl_za762lambda1909za7624168z00);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2infozd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4167z00);
BGL_BIND_STRING(BGl_string3639z00zz__objectz00, BgL_bgl_string3639za700za7za7_4166za7);
BGL_BIND_STRING(BGl_string3557z00zz__objectz00, BgL_bgl_string3557za700za7za7_4165za7);
BGL_BIND_STRING(BGl_string3638z00zz__objectz00, BgL_bgl_string3638za700za7za7_4164za7);
BGL_BIND_STRING(BGl_string3637z00zz__objectz00, BgL_bgl_string3637za700za7za7_4163za7);
BGL_BIND_STRING(BGl_string3718z00zz__objectz00, BgL_bgl_string3718za700za7za7_4162za7);
BGL_BIND_STRING(BGl_string3555z00zz__objectz00, BgL_bgl_string3555za700za7za7_4161za7);
BGL_BIND_STRING(BGl_string3636z00zz__objectz00, BgL_bgl_string3636za700za7za7_4160za7);
BGL_BIND_STRING(BGl_string3635z00zz__objectz00, BgL_bgl_string3635za700za7za7_4159za7);
BGL_BIND_STRING(BGl_string3634z00zz__objectz00, BgL_bgl_string3634za700za7za7_4158za7);
BGL_BIND_PROCEDURE(BGl_proc3709z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4157za7);
BGL_BIND_STRING(BGl_string3552z00zz__objectz00, BgL_bgl_string3552za700za7za7_4156za7);
BGL_BIND_STRING(BGl_string3633z00zz__objectz00, BgL_bgl_string3633za700za7za7_4155za7);
BGL_BIND_STRING(BGl_string3632z00zz__objectz00, BgL_bgl_string3632za700za7za7_4154za7);
BGL_BIND_STRING(BGl_string3713z00zz__objectz00, BgL_bgl_string3713za700za7za7_4153za7);
BGL_BIND_STRING(BGl_string3550z00zz__objectz00, BgL_bgl_string3550za700za7za7_4152za7);
BGL_BIND_STRING(BGl_string3631z00zz__objectz00, BgL_bgl_string3631za700za7za7_4151za7);
BGL_BIND_PROCEDURE(BGl_proc3706z00zz__objectz00, BgL_bgl_za762lambda1900za7624150z00);
BGL_BIND_STRING(BGl_string3630z00zz__objectz00, BgL_bgl_string3630za700za7za7_4149za7);
BGL_BIND_PROCEDURE(BGl_proc3705z00zz__objectz00, BgL_bgl_za762lambda1901za7624148z00);
BGL_BIND_PROCEDURE(BGl_z52isazd2objectzf2cdepthzf3zd2envz53zz__objectz00, BgL_bgl_za762za752isaza7d2obje4147za7);
BGL_BIND_PROCEDURE(BGl_proc3704z00zz__objectz00, BgL_bgl_za762za7c3za704anonymo4146za7);
BGL_BIND_PROCEDURE(BGl_proc3701z00zz__objectz00, BgL_bgl_za762lambda1893za7624145z00);
BGL_BIND_PROCEDURE(BGl_proc3700z00zz__objectz00, BgL_bgl_za762lambda1894za7624144z00);
BGL_BIND_PROCEDURE(BGl_findzd2classzd2byzd2hashzd2envz00zz__objectz00, BgL_bgl_za762findza7d2classza74143za7);
BGL_BIND_STRING(BGl_string3629z00zz__objectz00, BgL_bgl_string3629za700za7za7_4142za7);
BGL_BIND_STRING(BGl_string3547z00zz__objectz00, BgL_bgl_string3547za700za7za7_4141za7);
BGL_BIND_STRING(BGl_string3628z00zz__objectz00, BgL_bgl_string3628za700za7za7_4140za7);
BGL_BIND_STRING(BGl_string3627z00zz__objectz00, BgL_bgl_string3627za700za7za7_4139za7);
BGL_BIND_STRING(BGl_string3708z00zz__objectz00, BgL_bgl_string3708za700za7za7_4138za7);
BGL_BIND_PROCEDURE(BGl_makezd2classzd2fieldzd2envzd2zz__objectz00, BgL_bgl_za762makeza7d2classza74137za7);
BGL_BIND_STRING(BGl_string3626z00zz__objectz00, BgL_bgl_string3626za700za7za7_4136za7);
BGL_BIND_STRING(BGl_string3544z00zz__objectz00, BgL_bgl_string3544za700za7za7_4135za7);
BGL_BIND_STRING(BGl_string3625z00zz__objectz00, BgL_bgl_string3625za700za7za7_4134za7);
BGL_BIND_STRING(BGl_string3543z00zz__objectz00, BgL_bgl_string3543za700za7za7_4133za7);
BGL_BIND_STRING(BGl_string3624z00zz__objectz00, BgL_bgl_string3624za700za7za7_4132za7);
BGL_BIND_STRING(BGl_string3542z00zz__objectz00, BgL_bgl_string3542za700za7za7_4131za7);
BGL_BIND_STRING(BGl_string3623z00zz__objectz00, BgL_bgl_string3623za700za7za7_4130za7);
BGL_BIND_STRING(BGl_string3541z00zz__objectz00, BgL_bgl_string3541za700za7za7_4129za7);
BGL_BIND_STRING(BGl_string3622z00zz__objectz00, BgL_bgl_string3622za700za7za7_4128za7);
BGL_BIND_STRING(BGl_string3703z00zz__objectz00, BgL_bgl_string3703za700za7za7_4127za7);
BGL_BIND_STRING(BGl_string3540z00zz__objectz00, BgL_bgl_string3540za700za7za7_4126za7);
BGL_BIND_STRING(BGl_string3621z00zz__objectz00, BgL_bgl_string3621za700za7za7_4125za7);
BGL_BIND_STRING(BGl_string3620z00zz__objectz00, BgL_bgl_string3620za700za7za7_4124za7);
BGL_BIND_PROCEDURE(BGl_allocatezd2instancezd2envz00zz__objectz00, BgL_bgl_za762allocateza7d2in4123z00);
BGL_BIND_PROCEDURE(BGl_objectzd2displayzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2disp4122z00);
BGL_BIND_PROCEDURE(BGl_objectzf3zd2envz21zz__objectz00, BgL_bgl_za762objectza7f3za791za74121z00);
BGL_BIND_STRING(BGl_string3539z00zz__objectz00, BgL_bgl_string3539za700za7za7_4120za7);
BGL_BIND_STRING(BGl_string3538z00zz__objectz00, BgL_bgl_string3538za700za7za7_4119za7);
BGL_BIND_STRING(BGl_string3619z00zz__objectz00, BgL_bgl_string3619za700za7za7_4118za7);
BGL_BIND_STRING(BGl_string3537z00zz__objectz00, BgL_bgl_string3537za700za7za7_4117za7);
BGL_BIND_STRING(BGl_string3618z00zz__objectz00, BgL_bgl_string3618za700za7za7_4116za7);
BGL_BIND_STRING(BGl_string3536z00zz__objectz00, BgL_bgl_string3536za700za7za7_4115za7);
BGL_BIND_STRING(BGl_string3617z00zz__objectz00, BgL_bgl_string3617za700za7za7_4114za7);
BGL_BIND_PROCEDURE(BGl_objectzd2printzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2prin4113z00);
BGL_BIND_STRING(BGl_string3535z00zz__objectz00, BgL_bgl_string3535za700za7za7_4112za7);
BGL_BIND_STRING(BGl_string3616z00zz__objectz00, BgL_bgl_string3616za700za7za7_4111za7);
BGL_BIND_STRING(BGl_string3534z00zz__objectz00, BgL_bgl_string3534za700za7za7_4110za7);
BGL_BIND_STRING(BGl_string3615z00zz__objectz00, BgL_bgl_string3615za700za7za7_4109za7);
BGL_BIND_STRING(BGl_string3533z00zz__objectz00, BgL_bgl_string3533za700za7za7_4108za7);
BGL_BIND_STRING(BGl_string3614z00zz__objectz00, BgL_bgl_string3614za700za7za7_4107za7);
BGL_BIND_STRING(BGl_string3532z00zz__objectz00, BgL_bgl_string3532za700za7za7_4106za7);
BGL_BIND_STRING(BGl_string3613z00zz__objectz00, BgL_bgl_string3613za700za7za7_4105za7);
BGL_BIND_STRING(BGl_string3531z00zz__objectz00, BgL_bgl_string3531za700za7za7_4104za7);
BGL_BIND_STRING(BGl_string3612z00zz__objectz00, BgL_bgl_string3612za700za7za7_4103za7);
BGL_BIND_STRING(BGl_string3530z00zz__objectz00, BgL_bgl_string3530za700za7za7_4102za7);
BGL_BIND_STRING(BGl_string3611z00zz__objectz00, BgL_bgl_string3611za700za7za7_4101za7);
BGL_BIND_STRING(BGl_string3610z00zz__objectz00, BgL_bgl_string3610za700za7za7_4100za7);
BGL_BIND_PROCEDURE(BGl_z52isazf2cdepthzf3zd2envz81zz__objectz00, BgL_bgl_za762za752isaza7f2cdep4099za7);
BGL_BIND_STRING(BGl_string3529z00zz__objectz00, BgL_bgl_string3529za700za7za7_4098za7);
BGL_BIND_STRING(BGl_string3528z00zz__objectz00, BgL_bgl_string3528za700za7za7_4097za7);
BGL_BIND_STRING(BGl_string3609z00zz__objectz00, BgL_bgl_string3609za700za7za7_4096za7);
BGL_BIND_STRING(BGl_string3527z00zz__objectz00, BgL_bgl_string3527za700za7za7_4095za7);
BGL_BIND_STRING(BGl_string3608z00zz__objectz00, BgL_bgl_string3608za700za7za7_4094za7);
BGL_BIND_STRING(BGl_string3607z00zz__objectz00, BgL_bgl_string3607za700za7za7_4093za7);
BGL_BIND_STRING(BGl_string3525z00zz__objectz00, BgL_bgl_string3525za700za7za7_4092za7);
BGL_BIND_STRING(BGl_string3606z00zz__objectz00, BgL_bgl_string3606za700za7za7_4091za7);
BGL_BIND_STRING(BGl_string3605z00zz__objectz00, BgL_bgl_string3605za700za7za7_4090za7);
BGL_BIND_STRING(BGl_string3604z00zz__objectz00, BgL_bgl_string3604za700za7za7_4089za7);
BGL_BIND_STRING(BGl_string3522z00zz__objectz00, BgL_bgl_string3522za700za7za7_4088za7);
BGL_BIND_STRING(BGl_string3603z00zz__objectz00, BgL_bgl_string3603za700za7za7_4087za7);
BGL_BIND_STRING(BGl_string3521z00zz__objectz00, BgL_bgl_string3521za700za7za7_4086za7);
BGL_BIND_STRING(BGl_string3602z00zz__objectz00, BgL_bgl_string3602za700za7za7_4085za7);
BGL_BIND_STRING(BGl_string3520z00zz__objectz00, BgL_bgl_string3520za700za7za7_4084za7);
BGL_BIND_STRING(BGl_string3601z00zz__objectz00, BgL_bgl_string3601za700za7za7_4083za7);
BGL_BIND_STRING(BGl_string3600z00zz__objectz00, BgL_bgl_string3600za700za7za7_4082za7);
BGL_BIND_PROCEDURE(BGl_classzd2fieldszd2envz00zz__objectz00, BgL_bgl_za762classza7d2field4081z00);
BGL_BIND_PROCEDURE(BGl_callzd2nextzd2virtualzd2getterzd2envz00zz__objectz00, BgL_bgl_za762callza7d2nextza7d4080za7);
BGL_BIND_STRING(BGl_string3519z00zz__objectz00, BgL_bgl_string3519za700za7za7_4079za7);
BGL_BIND_STRING(BGl_string3518z00zz__objectz00, BgL_bgl_string3518za700za7za7_4078za7);
BGL_BIND_STRING(BGl_string3517z00zz__objectz00, BgL_bgl_string3517za700za7za7_4077za7);
BGL_BIND_STRING(BGl_string3516z00zz__objectz00, BgL_bgl_string3516za700za7za7_4076za7);
BGL_BIND_STRING(BGl_string3515z00zz__objectz00, BgL_bgl_string3515za700za7za7_4075za7);
BGL_BIND_STRING(BGl_string3514z00zz__objectz00, BgL_bgl_string3514za700za7za7_4074za7);
BGL_BIND_STRING(BGl_string3513z00zz__objectz00, BgL_bgl_string3513za700za7za7_4073za7);
BGL_BIND_PROCEDURE(BGl_widezd2objectzf3zd2envzf3zz__objectz00, BgL_bgl_za762wideza7d2object4072z00);
BGL_BIND_STRING(BGl_string3512z00zz__objectz00, BgL_bgl_string3512za700za7za7_4071za7);
BGL_BIND_STRING(BGl_string3511z00zz__objectz00, BgL_bgl_string3511za700za7za7_4070za7);
BGL_BIND_PROCEDURE(BGl_classzd2virtualzd2envz00zz__objectz00, BgL_bgl_za762classza7d2virtu4069z00);
BGL_BIND_STRING(BGl_string3510z00zz__objectz00, BgL_bgl_string3510za700za7za7_4068za7);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2defaultzd2valuezf3zd2envzf3zz__objectz00, BgL_bgl_za762classza7d2field4067z00);
BGL_BIND_STRING(BGl_string3509z00zz__objectz00, BgL_bgl_string3509za700za7za7_4066za7);
BGL_BIND_STRING(BGl_string3508z00zz__objectz00, BgL_bgl_string3508za700za7za7_4065za7);
BGL_BIND_STRING(BGl_string3507z00zz__objectz00, BgL_bgl_string3507za700za7za7_4064za7);
BGL_BIND_STRING(BGl_string3506z00zz__objectz00, BgL_bgl_string3506za700za7za7_4063za7);
BGL_BIND_STRING(BGl_string3505z00zz__objectz00, BgL_bgl_string3505za700za7za7_4062za7);
BGL_BIND_STRING(BGl_string3504z00zz__objectz00, BgL_bgl_string3504za700za7za7_4061za7);
BGL_BIND_STRING(BGl_string3503z00zz__objectz00, BgL_bgl_string3503za700za7za7_4060za7);
BGL_BIND_STRING(BGl_string3502z00zz__objectz00, BgL_bgl_string3502za700za7za7_4059za7);
BGL_BIND_STRING(BGl_string3501z00zz__objectz00, BgL_bgl_string3501za700za7za7_4058za7);
BGL_BIND_STRING(BGl_string3500z00zz__objectz00, BgL_bgl_string3500za700za7za7_4057za7);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2accessorzd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4056z00);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2mutatorzd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4055z00);
BGL_BIND_PROCEDURE(BGl_z52objectzd2wideningzd2envz52zz__objectz00, BgL_bgl_za762za752objectza7d2w4054za7);
BGL_BIND_PROCEDURE(BGl_classzd2evdatazd2envz00zz__objectz00, BgL_bgl_za762classza7d2evdat4053z00);
BGL_BIND_PROCEDURE(BGl_genericzd2nozd2defaultzd2behaviorzd2envz00zz__objectz00, BgL_bgl_za762genericza7d2noza74052za7);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2typezd2envzd2zz__objectz00, BgL_bgl_za762classza7d2field4051z00);
BGL_BIND_PROCEDURE(BGl_classzd2hashzd2envz00zz__objectz00, BgL_bgl_za762classza7d2hashza74050za7);
BGL_BIND_PROCEDURE(BGl_classzd2namezd2envz00zz__objectz00, BgL_bgl_za762classza7d2nameza74049za7);
BGL_BIND_PROCEDURE(BGl_genericzd2methodzd2arrayzd2envzd2zz__objectz00, BgL_bgl_za762genericza7d2met4048z00);
BGL_BIND_PROCEDURE(BGl_classzd2creatorzd2envz00zz__objectz00, BgL_bgl_za762classza7d2creat4047z00);
BGL_BIND_PROCEDURE(BGl_classzd2subclasseszd2envz00zz__objectz00, BgL_bgl_za762classza7d2subcl4046z00);
BGL_BIND_PROCEDURE(BGl_classzf3zd2envz21zz__objectz00, BgL_bgl_za762classza7f3za791za7za74045za7);
BGL_BIND_PROCEDURE(BGl_objectzd2writezd2envz00zz__objectz00, BgL_bgl_za762objectza7d2writ4044z00);
BGL_BIND_PROCEDURE(BGl_findzd2classzd2envz00zz__objectz00, BgL_bgl_za762findza7d2classza74043za7);
BGL_BIND_PROCEDURE(BGl_exceptionzd2notifyzd2envz00zz__objectz00, BgL_bgl_za762exceptionza7d2n4042z00);
BGL_BIND_PROCEDURE(BGl_evalzd2classzf3zd2envzf3zz__objectz00, BgL_bgl_za762evalza7d2classza74041za7);
BGL_BIND_PROCEDURE(BGl_proc4011z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4040z00);
BGL_BIND_PROCEDURE(BGl_classzd2fieldzd2defaultzd2valuezd2envz00zz__objectz00, BgL_bgl_za762classza7d2field4039z00);
BGL_BIND_PROCEDURE(BGl_proc4010z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4038z00);
BGL_BIND_PROCEDURE(BGl_objectzd2wideningzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2wide4037z00);
BGL_BIND_PROCEDURE(BGl_classzd2superzd2envz00zz__objectz00, BgL_bgl_za762classza7d2super4036z00);
BGL_BIND_PROCEDURE(BGl_findzd2methodzd2fromzd2envzd2zz__objectz00, BgL_bgl_za762findza7d2method4035z00);
BGL_BIND_STRING(BGl_string4018z00zz__objectz00, BgL_bgl_string4018za700za7za7_4034za7);
BGL_BIND_STRING(BGl_string4017z00zz__objectz00, BgL_bgl_string4017za700za7za7_4033za7);
BGL_BIND_STRING(BGl_string4016z00zz__objectz00, BgL_bgl_string4016za700za7za7_4032za7);
BGL_BIND_PROCEDURE(BGl_proc4009z00zz__objectz00, BgL_bgl_za762exceptionza7d2n4031z00);
BGL_BIND_STRING(BGl_string4013z00zz__objectz00, BgL_bgl_string4013za700za7za7_4030za7);
BGL_BIND_STRING(BGl_string4012z00zz__objectz00, BgL_bgl_string4012za700za7za7_4029za7);
BGL_BIND_PROCEDURE(BGl_objectzd2hashnumberzd2envz00zz__objectz00, BgL_bgl_za762objectza7d2hash4028z00);
BGL_BIND_PROCEDURE(BGl_procedurezd2ze3genericzd2envze3zz__objectz00, BgL_bgl_za762procedureza7d2za74027za7);
BGL_BIND_PROCEDURE(BGl_registerzd2genericz12zd2envz12zz__objectz00, BgL_bgl_za762registerza7d2ge4026z00);
BGL_BIND_STRING(BGl_string4008z00zz__objectz00, BgL_bgl_string4008za700za7za7_4025za7);
BGL_BIND_STRING(BGl_string4005z00zz__objectz00, BgL_bgl_string4005za700za7za7_4024za7);
BGL_BIND_STRING(BGl_string4004z00zz__objectz00, BgL_bgl_string4004za700za7za7_4023za7);
BGL_BIND_STRING(BGl_string4002z00zz__objectz00, BgL_bgl_string4002za700za7za7_4022za7);
BGL_BIND_PROCEDURE(BGl_genericzd2addzd2methodz12zd2envzc0zz__objectz00, BgL_bgl_za762genericza7d2add4021z00);
BGL_BIND_PROCEDURE(BGl_bigloozd2genericzd2bucketzd2siza7ezd2envza7zz__objectz00, BgL_bgl_za762biglooza7d2gene4020z00);
BGL_BIND_PROCEDURE(BGl_classzd2nilzd2initz12zd2envzc0zz__objectz00, BgL_bgl_za762classza7d2nilza7d4019za7);
}

/* 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_z62processzd2exceptionzb0zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3983z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3988z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3702z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3707z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3546z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3549z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_requirezd2initializa7ationz75zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3995z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3712z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3551z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3554z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3717z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3556z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3559z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2classesza2z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3803z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3723z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3808z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3648z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2sigpipezd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3730z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3813z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3651z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3734z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3818z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3739z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3659z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2writezd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3579z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62typezd2errorzb0zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3823z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3661z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3743z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3581z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3825z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3582z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3584z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3748z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3667z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3586z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3669z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3588z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2parsezd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3830z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3590z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3753z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3675z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3838z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3758z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2nbzd2classeszd2maxza2z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3843z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3681z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3925z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3763z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3927z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3847z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3768z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2inheritancesza2z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62exceptionz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3930z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3852z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3691z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3773z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3692z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3857z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3778z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3697z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list4000z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list4006z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3943z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3783z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3946z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3948z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3788z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list4014z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3951z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3955z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3793z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3958z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3798z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3960z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3963z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3966z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3970z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3972z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3977z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2inheritancezd2maxzd2depthza2z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2classzd2keyza2zd2zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2nbzd2genericsza2zd2zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3984z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3989z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3991z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3996z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62securityzd2exceptionzb0zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2unknownzd2hostzd2errorzb0zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2closedzd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62evalzd2warningzb0zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2malformedzd2urlzd2errorzb0zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3523z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2filezd2notzd2foundzd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62warningz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3545z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3548z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2inheritancezd2cntza2zd2zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62stackzd2overflowzd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2genericsza2z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2portzd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3553z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3558z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2connectionzd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol4001z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol4003z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol4007z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62accesszd2controlzd2exceptionz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2timeoutzd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3561z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3647z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2errorzb0zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol4015z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3650z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3653z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3658z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_objectz00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3666z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62conditionz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3674z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3680z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3924z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3929z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3945z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3950z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3953z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3954z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3957z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2nbzd2genericszd2maxza2z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_za2nbzd2classesza2zd2zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3962z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3965z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_z62iozd2readzd2errorz62zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3524z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_symbol3526z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3971z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3974z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3975z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3976z00zz__objectz00) );
ADD_ROOT( (void *)(&BGl_list3979z00zz__objectz00) );
#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__objectz00(long BgL_checksumz00_7956, char * BgL_fromz00_7957)
{
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zz__objectz00))
{ 
BGl_requirezd2initializa7ationz75zz__objectz00 = 
BBOOL(((bool_t)0)); 
bgl_constant_bindings(); 
BGl_gczd2rootszd2initz00zz__objectz00(); 
BGl_cnstzd2initzd2zz__objectz00(); 
BGl_objectzd2initzd2zz__objectz00(); 
BGl_genericzd2initzd2zz__objectz00(); 
BGl_methodzd2initzd2zz__objectz00(); 
return 
BGl_toplevelzd2initzd2zz__objectz00();}  else 
{ 
return BUNSPEC;} } 

}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zz__objectz00(void)
{
{ /* Llib/object.scm 17 */
BGl_symbol3524z00zz__objectz00 = 
bstring_to_symbol(BGl_string3525z00zz__objectz00); 
BGl_symbol3526z00zz__objectz00 = 
bstring_to_symbol(BGl_string3527z00zz__objectz00); 
BGl_list3523z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3526z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3526z00zz__objectz00, BNIL))); 
BGl_symbol3546z00zz__objectz00 = 
bstring_to_symbol(BGl_string3547z00zz__objectz00); 
BGl_list3545z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3546z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3546z00zz__objectz00, BNIL))); 
BGl_symbol3549z00zz__objectz00 = 
bstring_to_symbol(BGl_string3550z00zz__objectz00); 
BGl_symbol3551z00zz__objectz00 = 
bstring_to_symbol(BGl_string3552z00zz__objectz00); 
BGl_list3548z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3549z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3549z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3551z00zz__objectz00, BNIL)))); 
BGl_symbol3554z00zz__objectz00 = 
bstring_to_symbol(BGl_string3555z00zz__objectz00); 
BGl_symbol3556z00zz__objectz00 = 
bstring_to_symbol(BGl_string3557z00zz__objectz00); 
BGl_list3553z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3554z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3554z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3556z00zz__objectz00, BNIL)))); 
BGl_symbol3559z00zz__objectz00 = 
bstring_to_symbol(BGl_string3560z00zz__objectz00); 
BGl_list3558z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3559z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3559z00zz__objectz00, BNIL))); 
BGl_list3561z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3554z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3554z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3551z00zz__objectz00, BNIL)))); 
BGl_symbol3579z00zz__objectz00 = 
bstring_to_symbol(BGl_string3580z00zz__objectz00); 
BGl_symbol3581z00zz__objectz00 = 
bstring_to_symbol(BGl_string3487z00zz__objectz00); 
BGl_symbol3582z00zz__objectz00 = 
bstring_to_symbol(BGl_string3583z00zz__objectz00); 
BGl_symbol3584z00zz__objectz00 = 
bstring_to_symbol(BGl_string3585z00zz__objectz00); 
BGl_symbol3586z00zz__objectz00 = 
bstring_to_symbol(BGl_string3587z00zz__objectz00); 
BGl_symbol3588z00zz__objectz00 = 
bstring_to_symbol(BGl_string3589z00zz__objectz00); 
BGl_symbol3590z00zz__objectz00 = 
bstring_to_symbol(BGl_string3591z00zz__objectz00); 
BGl_symbol3648z00zz__objectz00 = 
bstring_to_symbol(BGl_string3649z00zz__objectz00); 
BGl_list3647z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3648z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3648z00zz__objectz00, BNIL))); 
BGl_symbol3651z00zz__objectz00 = 
bstring_to_symbol(BGl_string3652z00zz__objectz00); 
BGl_list3650z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3651z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3651z00zz__objectz00, BNIL))); 
BGl_list3653z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3648z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3648z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3551z00zz__objectz00, BNIL)))); 
BGl_symbol3659z00zz__objectz00 = 
bstring_to_symbol(BGl_string3660z00zz__objectz00); 
BGl_symbol3661z00zz__objectz00 = 
bstring_to_symbol(BGl_string3662z00zz__objectz00); 
BGl_list3658z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3659z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3659z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3661z00zz__objectz00, BNIL)))); 
BGl_symbol3667z00zz__objectz00 = 
bstring_to_symbol(BGl_string3668z00zz__objectz00); 
BGl_symbol3669z00zz__objectz00 = 
bstring_to_symbol(BGl_string3670z00zz__objectz00); 
BGl_list3666z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3667z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3667z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3661z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3669z00zz__objectz00, BNIL))))); 
BGl_symbol3675z00zz__objectz00 = 
bstring_to_symbol(BGl_string3676z00zz__objectz00); 
BGl_list3674z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3675z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3675z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3661z00zz__objectz00, BNIL)))); 
BGl_symbol3681z00zz__objectz00 = 
bstring_to_symbol(BGl_string3682z00zz__objectz00); 
BGl_list3680z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3681z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3681z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3661z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3669z00zz__objectz00, BNIL))))); 
BGl_symbol3691z00zz__objectz00 = 
bstring_to_symbol(BGl_string3570z00zz__objectz00); 
BGl_symbol3692z00zz__objectz00 = 
bstring_to_symbol(BGl_string3693z00zz__objectz00); 
BGl_symbol3697z00zz__objectz00 = 
bstring_to_symbol(BGl_string3698z00zz__objectz00); 
BGl_symbol3702z00zz__objectz00 = 
bstring_to_symbol(BGl_string3703z00zz__objectz00); 
BGl_symbol3707z00zz__objectz00 = 
bstring_to_symbol(BGl_string3708z00zz__objectz00); 
BGl_symbol3712z00zz__objectz00 = 
bstring_to_symbol(BGl_string3713z00zz__objectz00); 
BGl_symbol3717z00zz__objectz00 = 
bstring_to_symbol(BGl_string3718z00zz__objectz00); 
BGl_symbol3723z00zz__objectz00 = 
bstring_to_symbol(BGl_string3724z00zz__objectz00); 
BGl_symbol3730z00zz__objectz00 = 
bstring_to_symbol(BGl_string3731z00zz__objectz00); 
BGl_symbol3734z00zz__objectz00 = 
bstring_to_symbol(BGl_string3735z00zz__objectz00); 
BGl_symbol3739z00zz__objectz00 = 
bstring_to_symbol(BGl_string3740z00zz__objectz00); 
BGl_symbol3743z00zz__objectz00 = 
bstring_to_symbol(BGl_string3744z00zz__objectz00); 
BGl_symbol3748z00zz__objectz00 = 
bstring_to_symbol(BGl_string3749z00zz__objectz00); 
BGl_symbol3753z00zz__objectz00 = 
bstring_to_symbol(BGl_string3754z00zz__objectz00); 
BGl_symbol3758z00zz__objectz00 = 
bstring_to_symbol(BGl_string3759z00zz__objectz00); 
BGl_symbol3763z00zz__objectz00 = 
bstring_to_symbol(BGl_string3764z00zz__objectz00); 
BGl_symbol3768z00zz__objectz00 = 
bstring_to_symbol(BGl_string3769z00zz__objectz00); 
BGl_symbol3773z00zz__objectz00 = 
bstring_to_symbol(BGl_string3774z00zz__objectz00); 
BGl_symbol3778z00zz__objectz00 = 
bstring_to_symbol(BGl_string3779z00zz__objectz00); 
BGl_symbol3783z00zz__objectz00 = 
bstring_to_symbol(BGl_string3784z00zz__objectz00); 
BGl_symbol3788z00zz__objectz00 = 
bstring_to_symbol(BGl_string3789z00zz__objectz00); 
BGl_symbol3793z00zz__objectz00 = 
bstring_to_symbol(BGl_string3794z00zz__objectz00); 
BGl_symbol3798z00zz__objectz00 = 
bstring_to_symbol(BGl_string3799z00zz__objectz00); 
BGl_symbol3803z00zz__objectz00 = 
bstring_to_symbol(BGl_string3804z00zz__objectz00); 
BGl_symbol3808z00zz__objectz00 = 
bstring_to_symbol(BGl_string3809z00zz__objectz00); 
BGl_symbol3813z00zz__objectz00 = 
bstring_to_symbol(BGl_string3814z00zz__objectz00); 
BGl_symbol3818z00zz__objectz00 = 
bstring_to_symbol(BGl_string3819z00zz__objectz00); 
BGl_symbol3823z00zz__objectz00 = 
bstring_to_symbol(BGl_string3824z00zz__objectz00); 
BGl_symbol3825z00zz__objectz00 = 
bstring_to_symbol(BGl_string3826z00zz__objectz00); 
BGl_symbol3830z00zz__objectz00 = 
bstring_to_symbol(BGl_string3831z00zz__objectz00); 
BGl_symbol3838z00zz__objectz00 = 
bstring_to_symbol(BGl_string3839z00zz__objectz00); 
BGl_symbol3843z00zz__objectz00 = 
bstring_to_symbol(BGl_string3844z00zz__objectz00); 
BGl_symbol3847z00zz__objectz00 = 
bstring_to_symbol(BGl_string3848z00zz__objectz00); 
BGl_symbol3852z00zz__objectz00 = 
bstring_to_symbol(BGl_string3853z00zz__objectz00); 
BGl_symbol3857z00zz__objectz00 = 
bstring_to_symbol(BGl_string3858z00zz__objectz00); 
BGl_symbol3925z00zz__objectz00 = 
bstring_to_symbol(BGl_string3926z00zz__objectz00); 
BGl_symbol3927z00zz__objectz00 = 
bstring_to_symbol(BGl_string3928z00zz__objectz00); 
BGl_list3924z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3925z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3925z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3927z00zz__objectz00, BNIL)))); 
BGl_symbol3930z00zz__objectz00 = 
bstring_to_symbol(BGl_string3931z00zz__objectz00); 
BGl_list3929z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3925z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3925z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3930z00zz__objectz00, BNIL)))); 
BGl_symbol3943z00zz__objectz00 = 
bstring_to_symbol(BGl_string3941z00zz__objectz00); 
BGl_symbol3946z00zz__objectz00 = 
bstring_to_symbol(BGl_string3947z00zz__objectz00); 
BGl_symbol3948z00zz__objectz00 = 
bstring_to_symbol(BGl_string3949z00zz__objectz00); 
BGl_symbol3951z00zz__objectz00 = 
bstring_to_symbol(BGl_string3952z00zz__objectz00); 
BGl_symbol3955z00zz__objectz00 = 
bstring_to_symbol(BGl_string3956z00zz__objectz00); 
BGl_symbol3958z00zz__objectz00 = 
bstring_to_symbol(BGl_string3959z00zz__objectz00); 
BGl_symbol3960z00zz__objectz00 = 
bstring_to_symbol(BGl_string3961z00zz__objectz00); 
BGl_symbol3963z00zz__objectz00 = 
bstring_to_symbol(BGl_string3964z00zz__objectz00); 
BGl_list3962z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3963z00zz__objectz00, 
MAKE_YOUNG_PAIR(BNIL, BNIL)); 
BGl_list3957z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3958z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3960z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3962z00zz__objectz00, BNIL))); 
BGl_list3954z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3955z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3957z00zz__objectz00, BNIL)); 
BGl_list3953z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_list3954z00zz__objectz00, BNIL); 
BGl_symbol3966z00zz__objectz00 = 
bstring_to_symbol(BGl_string3967z00zz__objectz00); 
BGl_list3965z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3966z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3661z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3955z00zz__objectz00, BNIL))); 
BGl_list3950z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3951z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3953z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3965z00zz__objectz00, BNIL))); 
BGl_list3945z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3946z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3948z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3950z00zz__objectz00, BNIL))); 
BGl_symbol3970z00zz__objectz00 = 
bstring_to_symbol(BGl_string3969z00zz__objectz00); 
BGl_symbol3972z00zz__objectz00 = 
bstring_to_symbol(BGl_string3973z00zz__objectz00); 
BGl_symbol3977z00zz__objectz00 = 
bstring_to_symbol(BGl_string3978z00zz__objectz00); 
BGl_list3976z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3977z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3957z00zz__objectz00, BNIL)); 
BGl_list3975z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_list3976z00zz__objectz00, BNIL); 
BGl_list3979z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3966z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3661z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3977z00zz__objectz00, BNIL))); 
BGl_list3974z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3951z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3975z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3979z00zz__objectz00, BNIL))); 
BGl_list3971z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3946z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3972z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_list3974z00zz__objectz00, BNIL))); 
BGl_symbol3984z00zz__objectz00 = 
bstring_to_symbol(BGl_string3985z00zz__objectz00); 
BGl_list3983z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3984z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3984z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3691z00zz__objectz00, BNIL)))); 
BGl_symbol3989z00zz__objectz00 = 
bstring_to_symbol(BGl_string3990z00zz__objectz00); 
BGl_symbol3991z00zz__objectz00 = 
bstring_to_symbol(BGl_string3992z00zz__objectz00); 
BGl_list3988z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3989z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3989z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3661z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3960z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3991z00zz__objectz00, BNIL)))))); 
BGl_symbol3996z00zz__objectz00 = 
bstring_to_symbol(BGl_string3997z00zz__objectz00); 
BGl_list3995z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3996z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3996z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3927z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol3930z00zz__objectz00, BNIL))))); 
BGl_symbol4001z00zz__objectz00 = 
bstring_to_symbol(BGl_string4002z00zz__objectz00); 
BGl_symbol4003z00zz__objectz00 = 
bstring_to_symbol(BGl_string4004z00zz__objectz00); 
BGl_list4000z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4001z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4001z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4003z00zz__objectz00, BNIL)))); 
BGl_symbol4007z00zz__objectz00 = 
bstring_to_symbol(BGl_string4008z00zz__objectz00); 
BGl_list4006z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4007z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4007z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4003z00zz__objectz00, BNIL)))); 
BGl_symbol4015z00zz__objectz00 = 
bstring_to_symbol(BGl_string4016z00zz__objectz00); 
return ( 
BGl_list4014z00zz__objectz00 = 
MAKE_YOUNG_PAIR(BGl_symbol3524z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4015z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4015z00zz__objectz00, 
MAKE_YOUNG_PAIR(BGl_symbol4003z00zz__objectz00, BNIL)))), BUNSPEC) ;} 

}



/* gc-roots-init */
obj_t BGl_gczd2rootszd2initz00zz__objectz00(void)
{
{ /* Llib/object.scm 17 */
return 
bgl_gc_roots_register();} 

}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zz__objectz00(void)
{
{ /* Llib/object.scm 17 */BUNSPEC; BUNSPEC; BUNSPEC; BUNSPEC; BUNSPEC; BUNSPEC; BUNSPEC; BUNSPEC; BUNSPEC; BUNSPEC; 
return BUNSPEC;} 

}



/* bigloo-generic-bucket-pow */
BGL_EXPORTED_DEF int BGl_bigloozd2genericzd2bucketzd2powzd2zz__objectz00(void)
{
{ /* Llib/object.scm 426 */
return 
(int)(4L);} 

}



/* &bigloo-generic-bucket-pow */
obj_t BGl_z62bigloozd2genericzd2bucketzd2powzb0zz__objectz00(obj_t BgL_envz00_4736)
{
{ /* Llib/object.scm 426 */
return 
BINT(
BGl_bigloozd2genericzd2bucketzd2powzd2zz__objectz00());} 

}



/* bigloo-generic-bucket-size */
BGL_EXPORTED_DEF int BGl_bigloozd2genericzd2bucketzd2siza7ez75zz__objectz00(void)
{
{ /* Llib/object.scm 428 */
return 
(int)(
(1L << 
(int)(
(long)(
(int)(4L)))));} 

}



/* &bigloo-generic-bucket-size */
obj_t BGl_z62bigloozd2genericzd2bucketzd2siza7ez17zz__objectz00(obj_t BgL_envz00_4737)
{
{ /* Llib/object.scm 428 */
return 
BINT(
BGl_bigloozd2genericzd2bucketzd2siza7ez75zz__objectz00());} 

}



/* bigloo-generic-bucket-mask */
BGL_EXPORTED_DEF int BGl_bigloozd2genericzd2bucketzd2maskzd2zz__objectz00(void)
{
{ /* Llib/object.scm 430 */
return 
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L));} 

}



/* &bigloo-generic-bucket-mask */
obj_t BGl_z62bigloozd2genericzd2bucketzd2maskzb0zz__objectz00(obj_t BgL_envz00_4738)
{
{ /* Llib/object.scm 430 */
return 
BINT(
BGl_bigloozd2genericzd2bucketzd2maskzd2zz__objectz00());} 

}



/* bigloo-types-number */
BGL_EXPORTED_DEF long bgl_types_number(void)
{
{ /* Llib/object.scm 440 */
if(
INTEGERP(BGl_za2nbzd2classesza2zd2zz__objectz00))
{ /* Llib/object.scm 441 */
return 
(OBJECT_TYPE+
(long)CINT(BGl_za2nbzd2classesza2zd2zz__objectz00));}  else 
{ /* Llib/object.scm 441 */
return OBJECT_TYPE;} } 

}



/* &bigloo-types-number */
obj_t BGl_z62bigloozd2typeszd2numberz62zz__objectz00(obj_t BgL_envz00_4739)
{
{ /* Llib/object.scm 440 */
return 
BINT(
bgl_types_number());} 

}



/* class? */
BGL_EXPORTED_DEF bool_t BGl_classzf3zf3zz__objectz00(obj_t BgL_objz00_20)
{
{ /* Llib/object.scm 468 */
return 
BGL_CLASSP(BgL_objz00_20);} 

}



/* &class? */
obj_t BGl_z62classzf3z91zz__objectz00(obj_t BgL_envz00_4740, obj_t BgL_objz00_4741)
{
{ /* Llib/object.scm 468 */
return 
BBOOL(
BGl_classzf3zf3zz__objectz00(BgL_objz00_4741));} 

}



/* class-exists */
BGL_EXPORTED_DEF obj_t BGl_classzd2existszd2zz__objectz00(obj_t BgL_cnamez00_21)
{
{ /* Llib/object.scm 474 */
{ 
 long BgL_iz00_1289;
BgL_iz00_1289 = 0L; 
BgL_zc3z04anonymousza31486ze3z87_1290:
{ /* Llib/object.scm 476 */
 bool_t BgL_test4525z00_8192;
{ /* Llib/object.scm 476 */
 long BgL_n2z00_2990;
{ /* Llib/object.scm 476 */
 obj_t BgL_tmpz00_8193;
{ /* Llib/object.scm 476 */
 obj_t BgL_aux2769z00_5438;
BgL_aux2769z00_5438 = BGl_za2nbzd2classesza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2769z00_5438))
{ /* Llib/object.scm 476 */
BgL_tmpz00_8193 = BgL_aux2769z00_5438
; }  else 
{ 
 obj_t BgL_auxz00_8196;
BgL_auxz00_8196 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(19704L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2769z00_5438); 
FAILURE(BgL_auxz00_8196,BFALSE,BFALSE);} } 
BgL_n2z00_2990 = 
(long)CINT(BgL_tmpz00_8193); } 
BgL_test4525z00_8192 = 
(BgL_iz00_1289==BgL_n2z00_2990); } 
if(BgL_test4525z00_8192)
{ /* Llib/object.scm 476 */
return BFALSE;}  else 
{ /* Llib/object.scm 477 */
 obj_t BgL_claz00_1292;
{ /* Llib/object.scm 477 */
 obj_t BgL_vectorz00_2991;
{ /* Llib/object.scm 477 */
 obj_t BgL_aux2770z00_5439;
BgL_aux2770z00_5439 = BGl_za2classesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux2770z00_5439))
{ /* Llib/object.scm 477 */
BgL_vectorz00_2991 = BgL_aux2770z00_5439; }  else 
{ 
 obj_t BgL_auxz00_8204;
BgL_auxz00_8204 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(19746L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2770z00_5439); 
FAILURE(BgL_auxz00_8204,BFALSE,BFALSE);} } 
BgL_claz00_1292 = 
VECTOR_REF(BgL_vectorz00_2991,BgL_iz00_1289); } 
{ /* Llib/object.scm 478 */
 bool_t BgL_test4528z00_8209;
{ /* Llib/object.scm 478 */
 obj_t BgL_arg1491z00_1296;
{ /* Llib/object.scm 478 */
 obj_t BgL_classz00_2993;
if(
BGL_CLASSP(BgL_claz00_1292))
{ /* Llib/object.scm 478 */
BgL_classz00_2993 = BgL_claz00_1292; }  else 
{ 
 obj_t BgL_auxz00_8212;
BgL_auxz00_8212 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(19787L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_claz00_1292); 
FAILURE(BgL_auxz00_8212,BFALSE,BFALSE);} 
BgL_arg1491z00_1296 = 
BGL_CLASS_NAME(BgL_classz00_2993); } 
BgL_test4528z00_8209 = 
(BgL_arg1491z00_1296==BgL_cnamez00_21); } 
if(BgL_test4528z00_8209)
{ /* Llib/object.scm 478 */
return BgL_claz00_1292;}  else 
{ 
 long BgL_iz00_8218;
BgL_iz00_8218 = 
(BgL_iz00_1289+1L); 
BgL_iz00_1289 = BgL_iz00_8218; 
goto BgL_zc3z04anonymousza31486ze3z87_1290;} } } } } } 

}



/* &class-exists */
obj_t BGl_z62classzd2existszb0zz__objectz00(obj_t BgL_envz00_4742, obj_t BgL_cnamez00_4743)
{
{ /* Llib/object.scm 474 */
{ /* Llib/object.scm 476 */
 obj_t BgL_auxz00_8220;
if(
SYMBOLP(BgL_cnamez00_4743))
{ /* Llib/object.scm 476 */
BgL_auxz00_8220 = BgL_cnamez00_4743
; }  else 
{ 
 obj_t BgL_auxz00_8223;
BgL_auxz00_8223 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(19689L), BGl_string3488z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_cnamez00_4743); 
FAILURE(BgL_auxz00_8223,BFALSE,BFALSE);} 
return 
BGl_classzd2existszd2zz__objectz00(BgL_auxz00_8220);} } 

}



/* find-class */
BGL_EXPORTED_DEF obj_t BGl_findzd2classzd2zz__objectz00(obj_t BgL_cnamez00_22)
{
{ /* Llib/object.scm 485 */
{ /* Llib/object.scm 486 */
 obj_t BgL__ortest_1215z00_2995;
BgL__ortest_1215z00_2995 = 
BGl_classzd2existszd2zz__objectz00(BgL_cnamez00_22); 
if(
CBOOL(BgL__ortest_1215z00_2995))
{ /* Llib/object.scm 486 */
if(
BGL_CLASSP(BgL__ortest_1215z00_2995))
{ /* Llib/object.scm 486 */
return BgL__ortest_1215z00_2995;}  else 
{ 
 obj_t BgL_auxz00_8233;
BgL_auxz00_8233 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20086L), BGl_string3490z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL__ortest_1215z00_2995); 
FAILURE(BgL_auxz00_8233,BFALSE,BFALSE);} }  else 
{ /* Llib/object.scm 487 */
 obj_t BgL_aux2778z00_5447;
BgL_aux2778z00_5447 = 
BGl_errorz00zz__errorz00(BGl_string3490z00zz__objectz00, BGl_string3491z00zz__objectz00, BgL_cnamez00_22); 
if(
BGL_CLASSP(BgL_aux2778z00_5447))
{ /* Llib/object.scm 487 */
return BgL_aux2778z00_5447;}  else 
{ 
 obj_t BgL_auxz00_8240;
BgL_auxz00_8240 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20115L), BGl_string3490z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_aux2778z00_5447); 
FAILURE(BgL_auxz00_8240,BFALSE,BFALSE);} } } } 

}



/* &find-class */
obj_t BGl_z62findzd2classzb0zz__objectz00(obj_t BgL_envz00_4744, obj_t BgL_cnamez00_4745)
{
{ /* Llib/object.scm 485 */
{ /* Llib/object.scm 486 */
 obj_t BgL_auxz00_8244;
if(
SYMBOLP(BgL_cnamez00_4745))
{ /* Llib/object.scm 486 */
BgL_auxz00_8244 = BgL_cnamez00_4745
; }  else 
{ 
 obj_t BgL_auxz00_8247;
BgL_auxz00_8247 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20086L), BGl_string3492z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_cnamez00_4745); 
FAILURE(BgL_auxz00_8247,BFALSE,BFALSE);} 
return 
BGl_findzd2classzd2zz__objectz00(BgL_auxz00_8244);} } 

}



/* find-class-by-hash */
BGL_EXPORTED_DEF obj_t BGl_findzd2classzd2byzd2hashzd2zz__objectz00(int BgL_hashz00_23)
{
{ /* Llib/object.scm 492 */
{ 
 long BgL_iz00_1300;
BgL_iz00_1300 = 0L; 
BgL_zc3z04anonymousza31492ze3z87_1301:
{ /* Llib/object.scm 494 */
 bool_t BgL_test4535z00_8252;
{ /* Llib/object.scm 494 */
 long BgL_n2z00_2997;
{ /* Llib/object.scm 494 */
 obj_t BgL_tmpz00_8253;
{ /* Llib/object.scm 494 */
 obj_t BgL_aux2782z00_5451;
BgL_aux2782z00_5451 = BGl_za2nbzd2classesza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2782z00_5451))
{ /* Llib/object.scm 494 */
BgL_tmpz00_8253 = BgL_aux2782z00_5451
; }  else 
{ 
 obj_t BgL_auxz00_8256;
BgL_auxz00_8256 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20463L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2782z00_5451); 
FAILURE(BgL_auxz00_8256,BFALSE,BFALSE);} } 
BgL_n2z00_2997 = 
(long)CINT(BgL_tmpz00_8253); } 
BgL_test4535z00_8252 = 
(BgL_iz00_1300==BgL_n2z00_2997); } 
if(BgL_test4535z00_8252)
{ /* Llib/object.scm 494 */
return BFALSE;}  else 
{ /* Llib/object.scm 495 */
 obj_t BgL_claz00_1303;
{ /* Llib/object.scm 495 */
 obj_t BgL_vectorz00_2998;
{ /* Llib/object.scm 495 */
 obj_t BgL_aux2783z00_5452;
BgL_aux2783z00_5452 = BGl_za2classesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux2783z00_5452))
{ /* Llib/object.scm 495 */
BgL_vectorz00_2998 = BgL_aux2783z00_5452; }  else 
{ 
 obj_t BgL_auxz00_8264;
BgL_auxz00_8264 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20505L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2783z00_5452); 
FAILURE(BgL_auxz00_8264,BFALSE,BFALSE);} } 
BgL_claz00_1303 = 
VECTOR_REF(BgL_vectorz00_2998,BgL_iz00_1300); } 
{ /* Llib/object.scm 496 */
 bool_t BgL_test4538z00_8269;
{ /* Llib/object.scm 496 */
 long BgL_arg1498z00_1307;
{ /* Llib/object.scm 496 */
 obj_t BgL_classz00_3000;
if(
BGL_CLASSP(BgL_claz00_1303))
{ /* Llib/object.scm 496 */
BgL_classz00_3000 = BgL_claz00_1303; }  else 
{ 
 obj_t BgL_auxz00_8272;
BgL_auxz00_8272 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20546L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_claz00_1303); 
FAILURE(BgL_auxz00_8272,BFALSE,BFALSE);} 
BgL_arg1498z00_1307 = 
BGL_CLASS_HASH(BgL_classz00_3000); } 
BgL_test4538z00_8269 = 
(
BINT(BgL_arg1498z00_1307)==
BINT(BgL_hashz00_23)); } 
if(BgL_test4538z00_8269)
{ /* Llib/object.scm 496 */
return BgL_claz00_1303;}  else 
{ 
 long BgL_iz00_8280;
BgL_iz00_8280 = 
(BgL_iz00_1300+1L); 
BgL_iz00_1300 = BgL_iz00_8280; 
goto BgL_zc3z04anonymousza31492ze3z87_1301;} } } } } } 

}



/* &find-class-by-hash */
obj_t BGl_z62findzd2classzd2byzd2hashzb0zz__objectz00(obj_t BgL_envz00_4746, obj_t BgL_hashz00_4747)
{
{ /* Llib/object.scm 492 */
{ /* Llib/object.scm 494 */
 int BgL_auxz00_8282;
{ /* Llib/object.scm 494 */
 obj_t BgL_tmpz00_8283;
if(
INTEGERP(BgL_hashz00_4747))
{ /* Llib/object.scm 494 */
BgL_tmpz00_8283 = BgL_hashz00_4747
; }  else 
{ 
 obj_t BgL_auxz00_8286;
BgL_auxz00_8286 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20448L), BGl_string3493z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_hashz00_4747); 
FAILURE(BgL_auxz00_8286,BFALSE,BFALSE);} 
BgL_auxz00_8282 = 
CINT(BgL_tmpz00_8283); } 
return 
BGl_findzd2classzd2byzd2hashzd2zz__objectz00(BgL_auxz00_8282);} } 

}



/* eval-class? */
BGL_EXPORTED_DEF bool_t BGl_evalzd2classzf3z21zz__objectz00(obj_t BgL_objz00_24)
{
{ /* Llib/object.scm 503 */
if(
BGL_CLASSP(BgL_objz00_24))
{ /* Llib/object.scm 504 */
 obj_t BgL_classz00_3003;
if(
BGL_CLASSP(BgL_objz00_24))
{ /* Llib/object.scm 504 */
BgL_classz00_3003 = BgL_objz00_24; }  else 
{ 
 obj_t BgL_auxz00_8296;
BgL_auxz00_8296 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(20871L), BGl_string3494z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_objz00_24); 
FAILURE(BgL_auxz00_8296,BFALSE,BFALSE);} 
return 
CBOOL(
BGL_CLASS_EVDATA(BgL_classz00_3003));}  else 
{ /* Llib/object.scm 504 */
return ((bool_t)0);} } 

}



/* &eval-class? */
obj_t BGl_z62evalzd2classzf3z43zz__objectz00(obj_t BgL_envz00_4748, obj_t BgL_objz00_4749)
{
{ /* Llib/object.scm 503 */
return 
BBOOL(
BGl_evalzd2classzf3z21zz__objectz00(BgL_objz00_4749));} 

}



/* class-name */
BGL_EXPORTED_DEF obj_t BGl_classzd2namezd2zz__objectz00(obj_t BgL_classz00_25)
{
{ /* Llib/object.scm 509 */
return 
BGL_CLASS_NAME(BgL_classz00_25);} 

}



/* &class-name */
obj_t BGl_z62classzd2namezb0zz__objectz00(obj_t BgL_envz00_4750, obj_t BgL_classz00_4751)
{
{ /* Llib/object.scm 509 */
{ /* Llib/object.scm 510 */
 obj_t BgL_auxz00_8305;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4751))
{ /* Llib/object.scm 510 */
BgL_auxz00_8305 = BgL_classz00_4751
; }  else 
{ 
 obj_t BgL_auxz00_8308;
BgL_auxz00_8308 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(21131L), BGl_string3495z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4751); 
FAILURE(BgL_auxz00_8308,BFALSE,BFALSE);} 
return 
BGl_classzd2namezd2zz__objectz00(BgL_auxz00_8305);} } 

}



/* class-module */
BGL_EXPORTED_DEF obj_t BGl_classzd2modulezd2zz__objectz00(obj_t BgL_classz00_26)
{
{ /* Llib/object.scm 515 */
return 
BGL_CLASS_MODULE(BgL_classz00_26);} 

}



/* &class-module */
obj_t BGl_z62classzd2modulezb0zz__objectz00(obj_t BgL_envz00_4752, obj_t BgL_classz00_4753)
{
{ /* Llib/object.scm 515 */
{ /* Llib/object.scm 516 */
 obj_t BgL_auxz00_8314;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4753))
{ /* Llib/object.scm 516 */
BgL_auxz00_8314 = BgL_classz00_4753
; }  else 
{ 
 obj_t BgL_auxz00_8317;
BgL_auxz00_8317 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(21407L), BGl_string3496z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4753); 
FAILURE(BgL_auxz00_8317,BFALSE,BFALSE);} 
return 
BGl_classzd2modulezd2zz__objectz00(BgL_auxz00_8314);} } 

}



/* class-index */
BGL_EXPORTED_DEF long BGl_classzd2indexzd2zz__objectz00(obj_t BgL_classz00_27)
{
{ /* Llib/object.scm 521 */
return 
BGL_CLASS_INDEX(BgL_classz00_27);} 

}



/* &class-index */
obj_t BGl_z62classzd2indexzb0zz__objectz00(obj_t BgL_envz00_4754, obj_t BgL_classz00_4755)
{
{ /* Llib/object.scm 521 */
{ /* Llib/object.scm 522 */
 long BgL_tmpz00_8323;
{ /* Llib/object.scm 522 */
 obj_t BgL_auxz00_8324;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4755))
{ /* Llib/object.scm 522 */
BgL_auxz00_8324 = BgL_classz00_4755
; }  else 
{ 
 obj_t BgL_auxz00_8327;
BgL_auxz00_8327 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(21691L), BGl_string3497z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4755); 
FAILURE(BgL_auxz00_8327,BFALSE,BFALSE);} 
BgL_tmpz00_8323 = 
BGl_classzd2indexzd2zz__objectz00(BgL_auxz00_8324); } 
return 
BINT(BgL_tmpz00_8323);} } 

}



/* class-num */
BGL_EXPORTED_DEF long BGl_classzd2numzd2zz__objectz00(obj_t BgL_classz00_28)
{
{ /* Llib/object.scm 527 */
return 
BGL_CLASS_NUM(BgL_classz00_28);} 

}



/* &class-num */
obj_t BGl_z62classzd2numzb0zz__objectz00(obj_t BgL_envz00_4756, obj_t BgL_classz00_4757)
{
{ /* Llib/object.scm 527 */
{ /* Llib/object.scm 528 */
 long BgL_tmpz00_8334;
{ /* Llib/object.scm 528 */
 obj_t BgL_auxz00_8335;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4757))
{ /* Llib/object.scm 528 */
BgL_auxz00_8335 = BgL_classz00_4757
; }  else 
{ 
 obj_t BgL_auxz00_8338;
BgL_auxz00_8338 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(21972L), BGl_string3498z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4757); 
FAILURE(BgL_auxz00_8338,BFALSE,BFALSE);} 
BgL_tmpz00_8334 = 
BGl_classzd2numzd2zz__objectz00(BgL_auxz00_8335); } 
return 
BINT(BgL_tmpz00_8334);} } 

}



/* class-virtual */
BGL_EXPORTED_DEF obj_t BGl_classzd2virtualzd2zz__objectz00(obj_t BgL_classz00_29)
{
{ /* Llib/object.scm 533 */
return 
BGL_CLASS_VIRTUAL_FIELDS(BgL_classz00_29);} 

}



/* &class-virtual */
obj_t BGl_z62classzd2virtualzb0zz__objectz00(obj_t BgL_envz00_4758, obj_t BgL_classz00_4759)
{
{ /* Llib/object.scm 533 */
{ /* Llib/object.scm 534 */
 obj_t BgL_auxz00_8345;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4759))
{ /* Llib/object.scm 534 */
BgL_auxz00_8345 = BgL_classz00_4759
; }  else 
{ 
 obj_t BgL_auxz00_8348;
BgL_auxz00_8348 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(22255L), BGl_string3499z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4759); 
FAILURE(BgL_auxz00_8348,BFALSE,BFALSE);} 
return 
BGl_classzd2virtualzd2zz__objectz00(BgL_auxz00_8345);} } 

}



/* class-evdata */
BGL_EXPORTED_DEF obj_t BGl_classzd2evdatazd2zz__objectz00(obj_t BgL_classz00_30)
{
{ /* Llib/object.scm 539 */
return 
BGL_CLASS_EVDATA(BgL_classz00_30);} 

}



/* &class-evdata */
obj_t BGl_z62classzd2evdatazb0zz__objectz00(obj_t BgL_envz00_4760, obj_t BgL_classz00_4761)
{
{ /* Llib/object.scm 539 */
{ /* Llib/object.scm 540 */
 obj_t BgL_auxz00_8354;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4761))
{ /* Llib/object.scm 540 */
BgL_auxz00_8354 = BgL_classz00_4761
; }  else 
{ 
 obj_t BgL_auxz00_8357;
BgL_auxz00_8357 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(22541L), BGl_string3500z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4761); 
FAILURE(BgL_auxz00_8357,BFALSE,BFALSE);} 
return 
BGl_classzd2evdatazd2zz__objectz00(BgL_auxz00_8354);} } 

}



/* class-evdata-set! */
BGL_EXPORTED_DEF obj_t BGl_classzd2evdatazd2setz12z12zz__objectz00(obj_t BgL_classz00_31, obj_t BgL_dataz00_32)
{
{ /* Llib/object.scm 545 */
return 
BGL_CLASS_EVDATA_SET(BgL_classz00_31, BgL_dataz00_32);} 

}



/* &class-evdata-set! */
obj_t BGl_z62classzd2evdatazd2setz12z70zz__objectz00(obj_t BgL_envz00_4762, obj_t BgL_classz00_4763, obj_t BgL_dataz00_4764)
{
{ /* Llib/object.scm 545 */
{ /* Llib/object.scm 546 */
 obj_t BgL_auxz00_8363;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4763))
{ /* Llib/object.scm 546 */
BgL_auxz00_8363 = BgL_classz00_4763
; }  else 
{ 
 obj_t BgL_auxz00_8366;
BgL_auxz00_8366 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(22829L), BGl_string3501z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4763); 
FAILURE(BgL_auxz00_8366,BFALSE,BFALSE);} 
return 
BGl_classzd2evdatazd2setz12z12zz__objectz00(BgL_auxz00_8363, BgL_dataz00_4764);} } 

}



/* class-evfields-set! */
BGL_EXPORTED_DEF obj_t BGl_classzd2evfieldszd2setz12z12zz__objectz00(obj_t BgL_classz00_33, obj_t BgL_fieldsz00_34)
{
{ /* Llib/object.scm 551 */
{ /* Llib/object.scm 553 */
 bool_t BgL_test4550z00_8371;
{ /* Llib/object.scm 553 */
 bool_t BgL_res2601z00_3006;
if(
BGL_CLASSP(BgL_classz00_33))
{ /* Llib/object.scm 504 */
BgL_res2601z00_3006 = 
CBOOL(
BGL_CLASS_EVDATA(BgL_classz00_33)); }  else 
{ /* Llib/object.scm 504 */
BgL_res2601z00_3006 = ((bool_t)0); } 
BgL_test4550z00_8371 = BgL_res2601z00_3006; } 
if(BgL_test4550z00_8371)
{ /* Llib/object.scm 555 */
 bool_t BgL_test4552z00_8376;
{ /* Llib/object.scm 555 */
 long BgL_arg1508z00_1318;
{ /* Llib/object.scm 555 */
 obj_t BgL_arg1509z00_1319;
BgL_arg1509z00_1319 = 
BGL_CLASS_DIRECT_FIELDS(BgL_classz00_33); 
BgL_arg1508z00_1318 = 
VECTOR_LENGTH(BgL_arg1509z00_1319); } 
BgL_test4552z00_8376 = 
(BgL_arg1508z00_1318>0L); } 
if(BgL_test4552z00_8376)
{ /* Llib/object.scm 555 */
return 
BGl_errorz00zz__errorz00(BGl_string3502z00zz__objectz00, BGl_string3503z00zz__objectz00, BgL_classz00_33);}  else 
{ /* Llib/object.scm 558 */
 obj_t BgL_sfieldsz00_1314;
{ /* Llib/object.scm 558 */
 obj_t BgL_arg1507z00_1317;
BgL_arg1507z00_1317 = 
BGL_CLASS_SUPER(BgL_classz00_33); 
{ /* Llib/object.scm 558 */
 obj_t BgL_classz00_3011;
if(
BGL_CLASSP(BgL_arg1507z00_1317))
{ /* Llib/object.scm 558 */
BgL_classz00_3011 = BgL_arg1507z00_1317; }  else 
{ 
 obj_t BgL_auxz00_8384;
BgL_auxz00_8384 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(23421L), BGl_string3502z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_arg1507z00_1317); 
FAILURE(BgL_auxz00_8384,BFALSE,BFALSE);} 
BgL_sfieldsz00_1314 = 
BGL_CLASS_ALL_FIELDS(BgL_classz00_3011); } } 
BGL_CLASS_DIRECT_FIELDS_SET(BgL_classz00_33, BgL_fieldsz00_34); 
{ /* Llib/object.scm 560 */
 obj_t BgL_arg1505z00_1315;
{ /* Llib/object.scm 560 */
 obj_t BgL_list1506z00_1316;
BgL_list1506z00_1316 = 
MAKE_YOUNG_PAIR(BgL_fieldsz00_34, BNIL); 
BgL_arg1505z00_1315 = 
BGl_vectorzd2appendzd2zz__r4_vectors_6_8z00(BgL_sfieldsz00_1314, BgL_list1506z00_1316); } 
return 
BGL_CLASS_ALL_FIELDS_SET(BgL_classz00_33, BgL_arg1505z00_1315);} } }  else 
{ /* Llib/object.scm 553 */
return 
BGl_errorz00zz__errorz00(BGl_string3502z00zz__objectz00, BGl_string3504z00zz__objectz00, BgL_classz00_33);} } } 

}



/* &class-evfields-set! */
obj_t BGl_z62classzd2evfieldszd2setz12z70zz__objectz00(obj_t BgL_envz00_4765, obj_t BgL_classz00_4766, obj_t BgL_fieldsz00_4767)
{
{ /* Llib/object.scm 551 */
{ /* Llib/object.scm 553 */
 obj_t BgL_auxz00_8401; obj_t BgL_auxz00_8394;
if(
VECTORP(BgL_fieldsz00_4767))
{ /* Llib/object.scm 553 */
BgL_auxz00_8401 = BgL_fieldsz00_4767
; }  else 
{ 
 obj_t BgL_auxz00_8404;
BgL_auxz00_8404 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(23143L), BGl_string3505z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_fieldsz00_4767); 
FAILURE(BgL_auxz00_8404,BFALSE,BFALSE);} 
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4766))
{ /* Llib/object.scm 553 */
BgL_auxz00_8394 = BgL_classz00_4766
; }  else 
{ 
 obj_t BgL_auxz00_8397;
BgL_auxz00_8397 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(23143L), BGl_string3505z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4766); 
FAILURE(BgL_auxz00_8397,BFALSE,BFALSE);} 
return 
BGl_classzd2evfieldszd2setz12z12zz__objectz00(BgL_auxz00_8394, BgL_auxz00_8401);} } 

}



/* class-fields */
BGL_EXPORTED_DEF obj_t BGl_classzd2fieldszd2zz__objectz00(obj_t BgL_classz00_35)
{
{ /* Llib/object.scm 565 */
return 
BGL_CLASS_DIRECT_FIELDS(BgL_classz00_35);} 

}



/* &class-fields */
obj_t BGl_z62classzd2fieldszb0zz__objectz00(obj_t BgL_envz00_4768, obj_t BgL_classz00_4769)
{
{ /* Llib/object.scm 565 */
{ /* Llib/object.scm 566 */
 obj_t BgL_auxz00_8410;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4769))
{ /* Llib/object.scm 566 */
BgL_auxz00_8410 = BgL_classz00_4769
; }  else 
{ 
 obj_t BgL_auxz00_8413;
BgL_auxz00_8413 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(23794L), BGl_string3506z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4769); 
FAILURE(BgL_auxz00_8413,BFALSE,BFALSE);} 
return 
BGl_classzd2fieldszd2zz__objectz00(BgL_auxz00_8410);} } 

}



/* class-all-fields */
BGL_EXPORTED_DEF obj_t BGl_classzd2allzd2fieldsz00zz__objectz00(obj_t BgL_classz00_36)
{
{ /* Llib/object.scm 571 */
return 
BGL_CLASS_ALL_FIELDS(BgL_classz00_36);} 

}



/* &class-all-fields */
obj_t BGl_z62classzd2allzd2fieldsz62zz__objectz00(obj_t BgL_envz00_4770, obj_t BgL_classz00_4771)
{
{ /* Llib/object.scm 571 */
{ /* Llib/object.scm 572 */
 obj_t BgL_auxz00_8419;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4771))
{ /* Llib/object.scm 572 */
BgL_auxz00_8419 = BgL_classz00_4771
; }  else 
{ 
 obj_t BgL_auxz00_8422;
BgL_auxz00_8422 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(24090L), BGl_string3507z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4771); 
FAILURE(BgL_auxz00_8422,BFALSE,BFALSE);} 
return 
BGl_classzd2allzd2fieldsz00zz__objectz00(BgL_auxz00_8419);} } 

}



/* find-class-field */
BGL_EXPORTED_DEF obj_t BGl_findzd2classzd2fieldz00zz__objectz00(obj_t BgL_classz00_37, obj_t BgL_namez00_38)
{
{ /* Llib/object.scm 577 */
{ /* Llib/object.scm 578 */
 obj_t BgL_fieldsz00_1320;
BgL_fieldsz00_1320 = 
BGL_CLASS_ALL_FIELDS(BgL_classz00_37); 
{ /* Llib/object.scm 579 */
 long BgL_g1217z00_1321;
BgL_g1217z00_1321 = 
(
VECTOR_LENGTH(BgL_fieldsz00_1320)-1L); 
{ 
 long BgL_iz00_1323;
BgL_iz00_1323 = BgL_g1217z00_1321; 
BgL_zc3z04anonymousza31510ze3z87_1324:
if(
(BgL_iz00_1323==(-1L)))
{ /* Llib/object.scm 580 */
return BFALSE;}  else 
{ /* Llib/object.scm 582 */
 obj_t BgL_fz00_1326;
BgL_fz00_1326 = 
VECTOR_REF(BgL_fieldsz00_1320,BgL_iz00_1323); 
{ /* Llib/object.scm 583 */
 bool_t BgL_test4559z00_8433;
{ /* Llib/object.scm 583 */
 obj_t BgL_arg1515z00_1330;
{ /* Llib/object.scm 583 */
 obj_t BgL_res2602z00_3020;
{ /* Llib/object.scm 583 */
 obj_t BgL_fieldz00_3018;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fz00_1326))
{ /* Llib/object.scm 583 */
BgL_fieldz00_3018 = BgL_fz00_1326; }  else 
{ 
 obj_t BgL_auxz00_8436;
BgL_auxz00_8436 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(24580L), BGl_string3484z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fz00_1326); 
FAILURE(BgL_auxz00_8436,BFALSE,BFALSE);} 
{ /* Llib/object.scm 606 */
 obj_t BgL_vectorz00_3019;
BgL_vectorz00_3019 = BgL_fieldz00_3018; 
{ /* Llib/object.scm 606 */
 obj_t BgL_aux2816z00_5485;
BgL_aux2816z00_5485 = 
VECTOR_REF(BgL_vectorz00_3019,0L); 
if(
SYMBOLP(BgL_aux2816z00_5485))
{ /* Llib/object.scm 606 */
BgL_res2602z00_3020 = BgL_aux2816z00_5485; }  else 
{ 
 obj_t BgL_auxz00_8443;
BgL_auxz00_8443 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(25638L), BGl_string3484z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_aux2816z00_5485); 
FAILURE(BgL_auxz00_8443,BFALSE,BFALSE);} } } } 
BgL_arg1515z00_1330 = BgL_res2602z00_3020; } 
BgL_test4559z00_8433 = 
(BgL_arg1515z00_1330==BgL_namez00_38); } 
if(BgL_test4559z00_8433)
{ /* Llib/object.scm 583 */
return BgL_fz00_1326;}  else 
{ 
 long BgL_iz00_8448;
BgL_iz00_8448 = 
(BgL_iz00_1323-1L); 
BgL_iz00_1323 = BgL_iz00_8448; 
goto BgL_zc3z04anonymousza31510ze3z87_1324;} } } } } } } 

}



/* &find-class-field */
obj_t BGl_z62findzd2classzd2fieldz62zz__objectz00(obj_t BgL_envz00_4772, obj_t BgL_classz00_4773, obj_t BgL_namez00_4774)
{
{ /* Llib/object.scm 577 */
{ /* Llib/object.scm 578 */
 obj_t BgL_auxz00_8457; obj_t BgL_auxz00_8450;
if(
SYMBOLP(BgL_namez00_4774))
{ /* Llib/object.scm 578 */
BgL_auxz00_8457 = BgL_namez00_4774
; }  else 
{ 
 obj_t BgL_auxz00_8460;
BgL_auxz00_8460 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(24389L), BGl_string3509z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_namez00_4774); 
FAILURE(BgL_auxz00_8460,BFALSE,BFALSE);} 
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4773))
{ /* Llib/object.scm 578 */
BgL_auxz00_8450 = BgL_classz00_4773
; }  else 
{ 
 obj_t BgL_auxz00_8453;
BgL_auxz00_8453 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(24389L), BGl_string3509z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4773); 
FAILURE(BgL_auxz00_8453,BFALSE,BFALSE);} 
return 
BGl_findzd2classzd2fieldz00zz__objectz00(BgL_auxz00_8450, BgL_auxz00_8457);} } 

}



/* make-class-field */
BGL_EXPORTED_DEF obj_t BGl_makezd2classzd2fieldz00zz__objectz00(obj_t BgL_namez00_39, obj_t BgL_getterz00_40, obj_t BgL_setterz00_41, bool_t BgL_ronlyz00_42, bool_t BgL_virtualz00_43, obj_t BgL_infoz00_44, obj_t BgL_defaultz00_45, obj_t BgL_typez00_46)
{
{ /* Llib/object.scm 590 */
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3022;
BgL_v1319z00_3022 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3022,0L,BgL_namez00_39); 
VECTOR_SET(BgL_v1319z00_3022,1L,BgL_getterz00_40); 
VECTOR_SET(BgL_v1319z00_3022,2L,BgL_setterz00_41); 
VECTOR_SET(BgL_v1319z00_3022,3L,
BBOOL(BgL_virtualz00_43)); 
VECTOR_SET(BgL_v1319z00_3022,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3022,5L,BgL_infoz00_44); 
VECTOR_SET(BgL_v1319z00_3022,6L,BgL_defaultz00_45); 
VECTOR_SET(BgL_v1319z00_3022,7L,BgL_typez00_46); 
{ 
 obj_t BgL_auxz00_8475;
if(BgL_ronlyz00_42)
{ /* Llib/object.scm 592 */
BgL_auxz00_8475 = BFALSE
; }  else 
{ /* Llib/object.scm 592 */
BgL_auxz00_8475 = BTRUE
; } 
VECTOR_SET(BgL_v1319z00_3022,8L,BgL_auxz00_8475); } 
return BgL_v1319z00_3022;} } 

}



/* &make-class-field */
obj_t BGl_z62makezd2classzd2fieldz62zz__objectz00(obj_t BgL_envz00_4775, obj_t BgL_namez00_4776, obj_t BgL_getterz00_4777, obj_t BgL_setterz00_4778, obj_t BgL_ronlyz00_4779, obj_t BgL_virtualz00_4780, obj_t BgL_infoz00_4781, obj_t BgL_defaultz00_4782, obj_t BgL_typez00_4783)
{
{ /* Llib/object.scm 590 */
{ /* Llib/object.scm 591 */
 obj_t BgL_auxz00_8478;
if(
SYMBOLP(BgL_namez00_4776))
{ /* Llib/object.scm 591 */
BgL_auxz00_8478 = BgL_namez00_4776
; }  else 
{ 
 obj_t BgL_auxz00_8481;
BgL_auxz00_8481 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(24930L), BGl_string3510z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_namez00_4776); 
FAILURE(BgL_auxz00_8481,BFALSE,BFALSE);} 
return 
BGl_makezd2classzd2fieldz00zz__objectz00(BgL_auxz00_8478, BgL_getterz00_4777, BgL_setterz00_4778, 
CBOOL(BgL_ronlyz00_4779), 
CBOOL(BgL_virtualz00_4780), BgL_infoz00_4781, BgL_defaultz00_4782, BgL_typez00_4783);} } 

}



/* class-field? */
BGL_EXPORTED_DEF bool_t BGl_classzd2fieldzf3z21zz__objectz00(obj_t BgL_objz00_47)
{
{ /* Llib/object.scm 597 */
if(
VECTORP(BgL_objz00_47))
{ /* Llib/object.scm 598 */
if(
(
VECTOR_LENGTH(BgL_objz00_47)==9L))
{ /* Llib/object.scm 599 */
return 
(
VECTOR_REF(BgL_objz00_47,4L)==BGl_makezd2classzd2fieldzd2envzd2zz__objectz00);}  else 
{ /* Llib/object.scm 599 */
return ((bool_t)0);} }  else 
{ /* Llib/object.scm 598 */
return ((bool_t)0);} } 

}



/* &class-field? */
obj_t BGl_z62classzd2fieldzf3z43zz__objectz00(obj_t BgL_envz00_4784, obj_t BgL_objz00_4785)
{
{ /* Llib/object.scm 597 */
return 
BBOOL(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_objz00_4785));} 

}



/* class-field-name */
BGL_EXPORTED_DEF obj_t BGl_classzd2fieldzd2namez00zz__objectz00(obj_t BgL_fieldz00_48)
{
{ /* Llib/object.scm 605 */
{ /* Llib/object.scm 606 */
 obj_t BgL_vectorz00_3036;
BgL_vectorz00_3036 = BgL_fieldz00_48; 
{ /* Llib/object.scm 606 */
 obj_t BgL_aux2824z00_5493;
BgL_aux2824z00_5493 = 
VECTOR_REF(BgL_vectorz00_3036,0L); 
if(
SYMBOLP(BgL_aux2824z00_5493))
{ /* Llib/object.scm 606 */
return BgL_aux2824z00_5493;}  else 
{ 
 obj_t BgL_auxz00_8500;
BgL_auxz00_8500 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(25638L), BGl_string3511z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_aux2824z00_5493); 
FAILURE(BgL_auxz00_8500,BFALSE,BFALSE);} } } } 

}



/* &class-field-name */
obj_t BGl_z62classzd2fieldzd2namez62zz__objectz00(obj_t BgL_envz00_4786, obj_t BgL_fieldz00_4787)
{
{ /* Llib/object.scm 605 */
{ /* Llib/object.scm 606 */
 obj_t BgL_auxz00_8504;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4787))
{ /* Llib/object.scm 606 */
BgL_auxz00_8504 = BgL_fieldz00_4787
; }  else 
{ 
 obj_t BgL_auxz00_8507;
BgL_auxz00_8507 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(25638L), BGl_string3512z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4787); 
FAILURE(BgL_auxz00_8507,BFALSE,BFALSE);} 
return 
BGl_classzd2fieldzd2namez00zz__objectz00(BgL_auxz00_8504);} } 

}



/* class-field-virtual? */
BGL_EXPORTED_DEF bool_t BGl_classzd2fieldzd2virtualzf3zf3zz__objectz00(obj_t BgL_fieldz00_49)
{
{ /* Llib/object.scm 611 */
{ /* Llib/object.scm 612 */
 obj_t BgL_vectorz00_3037;
BgL_vectorz00_3037 = BgL_fieldz00_49; 
return 
CBOOL(
VECTOR_REF(BgL_vectorz00_3037,3L));} } 

}



/* &class-field-virtual? */
obj_t BGl_z62classzd2fieldzd2virtualzf3z91zz__objectz00(obj_t BgL_envz00_4788, obj_t BgL_fieldz00_4789)
{
{ /* Llib/object.scm 611 */
{ /* Llib/object.scm 612 */
 bool_t BgL_tmpz00_8514;
{ /* Llib/object.scm 612 */
 obj_t BgL_auxz00_8515;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4789))
{ /* Llib/object.scm 612 */
BgL_auxz00_8515 = BgL_fieldz00_4789
; }  else 
{ 
 obj_t BgL_auxz00_8518;
BgL_auxz00_8518 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(25932L), BGl_string3513z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4789); 
FAILURE(BgL_auxz00_8518,BFALSE,BFALSE);} 
BgL_tmpz00_8514 = 
BGl_classzd2fieldzd2virtualzf3zf3zz__objectz00(BgL_auxz00_8515); } 
return 
BBOOL(BgL_tmpz00_8514);} } 

}



/* class-field-accessor */
BGL_EXPORTED_DEF obj_t BGl_classzd2fieldzd2accessorz00zz__objectz00(obj_t BgL_fieldz00_50)
{
{ /* Llib/object.scm 617 */
{ /* Llib/object.scm 618 */
 obj_t BgL_vectorz00_3038;
BgL_vectorz00_3038 = BgL_fieldz00_50; 
{ /* Llib/object.scm 618 */
 obj_t BgL_aux2830z00_5499;
BgL_aux2830z00_5499 = 
VECTOR_REF(BgL_vectorz00_3038,1L); 
if(
PROCEDUREP(BgL_aux2830z00_5499))
{ /* Llib/object.scm 618 */
return BgL_aux2830z00_5499;}  else 
{ 
 obj_t BgL_auxz00_8527;
BgL_auxz00_8527 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(26231L), BGl_string3514z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2830z00_5499); 
FAILURE(BgL_auxz00_8527,BFALSE,BFALSE);} } } } 

}



/* &class-field-accessor */
obj_t BGl_z62classzd2fieldzd2accessorz62zz__objectz00(obj_t BgL_envz00_4790, obj_t BgL_fieldz00_4791)
{
{ /* Llib/object.scm 617 */
{ /* Llib/object.scm 618 */
 obj_t BgL_auxz00_8531;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4791))
{ /* Llib/object.scm 618 */
BgL_auxz00_8531 = BgL_fieldz00_4791
; }  else 
{ 
 obj_t BgL_auxz00_8534;
BgL_auxz00_8534 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(26231L), BGl_string3516z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4791); 
FAILURE(BgL_auxz00_8534,BFALSE,BFALSE);} 
return 
BGl_classzd2fieldzd2accessorz00zz__objectz00(BgL_auxz00_8531);} } 

}



/* class-field-mutable? */
BGL_EXPORTED_DEF bool_t BGl_classzd2fieldzd2mutablezf3zf3zz__objectz00(obj_t BgL_fieldz00_51)
{
{ /* Llib/object.scm 623 */
{ /* Llib/object.scm 624 */
 obj_t BgL_vectorz00_3039;
BgL_vectorz00_3039 = BgL_fieldz00_51; 
return 
CBOOL(
VECTOR_REF(BgL_vectorz00_3039,8L));} } 

}



/* &class-field-mutable? */
obj_t BGl_z62classzd2fieldzd2mutablezf3z91zz__objectz00(obj_t BgL_envz00_4792, obj_t BgL_fieldz00_4793)
{
{ /* Llib/object.scm 623 */
{ /* Llib/object.scm 624 */
 bool_t BgL_tmpz00_8541;
{ /* Llib/object.scm 624 */
 obj_t BgL_auxz00_8542;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4793))
{ /* Llib/object.scm 624 */
BgL_auxz00_8542 = BgL_fieldz00_4793
; }  else 
{ 
 obj_t BgL_auxz00_8545;
BgL_auxz00_8545 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(26525L), BGl_string3517z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4793); 
FAILURE(BgL_auxz00_8545,BFALSE,BFALSE);} 
BgL_tmpz00_8541 = 
BGl_classzd2fieldzd2mutablezf3zf3zz__objectz00(BgL_auxz00_8542); } 
return 
BBOOL(BgL_tmpz00_8541);} } 

}



/* class-field-mutator */
BGL_EXPORTED_DEF obj_t BGl_classzd2fieldzd2mutatorz00zz__objectz00(obj_t BgL_fieldz00_52)
{
{ /* Llib/object.scm 629 */
{ /* Llib/object.scm 630 */
 obj_t BgL_vectorz00_3040;
BgL_vectorz00_3040 = BgL_fieldz00_52; 
{ /* Llib/object.scm 630 */
 obj_t BgL_aux2836z00_5505;
BgL_aux2836z00_5505 = 
VECTOR_REF(BgL_vectorz00_3040,2L); 
if(
PROCEDUREP(BgL_aux2836z00_5505))
{ /* Llib/object.scm 630 */
return BgL_aux2836z00_5505;}  else 
{ 
 obj_t BgL_auxz00_8554;
BgL_auxz00_8554 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(26823L), BGl_string3518z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2836z00_5505); 
FAILURE(BgL_auxz00_8554,BFALSE,BFALSE);} } } } 

}



/* &class-field-mutator */
obj_t BGl_z62classzd2fieldzd2mutatorz62zz__objectz00(obj_t BgL_envz00_4794, obj_t BgL_fieldz00_4795)
{
{ /* Llib/object.scm 629 */
{ /* Llib/object.scm 630 */
 obj_t BgL_auxz00_8558;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4795))
{ /* Llib/object.scm 630 */
BgL_auxz00_8558 = BgL_fieldz00_4795
; }  else 
{ 
 obj_t BgL_auxz00_8561;
BgL_auxz00_8561 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(26823L), BGl_string3519z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4795); 
FAILURE(BgL_auxz00_8561,BFALSE,BFALSE);} 
return 
BGl_classzd2fieldzd2mutatorz00zz__objectz00(BgL_auxz00_8558);} } 

}



/* class-field-info */
BGL_EXPORTED_DEF obj_t BGl_classzd2fieldzd2infoz00zz__objectz00(obj_t BgL_fieldz00_53)
{
{ /* Llib/object.scm 635 */
return 
VECTOR_REF(BgL_fieldz00_53,5L);} 

}



/* &class-field-info */
obj_t BGl_z62classzd2fieldzd2infoz62zz__objectz00(obj_t BgL_envz00_4796, obj_t BgL_fieldz00_4797)
{
{ /* Llib/object.scm 635 */
{ /* Llib/object.scm 636 */
 obj_t BgL_auxz00_8567;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4797))
{ /* Llib/object.scm 636 */
BgL_auxz00_8567 = BgL_fieldz00_4797
; }  else 
{ 
 obj_t BgL_auxz00_8570;
BgL_auxz00_8570 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(27107L), BGl_string3520z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4797); 
FAILURE(BgL_auxz00_8570,BFALSE,BFALSE);} 
return 
BGl_classzd2fieldzd2infoz00zz__objectz00(BgL_auxz00_8567);} } 

}



/* class-field-default-value? */
BGL_EXPORTED_DEF bool_t BGl_classzd2fieldzd2defaultzd2valuezf3z21zz__objectz00(obj_t BgL_fieldz00_54)
{
{ /* Llib/object.scm 641 */
{ /* Llib/object.scm 642 */
 obj_t BgL_tmpz00_8575;
BgL_tmpz00_8575 = 
VECTOR_REF(BgL_fieldz00_54,6L); 
return 
PROCEDUREP(BgL_tmpz00_8575);} } 

}



/* &class-field-default-value? */
obj_t BGl_z62classzd2fieldzd2defaultzd2valuezf3z43zz__objectz00(obj_t BgL_envz00_4798, obj_t BgL_fieldz00_4799)
{
{ /* Llib/object.scm 641 */
{ /* Llib/object.scm 642 */
 bool_t BgL_tmpz00_8578;
{ /* Llib/object.scm 642 */
 obj_t BgL_auxz00_8579;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4799))
{ /* Llib/object.scm 642 */
BgL_auxz00_8579 = BgL_fieldz00_4799
; }  else 
{ 
 obj_t BgL_auxz00_8582;
BgL_auxz00_8582 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(27413L), BGl_string3521z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4799); 
FAILURE(BgL_auxz00_8582,BFALSE,BFALSE);} 
BgL_tmpz00_8578 = 
BGl_classzd2fieldzd2defaultzd2valuezf3z21zz__objectz00(BgL_auxz00_8579); } 
return 
BBOOL(BgL_tmpz00_8578);} } 

}



/* class-field-default-value */
BGL_EXPORTED_DEF obj_t BGl_classzd2fieldzd2defaultzd2valuezd2zz__objectz00(obj_t BgL_fieldz00_55)
{
{ /* Llib/object.scm 647 */
{ /* Llib/object.scm 650 */
 obj_t BgL_pz00_1340;
BgL_pz00_1340 = 
VECTOR_REF(BgL_fieldz00_55,6L); 
if(
PROCEDUREP(BgL_pz00_1340))
{ /* Llib/object.scm 651 */
if(
PROCEDURE_CORRECT_ARITYP(BgL_pz00_1340, 0))
{ /* Llib/object.scm 652 */
return 
BGL_PROCEDURE_CALL0(BgL_pz00_1340);}  else 
{ /* Llib/object.scm 652 */
FAILURE(BGl_string3522z00zz__objectz00,BGl_list3523z00zz__objectz00,BgL_pz00_1340);} }  else 
{ /* Llib/object.scm 655 */
 obj_t BgL_arg1524z00_1342;
{ /* Llib/object.scm 655 */
 obj_t BgL_res2603z00_3047;
{ /* Llib/object.scm 606 */
 obj_t BgL_vectorz00_3046;
BgL_vectorz00_3046 = BgL_fieldz00_55; 
{ /* Llib/object.scm 606 */
 obj_t BgL_aux2845z00_5515;
BgL_aux2845z00_5515 = 
VECTOR_REF(BgL_vectorz00_3046,0L); 
if(
SYMBOLP(BgL_aux2845z00_5515))
{ /* Llib/object.scm 606 */
BgL_res2603z00_3047 = BgL_aux2845z00_5515; }  else 
{ 
 obj_t BgL_auxz00_8600;
BgL_auxz00_8600 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(25638L), BGl_string3528z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_aux2845z00_5515); 
FAILURE(BgL_auxz00_8600,BFALSE,BFALSE);} } } 
BgL_arg1524z00_1342 = BgL_res2603z00_3047; } 
return 
BGl_errorz00zz__errorz00(BGl_string3528z00zz__objectz00, BGl_string3529z00zz__objectz00, BgL_arg1524z00_1342);} } } 

}



/* &class-field-default-value */
obj_t BGl_z62classzd2fieldzd2defaultzd2valuezb0zz__objectz00(obj_t BgL_envz00_4800, obj_t BgL_fieldz00_4801)
{
{ /* Llib/object.scm 647 */
{ /* Llib/object.scm 650 */
 obj_t BgL_auxz00_8605;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4801))
{ /* Llib/object.scm 650 */
BgL_auxz00_8605 = BgL_fieldz00_4801
; }  else 
{ 
 obj_t BgL_auxz00_8608;
BgL_auxz00_8608 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(27799L), BGl_string3530z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4801); 
FAILURE(BgL_auxz00_8608,BFALSE,BFALSE);} 
return 
BGl_classzd2fieldzd2defaultzd2valuezd2zz__objectz00(BgL_auxz00_8605);} } 

}



/* class-field-type */
BGL_EXPORTED_DEF obj_t BGl_classzd2fieldzd2typez00zz__objectz00(obj_t BgL_fieldz00_56)
{
{ /* Llib/object.scm 660 */
return 
VECTOR_REF(BgL_fieldz00_56,7L);} 

}



/* &class-field-type */
obj_t BGl_z62classzd2fieldzd2typez62zz__objectz00(obj_t BgL_envz00_4802, obj_t BgL_fieldz00_4803)
{
{ /* Llib/object.scm 660 */
{ /* Llib/object.scm 661 */
 obj_t BgL_auxz00_8614;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_fieldz00_4803))
{ /* Llib/object.scm 661 */
BgL_auxz00_8614 = BgL_fieldz00_4803
; }  else 
{ 
 obj_t BgL_auxz00_8617;
BgL_auxz00_8617 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(28238L), BGl_string3531z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_fieldz00_4803); 
FAILURE(BgL_auxz00_8617,BFALSE,BFALSE);} 
return 
BGl_classzd2fieldzd2typez00zz__objectz00(BgL_auxz00_8614);} } 

}



/* class-super */
BGL_EXPORTED_DEF obj_t BGl_classzd2superzd2zz__objectz00(obj_t BgL_classz00_57)
{
{ /* Llib/object.scm 666 */
return 
BGL_CLASS_SUPER(BgL_classz00_57);} 

}



/* &class-super */
obj_t BGl_z62classzd2superzb0zz__objectz00(obj_t BgL_envz00_4804, obj_t BgL_classz00_4805)
{
{ /* Llib/object.scm 666 */
{ /* Llib/object.scm 667 */
 obj_t BgL_auxz00_8623;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4805))
{ /* Llib/object.scm 667 */
BgL_auxz00_8623 = BgL_classz00_4805
; }  else 
{ 
 obj_t BgL_auxz00_8626;
BgL_auxz00_8626 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(28517L), BGl_string3532z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4805); 
FAILURE(BgL_auxz00_8626,BFALSE,BFALSE);} 
return 
BGl_classzd2superzd2zz__objectz00(BgL_auxz00_8623);} } 

}



/* class-abstract? */
BGL_EXPORTED_DEF bool_t BGl_classzd2abstractzf3z21zz__objectz00(obj_t BgL_classz00_61)
{
{ /* Llib/object.scm 684 */
{ /* Llib/object.scm 685 */
 obj_t BgL_arg1527z00_3050;
{ /* Llib/object.scm 685 */
 obj_t BgL_res2604z00_3053;
if(
BGL_CLASSP(BgL_classz00_61))
{ /* Llib/object.scm 709 */
BgL_res2604z00_3053 = 
BGL_CLASS_ALLOC_FUN(BgL_classz00_61); }  else 
{ /* Llib/object.scm 711 */
 obj_t BgL_aux2853z00_5523;
BgL_aux2853z00_5523 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3533z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_61); 
if(
PROCEDUREP(BgL_aux2853z00_5523))
{ /* Llib/object.scm 711 */
BgL_res2604z00_3053 = BgL_aux2853z00_5523; }  else 
{ 
 obj_t BgL_auxz00_8637;
BgL_auxz00_8637 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30666L), BGl_string3534z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2853z00_5523); 
FAILURE(BgL_auxz00_8637,BFALSE,BFALSE);} } 
BgL_arg1527z00_3050 = BgL_res2604z00_3053; } ((bool_t)1); } 
return ((bool_t)0);} 

}



/* &class-abstract? */
obj_t BGl_z62classzd2abstractzf3z43zz__objectz00(obj_t BgL_envz00_4806, obj_t BgL_classz00_4807)
{
{ /* Llib/object.scm 684 */
{ /* Llib/object.scm 685 */
 bool_t BgL_tmpz00_8641;
{ /* Llib/object.scm 685 */
 obj_t BgL_auxz00_8642;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4807))
{ /* Llib/object.scm 685 */
BgL_auxz00_8642 = BgL_classz00_4807
; }  else 
{ 
 obj_t BgL_auxz00_8645;
BgL_auxz00_8645 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(29406L), BGl_string3535z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4807); 
FAILURE(BgL_auxz00_8645,BFALSE,BFALSE);} 
BgL_tmpz00_8641 = 
BGl_classzd2abstractzf3z21zz__objectz00(BgL_auxz00_8642); } 
return 
BBOOL(BgL_tmpz00_8641);} } 

}



/* class-wide? */
BGL_EXPORTED_DEF bool_t BGl_classzd2widezf3z21zz__objectz00(obj_t BgL_classz00_62)
{
{ /* Llib/object.scm 690 */
{ /* Llib/object.scm 691 */
 obj_t BgL_arg1528z00_3054;
if(
BGL_CLASSP(BgL_classz00_62))
{ /* Llib/object.scm 765 */
BgL_arg1528z00_3054 = 
BGL_CLASS_SHRINK(BgL_classz00_62); }  else 
{ /* Llib/object.scm 765 */
BgL_arg1528z00_3054 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3536z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_62); } 
return 
PROCEDUREP(BgL_arg1528z00_3054);} } 

}



/* &class-wide? */
obj_t BGl_z62classzd2widezf3z43zz__objectz00(obj_t BgL_envz00_4808, obj_t BgL_classz00_4809)
{
{ /* Llib/object.scm 690 */
{ /* Llib/object.scm 691 */
 bool_t BgL_tmpz00_8656;
{ /* Llib/object.scm 691 */
 obj_t BgL_auxz00_8657;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4809))
{ /* Llib/object.scm 691 */
BgL_auxz00_8657 = BgL_classz00_4809
; }  else 
{ 
 obj_t BgL_auxz00_8660;
BgL_auxz00_8660 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(29723L), BGl_string3537z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4809); 
FAILURE(BgL_auxz00_8660,BFALSE,BFALSE);} 
BgL_tmpz00_8656 = 
BGl_classzd2widezf3z21zz__objectz00(BgL_auxz00_8657); } 
return 
BBOOL(BgL_tmpz00_8656);} } 

}



/* class-subclasses */
BGL_EXPORTED_DEF obj_t BGl_classzd2subclasseszd2zz__objectz00(obj_t BgL_classz00_63)
{
{ /* Llib/object.scm 696 */
return 
BGL_CLASS_SUBCLASSES(BgL_classz00_63);} 

}



/* &class-subclasses */
obj_t BGl_z62classzd2subclasseszb0zz__objectz00(obj_t BgL_envz00_4810, obj_t BgL_classz00_4811)
{
{ /* Llib/object.scm 696 */
{ /* Llib/object.scm 697 */
 obj_t BgL_auxz00_8667;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4811))
{ /* Llib/object.scm 697 */
BgL_auxz00_8667 = BgL_classz00_4811
; }  else 
{ 
 obj_t BgL_auxz00_8670;
BgL_auxz00_8670 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30012L), BGl_string3538z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4811); 
FAILURE(BgL_auxz00_8670,BFALSE,BFALSE);} 
return 
BGl_classzd2subclasseszd2zz__objectz00(BgL_auxz00_8667);} } 

}



/* class-allocator */
BGL_EXPORTED_DEF obj_t BGl_classzd2allocatorzd2zz__objectz00(obj_t BgL_classz00_66)
{
{ /* Llib/object.scm 708 */
if(
BGL_CLASSP(BgL_classz00_66))
{ /* Llib/object.scm 709 */
return 
BGL_CLASS_ALLOC_FUN(BgL_classz00_66);}  else 
{ /* Llib/object.scm 711 */
 obj_t BgL_aux2861z00_5531;
BgL_aux2861z00_5531 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3533z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_66); 
if(
PROCEDUREP(BgL_aux2861z00_5531))
{ /* Llib/object.scm 711 */
return BgL_aux2861z00_5531;}  else 
{ 
 obj_t BgL_auxz00_8681;
BgL_auxz00_8681 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30666L), BGl_string3533z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2861z00_5531); 
FAILURE(BgL_auxz00_8681,BFALSE,BFALSE);} } } 

}



/* &class-allocator */
obj_t BGl_z62classzd2allocatorzb0zz__objectz00(obj_t BgL_envz00_4812, obj_t BgL_classz00_4813)
{
{ /* Llib/object.scm 708 */
{ /* Llib/object.scm 709 */
 obj_t BgL_auxz00_8685;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4813))
{ /* Llib/object.scm 709 */
BgL_auxz00_8685 = BgL_classz00_4813
; }  else 
{ 
 obj_t BgL_auxz00_8688;
BgL_auxz00_8688 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30608L), BGl_string3539z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4813); 
FAILURE(BgL_auxz00_8688,BFALSE,BFALSE);} 
return 
BGl_classzd2allocatorzd2zz__objectz00(BgL_auxz00_8685);} } 

}



/* class-hash */
BGL_EXPORTED_DEF long BGl_classzd2hashzd2zz__objectz00(obj_t BgL_classz00_67)
{
{ /* Llib/object.scm 716 */
return 
BGL_CLASS_HASH(BgL_classz00_67);} 

}



/* &class-hash */
obj_t BGl_z62classzd2hashzb0zz__objectz00(obj_t BgL_envz00_4814, obj_t BgL_classz00_4815)
{
{ /* Llib/object.scm 716 */
{ /* Llib/object.scm 717 */
 long BgL_tmpz00_8694;
{ /* Llib/object.scm 717 */
 obj_t BgL_auxz00_8695;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4815))
{ /* Llib/object.scm 717 */
BgL_auxz00_8695 = BgL_classz00_4815
; }  else 
{ 
 obj_t BgL_auxz00_8698;
BgL_auxz00_8698 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30973L), BGl_string3540z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4815); 
FAILURE(BgL_auxz00_8698,BFALSE,BFALSE);} 
BgL_tmpz00_8694 = 
BGl_classzd2hashzd2zz__objectz00(BgL_auxz00_8695); } 
return 
BINT(BgL_tmpz00_8694);} } 

}



/* class-constructor */
BGL_EXPORTED_DEF obj_t BGl_classzd2constructorzd2zz__objectz00(obj_t BgL_classz00_68)
{
{ /* Llib/object.scm 722 */
return 
BGL_CLASS_CONSTRUCTOR(BgL_classz00_68);} 

}



/* &class-constructor */
obj_t BGl_z62classzd2constructorzb0zz__objectz00(obj_t BgL_envz00_4816, obj_t BgL_classz00_4817)
{
{ /* Llib/object.scm 722 */
{ /* Llib/object.scm 723 */
 obj_t BgL_auxz00_8705;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4817))
{ /* Llib/object.scm 723 */
BgL_auxz00_8705 = BgL_classz00_4817
; }  else 
{ 
 obj_t BgL_auxz00_8708;
BgL_auxz00_8708 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(31254L), BGl_string3541z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4817); 
FAILURE(BgL_auxz00_8708,BFALSE,BFALSE);} 
return 
BGl_classzd2constructorzd2zz__objectz00(BgL_auxz00_8705);} } 

}



/* class-creator */
BGL_EXPORTED_DEF obj_t BGl_classzd2creatorzd2zz__objectz00(obj_t BgL_classz00_69)
{
{ /* Llib/object.scm 728 */
return 
BGL_CLASS_NEW_FUN(BgL_classz00_69);} 

}



/* &class-creator */
obj_t BGl_z62classzd2creatorzb0zz__objectz00(obj_t BgL_envz00_4818, obj_t BgL_classz00_4819)
{
{ /* Llib/object.scm 728 */
{ /* Llib/object.scm 729 */
 obj_t BgL_auxz00_8714;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4819))
{ /* Llib/object.scm 729 */
BgL_auxz00_8714 = BgL_classz00_4819
; }  else 
{ 
 obj_t BgL_auxz00_8717;
BgL_auxz00_8717 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(31538L), BGl_string3542z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4819); 
FAILURE(BgL_auxz00_8717,BFALSE,BFALSE);} 
return 
BGl_classzd2creatorzd2zz__objectz00(BgL_auxz00_8714);} } 

}



/* class-nil-init! */
BGL_EXPORTED_DEF obj_t BGl_classzd2nilzd2initz12z12zz__objectz00(obj_t BgL_classz00_70)
{
{ /* Llib/object.scm 734 */
{ /* Llib/object.scm 735 */
 obj_t BgL_procz00_1348;
BgL_procz00_1348 = 
BGL_CLASS_NIL_FUN(BgL_classz00_70); 
{ /* Llib/object.scm 736 */
 bool_t BgL_test4596z00_8723;
{ /* Llib/object.scm 691 */
 obj_t BgL_tmpz00_8724;
BgL_tmpz00_8724 = 
BGl_classzd2shrinkzd2zz__objectz00(BgL_classz00_70); 
BgL_test4596z00_8723 = 
PROCEDUREP(BgL_tmpz00_8724); } 
if(BgL_test4596z00_8723)
{ /* Llib/object.scm 737 */
 obj_t BgL_superz00_1350;
BgL_superz00_1350 = 
BGL_CLASS_SUPER(BgL_classz00_70); 
{ /* Llib/object.scm 737 */
 obj_t BgL_oz00_1351;
{ /* Llib/object.scm 738 */
 obj_t BgL_fun1535z00_1354;
{ /* Llib/object.scm 738 */
 obj_t BgL_res2605z00_3062;
{ /* Llib/object.scm 738 */
 obj_t BgL_classz00_3060;
if(
BGL_CLASSP(BgL_superz00_1350))
{ /* Llib/object.scm 738 */
BgL_classz00_3060 = BgL_superz00_1350; }  else 
{ 
 obj_t BgL_auxz00_8730;
BgL_auxz00_8730 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(31949L), BGl_string3543z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_1350); 
FAILURE(BgL_auxz00_8730,BFALSE,BFALSE);} 
if(
BGL_CLASSP(BgL_classz00_3060))
{ /* Llib/object.scm 709 */
BgL_res2605z00_3062 = 
BGL_CLASS_ALLOC_FUN(BgL_classz00_3060); }  else 
{ /* Llib/object.scm 711 */
 obj_t BgL_aux2873z00_5543;
BgL_aux2873z00_5543 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3533z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_3060); 
if(
PROCEDUREP(BgL_aux2873z00_5543))
{ /* Llib/object.scm 711 */
BgL_res2605z00_3062 = BgL_aux2873z00_5543; }  else 
{ 
 obj_t BgL_auxz00_8740;
BgL_auxz00_8740 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30666L), BGl_string3543z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2873z00_5543); 
FAILURE(BgL_auxz00_8740,BFALSE,BFALSE);} } } 
BgL_fun1535z00_1354 = BgL_res2605z00_3062; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_fun1535z00_1354, 0))
{ /* Llib/object.scm 738 */
BgL_oz00_1351 = 
BGL_PROCEDURE_CALL0(BgL_fun1535z00_1354); }  else 
{ /* Llib/object.scm 738 */
FAILURE(BGl_string3544z00zz__objectz00,BGl_list3545z00zz__objectz00,BgL_fun1535z00_1354);} } 
{ /* Llib/object.scm 738 */
 obj_t BgL_woz00_1352;
{ /* Llib/object.scm 739 */
 obj_t BgL_fun1532z00_1353;
{ /* Llib/object.scm 739 */
 obj_t BgL_res2606z00_3065;
if(
BGL_CLASSP(BgL_classz00_70))
{ /* Llib/object.scm 709 */
BgL_res2606z00_3065 = 
BGL_CLASS_ALLOC_FUN(BgL_classz00_70); }  else 
{ /* Llib/object.scm 711 */
 obj_t BgL_aux2876z00_5547;
BgL_aux2876z00_5547 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3533z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_70); 
if(
PROCEDUREP(BgL_aux2876z00_5547))
{ /* Llib/object.scm 711 */
BgL_res2606z00_3065 = BgL_aux2876z00_5547; }  else 
{ 
 obj_t BgL_auxz00_8756;
BgL_auxz00_8756 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30666L), BGl_string3543z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2876z00_5547); 
FAILURE(BgL_auxz00_8756,BFALSE,BFALSE);} } 
BgL_fun1532z00_1353 = BgL_res2606z00_3065; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_fun1532z00_1353, 1))
{ /* Llib/object.scm 739 */
BgL_woz00_1352 = 
BGL_PROCEDURE_CALL1(BgL_fun1532z00_1353, BgL_oz00_1351); }  else 
{ /* Llib/object.scm 739 */
FAILURE(BGl_string3544z00zz__objectz00,BGl_list3548z00zz__objectz00,BgL_fun1532z00_1353);} } 
{ /* Llib/object.scm 739 */

BGL_CLASS_NIL_SET(BgL_classz00_70, BgL_woz00_1352); 
if(
PROCEDURE_CORRECT_ARITYP(BgL_procz00_1348, 1))
{ /* Llib/object.scm 741 */
BGL_PROCEDURE_CALL1(BgL_procz00_1348, BgL_woz00_1352); }  else 
{ /* Llib/object.scm 741 */
FAILURE(BGl_string3544z00zz__objectz00,BGl_list3553z00zz__objectz00,BgL_procz00_1348);} 
return BgL_woz00_1352;} } } }  else 
{ /* Llib/object.scm 743 */
 obj_t BgL_oz00_1355;
{ /* Llib/object.scm 743 */
 obj_t BgL_fun1536z00_1356;
{ /* Llib/object.scm 743 */
 obj_t BgL_res2607z00_3068;
if(
BGL_CLASSP(BgL_classz00_70))
{ /* Llib/object.scm 709 */
BgL_res2607z00_3068 = 
BGL_CLASS_ALLOC_FUN(BgL_classz00_70); }  else 
{ /* Llib/object.scm 711 */
 obj_t BgL_aux2880z00_5553;
BgL_aux2880z00_5553 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3533z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_70); 
if(
PROCEDUREP(BgL_aux2880z00_5553))
{ /* Llib/object.scm 711 */
BgL_res2607z00_3068 = BgL_aux2880z00_5553; }  else 
{ 
 obj_t BgL_auxz00_8781;
BgL_auxz00_8781 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30666L), BGl_string3543z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2880z00_5553); 
FAILURE(BgL_auxz00_8781,BFALSE,BFALSE);} } 
BgL_fun1536z00_1356 = BgL_res2607z00_3068; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_fun1536z00_1356, 0))
{ /* Llib/object.scm 743 */
BgL_oz00_1355 = 
BGL_PROCEDURE_CALL0(BgL_fun1536z00_1356); }  else 
{ /* Llib/object.scm 743 */
FAILURE(BGl_string3544z00zz__objectz00,BGl_list3558z00zz__objectz00,BgL_fun1536z00_1356);} } 
BGL_CLASS_NIL_SET(BgL_classz00_70, BgL_oz00_1355); 
if(
PROCEDURE_CORRECT_ARITYP(BgL_procz00_1348, 1))
{ /* Llib/object.scm 745 */
BGL_PROCEDURE_CALL1(BgL_procz00_1348, BgL_oz00_1355); }  else 
{ /* Llib/object.scm 745 */
FAILURE(BGl_string3544z00zz__objectz00,BGl_list3561z00zz__objectz00,BgL_procz00_1348);} 
return BgL_oz00_1355;} } } } 

}



/* &class-nil-init! */
obj_t BGl_z62classzd2nilzd2initz12z70zz__objectz00(obj_t BgL_envz00_4820, obj_t BgL_classz00_4821)
{
{ /* Llib/object.scm 734 */
{ /* Llib/object.scm 735 */
 obj_t BgL_auxz00_8799;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4821))
{ /* Llib/object.scm 735 */
BgL_auxz00_8799 = BgL_classz00_4821
; }  else 
{ 
 obj_t BgL_auxz00_8802;
BgL_auxz00_8802 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(31820L), BGl_string3562z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4821); 
FAILURE(BgL_auxz00_8802,BFALSE,BFALSE);} 
return 
BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_auxz00_8799);} } 

}



/* class-nil */
BGL_EXPORTED_DEF obj_t BGl_classzd2nilzd2zz__objectz00(obj_t BgL_classz00_71)
{
{ /* Llib/object.scm 751 */
if(
BGL_CLASSP(BgL_classz00_71))
{ /* Llib/object.scm 758 */
 obj_t BgL__ortest_1220z00_6431;
BgL__ortest_1220z00_6431 = 
BGL_CLASS_NIL(BgL_classz00_71); 
if(
CBOOL(BgL__ortest_1220z00_6431))
{ /* Llib/object.scm 758 */
return BgL__ortest_1220z00_6431;}  else 
{ /* Llib/object.scm 758 */
BGL_TAIL return 
BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_71);} }  else 
{ /* Llib/object.scm 757 */
return 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3563z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_71);} } 

}



/* &class-nil */
obj_t BGl_z62classzd2nilzb0zz__objectz00(obj_t BgL_envz00_4822, obj_t BgL_classz00_4823)
{
{ /* Llib/object.scm 751 */
{ /* Llib/object.scm 757 */
 obj_t BgL_auxz00_8814;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4823))
{ /* Llib/object.scm 757 */
BgL_auxz00_8814 = BgL_classz00_4823
; }  else 
{ 
 obj_t BgL_auxz00_8817;
BgL_auxz00_8817 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(32559L), BGl_string3564z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4823); 
FAILURE(BgL_auxz00_8817,BFALSE,BFALSE);} 
return 
BGl_classzd2nilzd2zz__objectz00(BgL_auxz00_8814);} } 

}



/* class-shrink */
obj_t BGl_classzd2shrinkzd2zz__objectz00(obj_t BgL_classz00_72)
{
{ /* Llib/object.scm 764 */
if(
BGL_CLASSP(BgL_classz00_72))
{ /* Llib/object.scm 765 */
return 
BGL_CLASS_SHRINK(BgL_classz00_72);}  else 
{ /* Llib/object.scm 765 */
return 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3536z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_72);} } 

}



/* initialize-objects! */
obj_t BGl_initializa7ezd2objectsz12z67zz__objectz00(void)
{
{ /* Llib/object.scm 807 */
if(
INTEGERP(BGl_za2nbzd2classesza2zd2zz__objectz00))
{ /* Llib/object.scm 808 */
return BFALSE;}  else 
{ /* Llib/object.scm 808 */
BGl_za2nbzd2classesza2zd2zz__objectz00 = 
BINT(0L); 
BGl_za2nbzd2classeszd2maxza2z00zz__objectz00 = 
BINT(64L); 
{ /* Llib/object.scm 811 */
 long BgL_tmpz00_8830;
{ /* Llib/object.scm 811 */
 obj_t BgL_tmpz00_8831;
{ /* Llib/object.scm 811 */
 obj_t BgL_aux2888z00_5563;
BgL_aux2888z00_5563 = BGl_za2nbzd2classeszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux2888z00_5563))
{ /* Llib/object.scm 811 */
BgL_tmpz00_8831 = BgL_aux2888z00_5563
; }  else 
{ 
 obj_t BgL_auxz00_8834;
BgL_auxz00_8834 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(35307L), BGl_string3565z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2888z00_5563); 
FAILURE(BgL_auxz00_8834,BFALSE,BFALSE);} } 
BgL_tmpz00_8830 = 
(long)CINT(BgL_tmpz00_8831); } 
BGl_za2classesza2z00zz__objectz00 = 
make_vector_uncollectable(BgL_tmpz00_8830, BFALSE); } 
BGl_za2inheritancezd2cntza2zd2zz__objectz00 = 
BINT(0L); 
BGl_za2inheritancezd2maxzd2depthza2z00zz__objectz00 = 
BINT(128L); 
BGl_za2inheritancesza2z00zz__objectz00 = 
make_vector_uncollectable(256L, BFALSE); 
BGl_za2nbzd2genericszd2maxza2z00zz__objectz00 = 
BINT(64L); 
BGl_za2nbzd2genericsza2zd2zz__objectz00 = 
BINT(0L); 
{ /* Llib/object.scm 822 */
 long BgL_tmpz00_8845;
{ /* Llib/object.scm 822 */
 obj_t BgL_tmpz00_8846;
{ /* Llib/object.scm 822 */
 obj_t BgL_aux2889z00_5564;
BgL_aux2889z00_5564 = BGl_za2nbzd2genericszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux2889z00_5564))
{ /* Llib/object.scm 822 */
BgL_tmpz00_8846 = BgL_aux2889z00_5564
; }  else 
{ 
 obj_t BgL_auxz00_8849;
BgL_auxz00_8849 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(35696L), BGl_string3565z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2889z00_5564); 
FAILURE(BgL_auxz00_8849,BFALSE,BFALSE);} } 
BgL_tmpz00_8845 = 
(long)CINT(BgL_tmpz00_8846); } 
BGl_za2genericsza2z00zz__objectz00 = 
make_vector_uncollectable(BgL_tmpz00_8845, BFALSE); } 
if(
PAIRP(BGl_za2classzd2keyza2zd2zz__objectz00))
{ /* Llib/object.scm 823 */
return BFALSE;}  else 
{ /* Llib/object.scm 823 */
return ( 
BGl_za2classzd2keyza2zd2zz__objectz00 = 
MAKE_YOUNG_PAIR(
BINT(1L), 
BINT(2L)), BUNSPEC) ;} } } 

}



/* extend-vector */
obj_t BGl_extendzd2vectorzd2zz__objectz00(obj_t BgL_oldzd2veczd2_73, obj_t BgL_fillz00_74, long BgL_extendz00_75)
{
{ /* Llib/object.scm 828 */
{ /* Llib/object.scm 829 */
 long BgL_oldzd2lenzd2_1362;
{ /* Llib/object.scm 829 */
 obj_t BgL_vectorz00_3075;
if(
VECTORP(BgL_oldzd2veczd2_73))
{ /* Llib/object.scm 829 */
BgL_vectorz00_3075 = BgL_oldzd2veczd2_73; }  else 
{ 
 obj_t BgL_auxz00_8862;
BgL_auxz00_8862 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36087L), BGl_string3566z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2veczd2_73); 
FAILURE(BgL_auxz00_8862,BFALSE,BFALSE);} 
BgL_oldzd2lenzd2_1362 = 
VECTOR_LENGTH(BgL_vectorz00_3075); } 
{ /* Llib/object.scm 829 */
 long BgL_newzd2lenzd2_1363;
BgL_newzd2lenzd2_1363 = 
(BgL_extendz00_75+BgL_oldzd2lenzd2_1362); 
{ /* Llib/object.scm 830 */
 obj_t BgL_newzd2veczd2_1364;
BgL_newzd2veczd2_1364 = 
make_vector_uncollectable(BgL_newzd2lenzd2_1363, BgL_fillz00_74); 
{ /* Llib/object.scm 831 */

{ 
 long BgL_iz00_1366;
BgL_iz00_1366 = 0L; 
BgL_zc3z04anonymousza31541ze3z87_1367:
if(
(BgL_iz00_1366==BgL_oldzd2lenzd2_1362))
{ /* Llib/object.scm 833 */
return BgL_newzd2veczd2_1364;}  else 
{ /* Llib/object.scm 833 */
{ /* Llib/object.scm 836 */
 obj_t BgL_arg1543z00_1369;
{ /* Llib/object.scm 836 */
 obj_t BgL_vectorz00_3080;
if(
VECTORP(BgL_oldzd2veczd2_73))
{ /* Llib/object.scm 836 */
BgL_vectorz00_3080 = BgL_oldzd2veczd2_73; }  else 
{ 
 obj_t BgL_auxz00_8873;
BgL_auxz00_8873 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36303L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2veczd2_73); 
FAILURE(BgL_auxz00_8873,BFALSE,BFALSE);} 
BgL_arg1543z00_1369 = 
VECTOR_REF(BgL_vectorz00_3080,BgL_iz00_1366); } 
VECTOR_SET(BgL_newzd2veczd2_1364,BgL_iz00_1366,BgL_arg1543z00_1369); } 
{ 
 long BgL_iz00_8879;
BgL_iz00_8879 = 
(BgL_iz00_1366+1L); 
BgL_iz00_1366 = BgL_iz00_8879; 
goto BgL_zc3z04anonymousza31541ze3z87_1367;} } } } } } } } 

}



/* double-nb-classes! */
bool_t BGl_doublezd2nbzd2classesz12z12zz__objectz00(void)
{
{ /* Llib/object.scm 850 */
{ /* Llib/object.scm 851 */
 long BgL_za72za7_3088;
{ /* Llib/object.scm 851 */
 obj_t BgL_tmpz00_8881;
{ /* Llib/object.scm 851 */
 obj_t BgL_aux2894z00_5569;
BgL_aux2894z00_5569 = BGl_za2nbzd2classeszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux2894z00_5569))
{ /* Llib/object.scm 851 */
BgL_tmpz00_8881 = BgL_aux2894z00_5569
; }  else 
{ 
 obj_t BgL_auxz00_8884;
BgL_auxz00_8884 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(37023L), BGl_string3567z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2894z00_5569); 
FAILURE(BgL_auxz00_8884,BFALSE,BFALSE);} } 
BgL_za72za7_3088 = 
(long)CINT(BgL_tmpz00_8881); } 
BGl_za2nbzd2classeszd2maxza2z00zz__objectz00 = 
BINT(
(2L*BgL_za72za7_3088)); } 
{ /* Llib/object.scm 852 */
 obj_t BgL_oldzd2veczd2_3089;
BgL_oldzd2veczd2_3089 = BGl_za2classesza2z00zz__objectz00; 
{ /* Llib/object.scm 843 */
 obj_t BgL_newzd2veczd2_3090;
{ /* Llib/object.scm 843 */
 long BgL_arg1546z00_3091;
{ /* Llib/object.scm 843 */
 obj_t BgL_vectorz00_3092;
if(
VECTORP(BgL_oldzd2veczd2_3089))
{ /* Llib/object.scm 843 */
BgL_vectorz00_3092 = BgL_oldzd2veczd2_3089; }  else 
{ 
 obj_t BgL_auxz00_8893;
BgL_auxz00_8893 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36661L), BGl_string3567z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2veczd2_3089); 
FAILURE(BgL_auxz00_8893,BFALSE,BFALSE);} 
BgL_arg1546z00_3091 = 
VECTOR_LENGTH(BgL_vectorz00_3092); } 
BgL_newzd2veczd2_3090 = 
BGl_extendzd2vectorzd2zz__objectz00(BgL_oldzd2veczd2_3089, BFALSE, BgL_arg1546z00_3091); } 
{ /* Llib/object.scm 844 */
 obj_t BgL_tmpz00_8899;
if(
VECTORP(BgL_oldzd2veczd2_3089))
{ /* Llib/object.scm 844 */
BgL_tmpz00_8899 = BgL_oldzd2veczd2_3089
; }  else 
{ 
 obj_t BgL_auxz00_8902;
BgL_auxz00_8902 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36707L), BGl_string3567z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2veczd2_3089); 
FAILURE(BgL_auxz00_8902,BFALSE,BFALSE);} 
FREE_VECTOR_UNCOLLECTABLE(BgL_tmpz00_8899); } BUNSPEC; 
BGl_za2classesza2z00zz__objectz00 = BgL_newzd2veczd2_3090; } } 
{ 
 long BgL_iz00_1375;
BgL_iz00_1375 = 0L; 
BgL_zc3z04anonymousza31547ze3z87_1376:
{ /* Llib/object.scm 855 */
 bool_t BgL_test4624z00_8907;
{ /* Llib/object.scm 855 */
 long BgL_n2z00_3094;
{ /* Llib/object.scm 855 */
 obj_t BgL_tmpz00_8908;
{ /* Llib/object.scm 855 */
 obj_t BgL_aux2899z00_5574;
BgL_aux2899z00_5574 = BGl_za2nbzd2genericsza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2899z00_5574))
{ /* Llib/object.scm 855 */
BgL_tmpz00_8908 = BgL_aux2899z00_5574
; }  else 
{ 
 obj_t BgL_auxz00_8911;
BgL_auxz00_8911 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(37192L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2899z00_5574); 
FAILURE(BgL_auxz00_8911,BFALSE,BFALSE);} } 
BgL_n2z00_3094 = 
(long)CINT(BgL_tmpz00_8908); } 
BgL_test4624z00_8907 = 
(BgL_iz00_1375<BgL_n2z00_3094); } 
if(BgL_test4624z00_8907)
{ /* Llib/object.scm 856 */
 obj_t BgL_genz00_1378;
{ /* Llib/object.scm 856 */
 obj_t BgL_vectorz00_3095;
{ /* Llib/object.scm 856 */
 obj_t BgL_aux2900z00_5575;
BgL_aux2900z00_5575 = BGl_za2genericsza2z00zz__objectz00; 
if(
VECTORP(BgL_aux2900z00_5575))
{ /* Llib/object.scm 856 */
BgL_vectorz00_3095 = BgL_aux2900z00_5575; }  else 
{ 
 obj_t BgL_auxz00_8919;
BgL_auxz00_8919 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(37236L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2900z00_5575); 
FAILURE(BgL_auxz00_8919,BFALSE,BFALSE);} } 
BgL_genz00_1378 = 
VECTOR_REF(BgL_vectorz00_3095,BgL_iz00_1375); } 
{ /* Llib/object.scm 856 */
 obj_t BgL_defaultzd2bucketzd2_1379;
{ /* Llib/object.scm 857 */
 obj_t BgL_res2608z00_3097;
{ /* Llib/object.scm 918 */
 obj_t BgL_aux2904z00_5579;
{ /* Llib/object.scm 918 */
 obj_t BgL_tmpz00_8924;
if(
PROCEDUREP(BgL_genz00_1378))
{ /* Llib/object.scm 918 */
BgL_tmpz00_8924 = BgL_genz00_1378
; }  else 
{ 
 obj_t BgL_auxz00_8927;
BgL_auxz00_8927 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40183L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genz00_1378); 
FAILURE(BgL_auxz00_8927,BFALSE,BFALSE);} 
BgL_aux2904z00_5579 = 
PROCEDURE_REF(BgL_tmpz00_8924, 
(int)(2L)); } 
if(
VECTORP(BgL_aux2904z00_5579))
{ /* Llib/object.scm 918 */
BgL_res2608z00_3097 = BgL_aux2904z00_5579; }  else 
{ 
 obj_t BgL_auxz00_8935;
BgL_auxz00_8935 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40168L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2904z00_5579); 
FAILURE(BgL_auxz00_8935,BFALSE,BFALSE);} } 
BgL_defaultzd2bucketzd2_1379 = BgL_res2608z00_3097; } 
{ /* Llib/object.scm 857 */
 obj_t BgL_oldzd2methodzd2arrayz00_1380;
{ /* Llib/object.scm 858 */
 obj_t BgL_genericz00_3098;
if(
PROCEDUREP(BgL_genz00_1378))
{ /* Llib/object.scm 858 */
BgL_genericz00_3098 = BgL_genz00_1378; }  else 
{ 
 obj_t BgL_auxz00_8941;
BgL_auxz00_8941 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(37341L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genz00_1378); 
FAILURE(BgL_auxz00_8941,BFALSE,BFALSE);} 
BgL_oldzd2methodzd2arrayz00_1380 = 
PROCEDURE_REF(BgL_genericz00_3098, 
(int)(1L)); } 
{ /* Llib/object.scm 858 */

{ /* Llib/object.scm 861 */
 obj_t BgL_arg1549z00_1381;
{ /* Llib/object.scm 843 */
 obj_t BgL_newzd2veczd2_3099;
{ /* Llib/object.scm 843 */
 long BgL_arg1546z00_3100;
{ /* Llib/object.scm 843 */
 obj_t BgL_vectorz00_3101;
if(
VECTORP(BgL_oldzd2methodzd2arrayz00_1380))
{ /* Llib/object.scm 843 */
BgL_vectorz00_3101 = BgL_oldzd2methodzd2arrayz00_1380; }  else 
{ 
 obj_t BgL_auxz00_8949;
BgL_auxz00_8949 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36661L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2methodzd2arrayz00_1380); 
FAILURE(BgL_auxz00_8949,BFALSE,BFALSE);} 
BgL_arg1546z00_3100 = 
VECTOR_LENGTH(BgL_vectorz00_3101); } 
BgL_newzd2veczd2_3099 = 
BGl_extendzd2vectorzd2zz__objectz00(BgL_oldzd2methodzd2arrayz00_1380, BgL_defaultzd2bucketzd2_1379, BgL_arg1546z00_3100); } 
{ /* Llib/object.scm 844 */
 obj_t BgL_tmpz00_8955;
if(
VECTORP(BgL_oldzd2methodzd2arrayz00_1380))
{ /* Llib/object.scm 844 */
BgL_tmpz00_8955 = BgL_oldzd2methodzd2arrayz00_1380
; }  else 
{ 
 obj_t BgL_auxz00_8958;
BgL_auxz00_8958 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36707L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2methodzd2arrayz00_1380); 
FAILURE(BgL_auxz00_8958,BFALSE,BFALSE);} 
FREE_VECTOR_UNCOLLECTABLE(BgL_tmpz00_8955); } BUNSPEC; 
BgL_arg1549z00_1381 = BgL_newzd2veczd2_3099; } 
{ /* Llib/object.scm 859 */
 obj_t BgL_genericz00_3102;
if(
PROCEDUREP(BgL_genz00_1378))
{ /* Llib/object.scm 860 */
BgL_genericz00_3102 = BgL_genz00_1378; }  else 
{ 
 obj_t BgL_auxz00_8965;
BgL_auxz00_8965 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(37386L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genz00_1378); 
FAILURE(BgL_auxz00_8965,BFALSE,BFALSE);} 
PROCEDURE_SET(BgL_genericz00_3102, 
(int)(1L), BgL_arg1549z00_1381); } } 
{ 
 long BgL_iz00_8971;
BgL_iz00_8971 = 
(BgL_iz00_1375+1L); 
BgL_iz00_1375 = BgL_iz00_8971; 
goto BgL_zc3z04anonymousza31547ze3z87_1376;} } } } }  else 
{ /* Llib/object.scm 855 */
return ((bool_t)0);} } } } 

}



/* double-nb-generics! */
obj_t BGl_doublezd2nbzd2genericsz12z12zz__objectz00(void)
{
{ /* Llib/object.scm 867 */
{ /* Llib/object.scm 868 */
 long BgL_za72za7_3105;
{ /* Llib/object.scm 868 */
 obj_t BgL_tmpz00_8973;
{ /* Llib/object.scm 868 */
 obj_t BgL_aux2914z00_5589;
BgL_aux2914z00_5589 = BGl_za2nbzd2genericszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux2914z00_5589))
{ /* Llib/object.scm 868 */
BgL_tmpz00_8973 = BgL_aux2914z00_5589
; }  else 
{ 
 obj_t BgL_auxz00_8976;
BgL_auxz00_8976 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(37759L), BGl_string3568z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2914z00_5589); 
FAILURE(BgL_auxz00_8976,BFALSE,BFALSE);} } 
BgL_za72za7_3105 = 
(long)CINT(BgL_tmpz00_8973); } 
BGl_za2nbzd2genericszd2maxza2z00zz__objectz00 = 
BINT(
(2L*BgL_za72za7_3105)); } 
{ /* Llib/object.scm 869 */
 obj_t BgL_oldzd2veczd2_3106;
BgL_oldzd2veczd2_3106 = BGl_za2genericsza2z00zz__objectz00; 
{ /* Llib/object.scm 843 */
 obj_t BgL_newzd2veczd2_3107;
{ /* Llib/object.scm 843 */
 long BgL_arg1546z00_3108;
{ /* Llib/object.scm 843 */
 obj_t BgL_vectorz00_3109;
if(
VECTORP(BgL_oldzd2veczd2_3106))
{ /* Llib/object.scm 843 */
BgL_vectorz00_3109 = BgL_oldzd2veczd2_3106; }  else 
{ 
 obj_t BgL_auxz00_8985;
BgL_auxz00_8985 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36661L), BGl_string3568z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2veczd2_3106); 
FAILURE(BgL_auxz00_8985,BFALSE,BFALSE);} 
BgL_arg1546z00_3108 = 
VECTOR_LENGTH(BgL_vectorz00_3109); } 
BgL_newzd2veczd2_3107 = 
BGl_extendzd2vectorzd2zz__objectz00(BgL_oldzd2veczd2_3106, BFALSE, BgL_arg1546z00_3108); } 
{ /* Llib/object.scm 844 */
 obj_t BgL_tmpz00_8991;
if(
VECTORP(BgL_oldzd2veczd2_3106))
{ /* Llib/object.scm 844 */
BgL_tmpz00_8991 = BgL_oldzd2veczd2_3106
; }  else 
{ 
 obj_t BgL_auxz00_8994;
BgL_auxz00_8994 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(36707L), BGl_string3568z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2veczd2_3106); 
FAILURE(BgL_auxz00_8994,BFALSE,BFALSE);} 
FREE_VECTOR_UNCOLLECTABLE(BgL_tmpz00_8991); } BUNSPEC; 
return ( 
BGl_za2genericsza2z00zz__objectz00 = BgL_newzd2veczd2_3107, BUNSPEC) ;} } } 

}



/* object? */
BGL_EXPORTED_DEF bool_t BGl_objectzf3zf3zz__objectz00(obj_t BgL_objz00_78)
{
{ /* Llib/object.scm 874 */
return 
BGL_OBJECTP(BgL_objz00_78);} 

}



/* &object? */
obj_t BGl_z62objectzf3z91zz__objectz00(obj_t BgL_envz00_4824, obj_t BgL_objz00_4825)
{
{ /* Llib/object.scm 874 */
return 
BBOOL(
BGl_objectzf3zf3zz__objectz00(BgL_objz00_4825));} 

}



/* object-class-num */
BGL_EXPORTED_DEF long BGl_objectzd2classzd2numz00zz__objectz00(BgL_objectz00_bglt BgL_objz00_79)
{
{ /* Llib/object.scm 880 */
return 
BGL_OBJECT_CLASS_NUM(BgL_objz00_79);} 

}



/* &object-class-num */
obj_t BGl_z62objectzd2classzd2numz62zz__objectz00(obj_t BgL_envz00_4826, obj_t BgL_objz00_4827)
{
{ /* Llib/object.scm 880 */
{ /* Llib/object.scm 881 */
 long BgL_tmpz00_9003;
{ /* Llib/object.scm 881 */
 BgL_objectz00_bglt BgL_auxz00_9004;
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4827, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 881 */
BgL_auxz00_9004 = 
((BgL_objectz00_bglt)BgL_objz00_4827)
; }  else 
{ 
 obj_t BgL_auxz00_9008;
BgL_auxz00_9008 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(38375L), BGl_string3569z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4827); 
FAILURE(BgL_auxz00_9008,BFALSE,BFALSE);} 
BgL_tmpz00_9003 = 
BGl_objectzd2classzd2numz00zz__objectz00(BgL_auxz00_9004); } 
return 
BINT(BgL_tmpz00_9003);} } 

}



/* object-class-num-set! */
BGL_EXPORTED_DEF obj_t BGl_objectzd2classzd2numzd2setz12zc0zz__objectz00(BgL_objectz00_bglt BgL_objz00_80, long BgL_numz00_81)
{
{ /* Llib/object.scm 886 */
return 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_80, BgL_numz00_81);} 

}



/* &object-class-num-set! */
obj_t BGl_z62objectzd2classzd2numzd2setz12za2zz__objectz00(obj_t BgL_envz00_4828, obj_t BgL_objz00_4829, obj_t BgL_numz00_4830)
{
{ /* Llib/object.scm 886 */
{ /* Llib/object.scm 887 */
 long BgL_auxz00_9023; BgL_objectz00_bglt BgL_auxz00_9015;
{ /* Llib/object.scm 887 */
 obj_t BgL_tmpz00_9024;
if(
INTEGERP(BgL_numz00_4830))
{ /* Llib/object.scm 887 */
BgL_tmpz00_9024 = BgL_numz00_4830
; }  else 
{ 
 obj_t BgL_auxz00_9027;
BgL_auxz00_9027 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(38687L), BGl_string3571z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_numz00_4830); 
FAILURE(BgL_auxz00_9027,BFALSE,BFALSE);} 
BgL_auxz00_9023 = 
(long)CINT(BgL_tmpz00_9024); } 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4829, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 887 */
BgL_auxz00_9015 = 
((BgL_objectz00_bglt)BgL_objz00_4829)
; }  else 
{ 
 obj_t BgL_auxz00_9019;
BgL_auxz00_9019 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(38687L), BGl_string3571z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4829); 
FAILURE(BgL_auxz00_9019,BFALSE,BFALSE);} 
return 
BGl_objectzd2classzd2numzd2setz12zc0zz__objectz00(BgL_auxz00_9015, BgL_auxz00_9023);} } 

}



/* object-class */
BGL_EXPORTED_DEF obj_t BGl_objectzd2classzd2zz__objectz00(BgL_objectz00_bglt BgL_objectz00_82)
{
{ /* Llib/object.scm 892 */
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6432; long BgL_arg1554z00_6433;
BgL_arg1552z00_6432 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6434;
BgL_arg1555z00_6434 = 
BGL_OBJECT_CLASS_NUM(BgL_objectz00_82); 
BgL_arg1554z00_6433 = 
(BgL_arg1555z00_6434-OBJECT_TYPE); } 
return 
VECTOR_REF(BgL_arg1552z00_6432,BgL_arg1554z00_6433);} } 

}



/* &object-class */
obj_t BGl_z62objectzd2classzb0zz__objectz00(obj_t BgL_envz00_4831, obj_t BgL_objectz00_4832)
{
{ /* Llib/object.scm 892 */
{ /* Llib/object.scm 893 */
 BgL_objectz00_bglt BgL_auxz00_9037;
if(
BGl_isazf3zf3zz__objectz00(BgL_objectz00_4832, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 893 */
BgL_auxz00_9037 = 
((BgL_objectz00_bglt)BgL_objectz00_4832)
; }  else 
{ 
 obj_t BgL_auxz00_9041;
BgL_auxz00_9041 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39007L), BGl_string3572z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objectz00_4832); 
FAILURE(BgL_auxz00_9041,BFALSE,BFALSE);} 
return 
BGl_objectzd2classzd2zz__objectz00(BgL_auxz00_9037);} } 

}



/* generic-default */
BGL_EXPORTED_DEF obj_t BGl_genericzd2defaultzd2zz__objectz00(obj_t BgL_genericz00_83)
{
{ /* Llib/object.scm 899 */
{ /* Llib/object.scm 900 */
 obj_t BgL_aux2926z00_6435;
BgL_aux2926z00_6435 = 
PROCEDURE_REF(BgL_genericz00_83, 
(int)(0L)); 
if(
PROCEDUREP(BgL_aux2926z00_6435))
{ /* Llib/object.scm 900 */
return BgL_aux2926z00_6435;}  else 
{ 
 obj_t BgL_auxz00_9050;
BgL_auxz00_9050 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39357L), BGl_string3573z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2926z00_6435); 
FAILURE(BgL_auxz00_9050,BFALSE,BFALSE);} } } 

}



/* &generic-default */
obj_t BGl_z62genericzd2defaultzb0zz__objectz00(obj_t BgL_envz00_4833, obj_t BgL_genericz00_4834)
{
{ /* Llib/object.scm 899 */
{ /* Llib/object.scm 900 */
 obj_t BgL_auxz00_9054;
if(
PROCEDUREP(BgL_genericz00_4834))
{ /* Llib/object.scm 900 */
BgL_auxz00_9054 = BgL_genericz00_4834
; }  else 
{ 
 obj_t BgL_auxz00_9057;
BgL_auxz00_9057 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39357L), BGl_string3574z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4834); 
FAILURE(BgL_auxz00_9057,BFALSE,BFALSE);} 
return 
BGl_genericzd2defaultzd2zz__objectz00(BgL_auxz00_9054);} } 

}



/* generic-method-array */
BGL_EXPORTED_DEF obj_t BGl_genericzd2methodzd2arrayz00zz__objectz00(obj_t BgL_genericz00_86)
{
{ /* Llib/object.scm 908 */
return 
PROCEDURE_REF(BgL_genericz00_86, 
(int)(1L));} 

}



/* &generic-method-array */
obj_t BGl_z62genericzd2methodzd2arrayz62zz__objectz00(obj_t BgL_envz00_4835, obj_t BgL_genericz00_4836)
{
{ /* Llib/object.scm 908 */
{ /* Llib/object.scm 909 */
 obj_t BgL_auxz00_9064;
if(
PROCEDUREP(BgL_genericz00_4836))
{ /* Llib/object.scm 909 */
BgL_auxz00_9064 = BgL_genericz00_4836
; }  else 
{ 
 obj_t BgL_auxz00_9067;
BgL_auxz00_9067 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39750L), BGl_string3575z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4836); 
FAILURE(BgL_auxz00_9067,BFALSE,BFALSE);} 
return 
BGl_genericzd2methodzd2arrayz00zz__objectz00(BgL_auxz00_9064);} } 

}



/* method-array-ref */
BGL_EXPORTED_DEF obj_t BGl_methodzd2arrayzd2refz00zz__objectz00(obj_t BgL_genericz00_92, obj_t BgL_arrayz00_93, int BgL_offsetz00_94)
{
{ /* Llib/object.scm 930 */
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_6436;
BgL_offsetz00_6436 = 
(
(long)(BgL_offsetz00_94)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_6437;
BgL_modz00_6437 = 
(BgL_offsetz00_6436 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_6438;
BgL_restz00_6438 = 
(BgL_offsetz00_6436 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_6439;
BgL_bucketz00_6439 = 
VECTOR_REF(BgL_arrayz00_93,BgL_modz00_6437); 
{ /* Llib/object.scm 935 */
 obj_t BgL_vectorz00_6440;
if(
VECTORP(BgL_bucketz00_6439))
{ /* Llib/object.scm 935 */
BgL_vectorz00_6440 = BgL_bucketz00_6439; }  else 
{ 
 obj_t BgL_auxz00_9091;
BgL_auxz00_9091 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41128L), BGl_string3576z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_6439); 
FAILURE(BgL_auxz00_9091,BFALSE,BFALSE);} 
return 
VECTOR_REF(BgL_vectorz00_6440,BgL_restz00_6438);} } } } } } } 

}



/* &method-array-ref */
obj_t BGl_z62methodzd2arrayzd2refz62zz__objectz00(obj_t BgL_envz00_4837, obj_t BgL_genericz00_4838, obj_t BgL_arrayz00_4839, obj_t BgL_offsetz00_4840)
{
{ /* Llib/object.scm 930 */
{ /* Llib/object.scm 931 */
 int BgL_auxz00_9110; obj_t BgL_auxz00_9103; obj_t BgL_auxz00_9096;
{ /* Llib/object.scm 931 */
 obj_t BgL_tmpz00_9111;
if(
INTEGERP(BgL_offsetz00_4840))
{ /* Llib/object.scm 931 */
BgL_tmpz00_9111 = BgL_offsetz00_4840
; }  else 
{ 
 obj_t BgL_auxz00_9114;
BgL_auxz00_9114 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40903L), BGl_string3577z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_offsetz00_4840); 
FAILURE(BgL_auxz00_9114,BFALSE,BFALSE);} 
BgL_auxz00_9110 = 
CINT(BgL_tmpz00_9111); } 
if(
VECTORP(BgL_arrayz00_4839))
{ /* Llib/object.scm 931 */
BgL_auxz00_9103 = BgL_arrayz00_4839
; }  else 
{ 
 obj_t BgL_auxz00_9106;
BgL_auxz00_9106 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40903L), BGl_string3577z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arrayz00_4839); 
FAILURE(BgL_auxz00_9106,BFALSE,BFALSE);} 
if(
PROCEDUREP(BgL_genericz00_4838))
{ /* Llib/object.scm 931 */
BgL_auxz00_9096 = BgL_genericz00_4838
; }  else 
{ 
 obj_t BgL_auxz00_9099;
BgL_auxz00_9099 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40903L), BGl_string3577z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4838); 
FAILURE(BgL_auxz00_9099,BFALSE,BFALSE);} 
return 
BGl_methodzd2arrayzd2refz00zz__objectz00(BgL_auxz00_9096, BgL_auxz00_9103, BgL_auxz00_9110);} } 

}



/* method-array-set! */
obj_t BGl_methodzd2arrayzd2setz12z12zz__objectz00(obj_t BgL_genericz00_95, obj_t BgL_arrayz00_96, long BgL_offsetz00_97, obj_t BgL_methodz00_98)
{
{ /* Llib/object.scm 940 */
{ /* Llib/object.scm 941 */
 long BgL_offsetz00_1393;
BgL_offsetz00_1393 = 
(BgL_offsetz00_97-OBJECT_TYPE); 
{ /* Llib/object.scm 941 */
 long BgL_modz00_1394;
{ /* Llib/object.scm 944 */
 uint32_t BgL_arg1581z00_1414;
{ /* Llib/object.scm 944 */
 uint32_t BgL_arg1582z00_1415; uint32_t BgL_arg1584z00_1416;
BgL_arg1582z00_1415 = 
(uint32_t)(BgL_offsetz00_1393); 
{ /* Llib/object.scm 945 */
 int BgL_arg1586z00_1417;
BgL_arg1586z00_1417 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
{ /* Llib/object.scm 945 */
 long BgL_tmpz00_9127;
BgL_tmpz00_9127 = 
(long)(BgL_arg1586z00_1417); 
BgL_arg1584z00_1416 = 
(uint32_t)(BgL_tmpz00_9127); } } 
{ /* Llib/object.scm 943 */
 int32_t BgL_tmpz00_9130;
BgL_tmpz00_9130 = 
(int32_t)(BgL_arg1584z00_1416); 
BgL_arg1581z00_1414 = 
(BgL_arg1582z00_1415/BgL_tmpz00_9130); } } 
BgL_modz00_1394 = 
(long)(BgL_arg1581z00_1414); } 
{ /* Llib/object.scm 942 */
 long BgL_restz00_1395;
{ /* Llib/object.scm 948 */
 uint32_t BgL_arg1577z00_1410;
{ /* Llib/object.scm 948 */
 uint32_t BgL_arg1578z00_1411; uint32_t BgL_arg1579z00_1412;
BgL_arg1578z00_1411 = 
(uint32_t)(BgL_offsetz00_1393); 
{ /* Llib/object.scm 949 */
 int BgL_arg1580z00_1413;
BgL_arg1580z00_1413 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
{ /* Llib/object.scm 949 */
 long BgL_tmpz00_9140;
BgL_tmpz00_9140 = 
(long)(BgL_arg1580z00_1413); 
BgL_arg1579z00_1412 = 
(uint32_t)(BgL_tmpz00_9140); } } 
{ /* Llib/object.scm 947 */
 int32_t BgL_tmpz00_9143;
BgL_tmpz00_9143 = 
(int32_t)(BgL_arg1579z00_1412); 
BgL_arg1577z00_1410 = 
(BgL_arg1578z00_1411%BgL_tmpz00_9143); } } 
BgL_restz00_1395 = 
(long)(BgL_arg1577z00_1410); } 
{ /* Llib/object.scm 946 */

{ /* Llib/object.scm 950 */
 obj_t BgL_bucketz00_1396;
{ /* Llib/object.scm 950 */
 obj_t BgL_vectorz00_3162;
if(
VECTORP(BgL_arrayz00_96))
{ /* Llib/object.scm 950 */
BgL_vectorz00_3162 = BgL_arrayz00_96; }  else 
{ 
 obj_t BgL_auxz00_9149;
BgL_auxz00_9149 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41772L), BGl_string3578z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arrayz00_96); 
FAILURE(BgL_auxz00_9149,BFALSE,BFALSE);} 
BgL_bucketz00_1396 = 
VECTOR_REF(BgL_vectorz00_3162,BgL_modz00_1394); } 
{ /* Llib/object.scm 951 */
 bool_t BgL_test4648z00_9154;
{ /* Llib/object.scm 951 */
 bool_t BgL_test4649z00_9155;
{ /* Llib/object.scm 951 */
 obj_t BgL_tmpz00_9156;
{ /* Llib/object.scm 951 */
 obj_t BgL_res2617z00_3165;
{ /* Llib/object.scm 951 */
 obj_t BgL_genericz00_3164;
if(
PROCEDUREP(BgL_genericz00_95))
{ /* Llib/object.scm 951 */
BgL_genericz00_3164 = BgL_genericz00_95; }  else 
{ 
 obj_t BgL_auxz00_9159;
BgL_auxz00_9159 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41824L), BGl_string3578z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_95); 
FAILURE(BgL_auxz00_9159,BFALSE,BFALSE);} 
{ /* Llib/object.scm 900 */
 obj_t BgL_aux2943z00_5624;
BgL_aux2943z00_5624 = 
PROCEDURE_REF(BgL_genericz00_3164, 
(int)(0L)); 
if(
PROCEDUREP(BgL_aux2943z00_5624))
{ /* Llib/object.scm 900 */
BgL_res2617z00_3165 = BgL_aux2943z00_5624; }  else 
{ 
 obj_t BgL_auxz00_9167;
BgL_auxz00_9167 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39357L), BGl_string3578z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux2943z00_5624); 
FAILURE(BgL_auxz00_9167,BFALSE,BFALSE);} } } 
BgL_tmpz00_9156 = BgL_res2617z00_3165; } 
BgL_test4649z00_9155 = 
(BgL_methodz00_98==BgL_tmpz00_9156); } 
if(BgL_test4649z00_9155)
{ /* Llib/object.scm 951 */
BgL_test4648z00_9154 = ((bool_t)1)
; }  else 
{ /* Llib/object.scm 952 */
 bool_t BgL_test4652z00_9172;
{ /* Llib/object.scm 952 */
 obj_t BgL_tmpz00_9173;
{ /* Llib/object.scm 952 */
 obj_t BgL_res2618z00_3166;
{ /* Llib/object.scm 918 */
 obj_t BgL_aux2947z00_5628;
{ /* Llib/object.scm 918 */
 obj_t BgL_tmpz00_9174;
if(
PROCEDUREP(BgL_genericz00_95))
{ /* Llib/object.scm 918 */
BgL_tmpz00_9174 = BgL_genericz00_95
; }  else 
{ 
 obj_t BgL_auxz00_9177;
BgL_auxz00_9177 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40183L), BGl_string3578z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_95); 
FAILURE(BgL_auxz00_9177,BFALSE,BFALSE);} 
BgL_aux2947z00_5628 = 
PROCEDURE_REF(BgL_tmpz00_9174, 
(int)(2L)); } 
if(
VECTORP(BgL_aux2947z00_5628))
{ /* Llib/object.scm 918 */
BgL_res2618z00_3166 = BgL_aux2947z00_5628; }  else 
{ 
 obj_t BgL_auxz00_9185;
BgL_auxz00_9185 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40168L), BGl_string3578z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2947z00_5628); 
FAILURE(BgL_auxz00_9185,BFALSE,BFALSE);} } 
BgL_tmpz00_9173 = BgL_res2618z00_3166; } 
BgL_test4652z00_9172 = 
(BgL_bucketz00_1396==BgL_tmpz00_9173); } 
if(BgL_test4652z00_9172)
{ /* Llib/object.scm 952 */
BgL_test4648z00_9154 = ((bool_t)0)
; }  else 
{ /* Llib/object.scm 952 */
BgL_test4648z00_9154 = ((bool_t)1)
; } } } 
if(BgL_test4648z00_9154)
{ /* Llib/object.scm 954 */
 obj_t BgL_vectorz00_3167;
if(
VECTORP(BgL_bucketz00_1396))
{ /* Llib/object.scm 954 */
BgL_vectorz00_3167 = BgL_bucketz00_1396; }  else 
{ 
 obj_t BgL_auxz00_9192;
BgL_auxz00_9192 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41954L), BGl_string3578z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_1396); 
FAILURE(BgL_auxz00_9192,BFALSE,BFALSE);} 
return 
VECTOR_SET(BgL_vectorz00_3167,BgL_restz00_1395,BgL_methodz00_98);}  else 
{ /* Llib/object.scm 956 */
 obj_t BgL_bucketz00_1404;
{ /* Llib/object.scm 956 */
 int BgL_arg1573z00_1405;
BgL_arg1573z00_1405 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
{ /* Llib/object.scm 956 */
 obj_t BgL_auxz00_9202;
if(
VECTORP(BgL_bucketz00_1396))
{ /* Llib/object.scm 956 */
BgL_auxz00_9202 = BgL_bucketz00_1396
; }  else 
{ 
 obj_t BgL_auxz00_9205;
BgL_auxz00_9205 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(42047L), BGl_string3578z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_1396); 
FAILURE(BgL_auxz00_9205,BFALSE,BFALSE);} 
BgL_bucketz00_1404 = 
BGl_copyzd2vectorzd2zz__r4_vectors_6_8z00(BgL_auxz00_9202, 
(long)(BgL_arg1573z00_1405)); } } 
VECTOR_SET(BgL_bucketz00_1404,BgL_restz00_1395,BgL_methodz00_98); 
{ /* Llib/object.scm 958 */
 obj_t BgL_vectorz00_3175;
if(
VECTORP(BgL_arrayz00_96))
{ /* Llib/object.scm 958 */
BgL_vectorz00_3175 = BgL_arrayz00_96; }  else 
{ 
 obj_t BgL_auxz00_9214;
BgL_auxz00_9214 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(42142L), BGl_string3578z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arrayz00_96); 
FAILURE(BgL_auxz00_9214,BFALSE,BFALSE);} 
return 
VECTOR_SET(BgL_vectorz00_3175,BgL_modz00_1394,BgL_bucketz00_1404);} } } } } } } } } 

}



/* generic-memory-statistics */
BGL_EXPORTED_DEF obj_t BGl_genericzd2memoryzd2statisticsz00zz__objectz00(void)
{
{ /* Llib/object.scm 963 */
{ /* Llib/object.scm 965 */
 obj_t BgL_top4659z00_9220;
BgL_top4659z00_9220 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top4659z00_9220, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 965 */
 obj_t BgL_tmp4658z00_9219;
{ 
 long BgL_gz00_1419; long BgL_siza7eza7_1420;
BgL_gz00_1419 = 0L; 
BgL_siza7eza7_1420 = 0L; 
BgL_zc3z04anonymousza31587ze3z87_1421:
{ /* Llib/object.scm 968 */
 bool_t BgL_test4660z00_9224;
{ /* Llib/object.scm 968 */
 long BgL_n2z00_3178;
{ /* Llib/object.scm 968 */
 obj_t BgL_tmpz00_9225;
{ /* Llib/object.scm 968 */
 obj_t BgL_aux2955z00_5636;
BgL_aux2955z00_5636 = BGl_za2nbzd2genericsza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2955z00_5636))
{ /* Llib/object.scm 968 */
BgL_tmpz00_9225 = BgL_aux2955z00_5636
; }  else 
{ 
 obj_t BgL_auxz00_9228;
BgL_auxz00_9228 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(42579L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2955z00_5636); 
FAILURE(BgL_auxz00_9228,BFALSE,BFALSE);} } 
BgL_n2z00_3178 = 
(long)CINT(BgL_tmpz00_9225); } 
BgL_test4660z00_9224 = 
(BgL_gz00_1419==BgL_n2z00_3178); } 
if(BgL_test4660z00_9224)
{ /* Llib/object.scm 969 */
 obj_t BgL_arg1592z00_1423; obj_t BgL_arg1593z00_1424;
{ /* Llib/object.scm 969 */
 obj_t BgL_arg1595z00_1425;
BgL_arg1595z00_1425 = 
MAKE_YOUNG_PAIR(BGl_za2nbzd2genericsza2zd2zz__objectz00, BNIL); 
BgL_arg1592z00_1423 = 
MAKE_YOUNG_PAIR(BGl_symbol3579z00zz__objectz00, BgL_arg1595z00_1425); } 
{ /* Llib/object.scm 970 */
 obj_t BgL_arg1596z00_1426; obj_t BgL_arg1597z00_1427;
{ /* Llib/object.scm 970 */
 obj_t BgL_arg1598z00_1428;
BgL_arg1598z00_1428 = 
MAKE_YOUNG_PAIR(BGl_za2nbzd2classesza2zd2zz__objectz00, BNIL); 
BgL_arg1596z00_1426 = 
MAKE_YOUNG_PAIR(BGl_symbol3581z00zz__objectz00, BgL_arg1598z00_1428); } 
{ /* Llib/object.scm 971 */
 obj_t BgL_arg1599z00_1429; obj_t BgL_arg1600z00_1430;
{ /* Llib/object.scm 971 */
 obj_t BgL_arg1602z00_1431;
BgL_arg1602z00_1431 = 
MAKE_YOUNG_PAIR(
BINT(BgL_siza7eza7_1420), BNIL); 
BgL_arg1599z00_1429 = 
MAKE_YOUNG_PAIR(BGl_symbol3582z00zz__objectz00, BgL_arg1602z00_1431); } 
{ /* Llib/object.scm 974 */
 obj_t BgL_arg1603z00_1432; obj_t BgL_arg1604z00_1433;
{ /* Llib/object.scm 974 */
 obj_t BgL_arg1605z00_1434;
{ /* Llib/object.scm 974 */
 long BgL_arg1608z00_1435;
{ /* Llib/object.scm 974 */
 obj_t BgL_arg1609z00_1436;
{ /* Llib/object.scm 974 */
 obj_t BgL_arg1610z00_1437;
{ /* Llib/object.scm 974 */
 obj_t BgL_vectorz00_3179;
{ /* Llib/object.scm 974 */
 obj_t BgL_aux2956z00_5637;
BgL_aux2956z00_5637 = BGl_za2genericsza2z00zz__objectz00; 
if(
VECTORP(BgL_aux2956z00_5637))
{ /* Llib/object.scm 974 */
BgL_vectorz00_3179 = BgL_aux2956z00_5637; }  else 
{ 
 obj_t BgL_auxz00_9243;
BgL_auxz00_9243 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(42781L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2956z00_5637); 
FAILURE(BgL_auxz00_9243,BFALSE,BFALSE);} } 
BgL_arg1610z00_1437 = 
VECTOR_REF(BgL_vectorz00_3179,0L); } 
{ /* Llib/object.scm 973 */
 obj_t BgL_genericz00_3180;
if(
PROCEDUREP(BgL_arg1610z00_1437))
{ /* Llib/object.scm 974 */
BgL_genericz00_3180 = BgL_arg1610z00_1437; }  else 
{ 
 obj_t BgL_auxz00_9250;
BgL_auxz00_9250 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(42793L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_arg1610z00_1437); 
FAILURE(BgL_auxz00_9250,BFALSE,BFALSE);} 
BgL_arg1609z00_1436 = 
PROCEDURE_REF(BgL_genericz00_3180, 
(int)(1L)); } } 
{ /* Llib/object.scm 972 */
 obj_t BgL_vectorz00_3181;
if(
VECTORP(BgL_arg1609z00_1436))
{ /* Llib/object.scm 974 */
BgL_vectorz00_3181 = BgL_arg1609z00_1436; }  else 
{ 
 obj_t BgL_auxz00_9258;
BgL_auxz00_9258 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(42794L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arg1609z00_1436); 
FAILURE(BgL_auxz00_9258,BFALSE,BFALSE);} 
BgL_arg1608z00_1435 = 
VECTOR_LENGTH(BgL_vectorz00_3181); } } 
BgL_arg1605z00_1434 = 
MAKE_YOUNG_PAIR(
BINT(BgL_arg1608z00_1435), BNIL); } 
BgL_arg1603z00_1432 = 
MAKE_YOUNG_PAIR(BGl_symbol3584z00zz__objectz00, BgL_arg1605z00_1434); } 
{ /* Llib/object.scm 975 */
 obj_t BgL_arg1612z00_1438; obj_t BgL_arg1613z00_1439;
{ /* Llib/object.scm 975 */
 obj_t BgL_arg1614z00_1440;
{ /* Llib/object.scm 975 */
 int BgL_arg1615z00_1441;
BgL_arg1615z00_1441 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
BgL_arg1614z00_1440 = 
MAKE_YOUNG_PAIR(
BINT(BgL_arg1615z00_1441), BNIL); } 
BgL_arg1612z00_1438 = 
MAKE_YOUNG_PAIR(BGl_symbol3586z00zz__objectz00, BgL_arg1614z00_1440); } 
{ /* Llib/object.scm 976 */
 obj_t BgL_arg1616z00_1442; obj_t BgL_arg1617z00_1443;
{ /* Llib/object.scm 976 */
 obj_t BgL_arg1619z00_1444;
BgL_arg1619z00_1444 = 
MAKE_YOUNG_PAIR(BGl_za2nbzd2classeszd2maxza2z00zz__objectz00, BNIL); 
BgL_arg1616z00_1442 = 
MAKE_YOUNG_PAIR(BGl_symbol3588z00zz__objectz00, BgL_arg1619z00_1444); } 
{ /* Llib/object.scm 977 */
 obj_t BgL_arg1620z00_1445;
{ /* Llib/object.scm 977 */
 obj_t BgL_arg1621z00_1446;
BgL_arg1621z00_1446 = 
MAKE_YOUNG_PAIR(BGl_za2nbzd2genericszd2maxza2z00zz__objectz00, BNIL); 
BgL_arg1620z00_1445 = 
MAKE_YOUNG_PAIR(BGl_symbol3590z00zz__objectz00, BgL_arg1621z00_1446); } 
BgL_arg1617z00_1443 = 
MAKE_YOUNG_PAIR(BgL_arg1620z00_1445, BNIL); } 
BgL_arg1613z00_1439 = 
MAKE_YOUNG_PAIR(BgL_arg1616z00_1442, BgL_arg1617z00_1443); } 
BgL_arg1604z00_1433 = 
MAKE_YOUNG_PAIR(BgL_arg1612z00_1438, BgL_arg1613z00_1439); } 
BgL_arg1600z00_1430 = 
MAKE_YOUNG_PAIR(BgL_arg1603z00_1432, BgL_arg1604z00_1433); } 
BgL_arg1597z00_1427 = 
MAKE_YOUNG_PAIR(BgL_arg1599z00_1429, BgL_arg1600z00_1430); } 
BgL_arg1593z00_1424 = 
MAKE_YOUNG_PAIR(BgL_arg1596z00_1426, BgL_arg1597z00_1427); } 
BgL_tmp4658z00_9219 = 
MAKE_YOUNG_PAIR(BgL_arg1592z00_1423, BgL_arg1593z00_1424); }  else 
{ /* Llib/object.scm 978 */
 obj_t BgL_genz00_1447;
{ /* Llib/object.scm 978 */
 obj_t BgL_vectorz00_3186;
{ /* Llib/object.scm 978 */
 obj_t BgL_aux2962z00_5643;
BgL_aux2962z00_5643 = BGl_za2genericsza2z00zz__objectz00; 
if(
VECTORP(BgL_aux2962z00_5643))
{ /* Llib/object.scm 978 */
BgL_vectorz00_3186 = BgL_aux2962z00_5643; }  else 
{ 
 obj_t BgL_auxz00_9287;
BgL_auxz00_9287 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(42971L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2962z00_5643); 
FAILURE(BgL_auxz00_9287,BFALSE,BFALSE);} } 
BgL_genz00_1447 = 
VECTOR_REF(BgL_vectorz00_3186,BgL_gz00_1419); } 
{ /* Llib/object.scm 978 */
 obj_t BgL_dbuckz00_1448;
{ /* Llib/object.scm 979 */
 obj_t BgL_res2623z00_3188;
{ /* Llib/object.scm 918 */
 obj_t BgL_aux2966z00_5647;
{ /* Llib/object.scm 918 */
 obj_t BgL_tmpz00_9292;
if(
PROCEDUREP(BgL_genz00_1447))
{ /* Llib/object.scm 918 */
BgL_tmpz00_9292 = BgL_genz00_1447
; }  else 
{ 
 obj_t BgL_auxz00_9295;
BgL_auxz00_9295 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40183L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genz00_1447); 
FAILURE(BgL_auxz00_9295,BFALSE,BFALSE);} 
BgL_aux2966z00_5647 = 
PROCEDURE_REF(BgL_tmpz00_9292, 
(int)(2L)); } 
if(
VECTORP(BgL_aux2966z00_5647))
{ /* Llib/object.scm 918 */
BgL_res2623z00_3188 = BgL_aux2966z00_5647; }  else 
{ 
 obj_t BgL_auxz00_9303;
BgL_auxz00_9303 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40168L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2966z00_5647); 
FAILURE(BgL_auxz00_9303,BFALSE,BFALSE);} } 
BgL_dbuckz00_1448 = BgL_res2623z00_3188; } 
{ /* Llib/object.scm 979 */
 long BgL_dza7za7_1449;
BgL_dza7za7_1449 = 0L; 
{ /* Llib/object.scm 980 */
 obj_t BgL_sza7za7_1450;
{ /* Llib/object.scm 981 */
 obj_t BgL_runner1637z00_1475;
{ /* Llib/object.scm 981 */
 obj_t BgL_l1320z00_1458;
{ /* Llib/object.scm 988 */
 obj_t BgL_arg1636z00_1474;
{ /* Llib/object.scm 988 */
 obj_t BgL_genericz00_3189;
if(
PROCEDUREP(BgL_genz00_1447))
{ /* Llib/object.scm 988 */
BgL_genericz00_3189 = BgL_genz00_1447; }  else 
{ 
 obj_t BgL_auxz00_9309;
BgL_auxz00_9309 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43271L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genz00_1447); 
FAILURE(BgL_auxz00_9309,BFALSE,BFALSE);} 
BgL_arg1636z00_1474 = 
PROCEDURE_REF(BgL_genericz00_3189, 
(int)(1L)); } 
{ /* Llib/object.scm 988 */
 obj_t BgL_auxz00_9315;
if(
VECTORP(BgL_arg1636z00_1474))
{ /* Llib/object.scm 988 */
BgL_auxz00_9315 = BgL_arg1636z00_1474
; }  else 
{ 
 obj_t BgL_auxz00_9318;
BgL_auxz00_9318 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43274L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arg1636z00_1474); 
FAILURE(BgL_auxz00_9318,BFALSE,BFALSE);} 
BgL_l1320z00_1458 = 
BGl_vectorzd2ze3listz31zz__r4_vectors_6_8z00(BgL_auxz00_9315); } } 
if(
NULLP(BgL_l1320z00_1458))
{ /* Llib/object.scm 981 */
BgL_runner1637z00_1475 = BNIL; }  else 
{ /* Llib/object.scm 981 */
 obj_t BgL_head1322z00_1460;
BgL_head1322z00_1460 = 
MAKE_YOUNG_PAIR(BNIL, BNIL); 
{ 
 obj_t BgL_l1320z00_1462; obj_t BgL_tail1323z00_1463;
BgL_l1320z00_1462 = BgL_l1320z00_1458; 
BgL_tail1323z00_1463 = BgL_head1322z00_1460; 
BgL_zc3z04anonymousza31629ze3z87_1464:
if(
PAIRP(BgL_l1320z00_1462))
{ /* Llib/object.scm 981 */
 obj_t BgL_newtail1324z00_1466;
{ /* Llib/object.scm 981 */
 long BgL_arg1632z00_1468;
{ /* Llib/object.scm 981 */
 obj_t BgL_bz00_1469;
BgL_bz00_1469 = 
CAR(BgL_l1320z00_1462); 
if(
(BgL_bz00_1469==BgL_dbuckz00_1448))
{ /* Llib/object.scm 983 */
{ /* Llib/object.scm 984 */
 long BgL_arg1633z00_1470;
{ /* Llib/object.scm 984 */
 obj_t BgL_vectorz00_3191;
if(
VECTORP(BgL_bz00_1469))
{ /* Llib/object.scm 984 */
BgL_vectorz00_3191 = BgL_bz00_1469; }  else 
{ 
 obj_t BgL_auxz00_9333;
BgL_auxz00_9333 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43153L), BGl_string3592z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bz00_1469); 
FAILURE(BgL_auxz00_9333,BFALSE,BFALSE);} 
BgL_arg1633z00_1470 = 
VECTOR_LENGTH(BgL_vectorz00_3191); } 
BgL_dza7za7_1449 = 
(BgL_arg1633z00_1470*4L); } 
BgL_arg1632z00_1468 = 0L; }  else 
{ /* Llib/object.scm 987 */
 long BgL_arg1634z00_1471;
{ /* Llib/object.scm 987 */
 obj_t BgL_vectorz00_3193;
if(
VECTORP(BgL_bz00_1469))
{ /* Llib/object.scm 987 */
BgL_vectorz00_3193 = BgL_bz00_1469; }  else 
{ 
 obj_t BgL_auxz00_9341;
BgL_auxz00_9341 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43220L), BGl_string3592z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bz00_1469); 
FAILURE(BgL_auxz00_9341,BFALSE,BFALSE);} 
BgL_arg1634z00_1471 = 
VECTOR_LENGTH(BgL_vectorz00_3193); } 
BgL_arg1632z00_1468 = 
(4L*BgL_arg1634z00_1471); } } 
BgL_newtail1324z00_1466 = 
MAKE_YOUNG_PAIR(
BINT(BgL_arg1632z00_1468), BNIL); } 
SET_CDR(BgL_tail1323z00_1463, BgL_newtail1324z00_1466); 
{ 
 obj_t BgL_tail1323z00_9352; obj_t BgL_l1320z00_9350;
BgL_l1320z00_9350 = 
CDR(BgL_l1320z00_1462); 
BgL_tail1323z00_9352 = BgL_newtail1324z00_1466; 
BgL_tail1323z00_1463 = BgL_tail1323z00_9352; 
BgL_l1320z00_1462 = BgL_l1320z00_9350; 
goto BgL_zc3z04anonymousza31629ze3z87_1464;} }  else 
{ /* Llib/object.scm 981 */
if(
NULLP(BgL_l1320z00_1462))
{ /* Llib/object.scm 981 */
BgL_runner1637z00_1475 = 
CDR(BgL_head1322z00_1460); }  else 
{ /* Llib/object.scm 981 */
BgL_runner1637z00_1475 = 
BGl_bigloozd2typezd2errorzf2locationzf2zz__errorz00(BGl_string3593z00zz__objectz00, BGl_string3594z00zz__objectz00, BgL_l1320z00_1462, BGl_string3483z00zz__objectz00, 
BINT(43061L)); } } } } } 
BgL_sza7za7_1450 = 
BGl_zb2zb2zz__r4_numbers_6_5z00(BgL_runner1637z00_1475); } 
{ /* Llib/object.scm 981 */
 long BgL_bza7za7_1451;
{ /* Llib/object.scm 989 */
 long BgL_arg1626z00_1456;
{ /* Llib/object.scm 989 */
 obj_t BgL_arg1627z00_1457;
{ /* Llib/object.scm 989 */
 obj_t BgL_genericz00_3198;
if(
PROCEDUREP(BgL_genz00_1447))
{ /* Llib/object.scm 989 */
BgL_genericz00_3198 = BgL_genz00_1447; }  else 
{ 
 obj_t BgL_auxz00_9361;
BgL_auxz00_9361 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43334L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genz00_1447); 
FAILURE(BgL_auxz00_9361,BFALSE,BFALSE);} 
BgL_arg1627z00_1457 = 
PROCEDURE_REF(BgL_genericz00_3198, 
(int)(1L)); } 
{ /* Llib/object.scm 989 */
 obj_t BgL_vectorz00_3199;
if(
VECTORP(BgL_arg1627z00_1457))
{ /* Llib/object.scm 989 */
BgL_vectorz00_3199 = BgL_arg1627z00_1457; }  else 
{ 
 obj_t BgL_auxz00_9369;
BgL_auxz00_9369 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43337L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arg1627z00_1457); 
FAILURE(BgL_auxz00_9369,BFALSE,BFALSE);} 
BgL_arg1626z00_1456 = 
VECTOR_LENGTH(BgL_vectorz00_3199); } } 
BgL_bza7za7_1451 = 
(4L*BgL_arg1626z00_1456); } 
{ /* Llib/object.scm 989 */

{ /* Llib/object.scm 990 */
 long BgL_arg1622z00_1452; long BgL_arg1623z00_1453;
BgL_arg1622z00_1452 = 
(BgL_gz00_1419+1L); 
{ /* Llib/object.scm 991 */
 long BgL_arg1624z00_1454;
{ /* Llib/object.scm 991 */
 long BgL_za72za7_3205;
{ /* Llib/object.scm 991 */
 obj_t BgL_tmpz00_9376;
if(
INTEGERP(BgL_sza7za7_1450))
{ /* Llib/object.scm 991 */
BgL_tmpz00_9376 = BgL_sza7za7_1450
; }  else 
{ 
 obj_t BgL_auxz00_9379;
BgL_auxz00_9379 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43393L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_sza7za7_1450); 
FAILURE(BgL_auxz00_9379,BFALSE,BFALSE);} 
BgL_za72za7_3205 = 
(long)CINT(BgL_tmpz00_9376); } 
BgL_arg1624z00_1454 = 
(
(BgL_bza7za7_1451+BgL_dza7za7_1449)+BgL_za72za7_3205); } 
BgL_arg1623z00_1453 = 
(BgL_siza7eza7_1420+BgL_arg1624z00_1454); } 
{ 
 long BgL_siza7eza7_9388; long BgL_gz00_9387;
BgL_gz00_9387 = BgL_arg1622z00_1452; 
BgL_siza7eza7_9388 = BgL_arg1623z00_1453; 
BgL_siza7eza7_1420 = BgL_siza7eza7_9388; 
BgL_gz00_1419 = BgL_gz00_9387; 
goto BgL_zc3z04anonymousza31587ze3z87_1421;} } } } } } } } } } 
BGL_EXITD_POP_PROTECT(BgL_top4659z00_9220); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); 
return BgL_tmp4658z00_9219;} } } 

}



/* &generic-memory-statistics */
obj_t BGl_z62genericzd2memoryzd2statisticsz62zz__objectz00(obj_t BgL_envz00_4841)
{
{ /* Llib/object.scm 963 */
return 
BGl_genericzd2memoryzd2statisticsz00zz__objectz00();} 

}



/* generics-add-class! */
bool_t BGl_genericszd2addzd2classz12z12zz__objectz00(long BgL_classzd2idxzd2_99, long BgL_superzd2idxzd2_100)
{
{ /* Llib/object.scm 998 */
{ 
 long BgL_gz00_1478;
BgL_gz00_1478 = 0L; 
BgL_zc3z04anonymousza31638ze3z87_1479:
{ /* Llib/object.scm 1000 */
 bool_t BgL_test4680z00_9392;
{ /* Llib/object.scm 1000 */
 long BgL_n2z00_3209;
{ /* Llib/object.scm 1000 */
 obj_t BgL_tmpz00_9393;
{ /* Llib/object.scm 1000 */
 obj_t BgL_aux2981z00_5662;
BgL_aux2981z00_5662 = BGl_za2nbzd2genericsza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2981z00_5662))
{ /* Llib/object.scm 1000 */
BgL_tmpz00_9393 = BgL_aux2981z00_5662
; }  else 
{ 
 obj_t BgL_auxz00_9396;
BgL_auxz00_9396 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43868L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2981z00_5662); 
FAILURE(BgL_auxz00_9396,BFALSE,BFALSE);} } 
BgL_n2z00_3209 = 
(long)CINT(BgL_tmpz00_9393); } 
BgL_test4680z00_9392 = 
(BgL_gz00_1478<BgL_n2z00_3209); } 
if(BgL_test4680z00_9392)
{ /* Llib/object.scm 1001 */
 obj_t BgL_genz00_1481;
{ /* Llib/object.scm 1001 */
 obj_t BgL_vectorz00_3210;
{ /* Llib/object.scm 1001 */
 obj_t BgL_aux2982z00_5663;
BgL_aux2982z00_5663 = BGl_za2genericsza2z00zz__objectz00; 
if(
VECTORP(BgL_aux2982z00_5663))
{ /* Llib/object.scm 1001 */
BgL_vectorz00_3210 = BgL_aux2982z00_5663; }  else 
{ 
 obj_t BgL_auxz00_9404;
BgL_auxz00_9404 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43912L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux2982z00_5663); 
FAILURE(BgL_auxz00_9404,BFALSE,BFALSE);} } 
BgL_genz00_1481 = 
VECTOR_REF(BgL_vectorz00_3210,BgL_gz00_1478); } 
{ /* Llib/object.scm 1001 */
 obj_t BgL_methodzd2arrayzd2_1482;
{ /* Llib/object.scm 1002 */
 obj_t BgL_genericz00_3212;
if(
PROCEDUREP(BgL_genz00_1481))
{ /* Llib/object.scm 1002 */
BgL_genericz00_3212 = BgL_genz00_1481; }  else 
{ 
 obj_t BgL_auxz00_9411;
BgL_auxz00_9411 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(43965L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genz00_1481); 
FAILURE(BgL_auxz00_9411,BFALSE,BFALSE);} 
BgL_methodzd2arrayzd2_1482 = 
PROCEDURE_REF(BgL_genericz00_3212, 
(int)(1L)); } 
{ /* Llib/object.scm 1002 */
 obj_t BgL_methodz00_1483;
{ /* Llib/object.scm 1003 */
 obj_t BgL_arrayz00_3214; int BgL_offsetz00_3215;
if(
VECTORP(BgL_methodzd2arrayzd2_1482))
{ /* Llib/object.scm 1003 */
BgL_arrayz00_3214 = BgL_methodzd2arrayzd2_1482; }  else 
{ 
 obj_t BgL_auxz00_9419;
BgL_auxz00_9419 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44003L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_methodzd2arrayzd2_1482); 
FAILURE(BgL_auxz00_9419,BFALSE,BFALSE);} 
BgL_offsetz00_3215 = 
(int)(BgL_superzd2idxzd2_100); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_3216;
BgL_offsetz00_3216 = 
(
(long)(BgL_offsetz00_3215)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_3217;
BgL_modz00_3217 = 
(BgL_offsetz00_3216 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_3219;
BgL_restz00_3219 = 
(BgL_offsetz00_3216 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_3221;
BgL_bucketz00_3221 = 
VECTOR_REF(BgL_arrayz00_3214,BgL_modz00_3217); 
{ /* Llib/object.scm 935 */
 obj_t BgL_vectorz00_3238;
if(
VECTORP(BgL_bucketz00_3221))
{ /* Llib/object.scm 935 */
BgL_vectorz00_3238 = BgL_bucketz00_3221; }  else 
{ 
 obj_t BgL_auxz00_9443;
BgL_auxz00_9443 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41128L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_3221); 
FAILURE(BgL_auxz00_9443,BFALSE,BFALSE);} 
BgL_methodz00_1483 = 
VECTOR_REF(BgL_vectorz00_3238,BgL_restz00_3219); } } } } } } } 
{ /* Llib/object.scm 1003 */

BGl_methodzd2arrayzd2setz12z12zz__objectz00(BgL_genz00_1481, BgL_methodzd2arrayzd2_1482, BgL_classzd2idxzd2_99, BgL_methodz00_1483); 
{ 
 long BgL_gz00_9449;
BgL_gz00_9449 = 
(BgL_gz00_1478+1L); 
BgL_gz00_1478 = BgL_gz00_9449; 
goto BgL_zc3z04anonymousza31638ze3z87_1479;} } } } }  else 
{ /* Llib/object.scm 1000 */
return ((bool_t)0);} } } } 

}



/* register-class! */
BGL_EXPORTED_DEF obj_t BGl_registerzd2classz12zc0zz__objectz00(obj_t BgL_namez00_101, obj_t BgL_modulez00_102, obj_t BgL_superz00_103, long BgL_hashz00_104, obj_t BgL_creatorz00_105, obj_t BgL_allocatorz00_106, obj_t BgL_constructorz00_107, obj_t BgL_nilz00_108, obj_t BgL_shrinkz00_109, obj_t BgL_plainz00_110, obj_t BgL_virtualz00_111)
{
{ /* Llib/object.scm 1010 */
{ 

{ /* Llib/object.scm 1075 */
 obj_t BgL_top4687z00_9452;
BgL_top4687z00_9452 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top4687z00_9452, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1075 */
 obj_t BgL_tmp4686z00_9451;
BGl_initializa7ezd2objectsz12z67zz__objectz00(); 
{ /* Llib/object.scm 1077 */
 bool_t BgL_test4688z00_9457;
if(
CBOOL(BgL_superz00_103))
{ /* Llib/object.scm 1077 */
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1077 */
BgL_test4688z00_9457 = ((bool_t)0)
; }  else 
{ /* Llib/object.scm 1077 */
BgL_test4688z00_9457 = ((bool_t)1)
; } }  else 
{ /* Llib/object.scm 1077 */
BgL_test4688z00_9457 = ((bool_t)0)
; } 
if(BgL_test4688z00_9457)
{ /* Llib/object.scm 1077 */
BGl_errorz00zz__errorz00(BgL_namez00_101, BGl_string3597z00zz__objectz00, BgL_superz00_103); }  else 
{ /* Llib/object.scm 1077 */BFALSE; } } 
if(
VECTORP(BgL_plainz00_110))
{ /* Llib/object.scm 1079 */BFALSE; }  else 
{ /* Llib/object.scm 1079 */
BGl_errorz00zz__errorz00(BGl_string3598z00zz__objectz00, BGl_string3599z00zz__objectz00, BgL_plainz00_110); } 
{ /* Llib/object.scm 1081 */
 obj_t BgL_kz00_1491;
BgL_kz00_1491 = 
BGl_classzd2existszd2zz__objectz00(BgL_namez00_101); 
if(
BGL_CLASSP(BgL_kz00_1491))
{ /* Llib/object.scm 1085 */
 bool_t BgL_test4693z00_9469;
{ /* Llib/object.scm 1085 */
 long BgL_arg1665z00_1506;
{ /* Llib/object.scm 1085 */
 obj_t BgL_classz00_3281;
if(
BGL_CLASSP(BgL_kz00_1491))
{ /* Llib/object.scm 1085 */
BgL_classz00_3281 = BgL_kz00_1491; }  else 
{ 
 obj_t BgL_auxz00_9472;
BgL_auxz00_9472 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46901L), BGl_string3598z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_kz00_1491); 
FAILURE(BgL_auxz00_9472,BFALSE,BFALSE);} 
BgL_arg1665z00_1506 = 
BGL_CLASS_HASH(BgL_classz00_3281); } 
BgL_test4693z00_9469 = 
(BgL_arg1665z00_1506==BgL_hashz00_104); } 
if(BgL_test4693z00_9469)
{ /* Llib/object.scm 1085 */
if(
BGL_CLASSP(BgL_kz00_1491))
{ /* Llib/object.scm 1086 */
BgL_tmp4686z00_9451 = BgL_kz00_1491; }  else 
{ 
 obj_t BgL_auxz00_9480;
BgL_auxz00_9480 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46916L), BGl_string3598z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_kz00_1491); 
FAILURE(BgL_auxz00_9480,BFALSE,BFALSE);} }  else 
{ /* Llib/object.scm 1085 */
{ /* Llib/object.scm 1090 */
 obj_t BgL_arg1649z00_1495;
{ /* Llib/object.scm 1090 */
 obj_t BgL_classz00_3284;
if(
BGL_CLASSP(BgL_kz00_1491))
{ /* Llib/object.scm 1090 */
BgL_classz00_3284 = BgL_kz00_1491; }  else 
{ 
 obj_t BgL_auxz00_9486;
BgL_auxz00_9486 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47048L), BGl_string3598z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_kz00_1491); 
FAILURE(BgL_auxz00_9486,BFALSE,BFALSE);} 
BgL_arg1649z00_1495 = 
BGL_CLASS_MODULE(BgL_classz00_3284); } 
{ /* Llib/object.scm 1088 */
 obj_t BgL_list1650z00_1496;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1651z00_1497;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1652z00_1498;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1653z00_1499;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1655z00_1500;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1658z00_1501;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1659z00_1502;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1660z00_1503;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1662z00_1504;
{ /* Llib/object.scm 1088 */
 obj_t BgL_arg1664z00_1505;
BgL_arg1664z00_1505 = 
MAKE_YOUNG_PAIR(BGl_string3600z00zz__objectz00, BNIL); 
BgL_arg1662z00_1504 = 
MAKE_YOUNG_PAIR(BgL_arg1649z00_1495, BgL_arg1664z00_1505); } 
BgL_arg1660z00_1503 = 
MAKE_YOUNG_PAIR(BGl_string3601z00zz__objectz00, BgL_arg1662z00_1504); } 
BgL_arg1659z00_1502 = 
MAKE_YOUNG_PAIR(BgL_namez00_101, BgL_arg1660z00_1503); } 
BgL_arg1658z00_1501 = 
MAKE_YOUNG_PAIR(BGl_string3602z00zz__objectz00, BgL_arg1659z00_1502); } 
BgL_arg1655z00_1500 = 
MAKE_YOUNG_PAIR(BgL_modulez00_102, BgL_arg1658z00_1501); } 
BgL_arg1653z00_1499 = 
MAKE_YOUNG_PAIR(BGl_string3601z00zz__objectz00, BgL_arg1655z00_1500); } 
BgL_arg1652z00_1498 = 
MAKE_YOUNG_PAIR(BgL_namez00_101, BgL_arg1653z00_1499); } 
BgL_arg1651z00_1497 = 
MAKE_YOUNG_PAIR(BGl_string3603z00zz__objectz00, BgL_arg1652z00_1498); } 
BgL_list1650z00_1496 = 
MAKE_YOUNG_PAIR(BGl_string3598z00zz__objectz00, BgL_arg1651z00_1497); } 
BGl_warningz00zz__errorz00(BgL_list1650z00_1496); } } 
BgL_zc3z04anonymousza31666ze3z87_1507:
{ /* Llib/object.scm 1013 */
 bool_t BgL_test4697z00_9502;
{ /* Llib/object.scm 1013 */
 long BgL_n1z00_3241; long BgL_n2z00_3242;
{ /* Llib/object.scm 1013 */
 obj_t BgL_tmpz00_9503;
{ /* Llib/object.scm 1013 */
 obj_t BgL_aux2990z00_5671;
BgL_aux2990z00_5671 = BGl_za2nbzd2classesza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2990z00_5671))
{ /* Llib/object.scm 1013 */
BgL_tmpz00_9503 = BgL_aux2990z00_5671
; }  else 
{ 
 obj_t BgL_auxz00_9506;
BgL_auxz00_9506 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44486L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2990z00_5671); 
FAILURE(BgL_auxz00_9506,BFALSE,BFALSE);} } 
BgL_n1z00_3241 = 
(long)CINT(BgL_tmpz00_9503); } 
{ /* Llib/object.scm 1013 */
 obj_t BgL_tmpz00_9511;
{ /* Llib/object.scm 1013 */
 obj_t BgL_aux2991z00_5672;
BgL_aux2991z00_5672 = BGl_za2nbzd2classeszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux2991z00_5672))
{ /* Llib/object.scm 1013 */
BgL_tmpz00_9511 = BgL_aux2991z00_5672
; }  else 
{ 
 obj_t BgL_auxz00_9514;
BgL_auxz00_9514 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44499L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2991z00_5672); 
FAILURE(BgL_auxz00_9514,BFALSE,BFALSE);} } 
BgL_n2z00_3242 = 
(long)CINT(BgL_tmpz00_9511); } 
BgL_test4697z00_9502 = 
(BgL_n1z00_3241==BgL_n2z00_3242); } 
if(BgL_test4697z00_9502)
{ /* Llib/object.scm 1013 */
BGl_doublezd2nbzd2classesz12z12zz__objectz00(); }  else 
{ /* Llib/object.scm 1013 */((bool_t)0); } } 
{ /* Llib/object.scm 1015 */
 long BgL_numz00_1509;
{ /* Llib/object.scm 1015 */
 long BgL_za72za7_3244;
{ /* Llib/object.scm 1015 */
 obj_t BgL_tmpz00_9521;
{ /* Llib/object.scm 1015 */
 obj_t BgL_aux2992z00_5673;
BgL_aux2992z00_5673 = BGl_za2nbzd2classesza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2992z00_5673))
{ /* Llib/object.scm 1015 */
BgL_tmpz00_9521 = BgL_aux2992z00_5673
; }  else 
{ 
 obj_t BgL_auxz00_9524;
BgL_auxz00_9524 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44586L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2992z00_5673); 
FAILURE(BgL_auxz00_9524,BFALSE,BFALSE);} } 
BgL_za72za7_3244 = 
(long)CINT(BgL_tmpz00_9521); } 
BgL_numz00_1509 = 
(OBJECT_TYPE+BgL_za72za7_3244); } 
{ /* Llib/object.scm 1015 */
 long BgL_depthz00_1510;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1017 */
 long BgL_arg1705z00_1541;
{ /* Llib/object.scm 673 */
 obj_t BgL_tmpz00_9532;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 673 */
BgL_tmpz00_9532 = BgL_superz00_103
; }  else 
{ 
 obj_t BgL_auxz00_9535;
BgL_auxz00_9535 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(28814L), BGl_string3595z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_103); 
FAILURE(BgL_auxz00_9535,BFALSE,BFALSE);} 
BgL_arg1705z00_1541 = 
BGL_CLASS_DEPTH(BgL_tmpz00_9532); } 
BgL_depthz00_1510 = 
(BgL_arg1705z00_1541+1L); }  else 
{ /* Llib/object.scm 1016 */
BgL_depthz00_1510 = 0L; } 
{ /* Llib/object.scm 1016 */
 obj_t BgL_fsz00_1511;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1020 */
 obj_t BgL_arg1702z00_1538;
{ /* Llib/object.scm 1020 */
 obj_t BgL_classz00_3246;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1020 */
BgL_classz00_3246 = BgL_superz00_103; }  else 
{ 
 obj_t BgL_auxz00_9545;
BgL_auxz00_9545 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44740L), BGl_string3595z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_103); 
FAILURE(BgL_auxz00_9545,BFALSE,BFALSE);} 
BgL_arg1702z00_1538 = 
BGL_CLASS_ALL_FIELDS(BgL_classz00_3246); } 
{ /* Llib/object.scm 1020 */
 obj_t BgL_list1703z00_1539;
BgL_list1703z00_1539 = 
MAKE_YOUNG_PAIR(BgL_plainz00_110, BNIL); 
BgL_fsz00_1511 = 
BGl_vectorzd2appendzd2zz__r4_vectors_6_8z00(BgL_arg1702z00_1538, BgL_list1703z00_1539); } }  else 
{ /* Llib/object.scm 1019 */
BgL_fsz00_1511 = BgL_plainz00_110; } 
{ /* Llib/object.scm 1019 */
 obj_t BgL_vsz00_1512;
BgL_vsz00_1512 = 
BGl_makezd2classzd2virtualzd2slotszd2vectorz00zz__objectz00(BgL_superz00_103, BgL_virtualz00_111); 
{ /* Llib/object.scm 1022 */
 obj_t BgL_classz00_1513;
{ /* Llib/object.scm 1023 */
 long BgL_inheritancezd2numzd2_3250; obj_t BgL_allocz00_3252; obj_t BgL_fdz00_3254; obj_t BgL_allfdz00_3255;
{ /* Llib/object.scm 1024 */
 obj_t BgL_tmpz00_9553;
{ /* Llib/object.scm 1024 */
 obj_t BgL_aux2997z00_5678;
BgL_aux2997z00_5678 = BGl_za2inheritancezd2cntza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux2997z00_5678))
{ /* Llib/object.scm 1024 */
BgL_tmpz00_9553 = BgL_aux2997z00_5678
; }  else 
{ 
 obj_t BgL_auxz00_9556;
BgL_auxz00_9556 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44878L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux2997z00_5678); 
FAILURE(BgL_auxz00_9556,BFALSE,BFALSE);} } 
BgL_inheritancezd2numzd2_3250 = 
(long)CINT(BgL_tmpz00_9553); } 
if(
PROCEDUREP(BgL_allocatorz00_106))
{ /* Llib/object.scm 1027 */
BgL_allocz00_3252 = BgL_allocatorz00_106; }  else 
{ 
 obj_t BgL_auxz00_9563;
BgL_auxz00_9563 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44933L), BGl_string3595z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_allocatorz00_106); 
FAILURE(BgL_auxz00_9563,BFALSE,BFALSE);} 
if(
VECTORP(BgL_plainz00_110))
{ /* Llib/object.scm 1029 */
BgL_fdz00_3254 = BgL_plainz00_110; }  else 
{ 
 obj_t BgL_auxz00_9569;
BgL_auxz00_9569 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44966L), BGl_string3595z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_plainz00_110); 
FAILURE(BgL_auxz00_9569,BFALSE,BFALSE);} 
if(
VECTORP(BgL_fsz00_1511))
{ /* Llib/object.scm 1030 */
BgL_allfdz00_3255 = BgL_fsz00_1511; }  else 
{ 
 obj_t BgL_auxz00_9575;
BgL_auxz00_9575 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44981L), BGl_string3595z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_fsz00_1511); 
FAILURE(BgL_auxz00_9575,BFALSE,BFALSE);} 
BgL_classz00_1513 = 
bgl_make_class(BgL_namez00_101, BgL_modulez00_102, BgL_numz00_1509, BgL_inheritancezd2numzd2_3250, BgL_superz00_103, BNIL, BgL_allocz00_3252, BgL_hashz00_104, BgL_fdz00_3254, BgL_allfdz00_3255, BgL_constructorz00_107, BgL_vsz00_1512, BgL_creatorz00_105, BgL_nilz00_108, BgL_shrinkz00_109, BgL_depthz00_1510, BFALSE); } 
{ /* Llib/object.scm 1023 */

if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1042 */
 obj_t BgL_arg1671z00_1515;
{ /* Llib/object.scm 1042 */
 obj_t BgL_arg1672z00_1516;
{ /* Llib/object.scm 1042 */
 obj_t BgL_classz00_3259;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1042 */
BgL_classz00_3259 = BgL_superz00_103; }  else 
{ 
 obj_t BgL_auxz00_9584;
BgL_auxz00_9584 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45284L), BGl_string3595z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_103); 
FAILURE(BgL_auxz00_9584,BFALSE,BFALSE);} 
BgL_arg1672z00_1516 = 
BGL_CLASS_SUBCLASSES(BgL_classz00_3259); } 
BgL_arg1671z00_1515 = 
MAKE_YOUNG_PAIR(BgL_classz00_1513, BgL_arg1672z00_1516); } 
{ /* Llib/object.scm 703 */
 obj_t BgL_tmpz00_9590;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 703 */
BgL_tmpz00_9590 = BgL_superz00_103
; }  else 
{ 
 obj_t BgL_auxz00_9593;
BgL_auxz00_9593 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30338L), BGl_string3595z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_103); 
FAILURE(BgL_auxz00_9593,BFALSE,BFALSE);} 
BGL_CLASS_SUBCLASSES_SET(BgL_tmpz00_9590, BgL_arg1671z00_1515); } }  else 
{ /* Llib/object.scm 1039 */BFALSE; } 
{ /* Llib/object.scm 1044 */
 obj_t BgL_vectorz00_3260; long BgL_kz00_3261;
{ /* Llib/object.scm 1044 */
 obj_t BgL_aux3008z00_5689;
BgL_aux3008z00_5689 = BGl_za2classesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3008z00_5689))
{ /* Llib/object.scm 1044 */
BgL_vectorz00_3260 = BgL_aux3008z00_5689; }  else 
{ 
 obj_t BgL_auxz00_9600;
BgL_auxz00_9600 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45378L), BGl_string3595z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3008z00_5689); 
FAILURE(BgL_auxz00_9600,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1044 */
 obj_t BgL_tmpz00_9604;
{ /* Llib/object.scm 1044 */
 obj_t BgL_aux3010z00_5691;
BgL_aux3010z00_5691 = BGl_za2nbzd2classesza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux3010z00_5691))
{ /* Llib/object.scm 1044 */
BgL_tmpz00_9604 = BgL_aux3010z00_5691
; }  else 
{ 
 obj_t BgL_auxz00_9607;
BgL_auxz00_9607 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45388L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3010z00_5691); 
FAILURE(BgL_auxz00_9607,BFALSE,BFALSE);} } 
BgL_kz00_3261 = 
(long)CINT(BgL_tmpz00_9604); } 
{ /* Llib/object.scm 1044 */
 bool_t BgL_test4714z00_9612;
{ /* Llib/object.scm 1044 */
 long BgL_tmpz00_9613;
BgL_tmpz00_9613 = 
VECTOR_LENGTH(BgL_vectorz00_3260); 
BgL_test4714z00_9612 = 
BOUND_CHECK(BgL_kz00_3261, BgL_tmpz00_9613); } 
if(BgL_test4714z00_9612)
{ /* Llib/object.scm 1044 */
VECTOR_SET(BgL_vectorz00_3260,BgL_kz00_3261,BgL_classz00_1513); }  else 
{ 
 obj_t BgL_auxz00_9617;
BgL_auxz00_9617 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45365L), BGl_string3596z00zz__objectz00, BgL_vectorz00_3260, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_3260)), 
(int)(BgL_kz00_3261)); 
FAILURE(BgL_auxz00_9617,BFALSE,BFALSE);} } } 
{ 
 obj_t BgL_tmpz00_9624;
{ /* Llib/object.scm 1046 */
 obj_t BgL_aux3011z00_5692;
BgL_aux3011z00_5692 = BGl_za2nbzd2classesza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux3011z00_5692))
{ /* Llib/object.scm 1046 */
BgL_tmpz00_9624 = BgL_aux3011z00_5692
; }  else 
{ 
 obj_t BgL_auxz00_9627;
BgL_auxz00_9627 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45476L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3011z00_5692); 
FAILURE(BgL_auxz00_9627,BFALSE,BFALSE);} } 
BGl_za2nbzd2classesza2zd2zz__objectz00 = 
ADDFX(BgL_tmpz00_9624, 
BINT(1L)); } 
{ /* Llib/object.scm 1051 */
 bool_t BgL_test4716z00_9633;
{ /* Llib/object.scm 1051 */
 long BgL_n2z00_3264;
{ /* Llib/object.scm 1051 */
 obj_t BgL_tmpz00_9634;
{ /* Llib/object.scm 1051 */
 obj_t BgL_aux3012z00_5693;
BgL_aux3012z00_5693 = BGl_za2inheritancezd2maxzd2depthza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux3012z00_5693))
{ /* Llib/object.scm 1051 */
BgL_tmpz00_9634 = BgL_aux3012z00_5693
; }  else 
{ 
 obj_t BgL_auxz00_9637;
BgL_auxz00_9637 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45671L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3012z00_5693); 
FAILURE(BgL_auxz00_9637,BFALSE,BFALSE);} } 
BgL_n2z00_3264 = 
(long)CINT(BgL_tmpz00_9634); } 
BgL_test4716z00_9633 = 
(BgL_depthz00_1510>BgL_n2z00_3264); } 
if(BgL_test4716z00_9633)
{ /* Llib/object.scm 1051 */
BGl_za2inheritancezd2maxzd2depthza2z00zz__objectz00 = 
BINT(BgL_depthz00_1510); }  else 
{ /* Llib/object.scm 1051 */BFALSE; } } 
{ /* Llib/object.scm 1053 */
 long BgL_idxz00_1518;
{ /* Llib/object.scm 1053 */
 long BgL_za71za7_3265;
{ /* Llib/object.scm 1053 */
 obj_t BgL_tmpz00_9644;
{ /* Llib/object.scm 1053 */
 obj_t BgL_aux3013z00_5694;
BgL_aux3013z00_5694 = BGl_za2inheritancezd2cntza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux3013z00_5694))
{ /* Llib/object.scm 1053 */
BgL_tmpz00_9644 = BgL_aux3013z00_5694
; }  else 
{ 
 obj_t BgL_auxz00_9647;
BgL_auxz00_9647 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45758L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3013z00_5694); 
FAILURE(BgL_auxz00_9647,BFALSE,BFALSE);} } 
BgL_za71za7_3265 = 
(long)CINT(BgL_tmpz00_9644); } 
BgL_idxz00_1518 = 
(BgL_za71za7_3265+BgL_depthz00_1510); } 
{ /* Llib/object.scm 1055 */
 bool_t BgL_test4719z00_9653;
{ /* Llib/object.scm 1055 */
 long BgL_arg1687z00_1525;
{ /* Llib/object.scm 1055 */
 obj_t BgL_vectorz00_3267;
{ /* Llib/object.scm 1055 */
 obj_t BgL_aux3014z00_5695;
BgL_aux3014z00_5695 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3014z00_5695))
{ /* Llib/object.scm 1055 */
BgL_vectorz00_3267 = BgL_aux3014z00_5695; }  else 
{ 
 obj_t BgL_auxz00_9656;
BgL_auxz00_9656 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45863L), BGl_string3595z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3014z00_5695); 
FAILURE(BgL_auxz00_9656,BFALSE,BFALSE);} } 
BgL_arg1687z00_1525 = 
VECTOR_LENGTH(BgL_vectorz00_3267); } 
BgL_test4719z00_9653 = 
(BgL_idxz00_1518>=BgL_arg1687z00_1525); } 
if(BgL_test4719z00_9653)
{ /* Llib/object.scm 1056 */
 obj_t BgL_ovecz00_1521;
BgL_ovecz00_1521 = BGl_za2inheritancesza2z00zz__objectz00; 
{ /* Llib/object.scm 1056 */
 obj_t BgL_nvecz00_1522;
{ /* Llib/object.scm 1058 */
 long BgL_arg1681z00_1523;
{ /* Llib/object.scm 1058 */
 long BgL_arg1683z00_1524;
{ /* Llib/object.scm 1058 */
 obj_t BgL_vectorz00_3270;
if(
VECTORP(BgL_ovecz00_1521))
{ /* Llib/object.scm 1058 */
BgL_vectorz00_3270 = BgL_ovecz00_1521; }  else 
{ 
 obj_t BgL_auxz00_9664;
BgL_auxz00_9664 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45975L), BGl_string3595z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_ovecz00_1521); 
FAILURE(BgL_auxz00_9664,BFALSE,BFALSE);} 
BgL_arg1683z00_1524 = 
VECTOR_LENGTH(BgL_vectorz00_3270); } 
{ /* Llib/object.scm 1058 */
 long BgL_za72za7_3272;
{ /* Llib/object.scm 1059 */
 obj_t BgL_tmpz00_9669;
{ /* Llib/object.scm 1059 */
 obj_t BgL_aux3018z00_5699;
BgL_aux3018z00_5699 = BGl_za2inheritancezd2maxzd2depthza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux3018z00_5699))
{ /* Llib/object.scm 1059 */
BgL_tmpz00_9669 = BgL_aux3018z00_5699
; }  else 
{ 
 obj_t BgL_auxz00_9672;
BgL_auxz00_9672 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(45991L), BGl_string3595z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3018z00_5699); 
FAILURE(BgL_auxz00_9672,BFALSE,BFALSE);} } 
BgL_za72za7_3272 = 
(long)CINT(BgL_tmpz00_9669); } 
BgL_arg1681z00_1523 = 
(BgL_arg1683z00_1524+BgL_za72za7_3272); } } 
BgL_nvecz00_1522 = 
BGl_extendzd2vectorzd2zz__objectz00(BgL_ovecz00_1521, BFALSE, BgL_arg1681z00_1523); } 
{ /* Llib/object.scm 1057 */

BGl_za2inheritancesza2z00zz__objectz00 = BgL_nvecz00_1522; 
{ /* Llib/object.scm 1061 */
 obj_t BgL_tmpz00_9679;
if(
VECTORP(BgL_ovecz00_1521))
{ /* Llib/object.scm 1061 */
BgL_tmpz00_9679 = BgL_ovecz00_1521
; }  else 
{ 
 obj_t BgL_auxz00_9682;
BgL_auxz00_9682 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46090L), BGl_string3595z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_ovecz00_1521); 
FAILURE(BgL_auxz00_9682,BFALSE,BFALSE);} 
FREE_VECTOR_UNCOLLECTABLE(BgL_tmpz00_9679); } BUNSPEC; } } }  else 
{ /* Llib/object.scm 1055 */BFALSE; } } 
{ 
 long BgL_iz00_1527; obj_t BgL_jz00_1528;
BgL_iz00_1527 = 0L; 
BgL_jz00_1528 = BGl_za2inheritancezd2cntza2zd2zz__objectz00; 
BgL_zc3z04anonymousza31688ze3z87_1529:
if(
(BgL_iz00_1527<=BgL_depthz00_1510))
{ /* Llib/object.scm 1065 */
{ /* Llib/object.scm 1068 */
 obj_t BgL_arg1690z00_1531;
BgL_arg1690z00_1531 = 
BGL_CLASS_ANCESTORS_REF(BgL_classz00_1513, BgL_iz00_1527); 
{ /* Llib/object.scm 1067 */
 obj_t BgL_vectorz00_3276; long BgL_kz00_3277;
{ /* Llib/object.scm 1067 */
 obj_t BgL_aux3021z00_5702;
BgL_aux3021z00_5702 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3021z00_5702))
{ /* Llib/object.scm 1067 */
BgL_vectorz00_3276 = BgL_aux3021z00_5702; }  else 
{ 
 obj_t BgL_auxz00_9692;
BgL_auxz00_9692 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46260L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3021z00_5702); 
FAILURE(BgL_auxz00_9692,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1067 */
 obj_t BgL_tmpz00_9696;
if(
INTEGERP(BgL_jz00_1528))
{ /* Llib/object.scm 1067 */
BgL_tmpz00_9696 = BgL_jz00_1528
; }  else 
{ 
 obj_t BgL_auxz00_9699;
BgL_auxz00_9699 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46275L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_jz00_1528); 
FAILURE(BgL_auxz00_9699,BFALSE,BFALSE);} 
BgL_kz00_3277 = 
(long)CINT(BgL_tmpz00_9696); } 
{ /* Llib/object.scm 1067 */
 bool_t BgL_test4727z00_9704;
{ /* Llib/object.scm 1067 */
 long BgL_tmpz00_9705;
BgL_tmpz00_9705 = 
VECTOR_LENGTH(BgL_vectorz00_3276); 
BgL_test4727z00_9704 = 
BOUND_CHECK(BgL_kz00_3277, BgL_tmpz00_9705); } 
if(BgL_test4727z00_9704)
{ /* Llib/object.scm 1067 */
VECTOR_SET(BgL_vectorz00_3276,BgL_kz00_3277,BgL_arg1690z00_1531); }  else 
{ 
 obj_t BgL_auxz00_9709;
BgL_auxz00_9709 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46247L), BGl_string3596z00zz__objectz00, BgL_vectorz00_3276, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_3276)), 
(int)(BgL_kz00_3277)); 
FAILURE(BgL_auxz00_9709,BFALSE,BFALSE);} } } } 
{ /* Llib/object.scm 1069 */
 long BgL_arg1691z00_1532; long BgL_arg1692z00_1533;
BgL_arg1691z00_1532 = 
(BgL_iz00_1527+1L); 
{ /* Llib/object.scm 1069 */
 long BgL_za71za7_3279;
{ /* Llib/object.scm 1069 */
 obj_t BgL_tmpz00_9717;
if(
INTEGERP(BgL_jz00_1528))
{ /* Llib/object.scm 1069 */
BgL_tmpz00_9717 = BgL_jz00_1528
; }  else 
{ 
 obj_t BgL_auxz00_9720;
BgL_auxz00_9720 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46342L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_jz00_1528); 
FAILURE(BgL_auxz00_9720,BFALSE,BFALSE);} 
BgL_za71za7_3279 = 
(long)CINT(BgL_tmpz00_9717); } 
BgL_arg1692z00_1533 = 
(BgL_za71za7_3279+1L); } 
{ 
 obj_t BgL_jz00_9727; long BgL_iz00_9726;
BgL_iz00_9726 = BgL_arg1691z00_1532; 
BgL_jz00_9727 = 
BINT(BgL_arg1692z00_1533); 
BgL_jz00_1528 = BgL_jz00_9727; 
BgL_iz00_1527 = BgL_iz00_9726; 
goto BgL_zc3z04anonymousza31688ze3z87_1529;} } }  else 
{ /* Llib/object.scm 1065 */
BGl_za2inheritancezd2cntza2zd2zz__objectz00 = BgL_jz00_1528; } } } 
{ /* Llib/object.scm 1072 */
 long BgL_arg1697z00_1535;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1072 */
 obj_t BgL_classz00_3280;
if(
BGL_CLASSP(BgL_superz00_103))
{ /* Llib/object.scm 1072 */
BgL_classz00_3280 = BgL_superz00_103; }  else 
{ 
 obj_t BgL_auxz00_9733;
BgL_auxz00_9733 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(46511L), BGl_string3595z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_103); 
FAILURE(BgL_auxz00_9733,BFALSE,BFALSE);} 
BgL_arg1697z00_1535 = 
BGL_CLASS_INDEX(BgL_classz00_3280); }  else 
{ /* Llib/object.scm 1072 */
BgL_arg1697z00_1535 = BgL_numz00_1509; } 
BGl_genericszd2addzd2classz12z12zz__objectz00(BgL_numz00_1509, BgL_arg1697z00_1535); } 
BgL_tmp4686z00_9451 = BgL_classz00_1513; } } } } } } } }  else 
{ /* Llib/object.scm 1083 */
goto BgL_zc3z04anonymousza31666ze3z87_1507;} } 
BGL_EXITD_POP_PROTECT(BgL_top4687z00_9452); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); 
return BgL_tmp4686z00_9451;} } } } 

}



/* &register-class! */
obj_t BGl_z62registerzd2classz12za2zz__objectz00(obj_t BgL_envz00_4842, obj_t BgL_namez00_4843, obj_t BgL_modulez00_4844, obj_t BgL_superz00_4845, obj_t BgL_hashz00_4846, obj_t BgL_creatorz00_4847, obj_t BgL_allocatorz00_4848, obj_t BgL_constructorz00_4849, obj_t BgL_nilz00_4850, obj_t BgL_shrinkz00_4851, obj_t BgL_plainz00_4852, obj_t BgL_virtualz00_4853)
{
{ /* Llib/object.scm 1010 */
{ /* Llib/object.scm 1013 */
 obj_t BgL_auxz00_9771; obj_t BgL_auxz00_9764; long BgL_auxz00_9755; obj_t BgL_auxz00_9748; obj_t BgL_auxz00_9741;
if(
VECTORP(BgL_virtualz00_4853))
{ /* Llib/object.scm 1013 */
BgL_auxz00_9771 = BgL_virtualz00_4853
; }  else 
{ 
 obj_t BgL_auxz00_9774;
BgL_auxz00_9774 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44475L), BGl_string3604z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_virtualz00_4853); 
FAILURE(BgL_auxz00_9774,BFALSE,BFALSE);} 
if(
PROCEDUREP(BgL_nilz00_4850))
{ /* Llib/object.scm 1013 */
BgL_auxz00_9764 = BgL_nilz00_4850
; }  else 
{ 
 obj_t BgL_auxz00_9767;
BgL_auxz00_9767 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44475L), BGl_string3604z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_nilz00_4850); 
FAILURE(BgL_auxz00_9767,BFALSE,BFALSE);} 
{ /* Llib/object.scm 1013 */
 obj_t BgL_tmpz00_9756;
if(
INTEGERP(BgL_hashz00_4846))
{ /* Llib/object.scm 1013 */
BgL_tmpz00_9756 = BgL_hashz00_4846
; }  else 
{ 
 obj_t BgL_auxz00_9759;
BgL_auxz00_9759 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44475L), BGl_string3604z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_hashz00_4846); 
FAILURE(BgL_auxz00_9759,BFALSE,BFALSE);} 
BgL_auxz00_9755 = 
(long)CINT(BgL_tmpz00_9756); } 
if(
SYMBOLP(BgL_modulez00_4844))
{ /* Llib/object.scm 1013 */
BgL_auxz00_9748 = BgL_modulez00_4844
; }  else 
{ 
 obj_t BgL_auxz00_9751;
BgL_auxz00_9751 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44475L), BGl_string3604z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_modulez00_4844); 
FAILURE(BgL_auxz00_9751,BFALSE,BFALSE);} 
if(
SYMBOLP(BgL_namez00_4843))
{ /* Llib/object.scm 1013 */
BgL_auxz00_9741 = BgL_namez00_4843
; }  else 
{ 
 obj_t BgL_auxz00_9744;
BgL_auxz00_9744 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(44475L), BGl_string3604z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_namez00_4843); 
FAILURE(BgL_auxz00_9744,BFALSE,BFALSE);} 
return 
BGl_registerzd2classz12zc0zz__objectz00(BgL_auxz00_9741, BgL_auxz00_9748, BgL_superz00_4845, BgL_auxz00_9755, BgL_creatorz00_4847, BgL_allocatorz00_4848, BgL_constructorz00_4849, BgL_auxz00_9764, BgL_shrinkz00_4851, BgL_plainz00_4852, BgL_auxz00_9771);} } 

}



/* make-class-virtual-slots-vector */
obj_t BGl_makezd2classzd2virtualzd2slotszd2vectorz00zz__objectz00(obj_t BgL_superz00_112, obj_t BgL_virtualsz00_113)
{
{ /* Llib/object.scm 1096 */
{ 
 obj_t BgL_vecz00_1561;
if(
BGL_CLASSP(BgL_superz00_112))
{ /* Llib/object.scm 1109 */
 obj_t BgL_ovecz00_1545;
{ /* Llib/object.scm 1109 */
 obj_t BgL_classz00_3291;
if(
BGL_CLASSP(BgL_superz00_112))
{ /* Llib/object.scm 1109 */
BgL_classz00_3291 = BgL_superz00_112; }  else 
{ 
 obj_t BgL_auxz00_9783;
BgL_auxz00_9783 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47760L), BGl_string3609z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_112); 
FAILURE(BgL_auxz00_9783,BFALSE,BFALSE);} 
BgL_ovecz00_1545 = 
BGL_CLASS_VIRTUAL_FIELDS(BgL_classz00_3291); } 
{ /* Llib/object.scm 1110 */
 long BgL_lenz00_1547;
{ /* Llib/object.scm 1111 */
 obj_t BgL_vectorz00_3293;
if(
VECTORP(BgL_virtualsz00_113))
{ /* Llib/object.scm 1111 */
BgL_vectorz00_3293 = BgL_virtualsz00_113; }  else 
{ 
 obj_t BgL_auxz00_9790;
BgL_auxz00_9790 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47831L), BGl_string3609z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_virtualsz00_113); 
FAILURE(BgL_auxz00_9790,BFALSE,BFALSE);} 
BgL_lenz00_1547 = 
VECTOR_LENGTH(BgL_vectorz00_3293); } 
{ /* Llib/object.scm 1111 */
 obj_t BgL_vecz00_1548;
{ /* Llib/object.scm 1112 */
 long BgL_arg1711z00_1556;
BgL_arg1711z00_1556 = 
(
VECTOR_LENGTH(BgL_ovecz00_1545)+BgL_lenz00_1547); 
BgL_vecz00_1548 = 
make_vector(BgL_arg1711z00_1556, BUNSPEC); } 
{ /* Llib/object.scm 1112 */

{ 
 long BgL_iz00_1550;
BgL_iz00_1550 = 0L; 
BgL_zc3z04anonymousza31707ze3z87_1551:
if(
(BgL_iz00_1550==
VECTOR_LENGTH(BgL_ovecz00_1545)))
{ /* Llib/object.scm 1114 */
BgL_vecz00_1561 = BgL_vecz00_1548; 
BgL_lambda1715z00_1562:
{ /* Llib/object.scm 1099 */
 obj_t BgL_g1327z00_1563;
{ /* Llib/object.scm 1102 */
 obj_t BgL_auxz00_9801;
if(
VECTORP(BgL_virtualsz00_113))
{ /* Llib/object.scm 1102 */
BgL_auxz00_9801 = BgL_virtualsz00_113
; }  else 
{ 
 obj_t BgL_auxz00_9804;
BgL_auxz00_9804 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47560L), BGl_string3605z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_virtualsz00_113); 
FAILURE(BgL_auxz00_9804,BFALSE,BFALSE);} 
BgL_g1327z00_1563 = 
BGl_vectorzd2ze3listz31zz__r4_vectors_6_8z00(BgL_auxz00_9801); } 
{ 
 obj_t BgL_l1325z00_1565;
BgL_l1325z00_1565 = BgL_g1327z00_1563; 
BgL_zc3z04anonymousza31716ze3z87_1566:
if(
PAIRP(BgL_l1325z00_1565))
{ /* Llib/object.scm 1102 */
{ /* Llib/object.scm 1100 */
 obj_t BgL_virtualz00_1568;
BgL_virtualz00_1568 = 
CAR(BgL_l1325z00_1565); 
{ /* Llib/object.scm 1100 */
 obj_t BgL_numz00_1569;
{ /* Llib/object.scm 1100 */
 obj_t BgL_pairz00_3286;
if(
PAIRP(BgL_virtualz00_1568))
{ /* Llib/object.scm 1100 */
BgL_pairz00_3286 = BgL_virtualz00_1568; }  else 
{ 
 obj_t BgL_auxz00_9814;
BgL_auxz00_9814 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47487L), BGl_string3606z00zz__objectz00, BGl_string3607z00zz__objectz00, BgL_virtualz00_1568); 
FAILURE(BgL_auxz00_9814,BFALSE,BFALSE);} 
BgL_numz00_1569 = 
CAR(BgL_pairz00_3286); } 
{ /* Llib/object.scm 1101 */
 obj_t BgL_arg1718z00_1570;
{ /* Llib/object.scm 1101 */
 obj_t BgL_pairz00_3287;
if(
PAIRP(BgL_virtualz00_1568))
{ /* Llib/object.scm 1101 */
BgL_pairz00_3287 = BgL_virtualz00_1568; }  else 
{ 
 obj_t BgL_auxz00_9821;
BgL_auxz00_9821 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47532L), BGl_string3606z00zz__objectz00, BGl_string3607z00zz__objectz00, BgL_virtualz00_1568); 
FAILURE(BgL_auxz00_9821,BFALSE,BFALSE);} 
BgL_arg1718z00_1570 = 
CDR(BgL_pairz00_3287); } 
{ /* Llib/object.scm 1101 */
 long BgL_kz00_3289;
{ /* Llib/object.scm 1101 */
 obj_t BgL_tmpz00_9826;
if(
INTEGERP(BgL_numz00_1569))
{ /* Llib/object.scm 1101 */
BgL_tmpz00_9826 = BgL_numz00_1569
; }  else 
{ 
 obj_t BgL_auxz00_9829;
BgL_auxz00_9829 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47523L), BGl_string3606z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_numz00_1569); 
FAILURE(BgL_auxz00_9829,BFALSE,BFALSE);} 
BgL_kz00_3289 = 
(long)CINT(BgL_tmpz00_9826); } 
{ /* Llib/object.scm 1101 */
 bool_t BgL_test4745z00_9834;
{ /* Llib/object.scm 1101 */
 long BgL_tmpz00_9835;
BgL_tmpz00_9835 = 
VECTOR_LENGTH(BgL_vecz00_1561); 
BgL_test4745z00_9834 = 
BOUND_CHECK(BgL_kz00_3289, BgL_tmpz00_9835); } 
if(BgL_test4745z00_9834)
{ /* Llib/object.scm 1101 */
VECTOR_SET(BgL_vecz00_1561,BgL_kz00_3289,BgL_arg1718z00_1570); }  else 
{ 
 obj_t BgL_auxz00_9839;
BgL_auxz00_9839 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47506L), BGl_string3596z00zz__objectz00, BgL_vecz00_1561, 
(int)(
VECTOR_LENGTH(BgL_vecz00_1561)), 
(int)(BgL_kz00_3289)); 
FAILURE(BgL_auxz00_9839,BFALSE,BFALSE);} } } } } } 
{ 
 obj_t BgL_l1325z00_9846;
BgL_l1325z00_9846 = 
CDR(BgL_l1325z00_1565); 
BgL_l1325z00_1565 = BgL_l1325z00_9846; 
goto BgL_zc3z04anonymousza31716ze3z87_1566;} }  else 
{ /* Llib/object.scm 1102 */
if(
NULLP(BgL_l1325z00_1565))
{ /* Llib/object.scm 1102 */BTRUE; }  else 
{ /* Llib/object.scm 1102 */
BGl_bigloozd2typezd2errorzf2locationzf2zz__errorz00(BGl_string3608z00zz__objectz00, BGl_string3594z00zz__objectz00, BgL_l1325z00_1565, BGl_string3483z00zz__objectz00, 
BINT(47438L)); } } } } 
return BgL_vecz00_1561;}  else 
{ /* Llib/object.scm 1114 */
{ /* Llib/object.scm 1117 */
 obj_t BgL_arg1709z00_1553;
BgL_arg1709z00_1553 = 
VECTOR_REF(BgL_ovecz00_1545,BgL_iz00_1550); 
{ /* Llib/object.scm 1117 */
 bool_t BgL_test4747z00_9853;
{ /* Llib/object.scm 1117 */
 long BgL_tmpz00_9854;
BgL_tmpz00_9854 = 
VECTOR_LENGTH(BgL_vecz00_1548); 
BgL_test4747z00_9853 = 
BOUND_CHECK(BgL_iz00_1550, BgL_tmpz00_9854); } 
if(BgL_test4747z00_9853)
{ /* Llib/object.scm 1117 */
VECTOR_SET(BgL_vecz00_1548,BgL_iz00_1550,BgL_arg1709z00_1553); }  else 
{ 
 obj_t BgL_auxz00_9858;
BgL_auxz00_9858 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47982L), BGl_string3596z00zz__objectz00, BgL_vecz00_1548, 
(int)(
VECTOR_LENGTH(BgL_vecz00_1548)), 
(int)(BgL_iz00_1550)); 
FAILURE(BgL_auxz00_9858,BFALSE,BFALSE);} } } 
{ 
 long BgL_iz00_9865;
BgL_iz00_9865 = 
(BgL_iz00_1550+1L); 
BgL_iz00_1550 = BgL_iz00_9865; 
goto BgL_zc3z04anonymousza31707ze3z87_1551;} } } } } } }  else 
{ /* Llib/object.scm 1106 */
 long BgL_lenz00_1558;
{ /* Llib/object.scm 1106 */
 obj_t BgL_vectorz00_3304;
if(
VECTORP(BgL_virtualsz00_113))
{ /* Llib/object.scm 1106 */
BgL_vectorz00_3304 = BgL_virtualsz00_113; }  else 
{ 
 obj_t BgL_auxz00_9869;
BgL_auxz00_9869 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(47645L), BGl_string3609z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_virtualsz00_113); 
FAILURE(BgL_auxz00_9869,BFALSE,BFALSE);} 
BgL_lenz00_1558 = 
VECTOR_LENGTH(BgL_vectorz00_3304); } 
{ /* Llib/object.scm 1106 */
 obj_t BgL_vecz00_1559;
BgL_vecz00_1559 = 
make_vector(BgL_lenz00_1558, BUNSPEC); 
{ /* Llib/object.scm 1107 */

{ 
 obj_t BgL_vecz00_9875;
BgL_vecz00_9875 = BgL_vecz00_1559; 
BgL_vecz00_1561 = BgL_vecz00_9875; 
goto BgL_lambda1715z00_1562;} } } } } } 

}



/* make-method-array */
obj_t BGl_makezd2methodzd2arrayz00zz__objectz00(obj_t BgL_defzd2bucketzd2_115)
{
{ /* Llib/object.scm 1129 */
{ /* Llib/object.scm 1130 */
 long BgL_sz00_1576; long BgL_az00_1577;
{ /* Llib/object.scm 1130 */
 int BgL_arg1728z00_1584;
BgL_arg1728z00_1584 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
{ /* Llib/object.scm 1130 */
 long BgL_n1z00_3312; long BgL_n2z00_3313;
{ /* Llib/object.scm 1130 */
 obj_t BgL_tmpz00_9881;
{ /* Llib/object.scm 1130 */
 obj_t BgL_aux3055z00_5738;
BgL_aux3055z00_5738 = BGl_za2nbzd2classeszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux3055z00_5738))
{ /* Llib/object.scm 1130 */
BgL_tmpz00_9881 = BgL_aux3055z00_5738
; }  else 
{ 
 obj_t BgL_auxz00_9884;
BgL_auxz00_9884 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(48667L), BGl_string3610z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3055z00_5738); 
FAILURE(BgL_auxz00_9884,BFALSE,BFALSE);} } 
BgL_n1z00_3312 = 
(long)CINT(BgL_tmpz00_9881); } 
BgL_n2z00_3313 = 
(long)(BgL_arg1728z00_1584); 
BgL_sz00_1576 = 
(BgL_n1z00_3312/BgL_n2z00_3313); } } 
{ /* Llib/object.scm 1131 */
 int BgL_arg1729z00_1585;
BgL_arg1729z00_1585 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
{ /* Llib/object.scm 1131 */
 long BgL_n1z00_3318; long BgL_n2z00_3319;
{ /* Llib/object.scm 1131 */
 obj_t BgL_tmpz00_9896;
{ /* Llib/object.scm 1131 */
 obj_t BgL_aux3056z00_5739;
BgL_aux3056z00_5739 = BGl_za2nbzd2classeszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux3056z00_5739))
{ /* Llib/object.scm 1131 */
BgL_tmpz00_9896 = BgL_aux3056z00_5739
; }  else 
{ 
 obj_t BgL_auxz00_9899;
BgL_auxz00_9899 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(48733L), BGl_string3610z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3056z00_5739); 
FAILURE(BgL_auxz00_9899,BFALSE,BFALSE);} } 
BgL_n1z00_3318 = 
(long)CINT(BgL_tmpz00_9896); } 
BgL_n2z00_3319 = 
(long)(BgL_arg1729z00_1585); 
{ /* Llib/object.scm 1131 */
 bool_t BgL_test4751z00_9905;
{ /* Llib/object.scm 1131 */
 long BgL_arg2419z00_3321;
BgL_arg2419z00_3321 = 
(((BgL_n1z00_3318) | (BgL_n2z00_3319)) & -2147483648); 
BgL_test4751z00_9905 = 
(BgL_arg2419z00_3321==0L); } 
if(BgL_test4751z00_9905)
{ /* Llib/object.scm 1131 */
 int32_t BgL_arg2416z00_3322;
{ /* Llib/object.scm 1131 */
 int32_t BgL_arg2417z00_3323; int32_t BgL_arg2418z00_3324;
BgL_arg2417z00_3323 = 
(int32_t)(BgL_n1z00_3318); 
BgL_arg2418z00_3324 = 
(int32_t)(BgL_n2z00_3319); 
BgL_arg2416z00_3322 = 
(BgL_arg2417z00_3323%BgL_arg2418z00_3324); } 
{ /* Llib/object.scm 1131 */
 long BgL_arg2557z00_3329;
BgL_arg2557z00_3329 = 
(long)(BgL_arg2416z00_3322); 
BgL_az00_1577 = 
(long)(BgL_arg2557z00_3329); } }  else 
{ /* Llib/object.scm 1131 */
BgL_az00_1577 = 
(BgL_n1z00_3318%BgL_n2z00_3319); } } } } 
if(
(BgL_az00_1577>0L))
{ /* Llib/object.scm 1132 */
{ /* Llib/object.scm 1136 */
 int BgL_arg1723z00_1579;
BgL_arg1723z00_1579 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
{ /* Llib/object.scm 1134 */
 obj_t BgL_list1724z00_1580;
{ /* Llib/object.scm 1134 */
 obj_t BgL_arg1725z00_1581;
{ /* Llib/object.scm 1134 */
 obj_t BgL_arg1726z00_1582;
BgL_arg1726z00_1582 = 
MAKE_YOUNG_PAIR(
BINT(BgL_arg1723z00_1579), BNIL); 
BgL_arg1725z00_1581 = 
MAKE_YOUNG_PAIR(BGl_string3611z00zz__objectz00, BgL_arg1726z00_1582); } 
BgL_list1724z00_1580 = 
MAKE_YOUNG_PAIR(BGl_string3610z00zz__objectz00, BgL_arg1725z00_1581); } 
BGl_warningz00zz__errorz00(BgL_list1724z00_1580); } } 
return 
make_vector_uncollectable(
(BgL_sz00_1576+1L), BgL_defzd2bucketzd2_115);}  else 
{ /* Llib/object.scm 1132 */
return 
make_vector_uncollectable(BgL_sz00_1576, BgL_defzd2bucketzd2_115);} } } 

}



/* &generic-no-default-behavior */
obj_t BGl_z62genericzd2nozd2defaultzd2behaviorzb0zz__objectz00(obj_t BgL_envz00_4854, obj_t BgL_lz00_4855)
{
{ /* Llib/object.scm 1143 */
return 
BGl_errorz00zz__errorz00(BGl_string3580z00zz__objectz00, BGl_string3612z00zz__objectz00, BgL_lz00_4855);} 

}



/* procedure->generic */
BGL_EXPORTED_DEF obj_t BGl_procedurezd2ze3genericz31zz__objectz00(obj_t BgL_procz00_117)
{
{ /* Llib/object.scm 1149 */
BGL_TAIL return 
bgl_make_generic(BgL_procz00_117);} 

}



/* &procedure->generic */
obj_t BGl_z62procedurezd2ze3genericz53zz__objectz00(obj_t BgL_envz00_4856, obj_t BgL_procz00_4857)
{
{ /* Llib/object.scm 1149 */
{ /* Llib/object.scm 1150 */
 obj_t BgL_auxz00_9931;
if(
PROCEDUREP(BgL_procz00_4857))
{ /* Llib/object.scm 1150 */
BgL_auxz00_9931 = BgL_procz00_4857
; }  else 
{ 
 obj_t BgL_auxz00_9934;
BgL_auxz00_9934 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(49610L), BGl_string3613z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_procz00_4857); 
FAILURE(BgL_auxz00_9934,BFALSE,BFALSE);} 
return 
BGl_procedurezd2ze3genericz31zz__objectz00(BgL_auxz00_9931);} } 

}



/* register-generic! */
BGL_EXPORTED_DEF obj_t BGl_registerzd2genericz12zc0zz__objectz00(obj_t BgL_genericz00_118, obj_t BgL_defaultz00_119, obj_t BgL_classzd2minzd2_120, obj_t BgL_namez00_121)
{
{ /* Llib/object.scm 1155 */
{ /* Llib/object.scm 1156 */
 obj_t BgL_top4755z00_9940;
BgL_top4755z00_9940 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top4755z00_9940, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_tmp4754z00_9939;
BgL_tmp4754z00_9939 = 
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BgL_genericz00_118, BgL_defaultz00_119, BgL_namez00_121); 
BGL_EXITD_POP_PROTECT(BgL_top4755z00_9940); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); 
return BgL_tmp4754z00_9939;} } } 

}



/* &register-generic! */
obj_t BGl_z62registerzd2genericz12za2zz__objectz00(obj_t BgL_envz00_4858, obj_t BgL_genericz00_4859, obj_t BgL_defaultz00_4860, obj_t BgL_classzd2minzd2_4861, obj_t BgL_namez00_4862)
{
{ /* Llib/object.scm 1155 */
{ /* Llib/object.scm 1156 */
 obj_t BgL_auxz00_9954; obj_t BgL_auxz00_9947;
if(
PROCEDUREP(BgL_defaultz00_4860))
{ /* Llib/object.scm 1156 */
BgL_auxz00_9954 = BgL_defaultz00_4860
; }  else 
{ 
 obj_t BgL_auxz00_9957;
BgL_auxz00_9957 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(49917L), BGl_string3614z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_defaultz00_4860); 
FAILURE(BgL_auxz00_9957,BFALSE,BFALSE);} 
if(
PROCEDUREP(BgL_genericz00_4859))
{ /* Llib/object.scm 1156 */
BgL_auxz00_9947 = BgL_genericz00_4859
; }  else 
{ 
 obj_t BgL_auxz00_9950;
BgL_auxz00_9950 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(49917L), BGl_string3614z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4859); 
FAILURE(BgL_auxz00_9950,BFALSE,BFALSE);} 
return 
BGl_registerzd2genericz12zc0zz__objectz00(BgL_auxz00_9947, BgL_auxz00_9954, BgL_classzd2minzd2_4861, BgL_namez00_4862);} } 

}



/* register-generic-sans-lock! */
obj_t BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(obj_t BgL_genericz00_122, obj_t BgL_defaultz00_123, obj_t BgL_namez00_124)
{
{ /* Llib/object.scm 1169 */
{ /* Llib/object.scm 1170 */
 bool_t BgL_test4758z00_9962;
{ /* Llib/object.scm 1170 */
 obj_t BgL_genericz00_3337;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 1170 */
BgL_genericz00_3337 = BgL_genericz00_122; }  else 
{ 
 obj_t BgL_auxz00_9965;
BgL_auxz00_9965 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(50844L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_9965,BFALSE,BFALSE);} 
{ /* Llib/object.scm 1124 */
 obj_t BgL_tmpz00_9969;
BgL_tmpz00_9969 = 
PROCEDURE_REF(BgL_genericz00_3337, 
(int)(1L)); 
BgL_test4758z00_9962 = 
VECTORP(BgL_tmpz00_9969); } } 
if(BgL_test4758z00_9962)
{ /* Llib/object.scm 1170 */
if(
PROCEDUREP(BgL_defaultz00_123))
{ /* Llib/object.scm 1189 */
 obj_t BgL_oldzd2defzd2bucketz00_1588; obj_t BgL_newzd2defzd2bucketz00_1589; obj_t BgL_oldzd2defaultzd2_1590;
{ /* Llib/object.scm 1189 */
 obj_t BgL_res2636z00_3340;
{ /* Llib/object.scm 918 */
 obj_t BgL_aux3067z00_5750;
{ /* Llib/object.scm 918 */
 obj_t BgL_tmpz00_9975;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 918 */
BgL_tmpz00_9975 = BgL_genericz00_122
; }  else 
{ 
 obj_t BgL_auxz00_9978;
BgL_auxz00_9978 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40183L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_9978,BFALSE,BFALSE);} 
BgL_aux3067z00_5750 = 
PROCEDURE_REF(BgL_tmpz00_9975, 
(int)(2L)); } 
if(
VECTORP(BgL_aux3067z00_5750))
{ /* Llib/object.scm 918 */
BgL_res2636z00_3340 = BgL_aux3067z00_5750; }  else 
{ 
 obj_t BgL_auxz00_9986;
BgL_auxz00_9986 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40168L), BGl_string3615z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3067z00_5750); 
FAILURE(BgL_auxz00_9986,BFALSE,BFALSE);} } 
BgL_oldzd2defzd2bucketz00_1588 = BgL_res2636z00_3340; } 
{ /* Llib/object.scm 1191 */
 int BgL_arg1749z00_1613;
BgL_arg1749z00_1613 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
BgL_newzd2defzd2bucketz00_1589 = 
make_vector_uncollectable(
(long)(BgL_arg1749z00_1613), BgL_defaultz00_123); } 
{ /* Llib/object.scm 1192 */
 obj_t BgL_res2639z00_3346;
{ /* Llib/object.scm 1192 */
 obj_t BgL_genericz00_3345;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 1192 */
BgL_genericz00_3345 = BgL_genericz00_122; }  else 
{ 
 obj_t BgL_auxz00_9999;
BgL_auxz00_9999 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51778L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_9999,BFALSE,BFALSE);} 
{ /* Llib/object.scm 900 */
 obj_t BgL_aux3071z00_5754;
BgL_aux3071z00_5754 = 
PROCEDURE_REF(BgL_genericz00_3345, 
(int)(0L)); 
if(
PROCEDUREP(BgL_aux3071z00_5754))
{ /* Llib/object.scm 900 */
BgL_res2639z00_3346 = BgL_aux3071z00_5754; }  else 
{ 
 obj_t BgL_auxz00_10007;
BgL_auxz00_10007 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39357L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3071z00_5754); 
FAILURE(BgL_auxz00_10007,BFALSE,BFALSE);} } } 
BgL_oldzd2defaultzd2_1590 = BgL_res2639z00_3346; } 
{ /* Llib/object.scm 1193 */
 obj_t BgL_marrayz00_1591;
{ /* Llib/object.scm 1193 */
 obj_t BgL_genericz00_3347;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 1193 */
BgL_genericz00_3347 = BgL_genericz00_122; }  else 
{ 
 obj_t BgL_auxz00_10013;
BgL_auxz00_10013 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51828L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_10013,BFALSE,BFALSE);} 
BgL_marrayz00_1591 = 
PROCEDURE_REF(BgL_genericz00_3347, 
(int)(1L)); } 
{ /* Llib/object.scm 1193 */
 long BgL_alenz00_1592;
{ /* Llib/object.scm 1194 */
 obj_t BgL_vectorz00_3348;
if(
VECTORP(BgL_marrayz00_1591))
{ /* Llib/object.scm 1194 */
BgL_vectorz00_3348 = BgL_marrayz00_1591; }  else 
{ 
 obj_t BgL_auxz00_10021;
BgL_auxz00_10021 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51868L), BGl_string3615z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_marrayz00_1591); 
FAILURE(BgL_auxz00_10021,BFALSE,BFALSE);} 
BgL_alenz00_1592 = 
VECTOR_LENGTH(BgL_vectorz00_3348); } 
{ /* Llib/object.scm 1194 */

{ 
 long BgL_iz00_1594;
BgL_iz00_1594 = 0L; 
BgL_zc3z04anonymousza31732ze3z87_1595:
if(
(BgL_iz00_1594<BgL_alenz00_1592))
{ /* Llib/object.scm 1197 */
 obj_t BgL_bucketz00_1597;
{ /* Llib/object.scm 1197 */
 obj_t BgL_vectorz00_3351;
if(
VECTORP(BgL_marrayz00_1591))
{ /* Llib/object.scm 1197 */
BgL_vectorz00_3351 = BgL_marrayz00_1591; }  else 
{ 
 obj_t BgL_auxz00_10030;
BgL_auxz00_10030 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51960L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_marrayz00_1591); 
FAILURE(BgL_auxz00_10030,BFALSE,BFALSE);} 
BgL_bucketz00_1597 = 
VECTOR_REF(BgL_vectorz00_3351,BgL_iz00_1594); } 
if(
(BgL_bucketz00_1597==BgL_oldzd2defzd2bucketz00_1588))
{ /* Llib/object.scm 1198 */
{ /* Llib/object.scm 1200 */
 obj_t BgL_vectorz00_3353;
if(
VECTORP(BgL_marrayz00_1591))
{ /* Llib/object.scm 1200 */
BgL_vectorz00_3353 = BgL_marrayz00_1591; }  else 
{ 
 obj_t BgL_auxz00_10039;
BgL_auxz00_10039 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52045L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_marrayz00_1591); 
FAILURE(BgL_auxz00_10039,BFALSE,BFALSE);} 
{ /* Llib/object.scm 1200 */
 bool_t BgL_test4771z00_10043;
{ /* Llib/object.scm 1200 */
 long BgL_tmpz00_10044;
BgL_tmpz00_10044 = 
VECTOR_LENGTH(BgL_vectorz00_3353); 
BgL_test4771z00_10043 = 
BOUND_CHECK(BgL_iz00_1594, BgL_tmpz00_10044); } 
if(BgL_test4771z00_10043)
{ /* Llib/object.scm 1200 */
VECTOR_SET(BgL_vectorz00_3353,BgL_iz00_1594,BgL_newzd2defzd2bucketz00_1589); }  else 
{ 
 obj_t BgL_auxz00_10048;
BgL_auxz00_10048 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52032L), BGl_string3596z00zz__objectz00, BgL_vectorz00_3353, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_3353)), 
(int)(BgL_iz00_1594)); 
FAILURE(BgL_auxz00_10048,BFALSE,BFALSE);} } } 
{ 
 long BgL_iz00_10055;
BgL_iz00_10055 = 
(BgL_iz00_1594+1L); 
BgL_iz00_1594 = BgL_iz00_10055; 
goto BgL_zc3z04anonymousza31732ze3z87_1595;} }  else 
{ 
 long BgL_jz00_1600;
BgL_jz00_1600 = 0L; 
BgL_zc3z04anonymousza31735ze3z87_1601:
if(
(BgL_jz00_1600==
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))))
{ 
 long BgL_iz00_10065;
BgL_iz00_10065 = 
(BgL_iz00_1594+1L); 
BgL_iz00_1594 = BgL_iz00_10065; 
goto BgL_zc3z04anonymousza31732ze3z87_1595;}  else 
{ /* Llib/object.scm 1206 */
 bool_t BgL_test4773z00_10067;
{ /* Llib/object.scm 1206 */
 obj_t BgL_arg1747z00_1609;
{ /* Llib/object.scm 1206 */
 obj_t BgL_vectorz00_3363;
if(
VECTORP(BgL_bucketz00_1597))
{ /* Llib/object.scm 1206 */
BgL_vectorz00_3363 = BgL_bucketz00_1597; }  else 
{ 
 obj_t BgL_auxz00_10070;
BgL_auxz00_10070 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52237L), BGl_string3616z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_1597); 
FAILURE(BgL_auxz00_10070,BFALSE,BFALSE);} 
BgL_arg1747z00_1609 = 
VECTOR_REF(BgL_vectorz00_3363,BgL_jz00_1600); } 
BgL_test4773z00_10067 = 
(BgL_arg1747z00_1609==BgL_oldzd2defaultzd2_1590); } 
if(BgL_test4773z00_10067)
{ /* Llib/object.scm 1206 */
{ /* Llib/object.scm 1207 */
 obj_t BgL_vectorz00_3365;
if(
VECTORP(BgL_bucketz00_1597))
{ /* Llib/object.scm 1207 */
BgL_vectorz00_3365 = BgL_bucketz00_1597; }  else 
{ 
 obj_t BgL_auxz00_10078;
BgL_auxz00_10078 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52278L), BGl_string3616z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_1597); 
FAILURE(BgL_auxz00_10078,BFALSE,BFALSE);} 
{ /* Llib/object.scm 1207 */
 bool_t BgL_test4776z00_10082;
{ /* Llib/object.scm 1207 */
 long BgL_tmpz00_10083;
BgL_tmpz00_10083 = 
VECTOR_LENGTH(BgL_vectorz00_3365); 
BgL_test4776z00_10082 = 
BOUND_CHECK(BgL_jz00_1600, BgL_tmpz00_10083); } 
if(BgL_test4776z00_10082)
{ /* Llib/object.scm 1207 */
VECTOR_SET(BgL_vectorz00_3365,BgL_jz00_1600,BgL_defaultz00_123); }  else 
{ 
 obj_t BgL_auxz00_10087;
BgL_auxz00_10087 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52265L), BGl_string3596z00zz__objectz00, BgL_vectorz00_3365, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_3365)), 
(int)(BgL_jz00_1600)); 
FAILURE(BgL_auxz00_10087,BFALSE,BFALSE);} } } 
{ 
 long BgL_jz00_10094;
BgL_jz00_10094 = 
(BgL_jz00_1600+1L); 
BgL_jz00_1600 = BgL_jz00_10094; 
goto BgL_zc3z04anonymousza31735ze3z87_1601;} }  else 
{ 
 long BgL_jz00_10096;
BgL_jz00_10096 = 
(BgL_jz00_1600+1L); 
BgL_jz00_1600 = BgL_jz00_10096; 
goto BgL_zc3z04anonymousza31735ze3z87_1601;} } } }  else 
{ /* Llib/object.scm 1196 */
{ /* Llib/object.scm 1212 */
 obj_t BgL_genericz00_3369;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 1212 */
BgL_genericz00_3369 = BgL_genericz00_122; }  else 
{ 
 obj_t BgL_auxz00_10100;
BgL_auxz00_10100 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52405L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_10100,BFALSE,BFALSE);} 
PROCEDURE_SET(BgL_genericz00_3369, 
(int)(0L), 
((obj_t)
((obj_t)BgL_defaultz00_123))); } 
{ /* Llib/object.scm 921 */
 obj_t BgL_tmpz00_10108;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 921 */
BgL_tmpz00_10108 = BgL_genericz00_122
; }  else 
{ 
 obj_t BgL_auxz00_10111;
BgL_auxz00_10111 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40283L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_10111,BFALSE,BFALSE);} 
PROCEDURE_SET(BgL_tmpz00_10108, 
(int)(2L), BgL_newzd2defzd2bucketz00_1589); } 
{ /* Llib/object.scm 1215 */
 obj_t BgL_tmpz00_10117;
if(
VECTORP(BgL_oldzd2defzd2bucketz00_1588))
{ /* Llib/object.scm 1215 */
BgL_tmpz00_10117 = BgL_oldzd2defzd2bucketz00_1588
; }  else 
{ 
 obj_t BgL_auxz00_10120;
BgL_auxz00_10120 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52528L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_oldzd2defzd2bucketz00_1588); 
FAILURE(BgL_auxz00_10120,BFALSE,BFALSE);} 
FREE_VECTOR_UNCOLLECTABLE(BgL_tmpz00_10117); } BUNSPEC; } } } } } }  else 
{ /* Llib/object.scm 1185 */BFALSE; } 
return BUNSPEC;}  else 
{ /* Llib/object.scm 1171 */
 obj_t BgL_defzd2metzd2_1614;
if(
PROCEDUREP(BgL_defaultz00_123))
{ /* Llib/object.scm 1171 */
BgL_defzd2metzd2_1614 = BgL_defaultz00_123; }  else 
{ /* Llib/object.scm 1171 */
BgL_defzd2metzd2_1614 = BGl_genericzd2nozd2defaultzd2behaviorzd2envz00zz__objectz00; } 
{ /* Llib/object.scm 1171 */
 obj_t BgL_defzd2bucketzd2_1615;
{ /* Llib/object.scm 1175 */
 int BgL_arg1755z00_1618;
BgL_arg1755z00_1618 = 
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))); 
BgL_defzd2bucketzd2_1615 = 
make_vector_uncollectable(
(long)(BgL_arg1755z00_1618), BgL_defzd2metzd2_1614); } 
{ /* Llib/object.scm 1174 */

{ /* Llib/object.scm 1176 */
 bool_t BgL_test4781z00_10134;
{ /* Llib/object.scm 1176 */
 long BgL_n1z00_3376; long BgL_n2z00_3377;
{ /* Llib/object.scm 1176 */
 obj_t BgL_tmpz00_10135;
{ /* Llib/object.scm 1176 */
 obj_t BgL_aux3093z00_5776;
BgL_aux3093z00_5776 = BGl_za2nbzd2genericsza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux3093z00_5776))
{ /* Llib/object.scm 1176 */
BgL_tmpz00_10135 = BgL_aux3093z00_5776
; }  else 
{ 
 obj_t BgL_auxz00_10138;
BgL_auxz00_10138 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51059L), BGl_string3615z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3093z00_5776); 
FAILURE(BgL_auxz00_10138,BFALSE,BFALSE);} } 
BgL_n1z00_3376 = 
(long)CINT(BgL_tmpz00_10135); } 
{ /* Llib/object.scm 1176 */
 obj_t BgL_tmpz00_10143;
{ /* Llib/object.scm 1176 */
 obj_t BgL_aux3094z00_5777;
BgL_aux3094z00_5777 = BGl_za2nbzd2genericszd2maxza2z00zz__objectz00; 
if(
INTEGERP(BgL_aux3094z00_5777))
{ /* Llib/object.scm 1176 */
BgL_tmpz00_10143 = BgL_aux3094z00_5777
; }  else 
{ 
 obj_t BgL_auxz00_10146;
BgL_auxz00_10146 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51073L), BGl_string3615z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3094z00_5777); 
FAILURE(BgL_auxz00_10146,BFALSE,BFALSE);} } 
BgL_n2z00_3377 = 
(long)CINT(BgL_tmpz00_10143); } 
BgL_test4781z00_10134 = 
(BgL_n1z00_3376==BgL_n2z00_3377); } 
if(BgL_test4781z00_10134)
{ /* Llib/object.scm 1176 */
BGl_doublezd2nbzd2genericsz12z12zz__objectz00(); }  else 
{ /* Llib/object.scm 1176 */BFALSE; } } 
{ /* Llib/object.scm 1178 */
 obj_t BgL_vectorz00_3378; long BgL_kz00_3379;
{ /* Llib/object.scm 1178 */
 obj_t BgL_aux3095z00_5778;
BgL_aux3095z00_5778 = BGl_za2genericsza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3095z00_5778))
{ /* Llib/object.scm 1178 */
BgL_vectorz00_3378 = BgL_aux3095z00_5778; }  else 
{ 
 obj_t BgL_auxz00_10155;
BgL_auxz00_10155 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51137L), BGl_string3615z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3095z00_5778); 
FAILURE(BgL_auxz00_10155,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1178 */
 obj_t BgL_tmpz00_10159;
{ /* Llib/object.scm 1178 */
 obj_t BgL_aux3097z00_5780;
BgL_aux3097z00_5780 = BGl_za2nbzd2genericsza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux3097z00_5780))
{ /* Llib/object.scm 1178 */
BgL_tmpz00_10159 = BgL_aux3097z00_5780
; }  else 
{ 
 obj_t BgL_auxz00_10162;
BgL_auxz00_10162 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51148L), BGl_string3615z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3097z00_5780); 
FAILURE(BgL_auxz00_10162,BFALSE,BFALSE);} } 
BgL_kz00_3379 = 
(long)CINT(BgL_tmpz00_10159); } 
{ /* Llib/object.scm 1178 */
 bool_t BgL_test4786z00_10167;
{ /* Llib/object.scm 1178 */
 long BgL_tmpz00_10168;
BgL_tmpz00_10168 = 
VECTOR_LENGTH(BgL_vectorz00_3378); 
BgL_test4786z00_10167 = 
BOUND_CHECK(BgL_kz00_3379, BgL_tmpz00_10168); } 
if(BgL_test4786z00_10167)
{ /* Llib/object.scm 1178 */
VECTOR_SET(BgL_vectorz00_3378,BgL_kz00_3379,BgL_genericz00_122); }  else 
{ 
 obj_t BgL_auxz00_10172;
BgL_auxz00_10172 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51124L), BGl_string3596z00zz__objectz00, BgL_vectorz00_3378, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_3378)), 
(int)(BgL_kz00_3379)); 
FAILURE(BgL_auxz00_10172,BFALSE,BFALSE);} } } 
{ 
 obj_t BgL_tmpz00_10179;
{ /* Llib/object.scm 1179 */
 obj_t BgL_aux3098z00_5781;
BgL_aux3098z00_5781 = BGl_za2nbzd2genericsza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux3098z00_5781))
{ /* Llib/object.scm 1179 */
BgL_tmpz00_10179 = BgL_aux3098z00_5781
; }  else 
{ 
 obj_t BgL_auxz00_10182;
BgL_auxz00_10182 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51199L), BGl_string3615z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3098z00_5781); 
FAILURE(BgL_auxz00_10182,BFALSE,BFALSE);} } 
BGl_za2nbzd2genericsza2zd2zz__objectz00 = 
ADDFX(BgL_tmpz00_10179, 
BINT(1L)); } 
{ /* Llib/object.scm 1180 */
 obj_t BgL_genericz00_3381; obj_t BgL_defaultz00_3382;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 1180 */
BgL_genericz00_3381 = BgL_genericz00_122; }  else 
{ 
 obj_t BgL_auxz00_10190;
BgL_auxz00_10190 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51242L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_10190,BFALSE,BFALSE);} 
if(
PROCEDUREP(BgL_defzd2metzd2_1614))
{ /* Llib/object.scm 1180 */
BgL_defaultz00_3382 = BgL_defzd2metzd2_1614; }  else 
{ 
 obj_t BgL_auxz00_10196;
BgL_auxz00_10196 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51250L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_defzd2metzd2_1614); 
FAILURE(BgL_auxz00_10196,BFALSE,BFALSE);} 
PROCEDURE_SET(BgL_genericz00_3381, 
(int)(0L), 
((obj_t)BgL_defaultz00_3382)); } 
{ /* Llib/object.scm 921 */
 obj_t BgL_tmpz00_10203;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 921 */
BgL_tmpz00_10203 = BgL_genericz00_122
; }  else 
{ 
 obj_t BgL_auxz00_10206;
BgL_auxz00_10206 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(40283L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_10206,BFALSE,BFALSE);} 
PROCEDURE_SET(BgL_tmpz00_10203, 
(int)(2L), BgL_defzd2bucketzd2_1615); } 
{ /* Llib/object.scm 1182 */
 obj_t BgL_arg1754z00_1617;
BgL_arg1754z00_1617 = 
BGl_makezd2methodzd2arrayz00zz__objectz00(BgL_defzd2bucketzd2_1615); 
{ /* Llib/object.scm 1182 */
 obj_t BgL_genericz00_3384;
if(
PROCEDUREP(BgL_genericz00_122))
{ /* Llib/object.scm 1182 */
BgL_genericz00_3384 = BgL_genericz00_122; }  else 
{ 
 obj_t BgL_auxz00_10215;
BgL_auxz00_10215 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(51341L), BGl_string3615z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_122); 
FAILURE(BgL_auxz00_10215,BFALSE,BFALSE);} 
PROCEDURE_SET(BgL_genericz00_3384, 
(int)(1L), BgL_arg1754z00_1617); } } 
return BUNSPEC;} } } } } 

}



/* %add-method! */
obj_t BGl_z52addzd2methodz12z92zz__objectz00(obj_t BgL_genericz00_125, obj_t BgL_classz00_126, obj_t BgL_methodz00_127)
{
{ /* Llib/object.scm 1221 */
{ /* Llib/object.scm 1222 */
 obj_t BgL_top4793z00_10222;
BgL_top4793z00_10222 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top4793z00_10222, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1222 */
 obj_t BgL_tmp4792z00_10221;
{ /* Llib/object.scm 1223 */
 bool_t BgL_test4794z00_10226;
{ /* Llib/object.scm 1223 */
 obj_t BgL_genericz00_3386;
if(
PROCEDUREP(BgL_genericz00_125))
{ /* Llib/object.scm 1223 */
BgL_genericz00_3386 = BgL_genericz00_125; }  else 
{ 
 obj_t BgL_auxz00_10229;
BgL_auxz00_10229 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(52909L), BGl_string3617z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_125); 
FAILURE(BgL_auxz00_10229,BFALSE,BFALSE);} 
{ /* Llib/object.scm 1124 */
 obj_t BgL_tmpz00_10233;
BgL_tmpz00_10233 = 
PROCEDURE_REF(BgL_genericz00_3386, 
(int)(1L)); 
BgL_test4794z00_10226 = 
VECTORP(BgL_tmpz00_10233); } } 
if(BgL_test4794z00_10226)
{ /* Llib/object.scm 1223 */BFALSE; }  else 
{ /* Llib/object.scm 1223 */
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BgL_genericz00_125, BFALSE, BGl_string3618z00zz__objectz00); } } 
{ /* Llib/object.scm 1227 */
 obj_t BgL_methodzd2arrayzd2_1621;
{ /* Llib/object.scm 1227 */
 obj_t BgL_genericz00_3389;
if(
PROCEDUREP(BgL_genericz00_125))
{ /* Llib/object.scm 1227 */
BgL_genericz00_3389 = BgL_genericz00_125; }  else 
{ 
 obj_t BgL_auxz00_10240;
BgL_auxz00_10240 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53106L), BGl_string3617z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_125); 
FAILURE(BgL_auxz00_10240,BFALSE,BFALSE);} 
BgL_methodzd2arrayzd2_1621 = 
PROCEDURE_REF(BgL_genericz00_3389, 
(int)(1L)); } 
{ /* Llib/object.scm 1227 */
 long BgL_cnumz00_1622;
{ /* Llib/object.scm 1228 */
 obj_t BgL_classz00_3390;
if(
BGL_CLASSP(BgL_classz00_126))
{ /* Llib/object.scm 1228 */
BgL_classz00_3390 = BgL_classz00_126; }  else 
{ 
 obj_t BgL_auxz00_10248;
BgL_auxz00_10248 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53141L), BGl_string3617z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_126); 
FAILURE(BgL_auxz00_10248,BFALSE,BFALSE);} 
BgL_cnumz00_1622 = 
BGL_CLASS_INDEX(BgL_classz00_3390); } 
{ /* Llib/object.scm 1228 */
 obj_t BgL_previousz00_1623;
{ /* Llib/object.scm 1229 */
 obj_t BgL_arrayz00_3392; int BgL_offsetz00_3393;
if(
VECTORP(BgL_methodzd2arrayzd2_1621))
{ /* Llib/object.scm 1229 */
BgL_arrayz00_3392 = BgL_methodzd2arrayzd2_1621; }  else 
{ 
 obj_t BgL_auxz00_10255;
BgL_auxz00_10255 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53191L), BGl_string3617z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_methodzd2arrayzd2_1621); 
FAILURE(BgL_auxz00_10255,BFALSE,BFALSE);} 
BgL_offsetz00_3393 = 
(int)(BgL_cnumz00_1622); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_3394;
BgL_offsetz00_3394 = 
(
(long)(BgL_offsetz00_3393)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_3395;
BgL_modz00_3395 = 
(BgL_offsetz00_3394 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_3397;
BgL_restz00_3397 = 
(BgL_offsetz00_3394 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_3399;
BgL_bucketz00_3399 = 
VECTOR_REF(BgL_arrayz00_3392,BgL_modz00_3395); 
{ /* Llib/object.scm 935 */
 obj_t BgL_vectorz00_3416;
if(
VECTORP(BgL_bucketz00_3399))
{ /* Llib/object.scm 935 */
BgL_vectorz00_3416 = BgL_bucketz00_3399; }  else 
{ 
 obj_t BgL_auxz00_10279;
BgL_auxz00_10279 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41128L), BGl_string3617z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_3399); 
FAILURE(BgL_auxz00_10279,BFALSE,BFALSE);} 
BgL_previousz00_1623 = 
VECTOR_REF(BgL_vectorz00_3416,BgL_restz00_3397); } } } } } } } 
{ /* Llib/object.scm 1229 */
 obj_t BgL_defz00_1624;
{ /* Llib/object.scm 1230 */
 obj_t BgL_res2648z00_3419;
{ /* Llib/object.scm 1230 */
 obj_t BgL_genericz00_3418;
if(
PROCEDUREP(BgL_genericz00_125))
{ /* Llib/object.scm 1230 */
BgL_genericz00_3418 = BgL_genericz00_125; }  else 
{ 
 obj_t BgL_auxz00_10286;
BgL_auxz00_10286 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53239L), BGl_string3617z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_125); 
FAILURE(BgL_auxz00_10286,BFALSE,BFALSE);} 
{ /* Llib/object.scm 900 */
 obj_t BgL_aux3119z00_5802;
BgL_aux3119z00_5802 = 
PROCEDURE_REF(BgL_genericz00_3418, 
(int)(0L)); 
if(
PROCEDUREP(BgL_aux3119z00_5802))
{ /* Llib/object.scm 900 */
BgL_res2648z00_3419 = BgL_aux3119z00_5802; }  else 
{ 
 obj_t BgL_auxz00_10294;
BgL_auxz00_10294 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39357L), BGl_string3617z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3119z00_5802); 
FAILURE(BgL_auxz00_10294,BFALSE,BFALSE);} } } 
BgL_defz00_1624 = BgL_res2648z00_3419; } 
{ /* Llib/object.scm 1230 */

BGl_loopze70ze7zz__objectz00(BgL_defz00_1624, BgL_previousz00_1623, BgL_methodz00_127, BgL_genericz00_125, BgL_methodzd2arrayzd2_1621, BgL_classz00_126); } } } } } 
BgL_tmp4792z00_10221 = BgL_methodz00_127; 
BGL_EXITD_POP_PROTECT(BgL_top4793z00_10222); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); 
return BgL_tmp4792z00_10221;} } } 

}



/* loop~0 */
obj_t BGl_loopze70ze7zz__objectz00(obj_t BgL_defz00_5389, obj_t BgL_previousz00_5388, obj_t BgL_methodz00_5387, obj_t BgL_genericz00_5386, obj_t BgL_methodzd2arrayzd2_5385, obj_t BgL_claza7za7z00_1626)
{
{ /* Llib/object.scm 1231 */
{ /* Llib/object.scm 1232 */
 long BgL_cnz00_1628;
{ /* Llib/object.scm 1232 */
 obj_t BgL_classz00_3420;
if(
BGL_CLASSP(BgL_claza7za7z00_1626))
{ /* Llib/object.scm 1232 */
BgL_classz00_3420 = BgL_claza7za7z00_1626; }  else 
{ 
 obj_t BgL_auxz00_10303;
BgL_auxz00_10303 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53307L), BGl_string3619z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_claza7za7z00_1626); 
FAILURE(BgL_auxz00_10303,BFALSE,BFALSE);} 
BgL_cnz00_1628 = 
BGL_CLASS_INDEX(BgL_classz00_3420); } 
{ /* Llib/object.scm 1232 */
 obj_t BgL_currentz00_1629;
{ /* Llib/object.scm 1233 */
 obj_t BgL_arrayz00_3422; int BgL_offsetz00_3423;
if(
VECTORP(BgL_methodzd2arrayzd2_5385))
{ /* Llib/object.scm 1233 */
BgL_arrayz00_3422 = BgL_methodzd2arrayzd2_5385; }  else 
{ 
 obj_t BgL_auxz00_10310;
BgL_auxz00_10310 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53355L), BGl_string3619z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_methodzd2arrayzd2_5385); 
FAILURE(BgL_auxz00_10310,BFALSE,BFALSE);} 
BgL_offsetz00_3423 = 
(int)(BgL_cnz00_1628); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_3424;
BgL_offsetz00_3424 = 
(
(long)(BgL_offsetz00_3423)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_3425;
BgL_modz00_3425 = 
(BgL_offsetz00_3424 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_3427;
BgL_restz00_3427 = 
(BgL_offsetz00_3424 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_3429;
BgL_bucketz00_3429 = 
VECTOR_REF(BgL_arrayz00_3422,BgL_modz00_3425); 
{ /* Llib/object.scm 935 */
 obj_t BgL_vectorz00_3446;
if(
VECTORP(BgL_bucketz00_3429))
{ /* Llib/object.scm 935 */
BgL_vectorz00_3446 = BgL_bucketz00_3429; }  else 
{ 
 obj_t BgL_auxz00_10334;
BgL_auxz00_10334 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41128L), BGl_string3619z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_3429); 
FAILURE(BgL_auxz00_10334,BFALSE,BFALSE);} 
BgL_currentz00_1629 = 
VECTOR_REF(BgL_vectorz00_3446,BgL_restz00_3427); } } } } } } } 
{ /* Llib/object.scm 1233 */

{ /* Llib/object.scm 1234 */
 bool_t BgL_test4805z00_10339;
if(
(BgL_currentz00_1629==BgL_defz00_5389))
{ /* Llib/object.scm 1234 */
BgL_test4805z00_10339 = ((bool_t)1)
; }  else 
{ /* Llib/object.scm 1234 */
BgL_test4805z00_10339 = 
(BgL_currentz00_1629==BgL_previousz00_5388)
; } 
if(BgL_test4805z00_10339)
{ /* Llib/object.scm 1234 */
BGl_methodzd2arrayzd2setz12z12zz__objectz00(BgL_genericz00_5386, BgL_methodzd2arrayzd2_5385, BgL_cnz00_1628, BgL_methodz00_5387); 
{ /* Llib/object.scm 1239 */
 obj_t BgL_g1330z00_1631;
{ /* Llib/object.scm 1239 */
 obj_t BgL_classz00_3448;
if(
BGL_CLASSP(BgL_claza7za7z00_1626))
{ /* Llib/object.scm 1239 */
BgL_classz00_3448 = BgL_claza7za7z00_1626; }  else 
{ 
 obj_t BgL_auxz00_10346;
BgL_auxz00_10346 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53625L), BGl_string3619z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_claza7za7z00_1626); 
FAILURE(BgL_auxz00_10346,BFALSE,BFALSE);} 
BgL_g1330z00_1631 = 
BGL_CLASS_SUBCLASSES(BgL_classz00_3448); } 
{ 
 obj_t BgL_l1328z00_1633;
BgL_l1328z00_1633 = BgL_g1330z00_1631; 
BgL_zc3z04anonymousza31760ze3z87_1634:
if(
PAIRP(BgL_l1328z00_1633))
{ /* Llib/object.scm 1239 */
BGl_loopze70ze7zz__objectz00(BgL_defz00_5389, BgL_previousz00_5388, BgL_methodz00_5387, BgL_genericz00_5386, BgL_methodzd2arrayzd2_5385, 
CAR(BgL_l1328z00_1633)); 
{ 
 obj_t BgL_l1328z00_10355;
BgL_l1328z00_10355 = 
CDR(BgL_l1328z00_1633); 
BgL_l1328z00_1633 = BgL_l1328z00_10355; 
goto BgL_zc3z04anonymousza31760ze3z87_1634;} }  else 
{ /* Llib/object.scm 1239 */
if(
NULLP(BgL_l1328z00_1633))
{ /* Llib/object.scm 1239 */
return BTRUE;}  else 
{ /* Llib/object.scm 1239 */
return 
BGl_bigloozd2typezd2errorzf2locationzf2zz__errorz00(BGl_string3608z00zz__objectz00, BGl_string3594z00zz__objectz00, BgL_l1328z00_1633, BGl_string3483z00zz__objectz00, 
BINT(53592L));} } } } }  else 
{ /* Llib/object.scm 1234 */
return BFALSE;} } } } } } 

}



/* generic-add-method! */
BGL_EXPORTED_DEF obj_t BGl_genericzd2addzd2methodz12z12zz__objectz00(obj_t BgL_genericz00_128, obj_t BgL_classz00_129, obj_t BgL_methodz00_130, obj_t BgL_namez00_131)
{
{ /* Llib/object.scm 1245 */
if(
BGL_CLASSP(BgL_classz00_129))
{ /* Llib/object.scm 1249 */
 bool_t BgL_test4811z00_10363;
{ /* Llib/object.scm 1249 */
 bool_t BgL_test4812z00_10364;
{ /* Llib/object.scm 1249 */
 int BgL_arg1779z00_1655; int BgL_arg1781z00_1656;
BgL_arg1779z00_1655 = 
PROCEDURE_ARITY(BgL_genericz00_128); 
BgL_arg1781z00_1656 = 
PROCEDURE_ARITY(BgL_methodz00_130); 
BgL_test4812z00_10364 = 
(
(long)(BgL_arg1779z00_1655)==
(long)(BgL_arg1781z00_1656)); } 
if(BgL_test4812z00_10364)
{ /* Llib/object.scm 1249 */
BgL_test4811z00_10363 = ((bool_t)0)
; }  else 
{ /* Llib/object.scm 1250 */
 int BgL_arg1778z00_1654;
BgL_arg1778z00_1654 = 
PROCEDURE_ARITY(BgL_genericz00_128); 
BgL_test4811z00_10363 = 
(
(long)(BgL_arg1778z00_1654)>=0L); } } 
if(BgL_test4811z00_10363)
{ /* Llib/object.scm 1252 */
 obj_t BgL_arg1773z00_1649; int BgL_arg1775z00_1650;
{ /* Llib/object.scm 1252 */
 int BgL_arg1776z00_1651;
BgL_arg1776z00_1651 = 
PROCEDURE_ARITY(BgL_genericz00_128); 
{ /* Llib/object.scm 1251 */
 obj_t BgL_list1777z00_1652;
BgL_list1777z00_1652 = 
MAKE_YOUNG_PAIR(
BINT(BgL_arg1776z00_1651), BNIL); 
BgL_arg1773z00_1649 = 
BGl_formatz00zz__r4_output_6_10_3z00(BGl_string3620z00zz__objectz00, BgL_list1777z00_1652); } } 
BgL_arg1775z00_1650 = 
PROCEDURE_ARITY(BgL_methodz00_130); 
{ /* Llib/object.scm 1251 */
 obj_t BgL_aux3129z00_5812;
BgL_aux3129z00_5812 = 
BGl_errorz00zz__errorz00(BgL_namez00_131, BgL_arg1773z00_1649, 
BINT(BgL_arg1775z00_1650)); 
if(
PROCEDUREP(BgL_aux3129z00_5812))
{ /* Llib/object.scm 1251 */
return BgL_aux3129z00_5812;}  else 
{ 
 obj_t BgL_auxz00_10382;
BgL_auxz00_10382 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(54146L), BGl_string3621z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3129z00_5812); 
FAILURE(BgL_auxz00_10382,BFALSE,BFALSE);} } }  else 
{ /* Llib/object.scm 1255 */
 obj_t BgL_aux3131z00_5814;
BgL_aux3131z00_5814 = 
BGl_z52addzd2methodz12z92zz__objectz00(BgL_genericz00_128, BgL_classz00_129, BgL_methodz00_130); 
if(
PROCEDUREP(BgL_aux3131z00_5814))
{ /* Llib/object.scm 1255 */
return BgL_aux3131z00_5814;}  else 
{ 
 obj_t BgL_auxz00_10389;
BgL_auxz00_10389 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(54296L), BGl_string3621z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3131z00_5814); 
FAILURE(BgL_auxz00_10389,BFALSE,BFALSE);} } }  else 
{ /* Llib/object.scm 1248 */
 obj_t BgL_aux3133z00_5816;
BgL_aux3133z00_5816 = 
BGl_errorz00zz__errorz00(BgL_namez00_131, BGl_string3622z00zz__objectz00, BgL_classz00_129); 
if(
PROCEDUREP(BgL_aux3133z00_5816))
{ /* Llib/object.scm 1248 */
return BgL_aux3133z00_5816;}  else 
{ 
 obj_t BgL_auxz00_10396;
BgL_auxz00_10396 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53976L), BGl_string3621z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3133z00_5816); 
FAILURE(BgL_auxz00_10396,BFALSE,BFALSE);} } } 

}



/* &generic-add-method! */
obj_t BGl_z62genericzd2addzd2methodz12z70zz__objectz00(obj_t BgL_envz00_4863, obj_t BgL_genericz00_4864, obj_t BgL_classz00_4865, obj_t BgL_methodz00_4866, obj_t BgL_namez00_4867)
{
{ /* Llib/object.scm 1245 */
{ /* Llib/object.scm 1247 */
 obj_t BgL_auxz00_10407; obj_t BgL_auxz00_10400;
if(
PROCEDUREP(BgL_methodz00_4866))
{ /* Llib/object.scm 1247 */
BgL_auxz00_10407 = BgL_methodz00_4866
; }  else 
{ 
 obj_t BgL_auxz00_10410;
BgL_auxz00_10410 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53947L), BGl_string3623z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_methodz00_4866); 
FAILURE(BgL_auxz00_10410,BFALSE,BFALSE);} 
if(
PROCEDUREP(BgL_genericz00_4864))
{ /* Llib/object.scm 1247 */
BgL_auxz00_10400 = BgL_genericz00_4864
; }  else 
{ 
 obj_t BgL_auxz00_10403;
BgL_auxz00_10403 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(53947L), BGl_string3623z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4864); 
FAILURE(BgL_auxz00_10403,BFALSE,BFALSE);} 
return 
BGl_genericzd2addzd2methodz12z12zz__objectz00(BgL_auxz00_10400, BgL_classz00_4865, BgL_auxz00_10407, BgL_namez00_4867);} } 

}



/* generic-add-eval-method! */
BGL_EXPORTED_DEF obj_t BGl_genericzd2addzd2evalzd2methodz12zc0zz__objectz00(obj_t BgL_genericz00_132, obj_t BgL_classz00_133, obj_t BgL_methodz00_134, obj_t BgL_namez00_135)
{
{ /* Llib/object.scm 1265 */
if(
BGL_CLASSP(BgL_classz00_133))
{ /* Llib/object.scm 1269 */
 bool_t BgL_test4819z00_10417;
{ /* Llib/object.scm 1269 */
 bool_t BgL_test4820z00_10418;
{ /* Llib/object.scm 1269 */
 int BgL_arg1800z00_1676; int BgL_arg1801z00_1677;
BgL_arg1800z00_1676 = 
PROCEDURE_ARITY(BgL_genericz00_132); 
BgL_arg1801z00_1677 = 
PROCEDURE_ARITY(BgL_methodz00_134); 
BgL_test4820z00_10418 = 
(
(long)(BgL_arg1800z00_1676)==
(long)(BgL_arg1801z00_1677)); } 
if(BgL_test4820z00_10418)
{ /* Llib/object.scm 1269 */
BgL_test4819z00_10417 = ((bool_t)0)
; }  else 
{ /* Llib/object.scm 1270 */
 bool_t BgL_test4821z00_10424;
{ /* Llib/object.scm 1270 */
 int BgL_arg1799z00_1675;
BgL_arg1799z00_1675 = 
PROCEDURE_ARITY(BgL_genericz00_132); 
BgL_test4821z00_10424 = 
(
(long)(BgL_arg1799z00_1675)>4L); } 
if(BgL_test4821z00_10424)
{ /* Llib/object.scm 1271 */
 int BgL_arg1798z00_1674;
BgL_arg1798z00_1674 = 
PROCEDURE_ARITY(BgL_methodz00_134); 
BgL_test4819z00_10417 = 
(
(long)(BgL_arg1798z00_1674)>=0L); }  else 
{ /* Llib/object.scm 1270 */
BgL_test4819z00_10417 = ((bool_t)0)
; } } } 
if(BgL_test4819z00_10417)
{ /* Llib/object.scm 1273 */
 obj_t BgL_arg1793z00_1668; int BgL_arg1794z00_1669;
{ /* Llib/object.scm 1273 */
 int BgL_arg1795z00_1670;
BgL_arg1795z00_1670 = 
PROCEDURE_ARITY(BgL_genericz00_132); 
{ /* Llib/object.scm 1272 */
 obj_t BgL_list1796z00_1671;
BgL_list1796z00_1671 = 
MAKE_YOUNG_PAIR(
BINT(BgL_arg1795z00_1670), BNIL); 
BgL_arg1793z00_1668 = 
BGl_formatz00zz__r4_output_6_10_3z00(BGl_string3620z00zz__objectz00, BgL_list1796z00_1671); } } 
BgL_arg1794z00_1669 = 
PROCEDURE_ARITY(BgL_methodz00_134); 
{ /* Llib/object.scm 1272 */
 obj_t BgL_aux3139z00_5822;
BgL_aux3139z00_5822 = 
BGl_errorz00zz__errorz00(BgL_namez00_135, BgL_arg1793z00_1668, 
BINT(BgL_arg1794z00_1669)); 
if(
PROCEDUREP(BgL_aux3139z00_5822))
{ /* Llib/object.scm 1272 */
return BgL_aux3139z00_5822;}  else 
{ 
 obj_t BgL_auxz00_10440;
BgL_auxz00_10440 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55241L), BGl_string3624z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3139z00_5822); 
FAILURE(BgL_auxz00_10440,BFALSE,BFALSE);} } }  else 
{ /* Llib/object.scm 1276 */
 obj_t BgL_aux3141z00_5824;
BgL_aux3141z00_5824 = 
BGl_z52addzd2methodz12z92zz__objectz00(BgL_genericz00_132, BgL_classz00_133, BgL_methodz00_134); 
if(
PROCEDUREP(BgL_aux3141z00_5824))
{ /* Llib/object.scm 1276 */
return BgL_aux3141z00_5824;}  else 
{ 
 obj_t BgL_auxz00_10447;
BgL_auxz00_10447 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55391L), BGl_string3624z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3141z00_5824); 
FAILURE(BgL_auxz00_10447,BFALSE,BFALSE);} } }  else 
{ /* Llib/object.scm 1268 */
 obj_t BgL_aux3143z00_5826;
BgL_aux3143z00_5826 = 
BGl_errorz00zz__errorz00(BgL_namez00_135, BGl_string3622z00zz__objectz00, BgL_classz00_133); 
if(
PROCEDUREP(BgL_aux3143z00_5826))
{ /* Llib/object.scm 1268 */
return BgL_aux3143z00_5826;}  else 
{ 
 obj_t BgL_auxz00_10454;
BgL_auxz00_10454 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55033L), BGl_string3624z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3143z00_5826); 
FAILURE(BgL_auxz00_10454,BFALSE,BFALSE);} } } 

}



/* &generic-add-eval-method! */
obj_t BGl_z62genericzd2addzd2evalzd2methodz12za2zz__objectz00(obj_t BgL_envz00_4868, obj_t BgL_genericz00_4869, obj_t BgL_classz00_4870, obj_t BgL_methodz00_4871, obj_t BgL_namez00_4872)
{
{ /* Llib/object.scm 1265 */
{ /* Llib/object.scm 1267 */
 obj_t BgL_auxz00_10465; obj_t BgL_auxz00_10458;
if(
PROCEDUREP(BgL_methodz00_4871))
{ /* Llib/object.scm 1267 */
BgL_auxz00_10465 = BgL_methodz00_4871
; }  else 
{ 
 obj_t BgL_auxz00_10468;
BgL_auxz00_10468 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55004L), BGl_string3625z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_methodz00_4871); 
FAILURE(BgL_auxz00_10468,BFALSE,BFALSE);} 
if(
PROCEDUREP(BgL_genericz00_4869))
{ /* Llib/object.scm 1267 */
BgL_auxz00_10458 = BgL_genericz00_4869
; }  else 
{ 
 obj_t BgL_auxz00_10461;
BgL_auxz00_10461 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55004L), BGl_string3625z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4869); 
FAILURE(BgL_auxz00_10461,BFALSE,BFALSE);} 
return 
BGl_genericzd2addzd2evalzd2methodz12zc0zz__objectz00(BgL_auxz00_10458, BgL_classz00_4870, BgL_auxz00_10465, BgL_namez00_4872);} } 

}



/* find-method */
BGL_EXPORTED_DEF obj_t BGl_findzd2methodzd2zz__objectz00(BgL_objectz00_bglt BgL_objz00_136, obj_t BgL_genericz00_137)
{
{ /* Llib/object.scm 1283 */
{ /* Llib/object.scm 1284 */
 long BgL_objzd2classzd2numz00_6441;
BgL_objzd2classzd2numz00_6441 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_136); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arg1803z00_6442;
BgL_arg1803z00_6442 = 
PROCEDURE_REF(BgL_genericz00_137, 
(int)(1L)); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arrayz00_6443; int BgL_offsetz00_6444;
if(
VECTORP(BgL_arg1803z00_6442))
{ /* Llib/object.scm 1285 */
BgL_arrayz00_6443 = BgL_arg1803z00_6442; }  else 
{ 
 obj_t BgL_auxz00_10478;
BgL_auxz00_10478 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55952L), BGl_string3626z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arg1803z00_6442); 
FAILURE(BgL_auxz00_10478,BFALSE,BFALSE);} 
BgL_offsetz00_6444 = 
(int)(BgL_objzd2classzd2numz00_6441); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_6445;
BgL_offsetz00_6445 = 
(
(long)(BgL_offsetz00_6444)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_6446;
BgL_modz00_6446 = 
(BgL_offsetz00_6445 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_6447;
BgL_restz00_6447 = 
(BgL_offsetz00_6445 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_6448;
BgL_bucketz00_6448 = 
VECTOR_REF(BgL_arrayz00_6443,BgL_modz00_6446); 
{ /* Llib/object.scm 935 */
 obj_t BgL_vectorz00_6449;
if(
VECTORP(BgL_bucketz00_6448))
{ /* Llib/object.scm 935 */
BgL_vectorz00_6449 = BgL_bucketz00_6448; }  else 
{ 
 obj_t BgL_auxz00_10502;
BgL_auxz00_10502 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41128L), BGl_string3626z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_6448); 
FAILURE(BgL_auxz00_10502,BFALSE,BFALSE);} 
{ /* Llib/object.scm 935 */
 obj_t BgL_aux3153z00_6450;
BgL_aux3153z00_6450 = 
VECTOR_REF(BgL_vectorz00_6449,BgL_restz00_6447); 
if(
PROCEDUREP(BgL_aux3153z00_6450))
{ /* Llib/object.scm 935 */
return BgL_aux3153z00_6450;}  else 
{ 
 obj_t BgL_auxz00_10509;
BgL_auxz00_10509 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41113L), BGl_string3626z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3153z00_6450); 
FAILURE(BgL_auxz00_10509,BFALSE,BFALSE);} } } } } } } } } } } } 

}



/* &find-method */
obj_t BGl_z62findzd2methodzb0zz__objectz00(obj_t BgL_envz00_4873, obj_t BgL_objz00_4874, obj_t BgL_genericz00_4875)
{
{ /* Llib/object.scm 1283 */
{ /* Llib/object.scm 1284 */
 obj_t BgL_auxz00_10521; BgL_objectz00_bglt BgL_auxz00_10513;
if(
PROCEDUREP(BgL_genericz00_4875))
{ /* Llib/object.scm 1284 */
BgL_auxz00_10521 = BgL_genericz00_4875
; }  else 
{ 
 obj_t BgL_auxz00_10524;
BgL_auxz00_10524 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55845L), BGl_string3627z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4875); 
FAILURE(BgL_auxz00_10524,BFALSE,BFALSE);} 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4874, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1284 */
BgL_auxz00_10513 = 
((BgL_objectz00_bglt)BgL_objz00_4874)
; }  else 
{ 
 obj_t BgL_auxz00_10517;
BgL_auxz00_10517 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(55845L), BGl_string3627z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4874); 
FAILURE(BgL_auxz00_10517,BFALSE,BFALSE);} 
return 
BGl_findzd2methodzd2zz__objectz00(BgL_auxz00_10513, BgL_auxz00_10521);} } 

}



/* find-super-class-method */
BGL_EXPORTED_DEF obj_t BGl_findzd2superzd2classzd2methodzd2zz__objectz00(BgL_objectz00_bglt BgL_objz00_138, obj_t BgL_genericz00_139, obj_t BgL_classz00_140)
{
{ /* Llib/object.scm 1292 */
{ /* Llib/object.scm 1293 */
 obj_t BgL_g1221z00_1680;
{ /* Llib/object.scm 1293 */
 obj_t BgL_classz00_3500;
if(
BGL_CLASSP(BgL_classz00_140))
{ /* Llib/object.scm 1293 */
BgL_classz00_3500 = BgL_classz00_140; }  else 
{ 
 obj_t BgL_auxz00_10531;
BgL_auxz00_10531 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(56428L), BGl_string3628z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_140); 
FAILURE(BgL_auxz00_10531,BFALSE,BFALSE);} 
BgL_g1221z00_1680 = 
BGL_CLASS_SUPER(BgL_classz00_3500); } 
{ 
 obj_t BgL_superz00_1682;
{ /* Llib/object.scm 1293 */
 obj_t BgL_aux3171z00_5856;
BgL_superz00_1682 = BgL_g1221z00_1680; 
BgL_zc3z04anonymousza31804ze3z87_1683:
if(
BGL_CLASSP(BgL_superz00_1682))
{ /* Llib/object.scm 1296 */
 long BgL_objzd2superzd2classzd2numzd2_1685;
{ /* Llib/object.scm 1296 */
 obj_t BgL_classz00_3501;
if(
BGL_CLASSP(BgL_superz00_1682))
{ /* Llib/object.scm 1296 */
BgL_classz00_3501 = BgL_superz00_1682; }  else 
{ 
 obj_t BgL_auxz00_10540;
BgL_auxz00_10540 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(56540L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_1682); 
FAILURE(BgL_auxz00_10540,BFALSE,BFALSE);} 
BgL_objzd2superzd2classzd2numzd2_1685 = 
BGL_CLASS_INDEX(BgL_classz00_3501); } 
{ /* Llib/object.scm 1297 */
 obj_t BgL_methodz00_1686;
{ /* Llib/object.scm 1298 */
 obj_t BgL_arg1807z00_1688;
BgL_arg1807z00_1688 = 
PROCEDURE_REF(BgL_genericz00_139, 
(int)(1L)); 
{ /* Llib/object.scm 1297 */
 obj_t BgL_arrayz00_3504; int BgL_offsetz00_3505;
if(
VECTORP(BgL_arg1807z00_1688))
{ /* Llib/object.scm 1298 */
BgL_arrayz00_3504 = BgL_arg1807z00_1688; }  else 
{ 
 obj_t BgL_auxz00_10549;
BgL_auxz00_10549 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(56633L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arg1807z00_1688); 
FAILURE(BgL_auxz00_10549,BFALSE,BFALSE);} 
BgL_offsetz00_3505 = 
(int)(BgL_objzd2superzd2classzd2numzd2_1685); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_3506;
BgL_offsetz00_3506 = 
(
(long)(BgL_offsetz00_3505)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_3507;
BgL_modz00_3507 = 
(BgL_offsetz00_3506 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_3509;
BgL_restz00_3509 = 
(BgL_offsetz00_3506 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_3511;
BgL_bucketz00_3511 = 
VECTOR_REF(BgL_arrayz00_3504,BgL_modz00_3507); 
{ /* Llib/object.scm 935 */
 obj_t BgL_vectorz00_3528;
if(
VECTORP(BgL_bucketz00_3511))
{ /* Llib/object.scm 935 */
BgL_vectorz00_3528 = BgL_bucketz00_3511; }  else 
{ 
 obj_t BgL_auxz00_10573;
BgL_auxz00_10573 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41128L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_3511); 
FAILURE(BgL_auxz00_10573,BFALSE,BFALSE);} 
BgL_methodz00_1686 = 
VECTOR_REF(BgL_vectorz00_3528,BgL_restz00_3509); } } } } } } } } 
if(
CBOOL(BgL_methodz00_1686))
{ /* Llib/object.scm 1300 */
BgL_aux3171z00_5856 = BgL_methodz00_1686; }  else 
{ /* Llib/object.scm 1302 */
 obj_t BgL_newzd2superzd2_1687;
{ /* Llib/object.scm 1302 */
 obj_t BgL_classz00_3530;
if(
BGL_CLASSP(BgL_superz00_1682))
{ /* Llib/object.scm 1302 */
BgL_classz00_3530 = BgL_superz00_1682; }  else 
{ 
 obj_t BgL_auxz00_10582;
BgL_auxz00_10582 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(56729L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_1682); 
FAILURE(BgL_auxz00_10582,BFALSE,BFALSE);} 
BgL_newzd2superzd2_1687 = 
BGL_CLASS_SUPER(BgL_classz00_3530); } 
{ 
 obj_t BgL_superz00_10587;
BgL_superz00_10587 = BgL_newzd2superzd2_1687; 
BgL_superz00_1682 = BgL_superz00_10587; 
goto BgL_zc3z04anonymousza31804ze3z87_1683;} } } }  else 
{ /* Llib/object.scm 1295 */
 obj_t BgL_res2661z00_3532;
{ /* Llib/object.scm 900 */
 obj_t BgL_aux3169z00_5854;
BgL_aux3169z00_5854 = 
PROCEDURE_REF(BgL_genericz00_139, 
(int)(0L)); 
if(
PROCEDUREP(BgL_aux3169z00_5854))
{ /* Llib/object.scm 900 */
BgL_res2661z00_3532 = BgL_aux3169z00_5854; }  else 
{ 
 obj_t BgL_auxz00_10592;
BgL_auxz00_10592 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39357L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3169z00_5854); 
FAILURE(BgL_auxz00_10592,BFALSE,BFALSE);} } 
BgL_aux3171z00_5856 = BgL_res2661z00_3532; } 
if(
PROCEDUREP(BgL_aux3171z00_5856))
{ /* Llib/object.scm 1293 */
return BgL_aux3171z00_5856;}  else 
{ 
 obj_t BgL_auxz00_10598;
BgL_auxz00_10598 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(56397L), BGl_string3628z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3171z00_5856); 
FAILURE(BgL_auxz00_10598,BFALSE,BFALSE);} } } } } 

}



/* &find-super-class-method */
obj_t BGl_z62findzd2superzd2classzd2methodzb0zz__objectz00(obj_t BgL_envz00_4876, obj_t BgL_objz00_4877, obj_t BgL_genericz00_4878, obj_t BgL_classz00_4879)
{
{ /* Llib/object.scm 1292 */
{ /* Llib/object.scm 1293 */
 obj_t BgL_auxz00_10610; BgL_objectz00_bglt BgL_auxz00_10602;
if(
PROCEDUREP(BgL_genericz00_4878))
{ /* Llib/object.scm 1293 */
BgL_auxz00_10610 = BgL_genericz00_4878
; }  else 
{ 
 obj_t BgL_auxz00_10613;
BgL_auxz00_10613 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(56397L), BGl_string3629z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4878); 
FAILURE(BgL_auxz00_10613,BFALSE,BFALSE);} 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4877, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1293 */
BgL_auxz00_10602 = 
((BgL_objectz00_bglt)BgL_objz00_4877)
; }  else 
{ 
 obj_t BgL_auxz00_10606;
BgL_auxz00_10606 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(56397L), BGl_string3629z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4877); 
FAILURE(BgL_auxz00_10606,BFALSE,BFALSE);} 
return 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(BgL_auxz00_10602, BgL_auxz00_10610, BgL_classz00_4879);} } 

}



/* find-method-from */
BGL_EXPORTED_DEF obj_t BGl_findzd2methodzd2fromz00zz__objectz00(BgL_objectz00_bglt BgL_objz00_141, obj_t BgL_genericz00_142, obj_t BgL_classz00_143)
{
{ /* Llib/object.scm 1308 */
{ 
 obj_t BgL_classz00_1691;
BgL_classz00_1691 = BgL_classz00_143; 
BgL_zc3z04anonymousza31808ze3z87_1692:
if(
BGL_CLASSP(BgL_classz00_1691))
{ /* Llib/object.scm 1312 */
 long BgL_objzd2superzd2classzd2numzd2_1694;
{ /* Llib/object.scm 1312 */
 obj_t BgL_classz00_3533;
if(
BGL_CLASSP(BgL_classz00_1691))
{ /* Llib/object.scm 1312 */
BgL_classz00_3533 = BgL_classz00_1691; }  else 
{ 
 obj_t BgL_auxz00_10622;
BgL_auxz00_10622 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57158L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_1691); 
FAILURE(BgL_auxz00_10622,BFALSE,BFALSE);} 
BgL_objzd2superzd2classzd2numzd2_1694 = 
BGL_CLASS_INDEX(BgL_classz00_3533); } 
{ /* Llib/object.scm 1313 */
 obj_t BgL_methodz00_1695;
{ /* Llib/object.scm 1314 */
 obj_t BgL_arg1812z00_1697;
BgL_arg1812z00_1697 = 
PROCEDURE_REF(BgL_genericz00_142, 
(int)(1L)); 
{ /* Llib/object.scm 1313 */
 obj_t BgL_arrayz00_3536; int BgL_offsetz00_3537;
if(
VECTORP(BgL_arg1812z00_1697))
{ /* Llib/object.scm 1314 */
BgL_arrayz00_3536 = BgL_arg1812z00_1697; }  else 
{ 
 obj_t BgL_auxz00_10631;
BgL_auxz00_10631 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57251L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_arg1812z00_1697); 
FAILURE(BgL_auxz00_10631,BFALSE,BFALSE);} 
BgL_offsetz00_3537 = 
(int)(BgL_objzd2superzd2classzd2numzd2_1694); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_3538;
BgL_offsetz00_3538 = 
(
(long)(BgL_offsetz00_3537)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_3539;
BgL_modz00_3539 = 
(BgL_offsetz00_3538 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_3541;
BgL_restz00_3541 = 
(BgL_offsetz00_3538 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_3543;
BgL_bucketz00_3543 = 
VECTOR_REF(BgL_arrayz00_3536,BgL_modz00_3539); 
{ /* Llib/object.scm 935 */
 obj_t BgL_vectorz00_3560;
if(
VECTORP(BgL_bucketz00_3543))
{ /* Llib/object.scm 935 */
BgL_vectorz00_3560 = BgL_bucketz00_3543; }  else 
{ 
 obj_t BgL_auxz00_10655;
BgL_auxz00_10655 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(41128L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_bucketz00_3543); 
FAILURE(BgL_auxz00_10655,BFALSE,BFALSE);} 
BgL_methodz00_1695 = 
VECTOR_REF(BgL_vectorz00_3560,BgL_restz00_3541); } } } } } } } } 
if(
CBOOL(BgL_methodz00_1695))
{ /* Llib/object.scm 1316 */
return 
MAKE_YOUNG_PAIR(BgL_classz00_1691, BgL_methodz00_1695);}  else 
{ /* Llib/object.scm 1318 */
 obj_t BgL_arg1811z00_1696;
{ /* Llib/object.scm 1318 */
 obj_t BgL_classz00_3562;
if(
BGL_CLASSP(BgL_classz00_1691))
{ /* Llib/object.scm 1318 */
BgL_classz00_3562 = BgL_classz00_1691; }  else 
{ 
 obj_t BgL_auxz00_10665;
BgL_auxz00_10665 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57349L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_1691); 
FAILURE(BgL_auxz00_10665,BFALSE,BFALSE);} 
BgL_arg1811z00_1696 = 
BGL_CLASS_SUPER(BgL_classz00_3562); } 
{ 
 obj_t BgL_classz00_10670;
BgL_classz00_10670 = BgL_arg1811z00_1696; 
BgL_classz00_1691 = BgL_classz00_10670; 
goto BgL_zc3z04anonymousza31808ze3z87_1692;} } } }  else 
{ /* Llib/object.scm 1310 */
return 
MAKE_YOUNG_PAIR(BFALSE, BFALSE);} } } 

}



/* &find-method-from */
obj_t BGl_z62findzd2methodzd2fromz62zz__objectz00(obj_t BgL_envz00_4880, obj_t BgL_objz00_4881, obj_t BgL_genericz00_4882, obj_t BgL_classz00_4883)
{
{ /* Llib/object.scm 1308 */
{ /* Llib/object.scm 1310 */
 obj_t BgL_auxz00_10680; BgL_objectz00_bglt BgL_auxz00_10672;
if(
PROCEDUREP(BgL_genericz00_4882))
{ /* Llib/object.scm 1310 */
BgL_auxz00_10680 = BgL_genericz00_4882
; }  else 
{ 
 obj_t BgL_auxz00_10683;
BgL_auxz00_10683 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57074L), BGl_string3630z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_genericz00_4882); 
FAILURE(BgL_auxz00_10683,BFALSE,BFALSE);} 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4881, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1310 */
BgL_auxz00_10672 = 
((BgL_objectz00_bglt)BgL_objz00_4881)
; }  else 
{ 
 obj_t BgL_auxz00_10676;
BgL_auxz00_10676 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57074L), BGl_string3630z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4881); 
FAILURE(BgL_auxz00_10676,BFALSE,BFALSE);} 
return 
BGl_findzd2methodzd2fromz00zz__objectz00(BgL_auxz00_10672, BgL_auxz00_10680, BgL_classz00_4883);} } 

}



/* nil? */
BGL_EXPORTED_DEF bool_t BGl_nilzf3zf3zz__objectz00(BgL_objectz00_bglt BgL_objz00_144)
{
{ /* Llib/object.scm 1323 */
{ /* Llib/object.scm 1324 */
 obj_t BgL_klassz00_3563;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_3566; long BgL_arg1554z00_3567;
BgL_arg1552z00_3566 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_3568;
BgL_arg1555z00_3568 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_144); 
BgL_arg1554z00_3567 = 
(BgL_arg1555z00_3568-OBJECT_TYPE); } 
BgL_klassz00_3563 = 
VECTOR_REF(BgL_arg1552z00_3566,BgL_arg1554z00_3567); } 
{ /* Llib/object.scm 1325 */
 obj_t BgL_arg1813z00_3564;
{ /* Llib/object.scm 1325 */
 obj_t BgL_classz00_3574;
if(
BGL_CLASSP(BgL_klassz00_3563))
{ /* Llib/object.scm 1325 */
BgL_classz00_3574 = BgL_klassz00_3563; }  else 
{ 
 obj_t BgL_auxz00_10694;
BgL_auxz00_10694 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57675L), BGl_string3631z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_klassz00_3563); 
FAILURE(BgL_auxz00_10694,BFALSE,BFALSE);} 
if(
BGL_CLASSP(BgL_classz00_3574))
{ /* Llib/object.scm 758 */
 obj_t BgL__ortest_1220z00_3576;
BgL__ortest_1220z00_3576 = 
BGL_CLASS_NIL(BgL_classz00_3574); 
if(
CBOOL(BgL__ortest_1220z00_3576))
{ /* Llib/object.scm 758 */
BgL_arg1813z00_3564 = BgL__ortest_1220z00_3576; }  else 
{ /* Llib/object.scm 758 */
BgL_arg1813z00_3564 = 
BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_3574); } }  else 
{ /* Llib/object.scm 757 */
BgL_arg1813z00_3564 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3563z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_3574); } } 
return 
(BgL_arg1813z00_3564==
((obj_t)BgL_objz00_144));} } } 

}



/* &nil? */
obj_t BGl_z62nilzf3z91zz__objectz00(obj_t BgL_envz00_4884, obj_t BgL_objz00_4885)
{
{ /* Llib/object.scm 1323 */
{ /* Llib/object.scm 1324 */
 bool_t BgL_tmpz00_10707;
{ /* Llib/object.scm 1324 */
 BgL_objectz00_bglt BgL_auxz00_10708;
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4885, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1324 */
BgL_auxz00_10708 = 
((BgL_objectz00_bglt)BgL_objz00_4885)
; }  else 
{ 
 obj_t BgL_auxz00_10712;
BgL_auxz00_10712 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57619L), BGl_string3632z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4885); 
FAILURE(BgL_auxz00_10712,BFALSE,BFALSE);} 
BgL_tmpz00_10707 = 
BGl_nilzf3zf3zz__objectz00(BgL_auxz00_10708); } 
return 
BBOOL(BgL_tmpz00_10707);} } 

}



/* isa? */
BGL_EXPORTED_DEF bool_t BGl_isazf3zf3zz__objectz00(obj_t BgL_objz00_145, obj_t BgL_classz00_146)
{
{ /* Llib/object.scm 1332 */
if(
BGL_OBJECTP(BgL_objz00_145))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6451; long BgL_arg1816z00_6452;
BgL_arg1815z00_6451 = 
(BgL_objectz00_bglt)(BgL_objz00_145); 
BgL_arg1816z00_6452 = 
BGL_CLASS_DEPTH(BgL_classz00_146); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6453;
BgL_idxz00_6453 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6451); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6454;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6455;
BgL_arg1825z00_6455 = 
(BgL_idxz00_6453+BgL_arg1816z00_6452); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6456;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6457;
BgL_aux3193z00_6457 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6457))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6456 = BgL_aux3193z00_6457; }  else 
{ 
 obj_t BgL_auxz00_10728;
BgL_auxz00_10728 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6457); 
FAILURE(BgL_auxz00_10728,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4858z00_10732;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_10733;
BgL_tmpz00_10733 = 
VECTOR_LENGTH(BgL_vectorz00_6456); 
BgL_test4858z00_10732 = 
BOUND_CHECK(BgL_arg1825z00_6455, BgL_tmpz00_10733); } 
if(BgL_test4858z00_10732)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6454 = 
VECTOR_REF(BgL_vectorz00_6456,BgL_arg1825z00_6455); }  else 
{ 
 obj_t BgL_auxz00_10737;
BgL_auxz00_10737 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6456, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6456)), 
(int)(BgL_arg1825z00_6455)); 
FAILURE(BgL_auxz00_10737,BFALSE,BFALSE);} } } } 
return 
(BgL_arg1824z00_6454==BgL_classz00_146);} }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6458;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6459;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6460; long BgL_arg1554z00_6461;
BgL_arg1552z00_6460 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6462;
BgL_arg1555z00_6462 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6451); 
BgL_arg1554z00_6461 = 
(BgL_arg1555z00_6462-OBJECT_TYPE); } 
BgL_oclassz00_6459 = 
VECTOR_REF(BgL_arg1552z00_6460,BgL_arg1554z00_6461); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6463;
BgL__ortest_1222z00_6463 = 
(BgL_classz00_146==BgL_oclassz00_6459); 
if(BgL__ortest_1222z00_6463)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6458 = BgL__ortest_1222z00_6463; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6464;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6465;
BgL_arg1822z00_6465 = 
(BgL_oclassz00_6459); 
BgL_odepthz00_6464 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6465); } 
if(
(BgL_arg1816z00_6452<BgL_odepthz00_6464))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6466;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6467;
BgL_arg1821z00_6467 = 
(BgL_oclassz00_6459); 
BgL_arg1820z00_6466 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6467, BgL_arg1816z00_6452); } 
BgL_res2666z00_6458 = 
(BgL_arg1820z00_6466==BgL_classz00_146); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6458 = ((bool_t)0); } } } } 
return BgL_res2666z00_6458;} }  else 
{ /* Llib/object.scm 1333 */
return ((bool_t)0);} } 

}



/* &isa? */
obj_t BGl_z62isazf3z91zz__objectz00(obj_t BgL_envz00_4886, obj_t BgL_objz00_4887, obj_t BgL_classz00_4888)
{
{ /* Llib/object.scm 1332 */
{ /* Llib/object.scm 1333 */
 bool_t BgL_tmpz00_10758;
{ /* Llib/object.scm 1333 */
 obj_t BgL_auxz00_10759;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4888))
{ /* Llib/object.scm 1333 */
BgL_auxz00_10759 = BgL_classz00_4888
; }  else 
{ 
 obj_t BgL_auxz00_10762;
BgL_auxz00_10762 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(58095L), BGl_string3635z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4888); 
FAILURE(BgL_auxz00_10762,BFALSE,BFALSE);} 
BgL_tmpz00_10758 = 
BGl_isazf3zf3zz__objectz00(BgL_objz00_4887, BgL_auxz00_10759); } 
return 
BBOOL(BgL_tmpz00_10758);} } 

}



/* %isa/cdepth? */
BGL_EXPORTED_DEF bool_t BGl_z52isazf2cdepthzf3z53zz__objectz00(obj_t BgL_objz00_147, obj_t BgL_classz00_148, long BgL_cdepthz00_149)
{
{ /* Llib/object.scm 1339 */
if(
BGL_OBJECTP(BgL_objz00_147))
{ /* Llib/object.scm 1341 */
 BgL_objectz00_bglt BgL_arg1818z00_6468;
BgL_arg1818z00_6468 = 
(BgL_objectz00_bglt)(BgL_objz00_147); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6469;
BgL_idxz00_6469 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1818z00_6468); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6470;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6471;
BgL_arg1825z00_6471 = 
(BgL_idxz00_6469+BgL_cdepthz00_149); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6472;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3197z00_6473;
BgL_aux3197z00_6473 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3197z00_6473))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6472 = BgL_aux3197z00_6473; }  else 
{ 
 obj_t BgL_auxz00_10777;
BgL_auxz00_10777 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3636z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3197z00_6473); 
FAILURE(BgL_auxz00_10777,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4865z00_10781;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_10782;
BgL_tmpz00_10782 = 
VECTOR_LENGTH(BgL_vectorz00_6472); 
BgL_test4865z00_10781 = 
BOUND_CHECK(BgL_arg1825z00_6471, BgL_tmpz00_10782); } 
if(BgL_test4865z00_10781)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6470 = 
VECTOR_REF(BgL_vectorz00_6472,BgL_arg1825z00_6471); }  else 
{ 
 obj_t BgL_auxz00_10786;
BgL_auxz00_10786 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6472, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6472)), 
(int)(BgL_arg1825z00_6471)); 
FAILURE(BgL_auxz00_10786,BFALSE,BFALSE);} } } } 
return 
(BgL_arg1824z00_6470==BgL_classz00_148);} }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2667z00_6474;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6475;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6476; long BgL_arg1554z00_6477;
BgL_arg1552z00_6476 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6478;
BgL_arg1555z00_6478 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1818z00_6468); 
BgL_arg1554z00_6477 = 
(BgL_arg1555z00_6478-OBJECT_TYPE); } 
BgL_oclassz00_6475 = 
VECTOR_REF(BgL_arg1552z00_6476,BgL_arg1554z00_6477); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6479;
BgL__ortest_1222z00_6479 = 
(BgL_classz00_148==BgL_oclassz00_6475); 
if(BgL__ortest_1222z00_6479)
{ /* Llib/object.scm 1363 */
BgL_res2667z00_6474 = BgL__ortest_1222z00_6479; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6480;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6481;
BgL_arg1822z00_6481 = 
(BgL_oclassz00_6475); 
BgL_odepthz00_6480 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6481); } 
if(
(BgL_cdepthz00_149<BgL_odepthz00_6480))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6482;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6483;
BgL_arg1821z00_6483 = 
(BgL_oclassz00_6475); 
BgL_arg1820z00_6482 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6483, BgL_cdepthz00_149); } 
BgL_res2667z00_6474 = 
(BgL_arg1820z00_6482==BgL_classz00_148); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2667z00_6474 = ((bool_t)0); } } } } 
return BgL_res2667z00_6474;} }  else 
{ /* Llib/object.scm 1340 */
return ((bool_t)0);} } 

}



/* &%isa/cdepth? */
obj_t BGl_z62z52isazf2cdepthzf3z31zz__objectz00(obj_t BgL_envz00_4889, obj_t BgL_objz00_4890, obj_t BgL_classz00_4891, obj_t BgL_cdepthz00_4892)
{
{ /* Llib/object.scm 1339 */
{ /* Llib/object.scm 1340 */
 bool_t BgL_tmpz00_10807;
{ /* Llib/object.scm 1340 */
 long BgL_auxz00_10815; obj_t BgL_auxz00_10808;
{ /* Llib/object.scm 1340 */
 obj_t BgL_tmpz00_10816;
if(
INTEGERP(BgL_cdepthz00_4892))
{ /* Llib/object.scm 1340 */
BgL_tmpz00_10816 = BgL_cdepthz00_4892
; }  else 
{ 
 obj_t BgL_auxz00_10819;
BgL_auxz00_10819 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(58462L), BGl_string3637z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_cdepthz00_4892); 
FAILURE(BgL_auxz00_10819,BFALSE,BFALSE);} 
BgL_auxz00_10815 = 
(long)CINT(BgL_tmpz00_10816); } 
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4891))
{ /* Llib/object.scm 1340 */
BgL_auxz00_10808 = BgL_classz00_4891
; }  else 
{ 
 obj_t BgL_auxz00_10811;
BgL_auxz00_10811 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(58462L), BGl_string3637z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4891); 
FAILURE(BgL_auxz00_10811,BFALSE,BFALSE);} 
BgL_tmpz00_10807 = 
BGl_z52isazf2cdepthzf3z53zz__objectz00(BgL_objz00_4890, BgL_auxz00_10808, BgL_auxz00_10815); } 
return 
BBOOL(BgL_tmpz00_10807);} } 

}



/* %isa-object/cdepth? */
BGL_EXPORTED_DEF bool_t BGl_z52isazd2objectzf2cdepthzf3z81zz__objectz00(BgL_objectz00_bglt BgL_objz00_150, obj_t BgL_classz00_151, long BgL_cdepthz00_152)
{
{ /* Llib/object.scm 1346 */
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6484;
BgL_idxz00_6484 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_objz00_150); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6485;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6486;
BgL_arg1825z00_6486 = 
(BgL_idxz00_6484+BgL_cdepthz00_152); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6487;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3202z00_6488;
BgL_aux3202z00_6488 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3202z00_6488))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6487 = BgL_aux3202z00_6488; }  else 
{ 
 obj_t BgL_auxz00_10832;
BgL_auxz00_10832 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3638z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3202z00_6488); 
FAILURE(BgL_auxz00_10832,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4872z00_10836;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_10837;
BgL_tmpz00_10837 = 
VECTOR_LENGTH(BgL_vectorz00_6487); 
BgL_test4872z00_10836 = 
BOUND_CHECK(BgL_arg1825z00_6486, BgL_tmpz00_10837); } 
if(BgL_test4872z00_10836)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6485 = 
VECTOR_REF(BgL_vectorz00_6487,BgL_arg1825z00_6486); }  else 
{ 
 obj_t BgL_auxz00_10841;
BgL_auxz00_10841 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6487, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6487)), 
(int)(BgL_arg1825z00_6486)); 
FAILURE(BgL_auxz00_10841,BFALSE,BFALSE);} } } } 
return 
(BgL_arg1824z00_6485==BgL_classz00_151);} }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2668z00_6489;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6490;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6491; long BgL_arg1554z00_6492;
BgL_arg1552z00_6491 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6493;
BgL_arg1555z00_6493 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_150); 
BgL_arg1554z00_6492 = 
(BgL_arg1555z00_6493-OBJECT_TYPE); } 
BgL_oclassz00_6490 = 
VECTOR_REF(BgL_arg1552z00_6491,BgL_arg1554z00_6492); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6494;
BgL__ortest_1222z00_6494 = 
(BgL_classz00_151==BgL_oclassz00_6490); 
if(BgL__ortest_1222z00_6494)
{ /* Llib/object.scm 1363 */
BgL_res2668z00_6489 = BgL__ortest_1222z00_6494; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6495;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6496;
BgL_arg1822z00_6496 = 
(BgL_oclassz00_6490); 
BgL_odepthz00_6495 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6496); } 
if(
(BgL_cdepthz00_152<BgL_odepthz00_6495))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6497;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6498;
BgL_arg1821z00_6498 = 
(BgL_oclassz00_6490); 
BgL_arg1820z00_6497 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6498, BgL_cdepthz00_152); } 
BgL_res2668z00_6489 = 
(BgL_arg1820z00_6497==BgL_classz00_151); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2668z00_6489 = ((bool_t)0); } } } } 
return BgL_res2668z00_6489;} } 

}



/* &%isa-object/cdepth? */
obj_t BGl_z62z52isazd2objectzf2cdepthzf3ze3zz__objectz00(obj_t BgL_envz00_4893, obj_t BgL_objz00_4894, obj_t BgL_classz00_4895, obj_t BgL_cdepthz00_4896)
{
{ /* Llib/object.scm 1346 */
{ /* Llib/object.scm 1352 */
 bool_t BgL_tmpz00_10862;
{ /* Llib/object.scm 1352 */
 long BgL_auxz00_10878; obj_t BgL_auxz00_10871; BgL_objectz00_bglt BgL_auxz00_10863;
{ /* Llib/object.scm 1352 */
 obj_t BgL_tmpz00_10879;
if(
INTEGERP(BgL_cdepthz00_4896))
{ /* Llib/object.scm 1352 */
BgL_tmpz00_10879 = BgL_cdepthz00_4896
; }  else 
{ 
 obj_t BgL_auxz00_10882;
BgL_auxz00_10882 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(59046L), BGl_string3639z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_cdepthz00_4896); 
FAILURE(BgL_auxz00_10882,BFALSE,BFALSE);} 
BgL_auxz00_10878 = 
(long)CINT(BgL_tmpz00_10879); } 
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4895))
{ /* Llib/object.scm 1352 */
BgL_auxz00_10871 = BgL_classz00_4895
; }  else 
{ 
 obj_t BgL_auxz00_10874;
BgL_auxz00_10874 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(59046L), BGl_string3639z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4895); 
FAILURE(BgL_auxz00_10874,BFALSE,BFALSE);} 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4894, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1352 */
BgL_auxz00_10863 = 
((BgL_objectz00_bglt)BgL_objz00_4894)
; }  else 
{ 
 obj_t BgL_auxz00_10867;
BgL_auxz00_10867 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(59046L), BGl_string3639z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4894); 
FAILURE(BgL_auxz00_10867,BFALSE,BFALSE);} 
BgL_tmpz00_10862 = 
BGl_z52isazd2objectzf2cdepthzf3z81zz__objectz00(BgL_auxz00_10863, BgL_auxz00_10871, BgL_auxz00_10878); } 
return 
BBOOL(BgL_tmpz00_10862);} } 

}



/* %isa32-object/cdepth? */
BGL_EXPORTED_DEF bool_t BGl_z52isa32zd2objectzf2cdepthzf3z81zz__objectz00(BgL_objectz00_bglt BgL_objz00_153, obj_t BgL_classz00_154, long BgL_cdepthz00_155)
{
{ /* Llib/object.scm 1361 */
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6499;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6500; long BgL_arg1554z00_6501;
BgL_arg1552z00_6500 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6502;
BgL_arg1555z00_6502 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_153); 
BgL_arg1554z00_6501 = 
(BgL_arg1555z00_6502-OBJECT_TYPE); } 
BgL_oclassz00_6499 = 
VECTOR_REF(BgL_arg1552z00_6500,BgL_arg1554z00_6501); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6503;
BgL__ortest_1222z00_6503 = 
(BgL_classz00_154==BgL_oclassz00_6499); 
if(BgL__ortest_1222z00_6503)
{ /* Llib/object.scm 1363 */
return BgL__ortest_1222z00_6503;}  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6504;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6505;
BgL_arg1822z00_6505 = 
(BgL_oclassz00_6499); 
BgL_odepthz00_6504 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6505); } 
if(
(BgL_cdepthz00_155<BgL_odepthz00_6504))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6506;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6507;
BgL_arg1821z00_6507 = 
(BgL_oclassz00_6499); 
BgL_arg1820z00_6506 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6507, BgL_cdepthz00_155); } 
return 
(BgL_arg1820z00_6506==BgL_classz00_154);}  else 
{ /* Llib/object.scm 1365 */
return ((bool_t)0);} } } } } 

}



/* &%isa32-object/cdepth? */
obj_t BGl_z62z52isa32zd2objectzf2cdepthzf3ze3zz__objectz00(obj_t BgL_envz00_4897, obj_t BgL_objz00_4898, obj_t BgL_classz00_4899, obj_t BgL_cdepthz00_4900)
{
{ /* Llib/object.scm 1361 */
{ /* Llib/object.scm 1362 */
 bool_t BgL_tmpz00_10902;
{ /* Llib/object.scm 1362 */
 long BgL_auxz00_10918; obj_t BgL_auxz00_10911; BgL_objectz00_bglt BgL_auxz00_10903;
{ /* Llib/object.scm 1362 */
 obj_t BgL_tmpz00_10919;
if(
INTEGERP(BgL_cdepthz00_4900))
{ /* Llib/object.scm 1362 */
BgL_tmpz00_10919 = BgL_cdepthz00_4900
; }  else 
{ 
 obj_t BgL_auxz00_10922;
BgL_auxz00_10922 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(59514L), BGl_string3640z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_cdepthz00_4900); 
FAILURE(BgL_auxz00_10922,BFALSE,BFALSE);} 
BgL_auxz00_10918 = 
(long)CINT(BgL_tmpz00_10919); } 
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4899))
{ /* Llib/object.scm 1362 */
BgL_auxz00_10911 = BgL_classz00_4899
; }  else 
{ 
 obj_t BgL_auxz00_10914;
BgL_auxz00_10914 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(59514L), BGl_string3640z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4899); 
FAILURE(BgL_auxz00_10914,BFALSE,BFALSE);} 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4898, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1362 */
BgL_auxz00_10903 = 
((BgL_objectz00_bglt)BgL_objz00_4898)
; }  else 
{ 
 obj_t BgL_auxz00_10907;
BgL_auxz00_10907 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(59514L), BGl_string3640z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4898); 
FAILURE(BgL_auxz00_10907,BFALSE,BFALSE);} 
BgL_tmpz00_10902 = 
BGl_z52isa32zd2objectzf2cdepthzf3z81zz__objectz00(BgL_auxz00_10903, BgL_auxz00_10911, BgL_auxz00_10918); } 
return 
BBOOL(BgL_tmpz00_10902);} } 

}



/* %isa64-object/cdepth? */
BGL_EXPORTED_DEF bool_t BGl_z52isa64zd2objectzf2cdepthzf3z81zz__objectz00(BgL_objectz00_bglt BgL_objz00_156, obj_t BgL_classz00_157, long BgL_cdepthz00_158)
{
{ /* Llib/object.scm 1372 */
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6508;
BgL_idxz00_6508 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_objz00_156); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6509;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6510;
BgL_arg1825z00_6510 = 
(BgL_idxz00_6508+BgL_cdepthz00_158); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6511;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3214z00_6512;
BgL_aux3214z00_6512 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3214z00_6512))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6511 = BgL_aux3214z00_6512; }  else 
{ 
 obj_t BgL_auxz00_10933;
BgL_auxz00_10933 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3641z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3214z00_6512); 
FAILURE(BgL_auxz00_10933,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4884z00_10937;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_10938;
BgL_tmpz00_10938 = 
VECTOR_LENGTH(BgL_vectorz00_6511); 
BgL_test4884z00_10937 = 
BOUND_CHECK(BgL_arg1825z00_6510, BgL_tmpz00_10938); } 
if(BgL_test4884z00_10937)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6509 = 
VECTOR_REF(BgL_vectorz00_6511,BgL_arg1825z00_6510); }  else 
{ 
 obj_t BgL_auxz00_10942;
BgL_auxz00_10942 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6511, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6511)), 
(int)(BgL_arg1825z00_6510)); 
FAILURE(BgL_auxz00_10942,BFALSE,BFALSE);} } } } 
return 
(BgL_arg1824z00_6509==BgL_classz00_157);} } } 

}



/* &%isa64-object/cdepth? */
obj_t BGl_z62z52isa64zd2objectzf2cdepthzf3ze3zz__objectz00(obj_t BgL_envz00_4901, obj_t BgL_objz00_4902, obj_t BgL_classz00_4903, obj_t BgL_cdepthz00_4904)
{
{ /* Llib/object.scm 1372 */
{ /* Llib/object.scm 1375 */
 bool_t BgL_tmpz00_10950;
{ /* Llib/object.scm 1375 */
 long BgL_auxz00_10966; obj_t BgL_auxz00_10959; BgL_objectz00_bglt BgL_auxz00_10951;
{ /* Llib/object.scm 1375 */
 obj_t BgL_tmpz00_10967;
if(
INTEGERP(BgL_cdepthz00_4904))
{ /* Llib/object.scm 1375 */
BgL_tmpz00_10967 = BgL_cdepthz00_4904
; }  else 
{ 
 obj_t BgL_auxz00_10970;
BgL_auxz00_10970 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60057L), BGl_string3642z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_cdepthz00_4904); 
FAILURE(BgL_auxz00_10970,BFALSE,BFALSE);} 
BgL_auxz00_10966 = 
(long)CINT(BgL_tmpz00_10967); } 
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4903))
{ /* Llib/object.scm 1375 */
BgL_auxz00_10959 = BgL_classz00_4903
; }  else 
{ 
 obj_t BgL_auxz00_10962;
BgL_auxz00_10962 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60057L), BGl_string3642z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4903); 
FAILURE(BgL_auxz00_10962,BFALSE,BFALSE);} 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4902, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1375 */
BgL_auxz00_10951 = 
((BgL_objectz00_bglt)BgL_objz00_4902)
; }  else 
{ 
 obj_t BgL_auxz00_10955;
BgL_auxz00_10955 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60057L), BGl_string3642z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4902); 
FAILURE(BgL_auxz00_10955,BFALSE,BFALSE);} 
BgL_tmpz00_10950 = 
BGl_z52isa64zd2objectzf2cdepthzf3z81zz__objectz00(BgL_auxz00_10951, BgL_auxz00_10959, BgL_auxz00_10966); } 
return 
BBOOL(BgL_tmpz00_10950);} } 

}



/* %isa/final? */
BGL_EXPORTED_DEF bool_t BGl_z52isazf2finalzf3z53zz__objectz00(obj_t BgL_objz00_159, obj_t BgL_classz00_160)
{
{ /* Llib/object.scm 1383 */
if(
BGL_OBJECTP(BgL_objz00_159))
{ /* Llib/object.scm 1385 */
 obj_t BgL_oclassz00_6513;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6514; long BgL_arg1554z00_6515;
BgL_arg1552z00_6514 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6516;
BgL_arg1555z00_6516 = 
BGL_OBJECT_CLASS_NUM(
((BgL_objectz00_bglt)BgL_objz00_159)); 
BgL_arg1554z00_6515 = 
(BgL_arg1555z00_6516-OBJECT_TYPE); } 
BgL_oclassz00_6513 = 
VECTOR_REF(BgL_arg1552z00_6514,BgL_arg1554z00_6515); } 
return 
(BgL_oclassz00_6513==BgL_classz00_160);}  else 
{ /* Llib/object.scm 1384 */
return ((bool_t)0);} } 

}



/* &%isa/final? */
obj_t BGl_z62z52isazf2finalzf3z31zz__objectz00(obj_t BgL_envz00_4905, obj_t BgL_objz00_4906, obj_t BgL_classz00_4907)
{
{ /* Llib/object.scm 1383 */
{ /* Llib/object.scm 1384 */
 bool_t BgL_tmpz00_10985;
{ /* Llib/object.scm 1384 */
 obj_t BgL_auxz00_10986;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4907))
{ /* Llib/object.scm 1384 */
BgL_auxz00_10986 = BgL_classz00_4907
; }  else 
{ 
 obj_t BgL_auxz00_10989;
BgL_auxz00_10989 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60452L), BGl_string3643z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4907); 
FAILURE(BgL_auxz00_10989,BFALSE,BFALSE);} 
BgL_tmpz00_10985 = 
BGl_z52isazf2finalzf3z53zz__objectz00(BgL_objz00_4906, BgL_auxz00_10986); } 
return 
BBOOL(BgL_tmpz00_10985);} } 

}



/* %isa-object/final? */
BGL_EXPORTED_DEF bool_t BGl_z52isazd2objectzf2finalzf3z81zz__objectz00(BgL_objectz00_bglt BgL_objz00_161, obj_t BgL_classz00_162)
{
{ /* Llib/object.scm 1391 */
{ /* Llib/object.scm 1392 */
 obj_t BgL_oclassz00_6517;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6518; long BgL_arg1554z00_6519;
BgL_arg1552z00_6518 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6520;
BgL_arg1555z00_6520 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_161); 
BgL_arg1554z00_6519 = 
(BgL_arg1555z00_6520-OBJECT_TYPE); } 
BgL_oclassz00_6517 = 
VECTOR_REF(BgL_arg1552z00_6518,BgL_arg1554z00_6519); } 
return 
(BgL_oclassz00_6517==BgL_classz00_162);} } 

}



/* &%isa-object/final? */
obj_t BGl_z62z52isazd2objectzf2finalzf3ze3zz__objectz00(obj_t BgL_envz00_4908, obj_t BgL_objz00_4909, obj_t BgL_classz00_4910)
{
{ /* Llib/object.scm 1391 */
{ /* Llib/object.scm 1392 */
 bool_t BgL_tmpz00_11000;
{ /* Llib/object.scm 1392 */
 obj_t BgL_auxz00_11009; BgL_objectz00_bglt BgL_auxz00_11001;
if(
BGl_classzf3zf3zz__objectz00(BgL_classz00_4910))
{ /* Llib/object.scm 1392 */
BgL_auxz00_11009 = BgL_classz00_4910
; }  else 
{ 
 obj_t BgL_auxz00_11012;
BgL_auxz00_11012 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60809L), BGl_string3644z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_4910); 
FAILURE(BgL_auxz00_11012,BFALSE,BFALSE);} 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4909, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1392 */
BgL_auxz00_11001 = 
((BgL_objectz00_bglt)BgL_objz00_4909)
; }  else 
{ 
 obj_t BgL_auxz00_11005;
BgL_auxz00_11005 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60809L), BGl_string3644z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4909); 
FAILURE(BgL_auxz00_11005,BFALSE,BFALSE);} 
BgL_tmpz00_11000 = 
BGl_z52isazd2objectzf2finalzf3z81zz__objectz00(BgL_auxz00_11001, BgL_auxz00_11009); } 
return 
BBOOL(BgL_tmpz00_11000);} } 

}



/* allocate-instance */
BGL_EXPORTED_DEF BgL_objectz00_bglt BGl_allocatezd2instancezd2zz__objectz00(obj_t BgL_cnamez00_168)
{
{ /* Llib/object.scm 1418 */
{ 
 long BgL_iz00_1721;
{ /* Llib/object.scm 1419 */
 obj_t BgL_aux3248z00_5951;
BgL_iz00_1721 = 0L; 
BgL_zc3z04anonymousza31827ze3z87_1722:
{ /* Llib/object.scm 1420 */
 bool_t BgL_test4892z00_11018;
{ /* Llib/object.scm 1420 */
 long BgL_n2z00_3734;
{ /* Llib/object.scm 1420 */
 obj_t BgL_tmpz00_11019;
{ /* Llib/object.scm 1420 */
 obj_t BgL_aux3227z00_5926;
BgL_aux3227z00_5926 = BGl_za2nbzd2classesza2zd2zz__objectz00; 
if(
INTEGERP(BgL_aux3227z00_5926))
{ /* Llib/object.scm 1420 */
BgL_tmpz00_11019 = BgL_aux3227z00_5926
; }  else 
{ 
 obj_t BgL_auxz00_11022;
BgL_auxz00_11022 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62256L), BGl_string3484z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3227z00_5926); 
FAILURE(BgL_auxz00_11022,BFALSE,BFALSE);} } 
BgL_n2z00_3734 = 
(long)CINT(BgL_tmpz00_11019); } 
BgL_test4892z00_11018 = 
(BgL_iz00_1721==BgL_n2z00_3734); } 
if(BgL_test4892z00_11018)
{ /* Llib/object.scm 1420 */
BgL_aux3248z00_5951 = 
BGl_errorz00zz__errorz00(BGl_string3645z00zz__objectz00, BGl_string3491z00zz__objectz00, BgL_cnamez00_168); }  else 
{ /* Llib/object.scm 1422 */
 obj_t BgL_classz00_1724;
{ /* Llib/object.scm 1422 */
 obj_t BgL_vectorz00_3735;
{ /* Llib/object.scm 1422 */
 obj_t BgL_aux3228z00_5927;
BgL_aux3228z00_5927 = BGl_za2classesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3228z00_5927))
{ /* Llib/object.scm 1422 */
BgL_vectorz00_3735 = BgL_aux3228z00_5927; }  else 
{ 
 obj_t BgL_auxz00_11031;
BgL_auxz00_11031 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62358L), BGl_string3484z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3228z00_5927); 
FAILURE(BgL_auxz00_11031,BFALSE,BFALSE);} } 
BgL_classz00_1724 = 
VECTOR_REF(BgL_vectorz00_3735,BgL_iz00_1721); } 
{ /* Llib/object.scm 1423 */
 bool_t BgL_test4895z00_11036;
{ /* Llib/object.scm 1423 */
 obj_t BgL_arg1839z00_1736;
{ /* Llib/object.scm 1423 */
 obj_t BgL_classz00_3737;
if(
BGL_CLASSP(BgL_classz00_1724))
{ /* Llib/object.scm 1423 */
BgL_classz00_3737 = BgL_classz00_1724; }  else 
{ 
 obj_t BgL_auxz00_11039;
BgL_auxz00_11039 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62400L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_1724); 
FAILURE(BgL_auxz00_11039,BFALSE,BFALSE);} 
BgL_arg1839z00_1736 = 
BGL_CLASS_NAME(BgL_classz00_3737); } 
BgL_test4895z00_11036 = 
(BgL_arg1839z00_1736==BgL_cnamez00_168); } 
if(BgL_test4895z00_11036)
{ /* Llib/object.scm 1424 */
 obj_t BgL_allocz00_1727;
{ /* Llib/object.scm 1424 */
 obj_t BgL_res2669z00_3740;
{ /* Llib/object.scm 1424 */
 obj_t BgL_classz00_3738;
if(
BGL_CLASSP(BgL_classz00_1724))
{ /* Llib/object.scm 1424 */
BgL_classz00_3738 = BgL_classz00_1724; }  else 
{ 
 obj_t BgL_auxz00_11047;
BgL_auxz00_11047 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62447L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_1724); 
FAILURE(BgL_auxz00_11047,BFALSE,BFALSE);} 
if(
BGL_CLASSP(BgL_classz00_3738))
{ /* Llib/object.scm 709 */
BgL_res2669z00_3740 = 
BGL_CLASS_ALLOC_FUN(BgL_classz00_3738); }  else 
{ /* Llib/object.scm 711 */
 obj_t BgL_aux3234z00_5933;
BgL_aux3234z00_5933 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3533z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_3738); 
if(
PROCEDUREP(BgL_aux3234z00_5933))
{ /* Llib/object.scm 711 */
BgL_res2669z00_3740 = BgL_aux3234z00_5933; }  else 
{ 
 obj_t BgL_auxz00_11057;
BgL_auxz00_11057 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30666L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3234z00_5933); 
FAILURE(BgL_auxz00_11057,BFALSE,BFALSE);} } } 
BgL_allocz00_1727 = BgL_res2669z00_3740; } 
{ /* Llib/object.scm 1425 */
 bool_t BgL_test4900z00_11061;
{ /* Llib/object.scm 1425 */
 obj_t BgL_classz00_3741;
if(
BGL_CLASSP(BgL_classz00_1724))
{ /* Llib/object.scm 1425 */
BgL_classz00_3741 = BgL_classz00_1724; }  else 
{ 
 obj_t BgL_auxz00_11064;
BgL_auxz00_11064 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62479L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_1724); 
FAILURE(BgL_auxz00_11064,BFALSE,BFALSE);} 
{ /* Llib/object.scm 691 */
 obj_t BgL_tmpz00_11068;
BgL_tmpz00_11068 = 
BGl_classzd2shrinkzd2zz__objectz00(BgL_classz00_3741); 
BgL_test4900z00_11061 = 
PROCEDUREP(BgL_tmpz00_11068); } } 
if(BgL_test4900z00_11061)
{ /* Llib/object.scm 1428 */
 bool_t BgL_test4902z00_11071;
{ /* Llib/object.scm 1428 */
 int BgL_arg1836z00_1734;
BgL_arg1836z00_1734 = 
PROCEDURE_ARITY(BgL_allocz00_1727); 
BgL_test4902z00_11071 = 
(
(long)(BgL_arg1836z00_1734)==0L); } 
if(BgL_test4902z00_11071)
{ /* Llib/object.scm 1428 */
if(
PROCEDURE_CORRECT_ARITYP(BgL_allocz00_1727, 0))
{ /* Llib/object.scm 1429 */
BgL_aux3248z00_5951 = 
BGL_PROCEDURE_CALL0(BgL_allocz00_1727); }  else 
{ /* Llib/object.scm 1429 */
FAILURE(BGl_string3646z00zz__objectz00,BGl_list3647z00zz__objectz00,BgL_allocz00_1727);} }  else 
{ /* Llib/object.scm 1430 */
 obj_t BgL_superz00_1731;
{ /* Llib/object.scm 1430 */
 obj_t BgL_classz00_3745;
if(
BGL_CLASSP(BgL_classz00_1724))
{ /* Llib/object.scm 1430 */
BgL_classz00_3745 = BgL_classz00_1724; }  else 
{ 
 obj_t BgL_auxz00_11083;
BgL_auxz00_11083 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62657L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_1724); 
FAILURE(BgL_auxz00_11083,BFALSE,BFALSE);} 
BgL_superz00_1731 = 
BGL_CLASS_SUPER(BgL_classz00_3745); } 
{ /* Llib/object.scm 1430 */
 obj_t BgL_oz00_1732;
{ /* Llib/object.scm 1431 */
 obj_t BgL_fun1835z00_1733;
{ /* Llib/object.scm 1431 */
 obj_t BgL_res2670z00_3748;
{ /* Llib/object.scm 1431 */
 obj_t BgL_classz00_3746;
if(
BGL_CLASSP(BgL_superz00_1731))
{ /* Llib/object.scm 1431 */
BgL_classz00_3746 = BgL_superz00_1731; }  else 
{ 
 obj_t BgL_auxz00_11090;
BgL_auxz00_11090 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62693L), BGl_string3484z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_superz00_1731); 
FAILURE(BgL_auxz00_11090,BFALSE,BFALSE);} 
if(
BGL_CLASSP(BgL_classz00_3746))
{ /* Llib/object.scm 709 */
BgL_res2670z00_3748 = 
BGL_CLASS_ALLOC_FUN(BgL_classz00_3746); }  else 
{ /* Llib/object.scm 711 */
 obj_t BgL_aux3243z00_5943;
BgL_aux3243z00_5943 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3533z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_3746); 
if(
PROCEDUREP(BgL_aux3243z00_5943))
{ /* Llib/object.scm 711 */
BgL_res2670z00_3748 = BgL_aux3243z00_5943; }  else 
{ 
 obj_t BgL_auxz00_11100;
BgL_auxz00_11100 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(30666L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3243z00_5943); 
FAILURE(BgL_auxz00_11100,BFALSE,BFALSE);} } } 
BgL_fun1835z00_1733 = BgL_res2670z00_3748; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_fun1835z00_1733, 0))
{ /* Llib/object.scm 1431 */
BgL_oz00_1732 = 
BGL_PROCEDURE_CALL0(BgL_fun1835z00_1733); }  else 
{ /* Llib/object.scm 1431 */
FAILURE(BGl_string3646z00zz__objectz00,BGl_list3650z00zz__objectz00,BgL_fun1835z00_1733);} } 
{ /* Llib/object.scm 1431 */

if(
PROCEDURE_CORRECT_ARITYP(BgL_allocz00_1727, 1))
{ /* Llib/object.scm 1432 */
BgL_aux3248z00_5951 = 
BGL_PROCEDURE_CALL1(BgL_allocz00_1727, BgL_oz00_1732); }  else 
{ /* Llib/object.scm 1432 */
FAILURE(BGl_string3646z00zz__objectz00,BGl_list3653z00zz__objectz00,BgL_allocz00_1727);} } } } }  else 
{ /* Llib/object.scm 1425 */
if(
PROCEDURE_CORRECT_ARITYP(BgL_allocz00_1727, 0))
{ /* Llib/object.scm 1433 */
BgL_aux3248z00_5951 = 
BGL_PROCEDURE_CALL0(BgL_allocz00_1727); }  else 
{ /* Llib/object.scm 1433 */
FAILURE(BGl_string3646z00zz__objectz00,BGl_list3647z00zz__objectz00,BgL_allocz00_1727);} } } }  else 
{ 
 long BgL_iz00_11123;
BgL_iz00_11123 = 
(BgL_iz00_1721+1L); 
BgL_iz00_1721 = BgL_iz00_11123; 
goto BgL_zc3z04anonymousza31827ze3z87_1722;} } } } 
{ /* Llib/object.scm 1419 */
 bool_t BgL_test4911z00_11125;
{ /* Llib/object.scm 1419 */
 obj_t BgL_classz00_6521;
BgL_classz00_6521 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_aux3248z00_5951))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6522; long BgL_arg1816z00_6523;
BgL_arg1815z00_6522 = 
(BgL_objectz00_bglt)(BgL_aux3248z00_5951); 
BgL_arg1816z00_6523 = 
BGL_CLASS_DEPTH(BgL_classz00_6521); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6524;
BgL_idxz00_6524 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6522); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6525;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6526;
BgL_arg1825z00_6526 = 
(BgL_idxz00_6524+BgL_arg1816z00_6523); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6527;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6528;
BgL_aux3193z00_6528 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6528))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6527 = BgL_aux3193z00_6528; }  else 
{ 
 obj_t BgL_auxz00_11136;
BgL_auxz00_11136 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6528); 
FAILURE(BgL_auxz00_11136,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4915z00_11140;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_11141;
BgL_tmpz00_11141 = 
VECTOR_LENGTH(BgL_vectorz00_6527); 
BgL_test4915z00_11140 = 
BOUND_CHECK(BgL_arg1825z00_6526, BgL_tmpz00_11141); } 
if(BgL_test4915z00_11140)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6525 = 
VECTOR_REF(BgL_vectorz00_6527,BgL_arg1825z00_6526); }  else 
{ 
 obj_t BgL_auxz00_11145;
BgL_auxz00_11145 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6527, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6527)), 
(int)(BgL_arg1825z00_6526)); 
FAILURE(BgL_auxz00_11145,BFALSE,BFALSE);} } } } 
BgL_test4911z00_11125 = 
(BgL_arg1824z00_6525==BgL_classz00_6521); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6529;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6530;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6531; long BgL_arg1554z00_6532;
BgL_arg1552z00_6531 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6533;
BgL_arg1555z00_6533 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6522); 
BgL_arg1554z00_6532 = 
(BgL_arg1555z00_6533-OBJECT_TYPE); } 
BgL_oclassz00_6530 = 
VECTOR_REF(BgL_arg1552z00_6531,BgL_arg1554z00_6532); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6534;
BgL__ortest_1222z00_6534 = 
(BgL_classz00_6521==BgL_oclassz00_6530); 
if(BgL__ortest_1222z00_6534)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6529 = BgL__ortest_1222z00_6534; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6535;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6536;
BgL_arg1822z00_6536 = 
(BgL_oclassz00_6530); 
BgL_odepthz00_6535 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6536); } 
if(
(BgL_arg1816z00_6523<BgL_odepthz00_6535))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6537;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6538;
BgL_arg1821z00_6538 = 
(BgL_oclassz00_6530); 
BgL_arg1820z00_6537 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6538, BgL_arg1816z00_6523); } 
BgL_res2666z00_6529 = 
(BgL_arg1820z00_6537==BgL_classz00_6521); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6529 = ((bool_t)0); } } } } 
BgL_test4911z00_11125 = BgL_res2666z00_6529; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4911z00_11125 = ((bool_t)0)
; } } 
if(BgL_test4911z00_11125)
{ /* Llib/object.scm 1419 */
return 
((BgL_objectz00_bglt)BgL_aux3248z00_5951);}  else 
{ 
 obj_t BgL_auxz00_11167;
BgL_auxz00_11167 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62221L), BGl_string3645z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_aux3248z00_5951); 
FAILURE(BgL_auxz00_11167,BFALSE,BFALSE);} } } } } 

}



/* &allocate-instance */
BgL_objectz00_bglt BGl_z62allocatezd2instancezb0zz__objectz00(obj_t BgL_envz00_4911, obj_t BgL_cnamez00_4912)
{
{ /* Llib/object.scm 1418 */
{ /* Llib/object.scm 1420 */
 obj_t BgL_auxz00_11171;
if(
SYMBOLP(BgL_cnamez00_4912))
{ /* Llib/object.scm 1420 */
BgL_auxz00_11171 = BgL_cnamez00_4912
; }  else 
{ 
 obj_t BgL_auxz00_11174;
BgL_auxz00_11174 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(62245L), BGl_string3654z00zz__objectz00, BGl_string3489z00zz__objectz00, BgL_cnamez00_4912); 
FAILURE(BgL_auxz00_11174,BFALSE,BFALSE);} 
return 
BGl_allocatezd2instancezd2zz__objectz00(BgL_auxz00_11171);} } 

}



/* wide-object? */
BGL_EXPORTED_DEF bool_t BGl_widezd2objectzf3z21zz__objectz00(BgL_objectz00_bglt BgL_objectz00_169)
{
{ /* Llib/object.scm 1439 */
return 
CBOOL(
BGL_OBJECT_WIDENING(BgL_objectz00_169));} 

}



/* &wide-object? */
obj_t BGl_z62widezd2objectzf3z43zz__objectz00(obj_t BgL_envz00_4913, obj_t BgL_objectz00_4914)
{
{ /* Llib/object.scm 1439 */
{ /* Llib/object.scm 1440 */
 bool_t BgL_tmpz00_11181;
{ /* Llib/object.scm 1440 */
 BgL_objectz00_bglt BgL_auxz00_11182;
if(
BGl_isazf3zf3zz__objectz00(BgL_objectz00_4914, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1440 */
BgL_auxz00_11182 = 
((BgL_objectz00_bglt)BgL_objectz00_4914)
; }  else 
{ 
 obj_t BgL_auxz00_11186;
BgL_auxz00_11186 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63032L), BGl_string3655z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objectz00_4914); 
FAILURE(BgL_auxz00_11186,BFALSE,BFALSE);} 
BgL_tmpz00_11181 = 
BGl_widezd2objectzf3z21zz__objectz00(BgL_auxz00_11182); } 
return 
BBOOL(BgL_tmpz00_11181);} } 

}



/* call-virtual-getter */
BGL_EXPORTED_DEF obj_t BGl_callzd2virtualzd2getterz00zz__objectz00(BgL_objectz00_bglt BgL_objz00_179, int BgL_numz00_180)
{
{ /* Llib/object.scm 1539 */
{ /* Llib/object.scm 1540 */
 obj_t BgL_classz00_3752;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_3757; long BgL_arg1554z00_3758;
BgL_arg1552z00_3757 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_3759;
BgL_arg1555z00_3759 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_179); 
BgL_arg1554z00_3758 = 
(BgL_arg1555z00_3759-OBJECT_TYPE); } 
BgL_classz00_3752 = 
VECTOR_REF(BgL_arg1552z00_3757,BgL_arg1554z00_3758); } 
{ /* Llib/object.scm 1540 */
 obj_t BgL_getterz00_3753;
{ /* Llib/object.scm 1541 */
 obj_t BgL_arg1841z00_3754;
{ /* Llib/object.scm 1541 */
 obj_t BgL_arg1842z00_3755;
{ /* Llib/object.scm 1541 */
 obj_t BgL_classz00_3765;
if(
BGL_CLASSP(BgL_classz00_3752))
{ /* Llib/object.scm 1541 */
BgL_classz00_3765 = BgL_classz00_3752; }  else 
{ 
 obj_t BgL_auxz00_11198;
BgL_auxz00_11198 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(67498L), BGl_string3656z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_3752); 
FAILURE(BgL_auxz00_11198,BFALSE,BFALSE);} 
BgL_arg1842z00_3755 = 
BGL_CLASS_VIRTUAL_FIELDS(BgL_classz00_3765); } 
BgL_arg1841z00_3754 = 
VECTOR_REF(BgL_arg1842z00_3755,
(long)(BgL_numz00_180)); } 
{ /* Llib/object.scm 1541 */
 obj_t BgL_pairz00_3768;
if(
PAIRP(BgL_arg1841z00_3754))
{ /* Llib/object.scm 1541 */
BgL_pairz00_3768 = BgL_arg1841z00_3754; }  else 
{ 
 obj_t BgL_auxz00_11207;
BgL_auxz00_11207 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(67508L), BGl_string3656z00zz__objectz00, BGl_string3607z00zz__objectz00, BgL_arg1841z00_3754); 
FAILURE(BgL_auxz00_11207,BFALSE,BFALSE);} 
BgL_getterz00_3753 = 
CAR(BgL_pairz00_3768); } } 
{ /* Llib/object.scm 1541 */

{ /* Llib/object.scm 1542 */
 obj_t BgL_funz00_5967;
if(
PROCEDUREP(BgL_getterz00_3753))
{ /* Llib/object.scm 1542 */
BgL_funz00_5967 = BgL_getterz00_3753; }  else 
{ 
 obj_t BgL_auxz00_11214;
BgL_auxz00_11214 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(67519L), BGl_string3656z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_getterz00_3753); 
FAILURE(BgL_auxz00_11214,BFALSE,BFALSE);} 
if(
PROCEDURE_CORRECT_ARITYP(BgL_funz00_5967, 1))
{ /* Llib/object.scm 1542 */
return 
(VA_PROCEDUREP( BgL_funz00_5967 ) ? ((obj_t (*)(obj_t, ...))PROCEDURE_ENTRY(BgL_funz00_5967))(BgL_getterz00_3753, 
((obj_t)BgL_objz00_179), BEOA) : ((obj_t (*)(obj_t, obj_t))PROCEDURE_ENTRY(BgL_funz00_5967))(BgL_getterz00_3753, 
((obj_t)BgL_objz00_179)) );}  else 
{ /* Llib/object.scm 1542 */
FAILURE(BGl_string3657z00zz__objectz00,BGl_list3658z00zz__objectz00,BgL_funz00_5967);} } } } } } 

}



/* &call-virtual-getter */
obj_t BGl_z62callzd2virtualzd2getterz62zz__objectz00(obj_t BgL_envz00_4915, obj_t BgL_objz00_4916, obj_t BgL_numz00_4917)
{
{ /* Llib/object.scm 1539 */
{ /* Llib/object.scm 1540 */
 int BgL_auxz00_11234; BgL_objectz00_bglt BgL_auxz00_11226;
{ /* Llib/object.scm 1540 */
 obj_t BgL_tmpz00_11235;
if(
INTEGERP(BgL_numz00_4917))
{ /* Llib/object.scm 1540 */
BgL_tmpz00_11235 = BgL_numz00_4917
; }  else 
{ 
 obj_t BgL_auxz00_11238;
BgL_auxz00_11238 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(67418L), BGl_string3663z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_numz00_4917); 
FAILURE(BgL_auxz00_11238,BFALSE,BFALSE);} 
BgL_auxz00_11234 = 
CINT(BgL_tmpz00_11235); } 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4916, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1540 */
BgL_auxz00_11226 = 
((BgL_objectz00_bglt)BgL_objz00_4916)
; }  else 
{ 
 obj_t BgL_auxz00_11230;
BgL_auxz00_11230 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(67418L), BGl_string3663z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4916); 
FAILURE(BgL_auxz00_11230,BFALSE,BFALSE);} 
return 
BGl_callzd2virtualzd2getterz00zz__objectz00(BgL_auxz00_11226, BgL_auxz00_11234);} } 

}



/* call-virtual-setter */
BGL_EXPORTED_DEF obj_t BGl_callzd2virtualzd2setterz00zz__objectz00(BgL_objectz00_bglt BgL_objz00_181, int BgL_numz00_182, obj_t BgL_valuez00_183)
{
{ /* Llib/object.scm 1552 */
{ /* Llib/object.scm 1553 */
 obj_t BgL_classz00_3769;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_3774; long BgL_arg1554z00_3775;
BgL_arg1552z00_3774 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_3776;
BgL_arg1555z00_3776 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_181); 
BgL_arg1554z00_3775 = 
(BgL_arg1555z00_3776-OBJECT_TYPE); } 
BgL_classz00_3769 = 
VECTOR_REF(BgL_arg1552z00_3774,BgL_arg1554z00_3775); } 
{ /* Llib/object.scm 1553 */
 obj_t BgL_setterz00_3770;
{ /* Llib/object.scm 1554 */
 obj_t BgL_arg1845z00_3771;
{ /* Llib/object.scm 1554 */
 obj_t BgL_arg1846z00_3772;
{ /* Llib/object.scm 1554 */
 obj_t BgL_classz00_3782;
if(
BGL_CLASSP(BgL_classz00_3769))
{ /* Llib/object.scm 1554 */
BgL_classz00_3782 = BgL_classz00_3769; }  else 
{ 
 obj_t BgL_auxz00_11250;
BgL_auxz00_11250 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(68267L), BGl_string3664z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_3769); 
FAILURE(BgL_auxz00_11250,BFALSE,BFALSE);} 
BgL_arg1846z00_3772 = 
BGL_CLASS_VIRTUAL_FIELDS(BgL_classz00_3782); } 
BgL_arg1845z00_3771 = 
VECTOR_REF(BgL_arg1846z00_3772,
(long)(BgL_numz00_182)); } 
{ /* Llib/object.scm 1554 */
 obj_t BgL_pairz00_3785;
if(
PAIRP(BgL_arg1845z00_3771))
{ /* Llib/object.scm 1554 */
BgL_pairz00_3785 = BgL_arg1845z00_3771; }  else 
{ 
 obj_t BgL_auxz00_11259;
BgL_auxz00_11259 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(68277L), BGl_string3664z00zz__objectz00, BGl_string3607z00zz__objectz00, BgL_arg1845z00_3771); 
FAILURE(BgL_auxz00_11259,BFALSE,BFALSE);} 
BgL_setterz00_3770 = 
CDR(BgL_pairz00_3785); } } 
{ /* Llib/object.scm 1554 */

{ /* Llib/object.scm 1555 */
 obj_t BgL_funz00_5980;
if(
PROCEDUREP(BgL_setterz00_3770))
{ /* Llib/object.scm 1555 */
BgL_funz00_5980 = BgL_setterz00_3770; }  else 
{ 
 obj_t BgL_auxz00_11266;
BgL_auxz00_11266 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(68288L), BGl_string3664z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_setterz00_3770); 
FAILURE(BgL_auxz00_11266,BFALSE,BFALSE);} 
if(
PROCEDURE_CORRECT_ARITYP(BgL_funz00_5980, 2))
{ /* Llib/object.scm 1555 */
return 
(VA_PROCEDUREP( BgL_funz00_5980 ) ? ((obj_t (*)(obj_t, ...))PROCEDURE_ENTRY(BgL_funz00_5980))(BgL_setterz00_3770, 
((obj_t)BgL_objz00_181), BgL_valuez00_183, BEOA) : ((obj_t (*)(obj_t, obj_t, obj_t))PROCEDURE_ENTRY(BgL_funz00_5980))(BgL_setterz00_3770, 
((obj_t)BgL_objz00_181), BgL_valuez00_183) );}  else 
{ /* Llib/object.scm 1555 */
FAILURE(BGl_string3665z00zz__objectz00,BGl_list3666z00zz__objectz00,BgL_funz00_5980);} } } } } } 

}



/* &call-virtual-setter */
obj_t BGl_z62callzd2virtualzd2setterz62zz__objectz00(obj_t BgL_envz00_4918, obj_t BgL_objz00_4919, obj_t BgL_numz00_4920, obj_t BgL_valuez00_4921)
{
{ /* Llib/object.scm 1552 */
{ /* Llib/object.scm 1553 */
 int BgL_auxz00_11287; BgL_objectz00_bglt BgL_auxz00_11279;
{ /* Llib/object.scm 1553 */
 obj_t BgL_tmpz00_11288;
if(
INTEGERP(BgL_numz00_4920))
{ /* Llib/object.scm 1553 */
BgL_tmpz00_11288 = BgL_numz00_4920
; }  else 
{ 
 obj_t BgL_auxz00_11291;
BgL_auxz00_11291 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(68187L), BGl_string3671z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_numz00_4920); 
FAILURE(BgL_auxz00_11291,BFALSE,BFALSE);} 
BgL_auxz00_11287 = 
CINT(BgL_tmpz00_11288); } 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4919, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1553 */
BgL_auxz00_11279 = 
((BgL_objectz00_bglt)BgL_objz00_4919)
; }  else 
{ 
 obj_t BgL_auxz00_11283;
BgL_auxz00_11283 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(68187L), BGl_string3671z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4919); 
FAILURE(BgL_auxz00_11283,BFALSE,BFALSE);} 
return 
BGl_callzd2virtualzd2setterz00zz__objectz00(BgL_auxz00_11279, BgL_auxz00_11287, BgL_valuez00_4921);} } 

}



/* call-next-virtual-getter */
BGL_EXPORTED_DEF obj_t BGl_callzd2nextzd2virtualzd2getterzd2zz__objectz00(obj_t BgL_classz00_184, BgL_objectz00_bglt BgL_objz00_185, int BgL_numz00_186)
{
{ /* Llib/object.scm 1575 */
{ /* Llib/object.scm 1576 */
 obj_t BgL_nextzd2classzd2_3786;
{ /* Llib/object.scm 1576 */
 obj_t BgL_classz00_3790;
if(
BGL_CLASSP(BgL_classz00_184))
{ /* Llib/object.scm 1576 */
BgL_classz00_3790 = BgL_classz00_184; }  else 
{ 
 obj_t BgL_auxz00_11299;
BgL_auxz00_11299 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(69738L), BGl_string3672z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_184); 
FAILURE(BgL_auxz00_11299,BFALSE,BFALSE);} 
BgL_nextzd2classzd2_3786 = 
BGL_CLASS_SUPER(BgL_classz00_3790); } 
{ /* Llib/object.scm 1577 */
 obj_t BgL_fun1850z00_3787;
{ /* Llib/object.scm 1577 */
 obj_t BgL_arg1847z00_3788;
{ /* Llib/object.scm 1577 */
 obj_t BgL_arg1848z00_3789;
{ /* Llib/object.scm 1577 */
 obj_t BgL_classz00_3791;
if(
BGL_CLASSP(BgL_nextzd2classzd2_3786))
{ /* Llib/object.scm 1577 */
BgL_classz00_3791 = BgL_nextzd2classzd2_3786; }  else 
{ 
 obj_t BgL_auxz00_11306;
BgL_auxz00_11306 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(69789L), BGl_string3672z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_nextzd2classzd2_3786); 
FAILURE(BgL_auxz00_11306,BFALSE,BFALSE);} 
BgL_arg1848z00_3789 = 
BGL_CLASS_VIRTUAL_FIELDS(BgL_classz00_3791); } 
BgL_arg1847z00_3788 = 
VECTOR_REF(BgL_arg1848z00_3789,
(long)(BgL_numz00_186)); } 
{ /* Llib/object.scm 1577 */
 obj_t BgL_pairz00_3794;
if(
PAIRP(BgL_arg1847z00_3788))
{ /* Llib/object.scm 1577 */
BgL_pairz00_3794 = BgL_arg1847z00_3788; }  else 
{ 
 obj_t BgL_auxz00_11315;
BgL_auxz00_11315 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(69804L), BGl_string3672z00zz__objectz00, BGl_string3607z00zz__objectz00, BgL_arg1847z00_3788); 
FAILURE(BgL_auxz00_11315,BFALSE,BFALSE);} 
BgL_fun1850z00_3787 = 
CAR(BgL_pairz00_3794); } } 
{ /* Llib/object.scm 1577 */
 obj_t BgL_funz00_5995;
if(
PROCEDUREP(BgL_fun1850z00_3787))
{ /* Llib/object.scm 1577 */
BgL_funz00_5995 = BgL_fun1850z00_3787; }  else 
{ 
 obj_t BgL_auxz00_11322;
BgL_auxz00_11322 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(69753L), BGl_string3672z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_fun1850z00_3787); 
FAILURE(BgL_auxz00_11322,BFALSE,BFALSE);} 
if(
PROCEDURE_CORRECT_ARITYP(BgL_funz00_5995, 1))
{ /* Llib/object.scm 1577 */
return 
(VA_PROCEDUREP( BgL_funz00_5995 ) ? ((obj_t (*)(obj_t, ...))PROCEDURE_ENTRY(BgL_funz00_5995))(BgL_fun1850z00_3787, 
((obj_t)BgL_objz00_185), BEOA) : ((obj_t (*)(obj_t, obj_t))PROCEDURE_ENTRY(BgL_funz00_5995))(BgL_fun1850z00_3787, 
((obj_t)BgL_objz00_185)) );}  else 
{ /* Llib/object.scm 1577 */
FAILURE(BGl_string3673z00zz__objectz00,BGl_list3674z00zz__objectz00,BgL_funz00_5995);} } } } } 

}



/* &call-next-virtual-getter */
obj_t BGl_z62callzd2nextzd2virtualzd2getterzb0zz__objectz00(obj_t BgL_envz00_4922, obj_t BgL_classz00_4923, obj_t BgL_objz00_4924, obj_t BgL_numz00_4925)
{
{ /* Llib/object.scm 1575 */
{ /* Llib/object.scm 1576 */
 int BgL_auxz00_11342; BgL_objectz00_bglt BgL_auxz00_11334;
{ /* Llib/object.scm 1576 */
 obj_t BgL_tmpz00_11343;
if(
INTEGERP(BgL_numz00_4925))
{ /* Llib/object.scm 1576 */
BgL_tmpz00_11343 = BgL_numz00_4925
; }  else 
{ 
 obj_t BgL_auxz00_11346;
BgL_auxz00_11346 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(69707L), BGl_string3677z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_numz00_4925); 
FAILURE(BgL_auxz00_11346,BFALSE,BFALSE);} 
BgL_auxz00_11342 = 
CINT(BgL_tmpz00_11343); } 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4924, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1576 */
BgL_auxz00_11334 = 
((BgL_objectz00_bglt)BgL_objz00_4924)
; }  else 
{ 
 obj_t BgL_auxz00_11338;
BgL_auxz00_11338 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(69707L), BGl_string3677z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4924); 
FAILURE(BgL_auxz00_11338,BFALSE,BFALSE);} 
return 
BGl_callzd2nextzd2virtualzd2getterzd2zz__objectz00(BgL_classz00_4923, BgL_auxz00_11334, BgL_auxz00_11342);} } 

}



/* call-next-virtual-setter */
BGL_EXPORTED_DEF obj_t BGl_callzd2nextzd2virtualzd2setterzd2zz__objectz00(obj_t BgL_classz00_187, BgL_objectz00_bglt BgL_objz00_188, int BgL_numz00_189, obj_t BgL_valuez00_190)
{
{ /* Llib/object.scm 1587 */
{ /* Llib/object.scm 1588 */
 obj_t BgL_nextzd2classzd2_3795;
{ /* Llib/object.scm 1588 */
 obj_t BgL_classz00_3799;
if(
BGL_CLASSP(BgL_classz00_187))
{ /* Llib/object.scm 1588 */
BgL_classz00_3799 = BgL_classz00_187; }  else 
{ 
 obj_t BgL_auxz00_11354;
BgL_auxz00_11354 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70509L), BGl_string3678z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_187); 
FAILURE(BgL_auxz00_11354,BFALSE,BFALSE);} 
BgL_nextzd2classzd2_3795 = 
BGL_CLASS_SUPER(BgL_classz00_3799); } 
{ /* Llib/object.scm 1589 */
 obj_t BgL_fun1853z00_3796;
{ /* Llib/object.scm 1589 */
 obj_t BgL_arg1851z00_3797;
{ /* Llib/object.scm 1589 */
 obj_t BgL_arg1852z00_3798;
{ /* Llib/object.scm 1589 */
 obj_t BgL_classz00_3800;
if(
BGL_CLASSP(BgL_nextzd2classzd2_3795))
{ /* Llib/object.scm 1589 */
BgL_classz00_3800 = BgL_nextzd2classzd2_3795; }  else 
{ 
 obj_t BgL_auxz00_11361;
BgL_auxz00_11361 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70560L), BGl_string3678z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_nextzd2classzd2_3795); 
FAILURE(BgL_auxz00_11361,BFALSE,BFALSE);} 
BgL_arg1852z00_3798 = 
BGL_CLASS_VIRTUAL_FIELDS(BgL_classz00_3800); } 
BgL_arg1851z00_3797 = 
VECTOR_REF(BgL_arg1852z00_3798,
(long)(BgL_numz00_189)); } 
{ /* Llib/object.scm 1589 */
 obj_t BgL_pairz00_3803;
if(
PAIRP(BgL_arg1851z00_3797))
{ /* Llib/object.scm 1589 */
BgL_pairz00_3803 = BgL_arg1851z00_3797; }  else 
{ 
 obj_t BgL_auxz00_11370;
BgL_auxz00_11370 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70575L), BGl_string3678z00zz__objectz00, BGl_string3607z00zz__objectz00, BgL_arg1851z00_3797); 
FAILURE(BgL_auxz00_11370,BFALSE,BFALSE);} 
BgL_fun1853z00_3796 = 
CDR(BgL_pairz00_3803); } } 
{ /* Llib/object.scm 1589 */
 obj_t BgL_funz00_6010;
if(
PROCEDUREP(BgL_fun1853z00_3796))
{ /* Llib/object.scm 1589 */
BgL_funz00_6010 = BgL_fun1853z00_3796; }  else 
{ 
 obj_t BgL_auxz00_11377;
BgL_auxz00_11377 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70524L), BGl_string3678z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_fun1853z00_3796); 
FAILURE(BgL_auxz00_11377,BFALSE,BFALSE);} 
if(
PROCEDURE_CORRECT_ARITYP(BgL_funz00_6010, 2))
{ /* Llib/object.scm 1589 */
return 
(VA_PROCEDUREP( BgL_funz00_6010 ) ? ((obj_t (*)(obj_t, ...))PROCEDURE_ENTRY(BgL_funz00_6010))(BgL_fun1853z00_3796, 
((obj_t)BgL_objz00_188), BgL_valuez00_190, BEOA) : ((obj_t (*)(obj_t, obj_t, obj_t))PROCEDURE_ENTRY(BgL_funz00_6010))(BgL_fun1853z00_3796, 
((obj_t)BgL_objz00_188), BgL_valuez00_190) );}  else 
{ /* Llib/object.scm 1589 */
FAILURE(BGl_string3679z00zz__objectz00,BGl_list3680z00zz__objectz00,BgL_funz00_6010);} } } } } 

}



/* &call-next-virtual-setter */
obj_t BGl_z62callzd2nextzd2virtualzd2setterzb0zz__objectz00(obj_t BgL_envz00_4926, obj_t BgL_classz00_4927, obj_t BgL_objz00_4928, obj_t BgL_numz00_4929, obj_t BgL_valuez00_4930)
{
{ /* Llib/object.scm 1587 */
{ /* Llib/object.scm 1588 */
 int BgL_auxz00_11398; BgL_objectz00_bglt BgL_auxz00_11390;
{ /* Llib/object.scm 1588 */
 obj_t BgL_tmpz00_11399;
if(
INTEGERP(BgL_numz00_4929))
{ /* Llib/object.scm 1588 */
BgL_tmpz00_11399 = BgL_numz00_4929
; }  else 
{ 
 obj_t BgL_auxz00_11402;
BgL_auxz00_11402 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70478L), BGl_string3683z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_numz00_4929); 
FAILURE(BgL_auxz00_11402,BFALSE,BFALSE);} 
BgL_auxz00_11398 = 
CINT(BgL_tmpz00_11399); } 
if(
BGl_isazf3zf3zz__objectz00(BgL_objz00_4928, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1588 */
BgL_auxz00_11390 = 
((BgL_objectz00_bglt)BgL_objz00_4928)
; }  else 
{ 
 obj_t BgL_auxz00_11394;
BgL_auxz00_11394 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70478L), BGl_string3683z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_4928); 
FAILURE(BgL_auxz00_11394,BFALSE,BFALSE);} 
return 
BGl_callzd2nextzd2virtualzd2setterzd2zz__objectz00(BgL_classz00_4927, BgL_auxz00_11390, BgL_auxz00_11398, BgL_valuez00_4930);} } 

}



/* object-widening */
BGL_EXPORTED_DEF obj_t BGl_objectzd2wideningzd2zz__objectz00(BgL_objectz00_bglt BgL_oz00_191)
{
{ /* Llib/object.scm 1594 */
return 
BGL_OBJECT_WIDENING(BgL_oz00_191);} 

}



/* &object-widening */
obj_t BGl_z62objectzd2wideningzb0zz__objectz00(obj_t BgL_envz00_4931, obj_t BgL_oz00_4932)
{
{ /* Llib/object.scm 1594 */
{ /* Llib/object.scm 1595 */
 BgL_objectz00_bglt BgL_auxz00_11409;
if(
BGl_isazf3zf3zz__objectz00(BgL_oz00_4932, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1595 */
BgL_auxz00_11409 = 
((BgL_objectz00_bglt)BgL_oz00_4932)
; }  else 
{ 
 obj_t BgL_auxz00_11413;
BgL_auxz00_11413 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70852L), BGl_string3684z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_oz00_4932); 
FAILURE(BgL_auxz00_11413,BFALSE,BFALSE);} 
return 
BGl_objectzd2wideningzd2zz__objectz00(BgL_auxz00_11409);} } 

}



/* object-widening-set! */
BGL_EXPORTED_DEF obj_t BGl_objectzd2wideningzd2setz12z12zz__objectz00(BgL_objectz00_bglt BgL_oz00_192, obj_t BgL_vz00_193)
{
{ /* Llib/object.scm 1600 */
BGL_OBJECT_WIDENING_SET(BgL_oz00_192, BgL_vz00_193); 
return 
((obj_t)BgL_oz00_192);} 

}



/* &object-widening-set! */
obj_t BGl_z62objectzd2wideningzd2setz12z70zz__objectz00(obj_t BgL_envz00_4933, obj_t BgL_oz00_4934, obj_t BgL_vz00_4935)
{
{ /* Llib/object.scm 1600 */
{ /* Llib/object.scm 1601 */
 BgL_objectz00_bglt BgL_auxz00_11420;
if(
BGl_isazf3zf3zz__objectz00(BgL_oz00_4934, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1601 */
BgL_auxz00_11420 = 
((BgL_objectz00_bglt)BgL_oz00_4934)
; }  else 
{ 
 obj_t BgL_auxz00_11424;
BgL_auxz00_11424 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(71168L), BGl_string3685z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_oz00_4934); 
FAILURE(BgL_auxz00_11424,BFALSE,BFALSE);} 
return 
BGl_objectzd2wideningzd2setz12z12zz__objectz00(BgL_auxz00_11420, BgL_vz00_4935);} } 

}



/* %object-widening */
BGL_EXPORTED_DEF obj_t BGl_z52objectzd2wideningz80zz__objectz00(BgL_objectz00_bglt BgL_oz00_194)
{
{ /* Llib/object.scm 1610 */
return 
BGL_OBJECT_WIDENING(BgL_oz00_194);} 

}



/* &%object-widening */
obj_t BGl_z62z52objectzd2wideningze2zz__objectz00(obj_t BgL_envz00_4936, obj_t BgL_oz00_4937)
{
{ /* Llib/object.scm 1610 */
{ /* Llib/object.scm 1595 */
 BgL_objectz00_bglt BgL_auxz00_11430;
if(
BGl_isazf3zf3zz__objectz00(BgL_oz00_4937, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1595 */
BgL_auxz00_11430 = 
((BgL_objectz00_bglt)BgL_oz00_4937)
; }  else 
{ 
 obj_t BgL_auxz00_11434;
BgL_auxz00_11434 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(70852L), BGl_string3686z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_oz00_4937); 
FAILURE(BgL_auxz00_11434,BFALSE,BFALSE);} 
return 
BGl_z52objectzd2wideningz80zz__objectz00(BgL_auxz00_11430);} } 

}



/* %object-widening-set! */
BGL_EXPORTED_DEF obj_t BGl_z52objectzd2wideningzd2setz12z40zz__objectz00(BgL_objectz00_bglt BgL_oz00_195, obj_t BgL_wz00_196)
{
{ /* Llib/object.scm 1619 */
BGL_OBJECT_WIDENING_SET(BgL_oz00_195, BgL_wz00_196); BgL_oz00_195; 
return 
((obj_t)BgL_oz00_195);} 

}



/* &%object-widening-set! */
obj_t BGl_z62z52objectzd2wideningzd2setz12z22zz__objectz00(obj_t BgL_envz00_4938, obj_t BgL_oz00_4939, obj_t BgL_wz00_4940)
{
{ /* Llib/object.scm 1619 */
{ /* Llib/object.scm 1620 */
 BgL_objectz00_bglt BgL_auxz00_11441;
if(
BGl_isazf3zf3zz__objectz00(BgL_oz00_4939, BGl_objectz00zz__objectz00))
{ /* Llib/object.scm 1620 */
BgL_auxz00_11441 = 
((BgL_objectz00_bglt)BgL_oz00_4939)
; }  else 
{ 
 obj_t BgL_auxz00_11445;
BgL_auxz00_11445 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(72183L), BGl_string3687z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_oz00_4939); 
FAILURE(BgL_auxz00_11445,BFALSE,BFALSE);} 
return 
BGl_z52objectzd2wideningzd2setz12z40zz__objectz00(BgL_auxz00_11441, BgL_wz00_4940);} } 

}



/* object-init */
obj_t BGl_objectzd2initzd2zz__objectz00(void)
{
{ /* Llib/object.scm 17 */
{ /* Llib/object.scm 236 */
 obj_t BgL_arg1858z00_1758; obj_t BgL_arg1859z00_1759;
{ /* Llib/object.scm 236 */
 obj_t BgL_v1331z00_1769;
BgL_v1331z00_1769 = 
create_vector(0L); 
BgL_arg1858z00_1758 = BgL_v1331z00_1769; } 
{ /* Llib/object.scm 236 */
 obj_t BgL_v1332z00_1770;
BgL_v1332z00_1770 = 
create_vector(0L); 
BgL_arg1859z00_1759 = BgL_v1332z00_1770; } 
BGl_objectz00zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3691z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BFALSE, 43933L, BGl_proc3690z00zz__objectz00, BGl_proc3689z00zz__objectz00, BFALSE, BGl_proc3688z00zz__objectz00, BFALSE, BgL_arg1858z00_1758, BgL_arg1859z00_1759); } 
{ /* Llib/object.scm 237 */
 obj_t BgL_arg1868z00_1777; obj_t BgL_arg1869z00_1778;
{ /* Llib/object.scm 237 */
 obj_t BgL_v1333z00_1788;
BgL_v1333z00_1788 = 
create_vector(0L); 
BgL_arg1868z00_1777 = BgL_v1333z00_1788; } 
{ /* Llib/object.scm 237 */
 obj_t BgL_v1334z00_1789;
BgL_v1334z00_1789 = 
create_vector(0L); 
BgL_arg1869z00_1778 = BgL_v1334z00_1789; } 
BGl_z62conditionz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3697z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_objectz00zz__objectz00, 33606L, BGl_proc3696z00zz__objectz00, BGl_proc3695z00zz__objectz00, BFALSE, BGl_proc3694z00zz__objectz00, BFALSE, BgL_arg1868z00_1777, BgL_arg1869z00_1778); } 
{ /* Llib/object.scm 239 */
 obj_t BgL_arg1882z00_1796; obj_t BgL_arg1883z00_1797;
{ /* Llib/object.scm 239 */
 obj_t BgL_v1335z00_1810;
BgL_v1335z00_1810 = 
create_vector(3L); 
{ /* Llib/object.scm 239 */
 obj_t BgL_arg1889z00_1811;
{ /* Llib/object.scm 239 */
 obj_t BgL_res2671z00_3833;
{ /* Llib/object.scm 239 */
 obj_t BgL_namez00_3818; obj_t BgL_typez00_3821;
BgL_namez00_3818 = BGl_symbol3702z00zz__objectz00; 
BgL_typez00_3821 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3822;
BgL_v1319z00_3822 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3822,0L,BgL_namez00_3818); 
VECTOR_SET(BgL_v1319z00_3822,1L,BGl_proc3701z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3822,2L,BGl_proc3700z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3822,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3822,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3822,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3822,6L,BGl_proc3699z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3822,7L,BgL_typez00_3821); 
VECTOR_SET(BgL_v1319z00_3822,8L,BTRUE); 
BgL_res2671z00_3833 = BgL_v1319z00_3822; } } 
BgL_arg1889z00_1811 = BgL_res2671z00_3833; } 
VECTOR_SET(BgL_v1335z00_1810,0L,BgL_arg1889z00_1811); } 
{ /* Llib/object.scm 239 */
 obj_t BgL_arg1896z00_1824;
{ /* Llib/object.scm 239 */
 obj_t BgL_res2672z00_3850;
{ /* Llib/object.scm 239 */
 obj_t BgL_namez00_3835; obj_t BgL_typez00_3838;
BgL_namez00_3835 = BGl_symbol3707z00zz__objectz00; 
BgL_typez00_3838 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3839;
BgL_v1319z00_3839 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3839,0L,BgL_namez00_3835); 
VECTOR_SET(BgL_v1319z00_3839,1L,BGl_proc3706z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3839,2L,BGl_proc3705z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3839,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3839,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3839,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3839,6L,BGl_proc3704z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3839,7L,BgL_typez00_3838); 
VECTOR_SET(BgL_v1319z00_3839,8L,BTRUE); 
BgL_res2672z00_3850 = BgL_v1319z00_3839; } } 
BgL_arg1896z00_1824 = BgL_res2672z00_3850; } 
VECTOR_SET(BgL_v1335z00_1810,1L,BgL_arg1896z00_1824); } 
{ /* Llib/object.scm 239 */
 obj_t BgL_arg1903z00_1837;
{ /* Llib/object.scm 239 */
 obj_t BgL_res2673z00_3868;
{ /* Llib/object.scm 239 */
 obj_t BgL_namez00_3853; obj_t BgL_typez00_3856;
BgL_namez00_3853 = BGl_symbol3712z00zz__objectz00; 
BgL_typez00_3856 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3857;
BgL_v1319z00_3857 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3857,0L,BgL_namez00_3853); 
VECTOR_SET(BgL_v1319z00_3857,1L,BGl_proc3711z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3857,2L,BGl_proc3710z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3857,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3857,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3857,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3857,6L,BGl_proc3709z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3857,7L,BgL_typez00_3856); 
VECTOR_SET(BgL_v1319z00_3857,8L,BTRUE); 
BgL_res2673z00_3868 = BgL_v1319z00_3857; } } 
BgL_arg1903z00_1837 = BgL_res2673z00_3868; } 
VECTOR_SET(BgL_v1335z00_1810,2L,BgL_arg1903z00_1837); } 
BgL_arg1882z00_1796 = BgL_v1335z00_1810; } 
{ /* Llib/object.scm 239 */
 obj_t BgL_v1336z00_1851;
BgL_v1336z00_1851 = 
create_vector(0L); 
BgL_arg1883z00_1797 = BgL_v1336z00_1851; } 
BGl_z62exceptionz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3717z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62conditionz62zz__objectz00, 42025L, BGl_proc3716z00zz__objectz00, BGl_proc3715z00zz__objectz00, BFALSE, BGl_proc3714z00zz__objectz00, BFALSE, BgL_arg1882z00_1796, BgL_arg1883z00_1797); } 
{ /* Llib/object.scm 244 */
 obj_t BgL_arg1916z00_1858; obj_t BgL_arg1917z00_1859;
{ /* Llib/object.scm 244 */
 obj_t BgL_v1337z00_1875;
BgL_v1337z00_1875 = 
create_vector(3L); 
{ /* Llib/object.scm 244 */
 obj_t BgL_arg1923z00_1876;
{ /* Llib/object.scm 244 */
 obj_t BgL_res2674z00_3894;
{ /* Llib/object.scm 244 */
 obj_t BgL_namez00_3879; obj_t BgL_typez00_3882;
BgL_namez00_3879 = BGl_symbol3554z00zz__objectz00; 
BgL_typez00_3882 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3883;
BgL_v1319z00_3883 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3883,0L,BgL_namez00_3879); 
VECTOR_SET(BgL_v1319z00_3883,1L,BGl_proc3720z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3883,2L,BGl_proc3719z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3883,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3883,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3883,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3883,6L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3883,7L,BgL_typez00_3882); 
VECTOR_SET(BgL_v1319z00_3883,8L,BTRUE); 
BgL_res2674z00_3894 = BgL_v1319z00_3883; } } 
BgL_arg1923z00_1876 = BgL_res2674z00_3894; } 
VECTOR_SET(BgL_v1337z00_1875,0L,BgL_arg1923z00_1876); } 
{ /* Llib/object.scm 244 */
 obj_t BgL_arg1928z00_1886;
{ /* Llib/object.scm 244 */
 obj_t BgL_res2675z00_3911;
{ /* Llib/object.scm 244 */
 obj_t BgL_namez00_3896; obj_t BgL_typez00_3899;
BgL_namez00_3896 = BGl_symbol3723z00zz__objectz00; 
BgL_typez00_3899 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3900;
BgL_v1319z00_3900 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3900,0L,BgL_namez00_3896); 
VECTOR_SET(BgL_v1319z00_3900,1L,BGl_proc3722z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3900,2L,BGl_proc3721z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3900,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3900,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3900,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3900,6L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3900,7L,BgL_typez00_3899); 
VECTOR_SET(BgL_v1319z00_3900,8L,BFALSE); 
BgL_res2675z00_3911 = BgL_v1319z00_3900; } } 
BgL_arg1928z00_1886 = BgL_res2675z00_3911; } 
VECTOR_SET(BgL_v1337z00_1875,1L,BgL_arg1928z00_1886); } 
{ /* Llib/object.scm 244 */
 obj_t BgL_arg1935z00_1896;
{ /* Llib/object.scm 244 */
 obj_t BgL_res2676z00_3928;
{ /* Llib/object.scm 244 */
 obj_t BgL_namez00_3913; obj_t BgL_typez00_3916;
BgL_namez00_3913 = BGl_symbol3661z00zz__objectz00; 
BgL_typez00_3916 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3917;
BgL_v1319z00_3917 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3917,0L,BgL_namez00_3913); 
VECTOR_SET(BgL_v1319z00_3917,1L,BGl_proc3726z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3917,2L,BGl_proc3725z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3917,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3917,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3917,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3917,6L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3917,7L,BgL_typez00_3916); 
VECTOR_SET(BgL_v1319z00_3917,8L,BFALSE); 
BgL_res2676z00_3928 = BgL_v1319z00_3917; } } 
BgL_arg1935z00_1896 = BgL_res2676z00_3928; } 
VECTOR_SET(BgL_v1337z00_1875,2L,BgL_arg1935z00_1896); } 
BgL_arg1916z00_1858 = BgL_v1337z00_1875; } 
{ /* Llib/object.scm 244 */
 obj_t BgL_v1338z00_1906;
BgL_v1338z00_1906 = 
create_vector(0L); 
BgL_arg1917z00_1859 = BgL_v1338z00_1906; } 
BGl_z62errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3730z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62exceptionz62zz__objectz00, 27634L, BGl_proc3729z00zz__objectz00, BGl_proc3728z00zz__objectz00, BFALSE, BGl_proc3727z00zz__objectz00, BFALSE, BgL_arg1916z00_1858, BgL_arg1917z00_1859); } 
{ /* Llib/object.scm 248 */
 obj_t BgL_arg1943z00_1913; obj_t BgL_arg1944z00_1914;
{ /* Llib/object.scm 248 */
 obj_t BgL_v1339z00_1931;
BgL_v1339z00_1931 = 
create_vector(1L); 
{ /* Llib/object.scm 248 */
 obj_t BgL_arg1950z00_1932;
{ /* Llib/object.scm 248 */
 obj_t BgL_res2677z00_3954;
{ /* Llib/object.scm 248 */
 obj_t BgL_namez00_3939; obj_t BgL_typez00_3942;
BgL_namez00_3939 = BGl_symbol3734z00zz__objectz00; 
BgL_typez00_3942 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3943;
BgL_v1319z00_3943 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3943,0L,BgL_namez00_3939); 
VECTOR_SET(BgL_v1319z00_3943,1L,BGl_proc3733z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3943,2L,BGl_proc3732z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3943,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3943,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3943,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3943,6L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3943,7L,BgL_typez00_3942); 
VECTOR_SET(BgL_v1319z00_3943,8L,BFALSE); 
BgL_res2677z00_3954 = BgL_v1319z00_3943; } } 
BgL_arg1950z00_1932 = BgL_res2677z00_3954; } 
VECTOR_SET(BgL_v1339z00_1931,0L,BgL_arg1950z00_1932); } 
BgL_arg1943z00_1913 = BgL_v1339z00_1931; } 
{ /* Llib/object.scm 248 */
 obj_t BgL_v1340z00_1942;
BgL_v1340z00_1942 = 
create_vector(0L); 
BgL_arg1944z00_1914 = BgL_v1340z00_1942; } 
BGl_z62typezd2errorzb0zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3739z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62errorz62zz__objectz00, 59179L, BGl_proc3738z00zz__objectz00, BGl_proc3737z00zz__objectz00, BFALSE, BGl_proc3736z00zz__objectz00, BFALSE, BgL_arg1943z00_1913, BgL_arg1944z00_1914); } 
{ /* Llib/object.scm 250 */
 obj_t BgL_arg1961z00_1949; obj_t BgL_arg1962z00_1950;
{ /* Llib/object.scm 250 */
 obj_t BgL_v1341z00_1967;
BgL_v1341z00_1967 = 
create_vector(1L); 
{ /* Llib/object.scm 250 */
 obj_t BgL_arg1968z00_1968;
{ /* Llib/object.scm 250 */
 obj_t BgL_res2678z00_3980;
{ /* Llib/object.scm 250 */
 obj_t BgL_namez00_3965; obj_t BgL_typez00_3968;
BgL_namez00_3965 = BGl_symbol3743z00zz__objectz00; 
BgL_typez00_3968 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_3969;
BgL_v1319z00_3969 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_3969,0L,BgL_namez00_3965); 
VECTOR_SET(BgL_v1319z00_3969,1L,BGl_proc3742z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3969,2L,BGl_proc3741z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3969,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3969,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_3969,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3969,6L,BFALSE); 
VECTOR_SET(BgL_v1319z00_3969,7L,BgL_typez00_3968); 
VECTOR_SET(BgL_v1319z00_3969,8L,BFALSE); 
BgL_res2678z00_3980 = BgL_v1319z00_3969; } } 
BgL_arg1968z00_1968 = BgL_res2678z00_3980; } 
VECTOR_SET(BgL_v1341z00_1967,0L,BgL_arg1968z00_1968); } 
BgL_arg1961z00_1949 = BgL_v1341z00_1967; } 
{ /* Llib/object.scm 250 */
 obj_t BgL_v1342z00_1978;
BgL_v1342z00_1978 = 
create_vector(0L); 
BgL_arg1962z00_1950 = BgL_v1342z00_1978; } 
BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3748z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62errorz62zz__objectz00, 17130L, BGl_proc3747z00zz__objectz00, BGl_proc3746z00zz__objectz00, BFALSE, BGl_proc3745z00zz__objectz00, BFALSE, BgL_arg1961z00_1949, BgL_arg1962z00_1950); } 
{ /* Llib/object.scm 252 */
 obj_t BgL_arg1979z00_1985; obj_t BgL_arg1980z00_1986;
{ /* Llib/object.scm 252 */
 obj_t BgL_v1343z00_2002;
BgL_v1343z00_2002 = 
create_vector(0L); 
BgL_arg1979z00_1985 = BgL_v1343z00_2002; } 
{ /* Llib/object.scm 252 */
 obj_t BgL_v1344z00_2003;
BgL_v1344z00_2003 = 
create_vector(0L); 
BgL_arg1980z00_1986 = BgL_v1344z00_2003; } 
BGl_z62iozd2errorzb0zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3753z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62errorz62zz__objectz00, 63818L, BGl_proc3752z00zz__objectz00, BGl_proc3751z00zz__objectz00, BFALSE, BGl_proc3750z00zz__objectz00, BFALSE, BgL_arg1979z00_1985, BgL_arg1980z00_1986); } 
{ /* Llib/object.scm 253 */
 obj_t BgL_arg1990z00_2010; obj_t BgL_arg1991z00_2011;
{ /* Llib/object.scm 253 */
 obj_t BgL_v1345z00_2027;
BgL_v1345z00_2027 = 
create_vector(0L); 
BgL_arg1990z00_2010 = BgL_v1345z00_2027; } 
{ /* Llib/object.scm 253 */
 obj_t BgL_v1346z00_2028;
BgL_v1346z00_2028 = 
create_vector(0L); 
BgL_arg1991z00_2011 = BgL_v1346z00_2028; } 
BGl_z62iozd2portzd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3758z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 55779L, BGl_proc3757z00zz__objectz00, BGl_proc3756z00zz__objectz00, BFALSE, BGl_proc3755z00zz__objectz00, BFALSE, BgL_arg1990z00_2010, BgL_arg1991z00_2011); } 
{ /* Llib/object.scm 254 */
 obj_t BgL_arg2002z00_2035; obj_t BgL_arg2003z00_2036;
{ /* Llib/object.scm 254 */
 obj_t BgL_v1347z00_2052;
BgL_v1347z00_2052 = 
create_vector(0L); 
BgL_arg2002z00_2035 = BgL_v1347z00_2052; } 
{ /* Llib/object.scm 254 */
 obj_t BgL_v1348z00_2053;
BgL_v1348z00_2053 = 
create_vector(0L); 
BgL_arg2003z00_2036 = BgL_v1348z00_2053; } 
BGl_z62iozd2readzd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3763z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2portzd2errorz62zz__objectz00, 15626L, BGl_proc3762z00zz__objectz00, BGl_proc3761z00zz__objectz00, BFALSE, BGl_proc3760z00zz__objectz00, BFALSE, BgL_arg2002z00_2035, BgL_arg2003z00_2036); } 
{ /* Llib/object.scm 255 */
 obj_t BgL_arg2013z00_2060; obj_t BgL_arg2016z00_2061;
{ /* Llib/object.scm 255 */
 obj_t BgL_v1349z00_2077;
BgL_v1349z00_2077 = 
create_vector(0L); 
BgL_arg2013z00_2060 = BgL_v1349z00_2077; } 
{ /* Llib/object.scm 255 */
 obj_t BgL_v1350z00_2078;
BgL_v1350z00_2078 = 
create_vector(0L); 
BgL_arg2016z00_2061 = BgL_v1350z00_2078; } 
BGl_z62iozd2writezd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3768z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2portzd2errorz62zz__objectz00, 35931L, BGl_proc3767z00zz__objectz00, BGl_proc3766z00zz__objectz00, BFALSE, BGl_proc3765z00zz__objectz00, BFALSE, BgL_arg2013z00_2060, BgL_arg2016z00_2061); } 
{ /* Llib/object.scm 256 */
 obj_t BgL_arg2026z00_2085; obj_t BgL_arg2028z00_2086;
{ /* Llib/object.scm 256 */
 obj_t BgL_v1351z00_2102;
BgL_v1351z00_2102 = 
create_vector(0L); 
BgL_arg2026z00_2085 = BgL_v1351z00_2102; } 
{ /* Llib/object.scm 256 */
 obj_t BgL_v1352z00_2103;
BgL_v1352z00_2103 = 
create_vector(0L); 
BgL_arg2028z00_2086 = BgL_v1352z00_2103; } 
BGl_z62iozd2closedzd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3773z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2portzd2errorz62zz__objectz00, 8168L, BGl_proc3772z00zz__objectz00, BGl_proc3771z00zz__objectz00, BFALSE, BGl_proc3770z00zz__objectz00, BFALSE, BgL_arg2026z00_2085, BgL_arg2028z00_2086); } 
{ /* Llib/object.scm 257 */
 obj_t BgL_arg2038z00_2110; obj_t BgL_arg2039z00_2111;
{ /* Llib/object.scm 257 */
 obj_t BgL_v1353z00_2127;
BgL_v1353z00_2127 = 
create_vector(0L); 
BgL_arg2038z00_2110 = BgL_v1353z00_2127; } 
{ /* Llib/object.scm 257 */
 obj_t BgL_v1354z00_2128;
BgL_v1354z00_2128 = 
create_vector(0L); 
BgL_arg2039z00_2111 = BgL_v1354z00_2128; } 
BGl_z62iozd2filezd2notzd2foundzd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3778z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 9101L, BGl_proc3777z00zz__objectz00, BGl_proc3776z00zz__objectz00, BFALSE, BGl_proc3775z00zz__objectz00, BFALSE, BgL_arg2038z00_2110, BgL_arg2039z00_2111); } 
{ /* Llib/object.scm 258 */
 obj_t BgL_arg2048z00_2135; obj_t BgL_arg2049z00_2136;
{ /* Llib/object.scm 258 */
 obj_t BgL_v1355z00_2152;
BgL_v1355z00_2152 = 
create_vector(0L); 
BgL_arg2048z00_2135 = BgL_v1355z00_2152; } 
{ /* Llib/object.scm 258 */
 obj_t BgL_v1356z00_2153;
BgL_v1356z00_2153 = 
create_vector(0L); 
BgL_arg2049z00_2136 = BgL_v1356z00_2153; } 
BGl_z62iozd2parsezd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3783z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 21913L, BGl_proc3782z00zz__objectz00, BGl_proc3781z00zz__objectz00, BFALSE, BGl_proc3780z00zz__objectz00, BFALSE, BgL_arg2048z00_2135, BgL_arg2049z00_2136); } 
{ /* Llib/object.scm 259 */
 obj_t BgL_arg2059z00_2160; obj_t BgL_arg2060z00_2161;
{ /* Llib/object.scm 259 */
 obj_t BgL_v1357z00_2177;
BgL_v1357z00_2177 = 
create_vector(0L); 
BgL_arg2059z00_2160 = BgL_v1357z00_2177; } 
{ /* Llib/object.scm 259 */
 obj_t BgL_v1358z00_2178;
BgL_v1358z00_2178 = 
create_vector(0L); 
BgL_arg2060z00_2161 = BgL_v1358z00_2178; } 
BGl_z62iozd2unknownzd2hostzd2errorzb0zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3788z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 40825L, BGl_proc3787z00zz__objectz00, BGl_proc3786z00zz__objectz00, BFALSE, BGl_proc3785z00zz__objectz00, BFALSE, BgL_arg2059z00_2160, BgL_arg2060z00_2161); } 
{ /* Llib/object.scm 260 */
 obj_t BgL_arg2070z00_2185; obj_t BgL_arg2071z00_2186;
{ /* Llib/object.scm 260 */
 obj_t BgL_v1359z00_2202;
BgL_v1359z00_2202 = 
create_vector(0L); 
BgL_arg2070z00_2185 = BgL_v1359z00_2202; } 
{ /* Llib/object.scm 260 */
 obj_t BgL_v1360z00_2203;
BgL_v1360z00_2203 = 
create_vector(0L); 
BgL_arg2071z00_2186 = BgL_v1360z00_2203; } 
BGl_z62iozd2malformedzd2urlzd2errorzb0zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3793z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 43421L, BGl_proc3792z00zz__objectz00, BGl_proc3791z00zz__objectz00, BFALSE, BGl_proc3790z00zz__objectz00, BFALSE, BgL_arg2070z00_2185, BgL_arg2071z00_2186); } 
{ /* Llib/object.scm 261 */
 obj_t BgL_arg2080z00_2210; obj_t BgL_arg2081z00_2211;
{ /* Llib/object.scm 261 */
 obj_t BgL_v1361z00_2227;
BgL_v1361z00_2227 = 
create_vector(0L); 
BgL_arg2080z00_2210 = BgL_v1361z00_2227; } 
{ /* Llib/object.scm 261 */
 obj_t BgL_v1362z00_2228;
BgL_v1362z00_2228 = 
create_vector(0L); 
BgL_arg2081z00_2211 = BgL_v1362z00_2228; } 
BGl_z62iozd2sigpipezd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3798z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 38807L, BGl_proc3797z00zz__objectz00, BGl_proc3796z00zz__objectz00, BFALSE, BGl_proc3795z00zz__objectz00, BFALSE, BgL_arg2080z00_2210, BgL_arg2081z00_2211); } 
{ /* Llib/object.scm 262 */
 obj_t BgL_arg2090z00_2235; obj_t BgL_arg2091z00_2236;
{ /* Llib/object.scm 262 */
 obj_t BgL_v1363z00_2252;
BgL_v1363z00_2252 = 
create_vector(0L); 
BgL_arg2090z00_2235 = BgL_v1363z00_2252; } 
{ /* Llib/object.scm 262 */
 obj_t BgL_v1364z00_2253;
BgL_v1364z00_2253 = 
create_vector(0L); 
BgL_arg2091z00_2236 = BgL_v1364z00_2253; } 
BGl_z62iozd2timeoutzd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3803z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 13L, BGl_proc3802z00zz__objectz00, BGl_proc3801z00zz__objectz00, BFALSE, BGl_proc3800z00zz__objectz00, BFALSE, BgL_arg2090z00_2235, BgL_arg2091z00_2236); } 
{ /* Llib/object.scm 263 */
 obj_t BgL_arg2101z00_2260; obj_t BgL_arg2102z00_2261;
{ /* Llib/object.scm 263 */
 obj_t BgL_v1365z00_2277;
BgL_v1365z00_2277 = 
create_vector(0L); 
BgL_arg2101z00_2260 = BgL_v1365z00_2277; } 
{ /* Llib/object.scm 263 */
 obj_t BgL_v1366z00_2278;
BgL_v1366z00_2278 = 
create_vector(0L); 
BgL_arg2102z00_2261 = BgL_v1366z00_2278; } 
BGl_z62iozd2connectionzd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3808z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62iozd2errorzb0zz__objectz00, 37044L, BGl_proc3807z00zz__objectz00, BGl_proc3806z00zz__objectz00, BFALSE, BGl_proc3805z00zz__objectz00, BFALSE, BgL_arg2101z00_2260, BgL_arg2102z00_2261); } 
{ /* Llib/object.scm 265 */
 obj_t BgL_arg2111z00_2285; obj_t BgL_arg2112z00_2286;
{ /* Llib/object.scm 265 */
 obj_t BgL_v1367z00_2302;
BgL_v1367z00_2302 = 
create_vector(0L); 
BgL_arg2111z00_2285 = BgL_v1367z00_2302; } 
{ /* Llib/object.scm 265 */
 obj_t BgL_v1368z00_2303;
BgL_v1368z00_2303 = 
create_vector(0L); 
BgL_arg2112z00_2286 = BgL_v1368z00_2303; } 
BGl_z62processzd2exceptionzb0zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3813z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62errorz62zz__objectz00, 8734L, BGl_proc3812z00zz__objectz00, BGl_proc3811z00zz__objectz00, BFALSE, BGl_proc3810z00zz__objectz00, BFALSE, BgL_arg2111z00_2285, BgL_arg2112z00_2286); } 
{ /* Llib/object.scm 267 */
 obj_t BgL_arg2121z00_2310; obj_t BgL_arg2122z00_2311;
{ /* Llib/object.scm 267 */
 obj_t BgL_v1369z00_2327;
BgL_v1369z00_2327 = 
create_vector(0L); 
BgL_arg2121z00_2310 = BgL_v1369z00_2327; } 
{ /* Llib/object.scm 267 */
 obj_t BgL_v1370z00_2328;
BgL_v1370z00_2328 = 
create_vector(0L); 
BgL_arg2122z00_2311 = BgL_v1370z00_2328; } 
BGl_z62stackzd2overflowzd2errorz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3818z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62errorz62zz__objectz00, 16267L, BGl_proc3817z00zz__objectz00, BGl_proc3816z00zz__objectz00, BFALSE, BGl_proc3815z00zz__objectz00, BFALSE, BgL_arg2121z00_2310, BgL_arg2122z00_2311); } 
{ /* Llib/object.scm 269 */
 obj_t BgL_arg2131z00_2335; obj_t BgL_arg2132z00_2336;
{ /* Llib/object.scm 269 */
 obj_t BgL_v1371z00_2350;
BgL_v1371z00_2350 = 
create_vector(1L); 
{ /* Llib/object.scm 269 */
 obj_t BgL_arg2138z00_2351;
{ /* Llib/object.scm 269 */
 obj_t BgL_res2679z00_4132;
{ /* Llib/object.scm 269 */
 obj_t BgL_namez00_4117; obj_t BgL_typez00_4120;
BgL_namez00_4117 = BGl_symbol3823z00zz__objectz00; 
BgL_typez00_4120 = BGl_symbol3825z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_4121;
BgL_v1319z00_4121 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_4121,0L,BgL_namez00_4117); 
VECTOR_SET(BgL_v1319z00_4121,1L,BGl_proc3822z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4121,2L,BGl_proc3821z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4121,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4121,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4121,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4121,6L,BGl_proc3820z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4121,7L,BgL_typez00_4120); 
VECTOR_SET(BgL_v1319z00_4121,8L,BFALSE); 
BgL_res2679z00_4132 = BgL_v1319z00_4121; } } 
BgL_arg2138z00_2351 = BgL_res2679z00_4132; } 
VECTOR_SET(BgL_v1371z00_2350,0L,BgL_arg2138z00_2351); } 
BgL_arg2131z00_2335 = BgL_v1371z00_2350; } 
{ /* Llib/object.scm 269 */
 obj_t BgL_v1372z00_2364;
BgL_v1372z00_2364 = 
create_vector(0L); 
BgL_arg2132z00_2336 = BgL_v1372z00_2364; } 
BGl_z62securityzd2exceptionzb0zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3830z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62exceptionz62zz__objectz00, 17339L, BGl_proc3829z00zz__objectz00, BGl_proc3828z00zz__objectz00, BFALSE, BGl_proc3827z00zz__objectz00, BFALSE, BgL_arg2131z00_2335, BgL_arg2132z00_2336); } 
{ /* Llib/object.scm 271 */
 obj_t BgL_arg2149z00_2371; obj_t BgL_arg2150z00_2372;
{ /* Llib/object.scm 271 */
 obj_t BgL_v1373z00_2388;
BgL_v1373z00_2388 = 
create_vector(2L); 
{ /* Llib/object.scm 271 */
 obj_t BgL_arg2156z00_2389;
{ /* Llib/object.scm 271 */
 obj_t BgL_res2680z00_4158;
{ /* Llib/object.scm 271 */
 obj_t BgL_namez00_4143; obj_t BgL_typez00_4146;
BgL_namez00_4143 = BGl_symbol3661z00zz__objectz00; 
BgL_typez00_4146 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_4147;
BgL_v1319z00_4147 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_4147,0L,BgL_namez00_4143); 
VECTOR_SET(BgL_v1319z00_4147,1L,BGl_proc3834z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4147,2L,BGl_proc3833z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4147,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4147,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4147,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4147,6L,BGl_proc3832z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4147,7L,BgL_typez00_4146); 
VECTOR_SET(BgL_v1319z00_4147,8L,BFALSE); 
BgL_res2680z00_4158 = BgL_v1319z00_4147; } } 
BgL_arg2156z00_2389 = BgL_res2680z00_4158; } 
VECTOR_SET(BgL_v1373z00_2388,0L,BgL_arg2156z00_2389); } 
{ /* Llib/object.scm 271 */
 obj_t BgL_arg2163z00_2402;
{ /* Llib/object.scm 271 */
 obj_t BgL_res2681z00_4175;
{ /* Llib/object.scm 271 */
 obj_t BgL_namez00_4160; obj_t BgL_typez00_4163;
BgL_namez00_4160 = BGl_symbol3838z00zz__objectz00; 
BgL_typez00_4163 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_4164;
BgL_v1319z00_4164 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_4164,0L,BgL_namez00_4160); 
VECTOR_SET(BgL_v1319z00_4164,1L,BGl_proc3837z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4164,2L,BGl_proc3836z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4164,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4164,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4164,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4164,6L,BGl_proc3835z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4164,7L,BgL_typez00_4163); 
VECTOR_SET(BgL_v1319z00_4164,8L,BFALSE); 
BgL_res2681z00_4175 = BgL_v1319z00_4164; } } 
BgL_arg2163z00_2402 = BgL_res2681z00_4175; } 
VECTOR_SET(BgL_v1373z00_2388,1L,BgL_arg2163z00_2402); } 
BgL_arg2149z00_2371 = BgL_v1373z00_2388; } 
{ /* Llib/object.scm 271 */
 obj_t BgL_v1374z00_2415;
BgL_v1374z00_2415 = 
create_vector(0L); 
BgL_arg2150z00_2372 = BgL_v1374z00_2415; } 
BGl_z62accesszd2controlzd2exceptionz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3843z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62securityzd2exceptionzb0zz__objectz00, 64045L, BGl_proc3842z00zz__objectz00, BGl_proc3841z00zz__objectz00, BFALSE, BGl_proc3840z00zz__objectz00, BFALSE, BgL_arg2149z00_2371, BgL_arg2150z00_2372); } 
{ /* Llib/object.scm 275 */
 obj_t BgL_arg2173z00_2422; obj_t BgL_arg2174z00_2423;
{ /* Llib/object.scm 275 */
 obj_t BgL_v1375z00_2437;
BgL_v1375z00_2437 = 
create_vector(1L); 
{ /* Llib/object.scm 275 */
 obj_t BgL_arg2180z00_2438;
{ /* Llib/object.scm 275 */
 obj_t BgL_res2682z00_4201;
{ /* Llib/object.scm 275 */
 obj_t BgL_namez00_4186; obj_t BgL_typez00_4189;
BgL_namez00_4186 = BGl_symbol3847z00zz__objectz00; 
BgL_typez00_4189 = BGl_symbol3661z00zz__objectz00; 
{ /* Llib/object.scm 591 */
 obj_t BgL_v1319z00_4190;
BgL_v1319z00_4190 = 
create_vector(9L); 
VECTOR_SET(BgL_v1319z00_4190,0L,BgL_namez00_4186); 
VECTOR_SET(BgL_v1319z00_4190,1L,BGl_proc3846z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4190,2L,BGl_proc3845z00zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4190,3L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4190,4L,BGl_makezd2classzd2fieldzd2envzd2zz__objectz00); 
VECTOR_SET(BgL_v1319z00_4190,5L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4190,6L,BFALSE); 
VECTOR_SET(BgL_v1319z00_4190,7L,BgL_typez00_4189); 
VECTOR_SET(BgL_v1319z00_4190,8L,BFALSE); 
BgL_res2682z00_4201 = BgL_v1319z00_4190; } } 
BgL_arg2180z00_2438 = BgL_res2682z00_4201; } 
VECTOR_SET(BgL_v1375z00_2437,0L,BgL_arg2180z00_2438); } 
BgL_arg2173z00_2422 = BgL_v1375z00_2437; } 
{ /* Llib/object.scm 275 */
 obj_t BgL_v1376z00_2448;
BgL_v1376z00_2448 = 
create_vector(0L); 
BgL_arg2174z00_2423 = BgL_v1376z00_2448; } 
BGl_z62warningz62zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3852z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62exceptionz62zz__objectz00, 33714L, BGl_proc3851z00zz__objectz00, BGl_proc3850z00zz__objectz00, BFALSE, BGl_proc3849z00zz__objectz00, BFALSE, BgL_arg2173z00_2422, BgL_arg2174z00_2423); } 
{ /* Llib/object.scm 277 */
 obj_t BgL_arg2188z00_2455; obj_t BgL_arg2189z00_2456;
{ /* Llib/object.scm 277 */
 obj_t BgL_v1377z00_2470;
BgL_v1377z00_2470 = 
create_vector(0L); 
BgL_arg2188z00_2455 = BgL_v1377z00_2470; } 
{ /* Llib/object.scm 277 */
 obj_t BgL_v1378z00_2471;
BgL_v1378z00_2471 = 
create_vector(0L); 
BgL_arg2189z00_2456 = BgL_v1378z00_2471; } 
return ( 
BGl_z62evalzd2warningzb0zz__objectz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BGl_symbol3857z00zz__objectz00, BGl_symbol3692z00zz__objectz00, BGl_z62warningz62zz__objectz00, 60850L, BGl_proc3856z00zz__objectz00, BGl_proc3855z00zz__objectz00, BFALSE, BGl_proc3854z00zz__objectz00, BFALSE, BgL_arg2188z00_2455, BgL_arg2189z00_2456), BUNSPEC) ;} } 

}



/* &<@anonymous:2194> */
obj_t BGl_z62zc3z04anonymousza32194ze3ze5zz__objectz00(obj_t BgL_envz00_5043, obj_t BgL_new1211z00_5044)
{
{ /* Llib/object.scm 277 */
{ 
 BgL_z62evalzd2warningzb0_bglt BgL_auxz00_11654;
{ /* Llib/object.scm 277 */
 BgL_z62evalzd2warningzb0_bglt BgL_new1211z00_6557;
{ /* Llib/object.scm 277 */
 bool_t BgL_test4950z00_11655;
{ /* Llib/object.scm 277 */
 obj_t BgL_classz00_6539;
BgL_classz00_6539 = BGl_z62evalzd2warningzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1211z00_5044))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6540; long BgL_arg1816z00_6541;
BgL_arg1815z00_6540 = 
(BgL_objectz00_bglt)(BgL_new1211z00_5044); 
BgL_arg1816z00_6541 = 
BGL_CLASS_DEPTH(BgL_classz00_6539); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6542;
BgL_idxz00_6542 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6540); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6543;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6544;
BgL_arg1825z00_6544 = 
(BgL_idxz00_6542+BgL_arg1816z00_6541); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6545;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6546;
BgL_aux3193z00_6546 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6546))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6545 = BgL_aux3193z00_6546; }  else 
{ 
 obj_t BgL_auxz00_11666;
BgL_auxz00_11666 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6546); 
FAILURE(BgL_auxz00_11666,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4954z00_11670;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_11671;
BgL_tmpz00_11671 = 
VECTOR_LENGTH(BgL_vectorz00_6545); 
BgL_test4954z00_11670 = 
BOUND_CHECK(BgL_arg1825z00_6544, BgL_tmpz00_11671); } 
if(BgL_test4954z00_11670)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6543 = 
VECTOR_REF(BgL_vectorz00_6545,BgL_arg1825z00_6544); }  else 
{ 
 obj_t BgL_auxz00_11675;
BgL_auxz00_11675 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6545, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6545)), 
(int)(BgL_arg1825z00_6544)); 
FAILURE(BgL_auxz00_11675,BFALSE,BFALSE);} } } } 
BgL_test4950z00_11655 = 
(BgL_arg1824z00_6543==BgL_classz00_6539); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6547;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6548;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6549; long BgL_arg1554z00_6550;
BgL_arg1552z00_6549 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6551;
BgL_arg1555z00_6551 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6540); 
BgL_arg1554z00_6550 = 
(BgL_arg1555z00_6551-OBJECT_TYPE); } 
BgL_oclassz00_6548 = 
VECTOR_REF(BgL_arg1552z00_6549,BgL_arg1554z00_6550); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6552;
BgL__ortest_1222z00_6552 = 
(BgL_classz00_6539==BgL_oclassz00_6548); 
if(BgL__ortest_1222z00_6552)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6547 = BgL__ortest_1222z00_6552; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6553;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6554;
BgL_arg1822z00_6554 = 
(BgL_oclassz00_6548); 
BgL_odepthz00_6553 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6554); } 
if(
(BgL_arg1816z00_6541<BgL_odepthz00_6553))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6555;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6556;
BgL_arg1821z00_6556 = 
(BgL_oclassz00_6548); 
BgL_arg1820z00_6555 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6556, BgL_arg1816z00_6541); } 
BgL_res2666z00_6547 = 
(BgL_arg1820z00_6555==BgL_classz00_6539); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6547 = ((bool_t)0); } } } } 
BgL_test4950z00_11655 = BgL_res2666z00_6547; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4950z00_11655 = ((bool_t)0)
; } } 
if(BgL_test4950z00_11655)
{ /* Llib/object.scm 277 */
BgL_new1211z00_6557 = 
((BgL_z62evalzd2warningzb0_bglt)BgL_new1211z00_5044); }  else 
{ 
 obj_t BgL_auxz00_11697;
BgL_auxz00_11697 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9895L), BGl_string3859z00zz__objectz00, BGl_string3858z00zz__objectz00, BgL_new1211z00_5044); 
FAILURE(BgL_auxz00_11697,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1211z00_6557)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1211z00_6557)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1211z00_6557)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62warningz62_bglt)COBJECT(
((BgL_z62warningz62_bglt)BgL_new1211z00_6557)))->BgL_argsz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_11654 = BgL_new1211z00_6557; } 
return 
((obj_t)BgL_auxz00_11654);} } 

}



/* &lambda2192 */
BgL_z62evalzd2warningzb0_bglt BGl_z62lambda2192z62zz__objectz00(obj_t BgL_envz00_5045)
{
{ /* Llib/object.scm 277 */
{ /* Llib/object.scm 277 */
 BgL_z62evalzd2warningzb0_bglt BgL_new1210z00_6558;
BgL_new1210z00_6558 = 
((BgL_z62evalzd2warningzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62evalzd2warningzb0_bgl) ))); 
{ /* Llib/object.scm 277 */
 long BgL_arg2193z00_6559;
BgL_arg2193z00_6559 = 
BGL_CLASS_NUM(BGl_z62evalzd2warningzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1210z00_6558), BgL_arg2193z00_6559); } 
return BgL_new1210z00_6558;} } 

}



/* &lambda2190 */
BgL_z62evalzd2warningzb0_bglt BGl_z62lambda2190z62zz__objectz00(obj_t BgL_envz00_5046, obj_t BgL_fname1206z00_5047, obj_t BgL_location1207z00_5048, obj_t BgL_stack1208z00_5049, obj_t BgL_args1209z00_5050)
{
{ /* Llib/object.scm 277 */
{ /* Llib/object.scm 277 */
 BgL_z62evalzd2warningzb0_bglt BgL_new1280z00_6560;
{ /* Llib/object.scm 277 */
 BgL_z62evalzd2warningzb0_bglt BgL_new1279z00_6561;
BgL_new1279z00_6561 = 
((BgL_z62evalzd2warningzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62evalzd2warningzb0_bgl) ))); 
{ /* Llib/object.scm 277 */
 long BgL_arg2191z00_6562;
BgL_arg2191z00_6562 = 
BGL_CLASS_NUM(BGl_z62evalzd2warningzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1279z00_6561), BgL_arg2191z00_6562); } 
BgL_new1280z00_6560 = BgL_new1279z00_6561; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1280z00_6560)))->BgL_fnamez00)=((obj_t)BgL_fname1206z00_5047),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1280z00_6560)))->BgL_locationz00)=((obj_t)BgL_location1207z00_5048),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1280z00_6560)))->BgL_stackz00)=((obj_t)BgL_stack1208z00_5049),BUNSPEC); 
((((BgL_z62warningz62_bglt)COBJECT(
((BgL_z62warningz62_bglt)BgL_new1280z00_6560)))->BgL_argsz00)=((obj_t)BgL_args1209z00_5050),BUNSPEC); 
return BgL_new1280z00_6560;} } 

}



/* &<@anonymous:2179> */
obj_t BGl_z62zc3z04anonymousza32179ze3ze5zz__objectz00(obj_t BgL_envz00_5051, obj_t BgL_new1204z00_5052)
{
{ /* Llib/object.scm 275 */
{ 
 BgL_z62warningz62_bglt BgL_auxz00_11726;
{ /* Llib/object.scm 275 */
 BgL_z62warningz62_bglt BgL_new1204z00_6581;
{ /* Llib/object.scm 275 */
 bool_t BgL_test4957z00_11727;
{ /* Llib/object.scm 275 */
 obj_t BgL_classz00_6563;
BgL_classz00_6563 = BGl_z62warningz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1204z00_5052))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6564; long BgL_arg1816z00_6565;
BgL_arg1815z00_6564 = 
(BgL_objectz00_bglt)(BgL_new1204z00_5052); 
BgL_arg1816z00_6565 = 
BGL_CLASS_DEPTH(BgL_classz00_6563); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6566;
BgL_idxz00_6566 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6564); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6567;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6568;
BgL_arg1825z00_6568 = 
(BgL_idxz00_6566+BgL_arg1816z00_6565); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6569;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6570;
BgL_aux3193z00_6570 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6570))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6569 = BgL_aux3193z00_6570; }  else 
{ 
 obj_t BgL_auxz00_11738;
BgL_auxz00_11738 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6570); 
FAILURE(BgL_auxz00_11738,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4961z00_11742;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_11743;
BgL_tmpz00_11743 = 
VECTOR_LENGTH(BgL_vectorz00_6569); 
BgL_test4961z00_11742 = 
BOUND_CHECK(BgL_arg1825z00_6568, BgL_tmpz00_11743); } 
if(BgL_test4961z00_11742)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6567 = 
VECTOR_REF(BgL_vectorz00_6569,BgL_arg1825z00_6568); }  else 
{ 
 obj_t BgL_auxz00_11747;
BgL_auxz00_11747 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6569, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6569)), 
(int)(BgL_arg1825z00_6568)); 
FAILURE(BgL_auxz00_11747,BFALSE,BFALSE);} } } } 
BgL_test4957z00_11727 = 
(BgL_arg1824z00_6567==BgL_classz00_6563); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6571;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6572;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6573; long BgL_arg1554z00_6574;
BgL_arg1552z00_6573 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6575;
BgL_arg1555z00_6575 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6564); 
BgL_arg1554z00_6574 = 
(BgL_arg1555z00_6575-OBJECT_TYPE); } 
BgL_oclassz00_6572 = 
VECTOR_REF(BgL_arg1552z00_6573,BgL_arg1554z00_6574); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6576;
BgL__ortest_1222z00_6576 = 
(BgL_classz00_6563==BgL_oclassz00_6572); 
if(BgL__ortest_1222z00_6576)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6571 = BgL__ortest_1222z00_6576; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6577;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6578;
BgL_arg1822z00_6578 = 
(BgL_oclassz00_6572); 
BgL_odepthz00_6577 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6578); } 
if(
(BgL_arg1816z00_6565<BgL_odepthz00_6577))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6579;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6580;
BgL_arg1821z00_6580 = 
(BgL_oclassz00_6572); 
BgL_arg1820z00_6579 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6580, BgL_arg1816z00_6565); } 
BgL_res2666z00_6571 = 
(BgL_arg1820z00_6579==BgL_classz00_6563); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6571 = ((bool_t)0); } } } } 
BgL_test4957z00_11727 = BgL_res2666z00_6571; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4957z00_11727 = ((bool_t)0)
; } } 
if(BgL_test4957z00_11727)
{ /* Llib/object.scm 275 */
BgL_new1204z00_6581 = 
((BgL_z62warningz62_bglt)BgL_new1204z00_5052); }  else 
{ 
 obj_t BgL_auxz00_11769;
BgL_auxz00_11769 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9836L), BGl_string3860z00zz__objectz00, BGl_string3853z00zz__objectz00, BgL_new1204z00_5052); 
FAILURE(BgL_auxz00_11769,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1204z00_6581)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1204z00_6581)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1204z00_6581)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62warningz62_bglt)COBJECT(BgL_new1204z00_6581))->BgL_argsz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_11726 = BgL_new1204z00_6581; } 
return 
((obj_t)BgL_auxz00_11726);} } 

}



/* &lambda2177 */
BgL_z62warningz62_bglt BGl_z62lambda2177z62zz__objectz00(obj_t BgL_envz00_5053)
{
{ /* Llib/object.scm 275 */
{ /* Llib/object.scm 275 */
 BgL_z62warningz62_bglt BgL_new1203z00_6582;
BgL_new1203z00_6582 = 
((BgL_z62warningz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62warningz62_bgl) ))); 
{ /* Llib/object.scm 275 */
 long BgL_arg2178z00_6583;
BgL_arg2178z00_6583 = 
BGL_CLASS_NUM(BGl_z62warningz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1203z00_6582), BgL_arg2178z00_6583); } 
return BgL_new1203z00_6582;} } 

}



/* &lambda2175 */
BgL_z62warningz62_bglt BGl_z62lambda2175z62zz__objectz00(obj_t BgL_envz00_5054, obj_t BgL_fname1199z00_5055, obj_t BgL_location1200z00_5056, obj_t BgL_stack1201z00_5057, obj_t BgL_args1202z00_5058)
{
{ /* Llib/object.scm 275 */
{ /* Llib/object.scm 275 */
 BgL_z62warningz62_bglt BgL_new1278z00_6584;
{ /* Llib/object.scm 275 */
 BgL_z62warningz62_bglt BgL_new1277z00_6585;
BgL_new1277z00_6585 = 
((BgL_z62warningz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62warningz62_bgl) ))); 
{ /* Llib/object.scm 275 */
 long BgL_arg2176z00_6586;
BgL_arg2176z00_6586 = 
BGL_CLASS_NUM(BGl_z62warningz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1277z00_6585), BgL_arg2176z00_6586); } 
BgL_new1278z00_6584 = BgL_new1277z00_6585; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1278z00_6584)))->BgL_fnamez00)=((obj_t)BgL_fname1199z00_5055),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1278z00_6584)))->BgL_locationz00)=((obj_t)BgL_location1200z00_5056),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1278z00_6584)))->BgL_stackz00)=((obj_t)BgL_stack1201z00_5057),BUNSPEC); 
((((BgL_z62warningz62_bglt)COBJECT(BgL_new1278z00_6584))->BgL_argsz00)=((obj_t)BgL_args1202z00_5058),BUNSPEC); 
return BgL_new1278z00_6584;} } 

}



/* &lambda2184 */
obj_t BGl_z62lambda2184z62zz__objectz00(obj_t BgL_envz00_5059, obj_t BgL_oz00_5060, obj_t BgL_vz00_5061)
{
{ /* Llib/object.scm 275 */
{ /* Llib/object.scm 275 */
 BgL_z62warningz62_bglt BgL_oz00_6605;
{ /* Llib/object.scm 275 */
 bool_t BgL_test4964z00_11796;
{ /* Llib/object.scm 275 */
 obj_t BgL_classz00_6587;
BgL_classz00_6587 = BGl_z62warningz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5060))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6588; long BgL_arg1816z00_6589;
BgL_arg1815z00_6588 = 
(BgL_objectz00_bglt)(BgL_oz00_5060); 
BgL_arg1816z00_6589 = 
BGL_CLASS_DEPTH(BgL_classz00_6587); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6590;
BgL_idxz00_6590 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6588); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6591;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6592;
BgL_arg1825z00_6592 = 
(BgL_idxz00_6590+BgL_arg1816z00_6589); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6593;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6594;
BgL_aux3193z00_6594 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6594))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6593 = BgL_aux3193z00_6594; }  else 
{ 
 obj_t BgL_auxz00_11807;
BgL_auxz00_11807 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6594); 
FAILURE(BgL_auxz00_11807,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4968z00_11811;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_11812;
BgL_tmpz00_11812 = 
VECTOR_LENGTH(BgL_vectorz00_6593); 
BgL_test4968z00_11811 = 
BOUND_CHECK(BgL_arg1825z00_6592, BgL_tmpz00_11812); } 
if(BgL_test4968z00_11811)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6591 = 
VECTOR_REF(BgL_vectorz00_6593,BgL_arg1825z00_6592); }  else 
{ 
 obj_t BgL_auxz00_11816;
BgL_auxz00_11816 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6593, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6593)), 
(int)(BgL_arg1825z00_6592)); 
FAILURE(BgL_auxz00_11816,BFALSE,BFALSE);} } } } 
BgL_test4964z00_11796 = 
(BgL_arg1824z00_6591==BgL_classz00_6587); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6595;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6596;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6597; long BgL_arg1554z00_6598;
BgL_arg1552z00_6597 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6599;
BgL_arg1555z00_6599 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6588); 
BgL_arg1554z00_6598 = 
(BgL_arg1555z00_6599-OBJECT_TYPE); } 
BgL_oclassz00_6596 = 
VECTOR_REF(BgL_arg1552z00_6597,BgL_arg1554z00_6598); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6600;
BgL__ortest_1222z00_6600 = 
(BgL_classz00_6587==BgL_oclassz00_6596); 
if(BgL__ortest_1222z00_6600)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6595 = BgL__ortest_1222z00_6600; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6601;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6602;
BgL_arg1822z00_6602 = 
(BgL_oclassz00_6596); 
BgL_odepthz00_6601 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6602); } 
if(
(BgL_arg1816z00_6589<BgL_odepthz00_6601))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6603;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6604;
BgL_arg1821z00_6604 = 
(BgL_oclassz00_6596); 
BgL_arg1820z00_6603 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6604, BgL_arg1816z00_6589); } 
BgL_res2666z00_6595 = 
(BgL_arg1820z00_6603==BgL_classz00_6587); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6595 = ((bool_t)0); } } } } 
BgL_test4964z00_11796 = BgL_res2666z00_6595; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4964z00_11796 = ((bool_t)0)
; } } 
if(BgL_test4964z00_11796)
{ /* Llib/object.scm 275 */
BgL_oz00_6605 = 
((BgL_z62warningz62_bglt)BgL_oz00_5060); }  else 
{ 
 obj_t BgL_auxz00_11838;
BgL_auxz00_11838 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9836L), BGl_string3861z00zz__objectz00, BGl_string3853z00zz__objectz00, BgL_oz00_5060); 
FAILURE(BgL_auxz00_11838,BFALSE,BFALSE);} } 
return 
((((BgL_z62warningz62_bglt)COBJECT(BgL_oz00_6605))->BgL_argsz00)=((obj_t)BgL_vz00_5061),BUNSPEC);} } 

}



/* &lambda2183 */
obj_t BGl_z62lambda2183z62zz__objectz00(obj_t BgL_envz00_5062, obj_t BgL_oz00_5063)
{
{ /* Llib/object.scm 275 */
{ /* Llib/object.scm 275 */
 BgL_z62warningz62_bglt BgL_oz00_6624;
{ /* Llib/object.scm 275 */
 bool_t BgL_test4971z00_11843;
{ /* Llib/object.scm 275 */
 obj_t BgL_classz00_6606;
BgL_classz00_6606 = BGl_z62warningz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5063))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6607; long BgL_arg1816z00_6608;
BgL_arg1815z00_6607 = 
(BgL_objectz00_bglt)(BgL_oz00_5063); 
BgL_arg1816z00_6608 = 
BGL_CLASS_DEPTH(BgL_classz00_6606); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6609;
BgL_idxz00_6609 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6607); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6610;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6611;
BgL_arg1825z00_6611 = 
(BgL_idxz00_6609+BgL_arg1816z00_6608); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6612;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6613;
BgL_aux3193z00_6613 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6613))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6612 = BgL_aux3193z00_6613; }  else 
{ 
 obj_t BgL_auxz00_11854;
BgL_auxz00_11854 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6613); 
FAILURE(BgL_auxz00_11854,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4975z00_11858;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_11859;
BgL_tmpz00_11859 = 
VECTOR_LENGTH(BgL_vectorz00_6612); 
BgL_test4975z00_11858 = 
BOUND_CHECK(BgL_arg1825z00_6611, BgL_tmpz00_11859); } 
if(BgL_test4975z00_11858)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6610 = 
VECTOR_REF(BgL_vectorz00_6612,BgL_arg1825z00_6611); }  else 
{ 
 obj_t BgL_auxz00_11863;
BgL_auxz00_11863 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6612, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6612)), 
(int)(BgL_arg1825z00_6611)); 
FAILURE(BgL_auxz00_11863,BFALSE,BFALSE);} } } } 
BgL_test4971z00_11843 = 
(BgL_arg1824z00_6610==BgL_classz00_6606); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6614;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6615;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6616; long BgL_arg1554z00_6617;
BgL_arg1552z00_6616 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6618;
BgL_arg1555z00_6618 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6607); 
BgL_arg1554z00_6617 = 
(BgL_arg1555z00_6618-OBJECT_TYPE); } 
BgL_oclassz00_6615 = 
VECTOR_REF(BgL_arg1552z00_6616,BgL_arg1554z00_6617); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6619;
BgL__ortest_1222z00_6619 = 
(BgL_classz00_6606==BgL_oclassz00_6615); 
if(BgL__ortest_1222z00_6619)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6614 = BgL__ortest_1222z00_6619; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6620;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6621;
BgL_arg1822z00_6621 = 
(BgL_oclassz00_6615); 
BgL_odepthz00_6620 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6621); } 
if(
(BgL_arg1816z00_6608<BgL_odepthz00_6620))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6622;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6623;
BgL_arg1821z00_6623 = 
(BgL_oclassz00_6615); 
BgL_arg1820z00_6622 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6623, BgL_arg1816z00_6608); } 
BgL_res2666z00_6614 = 
(BgL_arg1820z00_6622==BgL_classz00_6606); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6614 = ((bool_t)0); } } } } 
BgL_test4971z00_11843 = BgL_res2666z00_6614; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4971z00_11843 = ((bool_t)0)
; } } 
if(BgL_test4971z00_11843)
{ /* Llib/object.scm 275 */
BgL_oz00_6624 = 
((BgL_z62warningz62_bglt)BgL_oz00_5063); }  else 
{ 
 obj_t BgL_auxz00_11885;
BgL_auxz00_11885 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9836L), BGl_string3862z00zz__objectz00, BGl_string3853z00zz__objectz00, BgL_oz00_5063); 
FAILURE(BgL_auxz00_11885,BFALSE,BFALSE);} } 
return 
(((BgL_z62warningz62_bglt)COBJECT(BgL_oz00_6624))->BgL_argsz00);} } 

}



/* &<@anonymous:2155> */
obj_t BGl_z62zc3z04anonymousza32155ze3ze5zz__objectz00(obj_t BgL_envz00_5064, obj_t BgL_new1197z00_5065)
{
{ /* Llib/object.scm 271 */
{ 
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_auxz00_11890;
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_new1197z00_6643;
{ /* Llib/object.scm 271 */
 bool_t BgL_test4978z00_11891;
{ /* Llib/object.scm 271 */
 obj_t BgL_classz00_6625;
BgL_classz00_6625 = BGl_z62accesszd2controlzd2exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1197z00_5065))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6626; long BgL_arg1816z00_6627;
BgL_arg1815z00_6626 = 
(BgL_objectz00_bglt)(BgL_new1197z00_5065); 
BgL_arg1816z00_6627 = 
BGL_CLASS_DEPTH(BgL_classz00_6625); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6628;
BgL_idxz00_6628 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6626); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6629;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6630;
BgL_arg1825z00_6630 = 
(BgL_idxz00_6628+BgL_arg1816z00_6627); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6631;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6632;
BgL_aux3193z00_6632 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6632))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6631 = BgL_aux3193z00_6632; }  else 
{ 
 obj_t BgL_auxz00_11902;
BgL_auxz00_11902 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6632); 
FAILURE(BgL_auxz00_11902,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4982z00_11906;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_11907;
BgL_tmpz00_11907 = 
VECTOR_LENGTH(BgL_vectorz00_6631); 
BgL_test4982z00_11906 = 
BOUND_CHECK(BgL_arg1825z00_6630, BgL_tmpz00_11907); } 
if(BgL_test4982z00_11906)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6629 = 
VECTOR_REF(BgL_vectorz00_6631,BgL_arg1825z00_6630); }  else 
{ 
 obj_t BgL_auxz00_11911;
BgL_auxz00_11911 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6631, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6631)), 
(int)(BgL_arg1825z00_6630)); 
FAILURE(BgL_auxz00_11911,BFALSE,BFALSE);} } } } 
BgL_test4978z00_11891 = 
(BgL_arg1824z00_6629==BgL_classz00_6625); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6633;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6634;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6635; long BgL_arg1554z00_6636;
BgL_arg1552z00_6635 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6637;
BgL_arg1555z00_6637 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6626); 
BgL_arg1554z00_6636 = 
(BgL_arg1555z00_6637-OBJECT_TYPE); } 
BgL_oclassz00_6634 = 
VECTOR_REF(BgL_arg1552z00_6635,BgL_arg1554z00_6636); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6638;
BgL__ortest_1222z00_6638 = 
(BgL_classz00_6625==BgL_oclassz00_6634); 
if(BgL__ortest_1222z00_6638)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6633 = BgL__ortest_1222z00_6638; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6639;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6640;
BgL_arg1822z00_6640 = 
(BgL_oclassz00_6634); 
BgL_odepthz00_6639 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6640); } 
if(
(BgL_arg1816z00_6627<BgL_odepthz00_6639))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6641;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6642;
BgL_arg1821z00_6642 = 
(BgL_oclassz00_6634); 
BgL_arg1820z00_6641 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6642, BgL_arg1816z00_6627); } 
BgL_res2666z00_6633 = 
(BgL_arg1820z00_6641==BgL_classz00_6625); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6633 = ((bool_t)0); } } } } 
BgL_test4978z00_11891 = BgL_res2666z00_6633; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4978z00_11891 = ((bool_t)0)
; } } 
if(BgL_test4978z00_11891)
{ /* Llib/object.scm 271 */
BgL_new1197z00_6643 = 
((BgL_z62accesszd2controlzd2exceptionz62_bglt)BgL_new1197z00_5065); }  else 
{ 
 obj_t BgL_auxz00_11933;
BgL_auxz00_11933 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9659L), BGl_string3863z00zz__objectz00, BGl_string3844z00zz__objectz00, BgL_new1197z00_5065); 
FAILURE(BgL_auxz00_11933,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1197z00_6643)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1197z00_6643)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1197z00_6643)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62securityzd2exceptionzb0_bglt)COBJECT(
((BgL_z62securityzd2exceptionzb0_bglt)BgL_new1197z00_6643)))->BgL_messagez00)=((obj_t)BGl_string3618z00zz__objectz00),BUNSPEC); 
((((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_new1197z00_6643))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_new1197z00_6643))->BgL_permissionz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_11890 = BgL_new1197z00_6643; } 
return 
((obj_t)BgL_auxz00_11890);} } 

}



/* &lambda2153 */
BgL_z62accesszd2controlzd2exceptionz62_bglt BGl_z62lambda2153z62zz__objectz00(obj_t BgL_envz00_5066)
{
{ /* Llib/object.scm 271 */
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_new1196z00_6644;
BgL_new1196z00_6644 = 
((BgL_z62accesszd2controlzd2exceptionz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62accesszd2controlzd2exceptionz62_bgl) ))); 
{ /* Llib/object.scm 271 */
 long BgL_arg2154z00_6645;
BgL_arg2154z00_6645 = 
BGL_CLASS_NUM(BGl_z62accesszd2controlzd2exceptionz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1196z00_6644), BgL_arg2154z00_6645); } 
return BgL_new1196z00_6644;} } 

}



/* &lambda2151 */
BgL_z62accesszd2controlzd2exceptionz62_bglt BGl_z62lambda2151z62zz__objectz00(obj_t BgL_envz00_5067, obj_t BgL_fname1190z00_5068, obj_t BgL_location1191z00_5069, obj_t BgL_stack1192z00_5070, obj_t BgL_message1193z00_5071, obj_t BgL_obj1194z00_5072, obj_t BgL_permission1195z00_5073)
{
{ /* Llib/object.scm 271 */
{ /* Llib/object.scm 271 */
 obj_t BgL_message1193z00_6646;
if(
STRINGP(BgL_message1193z00_5071))
{ /* Llib/object.scm 271 */
BgL_message1193z00_6646 = BgL_message1193z00_5071; }  else 
{ 
 obj_t BgL_auxz00_11954;
BgL_auxz00_11954 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9659L), BGl_string3864z00zz__objectz00, BGl_string3826z00zz__objectz00, BgL_message1193z00_5071); 
FAILURE(BgL_auxz00_11954,BFALSE,BFALSE);} 
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_new1276z00_6647;
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_new1275z00_6648;
BgL_new1275z00_6648 = 
((BgL_z62accesszd2controlzd2exceptionz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62accesszd2controlzd2exceptionz62_bgl) ))); 
{ /* Llib/object.scm 271 */
 long BgL_arg2152z00_6649;
BgL_arg2152z00_6649 = 
BGL_CLASS_NUM(BGl_z62accesszd2controlzd2exceptionz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1275z00_6648), BgL_arg2152z00_6649); } 
BgL_new1276z00_6647 = BgL_new1275z00_6648; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1276z00_6647)))->BgL_fnamez00)=((obj_t)BgL_fname1190z00_5068),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1276z00_6647)))->BgL_locationz00)=((obj_t)BgL_location1191z00_5069),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1276z00_6647)))->BgL_stackz00)=((obj_t)BgL_stack1192z00_5070),BUNSPEC); 
((((BgL_z62securityzd2exceptionzb0_bglt)COBJECT(
((BgL_z62securityzd2exceptionzb0_bglt)BgL_new1276z00_6647)))->BgL_messagez00)=((obj_t)BgL_message1193z00_6646),BUNSPEC); 
((((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_new1276z00_6647))->BgL_objz00)=((obj_t)BgL_obj1194z00_5072),BUNSPEC); 
((((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_new1276z00_6647))->BgL_permissionz00)=((obj_t)BgL_permission1195z00_5073),BUNSPEC); 
return BgL_new1276z00_6647;} } } 

}



/* &<@anonymous:2169> */
obj_t BGl_z62zc3z04anonymousza32169ze3ze5zz__objectz00(obj_t BgL_envz00_5074)
{
{ /* Llib/object.scm 271 */
return BUNSPEC;} 

}



/* &lambda2168 */
obj_t BGl_z62lambda2168z62zz__objectz00(obj_t BgL_envz00_5075, obj_t BgL_oz00_5076, obj_t BgL_vz00_5077)
{
{ /* Llib/object.scm 271 */
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_oz00_6668;
{ /* Llib/object.scm 271 */
 bool_t BgL_test4986z00_11972;
{ /* Llib/object.scm 271 */
 obj_t BgL_classz00_6650;
BgL_classz00_6650 = BGl_z62accesszd2controlzd2exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5076))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6651; long BgL_arg1816z00_6652;
BgL_arg1815z00_6651 = 
(BgL_objectz00_bglt)(BgL_oz00_5076); 
BgL_arg1816z00_6652 = 
BGL_CLASS_DEPTH(BgL_classz00_6650); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6653;
BgL_idxz00_6653 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6651); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6654;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6655;
BgL_arg1825z00_6655 = 
(BgL_idxz00_6653+BgL_arg1816z00_6652); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6656;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6657;
BgL_aux3193z00_6657 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6657))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6656 = BgL_aux3193z00_6657; }  else 
{ 
 obj_t BgL_auxz00_11983;
BgL_auxz00_11983 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6657); 
FAILURE(BgL_auxz00_11983,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test4990z00_11987;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_11988;
BgL_tmpz00_11988 = 
VECTOR_LENGTH(BgL_vectorz00_6656); 
BgL_test4990z00_11987 = 
BOUND_CHECK(BgL_arg1825z00_6655, BgL_tmpz00_11988); } 
if(BgL_test4990z00_11987)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6654 = 
VECTOR_REF(BgL_vectorz00_6656,BgL_arg1825z00_6655); }  else 
{ 
 obj_t BgL_auxz00_11992;
BgL_auxz00_11992 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6656, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6656)), 
(int)(BgL_arg1825z00_6655)); 
FAILURE(BgL_auxz00_11992,BFALSE,BFALSE);} } } } 
BgL_test4986z00_11972 = 
(BgL_arg1824z00_6654==BgL_classz00_6650); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6658;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6659;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6660; long BgL_arg1554z00_6661;
BgL_arg1552z00_6660 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6662;
BgL_arg1555z00_6662 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6651); 
BgL_arg1554z00_6661 = 
(BgL_arg1555z00_6662-OBJECT_TYPE); } 
BgL_oclassz00_6659 = 
VECTOR_REF(BgL_arg1552z00_6660,BgL_arg1554z00_6661); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6663;
BgL__ortest_1222z00_6663 = 
(BgL_classz00_6650==BgL_oclassz00_6659); 
if(BgL__ortest_1222z00_6663)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6658 = BgL__ortest_1222z00_6663; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6664;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6665;
BgL_arg1822z00_6665 = 
(BgL_oclassz00_6659); 
BgL_odepthz00_6664 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6665); } 
if(
(BgL_arg1816z00_6652<BgL_odepthz00_6664))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6666;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6667;
BgL_arg1821z00_6667 = 
(BgL_oclassz00_6659); 
BgL_arg1820z00_6666 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6667, BgL_arg1816z00_6652); } 
BgL_res2666z00_6658 = 
(BgL_arg1820z00_6666==BgL_classz00_6650); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6658 = ((bool_t)0); } } } } 
BgL_test4986z00_11972 = BgL_res2666z00_6658; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4986z00_11972 = ((bool_t)0)
; } } 
if(BgL_test4986z00_11972)
{ /* Llib/object.scm 271 */
BgL_oz00_6668 = 
((BgL_z62accesszd2controlzd2exceptionz62_bglt)BgL_oz00_5076); }  else 
{ 
 obj_t BgL_auxz00_12014;
BgL_auxz00_12014 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9659L), BGl_string3865z00zz__objectz00, BGl_string3844z00zz__objectz00, BgL_oz00_5076); 
FAILURE(BgL_auxz00_12014,BFALSE,BFALSE);} } 
return 
((((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_oz00_6668))->BgL_permissionz00)=((obj_t)BgL_vz00_5077),BUNSPEC);} } 

}



/* &lambda2167 */
obj_t BGl_z62lambda2167z62zz__objectz00(obj_t BgL_envz00_5078, obj_t BgL_oz00_5079)
{
{ /* Llib/object.scm 271 */
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_oz00_6687;
{ /* Llib/object.scm 271 */
 bool_t BgL_test4994z00_12019;
{ /* Llib/object.scm 271 */
 obj_t BgL_classz00_6669;
BgL_classz00_6669 = BGl_z62accesszd2controlzd2exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5079))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6670; long BgL_arg1816z00_6671;
BgL_arg1815z00_6670 = 
(BgL_objectz00_bglt)(BgL_oz00_5079); 
BgL_arg1816z00_6671 = 
BGL_CLASS_DEPTH(BgL_classz00_6669); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6672;
BgL_idxz00_6672 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6670); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6673;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6674;
BgL_arg1825z00_6674 = 
(BgL_idxz00_6672+BgL_arg1816z00_6671); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6675;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6676;
BgL_aux3193z00_6676 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6676))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6675 = BgL_aux3193z00_6676; }  else 
{ 
 obj_t BgL_auxz00_12030;
BgL_auxz00_12030 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6676); 
FAILURE(BgL_auxz00_12030,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5000z00_12034;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12035;
BgL_tmpz00_12035 = 
VECTOR_LENGTH(BgL_vectorz00_6675); 
BgL_test5000z00_12034 = 
BOUND_CHECK(BgL_arg1825z00_6674, BgL_tmpz00_12035); } 
if(BgL_test5000z00_12034)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6673 = 
VECTOR_REF(BgL_vectorz00_6675,BgL_arg1825z00_6674); }  else 
{ 
 obj_t BgL_auxz00_12039;
BgL_auxz00_12039 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6675, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6675)), 
(int)(BgL_arg1825z00_6674)); 
FAILURE(BgL_auxz00_12039,BFALSE,BFALSE);} } } } 
BgL_test4994z00_12019 = 
(BgL_arg1824z00_6673==BgL_classz00_6669); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6677;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6678;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6679; long BgL_arg1554z00_6680;
BgL_arg1552z00_6679 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6681;
BgL_arg1555z00_6681 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6670); 
BgL_arg1554z00_6680 = 
(BgL_arg1555z00_6681-OBJECT_TYPE); } 
BgL_oclassz00_6678 = 
VECTOR_REF(BgL_arg1552z00_6679,BgL_arg1554z00_6680); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6682;
BgL__ortest_1222z00_6682 = 
(BgL_classz00_6669==BgL_oclassz00_6678); 
if(BgL__ortest_1222z00_6682)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6677 = BgL__ortest_1222z00_6682; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6683;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6684;
BgL_arg1822z00_6684 = 
(BgL_oclassz00_6678); 
BgL_odepthz00_6683 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6684); } 
if(
(BgL_arg1816z00_6671<BgL_odepthz00_6683))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6685;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6686;
BgL_arg1821z00_6686 = 
(BgL_oclassz00_6678); 
BgL_arg1820z00_6685 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6686, BgL_arg1816z00_6671); } 
BgL_res2666z00_6677 = 
(BgL_arg1820z00_6685==BgL_classz00_6669); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6677 = ((bool_t)0); } } } } 
BgL_test4994z00_12019 = BgL_res2666z00_6677; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test4994z00_12019 = ((bool_t)0)
; } } 
if(BgL_test4994z00_12019)
{ /* Llib/object.scm 271 */
BgL_oz00_6687 = 
((BgL_z62accesszd2controlzd2exceptionz62_bglt)BgL_oz00_5079); }  else 
{ 
 obj_t BgL_auxz00_12061;
BgL_auxz00_12061 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9659L), BGl_string3866z00zz__objectz00, BGl_string3844z00zz__objectz00, BgL_oz00_5079); 
FAILURE(BgL_auxz00_12061,BFALSE,BFALSE);} } 
return 
(((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_oz00_6687))->BgL_permissionz00);} } 

}



/* &<@anonymous:2162> */
obj_t BGl_z62zc3z04anonymousza32162ze3ze5zz__objectz00(obj_t BgL_envz00_5080)
{
{ /* Llib/object.scm 271 */
return BUNSPEC;} 

}



/* &lambda2161 */
obj_t BGl_z62lambda2161z62zz__objectz00(obj_t BgL_envz00_5081, obj_t BgL_oz00_5082, obj_t BgL_vz00_5083)
{
{ /* Llib/object.scm 271 */
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_oz00_6706;
{ /* Llib/object.scm 271 */
 bool_t BgL_test5003z00_12066;
{ /* Llib/object.scm 271 */
 obj_t BgL_classz00_6688;
BgL_classz00_6688 = BGl_z62accesszd2controlzd2exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5082))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6689; long BgL_arg1816z00_6690;
BgL_arg1815z00_6689 = 
(BgL_objectz00_bglt)(BgL_oz00_5082); 
BgL_arg1816z00_6690 = 
BGL_CLASS_DEPTH(BgL_classz00_6688); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6691;
BgL_idxz00_6691 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6689); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6692;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6693;
BgL_arg1825z00_6693 = 
(BgL_idxz00_6691+BgL_arg1816z00_6690); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6694;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6695;
BgL_aux3193z00_6695 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6695))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6694 = BgL_aux3193z00_6695; }  else 
{ 
 obj_t BgL_auxz00_12077;
BgL_auxz00_12077 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6695); 
FAILURE(BgL_auxz00_12077,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5007z00_12081;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12082;
BgL_tmpz00_12082 = 
VECTOR_LENGTH(BgL_vectorz00_6694); 
BgL_test5007z00_12081 = 
BOUND_CHECK(BgL_arg1825z00_6693, BgL_tmpz00_12082); } 
if(BgL_test5007z00_12081)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6692 = 
VECTOR_REF(BgL_vectorz00_6694,BgL_arg1825z00_6693); }  else 
{ 
 obj_t BgL_auxz00_12086;
BgL_auxz00_12086 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6694, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6694)), 
(int)(BgL_arg1825z00_6693)); 
FAILURE(BgL_auxz00_12086,BFALSE,BFALSE);} } } } 
BgL_test5003z00_12066 = 
(BgL_arg1824z00_6692==BgL_classz00_6688); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6696;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6697;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6698; long BgL_arg1554z00_6699;
BgL_arg1552z00_6698 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6700;
BgL_arg1555z00_6700 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6689); 
BgL_arg1554z00_6699 = 
(BgL_arg1555z00_6700-OBJECT_TYPE); } 
BgL_oclassz00_6697 = 
VECTOR_REF(BgL_arg1552z00_6698,BgL_arg1554z00_6699); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6701;
BgL__ortest_1222z00_6701 = 
(BgL_classz00_6688==BgL_oclassz00_6697); 
if(BgL__ortest_1222z00_6701)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6696 = BgL__ortest_1222z00_6701; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6702;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6703;
BgL_arg1822z00_6703 = 
(BgL_oclassz00_6697); 
BgL_odepthz00_6702 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6703); } 
if(
(BgL_arg1816z00_6690<BgL_odepthz00_6702))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6704;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6705;
BgL_arg1821z00_6705 = 
(BgL_oclassz00_6697); 
BgL_arg1820z00_6704 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6705, BgL_arg1816z00_6690); } 
BgL_res2666z00_6696 = 
(BgL_arg1820z00_6704==BgL_classz00_6688); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6696 = ((bool_t)0); } } } } 
BgL_test5003z00_12066 = BgL_res2666z00_6696; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5003z00_12066 = ((bool_t)0)
; } } 
if(BgL_test5003z00_12066)
{ /* Llib/object.scm 271 */
BgL_oz00_6706 = 
((BgL_z62accesszd2controlzd2exceptionz62_bglt)BgL_oz00_5082); }  else 
{ 
 obj_t BgL_auxz00_12108;
BgL_auxz00_12108 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9659L), BGl_string3867z00zz__objectz00, BGl_string3844z00zz__objectz00, BgL_oz00_5082); 
FAILURE(BgL_auxz00_12108,BFALSE,BFALSE);} } 
return 
((((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_oz00_6706))->BgL_objz00)=((obj_t)BgL_vz00_5083),BUNSPEC);} } 

}



/* &lambda2160 */
obj_t BGl_z62lambda2160z62zz__objectz00(obj_t BgL_envz00_5084, obj_t BgL_oz00_5085)
{
{ /* Llib/object.scm 271 */
{ /* Llib/object.scm 271 */
 BgL_z62accesszd2controlzd2exceptionz62_bglt BgL_oz00_6725;
{ /* Llib/object.scm 271 */
 bool_t BgL_test5010z00_12113;
{ /* Llib/object.scm 271 */
 obj_t BgL_classz00_6707;
BgL_classz00_6707 = BGl_z62accesszd2controlzd2exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5085))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6708; long BgL_arg1816z00_6709;
BgL_arg1815z00_6708 = 
(BgL_objectz00_bglt)(BgL_oz00_5085); 
BgL_arg1816z00_6709 = 
BGL_CLASS_DEPTH(BgL_classz00_6707); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6710;
BgL_idxz00_6710 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6708); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6711;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6712;
BgL_arg1825z00_6712 = 
(BgL_idxz00_6710+BgL_arg1816z00_6709); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6713;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6714;
BgL_aux3193z00_6714 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6714))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6713 = BgL_aux3193z00_6714; }  else 
{ 
 obj_t BgL_auxz00_12124;
BgL_auxz00_12124 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6714); 
FAILURE(BgL_auxz00_12124,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5014z00_12128;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12129;
BgL_tmpz00_12129 = 
VECTOR_LENGTH(BgL_vectorz00_6713); 
BgL_test5014z00_12128 = 
BOUND_CHECK(BgL_arg1825z00_6712, BgL_tmpz00_12129); } 
if(BgL_test5014z00_12128)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6711 = 
VECTOR_REF(BgL_vectorz00_6713,BgL_arg1825z00_6712); }  else 
{ 
 obj_t BgL_auxz00_12133;
BgL_auxz00_12133 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6713, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6713)), 
(int)(BgL_arg1825z00_6712)); 
FAILURE(BgL_auxz00_12133,BFALSE,BFALSE);} } } } 
BgL_test5010z00_12113 = 
(BgL_arg1824z00_6711==BgL_classz00_6707); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6715;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6716;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6717; long BgL_arg1554z00_6718;
BgL_arg1552z00_6717 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6719;
BgL_arg1555z00_6719 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6708); 
BgL_arg1554z00_6718 = 
(BgL_arg1555z00_6719-OBJECT_TYPE); } 
BgL_oclassz00_6716 = 
VECTOR_REF(BgL_arg1552z00_6717,BgL_arg1554z00_6718); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6720;
BgL__ortest_1222z00_6720 = 
(BgL_classz00_6707==BgL_oclassz00_6716); 
if(BgL__ortest_1222z00_6720)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6715 = BgL__ortest_1222z00_6720; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6721;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6722;
BgL_arg1822z00_6722 = 
(BgL_oclassz00_6716); 
BgL_odepthz00_6721 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6722); } 
if(
(BgL_arg1816z00_6709<BgL_odepthz00_6721))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6723;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6724;
BgL_arg1821z00_6724 = 
(BgL_oclassz00_6716); 
BgL_arg1820z00_6723 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6724, BgL_arg1816z00_6709); } 
BgL_res2666z00_6715 = 
(BgL_arg1820z00_6723==BgL_classz00_6707); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6715 = ((bool_t)0); } } } } 
BgL_test5010z00_12113 = BgL_res2666z00_6715; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5010z00_12113 = ((bool_t)0)
; } } 
if(BgL_test5010z00_12113)
{ /* Llib/object.scm 271 */
BgL_oz00_6725 = 
((BgL_z62accesszd2controlzd2exceptionz62_bglt)BgL_oz00_5085); }  else 
{ 
 obj_t BgL_auxz00_12155;
BgL_auxz00_12155 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9659L), BGl_string3868z00zz__objectz00, BGl_string3844z00zz__objectz00, BgL_oz00_5085); 
FAILURE(BgL_auxz00_12155,BFALSE,BFALSE);} } 
return 
(((BgL_z62accesszd2controlzd2exceptionz62_bglt)COBJECT(BgL_oz00_6725))->BgL_objz00);} } 

}



/* &<@anonymous:2137> */
obj_t BGl_z62zc3z04anonymousza32137ze3ze5zz__objectz00(obj_t BgL_envz00_5086, obj_t BgL_new1188z00_5087)
{
{ /* Llib/object.scm 269 */
{ 
 BgL_z62securityzd2exceptionzb0_bglt BgL_auxz00_12160;
{ /* Llib/object.scm 269 */
 BgL_z62securityzd2exceptionzb0_bglt BgL_new1188z00_6744;
{ /* Llib/object.scm 269 */
 bool_t BgL_test5017z00_12161;
{ /* Llib/object.scm 269 */
 obj_t BgL_classz00_6726;
BgL_classz00_6726 = BGl_z62securityzd2exceptionzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1188z00_5087))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6727; long BgL_arg1816z00_6728;
BgL_arg1815z00_6727 = 
(BgL_objectz00_bglt)(BgL_new1188z00_5087); 
BgL_arg1816z00_6728 = 
BGL_CLASS_DEPTH(BgL_classz00_6726); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6729;
BgL_idxz00_6729 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6727); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6730;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6731;
BgL_arg1825z00_6731 = 
(BgL_idxz00_6729+BgL_arg1816z00_6728); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6732;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6733;
BgL_aux3193z00_6733 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6733))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6732 = BgL_aux3193z00_6733; }  else 
{ 
 obj_t BgL_auxz00_12172;
BgL_auxz00_12172 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6733); 
FAILURE(BgL_auxz00_12172,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5021z00_12176;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12177;
BgL_tmpz00_12177 = 
VECTOR_LENGTH(BgL_vectorz00_6732); 
BgL_test5021z00_12176 = 
BOUND_CHECK(BgL_arg1825z00_6731, BgL_tmpz00_12177); } 
if(BgL_test5021z00_12176)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6730 = 
VECTOR_REF(BgL_vectorz00_6732,BgL_arg1825z00_6731); }  else 
{ 
 obj_t BgL_auxz00_12181;
BgL_auxz00_12181 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6732, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6732)), 
(int)(BgL_arg1825z00_6731)); 
FAILURE(BgL_auxz00_12181,BFALSE,BFALSE);} } } } 
BgL_test5017z00_12161 = 
(BgL_arg1824z00_6730==BgL_classz00_6726); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6734;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6735;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6736; long BgL_arg1554z00_6737;
BgL_arg1552z00_6736 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6738;
BgL_arg1555z00_6738 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6727); 
BgL_arg1554z00_6737 = 
(BgL_arg1555z00_6738-OBJECT_TYPE); } 
BgL_oclassz00_6735 = 
VECTOR_REF(BgL_arg1552z00_6736,BgL_arg1554z00_6737); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6739;
BgL__ortest_1222z00_6739 = 
(BgL_classz00_6726==BgL_oclassz00_6735); 
if(BgL__ortest_1222z00_6739)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6734 = BgL__ortest_1222z00_6739; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6740;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6741;
BgL_arg1822z00_6741 = 
(BgL_oclassz00_6735); 
BgL_odepthz00_6740 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6741); } 
if(
(BgL_arg1816z00_6728<BgL_odepthz00_6740))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6742;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6743;
BgL_arg1821z00_6743 = 
(BgL_oclassz00_6735); 
BgL_arg1820z00_6742 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6743, BgL_arg1816z00_6728); } 
BgL_res2666z00_6734 = 
(BgL_arg1820z00_6742==BgL_classz00_6726); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6734 = ((bool_t)0); } } } } 
BgL_test5017z00_12161 = BgL_res2666z00_6734; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5017z00_12161 = ((bool_t)0)
; } } 
if(BgL_test5017z00_12161)
{ /* Llib/object.scm 269 */
BgL_new1188z00_6744 = 
((BgL_z62securityzd2exceptionzb0_bglt)BgL_new1188z00_5087); }  else 
{ 
 obj_t BgL_auxz00_12203;
BgL_auxz00_12203 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9564L), BGl_string3869z00zz__objectz00, BGl_string3831z00zz__objectz00, BgL_new1188z00_5087); 
FAILURE(BgL_auxz00_12203,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1188z00_6744)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1188z00_6744)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1188z00_6744)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62securityzd2exceptionzb0_bglt)COBJECT(BgL_new1188z00_6744))->BgL_messagez00)=((obj_t)BGl_string3618z00zz__objectz00),BUNSPEC); 
BgL_auxz00_12160 = BgL_new1188z00_6744; } 
return 
((obj_t)BgL_auxz00_12160);} } 

}



/* &lambda2135 */
BgL_z62securityzd2exceptionzb0_bglt BGl_z62lambda2135z62zz__objectz00(obj_t BgL_envz00_5088)
{
{ /* Llib/object.scm 269 */
{ /* Llib/object.scm 269 */
 BgL_z62securityzd2exceptionzb0_bglt BgL_new1187z00_6745;
BgL_new1187z00_6745 = 
((BgL_z62securityzd2exceptionzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62securityzd2exceptionzb0_bgl) ))); 
{ /* Llib/object.scm 269 */
 long BgL_arg2136z00_6746;
BgL_arg2136z00_6746 = 
BGL_CLASS_NUM(BGl_z62securityzd2exceptionzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1187z00_6745), BgL_arg2136z00_6746); } 
return BgL_new1187z00_6745;} } 

}



/* &lambda2133 */
BgL_z62securityzd2exceptionzb0_bglt BGl_z62lambda2133z62zz__objectz00(obj_t BgL_envz00_5089, obj_t BgL_fname1183z00_5090, obj_t BgL_location1184z00_5091, obj_t BgL_stack1185z00_5092, obj_t BgL_message1186z00_5093)
{
{ /* Llib/object.scm 269 */
{ /* Llib/object.scm 269 */
 obj_t BgL_message1186z00_6747;
if(
STRINGP(BgL_message1186z00_5093))
{ /* Llib/object.scm 269 */
BgL_message1186z00_6747 = BgL_message1186z00_5093; }  else 
{ 
 obj_t BgL_auxz00_12221;
BgL_auxz00_12221 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9564L), BGl_string3870z00zz__objectz00, BGl_string3826z00zz__objectz00, BgL_message1186z00_5093); 
FAILURE(BgL_auxz00_12221,BFALSE,BFALSE);} 
{ /* Llib/object.scm 269 */
 BgL_z62securityzd2exceptionzb0_bglt BgL_new1274z00_6748;
{ /* Llib/object.scm 269 */
 BgL_z62securityzd2exceptionzb0_bglt BgL_new1273z00_6749;
BgL_new1273z00_6749 = 
((BgL_z62securityzd2exceptionzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62securityzd2exceptionzb0_bgl) ))); 
{ /* Llib/object.scm 269 */
 long BgL_arg2134z00_6750;
BgL_arg2134z00_6750 = 
BGL_CLASS_NUM(BGl_z62securityzd2exceptionzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1273z00_6749), BgL_arg2134z00_6750); } 
BgL_new1274z00_6748 = BgL_new1273z00_6749; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1274z00_6748)))->BgL_fnamez00)=((obj_t)BgL_fname1183z00_5090),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1274z00_6748)))->BgL_locationz00)=((obj_t)BgL_location1184z00_5091),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1274z00_6748)))->BgL_stackz00)=((obj_t)BgL_stack1185z00_5092),BUNSPEC); 
((((BgL_z62securityzd2exceptionzb0_bglt)COBJECT(BgL_new1274z00_6748))->BgL_messagez00)=((obj_t)BgL_message1186z00_6747),BUNSPEC); 
return BgL_new1274z00_6748;} } } 

}



/* &<@anonymous:2145> */
obj_t BGl_z62zc3z04anonymousza32145ze3ze5zz__objectz00(obj_t BgL_envz00_5094)
{
{ /* Llib/object.scm 269 */
return BGl_string3618z00zz__objectz00;} 

}



/* &lambda2144 */
obj_t BGl_z62lambda2144z62zz__objectz00(obj_t BgL_envz00_5095, obj_t BgL_oz00_5096, obj_t BgL_vz00_5097)
{
{ /* Llib/object.scm 269 */
{ /* Llib/object.scm 269 */
 BgL_z62securityzd2exceptionzb0_bglt BgL_oz00_6769; obj_t BgL_vz00_6770;
{ /* Llib/object.scm 269 */
 bool_t BgL_test5025z00_12236;
{ /* Llib/object.scm 269 */
 obj_t BgL_classz00_6751;
BgL_classz00_6751 = BGl_z62securityzd2exceptionzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5096))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6752; long BgL_arg1816z00_6753;
BgL_arg1815z00_6752 = 
(BgL_objectz00_bglt)(BgL_oz00_5096); 
BgL_arg1816z00_6753 = 
BGL_CLASS_DEPTH(BgL_classz00_6751); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6754;
BgL_idxz00_6754 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6752); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6755;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6756;
BgL_arg1825z00_6756 = 
(BgL_idxz00_6754+BgL_arg1816z00_6753); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6757;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6758;
BgL_aux3193z00_6758 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6758))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6757 = BgL_aux3193z00_6758; }  else 
{ 
 obj_t BgL_auxz00_12247;
BgL_auxz00_12247 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6758); 
FAILURE(BgL_auxz00_12247,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5029z00_12251;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12252;
BgL_tmpz00_12252 = 
VECTOR_LENGTH(BgL_vectorz00_6757); 
BgL_test5029z00_12251 = 
BOUND_CHECK(BgL_arg1825z00_6756, BgL_tmpz00_12252); } 
if(BgL_test5029z00_12251)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6755 = 
VECTOR_REF(BgL_vectorz00_6757,BgL_arg1825z00_6756); }  else 
{ 
 obj_t BgL_auxz00_12256;
BgL_auxz00_12256 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6757, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6757)), 
(int)(BgL_arg1825z00_6756)); 
FAILURE(BgL_auxz00_12256,BFALSE,BFALSE);} } } } 
BgL_test5025z00_12236 = 
(BgL_arg1824z00_6755==BgL_classz00_6751); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6759;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6760;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6761; long BgL_arg1554z00_6762;
BgL_arg1552z00_6761 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6763;
BgL_arg1555z00_6763 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6752); 
BgL_arg1554z00_6762 = 
(BgL_arg1555z00_6763-OBJECT_TYPE); } 
BgL_oclassz00_6760 = 
VECTOR_REF(BgL_arg1552z00_6761,BgL_arg1554z00_6762); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6764;
BgL__ortest_1222z00_6764 = 
(BgL_classz00_6751==BgL_oclassz00_6760); 
if(BgL__ortest_1222z00_6764)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6759 = BgL__ortest_1222z00_6764; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6765;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6766;
BgL_arg1822z00_6766 = 
(BgL_oclassz00_6760); 
BgL_odepthz00_6765 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6766); } 
if(
(BgL_arg1816z00_6753<BgL_odepthz00_6765))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6767;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6768;
BgL_arg1821z00_6768 = 
(BgL_oclassz00_6760); 
BgL_arg1820z00_6767 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6768, BgL_arg1816z00_6753); } 
BgL_res2666z00_6759 = 
(BgL_arg1820z00_6767==BgL_classz00_6751); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6759 = ((bool_t)0); } } } } 
BgL_test5025z00_12236 = BgL_res2666z00_6759; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5025z00_12236 = ((bool_t)0)
; } } 
if(BgL_test5025z00_12236)
{ /* Llib/object.scm 269 */
BgL_oz00_6769 = 
((BgL_z62securityzd2exceptionzb0_bglt)BgL_oz00_5096); }  else 
{ 
 obj_t BgL_auxz00_12278;
BgL_auxz00_12278 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9564L), BGl_string3871z00zz__objectz00, BGl_string3831z00zz__objectz00, BgL_oz00_5096); 
FAILURE(BgL_auxz00_12278,BFALSE,BFALSE);} } 
if(
STRINGP(BgL_vz00_5097))
{ /* Llib/object.scm 269 */
BgL_vz00_6770 = BgL_vz00_5097; }  else 
{ 
 obj_t BgL_auxz00_12284;
BgL_auxz00_12284 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9564L), BGl_string3871z00zz__objectz00, BGl_string3826z00zz__objectz00, BgL_vz00_5097); 
FAILURE(BgL_auxz00_12284,BFALSE,BFALSE);} 
return 
((((BgL_z62securityzd2exceptionzb0_bglt)COBJECT(BgL_oz00_6769))->BgL_messagez00)=((obj_t)BgL_vz00_6770),BUNSPEC);} } 

}



/* &lambda2143 */
obj_t BGl_z62lambda2143z62zz__objectz00(obj_t BgL_envz00_5098, obj_t BgL_oz00_5099)
{
{ /* Llib/object.scm 269 */
{ /* Llib/object.scm 269 */
 BgL_z62securityzd2exceptionzb0_bglt BgL_oz00_6789;
{ /* Llib/object.scm 269 */
 bool_t BgL_test5033z00_12289;
{ /* Llib/object.scm 269 */
 obj_t BgL_classz00_6771;
BgL_classz00_6771 = BGl_z62securityzd2exceptionzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5099))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6772; long BgL_arg1816z00_6773;
BgL_arg1815z00_6772 = 
(BgL_objectz00_bglt)(BgL_oz00_5099); 
BgL_arg1816z00_6773 = 
BGL_CLASS_DEPTH(BgL_classz00_6771); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6774;
BgL_idxz00_6774 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6772); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6775;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6776;
BgL_arg1825z00_6776 = 
(BgL_idxz00_6774+BgL_arg1816z00_6773); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6777;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6778;
BgL_aux3193z00_6778 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6778))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6777 = BgL_aux3193z00_6778; }  else 
{ 
 obj_t BgL_auxz00_12300;
BgL_auxz00_12300 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6778); 
FAILURE(BgL_auxz00_12300,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5037z00_12304;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12305;
BgL_tmpz00_12305 = 
VECTOR_LENGTH(BgL_vectorz00_6777); 
BgL_test5037z00_12304 = 
BOUND_CHECK(BgL_arg1825z00_6776, BgL_tmpz00_12305); } 
if(BgL_test5037z00_12304)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6775 = 
VECTOR_REF(BgL_vectorz00_6777,BgL_arg1825z00_6776); }  else 
{ 
 obj_t BgL_auxz00_12309;
BgL_auxz00_12309 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6777, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6777)), 
(int)(BgL_arg1825z00_6776)); 
FAILURE(BgL_auxz00_12309,BFALSE,BFALSE);} } } } 
BgL_test5033z00_12289 = 
(BgL_arg1824z00_6775==BgL_classz00_6771); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6779;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6780;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6781; long BgL_arg1554z00_6782;
BgL_arg1552z00_6781 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6783;
BgL_arg1555z00_6783 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6772); 
BgL_arg1554z00_6782 = 
(BgL_arg1555z00_6783-OBJECT_TYPE); } 
BgL_oclassz00_6780 = 
VECTOR_REF(BgL_arg1552z00_6781,BgL_arg1554z00_6782); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6784;
BgL__ortest_1222z00_6784 = 
(BgL_classz00_6771==BgL_oclassz00_6780); 
if(BgL__ortest_1222z00_6784)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6779 = BgL__ortest_1222z00_6784; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6785;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6786;
BgL_arg1822z00_6786 = 
(BgL_oclassz00_6780); 
BgL_odepthz00_6785 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6786); } 
if(
(BgL_arg1816z00_6773<BgL_odepthz00_6785))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6787;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6788;
BgL_arg1821z00_6788 = 
(BgL_oclassz00_6780); 
BgL_arg1820z00_6787 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6788, BgL_arg1816z00_6773); } 
BgL_res2666z00_6779 = 
(BgL_arg1820z00_6787==BgL_classz00_6771); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6779 = ((bool_t)0); } } } } 
BgL_test5033z00_12289 = BgL_res2666z00_6779; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5033z00_12289 = ((bool_t)0)
; } } 
if(BgL_test5033z00_12289)
{ /* Llib/object.scm 269 */
BgL_oz00_6789 = 
((BgL_z62securityzd2exceptionzb0_bglt)BgL_oz00_5099); }  else 
{ 
 obj_t BgL_auxz00_12331;
BgL_auxz00_12331 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9564L), BGl_string3872z00zz__objectz00, BGl_string3831z00zz__objectz00, BgL_oz00_5099); 
FAILURE(BgL_auxz00_12331,BFALSE,BFALSE);} } 
return 
(((BgL_z62securityzd2exceptionzb0_bglt)COBJECT(BgL_oz00_6789))->BgL_messagez00);} } 

}



/* &<@anonymous:2127> */
obj_t BGl_z62zc3z04anonymousza32127ze3ze5zz__objectz00(obj_t BgL_envz00_5100, obj_t BgL_new1181z00_5101)
{
{ /* Llib/object.scm 267 */
{ 
 BgL_z62stackzd2overflowzd2errorz62_bglt BgL_auxz00_12336;
{ /* Llib/object.scm 267 */
 BgL_z62stackzd2overflowzd2errorz62_bglt BgL_new1181z00_6808;
{ /* Llib/object.scm 267 */
 bool_t BgL_test5040z00_12337;
{ /* Llib/object.scm 267 */
 obj_t BgL_classz00_6790;
BgL_classz00_6790 = BGl_z62stackzd2overflowzd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1181z00_5101))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6791; long BgL_arg1816z00_6792;
BgL_arg1815z00_6791 = 
(BgL_objectz00_bglt)(BgL_new1181z00_5101); 
BgL_arg1816z00_6792 = 
BGL_CLASS_DEPTH(BgL_classz00_6790); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6793;
BgL_idxz00_6793 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6791); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6794;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6795;
BgL_arg1825z00_6795 = 
(BgL_idxz00_6793+BgL_arg1816z00_6792); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6796;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6797;
BgL_aux3193z00_6797 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6797))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6796 = BgL_aux3193z00_6797; }  else 
{ 
 obj_t BgL_auxz00_12348;
BgL_auxz00_12348 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6797); 
FAILURE(BgL_auxz00_12348,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5044z00_12352;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12353;
BgL_tmpz00_12353 = 
VECTOR_LENGTH(BgL_vectorz00_6796); 
BgL_test5044z00_12352 = 
BOUND_CHECK(BgL_arg1825z00_6795, BgL_tmpz00_12353); } 
if(BgL_test5044z00_12352)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6794 = 
VECTOR_REF(BgL_vectorz00_6796,BgL_arg1825z00_6795); }  else 
{ 
 obj_t BgL_auxz00_12357;
BgL_auxz00_12357 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6796, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6796)), 
(int)(BgL_arg1825z00_6795)); 
FAILURE(BgL_auxz00_12357,BFALSE,BFALSE);} } } } 
BgL_test5040z00_12337 = 
(BgL_arg1824z00_6794==BgL_classz00_6790); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6798;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6799;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6800; long BgL_arg1554z00_6801;
BgL_arg1552z00_6800 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6802;
BgL_arg1555z00_6802 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6791); 
BgL_arg1554z00_6801 = 
(BgL_arg1555z00_6802-OBJECT_TYPE); } 
BgL_oclassz00_6799 = 
VECTOR_REF(BgL_arg1552z00_6800,BgL_arg1554z00_6801); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6803;
BgL__ortest_1222z00_6803 = 
(BgL_classz00_6790==BgL_oclassz00_6799); 
if(BgL__ortest_1222z00_6803)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6798 = BgL__ortest_1222z00_6803; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6804;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6805;
BgL_arg1822z00_6805 = 
(BgL_oclassz00_6799); 
BgL_odepthz00_6804 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6805); } 
if(
(BgL_arg1816z00_6792<BgL_odepthz00_6804))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6806;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6807;
BgL_arg1821z00_6807 = 
(BgL_oclassz00_6799); 
BgL_arg1820z00_6806 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6807, BgL_arg1816z00_6792); } 
BgL_res2666z00_6798 = 
(BgL_arg1820z00_6806==BgL_classz00_6790); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6798 = ((bool_t)0); } } } } 
BgL_test5040z00_12337 = BgL_res2666z00_6798; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5040z00_12337 = ((bool_t)0)
; } } 
if(BgL_test5040z00_12337)
{ /* Llib/object.scm 267 */
BgL_new1181z00_6808 = 
((BgL_z62stackzd2overflowzd2errorz62_bglt)BgL_new1181z00_5101); }  else 
{ 
 obj_t BgL_auxz00_12379;
BgL_auxz00_12379 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9515L), BGl_string3873z00zz__objectz00, BGl_string3819z00zz__objectz00, BgL_new1181z00_5101); 
FAILURE(BgL_auxz00_12379,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1181z00_6808)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1181z00_6808)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1181z00_6808)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1181z00_6808)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1181z00_6808)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1181z00_6808)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12336 = BgL_new1181z00_6808; } 
return 
((obj_t)BgL_auxz00_12336);} } 

}



/* &lambda2125 */
BgL_z62stackzd2overflowzd2errorz62_bglt BGl_z62lambda2125z62zz__objectz00(obj_t BgL_envz00_5102)
{
{ /* Llib/object.scm 267 */
{ /* Llib/object.scm 267 */
 BgL_z62stackzd2overflowzd2errorz62_bglt BgL_new1180z00_6809;
BgL_new1180z00_6809 = 
((BgL_z62stackzd2overflowzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62stackzd2overflowzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 267 */
 long BgL_arg2126z00_6810;
BgL_arg2126z00_6810 = 
BGL_CLASS_NUM(BGl_z62stackzd2overflowzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1180z00_6809), BgL_arg2126z00_6810); } 
return BgL_new1180z00_6809;} } 

}



/* &lambda2123 */
BgL_z62stackzd2overflowzd2errorz62_bglt BGl_z62lambda2123z62zz__objectz00(obj_t BgL_envz00_5103, obj_t BgL_fname1174z00_5104, obj_t BgL_location1175z00_5105, obj_t BgL_stack1176z00_5106, obj_t BgL_proc1177z00_5107, obj_t BgL_msg1178z00_5108, obj_t BgL_obj1179z00_5109)
{
{ /* Llib/object.scm 267 */
{ /* Llib/object.scm 267 */
 BgL_z62stackzd2overflowzd2errorz62_bglt BgL_new1272z00_6811;
{ /* Llib/object.scm 267 */
 BgL_z62stackzd2overflowzd2errorz62_bglt BgL_new1271z00_6812;
BgL_new1271z00_6812 = 
((BgL_z62stackzd2overflowzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62stackzd2overflowzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 267 */
 long BgL_arg2124z00_6813;
BgL_arg2124z00_6813 = 
BGL_CLASS_NUM(BGl_z62stackzd2overflowzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1271z00_6812), BgL_arg2124z00_6813); } 
BgL_new1272z00_6811 = BgL_new1271z00_6812; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1272z00_6811)))->BgL_fnamez00)=((obj_t)BgL_fname1174z00_5104),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1272z00_6811)))->BgL_locationz00)=((obj_t)BgL_location1175z00_5105),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1272z00_6811)))->BgL_stackz00)=((obj_t)BgL_stack1176z00_5106),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1272z00_6811)))->BgL_procz00)=((obj_t)BgL_proc1177z00_5107),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1272z00_6811)))->BgL_msgz00)=((obj_t)BgL_msg1178z00_5108),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1272z00_6811)))->BgL_objz00)=((obj_t)BgL_obj1179z00_5109),BUNSPEC); 
return BgL_new1272z00_6811;} } 

}



/* &<@anonymous:2117> */
obj_t BGl_z62zc3z04anonymousza32117ze3ze5zz__objectz00(obj_t BgL_envz00_5110, obj_t BgL_new1172z00_5111)
{
{ /* Llib/object.scm 265 */
{ 
 BgL_z62processzd2exceptionzb0_bglt BgL_auxz00_12416;
{ /* Llib/object.scm 265 */
 BgL_z62processzd2exceptionzb0_bglt BgL_new1172z00_6832;
{ /* Llib/object.scm 265 */
 bool_t BgL_test5047z00_12417;
{ /* Llib/object.scm 265 */
 obj_t BgL_classz00_6814;
BgL_classz00_6814 = BGl_z62processzd2exceptionzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1172z00_5111))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6815; long BgL_arg1816z00_6816;
BgL_arg1815z00_6815 = 
(BgL_objectz00_bglt)(BgL_new1172z00_5111); 
BgL_arg1816z00_6816 = 
BGL_CLASS_DEPTH(BgL_classz00_6814); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6817;
BgL_idxz00_6817 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6815); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6818;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6819;
BgL_arg1825z00_6819 = 
(BgL_idxz00_6817+BgL_arg1816z00_6816); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6820;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6821;
BgL_aux3193z00_6821 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6821))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6820 = BgL_aux3193z00_6821; }  else 
{ 
 obj_t BgL_auxz00_12428;
BgL_auxz00_12428 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6821); 
FAILURE(BgL_auxz00_12428,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5051z00_12432;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12433;
BgL_tmpz00_12433 = 
VECTOR_LENGTH(BgL_vectorz00_6820); 
BgL_test5051z00_12432 = 
BOUND_CHECK(BgL_arg1825z00_6819, BgL_tmpz00_12433); } 
if(BgL_test5051z00_12432)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6818 = 
VECTOR_REF(BgL_vectorz00_6820,BgL_arg1825z00_6819); }  else 
{ 
 obj_t BgL_auxz00_12437;
BgL_auxz00_12437 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6820, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6820)), 
(int)(BgL_arg1825z00_6819)); 
FAILURE(BgL_auxz00_12437,BFALSE,BFALSE);} } } } 
BgL_test5047z00_12417 = 
(BgL_arg1824z00_6818==BgL_classz00_6814); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6822;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6823;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6824; long BgL_arg1554z00_6825;
BgL_arg1552z00_6824 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6826;
BgL_arg1555z00_6826 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6815); 
BgL_arg1554z00_6825 = 
(BgL_arg1555z00_6826-OBJECT_TYPE); } 
BgL_oclassz00_6823 = 
VECTOR_REF(BgL_arg1552z00_6824,BgL_arg1554z00_6825); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6827;
BgL__ortest_1222z00_6827 = 
(BgL_classz00_6814==BgL_oclassz00_6823); 
if(BgL__ortest_1222z00_6827)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6822 = BgL__ortest_1222z00_6827; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6828;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6829;
BgL_arg1822z00_6829 = 
(BgL_oclassz00_6823); 
BgL_odepthz00_6828 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6829); } 
if(
(BgL_arg1816z00_6816<BgL_odepthz00_6828))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6830;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6831;
BgL_arg1821z00_6831 = 
(BgL_oclassz00_6823); 
BgL_arg1820z00_6830 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6831, BgL_arg1816z00_6816); } 
BgL_res2666z00_6822 = 
(BgL_arg1820z00_6830==BgL_classz00_6814); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6822 = ((bool_t)0); } } } } 
BgL_test5047z00_12417 = BgL_res2666z00_6822; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5047z00_12417 = ((bool_t)0)
; } } 
if(BgL_test5047z00_12417)
{ /* Llib/object.scm 265 */
BgL_new1172z00_6832 = 
((BgL_z62processzd2exceptionzb0_bglt)BgL_new1172z00_5111); }  else 
{ 
 obj_t BgL_auxz00_12459;
BgL_auxz00_12459 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9469L), BGl_string3874z00zz__objectz00, BGl_string3814z00zz__objectz00, BgL_new1172z00_5111); 
FAILURE(BgL_auxz00_12459,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1172z00_6832)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1172z00_6832)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1172z00_6832)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1172z00_6832)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1172z00_6832)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1172z00_6832)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12416 = BgL_new1172z00_6832; } 
return 
((obj_t)BgL_auxz00_12416);} } 

}



/* &lambda2115 */
BgL_z62processzd2exceptionzb0_bglt BGl_z62lambda2115z62zz__objectz00(obj_t BgL_envz00_5112)
{
{ /* Llib/object.scm 265 */
{ /* Llib/object.scm 265 */
 BgL_z62processzd2exceptionzb0_bglt BgL_new1171z00_6833;
BgL_new1171z00_6833 = 
((BgL_z62processzd2exceptionzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62processzd2exceptionzb0_bgl) ))); 
{ /* Llib/object.scm 265 */
 long BgL_arg2116z00_6834;
BgL_arg2116z00_6834 = 
BGL_CLASS_NUM(BGl_z62processzd2exceptionzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1171z00_6833), BgL_arg2116z00_6834); } 
return BgL_new1171z00_6833;} } 

}



/* &lambda2113 */
BgL_z62processzd2exceptionzb0_bglt BGl_z62lambda2113z62zz__objectz00(obj_t BgL_envz00_5113, obj_t BgL_fname1165z00_5114, obj_t BgL_location1166z00_5115, obj_t BgL_stack1167z00_5116, obj_t BgL_proc1168z00_5117, obj_t BgL_msg1169z00_5118, obj_t BgL_obj1170z00_5119)
{
{ /* Llib/object.scm 265 */
{ /* Llib/object.scm 265 */
 BgL_z62processzd2exceptionzb0_bglt BgL_new1270z00_6835;
{ /* Llib/object.scm 265 */
 BgL_z62processzd2exceptionzb0_bglt BgL_new1269z00_6836;
BgL_new1269z00_6836 = 
((BgL_z62processzd2exceptionzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62processzd2exceptionzb0_bgl) ))); 
{ /* Llib/object.scm 265 */
 long BgL_arg2114z00_6837;
BgL_arg2114z00_6837 = 
BGL_CLASS_NUM(BGl_z62processzd2exceptionzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1269z00_6836), BgL_arg2114z00_6837); } 
BgL_new1270z00_6835 = BgL_new1269z00_6836; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1270z00_6835)))->BgL_fnamez00)=((obj_t)BgL_fname1165z00_5114),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1270z00_6835)))->BgL_locationz00)=((obj_t)BgL_location1166z00_5115),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1270z00_6835)))->BgL_stackz00)=((obj_t)BgL_stack1167z00_5116),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1270z00_6835)))->BgL_procz00)=((obj_t)BgL_proc1168z00_5117),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1270z00_6835)))->BgL_msgz00)=((obj_t)BgL_msg1169z00_5118),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1270z00_6835)))->BgL_objz00)=((obj_t)BgL_obj1170z00_5119),BUNSPEC); 
return BgL_new1270z00_6835;} } 

}



/* &<@anonymous:2107> */
obj_t BGl_z62zc3z04anonymousza32107ze3ze5zz__objectz00(obj_t BgL_envz00_5120, obj_t BgL_new1163z00_5121)
{
{ /* Llib/object.scm 263 */
{ 
 BgL_z62iozd2connectionzd2errorz62_bglt BgL_auxz00_12496;
{ /* Llib/object.scm 263 */
 BgL_z62iozd2connectionzd2errorz62_bglt BgL_new1163z00_6856;
{ /* Llib/object.scm 263 */
 bool_t BgL_test5054z00_12497;
{ /* Llib/object.scm 263 */
 obj_t BgL_classz00_6838;
BgL_classz00_6838 = BGl_z62iozd2connectionzd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1163z00_5121))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6839; long BgL_arg1816z00_6840;
BgL_arg1815z00_6839 = 
(BgL_objectz00_bglt)(BgL_new1163z00_5121); 
BgL_arg1816z00_6840 = 
BGL_CLASS_DEPTH(BgL_classz00_6838); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6841;
BgL_idxz00_6841 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6839); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6842;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6843;
BgL_arg1825z00_6843 = 
(BgL_idxz00_6841+BgL_arg1816z00_6840); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6844;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6845;
BgL_aux3193z00_6845 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6845))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6844 = BgL_aux3193z00_6845; }  else 
{ 
 obj_t BgL_auxz00_12508;
BgL_auxz00_12508 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6845); 
FAILURE(BgL_auxz00_12508,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5058z00_12512;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12513;
BgL_tmpz00_12513 = 
VECTOR_LENGTH(BgL_vectorz00_6844); 
BgL_test5058z00_12512 = 
BOUND_CHECK(BgL_arg1825z00_6843, BgL_tmpz00_12513); } 
if(BgL_test5058z00_12512)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6842 = 
VECTOR_REF(BgL_vectorz00_6844,BgL_arg1825z00_6843); }  else 
{ 
 obj_t BgL_auxz00_12517;
BgL_auxz00_12517 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6844, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6844)), 
(int)(BgL_arg1825z00_6843)); 
FAILURE(BgL_auxz00_12517,BFALSE,BFALSE);} } } } 
BgL_test5054z00_12497 = 
(BgL_arg1824z00_6842==BgL_classz00_6838); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6846;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6847;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6848; long BgL_arg1554z00_6849;
BgL_arg1552z00_6848 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6850;
BgL_arg1555z00_6850 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6839); 
BgL_arg1554z00_6849 = 
(BgL_arg1555z00_6850-OBJECT_TYPE); } 
BgL_oclassz00_6847 = 
VECTOR_REF(BgL_arg1552z00_6848,BgL_arg1554z00_6849); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6851;
BgL__ortest_1222z00_6851 = 
(BgL_classz00_6838==BgL_oclassz00_6847); 
if(BgL__ortest_1222z00_6851)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6846 = BgL__ortest_1222z00_6851; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6852;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6853;
BgL_arg1822z00_6853 = 
(BgL_oclassz00_6847); 
BgL_odepthz00_6852 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6853); } 
if(
(BgL_arg1816z00_6840<BgL_odepthz00_6852))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6854;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6855;
BgL_arg1821z00_6855 = 
(BgL_oclassz00_6847); 
BgL_arg1820z00_6854 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6855, BgL_arg1816z00_6840); } 
BgL_res2666z00_6846 = 
(BgL_arg1820z00_6854==BgL_classz00_6838); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6846 = ((bool_t)0); } } } } 
BgL_test5054z00_12497 = BgL_res2666z00_6846; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5054z00_12497 = ((bool_t)0)
; } } 
if(BgL_test5054z00_12497)
{ /* Llib/object.scm 263 */
BgL_new1163z00_6856 = 
((BgL_z62iozd2connectionzd2errorz62_bglt)BgL_new1163z00_5121); }  else 
{ 
 obj_t BgL_auxz00_12539;
BgL_auxz00_12539 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9418L), BGl_string3875z00zz__objectz00, BGl_string3809z00zz__objectz00, BgL_new1163z00_5121); 
FAILURE(BgL_auxz00_12539,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1163z00_6856)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1163z00_6856)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1163z00_6856)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1163z00_6856)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1163z00_6856)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1163z00_6856)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12496 = BgL_new1163z00_6856; } 
return 
((obj_t)BgL_auxz00_12496);} } 

}



/* &lambda2105 */
BgL_z62iozd2connectionzd2errorz62_bglt BGl_z62lambda2105z62zz__objectz00(obj_t BgL_envz00_5122)
{
{ /* Llib/object.scm 263 */
{ /* Llib/object.scm 263 */
 BgL_z62iozd2connectionzd2errorz62_bglt BgL_new1162z00_6857;
BgL_new1162z00_6857 = 
((BgL_z62iozd2connectionzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2connectionzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 263 */
 long BgL_arg2106z00_6858;
BgL_arg2106z00_6858 = 
BGL_CLASS_NUM(BGl_z62iozd2connectionzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1162z00_6857), BgL_arg2106z00_6858); } 
return BgL_new1162z00_6857;} } 

}



/* &lambda2103 */
BgL_z62iozd2connectionzd2errorz62_bglt BGl_z62lambda2103z62zz__objectz00(obj_t BgL_envz00_5123, obj_t BgL_fname1156z00_5124, obj_t BgL_location1157z00_5125, obj_t BgL_stack1158z00_5126, obj_t BgL_proc1159z00_5127, obj_t BgL_msg1160z00_5128, obj_t BgL_obj1161z00_5129)
{
{ /* Llib/object.scm 263 */
{ /* Llib/object.scm 263 */
 BgL_z62iozd2connectionzd2errorz62_bglt BgL_new1267z00_6859;
{ /* Llib/object.scm 263 */
 BgL_z62iozd2connectionzd2errorz62_bglt BgL_new1266z00_6860;
BgL_new1266z00_6860 = 
((BgL_z62iozd2connectionzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2connectionzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 263 */
 long BgL_arg2104z00_6861;
BgL_arg2104z00_6861 = 
BGL_CLASS_NUM(BGl_z62iozd2connectionzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1266z00_6860), BgL_arg2104z00_6861); } 
BgL_new1267z00_6859 = BgL_new1266z00_6860; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1267z00_6859)))->BgL_fnamez00)=((obj_t)BgL_fname1156z00_5124),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1267z00_6859)))->BgL_locationz00)=((obj_t)BgL_location1157z00_5125),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1267z00_6859)))->BgL_stackz00)=((obj_t)BgL_stack1158z00_5126),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1267z00_6859)))->BgL_procz00)=((obj_t)BgL_proc1159z00_5127),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1267z00_6859)))->BgL_msgz00)=((obj_t)BgL_msg1160z00_5128),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1267z00_6859)))->BgL_objz00)=((obj_t)BgL_obj1161z00_5129),BUNSPEC); 
return BgL_new1267z00_6859;} } 

}



/* &<@anonymous:2096> */
obj_t BGl_z62zc3z04anonymousza32096ze3ze5zz__objectz00(obj_t BgL_envz00_5130, obj_t BgL_new1154z00_5131)
{
{ /* Llib/object.scm 262 */
{ 
 BgL_z62iozd2timeoutzd2errorz62_bglt BgL_auxz00_12576;
{ /* Llib/object.scm 262 */
 BgL_z62iozd2timeoutzd2errorz62_bglt BgL_new1154z00_6880;
{ /* Llib/object.scm 262 */
 bool_t BgL_test5061z00_12577;
{ /* Llib/object.scm 262 */
 obj_t BgL_classz00_6862;
BgL_classz00_6862 = BGl_z62iozd2timeoutzd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1154z00_5131))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6863; long BgL_arg1816z00_6864;
BgL_arg1815z00_6863 = 
(BgL_objectz00_bglt)(BgL_new1154z00_5131); 
BgL_arg1816z00_6864 = 
BGL_CLASS_DEPTH(BgL_classz00_6862); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6865;
BgL_idxz00_6865 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6863); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6866;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6867;
BgL_arg1825z00_6867 = 
(BgL_idxz00_6865+BgL_arg1816z00_6864); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6868;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6869;
BgL_aux3193z00_6869 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6869))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6868 = BgL_aux3193z00_6869; }  else 
{ 
 obj_t BgL_auxz00_12588;
BgL_auxz00_12588 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6869); 
FAILURE(BgL_auxz00_12588,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5065z00_12592;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12593;
BgL_tmpz00_12593 = 
VECTOR_LENGTH(BgL_vectorz00_6868); 
BgL_test5065z00_12592 = 
BOUND_CHECK(BgL_arg1825z00_6867, BgL_tmpz00_12593); } 
if(BgL_test5065z00_12592)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6866 = 
VECTOR_REF(BgL_vectorz00_6868,BgL_arg1825z00_6867); }  else 
{ 
 obj_t BgL_auxz00_12597;
BgL_auxz00_12597 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6868, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6868)), 
(int)(BgL_arg1825z00_6867)); 
FAILURE(BgL_auxz00_12597,BFALSE,BFALSE);} } } } 
BgL_test5061z00_12577 = 
(BgL_arg1824z00_6866==BgL_classz00_6862); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6870;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6871;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6872; long BgL_arg1554z00_6873;
BgL_arg1552z00_6872 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6874;
BgL_arg1555z00_6874 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6863); 
BgL_arg1554z00_6873 = 
(BgL_arg1555z00_6874-OBJECT_TYPE); } 
BgL_oclassz00_6871 = 
VECTOR_REF(BgL_arg1552z00_6872,BgL_arg1554z00_6873); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6875;
BgL__ortest_1222z00_6875 = 
(BgL_classz00_6862==BgL_oclassz00_6871); 
if(BgL__ortest_1222z00_6875)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6870 = BgL__ortest_1222z00_6875; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6876;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6877;
BgL_arg1822z00_6877 = 
(BgL_oclassz00_6871); 
BgL_odepthz00_6876 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6877); } 
if(
(BgL_arg1816z00_6864<BgL_odepthz00_6876))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6878;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6879;
BgL_arg1821z00_6879 = 
(BgL_oclassz00_6871); 
BgL_arg1820z00_6878 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6879, BgL_arg1816z00_6864); } 
BgL_res2666z00_6870 = 
(BgL_arg1820z00_6878==BgL_classz00_6862); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6870 = ((bool_t)0); } } } } 
BgL_test5061z00_12577 = BgL_res2666z00_6870; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5061z00_12577 = ((bool_t)0)
; } } 
if(BgL_test5061z00_12577)
{ /* Llib/object.scm 262 */
BgL_new1154z00_6880 = 
((BgL_z62iozd2timeoutzd2errorz62_bglt)BgL_new1154z00_5131); }  else 
{ 
 obj_t BgL_auxz00_12619;
BgL_auxz00_12619 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9376L), BGl_string3876z00zz__objectz00, BGl_string3804z00zz__objectz00, BgL_new1154z00_5131); 
FAILURE(BgL_auxz00_12619,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1154z00_6880)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1154z00_6880)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1154z00_6880)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1154z00_6880)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1154z00_6880)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1154z00_6880)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12576 = BgL_new1154z00_6880; } 
return 
((obj_t)BgL_auxz00_12576);} } 

}



/* &lambda2094 */
BgL_z62iozd2timeoutzd2errorz62_bglt BGl_z62lambda2094z62zz__objectz00(obj_t BgL_envz00_5132)
{
{ /* Llib/object.scm 262 */
{ /* Llib/object.scm 262 */
 BgL_z62iozd2timeoutzd2errorz62_bglt BgL_new1153z00_6881;
BgL_new1153z00_6881 = 
((BgL_z62iozd2timeoutzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2timeoutzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 262 */
 long BgL_arg2095z00_6882;
BgL_arg2095z00_6882 = 
BGL_CLASS_NUM(BGl_z62iozd2timeoutzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1153z00_6881), BgL_arg2095z00_6882); } 
return BgL_new1153z00_6881;} } 

}



/* &lambda2092 */
BgL_z62iozd2timeoutzd2errorz62_bglt BGl_z62lambda2092z62zz__objectz00(obj_t BgL_envz00_5133, obj_t BgL_fname1147z00_5134, obj_t BgL_location1148z00_5135, obj_t BgL_stack1149z00_5136, obj_t BgL_proc1150z00_5137, obj_t BgL_msg1151z00_5138, obj_t BgL_obj1152z00_5139)
{
{ /* Llib/object.scm 262 */
{ /* Llib/object.scm 262 */
 BgL_z62iozd2timeoutzd2errorz62_bglt BgL_new1265z00_6883;
{ /* Llib/object.scm 262 */
 BgL_z62iozd2timeoutzd2errorz62_bglt BgL_new1263z00_6884;
BgL_new1263z00_6884 = 
((BgL_z62iozd2timeoutzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2timeoutzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 262 */
 long BgL_arg2093z00_6885;
BgL_arg2093z00_6885 = 
BGL_CLASS_NUM(BGl_z62iozd2timeoutzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1263z00_6884), BgL_arg2093z00_6885); } 
BgL_new1265z00_6883 = BgL_new1263z00_6884; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1265z00_6883)))->BgL_fnamez00)=((obj_t)BgL_fname1147z00_5134),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1265z00_6883)))->BgL_locationz00)=((obj_t)BgL_location1148z00_5135),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1265z00_6883)))->BgL_stackz00)=((obj_t)BgL_stack1149z00_5136),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1265z00_6883)))->BgL_procz00)=((obj_t)BgL_proc1150z00_5137),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1265z00_6883)))->BgL_msgz00)=((obj_t)BgL_msg1151z00_5138),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1265z00_6883)))->BgL_objz00)=((obj_t)BgL_obj1152z00_5139),BUNSPEC); 
return BgL_new1265z00_6883;} } 

}



/* &<@anonymous:2086> */
obj_t BGl_z62zc3z04anonymousza32086ze3ze5zz__objectz00(obj_t BgL_envz00_5140, obj_t BgL_new1145z00_5141)
{
{ /* Llib/object.scm 261 */
{ 
 BgL_z62iozd2sigpipezd2errorz62_bglt BgL_auxz00_12656;
{ /* Llib/object.scm 261 */
 BgL_z62iozd2sigpipezd2errorz62_bglt BgL_new1145z00_6904;
{ /* Llib/object.scm 261 */
 bool_t BgL_test5068z00_12657;
{ /* Llib/object.scm 261 */
 obj_t BgL_classz00_6886;
BgL_classz00_6886 = BGl_z62iozd2sigpipezd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1145z00_5141))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6887; long BgL_arg1816z00_6888;
BgL_arg1815z00_6887 = 
(BgL_objectz00_bglt)(BgL_new1145z00_5141); 
BgL_arg1816z00_6888 = 
BGL_CLASS_DEPTH(BgL_classz00_6886); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6889;
BgL_idxz00_6889 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6887); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6890;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6891;
BgL_arg1825z00_6891 = 
(BgL_idxz00_6889+BgL_arg1816z00_6888); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6892;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6893;
BgL_aux3193z00_6893 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6893))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6892 = BgL_aux3193z00_6893; }  else 
{ 
 obj_t BgL_auxz00_12668;
BgL_auxz00_12668 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6893); 
FAILURE(BgL_auxz00_12668,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5072z00_12672;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12673;
BgL_tmpz00_12673 = 
VECTOR_LENGTH(BgL_vectorz00_6892); 
BgL_test5072z00_12672 = 
BOUND_CHECK(BgL_arg1825z00_6891, BgL_tmpz00_12673); } 
if(BgL_test5072z00_12672)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6890 = 
VECTOR_REF(BgL_vectorz00_6892,BgL_arg1825z00_6891); }  else 
{ 
 obj_t BgL_auxz00_12677;
BgL_auxz00_12677 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6892, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6892)), 
(int)(BgL_arg1825z00_6891)); 
FAILURE(BgL_auxz00_12677,BFALSE,BFALSE);} } } } 
BgL_test5068z00_12657 = 
(BgL_arg1824z00_6890==BgL_classz00_6886); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6894;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6895;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6896; long BgL_arg1554z00_6897;
BgL_arg1552z00_6896 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6898;
BgL_arg1555z00_6898 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6887); 
BgL_arg1554z00_6897 = 
(BgL_arg1555z00_6898-OBJECT_TYPE); } 
BgL_oclassz00_6895 = 
VECTOR_REF(BgL_arg1552z00_6896,BgL_arg1554z00_6897); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6899;
BgL__ortest_1222z00_6899 = 
(BgL_classz00_6886==BgL_oclassz00_6895); 
if(BgL__ortest_1222z00_6899)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6894 = BgL__ortest_1222z00_6899; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6900;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6901;
BgL_arg1822z00_6901 = 
(BgL_oclassz00_6895); 
BgL_odepthz00_6900 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6901); } 
if(
(BgL_arg1816z00_6888<BgL_odepthz00_6900))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6902;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6903;
BgL_arg1821z00_6903 = 
(BgL_oclassz00_6895); 
BgL_arg1820z00_6902 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6903, BgL_arg1816z00_6888); } 
BgL_res2666z00_6894 = 
(BgL_arg1820z00_6902==BgL_classz00_6886); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6894 = ((bool_t)0); } } } } 
BgL_test5068z00_12657 = BgL_res2666z00_6894; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5068z00_12657 = ((bool_t)0)
; } } 
if(BgL_test5068z00_12657)
{ /* Llib/object.scm 261 */
BgL_new1145z00_6904 = 
((BgL_z62iozd2sigpipezd2errorz62_bglt)BgL_new1145z00_5141); }  else 
{ 
 obj_t BgL_auxz00_12699;
BgL_auxz00_12699 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9334L), BGl_string3877z00zz__objectz00, BGl_string3799z00zz__objectz00, BgL_new1145z00_5141); 
FAILURE(BgL_auxz00_12699,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1145z00_6904)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1145z00_6904)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1145z00_6904)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1145z00_6904)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1145z00_6904)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1145z00_6904)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12656 = BgL_new1145z00_6904; } 
return 
((obj_t)BgL_auxz00_12656);} } 

}



/* &lambda2084 */
BgL_z62iozd2sigpipezd2errorz62_bglt BGl_z62lambda2084z62zz__objectz00(obj_t BgL_envz00_5142)
{
{ /* Llib/object.scm 261 */
{ /* Llib/object.scm 261 */
 BgL_z62iozd2sigpipezd2errorz62_bglt BgL_new1144z00_6905;
BgL_new1144z00_6905 = 
((BgL_z62iozd2sigpipezd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2sigpipezd2errorz62_bgl) ))); 
{ /* Llib/object.scm 261 */
 long BgL_arg2085z00_6906;
BgL_arg2085z00_6906 = 
BGL_CLASS_NUM(BGl_z62iozd2sigpipezd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1144z00_6905), BgL_arg2085z00_6906); } 
return BgL_new1144z00_6905;} } 

}



/* &lambda2082 */
BgL_z62iozd2sigpipezd2errorz62_bglt BGl_z62lambda2082z62zz__objectz00(obj_t BgL_envz00_5143, obj_t BgL_fname1138z00_5144, obj_t BgL_location1139z00_5145, obj_t BgL_stack1140z00_5146, obj_t BgL_proc1141z00_5147, obj_t BgL_msg1142z00_5148, obj_t BgL_obj1143z00_5149)
{
{ /* Llib/object.scm 261 */
{ /* Llib/object.scm 261 */
 BgL_z62iozd2sigpipezd2errorz62_bglt BgL_new1262z00_6907;
{ /* Llib/object.scm 261 */
 BgL_z62iozd2sigpipezd2errorz62_bglt BgL_new1261z00_6908;
BgL_new1261z00_6908 = 
((BgL_z62iozd2sigpipezd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2sigpipezd2errorz62_bgl) ))); 
{ /* Llib/object.scm 261 */
 long BgL_arg2083z00_6909;
BgL_arg2083z00_6909 = 
BGL_CLASS_NUM(BGl_z62iozd2sigpipezd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1261z00_6908), BgL_arg2083z00_6909); } 
BgL_new1262z00_6907 = BgL_new1261z00_6908; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1262z00_6907)))->BgL_fnamez00)=((obj_t)BgL_fname1138z00_5144),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1262z00_6907)))->BgL_locationz00)=((obj_t)BgL_location1139z00_5145),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1262z00_6907)))->BgL_stackz00)=((obj_t)BgL_stack1140z00_5146),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1262z00_6907)))->BgL_procz00)=((obj_t)BgL_proc1141z00_5147),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1262z00_6907)))->BgL_msgz00)=((obj_t)BgL_msg1142z00_5148),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1262z00_6907)))->BgL_objz00)=((obj_t)BgL_obj1143z00_5149),BUNSPEC); 
return BgL_new1262z00_6907;} } 

}



/* &<@anonymous:2076> */
obj_t BGl_z62zc3z04anonymousza32076ze3ze5zz__objectz00(obj_t BgL_envz00_5150, obj_t BgL_new1136z00_5151)
{
{ /* Llib/object.scm 260 */
{ 
 BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BgL_auxz00_12736;
{ /* Llib/object.scm 260 */
 BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BgL_new1136z00_6928;
{ /* Llib/object.scm 260 */
 bool_t BgL_test5075z00_12737;
{ /* Llib/object.scm 260 */
 obj_t BgL_classz00_6910;
BgL_classz00_6910 = BGl_z62iozd2malformedzd2urlzd2errorzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1136z00_5151))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6911; long BgL_arg1816z00_6912;
BgL_arg1815z00_6911 = 
(BgL_objectz00_bglt)(BgL_new1136z00_5151); 
BgL_arg1816z00_6912 = 
BGL_CLASS_DEPTH(BgL_classz00_6910); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6913;
BgL_idxz00_6913 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6911); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6914;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6915;
BgL_arg1825z00_6915 = 
(BgL_idxz00_6913+BgL_arg1816z00_6912); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6916;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6917;
BgL_aux3193z00_6917 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6917))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6916 = BgL_aux3193z00_6917; }  else 
{ 
 obj_t BgL_auxz00_12748;
BgL_auxz00_12748 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6917); 
FAILURE(BgL_auxz00_12748,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5079z00_12752;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12753;
BgL_tmpz00_12753 = 
VECTOR_LENGTH(BgL_vectorz00_6916); 
BgL_test5079z00_12752 = 
BOUND_CHECK(BgL_arg1825z00_6915, BgL_tmpz00_12753); } 
if(BgL_test5079z00_12752)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6914 = 
VECTOR_REF(BgL_vectorz00_6916,BgL_arg1825z00_6915); }  else 
{ 
 obj_t BgL_auxz00_12757;
BgL_auxz00_12757 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6916, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6916)), 
(int)(BgL_arg1825z00_6915)); 
FAILURE(BgL_auxz00_12757,BFALSE,BFALSE);} } } } 
BgL_test5075z00_12737 = 
(BgL_arg1824z00_6914==BgL_classz00_6910); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6918;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6919;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6920; long BgL_arg1554z00_6921;
BgL_arg1552z00_6920 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6922;
BgL_arg1555z00_6922 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6911); 
BgL_arg1554z00_6921 = 
(BgL_arg1555z00_6922-OBJECT_TYPE); } 
BgL_oclassz00_6919 = 
VECTOR_REF(BgL_arg1552z00_6920,BgL_arg1554z00_6921); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6923;
BgL__ortest_1222z00_6923 = 
(BgL_classz00_6910==BgL_oclassz00_6919); 
if(BgL__ortest_1222z00_6923)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6918 = BgL__ortest_1222z00_6923; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6924;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6925;
BgL_arg1822z00_6925 = 
(BgL_oclassz00_6919); 
BgL_odepthz00_6924 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6925); } 
if(
(BgL_arg1816z00_6912<BgL_odepthz00_6924))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6926;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6927;
BgL_arg1821z00_6927 = 
(BgL_oclassz00_6919); 
BgL_arg1820z00_6926 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6927, BgL_arg1816z00_6912); } 
BgL_res2666z00_6918 = 
(BgL_arg1820z00_6926==BgL_classz00_6910); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6918 = ((bool_t)0); } } } } 
BgL_test5075z00_12737 = BgL_res2666z00_6918; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5075z00_12737 = ((bool_t)0)
; } } 
if(BgL_test5075z00_12737)
{ /* Llib/object.scm 260 */
BgL_new1136z00_6928 = 
((BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt)BgL_new1136z00_5151); }  else 
{ 
 obj_t BgL_auxz00_12779;
BgL_auxz00_12779 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9286L), BGl_string3878z00zz__objectz00, BGl_string3794z00zz__objectz00, BgL_new1136z00_5151); 
FAILURE(BgL_auxz00_12779,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1136z00_6928)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1136z00_6928)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1136z00_6928)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1136z00_6928)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1136z00_6928)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1136z00_6928)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12736 = BgL_new1136z00_6928; } 
return 
((obj_t)BgL_auxz00_12736);} } 

}



/* &lambda2074 */
BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BGl_z62lambda2074z62zz__objectz00(obj_t BgL_envz00_5152)
{
{ /* Llib/object.scm 260 */
{ /* Llib/object.scm 260 */
 BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BgL_new1135z00_6929;
BgL_new1135z00_6929 = 
((BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2malformedzd2urlzd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 260 */
 long BgL_arg2075z00_6930;
BgL_arg2075z00_6930 = 
BGL_CLASS_NUM(BGl_z62iozd2malformedzd2urlzd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1135z00_6929), BgL_arg2075z00_6930); } 
return BgL_new1135z00_6929;} } 

}



/* &lambda2072 */
BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BGl_z62lambda2072z62zz__objectz00(obj_t BgL_envz00_5153, obj_t BgL_fname1128z00_5154, obj_t BgL_location1129z00_5155, obj_t BgL_stack1130z00_5156, obj_t BgL_proc1131z00_5157, obj_t BgL_msg1132z00_5158, obj_t BgL_obj1133z00_5159)
{
{ /* Llib/object.scm 260 */
{ /* Llib/object.scm 260 */
 BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BgL_new1260z00_6931;
{ /* Llib/object.scm 260 */
 BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt BgL_new1259z00_6932;
BgL_new1259z00_6932 = 
((BgL_z62iozd2malformedzd2urlzd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2malformedzd2urlzd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 260 */
 long BgL_arg2073z00_6933;
BgL_arg2073z00_6933 = 
BGL_CLASS_NUM(BGl_z62iozd2malformedzd2urlzd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1259z00_6932), BgL_arg2073z00_6933); } 
BgL_new1260z00_6931 = BgL_new1259z00_6932; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1260z00_6931)))->BgL_fnamez00)=((obj_t)BgL_fname1128z00_5154),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1260z00_6931)))->BgL_locationz00)=((obj_t)BgL_location1129z00_5155),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1260z00_6931)))->BgL_stackz00)=((obj_t)BgL_stack1130z00_5156),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1260z00_6931)))->BgL_procz00)=((obj_t)BgL_proc1131z00_5157),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1260z00_6931)))->BgL_msgz00)=((obj_t)BgL_msg1132z00_5158),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1260z00_6931)))->BgL_objz00)=((obj_t)BgL_obj1133z00_5159),BUNSPEC); 
return BgL_new1260z00_6931;} } 

}



/* &<@anonymous:2065> */
obj_t BGl_z62zc3z04anonymousza32065ze3ze5zz__objectz00(obj_t BgL_envz00_5160, obj_t BgL_new1126z00_5161)
{
{ /* Llib/object.scm 259 */
{ 
 BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BgL_auxz00_12816;
{ /* Llib/object.scm 259 */
 BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BgL_new1126z00_6952;
{ /* Llib/object.scm 259 */
 bool_t BgL_test5082z00_12817;
{ /* Llib/object.scm 259 */
 obj_t BgL_classz00_6934;
BgL_classz00_6934 = BGl_z62iozd2unknownzd2hostzd2errorzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1126z00_5161))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6935; long BgL_arg1816z00_6936;
BgL_arg1815z00_6935 = 
(BgL_objectz00_bglt)(BgL_new1126z00_5161); 
BgL_arg1816z00_6936 = 
BGL_CLASS_DEPTH(BgL_classz00_6934); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6937;
BgL_idxz00_6937 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6935); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6938;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6939;
BgL_arg1825z00_6939 = 
(BgL_idxz00_6937+BgL_arg1816z00_6936); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6940;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6941;
BgL_aux3193z00_6941 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6941))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6940 = BgL_aux3193z00_6941; }  else 
{ 
 obj_t BgL_auxz00_12828;
BgL_auxz00_12828 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6941); 
FAILURE(BgL_auxz00_12828,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5086z00_12832;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12833;
BgL_tmpz00_12833 = 
VECTOR_LENGTH(BgL_vectorz00_6940); 
BgL_test5086z00_12832 = 
BOUND_CHECK(BgL_arg1825z00_6939, BgL_tmpz00_12833); } 
if(BgL_test5086z00_12832)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6938 = 
VECTOR_REF(BgL_vectorz00_6940,BgL_arg1825z00_6939); }  else 
{ 
 obj_t BgL_auxz00_12837;
BgL_auxz00_12837 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6940, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6940)), 
(int)(BgL_arg1825z00_6939)); 
FAILURE(BgL_auxz00_12837,BFALSE,BFALSE);} } } } 
BgL_test5082z00_12817 = 
(BgL_arg1824z00_6938==BgL_classz00_6934); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6942;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6943;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6944; long BgL_arg1554z00_6945;
BgL_arg1552z00_6944 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6946;
BgL_arg1555z00_6946 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6935); 
BgL_arg1554z00_6945 = 
(BgL_arg1555z00_6946-OBJECT_TYPE); } 
BgL_oclassz00_6943 = 
VECTOR_REF(BgL_arg1552z00_6944,BgL_arg1554z00_6945); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6947;
BgL__ortest_1222z00_6947 = 
(BgL_classz00_6934==BgL_oclassz00_6943); 
if(BgL__ortest_1222z00_6947)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6942 = BgL__ortest_1222z00_6947; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6948;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6949;
BgL_arg1822z00_6949 = 
(BgL_oclassz00_6943); 
BgL_odepthz00_6948 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6949); } 
if(
(BgL_arg1816z00_6936<BgL_odepthz00_6948))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6950;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6951;
BgL_arg1821z00_6951 = 
(BgL_oclassz00_6943); 
BgL_arg1820z00_6950 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6951, BgL_arg1816z00_6936); } 
BgL_res2666z00_6942 = 
(BgL_arg1820z00_6950==BgL_classz00_6934); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6942 = ((bool_t)0); } } } } 
BgL_test5082z00_12817 = BgL_res2666z00_6942; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5082z00_12817 = ((bool_t)0)
; } } 
if(BgL_test5082z00_12817)
{ /* Llib/object.scm 259 */
BgL_new1126z00_6952 = 
((BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt)BgL_new1126z00_5161); }  else 
{ 
 obj_t BgL_auxz00_12859;
BgL_auxz00_12859 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9239L), BGl_string3879z00zz__objectz00, BGl_string3789z00zz__objectz00, BgL_new1126z00_5161); 
FAILURE(BgL_auxz00_12859,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1126z00_6952)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1126z00_6952)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1126z00_6952)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1126z00_6952)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1126z00_6952)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1126z00_6952)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12816 = BgL_new1126z00_6952; } 
return 
((obj_t)BgL_auxz00_12816);} } 

}



/* &lambda2063 */
BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BGl_z62lambda2063z62zz__objectz00(obj_t BgL_envz00_5162)
{
{ /* Llib/object.scm 259 */
{ /* Llib/object.scm 259 */
 BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BgL_new1125z00_6953;
BgL_new1125z00_6953 = 
((BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2unknownzd2hostzd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 259 */
 long BgL_arg2064z00_6954;
BgL_arg2064z00_6954 = 
BGL_CLASS_NUM(BGl_z62iozd2unknownzd2hostzd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1125z00_6953), BgL_arg2064z00_6954); } 
return BgL_new1125z00_6953;} } 

}



/* &lambda2061 */
BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BGl_z62lambda2061z62zz__objectz00(obj_t BgL_envz00_5163, obj_t BgL_fname1119z00_5164, obj_t BgL_location1120z00_5165, obj_t BgL_stack1121z00_5166, obj_t BgL_proc1122z00_5167, obj_t BgL_msg1123z00_5168, obj_t BgL_obj1124z00_5169)
{
{ /* Llib/object.scm 259 */
{ /* Llib/object.scm 259 */
 BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BgL_new1258z00_6955;
{ /* Llib/object.scm 259 */
 BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt BgL_new1257z00_6956;
BgL_new1257z00_6956 = 
((BgL_z62iozd2unknownzd2hostzd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2unknownzd2hostzd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 259 */
 long BgL_arg2062z00_6957;
BgL_arg2062z00_6957 = 
BGL_CLASS_NUM(BGl_z62iozd2unknownzd2hostzd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1257z00_6956), BgL_arg2062z00_6957); } 
BgL_new1258z00_6955 = BgL_new1257z00_6956; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1258z00_6955)))->BgL_fnamez00)=((obj_t)BgL_fname1119z00_5164),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1258z00_6955)))->BgL_locationz00)=((obj_t)BgL_location1120z00_5165),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1258z00_6955)))->BgL_stackz00)=((obj_t)BgL_stack1121z00_5166),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1258z00_6955)))->BgL_procz00)=((obj_t)BgL_proc1122z00_5167),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1258z00_6955)))->BgL_msgz00)=((obj_t)BgL_msg1123z00_5168),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1258z00_6955)))->BgL_objz00)=((obj_t)BgL_obj1124z00_5169),BUNSPEC); 
return BgL_new1258z00_6955;} } 

}



/* &<@anonymous:2054> */
obj_t BGl_z62zc3z04anonymousza32054ze3ze5zz__objectz00(obj_t BgL_envz00_5170, obj_t BgL_new1117z00_5171)
{
{ /* Llib/object.scm 258 */
{ 
 BgL_z62iozd2parsezd2errorz62_bglt BgL_auxz00_12896;
{ /* Llib/object.scm 258 */
 BgL_z62iozd2parsezd2errorz62_bglt BgL_new1117z00_6976;
{ /* Llib/object.scm 258 */
 bool_t BgL_test5089z00_12897;
{ /* Llib/object.scm 258 */
 obj_t BgL_classz00_6958;
BgL_classz00_6958 = BGl_z62iozd2parsezd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1117z00_5171))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6959; long BgL_arg1816z00_6960;
BgL_arg1815z00_6959 = 
(BgL_objectz00_bglt)(BgL_new1117z00_5171); 
BgL_arg1816z00_6960 = 
BGL_CLASS_DEPTH(BgL_classz00_6958); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6961;
BgL_idxz00_6961 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6959); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6962;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6963;
BgL_arg1825z00_6963 = 
(BgL_idxz00_6961+BgL_arg1816z00_6960); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6964;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6965;
BgL_aux3193z00_6965 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6965))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6964 = BgL_aux3193z00_6965; }  else 
{ 
 obj_t BgL_auxz00_12908;
BgL_auxz00_12908 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6965); 
FAILURE(BgL_auxz00_12908,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5093z00_12912;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12913;
BgL_tmpz00_12913 = 
VECTOR_LENGTH(BgL_vectorz00_6964); 
BgL_test5093z00_12912 = 
BOUND_CHECK(BgL_arg1825z00_6963, BgL_tmpz00_12913); } 
if(BgL_test5093z00_12912)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6962 = 
VECTOR_REF(BgL_vectorz00_6964,BgL_arg1825z00_6963); }  else 
{ 
 obj_t BgL_auxz00_12917;
BgL_auxz00_12917 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6964, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6964)), 
(int)(BgL_arg1825z00_6963)); 
FAILURE(BgL_auxz00_12917,BFALSE,BFALSE);} } } } 
BgL_test5089z00_12897 = 
(BgL_arg1824z00_6962==BgL_classz00_6958); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6966;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6967;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6968; long BgL_arg1554z00_6969;
BgL_arg1552z00_6968 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6970;
BgL_arg1555z00_6970 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6959); 
BgL_arg1554z00_6969 = 
(BgL_arg1555z00_6970-OBJECT_TYPE); } 
BgL_oclassz00_6967 = 
VECTOR_REF(BgL_arg1552z00_6968,BgL_arg1554z00_6969); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6971;
BgL__ortest_1222z00_6971 = 
(BgL_classz00_6958==BgL_oclassz00_6967); 
if(BgL__ortest_1222z00_6971)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6966 = BgL__ortest_1222z00_6971; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6972;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6973;
BgL_arg1822z00_6973 = 
(BgL_oclassz00_6967); 
BgL_odepthz00_6972 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6973); } 
if(
(BgL_arg1816z00_6960<BgL_odepthz00_6972))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6974;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6975;
BgL_arg1821z00_6975 = 
(BgL_oclassz00_6967); 
BgL_arg1820z00_6974 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6975, BgL_arg1816z00_6960); } 
BgL_res2666z00_6966 = 
(BgL_arg1820z00_6974==BgL_classz00_6958); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6966 = ((bool_t)0); } } } } 
BgL_test5089z00_12897 = BgL_res2666z00_6966; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5089z00_12897 = ((bool_t)0)
; } } 
if(BgL_test5089z00_12897)
{ /* Llib/object.scm 258 */
BgL_new1117z00_6976 = 
((BgL_z62iozd2parsezd2errorz62_bglt)BgL_new1117z00_5171); }  else 
{ 
 obj_t BgL_auxz00_12939;
BgL_auxz00_12939 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9199L), BGl_string3880z00zz__objectz00, BGl_string3784z00zz__objectz00, BgL_new1117z00_5171); 
FAILURE(BgL_auxz00_12939,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1117z00_6976)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1117z00_6976)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1117z00_6976)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1117z00_6976)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1117z00_6976)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1117z00_6976)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12896 = BgL_new1117z00_6976; } 
return 
((obj_t)BgL_auxz00_12896);} } 

}



/* &lambda2052 */
BgL_z62iozd2parsezd2errorz62_bglt BGl_z62lambda2052z62zz__objectz00(obj_t BgL_envz00_5172)
{
{ /* Llib/object.scm 258 */
{ /* Llib/object.scm 258 */
 BgL_z62iozd2parsezd2errorz62_bglt BgL_new1116z00_6977;
BgL_new1116z00_6977 = 
((BgL_z62iozd2parsezd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2parsezd2errorz62_bgl) ))); 
{ /* Llib/object.scm 258 */
 long BgL_arg2053z00_6978;
BgL_arg2053z00_6978 = 
BGL_CLASS_NUM(BGl_z62iozd2parsezd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1116z00_6977), BgL_arg2053z00_6978); } 
return BgL_new1116z00_6977;} } 

}



/* &lambda2050 */
BgL_z62iozd2parsezd2errorz62_bglt BGl_z62lambda2050z62zz__objectz00(obj_t BgL_envz00_5173, obj_t BgL_fname1110z00_5174, obj_t BgL_location1111z00_5175, obj_t BgL_stack1112z00_5176, obj_t BgL_proc1113z00_5177, obj_t BgL_msg1114z00_5178, obj_t BgL_obj1115z00_5179)
{
{ /* Llib/object.scm 258 */
{ /* Llib/object.scm 258 */
 BgL_z62iozd2parsezd2errorz62_bglt BgL_new1256z00_6979;
{ /* Llib/object.scm 258 */
 BgL_z62iozd2parsezd2errorz62_bglt BgL_new1255z00_6980;
BgL_new1255z00_6980 = 
((BgL_z62iozd2parsezd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2parsezd2errorz62_bgl) ))); 
{ /* Llib/object.scm 258 */
 long BgL_arg2051z00_6981;
BgL_arg2051z00_6981 = 
BGL_CLASS_NUM(BGl_z62iozd2parsezd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1255z00_6980), BgL_arg2051z00_6981); } 
BgL_new1256z00_6979 = BgL_new1255z00_6980; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1256z00_6979)))->BgL_fnamez00)=((obj_t)BgL_fname1110z00_5174),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1256z00_6979)))->BgL_locationz00)=((obj_t)BgL_location1111z00_5175),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1256z00_6979)))->BgL_stackz00)=((obj_t)BgL_stack1112z00_5176),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1256z00_6979)))->BgL_procz00)=((obj_t)BgL_proc1113z00_5177),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1256z00_6979)))->BgL_msgz00)=((obj_t)BgL_msg1114z00_5178),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1256z00_6979)))->BgL_objz00)=((obj_t)BgL_obj1115z00_5179),BUNSPEC); 
return BgL_new1256z00_6979;} } 

}



/* &<@anonymous:2044> */
obj_t BGl_z62zc3z04anonymousza32044ze3ze5zz__objectz00(obj_t BgL_envz00_5180, obj_t BgL_new1108z00_5181)
{
{ /* Llib/object.scm 257 */
{ 
 BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BgL_auxz00_12976;
{ /* Llib/object.scm 257 */
 BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BgL_new1108z00_7000;
{ /* Llib/object.scm 257 */
 bool_t BgL_test5096z00_12977;
{ /* Llib/object.scm 257 */
 obj_t BgL_classz00_6982;
BgL_classz00_6982 = BGl_z62iozd2filezd2notzd2foundzd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1108z00_5181))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_6983; long BgL_arg1816z00_6984;
BgL_arg1815z00_6983 = 
(BgL_objectz00_bglt)(BgL_new1108z00_5181); 
BgL_arg1816z00_6984 = 
BGL_CLASS_DEPTH(BgL_classz00_6982); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_6985;
BgL_idxz00_6985 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_6983); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_6986;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_6987;
BgL_arg1825z00_6987 = 
(BgL_idxz00_6985+BgL_arg1816z00_6984); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_6988;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_6989;
BgL_aux3193z00_6989 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_6989))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_6988 = BgL_aux3193z00_6989; }  else 
{ 
 obj_t BgL_auxz00_12988;
BgL_auxz00_12988 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_6989); 
FAILURE(BgL_auxz00_12988,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5100z00_12992;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_12993;
BgL_tmpz00_12993 = 
VECTOR_LENGTH(BgL_vectorz00_6988); 
BgL_test5100z00_12992 = 
BOUND_CHECK(BgL_arg1825z00_6987, BgL_tmpz00_12993); } 
if(BgL_test5100z00_12992)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_6986 = 
VECTOR_REF(BgL_vectorz00_6988,BgL_arg1825z00_6987); }  else 
{ 
 obj_t BgL_auxz00_12997;
BgL_auxz00_12997 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_6988, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_6988)), 
(int)(BgL_arg1825z00_6987)); 
FAILURE(BgL_auxz00_12997,BFALSE,BFALSE);} } } } 
BgL_test5096z00_12977 = 
(BgL_arg1824z00_6986==BgL_classz00_6982); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_6990;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_6991;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_6992; long BgL_arg1554z00_6993;
BgL_arg1552z00_6992 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_6994;
BgL_arg1555z00_6994 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_6983); 
BgL_arg1554z00_6993 = 
(BgL_arg1555z00_6994-OBJECT_TYPE); } 
BgL_oclassz00_6991 = 
VECTOR_REF(BgL_arg1552z00_6992,BgL_arg1554z00_6993); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_6995;
BgL__ortest_1222z00_6995 = 
(BgL_classz00_6982==BgL_oclassz00_6991); 
if(BgL__ortest_1222z00_6995)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_6990 = BgL__ortest_1222z00_6995; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_6996;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_6997;
BgL_arg1822z00_6997 = 
(BgL_oclassz00_6991); 
BgL_odepthz00_6996 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_6997); } 
if(
(BgL_arg1816z00_6984<BgL_odepthz00_6996))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_6998;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_6999;
BgL_arg1821z00_6999 = 
(BgL_oclassz00_6991); 
BgL_arg1820z00_6998 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_6999, BgL_arg1816z00_6984); } 
BgL_res2666z00_6990 = 
(BgL_arg1820z00_6998==BgL_classz00_6982); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_6990 = ((bool_t)0); } } } } 
BgL_test5096z00_12977 = BgL_res2666z00_6990; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5096z00_12977 = ((bool_t)0)
; } } 
if(BgL_test5096z00_12977)
{ /* Llib/object.scm 257 */
BgL_new1108z00_7000 = 
((BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt)BgL_new1108z00_5181); }  else 
{ 
 obj_t BgL_auxz00_13019;
BgL_auxz00_13019 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9150L), BGl_string3881z00zz__objectz00, BGl_string3779z00zz__objectz00, BgL_new1108z00_5181); 
FAILURE(BgL_auxz00_13019,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1108z00_7000)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1108z00_7000)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1108z00_7000)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1108z00_7000)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1108z00_7000)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1108z00_7000)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_12976 = BgL_new1108z00_7000; } 
return 
((obj_t)BgL_auxz00_12976);} } 

}



/* &lambda2042 */
BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BGl_z62lambda2042z62zz__objectz00(obj_t BgL_envz00_5182)
{
{ /* Llib/object.scm 257 */
{ /* Llib/object.scm 257 */
 BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BgL_new1107z00_7001;
BgL_new1107z00_7001 = 
((BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2filezd2notzd2foundzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 257 */
 long BgL_arg2043z00_7002;
BgL_arg2043z00_7002 = 
BGL_CLASS_NUM(BGl_z62iozd2filezd2notzd2foundzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1107z00_7001), BgL_arg2043z00_7002); } 
return BgL_new1107z00_7001;} } 

}



/* &lambda2040 */
BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BGl_z62lambda2040z62zz__objectz00(obj_t BgL_envz00_5183, obj_t BgL_fname1101z00_5184, obj_t BgL_location1102z00_5185, obj_t BgL_stack1103z00_5186, obj_t BgL_proc1104z00_5187, obj_t BgL_msg1105z00_5188, obj_t BgL_obj1106z00_5189)
{
{ /* Llib/object.scm 257 */
{ /* Llib/object.scm 257 */
 BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BgL_new1254z00_7003;
{ /* Llib/object.scm 257 */
 BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt BgL_new1253z00_7004;
BgL_new1253z00_7004 = 
((BgL_z62iozd2filezd2notzd2foundzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2filezd2notzd2foundzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 257 */
 long BgL_arg2041z00_7005;
BgL_arg2041z00_7005 = 
BGL_CLASS_NUM(BGl_z62iozd2filezd2notzd2foundzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1253z00_7004), BgL_arg2041z00_7005); } 
BgL_new1254z00_7003 = BgL_new1253z00_7004; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1254z00_7003)))->BgL_fnamez00)=((obj_t)BgL_fname1101z00_5184),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1254z00_7003)))->BgL_locationz00)=((obj_t)BgL_location1102z00_5185),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1254z00_7003)))->BgL_stackz00)=((obj_t)BgL_stack1103z00_5186),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1254z00_7003)))->BgL_procz00)=((obj_t)BgL_proc1104z00_5187),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1254z00_7003)))->BgL_msgz00)=((obj_t)BgL_msg1105z00_5188),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1254z00_7003)))->BgL_objz00)=((obj_t)BgL_obj1106z00_5189),BUNSPEC); 
return BgL_new1254z00_7003;} } 

}



/* &<@anonymous:2033> */
obj_t BGl_z62zc3z04anonymousza32033ze3ze5zz__objectz00(obj_t BgL_envz00_5190, obj_t BgL_new1099z00_5191)
{
{ /* Llib/object.scm 256 */
{ 
 BgL_z62iozd2closedzd2errorz62_bglt BgL_auxz00_13056;
{ /* Llib/object.scm 256 */
 BgL_z62iozd2closedzd2errorz62_bglt BgL_new1099z00_7024;
{ /* Llib/object.scm 256 */
 bool_t BgL_test5103z00_13057;
{ /* Llib/object.scm 256 */
 obj_t BgL_classz00_7006;
BgL_classz00_7006 = BGl_z62iozd2closedzd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1099z00_5191))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7007; long BgL_arg1816z00_7008;
BgL_arg1815z00_7007 = 
(BgL_objectz00_bglt)(BgL_new1099z00_5191); 
BgL_arg1816z00_7008 = 
BGL_CLASS_DEPTH(BgL_classz00_7006); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7009;
BgL_idxz00_7009 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7007); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7010;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7011;
BgL_arg1825z00_7011 = 
(BgL_idxz00_7009+BgL_arg1816z00_7008); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7012;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7013;
BgL_aux3193z00_7013 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7013))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7012 = BgL_aux3193z00_7013; }  else 
{ 
 obj_t BgL_auxz00_13068;
BgL_auxz00_13068 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7013); 
FAILURE(BgL_auxz00_13068,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5107z00_13072;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13073;
BgL_tmpz00_13073 = 
VECTOR_LENGTH(BgL_vectorz00_7012); 
BgL_test5107z00_13072 = 
BOUND_CHECK(BgL_arg1825z00_7011, BgL_tmpz00_13073); } 
if(BgL_test5107z00_13072)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7010 = 
VECTOR_REF(BgL_vectorz00_7012,BgL_arg1825z00_7011); }  else 
{ 
 obj_t BgL_auxz00_13077;
BgL_auxz00_13077 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7012, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7012)), 
(int)(BgL_arg1825z00_7011)); 
FAILURE(BgL_auxz00_13077,BFALSE,BFALSE);} } } } 
BgL_test5103z00_13057 = 
(BgL_arg1824z00_7010==BgL_classz00_7006); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7014;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7015;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7016; long BgL_arg1554z00_7017;
BgL_arg1552z00_7016 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7018;
BgL_arg1555z00_7018 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7007); 
BgL_arg1554z00_7017 = 
(BgL_arg1555z00_7018-OBJECT_TYPE); } 
BgL_oclassz00_7015 = 
VECTOR_REF(BgL_arg1552z00_7016,BgL_arg1554z00_7017); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7019;
BgL__ortest_1222z00_7019 = 
(BgL_classz00_7006==BgL_oclassz00_7015); 
if(BgL__ortest_1222z00_7019)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7014 = BgL__ortest_1222z00_7019; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7020;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7021;
BgL_arg1822z00_7021 = 
(BgL_oclassz00_7015); 
BgL_odepthz00_7020 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7021); } 
if(
(BgL_arg1816z00_7008<BgL_odepthz00_7020))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7022;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7023;
BgL_arg1821z00_7023 = 
(BgL_oclassz00_7015); 
BgL_arg1820z00_7022 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7023, BgL_arg1816z00_7008); } 
BgL_res2666z00_7014 = 
(BgL_arg1820z00_7022==BgL_classz00_7006); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7014 = ((bool_t)0); } } } } 
BgL_test5103z00_13057 = BgL_res2666z00_7014; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5103z00_13057 = ((bool_t)0)
; } } 
if(BgL_test5103z00_13057)
{ /* Llib/object.scm 256 */
BgL_new1099z00_7024 = 
((BgL_z62iozd2closedzd2errorz62_bglt)BgL_new1099z00_5191); }  else 
{ 
 obj_t BgL_auxz00_13099;
BgL_auxz00_13099 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9104L), BGl_string3882z00zz__objectz00, BGl_string3774z00zz__objectz00, BgL_new1099z00_5191); 
FAILURE(BgL_auxz00_13099,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1099z00_7024)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1099z00_7024)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1099z00_7024)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1099z00_7024)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1099z00_7024)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1099z00_7024)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13056 = BgL_new1099z00_7024; } 
return 
((obj_t)BgL_auxz00_13056);} } 

}



/* &lambda2031 */
BgL_z62iozd2closedzd2errorz62_bglt BGl_z62lambda2031z62zz__objectz00(obj_t BgL_envz00_5192)
{
{ /* Llib/object.scm 256 */
{ /* Llib/object.scm 256 */
 BgL_z62iozd2closedzd2errorz62_bglt BgL_new1097z00_7025;
BgL_new1097z00_7025 = 
((BgL_z62iozd2closedzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2closedzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 256 */
 long BgL_arg2032z00_7026;
BgL_arg2032z00_7026 = 
BGL_CLASS_NUM(BGl_z62iozd2closedzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1097z00_7025), BgL_arg2032z00_7026); } 
return BgL_new1097z00_7025;} } 

}



/* &lambda2029 */
BgL_z62iozd2closedzd2errorz62_bglt BGl_z62lambda2029z62zz__objectz00(obj_t BgL_envz00_5193, obj_t BgL_fname1091z00_5194, obj_t BgL_location1092z00_5195, obj_t BgL_stack1093z00_5196, obj_t BgL_proc1094z00_5197, obj_t BgL_msg1095z00_5198, obj_t BgL_obj1096z00_5199)
{
{ /* Llib/object.scm 256 */
{ /* Llib/object.scm 256 */
 BgL_z62iozd2closedzd2errorz62_bglt BgL_new1252z00_7027;
{ /* Llib/object.scm 256 */
 BgL_z62iozd2closedzd2errorz62_bglt BgL_new1251z00_7028;
BgL_new1251z00_7028 = 
((BgL_z62iozd2closedzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2closedzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 256 */
 long BgL_arg2030z00_7029;
BgL_arg2030z00_7029 = 
BGL_CLASS_NUM(BGl_z62iozd2closedzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1251z00_7028), BgL_arg2030z00_7029); } 
BgL_new1252z00_7027 = BgL_new1251z00_7028; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1252z00_7027)))->BgL_fnamez00)=((obj_t)BgL_fname1091z00_5194),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1252z00_7027)))->BgL_locationz00)=((obj_t)BgL_location1092z00_5195),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1252z00_7027)))->BgL_stackz00)=((obj_t)BgL_stack1093z00_5196),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1252z00_7027)))->BgL_procz00)=((obj_t)BgL_proc1094z00_5197),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1252z00_7027)))->BgL_msgz00)=((obj_t)BgL_msg1095z00_5198),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1252z00_7027)))->BgL_objz00)=((obj_t)BgL_obj1096z00_5199),BUNSPEC); 
return BgL_new1252z00_7027;} } 

}



/* &<@anonymous:2021> */
obj_t BGl_z62zc3z04anonymousza32021ze3ze5zz__objectz00(obj_t BgL_envz00_5200, obj_t BgL_new1089z00_5201)
{
{ /* Llib/object.scm 255 */
{ 
 BgL_z62iozd2writezd2errorz62_bglt BgL_auxz00_13136;
{ /* Llib/object.scm 255 */
 BgL_z62iozd2writezd2errorz62_bglt BgL_new1089z00_7048;
{ /* Llib/object.scm 255 */
 bool_t BgL_test5110z00_13137;
{ /* Llib/object.scm 255 */
 obj_t BgL_classz00_7030;
BgL_classz00_7030 = BGl_z62iozd2writezd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1089z00_5201))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7031; long BgL_arg1816z00_7032;
BgL_arg1815z00_7031 = 
(BgL_objectz00_bglt)(BgL_new1089z00_5201); 
BgL_arg1816z00_7032 = 
BGL_CLASS_DEPTH(BgL_classz00_7030); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7033;
BgL_idxz00_7033 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7031); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7034;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7035;
BgL_arg1825z00_7035 = 
(BgL_idxz00_7033+BgL_arg1816z00_7032); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7036;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7037;
BgL_aux3193z00_7037 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7037))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7036 = BgL_aux3193z00_7037; }  else 
{ 
 obj_t BgL_auxz00_13148;
BgL_auxz00_13148 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7037); 
FAILURE(BgL_auxz00_13148,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5114z00_13152;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13153;
BgL_tmpz00_13153 = 
VECTOR_LENGTH(BgL_vectorz00_7036); 
BgL_test5114z00_13152 = 
BOUND_CHECK(BgL_arg1825z00_7035, BgL_tmpz00_13153); } 
if(BgL_test5114z00_13152)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7034 = 
VECTOR_REF(BgL_vectorz00_7036,BgL_arg1825z00_7035); }  else 
{ 
 obj_t BgL_auxz00_13157;
BgL_auxz00_13157 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7036, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7036)), 
(int)(BgL_arg1825z00_7035)); 
FAILURE(BgL_auxz00_13157,BFALSE,BFALSE);} } } } 
BgL_test5110z00_13137 = 
(BgL_arg1824z00_7034==BgL_classz00_7030); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7038;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7039;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7040; long BgL_arg1554z00_7041;
BgL_arg1552z00_7040 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7042;
BgL_arg1555z00_7042 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7031); 
BgL_arg1554z00_7041 = 
(BgL_arg1555z00_7042-OBJECT_TYPE); } 
BgL_oclassz00_7039 = 
VECTOR_REF(BgL_arg1552z00_7040,BgL_arg1554z00_7041); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7043;
BgL__ortest_1222z00_7043 = 
(BgL_classz00_7030==BgL_oclassz00_7039); 
if(BgL__ortest_1222z00_7043)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7038 = BgL__ortest_1222z00_7043; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7044;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7045;
BgL_arg1822z00_7045 = 
(BgL_oclassz00_7039); 
BgL_odepthz00_7044 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7045); } 
if(
(BgL_arg1816z00_7032<BgL_odepthz00_7044))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7046;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7047;
BgL_arg1821z00_7047 = 
(BgL_oclassz00_7039); 
BgL_arg1820z00_7046 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7047, BgL_arg1816z00_7032); } 
BgL_res2666z00_7038 = 
(BgL_arg1820z00_7046==BgL_classz00_7030); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7038 = ((bool_t)0); } } } } 
BgL_test5110z00_13137 = BgL_res2666z00_7038; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5110z00_13137 = ((bool_t)0)
; } } 
if(BgL_test5110z00_13137)
{ /* Llib/object.scm 255 */
BgL_new1089z00_7048 = 
((BgL_z62iozd2writezd2errorz62_bglt)BgL_new1089z00_5201); }  else 
{ 
 obj_t BgL_auxz00_13179;
BgL_auxz00_13179 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9059L), BGl_string3883z00zz__objectz00, BGl_string3769z00zz__objectz00, BgL_new1089z00_5201); 
FAILURE(BgL_auxz00_13179,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1089z00_7048)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1089z00_7048)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1089z00_7048)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1089z00_7048)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1089z00_7048)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1089z00_7048)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13136 = BgL_new1089z00_7048; } 
return 
((obj_t)BgL_auxz00_13136);} } 

}



/* &lambda2019 */
BgL_z62iozd2writezd2errorz62_bglt BGl_z62lambda2019z62zz__objectz00(obj_t BgL_envz00_5202)
{
{ /* Llib/object.scm 255 */
{ /* Llib/object.scm 255 */
 BgL_z62iozd2writezd2errorz62_bglt BgL_new1088z00_7049;
BgL_new1088z00_7049 = 
((BgL_z62iozd2writezd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2writezd2errorz62_bgl) ))); 
{ /* Llib/object.scm 255 */
 long BgL_arg2020z00_7050;
BgL_arg2020z00_7050 = 
BGL_CLASS_NUM(BGl_z62iozd2writezd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1088z00_7049), BgL_arg2020z00_7050); } 
return BgL_new1088z00_7049;} } 

}



/* &lambda2017 */
BgL_z62iozd2writezd2errorz62_bglt BGl_z62lambda2017z62zz__objectz00(obj_t BgL_envz00_5203, obj_t BgL_fname1082z00_5204, obj_t BgL_location1083z00_5205, obj_t BgL_stack1084z00_5206, obj_t BgL_proc1085z00_5207, obj_t BgL_msg1086z00_5208, obj_t BgL_obj1087z00_5209)
{
{ /* Llib/object.scm 255 */
{ /* Llib/object.scm 255 */
 BgL_z62iozd2writezd2errorz62_bglt BgL_new1250z00_7051;
{ /* Llib/object.scm 255 */
 BgL_z62iozd2writezd2errorz62_bglt BgL_new1249z00_7052;
BgL_new1249z00_7052 = 
((BgL_z62iozd2writezd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2writezd2errorz62_bgl) ))); 
{ /* Llib/object.scm 255 */
 long BgL_arg2018z00_7053;
BgL_arg2018z00_7053 = 
BGL_CLASS_NUM(BGl_z62iozd2writezd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1249z00_7052), BgL_arg2018z00_7053); } 
BgL_new1250z00_7051 = BgL_new1249z00_7052; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1250z00_7051)))->BgL_fnamez00)=((obj_t)BgL_fname1082z00_5204),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1250z00_7051)))->BgL_locationz00)=((obj_t)BgL_location1083z00_5205),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1250z00_7051)))->BgL_stackz00)=((obj_t)BgL_stack1084z00_5206),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1250z00_7051)))->BgL_procz00)=((obj_t)BgL_proc1085z00_5207),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1250z00_7051)))->BgL_msgz00)=((obj_t)BgL_msg1086z00_5208),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1250z00_7051)))->BgL_objz00)=((obj_t)BgL_obj1087z00_5209),BUNSPEC); 
return BgL_new1250z00_7051;} } 

}



/* &<@anonymous:2008> */
obj_t BGl_z62zc3z04anonymousza32008ze3ze5zz__objectz00(obj_t BgL_envz00_5210, obj_t BgL_new1080z00_5211)
{
{ /* Llib/object.scm 254 */
{ 
 BgL_z62iozd2readzd2errorz62_bglt BgL_auxz00_13216;
{ /* Llib/object.scm 254 */
 BgL_z62iozd2readzd2errorz62_bglt BgL_new1080z00_7072;
{ /* Llib/object.scm 254 */
 bool_t BgL_test5117z00_13217;
{ /* Llib/object.scm 254 */
 obj_t BgL_classz00_7054;
BgL_classz00_7054 = BGl_z62iozd2readzd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1080z00_5211))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7055; long BgL_arg1816z00_7056;
BgL_arg1815z00_7055 = 
(BgL_objectz00_bglt)(BgL_new1080z00_5211); 
BgL_arg1816z00_7056 = 
BGL_CLASS_DEPTH(BgL_classz00_7054); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7057;
BgL_idxz00_7057 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7055); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7058;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7059;
BgL_arg1825z00_7059 = 
(BgL_idxz00_7057+BgL_arg1816z00_7056); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7060;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7061;
BgL_aux3193z00_7061 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7061))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7060 = BgL_aux3193z00_7061; }  else 
{ 
 obj_t BgL_auxz00_13228;
BgL_auxz00_13228 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7061); 
FAILURE(BgL_auxz00_13228,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5121z00_13232;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13233;
BgL_tmpz00_13233 = 
VECTOR_LENGTH(BgL_vectorz00_7060); 
BgL_test5121z00_13232 = 
BOUND_CHECK(BgL_arg1825z00_7059, BgL_tmpz00_13233); } 
if(BgL_test5121z00_13232)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7058 = 
VECTOR_REF(BgL_vectorz00_7060,BgL_arg1825z00_7059); }  else 
{ 
 obj_t BgL_auxz00_13237;
BgL_auxz00_13237 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7060, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7060)), 
(int)(BgL_arg1825z00_7059)); 
FAILURE(BgL_auxz00_13237,BFALSE,BFALSE);} } } } 
BgL_test5117z00_13217 = 
(BgL_arg1824z00_7058==BgL_classz00_7054); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7062;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7063;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7064; long BgL_arg1554z00_7065;
BgL_arg1552z00_7064 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7066;
BgL_arg1555z00_7066 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7055); 
BgL_arg1554z00_7065 = 
(BgL_arg1555z00_7066-OBJECT_TYPE); } 
BgL_oclassz00_7063 = 
VECTOR_REF(BgL_arg1552z00_7064,BgL_arg1554z00_7065); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7067;
BgL__ortest_1222z00_7067 = 
(BgL_classz00_7054==BgL_oclassz00_7063); 
if(BgL__ortest_1222z00_7067)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7062 = BgL__ortest_1222z00_7067; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7068;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7069;
BgL_arg1822z00_7069 = 
(BgL_oclassz00_7063); 
BgL_odepthz00_7068 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7069); } 
if(
(BgL_arg1816z00_7056<BgL_odepthz00_7068))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7070;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7071;
BgL_arg1821z00_7071 = 
(BgL_oclassz00_7063); 
BgL_arg1820z00_7070 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7071, BgL_arg1816z00_7056); } 
BgL_res2666z00_7062 = 
(BgL_arg1820z00_7070==BgL_classz00_7054); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7062 = ((bool_t)0); } } } } 
BgL_test5117z00_13217 = BgL_res2666z00_7062; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5117z00_13217 = ((bool_t)0)
; } } 
if(BgL_test5117z00_13217)
{ /* Llib/object.scm 254 */
BgL_new1080z00_7072 = 
((BgL_z62iozd2readzd2errorz62_bglt)BgL_new1080z00_5211); }  else 
{ 
 obj_t BgL_auxz00_13259;
BgL_auxz00_13259 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(9015L), BGl_string3884z00zz__objectz00, BGl_string3764z00zz__objectz00, BgL_new1080z00_5211); 
FAILURE(BgL_auxz00_13259,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1080z00_7072)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1080z00_7072)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1080z00_7072)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1080z00_7072)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1080z00_7072)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1080z00_7072)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13216 = BgL_new1080z00_7072; } 
return 
((obj_t)BgL_auxz00_13216);} } 

}



/* &lambda2006 */
BgL_z62iozd2readzd2errorz62_bglt BGl_z62lambda2006z62zz__objectz00(obj_t BgL_envz00_5212)
{
{ /* Llib/object.scm 254 */
{ /* Llib/object.scm 254 */
 BgL_z62iozd2readzd2errorz62_bglt BgL_new1079z00_7073;
BgL_new1079z00_7073 = 
((BgL_z62iozd2readzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2readzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 254 */
 long BgL_arg2007z00_7074;
BgL_arg2007z00_7074 = 
BGL_CLASS_NUM(BGl_z62iozd2readzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1079z00_7073), BgL_arg2007z00_7074); } 
return BgL_new1079z00_7073;} } 

}



/* &lambda2004 */
BgL_z62iozd2readzd2errorz62_bglt BGl_z62lambda2004z62zz__objectz00(obj_t BgL_envz00_5213, obj_t BgL_fname1073z00_5214, obj_t BgL_location1074z00_5215, obj_t BgL_stack1075z00_5216, obj_t BgL_proc1076z00_5217, obj_t BgL_msg1077z00_5218, obj_t BgL_obj1078z00_5219)
{
{ /* Llib/object.scm 254 */
{ /* Llib/object.scm 254 */
 BgL_z62iozd2readzd2errorz62_bglt BgL_new1248z00_7075;
{ /* Llib/object.scm 254 */
 BgL_z62iozd2readzd2errorz62_bglt BgL_new1245z00_7076;
BgL_new1245z00_7076 = 
((BgL_z62iozd2readzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2readzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 254 */
 long BgL_arg2005z00_7077;
BgL_arg2005z00_7077 = 
BGL_CLASS_NUM(BGl_z62iozd2readzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1245z00_7076), BgL_arg2005z00_7077); } 
BgL_new1248z00_7075 = BgL_new1245z00_7076; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1248z00_7075)))->BgL_fnamez00)=((obj_t)BgL_fname1073z00_5214),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1248z00_7075)))->BgL_locationz00)=((obj_t)BgL_location1074z00_5215),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1248z00_7075)))->BgL_stackz00)=((obj_t)BgL_stack1075z00_5216),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1248z00_7075)))->BgL_procz00)=((obj_t)BgL_proc1076z00_5217),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1248z00_7075)))->BgL_msgz00)=((obj_t)BgL_msg1077z00_5218),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1248z00_7075)))->BgL_objz00)=((obj_t)BgL_obj1078z00_5219),BUNSPEC); 
return BgL_new1248z00_7075;} } 

}



/* &<@anonymous:1996> */
obj_t BGl_z62zc3z04anonymousza31996ze3ze5zz__objectz00(obj_t BgL_envz00_5220, obj_t BgL_new1071z00_5221)
{
{ /* Llib/object.scm 253 */
{ 
 BgL_z62iozd2portzd2errorz62_bglt BgL_auxz00_13296;
{ /* Llib/object.scm 253 */
 BgL_z62iozd2portzd2errorz62_bglt BgL_new1071z00_7096;
{ /* Llib/object.scm 253 */
 bool_t BgL_test5124z00_13297;
{ /* Llib/object.scm 253 */
 obj_t BgL_classz00_7078;
BgL_classz00_7078 = BGl_z62iozd2portzd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1071z00_5221))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7079; long BgL_arg1816z00_7080;
BgL_arg1815z00_7079 = 
(BgL_objectz00_bglt)(BgL_new1071z00_5221); 
BgL_arg1816z00_7080 = 
BGL_CLASS_DEPTH(BgL_classz00_7078); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7081;
BgL_idxz00_7081 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7079); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7082;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7083;
BgL_arg1825z00_7083 = 
(BgL_idxz00_7081+BgL_arg1816z00_7080); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7084;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7085;
BgL_aux3193z00_7085 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7085))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7084 = BgL_aux3193z00_7085; }  else 
{ 
 obj_t BgL_auxz00_13308;
BgL_auxz00_13308 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7085); 
FAILURE(BgL_auxz00_13308,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5128z00_13312;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13313;
BgL_tmpz00_13313 = 
VECTOR_LENGTH(BgL_vectorz00_7084); 
BgL_test5128z00_13312 = 
BOUND_CHECK(BgL_arg1825z00_7083, BgL_tmpz00_13313); } 
if(BgL_test5128z00_13312)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7082 = 
VECTOR_REF(BgL_vectorz00_7084,BgL_arg1825z00_7083); }  else 
{ 
 obj_t BgL_auxz00_13317;
BgL_auxz00_13317 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7084, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7084)), 
(int)(BgL_arg1825z00_7083)); 
FAILURE(BgL_auxz00_13317,BFALSE,BFALSE);} } } } 
BgL_test5124z00_13297 = 
(BgL_arg1824z00_7082==BgL_classz00_7078); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7086;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7087;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7088; long BgL_arg1554z00_7089;
BgL_arg1552z00_7088 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7090;
BgL_arg1555z00_7090 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7079); 
BgL_arg1554z00_7089 = 
(BgL_arg1555z00_7090-OBJECT_TYPE); } 
BgL_oclassz00_7087 = 
VECTOR_REF(BgL_arg1552z00_7088,BgL_arg1554z00_7089); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7091;
BgL__ortest_1222z00_7091 = 
(BgL_classz00_7078==BgL_oclassz00_7087); 
if(BgL__ortest_1222z00_7091)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7086 = BgL__ortest_1222z00_7091; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7092;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7093;
BgL_arg1822z00_7093 = 
(BgL_oclassz00_7087); 
BgL_odepthz00_7092 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7093); } 
if(
(BgL_arg1816z00_7080<BgL_odepthz00_7092))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7094;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7095;
BgL_arg1821z00_7095 = 
(BgL_oclassz00_7087); 
BgL_arg1820z00_7094 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7095, BgL_arg1816z00_7080); } 
BgL_res2666z00_7086 = 
(BgL_arg1820z00_7094==BgL_classz00_7078); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7086 = ((bool_t)0); } } } } 
BgL_test5124z00_13297 = BgL_res2666z00_7086; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5124z00_13297 = ((bool_t)0)
; } } 
if(BgL_test5124z00_13297)
{ /* Llib/object.scm 253 */
BgL_new1071z00_7096 = 
((BgL_z62iozd2portzd2errorz62_bglt)BgL_new1071z00_5221); }  else 
{ 
 obj_t BgL_auxz00_13339;
BgL_auxz00_13339 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8976L), BGl_string3885z00zz__objectz00, BGl_string3759z00zz__objectz00, BgL_new1071z00_5221); 
FAILURE(BgL_auxz00_13339,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1071z00_7096)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1071z00_7096)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1071z00_7096)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1071z00_7096)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1071z00_7096)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1071z00_7096)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13296 = BgL_new1071z00_7096; } 
return 
((obj_t)BgL_auxz00_13296);} } 

}



/* &lambda1994 */
BgL_z62iozd2portzd2errorz62_bglt BGl_z62lambda1994z62zz__objectz00(obj_t BgL_envz00_5222)
{
{ /* Llib/object.scm 253 */
{ /* Llib/object.scm 253 */
 BgL_z62iozd2portzd2errorz62_bglt BgL_new1070z00_7097;
BgL_new1070z00_7097 = 
((BgL_z62iozd2portzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2portzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 253 */
 long BgL_arg1995z00_7098;
BgL_arg1995z00_7098 = 
BGL_CLASS_NUM(BGl_z62iozd2portzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1070z00_7097), BgL_arg1995z00_7098); } 
return BgL_new1070z00_7097;} } 

}



/* &lambda1992 */
BgL_z62iozd2portzd2errorz62_bglt BGl_z62lambda1992z62zz__objectz00(obj_t BgL_envz00_5223, obj_t BgL_fname1064z00_5224, obj_t BgL_location1065z00_5225, obj_t BgL_stack1066z00_5226, obj_t BgL_proc1067z00_5227, obj_t BgL_msg1068z00_5228, obj_t BgL_obj1069z00_5229)
{
{ /* Llib/object.scm 253 */
{ /* Llib/object.scm 253 */
 BgL_z62iozd2portzd2errorz62_bglt BgL_new1244z00_7099;
{ /* Llib/object.scm 253 */
 BgL_z62iozd2portzd2errorz62_bglt BgL_new1243z00_7100;
BgL_new1243z00_7100 = 
((BgL_z62iozd2portzd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2portzd2errorz62_bgl) ))); 
{ /* Llib/object.scm 253 */
 long BgL_arg1993z00_7101;
BgL_arg1993z00_7101 = 
BGL_CLASS_NUM(BGl_z62iozd2portzd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1243z00_7100), BgL_arg1993z00_7101); } 
BgL_new1244z00_7099 = BgL_new1243z00_7100; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1244z00_7099)))->BgL_fnamez00)=((obj_t)BgL_fname1064z00_5224),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1244z00_7099)))->BgL_locationz00)=((obj_t)BgL_location1065z00_5225),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1244z00_7099)))->BgL_stackz00)=((obj_t)BgL_stack1066z00_5226),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1244z00_7099)))->BgL_procz00)=((obj_t)BgL_proc1067z00_5227),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1244z00_7099)))->BgL_msgz00)=((obj_t)BgL_msg1068z00_5228),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1244z00_7099)))->BgL_objz00)=((obj_t)BgL_obj1069z00_5229),BUNSPEC); 
return BgL_new1244z00_7099;} } 

}



/* &<@anonymous:1985> */
obj_t BGl_z62zc3z04anonymousza31985ze3ze5zz__objectz00(obj_t BgL_envz00_5230, obj_t BgL_new1062z00_5231)
{
{ /* Llib/object.scm 252 */
{ 
 BgL_z62iozd2errorzb0_bglt BgL_auxz00_13376;
{ /* Llib/object.scm 252 */
 BgL_z62iozd2errorzb0_bglt BgL_new1062z00_7120;
{ /* Llib/object.scm 252 */
 bool_t BgL_test5131z00_13377;
{ /* Llib/object.scm 252 */
 obj_t BgL_classz00_7102;
BgL_classz00_7102 = BGl_z62iozd2errorzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1062z00_5231))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7103; long BgL_arg1816z00_7104;
BgL_arg1815z00_7103 = 
(BgL_objectz00_bglt)(BgL_new1062z00_5231); 
BgL_arg1816z00_7104 = 
BGL_CLASS_DEPTH(BgL_classz00_7102); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7105;
BgL_idxz00_7105 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7103); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7106;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7107;
BgL_arg1825z00_7107 = 
(BgL_idxz00_7105+BgL_arg1816z00_7104); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7108;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7109;
BgL_aux3193z00_7109 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7109))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7108 = BgL_aux3193z00_7109; }  else 
{ 
 obj_t BgL_auxz00_13388;
BgL_auxz00_13388 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7109); 
FAILURE(BgL_auxz00_13388,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5135z00_13392;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13393;
BgL_tmpz00_13393 = 
VECTOR_LENGTH(BgL_vectorz00_7108); 
BgL_test5135z00_13392 = 
BOUND_CHECK(BgL_arg1825z00_7107, BgL_tmpz00_13393); } 
if(BgL_test5135z00_13392)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7106 = 
VECTOR_REF(BgL_vectorz00_7108,BgL_arg1825z00_7107); }  else 
{ 
 obj_t BgL_auxz00_13397;
BgL_auxz00_13397 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7108, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7108)), 
(int)(BgL_arg1825z00_7107)); 
FAILURE(BgL_auxz00_13397,BFALSE,BFALSE);} } } } 
BgL_test5131z00_13377 = 
(BgL_arg1824z00_7106==BgL_classz00_7102); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7110;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7111;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7112; long BgL_arg1554z00_7113;
BgL_arg1552z00_7112 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7114;
BgL_arg1555z00_7114 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7103); 
BgL_arg1554z00_7113 = 
(BgL_arg1555z00_7114-OBJECT_TYPE); } 
BgL_oclassz00_7111 = 
VECTOR_REF(BgL_arg1552z00_7112,BgL_arg1554z00_7113); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7115;
BgL__ortest_1222z00_7115 = 
(BgL_classz00_7102==BgL_oclassz00_7111); 
if(BgL__ortest_1222z00_7115)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7110 = BgL__ortest_1222z00_7115; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7116;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7117;
BgL_arg1822z00_7117 = 
(BgL_oclassz00_7111); 
BgL_odepthz00_7116 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7117); } 
if(
(BgL_arg1816z00_7104<BgL_odepthz00_7116))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7118;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7119;
BgL_arg1821z00_7119 = 
(BgL_oclassz00_7111); 
BgL_arg1820z00_7118 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7119, BgL_arg1816z00_7104); } 
BgL_res2666z00_7110 = 
(BgL_arg1820z00_7118==BgL_classz00_7102); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7110 = ((bool_t)0); } } } } 
BgL_test5131z00_13377 = BgL_res2666z00_7110; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5131z00_13377 = ((bool_t)0)
; } } 
if(BgL_test5131z00_13377)
{ /* Llib/object.scm 252 */
BgL_new1062z00_7120 = 
((BgL_z62iozd2errorzb0_bglt)BgL_new1062z00_5231); }  else 
{ 
 obj_t BgL_auxz00_13419;
BgL_auxz00_13419 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8945L), BGl_string3886z00zz__objectz00, BGl_string3754z00zz__objectz00, BgL_new1062z00_5231); 
FAILURE(BgL_auxz00_13419,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1062z00_7120)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1062z00_7120)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1062z00_7120)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1062z00_7120)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1062z00_7120)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1062z00_7120)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13376 = BgL_new1062z00_7120; } 
return 
((obj_t)BgL_auxz00_13376);} } 

}



/* &lambda1983 */
BgL_z62iozd2errorzb0_bglt BGl_z62lambda1983z62zz__objectz00(obj_t BgL_envz00_5232)
{
{ /* Llib/object.scm 252 */
{ /* Llib/object.scm 252 */
 BgL_z62iozd2errorzb0_bglt BgL_new1060z00_7121;
BgL_new1060z00_7121 = 
((BgL_z62iozd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 252 */
 long BgL_arg1984z00_7122;
BgL_arg1984z00_7122 = 
BGL_CLASS_NUM(BGl_z62iozd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1060z00_7121), BgL_arg1984z00_7122); } 
return BgL_new1060z00_7121;} } 

}



/* &lambda1981 */
BgL_z62iozd2errorzb0_bglt BGl_z62lambda1981z62zz__objectz00(obj_t BgL_envz00_5233, obj_t BgL_fname1054z00_5234, obj_t BgL_location1055z00_5235, obj_t BgL_stack1056z00_5236, obj_t BgL_proc1057z00_5237, obj_t BgL_msg1058z00_5238, obj_t BgL_obj1059z00_5239)
{
{ /* Llib/object.scm 252 */
{ /* Llib/object.scm 252 */
 BgL_z62iozd2errorzb0_bglt BgL_new1242z00_7123;
{ /* Llib/object.scm 252 */
 BgL_z62iozd2errorzb0_bglt BgL_new1241z00_7124;
BgL_new1241z00_7124 = 
((BgL_z62iozd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62iozd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 252 */
 long BgL_arg1982z00_7125;
BgL_arg1982z00_7125 = 
BGL_CLASS_NUM(BGl_z62iozd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1241z00_7124), BgL_arg1982z00_7125); } 
BgL_new1242z00_7123 = BgL_new1241z00_7124; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1242z00_7123)))->BgL_fnamez00)=((obj_t)BgL_fname1054z00_5234),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1242z00_7123)))->BgL_locationz00)=((obj_t)BgL_location1055z00_5235),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1242z00_7123)))->BgL_stackz00)=((obj_t)BgL_stack1056z00_5236),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1242z00_7123)))->BgL_procz00)=((obj_t)BgL_proc1057z00_5237),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1242z00_7123)))->BgL_msgz00)=((obj_t)BgL_msg1058z00_5238),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1242z00_7123)))->BgL_objz00)=((obj_t)BgL_obj1059z00_5239),BUNSPEC); 
return BgL_new1242z00_7123;} } 

}



/* &<@anonymous:1967> */
obj_t BGl_z62zc3z04anonymousza31967ze3ze5zz__objectz00(obj_t BgL_envz00_5240, obj_t BgL_new1052z00_5241)
{
{ /* Llib/object.scm 250 */
{ 
 BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BgL_auxz00_13456;
{ /* Llib/object.scm 250 */
 BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BgL_new1052z00_7144;
{ /* Llib/object.scm 250 */
 bool_t BgL_test5138z00_13457;
{ /* Llib/object.scm 250 */
 obj_t BgL_classz00_7126;
BgL_classz00_7126 = BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1052z00_5241))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7127; long BgL_arg1816z00_7128;
BgL_arg1815z00_7127 = 
(BgL_objectz00_bglt)(BgL_new1052z00_5241); 
BgL_arg1816z00_7128 = 
BGL_CLASS_DEPTH(BgL_classz00_7126); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7129;
BgL_idxz00_7129 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7127); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7130;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7131;
BgL_arg1825z00_7131 = 
(BgL_idxz00_7129+BgL_arg1816z00_7128); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7132;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7133;
BgL_aux3193z00_7133 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7133))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7132 = BgL_aux3193z00_7133; }  else 
{ 
 obj_t BgL_auxz00_13468;
BgL_auxz00_13468 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7133); 
FAILURE(BgL_auxz00_13468,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5142z00_13472;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13473;
BgL_tmpz00_13473 = 
VECTOR_LENGTH(BgL_vectorz00_7132); 
BgL_test5142z00_13472 = 
BOUND_CHECK(BgL_arg1825z00_7131, BgL_tmpz00_13473); } 
if(BgL_test5142z00_13472)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7130 = 
VECTOR_REF(BgL_vectorz00_7132,BgL_arg1825z00_7131); }  else 
{ 
 obj_t BgL_auxz00_13477;
BgL_auxz00_13477 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7132, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7132)), 
(int)(BgL_arg1825z00_7131)); 
FAILURE(BgL_auxz00_13477,BFALSE,BFALSE);} } } } 
BgL_test5138z00_13457 = 
(BgL_arg1824z00_7130==BgL_classz00_7126); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7134;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7135;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7136; long BgL_arg1554z00_7137;
BgL_arg1552z00_7136 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7138;
BgL_arg1555z00_7138 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7127); 
BgL_arg1554z00_7137 = 
(BgL_arg1555z00_7138-OBJECT_TYPE); } 
BgL_oclassz00_7135 = 
VECTOR_REF(BgL_arg1552z00_7136,BgL_arg1554z00_7137); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7139;
BgL__ortest_1222z00_7139 = 
(BgL_classz00_7126==BgL_oclassz00_7135); 
if(BgL__ortest_1222z00_7139)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7134 = BgL__ortest_1222z00_7139; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7140;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7141;
BgL_arg1822z00_7141 = 
(BgL_oclassz00_7135); 
BgL_odepthz00_7140 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7141); } 
if(
(BgL_arg1816z00_7128<BgL_odepthz00_7140))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7142;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7143;
BgL_arg1821z00_7143 = 
(BgL_oclassz00_7135); 
BgL_arg1820z00_7142 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7143, BgL_arg1816z00_7128); } 
BgL_res2666z00_7134 = 
(BgL_arg1820z00_7142==BgL_classz00_7126); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7134 = ((bool_t)0); } } } } 
BgL_test5138z00_13457 = BgL_res2666z00_7134; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5138z00_13457 = ((bool_t)0)
; } } 
if(BgL_test5138z00_13457)
{ /* Llib/object.scm 250 */
BgL_new1052z00_7144 = 
((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)BgL_new1052z00_5241); }  else 
{ 
 obj_t BgL_auxz00_13499;
BgL_auxz00_13499 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8871L), BGl_string3887z00zz__objectz00, BGl_string3749z00zz__objectz00, BgL_new1052z00_5241); 
FAILURE(BgL_auxz00_13499,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1052z00_7144)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1052z00_7144)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1052z00_7144)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1052z00_7144)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1052z00_7144)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1052z00_7144)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)COBJECT(BgL_new1052z00_7144))->BgL_indexz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13456 = BgL_new1052z00_7144; } 
return 
((obj_t)BgL_auxz00_13456);} } 

}



/* &lambda1965 */
BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BGl_z62lambda1965z62zz__objectz00(obj_t BgL_envz00_5242)
{
{ /* Llib/object.scm 250 */
{ /* Llib/object.scm 250 */
 BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BgL_new1051z00_7145;
BgL_new1051z00_7145 = 
((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bgl) ))); 
{ /* Llib/object.scm 250 */
 long BgL_arg1966z00_7146;
BgL_arg1966z00_7146 = 
BGL_CLASS_NUM(BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1051z00_7145), BgL_arg1966z00_7146); } 
return BgL_new1051z00_7145;} } 

}



/* &lambda1963 */
BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BGl_z62lambda1963z62zz__objectz00(obj_t BgL_envz00_5243, obj_t BgL_fname1044z00_5244, obj_t BgL_location1045z00_5245, obj_t BgL_stack1046z00_5246, obj_t BgL_proc1047z00_5247, obj_t BgL_msg1048z00_5248, obj_t BgL_obj1049z00_5249, obj_t BgL_index1050z00_5250)
{
{ /* Llib/object.scm 250 */
{ /* Llib/object.scm 250 */
 BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BgL_new1240z00_7147;
{ /* Llib/object.scm 250 */
 BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BgL_new1239z00_7148;
BgL_new1239z00_7148 = 
((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bgl) ))); 
{ /* Llib/object.scm 250 */
 long BgL_arg1964z00_7149;
BgL_arg1964z00_7149 = 
BGL_CLASS_NUM(BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1239z00_7148), BgL_arg1964z00_7149); } 
BgL_new1240z00_7147 = BgL_new1239z00_7148; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1240z00_7147)))->BgL_fnamez00)=((obj_t)BgL_fname1044z00_5244),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1240z00_7147)))->BgL_locationz00)=((obj_t)BgL_location1045z00_5245),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1240z00_7147)))->BgL_stackz00)=((obj_t)BgL_stack1046z00_5246),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1240z00_7147)))->BgL_procz00)=((obj_t)BgL_proc1047z00_5247),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1240z00_7147)))->BgL_msgz00)=((obj_t)BgL_msg1048z00_5248),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1240z00_7147)))->BgL_objz00)=((obj_t)BgL_obj1049z00_5249),BUNSPEC); 
((((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)COBJECT(BgL_new1240z00_7147))->BgL_indexz00)=((obj_t)BgL_index1050z00_5250),BUNSPEC); 
return BgL_new1240z00_7147;} } 

}



/* &lambda1972 */
obj_t BGl_z62lambda1972z62zz__objectz00(obj_t BgL_envz00_5251, obj_t BgL_oz00_5252, obj_t BgL_vz00_5253)
{
{ /* Llib/object.scm 250 */
{ /* Llib/object.scm 250 */
 BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BgL_oz00_7168;
{ /* Llib/object.scm 250 */
 bool_t BgL_test5145z00_13538;
{ /* Llib/object.scm 250 */
 obj_t BgL_classz00_7150;
BgL_classz00_7150 = BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5252))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7151; long BgL_arg1816z00_7152;
BgL_arg1815z00_7151 = 
(BgL_objectz00_bglt)(BgL_oz00_5252); 
BgL_arg1816z00_7152 = 
BGL_CLASS_DEPTH(BgL_classz00_7150); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7153;
BgL_idxz00_7153 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7151); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7154;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7155;
BgL_arg1825z00_7155 = 
(BgL_idxz00_7153+BgL_arg1816z00_7152); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7156;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7157;
BgL_aux3193z00_7157 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7157))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7156 = BgL_aux3193z00_7157; }  else 
{ 
 obj_t BgL_auxz00_13549;
BgL_auxz00_13549 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7157); 
FAILURE(BgL_auxz00_13549,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5149z00_13553;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13554;
BgL_tmpz00_13554 = 
VECTOR_LENGTH(BgL_vectorz00_7156); 
BgL_test5149z00_13553 = 
BOUND_CHECK(BgL_arg1825z00_7155, BgL_tmpz00_13554); } 
if(BgL_test5149z00_13553)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7154 = 
VECTOR_REF(BgL_vectorz00_7156,BgL_arg1825z00_7155); }  else 
{ 
 obj_t BgL_auxz00_13558;
BgL_auxz00_13558 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7156, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7156)), 
(int)(BgL_arg1825z00_7155)); 
FAILURE(BgL_auxz00_13558,BFALSE,BFALSE);} } } } 
BgL_test5145z00_13538 = 
(BgL_arg1824z00_7154==BgL_classz00_7150); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7158;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7159;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7160; long BgL_arg1554z00_7161;
BgL_arg1552z00_7160 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7162;
BgL_arg1555z00_7162 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7151); 
BgL_arg1554z00_7161 = 
(BgL_arg1555z00_7162-OBJECT_TYPE); } 
BgL_oclassz00_7159 = 
VECTOR_REF(BgL_arg1552z00_7160,BgL_arg1554z00_7161); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7163;
BgL__ortest_1222z00_7163 = 
(BgL_classz00_7150==BgL_oclassz00_7159); 
if(BgL__ortest_1222z00_7163)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7158 = BgL__ortest_1222z00_7163; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7164;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7165;
BgL_arg1822z00_7165 = 
(BgL_oclassz00_7159); 
BgL_odepthz00_7164 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7165); } 
if(
(BgL_arg1816z00_7152<BgL_odepthz00_7164))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7166;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7167;
BgL_arg1821z00_7167 = 
(BgL_oclassz00_7159); 
BgL_arg1820z00_7166 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7167, BgL_arg1816z00_7152); } 
BgL_res2666z00_7158 = 
(BgL_arg1820z00_7166==BgL_classz00_7150); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7158 = ((bool_t)0); } } } } 
BgL_test5145z00_13538 = BgL_res2666z00_7158; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5145z00_13538 = ((bool_t)0)
; } } 
if(BgL_test5145z00_13538)
{ /* Llib/object.scm 250 */
BgL_oz00_7168 = 
((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)BgL_oz00_5252); }  else 
{ 
 obj_t BgL_auxz00_13580;
BgL_auxz00_13580 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8871L), BGl_string3888z00zz__objectz00, BGl_string3749z00zz__objectz00, BgL_oz00_5252); 
FAILURE(BgL_auxz00_13580,BFALSE,BFALSE);} } 
return 
((((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)COBJECT(BgL_oz00_7168))->BgL_indexz00)=((obj_t)BgL_vz00_5253),BUNSPEC);} } 

}



/* &lambda1971 */
obj_t BGl_z62lambda1971z62zz__objectz00(obj_t BgL_envz00_5254, obj_t BgL_oz00_5255)
{
{ /* Llib/object.scm 250 */
{ /* Llib/object.scm 250 */
 BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt BgL_oz00_7187;
{ /* Llib/object.scm 250 */
 bool_t BgL_test5152z00_13585;
{ /* Llib/object.scm 250 */
 obj_t BgL_classz00_7169;
BgL_classz00_7169 = BGl_z62indexzd2outzd2ofzd2boundszd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5255))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7170; long BgL_arg1816z00_7171;
BgL_arg1815z00_7170 = 
(BgL_objectz00_bglt)(BgL_oz00_5255); 
BgL_arg1816z00_7171 = 
BGL_CLASS_DEPTH(BgL_classz00_7169); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7172;
BgL_idxz00_7172 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7170); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7173;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7174;
BgL_arg1825z00_7174 = 
(BgL_idxz00_7172+BgL_arg1816z00_7171); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7175;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7176;
BgL_aux3193z00_7176 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7176))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7175 = BgL_aux3193z00_7176; }  else 
{ 
 obj_t BgL_auxz00_13596;
BgL_auxz00_13596 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7176); 
FAILURE(BgL_auxz00_13596,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5156z00_13600;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13601;
BgL_tmpz00_13601 = 
VECTOR_LENGTH(BgL_vectorz00_7175); 
BgL_test5156z00_13600 = 
BOUND_CHECK(BgL_arg1825z00_7174, BgL_tmpz00_13601); } 
if(BgL_test5156z00_13600)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7173 = 
VECTOR_REF(BgL_vectorz00_7175,BgL_arg1825z00_7174); }  else 
{ 
 obj_t BgL_auxz00_13605;
BgL_auxz00_13605 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7175, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7175)), 
(int)(BgL_arg1825z00_7174)); 
FAILURE(BgL_auxz00_13605,BFALSE,BFALSE);} } } } 
BgL_test5152z00_13585 = 
(BgL_arg1824z00_7173==BgL_classz00_7169); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7177;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7178;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7179; long BgL_arg1554z00_7180;
BgL_arg1552z00_7179 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7181;
BgL_arg1555z00_7181 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7170); 
BgL_arg1554z00_7180 = 
(BgL_arg1555z00_7181-OBJECT_TYPE); } 
BgL_oclassz00_7178 = 
VECTOR_REF(BgL_arg1552z00_7179,BgL_arg1554z00_7180); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7182;
BgL__ortest_1222z00_7182 = 
(BgL_classz00_7169==BgL_oclassz00_7178); 
if(BgL__ortest_1222z00_7182)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7177 = BgL__ortest_1222z00_7182; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7183;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7184;
BgL_arg1822z00_7184 = 
(BgL_oclassz00_7178); 
BgL_odepthz00_7183 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7184); } 
if(
(BgL_arg1816z00_7171<BgL_odepthz00_7183))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7185;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7186;
BgL_arg1821z00_7186 = 
(BgL_oclassz00_7178); 
BgL_arg1820z00_7185 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7186, BgL_arg1816z00_7171); } 
BgL_res2666z00_7177 = 
(BgL_arg1820z00_7185==BgL_classz00_7169); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7177 = ((bool_t)0); } } } } 
BgL_test5152z00_13585 = BgL_res2666z00_7177; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5152z00_13585 = ((bool_t)0)
; } } 
if(BgL_test5152z00_13585)
{ /* Llib/object.scm 250 */
BgL_oz00_7187 = 
((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)BgL_oz00_5255); }  else 
{ 
 obj_t BgL_auxz00_13627;
BgL_auxz00_13627 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8871L), BGl_string3889z00zz__objectz00, BGl_string3749z00zz__objectz00, BgL_oz00_5255); 
FAILURE(BgL_auxz00_13627,BFALSE,BFALSE);} } 
return 
(((BgL_z62indexzd2outzd2ofzd2boundszd2errorz62_bglt)COBJECT(BgL_oz00_7187))->BgL_indexz00);} } 

}



/* &<@anonymous:1949> */
obj_t BGl_z62zc3z04anonymousza31949ze3ze5zz__objectz00(obj_t BgL_envz00_5256, obj_t BgL_new1042z00_5257)
{
{ /* Llib/object.scm 248 */
{ 
 BgL_z62typezd2errorzb0_bglt BgL_auxz00_13632;
{ /* Llib/object.scm 248 */
 BgL_z62typezd2errorzb0_bglt BgL_new1042z00_7206;
{ /* Llib/object.scm 248 */
 bool_t BgL_test5159z00_13633;
{ /* Llib/object.scm 248 */
 obj_t BgL_classz00_7188;
BgL_classz00_7188 = BGl_z62typezd2errorzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1042z00_5257))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7189; long BgL_arg1816z00_7190;
BgL_arg1815z00_7189 = 
(BgL_objectz00_bglt)(BgL_new1042z00_5257); 
BgL_arg1816z00_7190 = 
BGL_CLASS_DEPTH(BgL_classz00_7188); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7191;
BgL_idxz00_7191 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7189); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7192;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7193;
BgL_arg1825z00_7193 = 
(BgL_idxz00_7191+BgL_arg1816z00_7190); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7194;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7195;
BgL_aux3193z00_7195 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7195))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7194 = BgL_aux3193z00_7195; }  else 
{ 
 obj_t BgL_auxz00_13644;
BgL_auxz00_13644 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7195); 
FAILURE(BgL_auxz00_13644,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5163z00_13648;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13649;
BgL_tmpz00_13649 = 
VECTOR_LENGTH(BgL_vectorz00_7194); 
BgL_test5163z00_13648 = 
BOUND_CHECK(BgL_arg1825z00_7193, BgL_tmpz00_13649); } 
if(BgL_test5163z00_13648)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7192 = 
VECTOR_REF(BgL_vectorz00_7194,BgL_arg1825z00_7193); }  else 
{ 
 obj_t BgL_auxz00_13653;
BgL_auxz00_13653 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7194, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7194)), 
(int)(BgL_arg1825z00_7193)); 
FAILURE(BgL_auxz00_13653,BFALSE,BFALSE);} } } } 
BgL_test5159z00_13633 = 
(BgL_arg1824z00_7192==BgL_classz00_7188); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7196;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7197;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7198; long BgL_arg1554z00_7199;
BgL_arg1552z00_7198 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7200;
BgL_arg1555z00_7200 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7189); 
BgL_arg1554z00_7199 = 
(BgL_arg1555z00_7200-OBJECT_TYPE); } 
BgL_oclassz00_7197 = 
VECTOR_REF(BgL_arg1552z00_7198,BgL_arg1554z00_7199); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7201;
BgL__ortest_1222z00_7201 = 
(BgL_classz00_7188==BgL_oclassz00_7197); 
if(BgL__ortest_1222z00_7201)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7196 = BgL__ortest_1222z00_7201; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7202;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7203;
BgL_arg1822z00_7203 = 
(BgL_oclassz00_7197); 
BgL_odepthz00_7202 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7203); } 
if(
(BgL_arg1816z00_7190<BgL_odepthz00_7202))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7204;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7205;
BgL_arg1821z00_7205 = 
(BgL_oclassz00_7197); 
BgL_arg1820z00_7204 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7205, BgL_arg1816z00_7190); } 
BgL_res2666z00_7196 = 
(BgL_arg1820z00_7204==BgL_classz00_7188); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7196 = ((bool_t)0); } } } } 
BgL_test5159z00_13633 = BgL_res2666z00_7196; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5159z00_13633 = ((bool_t)0)
; } } 
if(BgL_test5159z00_13633)
{ /* Llib/object.scm 248 */
BgL_new1042z00_7206 = 
((BgL_z62typezd2errorzb0_bglt)BgL_new1042z00_5257); }  else 
{ 
 obj_t BgL_auxz00_13675;
BgL_auxz00_13675 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8813L), BGl_string3890z00zz__objectz00, BGl_string3740z00zz__objectz00, BgL_new1042z00_5257); 
FAILURE(BgL_auxz00_13675,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1042z00_7206)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1042z00_7206)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1042z00_7206)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1042z00_7206)))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1042z00_7206)))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1042z00_7206)))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62typezd2errorzb0_bglt)COBJECT(BgL_new1042z00_7206))->BgL_typez00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13632 = BgL_new1042z00_7206; } 
return 
((obj_t)BgL_auxz00_13632);} } 

}



/* &lambda1947 */
BgL_z62typezd2errorzb0_bglt BGl_z62lambda1947z62zz__objectz00(obj_t BgL_envz00_5258)
{
{ /* Llib/object.scm 248 */
{ /* Llib/object.scm 248 */
 BgL_z62typezd2errorzb0_bglt BgL_new1041z00_7207;
BgL_new1041z00_7207 = 
((BgL_z62typezd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62typezd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 248 */
 long BgL_arg1948z00_7208;
BgL_arg1948z00_7208 = 
BGL_CLASS_NUM(BGl_z62typezd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1041z00_7207), BgL_arg1948z00_7208); } 
return BgL_new1041z00_7207;} } 

}



/* &lambda1945 */
BgL_z62typezd2errorzb0_bglt BGl_z62lambda1945z62zz__objectz00(obj_t BgL_envz00_5259, obj_t BgL_fname1034z00_5260, obj_t BgL_location1035z00_5261, obj_t BgL_stack1036z00_5262, obj_t BgL_proc1037z00_5263, obj_t BgL_msg1038z00_5264, obj_t BgL_obj1039z00_5265, obj_t BgL_type1040z00_5266)
{
{ /* Llib/object.scm 248 */
{ /* Llib/object.scm 248 */
 BgL_z62typezd2errorzb0_bglt BgL_new1238z00_7209;
{ /* Llib/object.scm 248 */
 BgL_z62typezd2errorzb0_bglt BgL_new1237z00_7210;
BgL_new1237z00_7210 = 
((BgL_z62typezd2errorzb0_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62typezd2errorzb0_bgl) ))); 
{ /* Llib/object.scm 248 */
 long BgL_arg1946z00_7211;
BgL_arg1946z00_7211 = 
BGL_CLASS_NUM(BGl_z62typezd2errorzb0zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1237z00_7210), BgL_arg1946z00_7211); } 
BgL_new1238z00_7209 = BgL_new1237z00_7210; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1238z00_7209)))->BgL_fnamez00)=((obj_t)BgL_fname1034z00_5260),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1238z00_7209)))->BgL_locationz00)=((obj_t)BgL_location1035z00_5261),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1238z00_7209)))->BgL_stackz00)=((obj_t)BgL_stack1036z00_5262),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1238z00_7209)))->BgL_procz00)=((obj_t)BgL_proc1037z00_5263),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1238z00_7209)))->BgL_msgz00)=((obj_t)BgL_msg1038z00_5264),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_new1238z00_7209)))->BgL_objz00)=((obj_t)BgL_obj1039z00_5265),BUNSPEC); 
((((BgL_z62typezd2errorzb0_bglt)COBJECT(BgL_new1238z00_7209))->BgL_typez00)=((obj_t)BgL_type1040z00_5266),BUNSPEC); 
return BgL_new1238z00_7209;} } 

}



/* &lambda1956 */
obj_t BGl_z62lambda1956z62zz__objectz00(obj_t BgL_envz00_5267, obj_t BgL_oz00_5268, obj_t BgL_vz00_5269)
{
{ /* Llib/object.scm 248 */
{ /* Llib/object.scm 248 */
 BgL_z62typezd2errorzb0_bglt BgL_oz00_7230;
{ /* Llib/object.scm 248 */
 bool_t BgL_test5166z00_13714;
{ /* Llib/object.scm 248 */
 obj_t BgL_classz00_7212;
BgL_classz00_7212 = BGl_z62typezd2errorzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5268))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7213; long BgL_arg1816z00_7214;
BgL_arg1815z00_7213 = 
(BgL_objectz00_bglt)(BgL_oz00_5268); 
BgL_arg1816z00_7214 = 
BGL_CLASS_DEPTH(BgL_classz00_7212); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7215;
BgL_idxz00_7215 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7213); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7216;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7217;
BgL_arg1825z00_7217 = 
(BgL_idxz00_7215+BgL_arg1816z00_7214); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7218;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7219;
BgL_aux3193z00_7219 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7219))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7218 = BgL_aux3193z00_7219; }  else 
{ 
 obj_t BgL_auxz00_13725;
BgL_auxz00_13725 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7219); 
FAILURE(BgL_auxz00_13725,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5170z00_13729;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13730;
BgL_tmpz00_13730 = 
VECTOR_LENGTH(BgL_vectorz00_7218); 
BgL_test5170z00_13729 = 
BOUND_CHECK(BgL_arg1825z00_7217, BgL_tmpz00_13730); } 
if(BgL_test5170z00_13729)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7216 = 
VECTOR_REF(BgL_vectorz00_7218,BgL_arg1825z00_7217); }  else 
{ 
 obj_t BgL_auxz00_13734;
BgL_auxz00_13734 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7218, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7218)), 
(int)(BgL_arg1825z00_7217)); 
FAILURE(BgL_auxz00_13734,BFALSE,BFALSE);} } } } 
BgL_test5166z00_13714 = 
(BgL_arg1824z00_7216==BgL_classz00_7212); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7220;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7221;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7222; long BgL_arg1554z00_7223;
BgL_arg1552z00_7222 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7224;
BgL_arg1555z00_7224 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7213); 
BgL_arg1554z00_7223 = 
(BgL_arg1555z00_7224-OBJECT_TYPE); } 
BgL_oclassz00_7221 = 
VECTOR_REF(BgL_arg1552z00_7222,BgL_arg1554z00_7223); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7225;
BgL__ortest_1222z00_7225 = 
(BgL_classz00_7212==BgL_oclassz00_7221); 
if(BgL__ortest_1222z00_7225)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7220 = BgL__ortest_1222z00_7225; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7226;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7227;
BgL_arg1822z00_7227 = 
(BgL_oclassz00_7221); 
BgL_odepthz00_7226 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7227); } 
if(
(BgL_arg1816z00_7214<BgL_odepthz00_7226))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7228;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7229;
BgL_arg1821z00_7229 = 
(BgL_oclassz00_7221); 
BgL_arg1820z00_7228 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7229, BgL_arg1816z00_7214); } 
BgL_res2666z00_7220 = 
(BgL_arg1820z00_7228==BgL_classz00_7212); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7220 = ((bool_t)0); } } } } 
BgL_test5166z00_13714 = BgL_res2666z00_7220; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5166z00_13714 = ((bool_t)0)
; } } 
if(BgL_test5166z00_13714)
{ /* Llib/object.scm 248 */
BgL_oz00_7230 = 
((BgL_z62typezd2errorzb0_bglt)BgL_oz00_5268); }  else 
{ 
 obj_t BgL_auxz00_13756;
BgL_auxz00_13756 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8813L), BGl_string3891z00zz__objectz00, BGl_string3740z00zz__objectz00, BgL_oz00_5268); 
FAILURE(BgL_auxz00_13756,BFALSE,BFALSE);} } 
return 
((((BgL_z62typezd2errorzb0_bglt)COBJECT(BgL_oz00_7230))->BgL_typez00)=((obj_t)BgL_vz00_5269),BUNSPEC);} } 

}



/* &lambda1955 */
obj_t BGl_z62lambda1955z62zz__objectz00(obj_t BgL_envz00_5270, obj_t BgL_oz00_5271)
{
{ /* Llib/object.scm 248 */
{ /* Llib/object.scm 248 */
 BgL_z62typezd2errorzb0_bglt BgL_oz00_7249;
{ /* Llib/object.scm 248 */
 bool_t BgL_test5173z00_13761;
{ /* Llib/object.scm 248 */
 obj_t BgL_classz00_7231;
BgL_classz00_7231 = BGl_z62typezd2errorzb0zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5271))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7232; long BgL_arg1816z00_7233;
BgL_arg1815z00_7232 = 
(BgL_objectz00_bglt)(BgL_oz00_5271); 
BgL_arg1816z00_7233 = 
BGL_CLASS_DEPTH(BgL_classz00_7231); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7234;
BgL_idxz00_7234 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7232); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7235;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7236;
BgL_arg1825z00_7236 = 
(BgL_idxz00_7234+BgL_arg1816z00_7233); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7237;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7238;
BgL_aux3193z00_7238 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7238))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7237 = BgL_aux3193z00_7238; }  else 
{ 
 obj_t BgL_auxz00_13772;
BgL_auxz00_13772 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7238); 
FAILURE(BgL_auxz00_13772,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5177z00_13776;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13777;
BgL_tmpz00_13777 = 
VECTOR_LENGTH(BgL_vectorz00_7237); 
BgL_test5177z00_13776 = 
BOUND_CHECK(BgL_arg1825z00_7236, BgL_tmpz00_13777); } 
if(BgL_test5177z00_13776)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7235 = 
VECTOR_REF(BgL_vectorz00_7237,BgL_arg1825z00_7236); }  else 
{ 
 obj_t BgL_auxz00_13781;
BgL_auxz00_13781 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7237, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7237)), 
(int)(BgL_arg1825z00_7236)); 
FAILURE(BgL_auxz00_13781,BFALSE,BFALSE);} } } } 
BgL_test5173z00_13761 = 
(BgL_arg1824z00_7235==BgL_classz00_7231); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7239;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7240;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7241; long BgL_arg1554z00_7242;
BgL_arg1552z00_7241 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7243;
BgL_arg1555z00_7243 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7232); 
BgL_arg1554z00_7242 = 
(BgL_arg1555z00_7243-OBJECT_TYPE); } 
BgL_oclassz00_7240 = 
VECTOR_REF(BgL_arg1552z00_7241,BgL_arg1554z00_7242); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7244;
BgL__ortest_1222z00_7244 = 
(BgL_classz00_7231==BgL_oclassz00_7240); 
if(BgL__ortest_1222z00_7244)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7239 = BgL__ortest_1222z00_7244; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7245;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7246;
BgL_arg1822z00_7246 = 
(BgL_oclassz00_7240); 
BgL_odepthz00_7245 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7246); } 
if(
(BgL_arg1816z00_7233<BgL_odepthz00_7245))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7247;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7248;
BgL_arg1821z00_7248 = 
(BgL_oclassz00_7240); 
BgL_arg1820z00_7247 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7248, BgL_arg1816z00_7233); } 
BgL_res2666z00_7239 = 
(BgL_arg1820z00_7247==BgL_classz00_7231); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7239 = ((bool_t)0); } } } } 
BgL_test5173z00_13761 = BgL_res2666z00_7239; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5173z00_13761 = ((bool_t)0)
; } } 
if(BgL_test5173z00_13761)
{ /* Llib/object.scm 248 */
BgL_oz00_7249 = 
((BgL_z62typezd2errorzb0_bglt)BgL_oz00_5271); }  else 
{ 
 obj_t BgL_auxz00_13803;
BgL_auxz00_13803 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8813L), BGl_string3892z00zz__objectz00, BGl_string3740z00zz__objectz00, BgL_oz00_5271); 
FAILURE(BgL_auxz00_13803,BFALSE,BFALSE);} } 
return 
(((BgL_z62typezd2errorzb0_bglt)COBJECT(BgL_oz00_7249))->BgL_typez00);} } 

}



/* &<@anonymous:1922> */
obj_t BGl_z62zc3z04anonymousza31922ze3ze5zz__objectz00(obj_t BgL_envz00_5272, obj_t BgL_new1032z00_5273)
{
{ /* Llib/object.scm 244 */
{ 
 BgL_z62errorz62_bglt BgL_auxz00_13808;
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_new1032z00_7268;
{ /* Llib/object.scm 244 */
 bool_t BgL_test5180z00_13809;
{ /* Llib/object.scm 244 */
 obj_t BgL_classz00_7250;
BgL_classz00_7250 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1032z00_5273))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7251; long BgL_arg1816z00_7252;
BgL_arg1815z00_7251 = 
(BgL_objectz00_bglt)(BgL_new1032z00_5273); 
BgL_arg1816z00_7252 = 
BGL_CLASS_DEPTH(BgL_classz00_7250); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7253;
BgL_idxz00_7253 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7251); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7254;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7255;
BgL_arg1825z00_7255 = 
(BgL_idxz00_7253+BgL_arg1816z00_7252); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7256;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7257;
BgL_aux3193z00_7257 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7257))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7256 = BgL_aux3193z00_7257; }  else 
{ 
 obj_t BgL_auxz00_13820;
BgL_auxz00_13820 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7257); 
FAILURE(BgL_auxz00_13820,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5184z00_13824;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13825;
BgL_tmpz00_13825 = 
VECTOR_LENGTH(BgL_vectorz00_7256); 
BgL_test5184z00_13824 = 
BOUND_CHECK(BgL_arg1825z00_7255, BgL_tmpz00_13825); } 
if(BgL_test5184z00_13824)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7254 = 
VECTOR_REF(BgL_vectorz00_7256,BgL_arg1825z00_7255); }  else 
{ 
 obj_t BgL_auxz00_13829;
BgL_auxz00_13829 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7256, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7256)), 
(int)(BgL_arg1825z00_7255)); 
FAILURE(BgL_auxz00_13829,BFALSE,BFALSE);} } } } 
BgL_test5180z00_13809 = 
(BgL_arg1824z00_7254==BgL_classz00_7250); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7258;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7259;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7260; long BgL_arg1554z00_7261;
BgL_arg1552z00_7260 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7262;
BgL_arg1555z00_7262 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7251); 
BgL_arg1554z00_7261 = 
(BgL_arg1555z00_7262-OBJECT_TYPE); } 
BgL_oclassz00_7259 = 
VECTOR_REF(BgL_arg1552z00_7260,BgL_arg1554z00_7261); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7263;
BgL__ortest_1222z00_7263 = 
(BgL_classz00_7250==BgL_oclassz00_7259); 
if(BgL__ortest_1222z00_7263)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7258 = BgL__ortest_1222z00_7263; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7264;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7265;
BgL_arg1822z00_7265 = 
(BgL_oclassz00_7259); 
BgL_odepthz00_7264 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7265); } 
if(
(BgL_arg1816z00_7252<BgL_odepthz00_7264))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7266;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7267;
BgL_arg1821z00_7267 = 
(BgL_oclassz00_7259); 
BgL_arg1820z00_7266 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7267, BgL_arg1816z00_7252); } 
BgL_res2666z00_7258 = 
(BgL_arg1820z00_7266==BgL_classz00_7250); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7258 = ((bool_t)0); } } } } 
BgL_test5180z00_13809 = BgL_res2666z00_7258; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5180z00_13809 = ((bool_t)0)
; } } 
if(BgL_test5180z00_13809)
{ /* Llib/object.scm 244 */
BgL_new1032z00_7268 = 
((BgL_z62errorz62_bglt)BgL_new1032z00_5273); }  else 
{ 
 obj_t BgL_auxz00_13851;
BgL_auxz00_13851 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8720L), BGl_string3893z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_new1032z00_5273); 
FAILURE(BgL_auxz00_13851,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1032z00_7268)))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1032z00_7268)))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1032z00_7268)))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(BgL_new1032z00_7268))->BgL_procz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(BgL_new1032z00_7268))->BgL_msgz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(BgL_new1032z00_7268))->BgL_objz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_13808 = BgL_new1032z00_7268; } 
return 
((obj_t)BgL_auxz00_13808);} } 

}



/* &lambda1920 */
BgL_z62errorz62_bglt BGl_z62lambda1920z62zz__objectz00(obj_t BgL_envz00_5274)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_new1031z00_7269;
BgL_new1031z00_7269 = 
((BgL_z62errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62errorz62_bgl) ))); 
{ /* Llib/object.scm 244 */
 long BgL_arg1921z00_7270;
BgL_arg1921z00_7270 = 
BGL_CLASS_NUM(BGl_z62errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1031z00_7269), BgL_arg1921z00_7270); } 
return BgL_new1031z00_7269;} } 

}



/* &lambda1918 */
BgL_z62errorz62_bglt BGl_z62lambda1918z62zz__objectz00(obj_t BgL_envz00_5275, obj_t BgL_fname1025z00_5276, obj_t BgL_location1026z00_5277, obj_t BgL_stack1027z00_5278, obj_t BgL_proc1028z00_5279, obj_t BgL_msg1029z00_5280, obj_t BgL_obj1030z00_5281)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_new1236z00_7271;
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_new1235z00_7272;
BgL_new1235z00_7272 = 
((BgL_z62errorz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62errorz62_bgl) ))); 
{ /* Llib/object.scm 244 */
 long BgL_arg1919z00_7273;
BgL_arg1919z00_7273 = 
BGL_CLASS_NUM(BGl_z62errorz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1235z00_7272), BgL_arg1919z00_7273); } 
BgL_new1236z00_7271 = BgL_new1235z00_7272; } 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1236z00_7271)))->BgL_fnamez00)=((obj_t)BgL_fname1025z00_5276),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1236z00_7271)))->BgL_locationz00)=((obj_t)BgL_location1026z00_5277),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(
((BgL_z62exceptionz62_bglt)BgL_new1236z00_7271)))->BgL_stackz00)=((obj_t)BgL_stack1027z00_5278),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(BgL_new1236z00_7271))->BgL_procz00)=((obj_t)BgL_proc1028z00_5279),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(BgL_new1236z00_7271))->BgL_msgz00)=((obj_t)BgL_msg1029z00_5280),BUNSPEC); 
((((BgL_z62errorz62_bglt)COBJECT(BgL_new1236z00_7271))->BgL_objz00)=((obj_t)BgL_obj1030z00_5281),BUNSPEC); 
return BgL_new1236z00_7271;} } 

}



/* &lambda1939 */
obj_t BGl_z62lambda1939z62zz__objectz00(obj_t BgL_envz00_5282, obj_t BgL_oz00_5283, obj_t BgL_vz00_5284)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_oz00_7292;
{ /* Llib/object.scm 244 */
 bool_t BgL_test5187z00_13882;
{ /* Llib/object.scm 244 */
 obj_t BgL_classz00_7274;
BgL_classz00_7274 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5283))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7275; long BgL_arg1816z00_7276;
BgL_arg1815z00_7275 = 
(BgL_objectz00_bglt)(BgL_oz00_5283); 
BgL_arg1816z00_7276 = 
BGL_CLASS_DEPTH(BgL_classz00_7274); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7277;
BgL_idxz00_7277 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7275); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7278;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7279;
BgL_arg1825z00_7279 = 
(BgL_idxz00_7277+BgL_arg1816z00_7276); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7280;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7281;
BgL_aux3193z00_7281 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7281))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7280 = BgL_aux3193z00_7281; }  else 
{ 
 obj_t BgL_auxz00_13893;
BgL_auxz00_13893 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7281); 
FAILURE(BgL_auxz00_13893,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5191z00_13897;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13898;
BgL_tmpz00_13898 = 
VECTOR_LENGTH(BgL_vectorz00_7280); 
BgL_test5191z00_13897 = 
BOUND_CHECK(BgL_arg1825z00_7279, BgL_tmpz00_13898); } 
if(BgL_test5191z00_13897)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7278 = 
VECTOR_REF(BgL_vectorz00_7280,BgL_arg1825z00_7279); }  else 
{ 
 obj_t BgL_auxz00_13902;
BgL_auxz00_13902 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7280, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7280)), 
(int)(BgL_arg1825z00_7279)); 
FAILURE(BgL_auxz00_13902,BFALSE,BFALSE);} } } } 
BgL_test5187z00_13882 = 
(BgL_arg1824z00_7278==BgL_classz00_7274); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7282;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7283;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7284; long BgL_arg1554z00_7285;
BgL_arg1552z00_7284 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7286;
BgL_arg1555z00_7286 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7275); 
BgL_arg1554z00_7285 = 
(BgL_arg1555z00_7286-OBJECT_TYPE); } 
BgL_oclassz00_7283 = 
VECTOR_REF(BgL_arg1552z00_7284,BgL_arg1554z00_7285); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7287;
BgL__ortest_1222z00_7287 = 
(BgL_classz00_7274==BgL_oclassz00_7283); 
if(BgL__ortest_1222z00_7287)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7282 = BgL__ortest_1222z00_7287; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7288;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7289;
BgL_arg1822z00_7289 = 
(BgL_oclassz00_7283); 
BgL_odepthz00_7288 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7289); } 
if(
(BgL_arg1816z00_7276<BgL_odepthz00_7288))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7290;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7291;
BgL_arg1821z00_7291 = 
(BgL_oclassz00_7283); 
BgL_arg1820z00_7290 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7291, BgL_arg1816z00_7276); } 
BgL_res2666z00_7282 = 
(BgL_arg1820z00_7290==BgL_classz00_7274); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7282 = ((bool_t)0); } } } } 
BgL_test5187z00_13882 = BgL_res2666z00_7282; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5187z00_13882 = ((bool_t)0)
; } } 
if(BgL_test5187z00_13882)
{ /* Llib/object.scm 244 */
BgL_oz00_7292 = 
((BgL_z62errorz62_bglt)BgL_oz00_5283); }  else 
{ 
 obj_t BgL_auxz00_13924;
BgL_auxz00_13924 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8720L), BGl_string3894z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_oz00_5283); 
FAILURE(BgL_auxz00_13924,BFALSE,BFALSE);} } 
return 
((((BgL_z62errorz62_bglt)COBJECT(BgL_oz00_7292))->BgL_objz00)=((obj_t)BgL_vz00_5284),BUNSPEC);} } 

}



/* &lambda1938 */
obj_t BGl_z62lambda1938z62zz__objectz00(obj_t BgL_envz00_5285, obj_t BgL_oz00_5286)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_oz00_7311;
{ /* Llib/object.scm 244 */
 bool_t BgL_test5194z00_13929;
{ /* Llib/object.scm 244 */
 obj_t BgL_classz00_7293;
BgL_classz00_7293 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5286))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7294; long BgL_arg1816z00_7295;
BgL_arg1815z00_7294 = 
(BgL_objectz00_bglt)(BgL_oz00_5286); 
BgL_arg1816z00_7295 = 
BGL_CLASS_DEPTH(BgL_classz00_7293); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7296;
BgL_idxz00_7296 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7294); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7297;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7298;
BgL_arg1825z00_7298 = 
(BgL_idxz00_7296+BgL_arg1816z00_7295); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7299;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7300;
BgL_aux3193z00_7300 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7300))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7299 = BgL_aux3193z00_7300; }  else 
{ 
 obj_t BgL_auxz00_13940;
BgL_auxz00_13940 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7300); 
FAILURE(BgL_auxz00_13940,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5198z00_13944;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13945;
BgL_tmpz00_13945 = 
VECTOR_LENGTH(BgL_vectorz00_7299); 
BgL_test5198z00_13944 = 
BOUND_CHECK(BgL_arg1825z00_7298, BgL_tmpz00_13945); } 
if(BgL_test5198z00_13944)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7297 = 
VECTOR_REF(BgL_vectorz00_7299,BgL_arg1825z00_7298); }  else 
{ 
 obj_t BgL_auxz00_13949;
BgL_auxz00_13949 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7299, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7299)), 
(int)(BgL_arg1825z00_7298)); 
FAILURE(BgL_auxz00_13949,BFALSE,BFALSE);} } } } 
BgL_test5194z00_13929 = 
(BgL_arg1824z00_7297==BgL_classz00_7293); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7301;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7302;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7303; long BgL_arg1554z00_7304;
BgL_arg1552z00_7303 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7305;
BgL_arg1555z00_7305 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7294); 
BgL_arg1554z00_7304 = 
(BgL_arg1555z00_7305-OBJECT_TYPE); } 
BgL_oclassz00_7302 = 
VECTOR_REF(BgL_arg1552z00_7303,BgL_arg1554z00_7304); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7306;
BgL__ortest_1222z00_7306 = 
(BgL_classz00_7293==BgL_oclassz00_7302); 
if(BgL__ortest_1222z00_7306)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7301 = BgL__ortest_1222z00_7306; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7307;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7308;
BgL_arg1822z00_7308 = 
(BgL_oclassz00_7302); 
BgL_odepthz00_7307 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7308); } 
if(
(BgL_arg1816z00_7295<BgL_odepthz00_7307))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7309;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7310;
BgL_arg1821z00_7310 = 
(BgL_oclassz00_7302); 
BgL_arg1820z00_7309 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7310, BgL_arg1816z00_7295); } 
BgL_res2666z00_7301 = 
(BgL_arg1820z00_7309==BgL_classz00_7293); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7301 = ((bool_t)0); } } } } 
BgL_test5194z00_13929 = BgL_res2666z00_7301; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5194z00_13929 = ((bool_t)0)
; } } 
if(BgL_test5194z00_13929)
{ /* Llib/object.scm 244 */
BgL_oz00_7311 = 
((BgL_z62errorz62_bglt)BgL_oz00_5286); }  else 
{ 
 obj_t BgL_auxz00_13971;
BgL_auxz00_13971 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8720L), BGl_string3895z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_oz00_5286); 
FAILURE(BgL_auxz00_13971,BFALSE,BFALSE);} } 
return 
(((BgL_z62errorz62_bglt)COBJECT(BgL_oz00_7311))->BgL_objz00);} } 

}



/* &lambda1934 */
obj_t BGl_z62lambda1934z62zz__objectz00(obj_t BgL_envz00_5287, obj_t BgL_oz00_5288, obj_t BgL_vz00_5289)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_oz00_7330;
{ /* Llib/object.scm 244 */
 bool_t BgL_test5201z00_13976;
{ /* Llib/object.scm 244 */
 obj_t BgL_classz00_7312;
BgL_classz00_7312 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5288))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7313; long BgL_arg1816z00_7314;
BgL_arg1815z00_7313 = 
(BgL_objectz00_bglt)(BgL_oz00_5288); 
BgL_arg1816z00_7314 = 
BGL_CLASS_DEPTH(BgL_classz00_7312); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7315;
BgL_idxz00_7315 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7313); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7316;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7317;
BgL_arg1825z00_7317 = 
(BgL_idxz00_7315+BgL_arg1816z00_7314); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7318;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7319;
BgL_aux3193z00_7319 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7319))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7318 = BgL_aux3193z00_7319; }  else 
{ 
 obj_t BgL_auxz00_13987;
BgL_auxz00_13987 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7319); 
FAILURE(BgL_auxz00_13987,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5205z00_13991;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_13992;
BgL_tmpz00_13992 = 
VECTOR_LENGTH(BgL_vectorz00_7318); 
BgL_test5205z00_13991 = 
BOUND_CHECK(BgL_arg1825z00_7317, BgL_tmpz00_13992); } 
if(BgL_test5205z00_13991)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7316 = 
VECTOR_REF(BgL_vectorz00_7318,BgL_arg1825z00_7317); }  else 
{ 
 obj_t BgL_auxz00_13996;
BgL_auxz00_13996 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7318, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7318)), 
(int)(BgL_arg1825z00_7317)); 
FAILURE(BgL_auxz00_13996,BFALSE,BFALSE);} } } } 
BgL_test5201z00_13976 = 
(BgL_arg1824z00_7316==BgL_classz00_7312); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7320;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7321;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7322; long BgL_arg1554z00_7323;
BgL_arg1552z00_7322 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7324;
BgL_arg1555z00_7324 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7313); 
BgL_arg1554z00_7323 = 
(BgL_arg1555z00_7324-OBJECT_TYPE); } 
BgL_oclassz00_7321 = 
VECTOR_REF(BgL_arg1552z00_7322,BgL_arg1554z00_7323); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7325;
BgL__ortest_1222z00_7325 = 
(BgL_classz00_7312==BgL_oclassz00_7321); 
if(BgL__ortest_1222z00_7325)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7320 = BgL__ortest_1222z00_7325; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7326;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7327;
BgL_arg1822z00_7327 = 
(BgL_oclassz00_7321); 
BgL_odepthz00_7326 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7327); } 
if(
(BgL_arg1816z00_7314<BgL_odepthz00_7326))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7328;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7329;
BgL_arg1821z00_7329 = 
(BgL_oclassz00_7321); 
BgL_arg1820z00_7328 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7329, BgL_arg1816z00_7314); } 
BgL_res2666z00_7320 = 
(BgL_arg1820z00_7328==BgL_classz00_7312); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7320 = ((bool_t)0); } } } } 
BgL_test5201z00_13976 = BgL_res2666z00_7320; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5201z00_13976 = ((bool_t)0)
; } } 
if(BgL_test5201z00_13976)
{ /* Llib/object.scm 244 */
BgL_oz00_7330 = 
((BgL_z62errorz62_bglt)BgL_oz00_5288); }  else 
{ 
 obj_t BgL_auxz00_14018;
BgL_auxz00_14018 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8720L), BGl_string3896z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_oz00_5288); 
FAILURE(BgL_auxz00_14018,BFALSE,BFALSE);} } 
return 
((((BgL_z62errorz62_bglt)COBJECT(BgL_oz00_7330))->BgL_msgz00)=((obj_t)BgL_vz00_5289),BUNSPEC);} } 

}



/* &lambda1933 */
obj_t BGl_z62lambda1933z62zz__objectz00(obj_t BgL_envz00_5290, obj_t BgL_oz00_5291)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_oz00_7349;
{ /* Llib/object.scm 244 */
 bool_t BgL_test5208z00_14023;
{ /* Llib/object.scm 244 */
 obj_t BgL_classz00_7331;
BgL_classz00_7331 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5291))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7332; long BgL_arg1816z00_7333;
BgL_arg1815z00_7332 = 
(BgL_objectz00_bglt)(BgL_oz00_5291); 
BgL_arg1816z00_7333 = 
BGL_CLASS_DEPTH(BgL_classz00_7331); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7334;
BgL_idxz00_7334 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7332); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7335;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7336;
BgL_arg1825z00_7336 = 
(BgL_idxz00_7334+BgL_arg1816z00_7333); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7337;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7338;
BgL_aux3193z00_7338 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7338))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7337 = BgL_aux3193z00_7338; }  else 
{ 
 obj_t BgL_auxz00_14034;
BgL_auxz00_14034 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7338); 
FAILURE(BgL_auxz00_14034,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5212z00_14038;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14039;
BgL_tmpz00_14039 = 
VECTOR_LENGTH(BgL_vectorz00_7337); 
BgL_test5212z00_14038 = 
BOUND_CHECK(BgL_arg1825z00_7336, BgL_tmpz00_14039); } 
if(BgL_test5212z00_14038)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7335 = 
VECTOR_REF(BgL_vectorz00_7337,BgL_arg1825z00_7336); }  else 
{ 
 obj_t BgL_auxz00_14043;
BgL_auxz00_14043 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7337, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7337)), 
(int)(BgL_arg1825z00_7336)); 
FAILURE(BgL_auxz00_14043,BFALSE,BFALSE);} } } } 
BgL_test5208z00_14023 = 
(BgL_arg1824z00_7335==BgL_classz00_7331); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7339;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7340;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7341; long BgL_arg1554z00_7342;
BgL_arg1552z00_7341 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7343;
BgL_arg1555z00_7343 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7332); 
BgL_arg1554z00_7342 = 
(BgL_arg1555z00_7343-OBJECT_TYPE); } 
BgL_oclassz00_7340 = 
VECTOR_REF(BgL_arg1552z00_7341,BgL_arg1554z00_7342); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7344;
BgL__ortest_1222z00_7344 = 
(BgL_classz00_7331==BgL_oclassz00_7340); 
if(BgL__ortest_1222z00_7344)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7339 = BgL__ortest_1222z00_7344; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7345;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7346;
BgL_arg1822z00_7346 = 
(BgL_oclassz00_7340); 
BgL_odepthz00_7345 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7346); } 
if(
(BgL_arg1816z00_7333<BgL_odepthz00_7345))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7347;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7348;
BgL_arg1821z00_7348 = 
(BgL_oclassz00_7340); 
BgL_arg1820z00_7347 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7348, BgL_arg1816z00_7333); } 
BgL_res2666z00_7339 = 
(BgL_arg1820z00_7347==BgL_classz00_7331); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7339 = ((bool_t)0); } } } } 
BgL_test5208z00_14023 = BgL_res2666z00_7339; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5208z00_14023 = ((bool_t)0)
; } } 
if(BgL_test5208z00_14023)
{ /* Llib/object.scm 244 */
BgL_oz00_7349 = 
((BgL_z62errorz62_bglt)BgL_oz00_5291); }  else 
{ 
 obj_t BgL_auxz00_14065;
BgL_auxz00_14065 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8720L), BGl_string3897z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_oz00_5291); 
FAILURE(BgL_auxz00_14065,BFALSE,BFALSE);} } 
return 
(((BgL_z62errorz62_bglt)COBJECT(BgL_oz00_7349))->BgL_msgz00);} } 

}



/* &lambda1927 */
obj_t BGl_z62lambda1927z62zz__objectz00(obj_t BgL_envz00_5292, obj_t BgL_oz00_5293, obj_t BgL_vz00_5294)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_oz00_7368;
{ /* Llib/object.scm 244 */
 bool_t BgL_test5215z00_14070;
{ /* Llib/object.scm 244 */
 obj_t BgL_classz00_7350;
BgL_classz00_7350 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5293))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7351; long BgL_arg1816z00_7352;
BgL_arg1815z00_7351 = 
(BgL_objectz00_bglt)(BgL_oz00_5293); 
BgL_arg1816z00_7352 = 
BGL_CLASS_DEPTH(BgL_classz00_7350); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7353;
BgL_idxz00_7353 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7351); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7354;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7355;
BgL_arg1825z00_7355 = 
(BgL_idxz00_7353+BgL_arg1816z00_7352); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7356;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7357;
BgL_aux3193z00_7357 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7357))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7356 = BgL_aux3193z00_7357; }  else 
{ 
 obj_t BgL_auxz00_14081;
BgL_auxz00_14081 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7357); 
FAILURE(BgL_auxz00_14081,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5219z00_14085;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14086;
BgL_tmpz00_14086 = 
VECTOR_LENGTH(BgL_vectorz00_7356); 
BgL_test5219z00_14085 = 
BOUND_CHECK(BgL_arg1825z00_7355, BgL_tmpz00_14086); } 
if(BgL_test5219z00_14085)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7354 = 
VECTOR_REF(BgL_vectorz00_7356,BgL_arg1825z00_7355); }  else 
{ 
 obj_t BgL_auxz00_14090;
BgL_auxz00_14090 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7356, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7356)), 
(int)(BgL_arg1825z00_7355)); 
FAILURE(BgL_auxz00_14090,BFALSE,BFALSE);} } } } 
BgL_test5215z00_14070 = 
(BgL_arg1824z00_7354==BgL_classz00_7350); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7358;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7359;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7360; long BgL_arg1554z00_7361;
BgL_arg1552z00_7360 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7362;
BgL_arg1555z00_7362 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7351); 
BgL_arg1554z00_7361 = 
(BgL_arg1555z00_7362-OBJECT_TYPE); } 
BgL_oclassz00_7359 = 
VECTOR_REF(BgL_arg1552z00_7360,BgL_arg1554z00_7361); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7363;
BgL__ortest_1222z00_7363 = 
(BgL_classz00_7350==BgL_oclassz00_7359); 
if(BgL__ortest_1222z00_7363)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7358 = BgL__ortest_1222z00_7363; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7364;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7365;
BgL_arg1822z00_7365 = 
(BgL_oclassz00_7359); 
BgL_odepthz00_7364 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7365); } 
if(
(BgL_arg1816z00_7352<BgL_odepthz00_7364))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7366;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7367;
BgL_arg1821z00_7367 = 
(BgL_oclassz00_7359); 
BgL_arg1820z00_7366 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7367, BgL_arg1816z00_7352); } 
BgL_res2666z00_7358 = 
(BgL_arg1820z00_7366==BgL_classz00_7350); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7358 = ((bool_t)0); } } } } 
BgL_test5215z00_14070 = BgL_res2666z00_7358; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5215z00_14070 = ((bool_t)0)
; } } 
if(BgL_test5215z00_14070)
{ /* Llib/object.scm 244 */
BgL_oz00_7368 = 
((BgL_z62errorz62_bglt)BgL_oz00_5293); }  else 
{ 
 obj_t BgL_auxz00_14112;
BgL_auxz00_14112 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8720L), BGl_string3898z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_oz00_5293); 
FAILURE(BgL_auxz00_14112,BFALSE,BFALSE);} } 
return 
((((BgL_z62errorz62_bglt)COBJECT(BgL_oz00_7368))->BgL_procz00)=((obj_t)BgL_vz00_5294),BUNSPEC);} } 

}



/* &lambda1926 */
obj_t BGl_z62lambda1926z62zz__objectz00(obj_t BgL_envz00_5295, obj_t BgL_oz00_5296)
{
{ /* Llib/object.scm 244 */
{ /* Llib/object.scm 244 */
 BgL_z62errorz62_bglt BgL_oz00_7387;
{ /* Llib/object.scm 244 */
 bool_t BgL_test5222z00_14117;
{ /* Llib/object.scm 244 */
 obj_t BgL_classz00_7369;
BgL_classz00_7369 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5296))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7370; long BgL_arg1816z00_7371;
BgL_arg1815z00_7370 = 
(BgL_objectz00_bglt)(BgL_oz00_5296); 
BgL_arg1816z00_7371 = 
BGL_CLASS_DEPTH(BgL_classz00_7369); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7372;
BgL_idxz00_7372 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7370); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7373;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7374;
BgL_arg1825z00_7374 = 
(BgL_idxz00_7372+BgL_arg1816z00_7371); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7375;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7376;
BgL_aux3193z00_7376 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7376))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7375 = BgL_aux3193z00_7376; }  else 
{ 
 obj_t BgL_auxz00_14128;
BgL_auxz00_14128 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7376); 
FAILURE(BgL_auxz00_14128,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5226z00_14132;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14133;
BgL_tmpz00_14133 = 
VECTOR_LENGTH(BgL_vectorz00_7375); 
BgL_test5226z00_14132 = 
BOUND_CHECK(BgL_arg1825z00_7374, BgL_tmpz00_14133); } 
if(BgL_test5226z00_14132)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7373 = 
VECTOR_REF(BgL_vectorz00_7375,BgL_arg1825z00_7374); }  else 
{ 
 obj_t BgL_auxz00_14137;
BgL_auxz00_14137 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7375, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7375)), 
(int)(BgL_arg1825z00_7374)); 
FAILURE(BgL_auxz00_14137,BFALSE,BFALSE);} } } } 
BgL_test5222z00_14117 = 
(BgL_arg1824z00_7373==BgL_classz00_7369); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7377;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7378;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7379; long BgL_arg1554z00_7380;
BgL_arg1552z00_7379 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7381;
BgL_arg1555z00_7381 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7370); 
BgL_arg1554z00_7380 = 
(BgL_arg1555z00_7381-OBJECT_TYPE); } 
BgL_oclassz00_7378 = 
VECTOR_REF(BgL_arg1552z00_7379,BgL_arg1554z00_7380); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7382;
BgL__ortest_1222z00_7382 = 
(BgL_classz00_7369==BgL_oclassz00_7378); 
if(BgL__ortest_1222z00_7382)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7377 = BgL__ortest_1222z00_7382; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7383;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7384;
BgL_arg1822z00_7384 = 
(BgL_oclassz00_7378); 
BgL_odepthz00_7383 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7384); } 
if(
(BgL_arg1816z00_7371<BgL_odepthz00_7383))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7385;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7386;
BgL_arg1821z00_7386 = 
(BgL_oclassz00_7378); 
BgL_arg1820z00_7385 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7386, BgL_arg1816z00_7371); } 
BgL_res2666z00_7377 = 
(BgL_arg1820z00_7385==BgL_classz00_7369); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7377 = ((bool_t)0); } } } } 
BgL_test5222z00_14117 = BgL_res2666z00_7377; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5222z00_14117 = ((bool_t)0)
; } } 
if(BgL_test5222z00_14117)
{ /* Llib/object.scm 244 */
BgL_oz00_7387 = 
((BgL_z62errorz62_bglt)BgL_oz00_5296); }  else 
{ 
 obj_t BgL_auxz00_14159;
BgL_auxz00_14159 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8720L), BGl_string3899z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_oz00_5296); 
FAILURE(BgL_auxz00_14159,BFALSE,BFALSE);} } 
return 
(((BgL_z62errorz62_bglt)COBJECT(BgL_oz00_7387))->BgL_procz00);} } 

}



/* &<@anonymous:1888> */
obj_t BGl_z62zc3z04anonymousza31888ze3ze5zz__objectz00(obj_t BgL_envz00_5297, obj_t BgL_new1023z00_5298)
{
{ /* Llib/object.scm 239 */
{ 
 BgL_z62exceptionz62_bglt BgL_auxz00_14164;
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_new1023z00_7406;
{ /* Llib/object.scm 239 */
 bool_t BgL_test5229z00_14165;
{ /* Llib/object.scm 239 */
 obj_t BgL_classz00_7388;
BgL_classz00_7388 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1023z00_5298))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7389; long BgL_arg1816z00_7390;
BgL_arg1815z00_7389 = 
(BgL_objectz00_bglt)(BgL_new1023z00_5298); 
BgL_arg1816z00_7390 = 
BGL_CLASS_DEPTH(BgL_classz00_7388); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7391;
BgL_idxz00_7391 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7389); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7392;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7393;
BgL_arg1825z00_7393 = 
(BgL_idxz00_7391+BgL_arg1816z00_7390); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7394;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7395;
BgL_aux3193z00_7395 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7395))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7394 = BgL_aux3193z00_7395; }  else 
{ 
 obj_t BgL_auxz00_14176;
BgL_auxz00_14176 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7395); 
FAILURE(BgL_auxz00_14176,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5233z00_14180;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14181;
BgL_tmpz00_14181 = 
VECTOR_LENGTH(BgL_vectorz00_7394); 
BgL_test5233z00_14180 = 
BOUND_CHECK(BgL_arg1825z00_7393, BgL_tmpz00_14181); } 
if(BgL_test5233z00_14180)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7392 = 
VECTOR_REF(BgL_vectorz00_7394,BgL_arg1825z00_7393); }  else 
{ 
 obj_t BgL_auxz00_14185;
BgL_auxz00_14185 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7394, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7394)), 
(int)(BgL_arg1825z00_7393)); 
FAILURE(BgL_auxz00_14185,BFALSE,BFALSE);} } } } 
BgL_test5229z00_14165 = 
(BgL_arg1824z00_7392==BgL_classz00_7388); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7396;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7397;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7398; long BgL_arg1554z00_7399;
BgL_arg1552z00_7398 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7400;
BgL_arg1555z00_7400 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7389); 
BgL_arg1554z00_7399 = 
(BgL_arg1555z00_7400-OBJECT_TYPE); } 
BgL_oclassz00_7397 = 
VECTOR_REF(BgL_arg1552z00_7398,BgL_arg1554z00_7399); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7401;
BgL__ortest_1222z00_7401 = 
(BgL_classz00_7388==BgL_oclassz00_7397); 
if(BgL__ortest_1222z00_7401)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7396 = BgL__ortest_1222z00_7401; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7402;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7403;
BgL_arg1822z00_7403 = 
(BgL_oclassz00_7397); 
BgL_odepthz00_7402 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7403); } 
if(
(BgL_arg1816z00_7390<BgL_odepthz00_7402))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7404;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7405;
BgL_arg1821z00_7405 = 
(BgL_oclassz00_7397); 
BgL_arg1820z00_7404 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7405, BgL_arg1816z00_7390); } 
BgL_res2666z00_7396 = 
(BgL_arg1820z00_7404==BgL_classz00_7388); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7396 = ((bool_t)0); } } } } 
BgL_test5229z00_14165 = BgL_res2666z00_7396; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5229z00_14165 = ((bool_t)0)
; } } 
if(BgL_test5229z00_14165)
{ /* Llib/object.scm 239 */
BgL_new1023z00_7406 = 
((BgL_z62exceptionz62_bglt)BgL_new1023z00_5298); }  else 
{ 
 obj_t BgL_auxz00_14207;
BgL_auxz00_14207 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8573L), BGl_string3900z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_new1023z00_5298); 
FAILURE(BgL_auxz00_14207,BFALSE,BFALSE);} } 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_new1023z00_7406))->BgL_fnamez00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_new1023z00_7406))->BgL_locationz00)=((obj_t)BUNSPEC),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_new1023z00_7406))->BgL_stackz00)=((obj_t)BUNSPEC),BUNSPEC); 
BgL_auxz00_14164 = BgL_new1023z00_7406; } 
return 
((obj_t)BgL_auxz00_14164);} } 

}



/* &lambda1886 */
BgL_z62exceptionz62_bglt BGl_z62lambda1886z62zz__objectz00(obj_t BgL_envz00_5299)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_new1022z00_7407;
BgL_new1022z00_7407 = 
((BgL_z62exceptionz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62exceptionz62_bgl) ))); 
{ /* Llib/object.scm 239 */
 long BgL_arg1887z00_7408;
BgL_arg1887z00_7408 = 
BGL_CLASS_NUM(BGl_z62exceptionz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1022z00_7407), BgL_arg1887z00_7408); } 
return BgL_new1022z00_7407;} } 

}



/* &lambda1884 */
BgL_z62exceptionz62_bglt BGl_z62lambda1884z62zz__objectz00(obj_t BgL_envz00_5300, obj_t BgL_fname1019z00_5301, obj_t BgL_location1020z00_5302, obj_t BgL_stack1021z00_5303)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_new1234z00_7409;
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_new1233z00_7410;
BgL_new1233z00_7410 = 
((BgL_z62exceptionz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62exceptionz62_bgl) ))); 
{ /* Llib/object.scm 239 */
 long BgL_arg1885z00_7411;
BgL_arg1885z00_7411 = 
BGL_CLASS_NUM(BGl_z62exceptionz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1233z00_7410), BgL_arg1885z00_7411); } 
BgL_new1234z00_7409 = BgL_new1233z00_7410; } 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_new1234z00_7409))->BgL_fnamez00)=((obj_t)BgL_fname1019z00_5301),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_new1234z00_7409))->BgL_locationz00)=((obj_t)BgL_location1020z00_5302),BUNSPEC); 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_new1234z00_7409))->BgL_stackz00)=((obj_t)BgL_stack1021z00_5303),BUNSPEC); 
return BgL_new1234z00_7409;} } 

}



/* &<@anonymous:1910> */
obj_t BGl_z62zc3z04anonymousza31910ze3ze5zz__objectz00(obj_t BgL_envz00_5304)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 242 */

{ /* Llib/object.scm 242 */

return 
BGl_getzd2tracezd2stackz00zz__errorz00(BFALSE);} } } 

}



/* &lambda1909 */
obj_t BGl_z62lambda1909z62zz__objectz00(obj_t BgL_envz00_5305, obj_t BgL_oz00_5306, obj_t BgL_vz00_5307)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_oz00_7430;
{ /* Llib/object.scm 239 */
 bool_t BgL_test5236z00_14227;
{ /* Llib/object.scm 239 */
 obj_t BgL_classz00_7412;
BgL_classz00_7412 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5306))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7413; long BgL_arg1816z00_7414;
BgL_arg1815z00_7413 = 
(BgL_objectz00_bglt)(BgL_oz00_5306); 
BgL_arg1816z00_7414 = 
BGL_CLASS_DEPTH(BgL_classz00_7412); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7415;
BgL_idxz00_7415 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7413); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7416;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7417;
BgL_arg1825z00_7417 = 
(BgL_idxz00_7415+BgL_arg1816z00_7414); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7418;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7419;
BgL_aux3193z00_7419 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7419))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7418 = BgL_aux3193z00_7419; }  else 
{ 
 obj_t BgL_auxz00_14238;
BgL_auxz00_14238 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7419); 
FAILURE(BgL_auxz00_14238,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5240z00_14242;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14243;
BgL_tmpz00_14243 = 
VECTOR_LENGTH(BgL_vectorz00_7418); 
BgL_test5240z00_14242 = 
BOUND_CHECK(BgL_arg1825z00_7417, BgL_tmpz00_14243); } 
if(BgL_test5240z00_14242)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7416 = 
VECTOR_REF(BgL_vectorz00_7418,BgL_arg1825z00_7417); }  else 
{ 
 obj_t BgL_auxz00_14247;
BgL_auxz00_14247 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7418, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7418)), 
(int)(BgL_arg1825z00_7417)); 
FAILURE(BgL_auxz00_14247,BFALSE,BFALSE);} } } } 
BgL_test5236z00_14227 = 
(BgL_arg1824z00_7416==BgL_classz00_7412); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7420;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7421;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7422; long BgL_arg1554z00_7423;
BgL_arg1552z00_7422 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7424;
BgL_arg1555z00_7424 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7413); 
BgL_arg1554z00_7423 = 
(BgL_arg1555z00_7424-OBJECT_TYPE); } 
BgL_oclassz00_7421 = 
VECTOR_REF(BgL_arg1552z00_7422,BgL_arg1554z00_7423); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7425;
BgL__ortest_1222z00_7425 = 
(BgL_classz00_7412==BgL_oclassz00_7421); 
if(BgL__ortest_1222z00_7425)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7420 = BgL__ortest_1222z00_7425; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7426;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7427;
BgL_arg1822z00_7427 = 
(BgL_oclassz00_7421); 
BgL_odepthz00_7426 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7427); } 
if(
(BgL_arg1816z00_7414<BgL_odepthz00_7426))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7428;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7429;
BgL_arg1821z00_7429 = 
(BgL_oclassz00_7421); 
BgL_arg1820z00_7428 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7429, BgL_arg1816z00_7414); } 
BgL_res2666z00_7420 = 
(BgL_arg1820z00_7428==BgL_classz00_7412); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7420 = ((bool_t)0); } } } } 
BgL_test5236z00_14227 = BgL_res2666z00_7420; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5236z00_14227 = ((bool_t)0)
; } } 
if(BgL_test5236z00_14227)
{ /* Llib/object.scm 239 */
BgL_oz00_7430 = 
((BgL_z62exceptionz62_bglt)BgL_oz00_5306); }  else 
{ 
 obj_t BgL_auxz00_14269;
BgL_auxz00_14269 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8573L), BGl_string3901z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_oz00_5306); 
FAILURE(BgL_auxz00_14269,BFALSE,BFALSE);} } 
return 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_oz00_7430))->BgL_stackz00)=((obj_t)BgL_vz00_5307),BUNSPEC);} } 

}



/* &lambda1908 */
obj_t BGl_z62lambda1908z62zz__objectz00(obj_t BgL_envz00_5308, obj_t BgL_oz00_5309)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_oz00_7449;
{ /* Llib/object.scm 239 */
 bool_t BgL_test5243z00_14274;
{ /* Llib/object.scm 239 */
 obj_t BgL_classz00_7431;
BgL_classz00_7431 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5309))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7432; long BgL_arg1816z00_7433;
BgL_arg1815z00_7432 = 
(BgL_objectz00_bglt)(BgL_oz00_5309); 
BgL_arg1816z00_7433 = 
BGL_CLASS_DEPTH(BgL_classz00_7431); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7434;
BgL_idxz00_7434 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7432); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7435;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7436;
BgL_arg1825z00_7436 = 
(BgL_idxz00_7434+BgL_arg1816z00_7433); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7437;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7438;
BgL_aux3193z00_7438 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7438))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7437 = BgL_aux3193z00_7438; }  else 
{ 
 obj_t BgL_auxz00_14285;
BgL_auxz00_14285 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7438); 
FAILURE(BgL_auxz00_14285,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5247z00_14289;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14290;
BgL_tmpz00_14290 = 
VECTOR_LENGTH(BgL_vectorz00_7437); 
BgL_test5247z00_14289 = 
BOUND_CHECK(BgL_arg1825z00_7436, BgL_tmpz00_14290); } 
if(BgL_test5247z00_14289)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7435 = 
VECTOR_REF(BgL_vectorz00_7437,BgL_arg1825z00_7436); }  else 
{ 
 obj_t BgL_auxz00_14294;
BgL_auxz00_14294 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7437, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7437)), 
(int)(BgL_arg1825z00_7436)); 
FAILURE(BgL_auxz00_14294,BFALSE,BFALSE);} } } } 
BgL_test5243z00_14274 = 
(BgL_arg1824z00_7435==BgL_classz00_7431); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7439;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7440;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7441; long BgL_arg1554z00_7442;
BgL_arg1552z00_7441 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7443;
BgL_arg1555z00_7443 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7432); 
BgL_arg1554z00_7442 = 
(BgL_arg1555z00_7443-OBJECT_TYPE); } 
BgL_oclassz00_7440 = 
VECTOR_REF(BgL_arg1552z00_7441,BgL_arg1554z00_7442); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7444;
BgL__ortest_1222z00_7444 = 
(BgL_classz00_7431==BgL_oclassz00_7440); 
if(BgL__ortest_1222z00_7444)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7439 = BgL__ortest_1222z00_7444; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7445;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7446;
BgL_arg1822z00_7446 = 
(BgL_oclassz00_7440); 
BgL_odepthz00_7445 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7446); } 
if(
(BgL_arg1816z00_7433<BgL_odepthz00_7445))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7447;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7448;
BgL_arg1821z00_7448 = 
(BgL_oclassz00_7440); 
BgL_arg1820z00_7447 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7448, BgL_arg1816z00_7433); } 
BgL_res2666z00_7439 = 
(BgL_arg1820z00_7447==BgL_classz00_7431); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7439 = ((bool_t)0); } } } } 
BgL_test5243z00_14274 = BgL_res2666z00_7439; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5243z00_14274 = ((bool_t)0)
; } } 
if(BgL_test5243z00_14274)
{ /* Llib/object.scm 239 */
BgL_oz00_7449 = 
((BgL_z62exceptionz62_bglt)BgL_oz00_5309); }  else 
{ 
 obj_t BgL_auxz00_14316;
BgL_auxz00_14316 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8573L), BGl_string3902z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_oz00_5309); 
FAILURE(BgL_auxz00_14316,BFALSE,BFALSE);} } 
return 
(((BgL_z62exceptionz62_bglt)COBJECT(BgL_oz00_7449))->BgL_stackz00);} } 

}



/* &<@anonymous:1902> */
obj_t BGl_z62zc3z04anonymousza31902ze3ze5zz__objectz00(obj_t BgL_envz00_5310)
{
{ /* Llib/object.scm 239 */
return 
BBOOL(((bool_t)0));} 

}



/* &lambda1901 */
obj_t BGl_z62lambda1901z62zz__objectz00(obj_t BgL_envz00_5311, obj_t BgL_oz00_5312, obj_t BgL_vz00_5313)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_oz00_7468;
{ /* Llib/object.scm 239 */
 bool_t BgL_test5250z00_14322;
{ /* Llib/object.scm 239 */
 obj_t BgL_classz00_7450;
BgL_classz00_7450 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5312))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7451; long BgL_arg1816z00_7452;
BgL_arg1815z00_7451 = 
(BgL_objectz00_bglt)(BgL_oz00_5312); 
BgL_arg1816z00_7452 = 
BGL_CLASS_DEPTH(BgL_classz00_7450); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7453;
BgL_idxz00_7453 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7451); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7454;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7455;
BgL_arg1825z00_7455 = 
(BgL_idxz00_7453+BgL_arg1816z00_7452); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7456;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7457;
BgL_aux3193z00_7457 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7457))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7456 = BgL_aux3193z00_7457; }  else 
{ 
 obj_t BgL_auxz00_14333;
BgL_auxz00_14333 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7457); 
FAILURE(BgL_auxz00_14333,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5254z00_14337;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14338;
BgL_tmpz00_14338 = 
VECTOR_LENGTH(BgL_vectorz00_7456); 
BgL_test5254z00_14337 = 
BOUND_CHECK(BgL_arg1825z00_7455, BgL_tmpz00_14338); } 
if(BgL_test5254z00_14337)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7454 = 
VECTOR_REF(BgL_vectorz00_7456,BgL_arg1825z00_7455); }  else 
{ 
 obj_t BgL_auxz00_14342;
BgL_auxz00_14342 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7456, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7456)), 
(int)(BgL_arg1825z00_7455)); 
FAILURE(BgL_auxz00_14342,BFALSE,BFALSE);} } } } 
BgL_test5250z00_14322 = 
(BgL_arg1824z00_7454==BgL_classz00_7450); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7458;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7459;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7460; long BgL_arg1554z00_7461;
BgL_arg1552z00_7460 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7462;
BgL_arg1555z00_7462 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7451); 
BgL_arg1554z00_7461 = 
(BgL_arg1555z00_7462-OBJECT_TYPE); } 
BgL_oclassz00_7459 = 
VECTOR_REF(BgL_arg1552z00_7460,BgL_arg1554z00_7461); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7463;
BgL__ortest_1222z00_7463 = 
(BgL_classz00_7450==BgL_oclassz00_7459); 
if(BgL__ortest_1222z00_7463)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7458 = BgL__ortest_1222z00_7463; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7464;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7465;
BgL_arg1822z00_7465 = 
(BgL_oclassz00_7459); 
BgL_odepthz00_7464 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7465); } 
if(
(BgL_arg1816z00_7452<BgL_odepthz00_7464))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7466;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7467;
BgL_arg1821z00_7467 = 
(BgL_oclassz00_7459); 
BgL_arg1820z00_7466 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7467, BgL_arg1816z00_7452); } 
BgL_res2666z00_7458 = 
(BgL_arg1820z00_7466==BgL_classz00_7450); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7458 = ((bool_t)0); } } } } 
BgL_test5250z00_14322 = BgL_res2666z00_7458; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5250z00_14322 = ((bool_t)0)
; } } 
if(BgL_test5250z00_14322)
{ /* Llib/object.scm 239 */
BgL_oz00_7468 = 
((BgL_z62exceptionz62_bglt)BgL_oz00_5312); }  else 
{ 
 obj_t BgL_auxz00_14364;
BgL_auxz00_14364 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8573L), BGl_string3903z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_oz00_5312); 
FAILURE(BgL_auxz00_14364,BFALSE,BFALSE);} } 
return 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_oz00_7468))->BgL_locationz00)=((obj_t)BgL_vz00_5313),BUNSPEC);} } 

}



/* &lambda1900 */
obj_t BGl_z62lambda1900z62zz__objectz00(obj_t BgL_envz00_5314, obj_t BgL_oz00_5315)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_oz00_7487;
{ /* Llib/object.scm 239 */
 bool_t BgL_test5257z00_14369;
{ /* Llib/object.scm 239 */
 obj_t BgL_classz00_7469;
BgL_classz00_7469 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5315))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7470; long BgL_arg1816z00_7471;
BgL_arg1815z00_7470 = 
(BgL_objectz00_bglt)(BgL_oz00_5315); 
BgL_arg1816z00_7471 = 
BGL_CLASS_DEPTH(BgL_classz00_7469); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7472;
BgL_idxz00_7472 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7470); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7473;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7474;
BgL_arg1825z00_7474 = 
(BgL_idxz00_7472+BgL_arg1816z00_7471); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7475;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7476;
BgL_aux3193z00_7476 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7476))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7475 = BgL_aux3193z00_7476; }  else 
{ 
 obj_t BgL_auxz00_14380;
BgL_auxz00_14380 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7476); 
FAILURE(BgL_auxz00_14380,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5261z00_14384;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14385;
BgL_tmpz00_14385 = 
VECTOR_LENGTH(BgL_vectorz00_7475); 
BgL_test5261z00_14384 = 
BOUND_CHECK(BgL_arg1825z00_7474, BgL_tmpz00_14385); } 
if(BgL_test5261z00_14384)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7473 = 
VECTOR_REF(BgL_vectorz00_7475,BgL_arg1825z00_7474); }  else 
{ 
 obj_t BgL_auxz00_14389;
BgL_auxz00_14389 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7475, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7475)), 
(int)(BgL_arg1825z00_7474)); 
FAILURE(BgL_auxz00_14389,BFALSE,BFALSE);} } } } 
BgL_test5257z00_14369 = 
(BgL_arg1824z00_7473==BgL_classz00_7469); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7477;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7478;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7479; long BgL_arg1554z00_7480;
BgL_arg1552z00_7479 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7481;
BgL_arg1555z00_7481 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7470); 
BgL_arg1554z00_7480 = 
(BgL_arg1555z00_7481-OBJECT_TYPE); } 
BgL_oclassz00_7478 = 
VECTOR_REF(BgL_arg1552z00_7479,BgL_arg1554z00_7480); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7482;
BgL__ortest_1222z00_7482 = 
(BgL_classz00_7469==BgL_oclassz00_7478); 
if(BgL__ortest_1222z00_7482)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7477 = BgL__ortest_1222z00_7482; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7483;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7484;
BgL_arg1822z00_7484 = 
(BgL_oclassz00_7478); 
BgL_odepthz00_7483 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7484); } 
if(
(BgL_arg1816z00_7471<BgL_odepthz00_7483))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7485;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7486;
BgL_arg1821z00_7486 = 
(BgL_oclassz00_7478); 
BgL_arg1820z00_7485 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7486, BgL_arg1816z00_7471); } 
BgL_res2666z00_7477 = 
(BgL_arg1820z00_7485==BgL_classz00_7469); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7477 = ((bool_t)0); } } } } 
BgL_test5257z00_14369 = BgL_res2666z00_7477; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5257z00_14369 = ((bool_t)0)
; } } 
if(BgL_test5257z00_14369)
{ /* Llib/object.scm 239 */
BgL_oz00_7487 = 
((BgL_z62exceptionz62_bglt)BgL_oz00_5315); }  else 
{ 
 obj_t BgL_auxz00_14411;
BgL_auxz00_14411 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8573L), BGl_string3904z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_oz00_5315); 
FAILURE(BgL_auxz00_14411,BFALSE,BFALSE);} } 
return 
(((BgL_z62exceptionz62_bglt)COBJECT(BgL_oz00_7487))->BgL_locationz00);} } 

}



/* &<@anonymous:1895> */
obj_t BGl_z62zc3z04anonymousza31895ze3ze5zz__objectz00(obj_t BgL_envz00_5316)
{
{ /* Llib/object.scm 239 */
return 
BBOOL(((bool_t)0));} 

}



/* &lambda1894 */
obj_t BGl_z62lambda1894z62zz__objectz00(obj_t BgL_envz00_5317, obj_t BgL_oz00_5318, obj_t BgL_vz00_5319)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_oz00_7506;
{ /* Llib/object.scm 239 */
 bool_t BgL_test5264z00_14417;
{ /* Llib/object.scm 239 */
 obj_t BgL_classz00_7488;
BgL_classz00_7488 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5318))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7489; long BgL_arg1816z00_7490;
BgL_arg1815z00_7489 = 
(BgL_objectz00_bglt)(BgL_oz00_5318); 
BgL_arg1816z00_7490 = 
BGL_CLASS_DEPTH(BgL_classz00_7488); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7491;
BgL_idxz00_7491 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7489); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7492;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7493;
BgL_arg1825z00_7493 = 
(BgL_idxz00_7491+BgL_arg1816z00_7490); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7494;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7495;
BgL_aux3193z00_7495 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7495))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7494 = BgL_aux3193z00_7495; }  else 
{ 
 obj_t BgL_auxz00_14428;
BgL_auxz00_14428 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7495); 
FAILURE(BgL_auxz00_14428,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5268z00_14432;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14433;
BgL_tmpz00_14433 = 
VECTOR_LENGTH(BgL_vectorz00_7494); 
BgL_test5268z00_14432 = 
BOUND_CHECK(BgL_arg1825z00_7493, BgL_tmpz00_14433); } 
if(BgL_test5268z00_14432)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7492 = 
VECTOR_REF(BgL_vectorz00_7494,BgL_arg1825z00_7493); }  else 
{ 
 obj_t BgL_auxz00_14437;
BgL_auxz00_14437 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7494, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7494)), 
(int)(BgL_arg1825z00_7493)); 
FAILURE(BgL_auxz00_14437,BFALSE,BFALSE);} } } } 
BgL_test5264z00_14417 = 
(BgL_arg1824z00_7492==BgL_classz00_7488); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7496;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7497;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7498; long BgL_arg1554z00_7499;
BgL_arg1552z00_7498 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7500;
BgL_arg1555z00_7500 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7489); 
BgL_arg1554z00_7499 = 
(BgL_arg1555z00_7500-OBJECT_TYPE); } 
BgL_oclassz00_7497 = 
VECTOR_REF(BgL_arg1552z00_7498,BgL_arg1554z00_7499); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7501;
BgL__ortest_1222z00_7501 = 
(BgL_classz00_7488==BgL_oclassz00_7497); 
if(BgL__ortest_1222z00_7501)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7496 = BgL__ortest_1222z00_7501; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7502;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7503;
BgL_arg1822z00_7503 = 
(BgL_oclassz00_7497); 
BgL_odepthz00_7502 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7503); } 
if(
(BgL_arg1816z00_7490<BgL_odepthz00_7502))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7504;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7505;
BgL_arg1821z00_7505 = 
(BgL_oclassz00_7497); 
BgL_arg1820z00_7504 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7505, BgL_arg1816z00_7490); } 
BgL_res2666z00_7496 = 
(BgL_arg1820z00_7504==BgL_classz00_7488); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7496 = ((bool_t)0); } } } } 
BgL_test5264z00_14417 = BgL_res2666z00_7496; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5264z00_14417 = ((bool_t)0)
; } } 
if(BgL_test5264z00_14417)
{ /* Llib/object.scm 239 */
BgL_oz00_7506 = 
((BgL_z62exceptionz62_bglt)BgL_oz00_5318); }  else 
{ 
 obj_t BgL_auxz00_14459;
BgL_auxz00_14459 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8573L), BGl_string3905z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_oz00_5318); 
FAILURE(BgL_auxz00_14459,BFALSE,BFALSE);} } 
return 
((((BgL_z62exceptionz62_bglt)COBJECT(BgL_oz00_7506))->BgL_fnamez00)=((obj_t)BgL_vz00_5319),BUNSPEC);} } 

}



/* &lambda1893 */
obj_t BGl_z62lambda1893z62zz__objectz00(obj_t BgL_envz00_5320, obj_t BgL_oz00_5321)
{
{ /* Llib/object.scm 239 */
{ /* Llib/object.scm 239 */
 BgL_z62exceptionz62_bglt BgL_oz00_7525;
{ /* Llib/object.scm 239 */
 bool_t BgL_test5271z00_14464;
{ /* Llib/object.scm 239 */
 obj_t BgL_classz00_7507;
BgL_classz00_7507 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_oz00_5321))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7508; long BgL_arg1816z00_7509;
BgL_arg1815z00_7508 = 
(BgL_objectz00_bglt)(BgL_oz00_5321); 
BgL_arg1816z00_7509 = 
BGL_CLASS_DEPTH(BgL_classz00_7507); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7510;
BgL_idxz00_7510 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7508); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7511;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7512;
BgL_arg1825z00_7512 = 
(BgL_idxz00_7510+BgL_arg1816z00_7509); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7513;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7514;
BgL_aux3193z00_7514 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7514))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7513 = BgL_aux3193z00_7514; }  else 
{ 
 obj_t BgL_auxz00_14475;
BgL_auxz00_14475 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7514); 
FAILURE(BgL_auxz00_14475,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5275z00_14479;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14480;
BgL_tmpz00_14480 = 
VECTOR_LENGTH(BgL_vectorz00_7513); 
BgL_test5275z00_14479 = 
BOUND_CHECK(BgL_arg1825z00_7512, BgL_tmpz00_14480); } 
if(BgL_test5275z00_14479)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7511 = 
VECTOR_REF(BgL_vectorz00_7513,BgL_arg1825z00_7512); }  else 
{ 
 obj_t BgL_auxz00_14484;
BgL_auxz00_14484 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7513, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7513)), 
(int)(BgL_arg1825z00_7512)); 
FAILURE(BgL_auxz00_14484,BFALSE,BFALSE);} } } } 
BgL_test5271z00_14464 = 
(BgL_arg1824z00_7511==BgL_classz00_7507); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7515;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7516;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7517; long BgL_arg1554z00_7518;
BgL_arg1552z00_7517 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7519;
BgL_arg1555z00_7519 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7508); 
BgL_arg1554z00_7518 = 
(BgL_arg1555z00_7519-OBJECT_TYPE); } 
BgL_oclassz00_7516 = 
VECTOR_REF(BgL_arg1552z00_7517,BgL_arg1554z00_7518); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7520;
BgL__ortest_1222z00_7520 = 
(BgL_classz00_7507==BgL_oclassz00_7516); 
if(BgL__ortest_1222z00_7520)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7515 = BgL__ortest_1222z00_7520; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7521;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7522;
BgL_arg1822z00_7522 = 
(BgL_oclassz00_7516); 
BgL_odepthz00_7521 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7522); } 
if(
(BgL_arg1816z00_7509<BgL_odepthz00_7521))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7523;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7524;
BgL_arg1821z00_7524 = 
(BgL_oclassz00_7516); 
BgL_arg1820z00_7523 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7524, BgL_arg1816z00_7509); } 
BgL_res2666z00_7515 = 
(BgL_arg1820z00_7523==BgL_classz00_7507); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7515 = ((bool_t)0); } } } } 
BgL_test5271z00_14464 = BgL_res2666z00_7515; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5271z00_14464 = ((bool_t)0)
; } } 
if(BgL_test5271z00_14464)
{ /* Llib/object.scm 239 */
BgL_oz00_7525 = 
((BgL_z62exceptionz62_bglt)BgL_oz00_5321); }  else 
{ 
 obj_t BgL_auxz00_14506;
BgL_auxz00_14506 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8573L), BGl_string3906z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_oz00_5321); 
FAILURE(BgL_auxz00_14506,BFALSE,BFALSE);} } 
return 
(((BgL_z62exceptionz62_bglt)COBJECT(BgL_oz00_7525))->BgL_fnamez00);} } 

}



/* &<@anonymous:1877> */
obj_t BGl_z62zc3z04anonymousza31877ze3ze5zz__objectz00(obj_t BgL_envz00_5322, obj_t BgL_new1017z00_5323)
{
{ /* Llib/object.scm 237 */
{ 
 BgL_z62conditionz62_bglt BgL_auxz00_14511;
{ /* Llib/object.scm 237 */
 BgL_z62conditionz62_bglt BgL_new1017z00_7544;
{ /* Llib/object.scm 237 */
 bool_t BgL_test5278z00_14512;
{ /* Llib/object.scm 237 */
 obj_t BgL_classz00_7526;
BgL_classz00_7526 = BGl_z62conditionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1017z00_5323))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7527; long BgL_arg1816z00_7528;
BgL_arg1815z00_7527 = 
(BgL_objectz00_bglt)(BgL_new1017z00_5323); 
BgL_arg1816z00_7528 = 
BGL_CLASS_DEPTH(BgL_classz00_7526); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7529;
BgL_idxz00_7529 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7527); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7530;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7531;
BgL_arg1825z00_7531 = 
(BgL_idxz00_7529+BgL_arg1816z00_7528); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7532;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7533;
BgL_aux3193z00_7533 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7533))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7532 = BgL_aux3193z00_7533; }  else 
{ 
 obj_t BgL_auxz00_14523;
BgL_auxz00_14523 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7533); 
FAILURE(BgL_auxz00_14523,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5282z00_14527;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14528;
BgL_tmpz00_14528 = 
VECTOR_LENGTH(BgL_vectorz00_7532); 
BgL_test5282z00_14527 = 
BOUND_CHECK(BgL_arg1825z00_7531, BgL_tmpz00_14528); } 
if(BgL_test5282z00_14527)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7530 = 
VECTOR_REF(BgL_vectorz00_7532,BgL_arg1825z00_7531); }  else 
{ 
 obj_t BgL_auxz00_14532;
BgL_auxz00_14532 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7532, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7532)), 
(int)(BgL_arg1825z00_7531)); 
FAILURE(BgL_auxz00_14532,BFALSE,BFALSE);} } } } 
BgL_test5278z00_14512 = 
(BgL_arg1824z00_7530==BgL_classz00_7526); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7534;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7535;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7536; long BgL_arg1554z00_7537;
BgL_arg1552z00_7536 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7538;
BgL_arg1555z00_7538 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7527); 
BgL_arg1554z00_7537 = 
(BgL_arg1555z00_7538-OBJECT_TYPE); } 
BgL_oclassz00_7535 = 
VECTOR_REF(BgL_arg1552z00_7536,BgL_arg1554z00_7537); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7539;
BgL__ortest_1222z00_7539 = 
(BgL_classz00_7526==BgL_oclassz00_7535); 
if(BgL__ortest_1222z00_7539)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7534 = BgL__ortest_1222z00_7539; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7540;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7541;
BgL_arg1822z00_7541 = 
(BgL_oclassz00_7535); 
BgL_odepthz00_7540 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7541); } 
if(
(BgL_arg1816z00_7528<BgL_odepthz00_7540))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7542;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7543;
BgL_arg1821z00_7543 = 
(BgL_oclassz00_7535); 
BgL_arg1820z00_7542 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7543, BgL_arg1816z00_7528); } 
BgL_res2666z00_7534 = 
(BgL_arg1820z00_7542==BgL_classz00_7526); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7534 = ((bool_t)0); } } } } 
BgL_test5278z00_14512 = BgL_res2666z00_7534; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5278z00_14512 = ((bool_t)0)
; } } 
if(BgL_test5278z00_14512)
{ /* Llib/object.scm 237 */
BgL_new1017z00_7544 = 
((BgL_z62conditionz62_bglt)BgL_new1017z00_5323); }  else 
{ 
 obj_t BgL_auxz00_14554;
BgL_auxz00_14554 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8543L), BGl_string3907z00zz__objectz00, BGl_string3698z00zz__objectz00, BgL_new1017z00_5323); 
FAILURE(BgL_auxz00_14554,BFALSE,BFALSE);} } 
BgL_auxz00_14511 = BgL_new1017z00_7544; } 
return 
((obj_t)BgL_auxz00_14511);} } 

}



/* &lambda1874 */
BgL_z62conditionz62_bglt BGl_z62lambda1874z62zz__objectz00(obj_t BgL_envz00_5324)
{
{ /* Llib/object.scm 237 */
{ /* Llib/object.scm 237 */
 BgL_z62conditionz62_bglt BgL_new1016z00_7545;
BgL_new1016z00_7545 = 
((BgL_z62conditionz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62conditionz62_bgl) ))); 
{ /* Llib/object.scm 237 */
 long BgL_arg1876z00_7546;
BgL_arg1876z00_7546 = 
BGL_CLASS_NUM(BGl_z62conditionz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1016z00_7545), BgL_arg1876z00_7546); } 
return BgL_new1016z00_7545;} } 

}



/* &lambda1870 */
BgL_z62conditionz62_bglt BGl_z62lambda1870z62zz__objectz00(obj_t BgL_envz00_5325)
{
{ /* Llib/object.scm 237 */
{ /* Llib/object.scm 237 */
 BgL_z62conditionz62_bglt BgL_new1232z00_7547;
{ /* Llib/object.scm 237 */
 BgL_z62conditionz62_bglt BgL_new1231z00_7548;
BgL_new1231z00_7548 = 
((BgL_z62conditionz62_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_z62conditionz62_bgl) ))); 
{ /* Llib/object.scm 237 */
 long BgL_arg1873z00_7549;
BgL_arg1873z00_7549 = 
BGL_CLASS_NUM(BGl_z62conditionz62zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(
((BgL_objectz00_bglt)BgL_new1231z00_7548), BgL_arg1873z00_7549); } 
BgL_new1232z00_7547 = BgL_new1231z00_7548; } 
return BgL_new1232z00_7547;} } 

}



/* &<@anonymous:1864> */
obj_t BGl_z62zc3z04anonymousza31864ze3ze5zz__objectz00(obj_t BgL_envz00_5326, obj_t BgL_new1014z00_5327)
{
{ /* Llib/object.scm 236 */
{ 
 BgL_objectz00_bglt BgL_auxz00_14567;
{ /* Llib/object.scm 236 */
 BgL_objectz00_bglt BgL_new1014z00_7568;
{ /* Llib/object.scm 236 */
 bool_t BgL_test5285z00_14568;
{ /* Llib/object.scm 236 */
 obj_t BgL_classz00_7550;
BgL_classz00_7550 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_new1014z00_5327))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7551; long BgL_arg1816z00_7552;
BgL_arg1815z00_7551 = 
(BgL_objectz00_bglt)(BgL_new1014z00_5327); 
BgL_arg1816z00_7552 = 
BGL_CLASS_DEPTH(BgL_classz00_7550); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7553;
BgL_idxz00_7553 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7551); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7554;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7555;
BgL_arg1825z00_7555 = 
(BgL_idxz00_7553+BgL_arg1816z00_7552); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7556;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7557;
BgL_aux3193z00_7557 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7557))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7556 = BgL_aux3193z00_7557; }  else 
{ 
 obj_t BgL_auxz00_14579;
BgL_auxz00_14579 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7557); 
FAILURE(BgL_auxz00_14579,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5289z00_14583;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14584;
BgL_tmpz00_14584 = 
VECTOR_LENGTH(BgL_vectorz00_7556); 
BgL_test5289z00_14583 = 
BOUND_CHECK(BgL_arg1825z00_7555, BgL_tmpz00_14584); } 
if(BgL_test5289z00_14583)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7554 = 
VECTOR_REF(BgL_vectorz00_7556,BgL_arg1825z00_7555); }  else 
{ 
 obj_t BgL_auxz00_14588;
BgL_auxz00_14588 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7556, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7556)), 
(int)(BgL_arg1825z00_7555)); 
FAILURE(BgL_auxz00_14588,BFALSE,BFALSE);} } } } 
BgL_test5285z00_14568 = 
(BgL_arg1824z00_7554==BgL_classz00_7550); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7558;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7559;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7560; long BgL_arg1554z00_7561;
BgL_arg1552z00_7560 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7562;
BgL_arg1555z00_7562 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7551); 
BgL_arg1554z00_7561 = 
(BgL_arg1555z00_7562-OBJECT_TYPE); } 
BgL_oclassz00_7559 = 
VECTOR_REF(BgL_arg1552z00_7560,BgL_arg1554z00_7561); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7563;
BgL__ortest_1222z00_7563 = 
(BgL_classz00_7550==BgL_oclassz00_7559); 
if(BgL__ortest_1222z00_7563)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7558 = BgL__ortest_1222z00_7563; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7564;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7565;
BgL_arg1822z00_7565 = 
(BgL_oclassz00_7559); 
BgL_odepthz00_7564 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7565); } 
if(
(BgL_arg1816z00_7552<BgL_odepthz00_7564))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7566;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7567;
BgL_arg1821z00_7567 = 
(BgL_oclassz00_7559); 
BgL_arg1820z00_7566 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7567, BgL_arg1816z00_7552); } 
BgL_res2666z00_7558 = 
(BgL_arg1820z00_7566==BgL_classz00_7550); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7558 = ((bool_t)0); } } } } 
BgL_test5285z00_14568 = BgL_res2666z00_7558; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5285z00_14568 = ((bool_t)0)
; } } 
if(BgL_test5285z00_14568)
{ /* Llib/object.scm 236 */
BgL_new1014z00_7568 = 
((BgL_objectz00_bglt)BgL_new1014z00_5327); }  else 
{ 
 obj_t BgL_auxz00_14610;
BgL_auxz00_14610 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(8515L), BGl_string3908z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_new1014z00_5327); 
FAILURE(BgL_auxz00_14610,BFALSE,BFALSE);} } 
BgL_auxz00_14567 = BgL_new1014z00_7568; } 
return 
((obj_t)BgL_auxz00_14567);} } 

}



/* &lambda1862 */
BgL_objectz00_bglt BGl_z62lambda1862z62zz__objectz00(obj_t BgL_envz00_5328)
{
{ /* Llib/object.scm 236 */
{ /* Llib/object.scm 236 */
 BgL_objectz00_bglt BgL_new1013z00_7569;
BgL_new1013z00_7569 = 
((BgL_objectz00_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_objectz00_bgl) ))); 
{ /* Llib/object.scm 236 */
 long BgL_arg1863z00_7570;
BgL_arg1863z00_7570 = 
BGL_CLASS_NUM(BGl_objectz00zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(BgL_new1013z00_7569, BgL_arg1863z00_7570); } 
return BgL_new1013z00_7569;} } 

}



/* &lambda1860 */
BgL_objectz00_bglt BGl_z62lambda1860z62zz__objectz00(obj_t BgL_envz00_5329)
{
{ /* Llib/object.scm 236 */
{ /* Llib/object.scm 236 */
 BgL_objectz00_bglt BgL_new1230z00_7571;
{ /* Llib/object.scm 236 */
 BgL_objectz00_bglt BgL_new1228z00_7572;
BgL_new1228z00_7572 = 
((BgL_objectz00_bglt)BOBJECT( GC_MALLOC( sizeof(struct BgL_objectz00_bgl) ))); 
{ /* Llib/object.scm 236 */
 long BgL_arg1861z00_7573;
BgL_arg1861z00_7573 = 
BGL_CLASS_NUM(BGl_objectz00zz__objectz00); 
BGL_OBJECT_CLASS_NUM_SET(BgL_new1228z00_7572, BgL_arg1861z00_7573); } 
BgL_new1230z00_7571 = BgL_new1228z00_7572; } 
return BgL_new1230z00_7571;} } 

}



/* generic-init */
obj_t BGl_genericzd2initzd2zz__objectz00(void)
{
{ /* Llib/object.scm 17 */
{ /* Llib/object.scm 17 */
 obj_t BgL_classzd2minzd2_4225;
BgL_classzd2minzd2_4225 = BGl_objectz00zz__objectz00; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_top5293z00_14622;
BgL_top5293z00_14622 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top5293z00_14622, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_tmp5292z00_14621;
BgL_tmp5292z00_14621 = 
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BGl_objectzd2displayzd2envz00zz__objectz00, BGl_proc3909z00zz__objectz00, BGl_string3910z00zz__objectz00); 
BGL_EXITD_POP_PROTECT(BgL_top5293z00_14622); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); BgL_tmp5292z00_14621; } } } 
{ /* Llib/object.scm 17 */
 obj_t BgL_classzd2minzd2_4230;
BgL_classzd2minzd2_4230 = BGl_objectz00zz__objectz00; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_top5295z00_14630;
BgL_top5295z00_14630 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top5295z00_14630, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_tmp5294z00_14629;
BgL_tmp5294z00_14629 = 
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BGl_objectzd2writezd2envz00zz__objectz00, BGl_proc3911z00zz__objectz00, BGl_string3912z00zz__objectz00); 
BGL_EXITD_POP_PROTECT(BgL_top5295z00_14630); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); BgL_tmp5294z00_14629; } } } 
{ /* Llib/object.scm 17 */
 obj_t BgL_classzd2minzd2_4231;
BgL_classzd2minzd2_4231 = BGl_objectz00zz__objectz00; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_top5297z00_14638;
BgL_top5297z00_14638 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top5297z00_14638, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_tmp5296z00_14637;
BgL_tmp5296z00_14637 = 
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BGl_objectzd2hashnumberzd2envz00zz__objectz00, BGl_proc3913z00zz__objectz00, BGl_string3914z00zz__objectz00); 
BGL_EXITD_POP_PROTECT(BgL_top5297z00_14638); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); BgL_tmp5296z00_14637; } } } 
{ /* Llib/object.scm 17 */
 obj_t BgL_classzd2minzd2_4265;
BgL_classzd2minzd2_4265 = BGl_objectz00zz__objectz00; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_top5299z00_14646;
BgL_top5299z00_14646 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top5299z00_14646, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_tmp5298z00_14645;
BgL_tmp5298z00_14645 = 
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BGl_objectzd2printzd2envz00zz__objectz00, BGl_proc3915z00zz__objectz00, BGl_string3916z00zz__objectz00); 
BGL_EXITD_POP_PROTECT(BgL_top5299z00_14646); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); BgL_tmp5298z00_14645; } } } 
{ /* Llib/object.scm 17 */
 obj_t BgL_classzd2minzd2_4303;
BgL_classzd2minzd2_4303 = BGl_objectz00zz__objectz00; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_top5301z00_14654;
BgL_top5301z00_14654 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top5301z00_14654, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_tmp5300z00_14653;
BgL_tmp5300z00_14653 = 
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BGl_objectzd2equalzf3zd2envzf3zz__objectz00, BGl_proc3917z00zz__objectz00, BGl_string3918z00zz__objectz00); 
BGL_EXITD_POP_PROTECT(BgL_top5301z00_14654); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); BgL_tmp5300z00_14653; } } } 
{ /* Llib/object.scm 1156 */
 obj_t BgL_top5303z00_14662;
BgL_top5303z00_14662 = 
BGL_EXITD_TOP_AS_OBJ(); 
BGL_MUTEX_LOCK(bigloo_generic_mutex); 
BGL_EXITD_PUSH_PROTECT(BgL_top5303z00_14662, bigloo_generic_mutex); BUNSPEC; 
{ /* Llib/object.scm 1156 */
 obj_t BgL_tmp5302z00_14661;
BgL_tmp5302z00_14661 = 
BGl_registerzd2genericzd2sanszd2lockz12zc0zz__objectz00(BGl_exceptionzd2notifyzd2envz00zz__objectz00, BGl_proc3919z00zz__objectz00, BGl_string3920z00zz__objectz00); 
BGL_EXITD_POP_PROTECT(BgL_top5303z00_14662); BUNSPEC; 
BGL_MUTEX_UNLOCK(bigloo_generic_mutex); 
return BgL_tmp5302z00_14661;} } } 

}



/* &exception-notify1405 */
obj_t BGl_z62exceptionzd2notify1405zb0zz__objectz00(obj_t BgL_envz00_5342, obj_t BgL_excz00_5343)
{
{ /* Llib/object.scm 1496 */
{ /* Llib/object.scm 1497 */
 obj_t BgL_portz00_7592;
{ /* Llib/object.scm 1497 */
 obj_t BgL_tmpz00_14669;
BgL_tmpz00_14669 = 
BGL_CURRENT_DYNAMIC_ENV(); 
BgL_portz00_7592 = 
BGL_ENV_CURRENT_ERROR_PORT(BgL_tmpz00_14669); } 
bgl_display_string(BGl_string3921z00zz__objectz00, BgL_portz00_7592); 
BGl_writezd2circlezd2zz__pp_circlez00(BgL_excz00_5343, BgL_portz00_7592); 
if(
CBOOL(
BGl_currentzd2threadzd2zz__threadz00()))
{ /* Llib/object.scm 1500 */
bgl_display_string(BGl_string3922z00zz__objectz00, BgL_portz00_7592); 
bgl_display_obj(
BGl_currentzd2threadzd2zz__threadz00(), BgL_portz00_7592); 
bgl_display_string(BGl_string3923z00zz__objectz00, BgL_portz00_7592); }  else 
{ /* Llib/object.scm 1500 */BFALSE; } 
bgl_display_char(((unsigned char)10), BgL_portz00_7592); 
{ /* Llib/object.scm 1505 */
 obj_t BgL_stackz00_7593;
{ /* Llib/object.scm 1505 */
 bool_t BgL_test5305z00_14682;
{ /* Llib/object.scm 1505 */
 obj_t BgL_classz00_7594;
BgL_classz00_7594 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_excz00_5343))
{ /* Llib/object.scm 1341 */
 BgL_objectz00_bglt BgL_arg1818z00_7595;
BgL_arg1818z00_7595 = 
(BgL_objectz00_bglt)(BgL_excz00_5343); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7596;
BgL_idxz00_7596 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1818z00_7595); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7597;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7598;
BgL_arg1825z00_7598 = 
(BgL_idxz00_7596+2L); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7599;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3408z00_7600;
BgL_aux3408z00_7600 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3408z00_7600))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7599 = BgL_aux3408z00_7600; }  else 
{ 
 obj_t BgL_auxz00_14692;
BgL_auxz00_14692 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3920z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3408z00_7600); 
FAILURE(BgL_auxz00_14692,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5309z00_14696;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14697;
BgL_tmpz00_14697 = 
VECTOR_LENGTH(BgL_vectorz00_7599); 
BgL_test5309z00_14696 = 
BOUND_CHECK(BgL_arg1825z00_7598, BgL_tmpz00_14697); } 
if(BgL_test5309z00_14696)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7597 = 
VECTOR_REF(BgL_vectorz00_7599,BgL_arg1825z00_7598); }  else 
{ 
 obj_t BgL_auxz00_14701;
BgL_auxz00_14701 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7599, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7599)), 
(int)(BgL_arg1825z00_7598)); 
FAILURE(BgL_auxz00_14701,BFALSE,BFALSE);} } } } 
BgL_test5305z00_14682 = 
(BgL_arg1824z00_7597==BgL_classz00_7594); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2685z00_7601;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7602;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7603; long BgL_arg1554z00_7604;
BgL_arg1552z00_7603 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7605;
BgL_arg1555z00_7605 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1818z00_7595); 
BgL_arg1554z00_7604 = 
(BgL_arg1555z00_7605-OBJECT_TYPE); } 
BgL_oclassz00_7602 = 
VECTOR_REF(BgL_arg1552z00_7603,BgL_arg1554z00_7604); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7606;
BgL__ortest_1222z00_7606 = 
(BgL_classz00_7594==BgL_oclassz00_7602); 
if(BgL__ortest_1222z00_7606)
{ /* Llib/object.scm 1363 */
BgL_res2685z00_7601 = BgL__ortest_1222z00_7606; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7607;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7608;
BgL_arg1822z00_7608 = 
(BgL_oclassz00_7602); 
BgL_odepthz00_7607 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7608); } 
if(
(2L<BgL_odepthz00_7607))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7609;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7610;
BgL_arg1821z00_7610 = 
(BgL_oclassz00_7602); 
BgL_arg1820z00_7609 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7610, 2L); } 
BgL_res2685z00_7601 = 
(BgL_arg1820z00_7609==BgL_classz00_7594); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2685z00_7601 = ((bool_t)0); } } } } 
BgL_test5305z00_14682 = BgL_res2685z00_7601; } }  else 
{ /* Llib/object.scm 1340 */
BgL_test5305z00_14682 = ((bool_t)0)
; } } 
if(BgL_test5305z00_14682)
{ /* Llib/object.scm 1506 */
 BgL_z62exceptionz62_bglt BgL_i1225z00_7611;
{ /* Llib/object.scm 1507 */
 bool_t BgL_test5312z00_14722;
{ /* Llib/object.scm 1507 */
 obj_t BgL_classz00_7612;
BgL_classz00_7612 = BGl_z62exceptionz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_excz00_5343))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7613; long BgL_arg1816z00_7614;
BgL_arg1815z00_7613 = 
(BgL_objectz00_bglt)(BgL_excz00_5343); 
BgL_arg1816z00_7614 = 
BGL_CLASS_DEPTH(BgL_classz00_7612); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7615;
BgL_idxz00_7615 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7613); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7616;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7617;
BgL_arg1825z00_7617 = 
(BgL_idxz00_7615+BgL_arg1816z00_7614); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7618;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7619;
BgL_aux3193z00_7619 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7619))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7618 = BgL_aux3193z00_7619; }  else 
{ 
 obj_t BgL_auxz00_14733;
BgL_auxz00_14733 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7619); 
FAILURE(BgL_auxz00_14733,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5316z00_14737;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14738;
BgL_tmpz00_14738 = 
VECTOR_LENGTH(BgL_vectorz00_7618); 
BgL_test5316z00_14737 = 
BOUND_CHECK(BgL_arg1825z00_7617, BgL_tmpz00_14738); } 
if(BgL_test5316z00_14737)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7616 = 
VECTOR_REF(BgL_vectorz00_7618,BgL_arg1825z00_7617); }  else 
{ 
 obj_t BgL_auxz00_14742;
BgL_auxz00_14742 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7618, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7618)), 
(int)(BgL_arg1825z00_7617)); 
FAILURE(BgL_auxz00_14742,BFALSE,BFALSE);} } } } 
BgL_test5312z00_14722 = 
(BgL_arg1824z00_7616==BgL_classz00_7612); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7620;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7621;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7622; long BgL_arg1554z00_7623;
BgL_arg1552z00_7622 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7624;
BgL_arg1555z00_7624 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7613); 
BgL_arg1554z00_7623 = 
(BgL_arg1555z00_7624-OBJECT_TYPE); } 
BgL_oclassz00_7621 = 
VECTOR_REF(BgL_arg1552z00_7622,BgL_arg1554z00_7623); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7625;
BgL__ortest_1222z00_7625 = 
(BgL_classz00_7612==BgL_oclassz00_7621); 
if(BgL__ortest_1222z00_7625)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7620 = BgL__ortest_1222z00_7625; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7626;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7627;
BgL_arg1822z00_7627 = 
(BgL_oclassz00_7621); 
BgL_odepthz00_7626 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7627); } 
if(
(BgL_arg1816z00_7614<BgL_odepthz00_7626))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7628;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7629;
BgL_arg1821z00_7629 = 
(BgL_oclassz00_7621); 
BgL_arg1820z00_7628 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7629, BgL_arg1816z00_7614); } 
BgL_res2666z00_7620 = 
(BgL_arg1820z00_7628==BgL_classz00_7612); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7620 = ((bool_t)0); } } } } 
BgL_test5312z00_14722 = BgL_res2666z00_7620; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5312z00_14722 = ((bool_t)0)
; } } 
if(BgL_test5312z00_14722)
{ /* Llib/object.scm 1507 */
BgL_i1225z00_7611 = 
((BgL_z62exceptionz62_bglt)BgL_excz00_5343); }  else 
{ 
 obj_t BgL_auxz00_14764;
BgL_auxz00_14764 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(65695L), BGl_string3920z00zz__objectz00, BGl_string3718z00zz__objectz00, BgL_excz00_5343); 
FAILURE(BgL_auxz00_14764,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1507 */
 obj_t BgL__ortest_1226z00_7630;
BgL__ortest_1226z00_7630 = 
(((BgL_z62exceptionz62_bglt)COBJECT(BgL_i1225z00_7611))->BgL_stackz00); 
if(
CBOOL(BgL__ortest_1226z00_7630))
{ /* Llib/object.scm 1507 */
BgL_stackz00_7593 = BgL__ortest_1226z00_7630; }  else 
{ /* Llib/object.scm 1507 */

{ /* Llib/object.scm 1507 */

BgL_stackz00_7593 = 
BGl_getzd2tracezd2stackz00zz__errorz00(BFALSE); } } } }  else 
{ /* Llib/object.scm 1508 */

{ /* Llib/object.scm 1508 */

BgL_stackz00_7593 = 
BGl_getzd2tracezd2stackz00zz__errorz00(BFALSE); } } } 
{ /* Llib/object.scm 1505 */

return 
BGl_displayzd2tracezd2stackz00zz__errorz00(BgL_stackz00_7593, BgL_portz00_7592, 
BINT(1L));} } } } 

}



/* &object-equal?1403 */
obj_t BGl_z62objectzd2equalzf31403z43zz__objectz00(obj_t BgL_envz00_5344, obj_t BgL_obj1z00_5345, obj_t BgL_obj2z00_5346)
{
{ /* Llib/object.scm 1476 */
{ /* Llib/object.scm 1480 */
 bool_t BgL_tmpz00_14775;
{ /* Llib/object.scm 1480 */
 BgL_objectz00_bglt BgL_obj1z00_7667; BgL_objectz00_bglt BgL_obj2z00_7668;
{ /* Llib/object.scm 1480 */
 bool_t BgL_test5320z00_14776;
{ /* Llib/object.scm 1480 */
 obj_t BgL_classz00_7631;
BgL_classz00_7631 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_obj1z00_5345))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7632; long BgL_arg1816z00_7633;
BgL_arg1815z00_7632 = 
(BgL_objectz00_bglt)(BgL_obj1z00_5345); 
BgL_arg1816z00_7633 = 
BGL_CLASS_DEPTH(BgL_classz00_7631); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7634;
BgL_idxz00_7634 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7632); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7635;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7636;
BgL_arg1825z00_7636 = 
(BgL_idxz00_7634+BgL_arg1816z00_7633); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7637;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7638;
BgL_aux3193z00_7638 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7638))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7637 = BgL_aux3193z00_7638; }  else 
{ 
 obj_t BgL_auxz00_14787;
BgL_auxz00_14787 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7638); 
FAILURE(BgL_auxz00_14787,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5324z00_14791;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14792;
BgL_tmpz00_14792 = 
VECTOR_LENGTH(BgL_vectorz00_7637); 
BgL_test5324z00_14791 = 
BOUND_CHECK(BgL_arg1825z00_7636, BgL_tmpz00_14792); } 
if(BgL_test5324z00_14791)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7635 = 
VECTOR_REF(BgL_vectorz00_7637,BgL_arg1825z00_7636); }  else 
{ 
 obj_t BgL_auxz00_14796;
BgL_auxz00_14796 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7637, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7637)), 
(int)(BgL_arg1825z00_7636)); 
FAILURE(BgL_auxz00_14796,BFALSE,BFALSE);} } } } 
BgL_test5320z00_14776 = 
(BgL_arg1824z00_7635==BgL_classz00_7631); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7639;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7640;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7641; long BgL_arg1554z00_7642;
BgL_arg1552z00_7641 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7643;
BgL_arg1555z00_7643 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7632); 
BgL_arg1554z00_7642 = 
(BgL_arg1555z00_7643-OBJECT_TYPE); } 
BgL_oclassz00_7640 = 
VECTOR_REF(BgL_arg1552z00_7641,BgL_arg1554z00_7642); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7644;
BgL__ortest_1222z00_7644 = 
(BgL_classz00_7631==BgL_oclassz00_7640); 
if(BgL__ortest_1222z00_7644)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7639 = BgL__ortest_1222z00_7644; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7645;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7646;
BgL_arg1822z00_7646 = 
(BgL_oclassz00_7640); 
BgL_odepthz00_7645 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7646); } 
if(
(BgL_arg1816z00_7633<BgL_odepthz00_7645))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7647;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7648;
BgL_arg1821z00_7648 = 
(BgL_oclassz00_7640); 
BgL_arg1820z00_7647 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7648, BgL_arg1816z00_7633); } 
BgL_res2666z00_7639 = 
(BgL_arg1820z00_7647==BgL_classz00_7631); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7639 = ((bool_t)0); } } } } 
BgL_test5320z00_14776 = BgL_res2666z00_7639; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5320z00_14776 = ((bool_t)0)
; } } 
if(BgL_test5320z00_14776)
{ /* Llib/object.scm 1480 */
BgL_obj1z00_7667 = 
((BgL_objectz00_bglt)BgL_obj1z00_5345); }  else 
{ 
 obj_t BgL_auxz00_14818;
BgL_auxz00_14818 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(64755L), BGl_string3932z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_obj1z00_5345); 
FAILURE(BgL_auxz00_14818,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1480 */
 bool_t BgL_test5327z00_14822;
{ /* Llib/object.scm 1480 */
 obj_t BgL_classz00_7649;
BgL_classz00_7649 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_obj2z00_5346))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7650; long BgL_arg1816z00_7651;
BgL_arg1815z00_7650 = 
(BgL_objectz00_bglt)(BgL_obj2z00_5346); 
BgL_arg1816z00_7651 = 
BGL_CLASS_DEPTH(BgL_classz00_7649); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7652;
BgL_idxz00_7652 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7650); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7653;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7654;
BgL_arg1825z00_7654 = 
(BgL_idxz00_7652+BgL_arg1816z00_7651); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7655;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7656;
BgL_aux3193z00_7656 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7656))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7655 = BgL_aux3193z00_7656; }  else 
{ 
 obj_t BgL_auxz00_14833;
BgL_auxz00_14833 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7656); 
FAILURE(BgL_auxz00_14833,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5331z00_14837;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14838;
BgL_tmpz00_14838 = 
VECTOR_LENGTH(BgL_vectorz00_7655); 
BgL_test5331z00_14837 = 
BOUND_CHECK(BgL_arg1825z00_7654, BgL_tmpz00_14838); } 
if(BgL_test5331z00_14837)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7653 = 
VECTOR_REF(BgL_vectorz00_7655,BgL_arg1825z00_7654); }  else 
{ 
 obj_t BgL_auxz00_14842;
BgL_auxz00_14842 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7655, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7655)), 
(int)(BgL_arg1825z00_7654)); 
FAILURE(BgL_auxz00_14842,BFALSE,BFALSE);} } } } 
BgL_test5327z00_14822 = 
(BgL_arg1824z00_7653==BgL_classz00_7649); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7657;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7658;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7659; long BgL_arg1554z00_7660;
BgL_arg1552z00_7659 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7661;
BgL_arg1555z00_7661 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7650); 
BgL_arg1554z00_7660 = 
(BgL_arg1555z00_7661-OBJECT_TYPE); } 
BgL_oclassz00_7658 = 
VECTOR_REF(BgL_arg1552z00_7659,BgL_arg1554z00_7660); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7662;
BgL__ortest_1222z00_7662 = 
(BgL_classz00_7649==BgL_oclassz00_7658); 
if(BgL__ortest_1222z00_7662)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7657 = BgL__ortest_1222z00_7662; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7663;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7664;
BgL_arg1822z00_7664 = 
(BgL_oclassz00_7658); 
BgL_odepthz00_7663 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7664); } 
if(
(BgL_arg1816z00_7651<BgL_odepthz00_7663))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7665;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7666;
BgL_arg1821z00_7666 = 
(BgL_oclassz00_7658); 
BgL_arg1820z00_7665 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7666, BgL_arg1816z00_7651); } 
BgL_res2666z00_7657 = 
(BgL_arg1820z00_7665==BgL_classz00_7649); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7657 = ((bool_t)0); } } } } 
BgL_test5327z00_14822 = BgL_res2666z00_7657; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5327z00_14822 = ((bool_t)0)
; } } 
if(BgL_test5327z00_14822)
{ /* Llib/object.scm 1480 */
BgL_obj2z00_7668 = 
((BgL_objectz00_bglt)BgL_obj2z00_5346); }  else 
{ 
 obj_t BgL_auxz00_14864;
BgL_auxz00_14864 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(64755L), BGl_string3932z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_obj2z00_5346); 
FAILURE(BgL_auxz00_14864,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1480 */
 obj_t BgL_class1z00_7669; obj_t BgL_class2z00_7670;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7671; long BgL_arg1554z00_7672;
BgL_arg1552z00_7671 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7673;
BgL_arg1555z00_7673 = 
BGL_OBJECT_CLASS_NUM(BgL_obj1z00_7667); 
BgL_arg1554z00_7672 = 
(BgL_arg1555z00_7673-OBJECT_TYPE); } 
BgL_class1z00_7669 = 
VECTOR_REF(BgL_arg1552z00_7671,BgL_arg1554z00_7672); } 
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7674; long BgL_arg1554z00_7675;
BgL_arg1552z00_7674 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7676;
BgL_arg1555z00_7676 = 
BGL_OBJECT_CLASS_NUM(BgL_obj2z00_7668); 
BgL_arg1554z00_7675 = 
(BgL_arg1555z00_7676-OBJECT_TYPE); } 
BgL_class2z00_7670 = 
VECTOR_REF(BgL_arg1552z00_7674,BgL_arg1554z00_7675); } 
if(
(BgL_class1z00_7669==BgL_class2z00_7670))
{ /* Llib/object.scm 1483 */
 obj_t BgL_fieldsz00_7677;
{ /* Llib/object.scm 1483 */
 obj_t BgL_classz00_7678;
if(
BGL_CLASSP(BgL_class1z00_7669))
{ /* Llib/object.scm 1483 */
BgL_classz00_7678 = BgL_class1z00_7669; }  else 
{ 
 obj_t BgL_auxz00_14880;
BgL_auxz00_14880 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(64888L), BGl_string3918z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_class1z00_7669); 
FAILURE(BgL_auxz00_14880,BFALSE,BFALSE);} 
BgL_fieldsz00_7677 = 
BGL_CLASS_ALL_FIELDS(BgL_classz00_7678); } 
{ /* Llib/object.scm 1484 */
 long BgL_g1224z00_7679;
BgL_g1224z00_7679 = 
(
VECTOR_LENGTH(BgL_fieldsz00_7677)-1L); 
{ 
 long BgL_iz00_7681;
BgL_iz00_7681 = BgL_g1224z00_7679; 
BgL_loopz00_7680:
if(
(BgL_iz00_7681==(-1L)))
{ /* Llib/object.scm 1486 */
BgL_tmpz00_14775 = ((bool_t)1)
; }  else 
{ /* Llib/object.scm 1488 */
 bool_t BgL_test5337z00_14889;
{ /* Llib/object.scm 1488 */
 obj_t BgL_arg2210z00_7682;
BgL_arg2210z00_7682 = 
VECTOR_REF(BgL_fieldsz00_7677,BgL_iz00_7681); 
{ /* Llib/object.scm 1478 */
 obj_t BgL_getzd2valuezd2_7683;
{ /* Llib/object.scm 1478 */
 obj_t BgL_res2684z00_7684;
{ /* Llib/object.scm 1478 */
 obj_t BgL_fieldz00_7685;
if(
BGl_classzd2fieldzf3z21zz__objectz00(BgL_arg2210z00_7682))
{ /* Llib/object.scm 1478 */
BgL_fieldz00_7685 = BgL_arg2210z00_7682; }  else 
{ 
 obj_t BgL_auxz00_14893;
BgL_auxz00_14893 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(64696L), BGl_string3484z00zz__objectz00, BGl_string3508z00zz__objectz00, BgL_arg2210z00_7682); 
FAILURE(BgL_auxz00_14893,BFALSE,BFALSE);} 
{ /* Llib/object.scm 618 */
 obj_t BgL_vectorz00_7686;
BgL_vectorz00_7686 = BgL_fieldz00_7685; 
{ /* Llib/object.scm 618 */
 obj_t BgL_aux3416z00_7687;
BgL_aux3416z00_7687 = 
VECTOR_REF(BgL_vectorz00_7686,1L); 
if(
PROCEDUREP(BgL_aux3416z00_7687))
{ /* Llib/object.scm 618 */
BgL_res2684z00_7684 = BgL_aux3416z00_7687; }  else 
{ 
 obj_t BgL_auxz00_14900;
BgL_auxz00_14900 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(26231L), BGl_string3484z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3416z00_7687); 
FAILURE(BgL_auxz00_14900,BFALSE,BFALSE);} } } } 
BgL_getzd2valuezd2_7683 = BgL_res2684z00_7684; } 
{ /* Llib/object.scm 1479 */
 obj_t BgL_arg2213z00_7688; obj_t BgL_arg2214z00_7689;
if(
PROCEDURE_CORRECT_ARITYP(BgL_getzd2valuezd2_7683, 1))
{ /* Llib/object.scm 1479 */
BgL_arg2213z00_7688 = 
BGL_PROCEDURE_CALL1(BgL_getzd2valuezd2_7683, 
((obj_t)BgL_obj1z00_7667)); }  else 
{ /* Llib/object.scm 1479 */
FAILURE(BGl_string3646z00zz__objectz00,BGl_list3924z00zz__objectz00,BgL_getzd2valuezd2_7683);} 
if(
PROCEDURE_CORRECT_ARITYP(BgL_getzd2valuezd2_7683, 1))
{ /* Llib/object.scm 1479 */
BgL_arg2214z00_7689 = 
BGL_PROCEDURE_CALL1(BgL_getzd2valuezd2_7683, 
((obj_t)BgL_obj2z00_7668)); }  else 
{ /* Llib/object.scm 1479 */
FAILURE(BGl_string3646z00zz__objectz00,BGl_list3929z00zz__objectz00,BgL_getzd2valuezd2_7683);} 
BgL_test5337z00_14889 = 
BGl_equalzf3zf3zz__r4_equivalence_6_2z00(BgL_arg2213z00_7688, BgL_arg2214z00_7689); } } } 
if(BgL_test5337z00_14889)
{ 
 long BgL_iz00_14921;
BgL_iz00_14921 = 
(BgL_iz00_7681-1L); 
BgL_iz00_7681 = BgL_iz00_14921; 
goto BgL_loopz00_7680;}  else 
{ /* Llib/object.scm 1488 */
BgL_tmpz00_14775 = ((bool_t)0)
; } } } } }  else 
{ /* Llib/object.scm 1482 */
BgL_tmpz00_14775 = ((bool_t)0)
; } } } 
return 
BBOOL(BgL_tmpz00_14775);} } 

}



/* &object-print1401 */
obj_t BGl_z62objectzd2print1401zb0zz__objectz00(obj_t BgL_envz00_5347, obj_t BgL_objz00_5348, obj_t BgL_portz00_5349, obj_t BgL_printzd2slotzd2_5350)
{
{ /* Llib/object.scm 1445 */
{ /* Llib/object.scm 1457 */
 BgL_objectz00_bglt BgL_objz00_7708; obj_t BgL_portz00_7709; obj_t BgL_printzd2slotzd2_7710;
{ /* Llib/object.scm 1457 */
 bool_t BgL_test5342z00_14924;
{ /* Llib/object.scm 1457 */
 obj_t BgL_classz00_7690;
BgL_classz00_7690 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objz00_5348))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7691; long BgL_arg1816z00_7692;
BgL_arg1815z00_7691 = 
(BgL_objectz00_bglt)(BgL_objz00_5348); 
BgL_arg1816z00_7692 = 
BGL_CLASS_DEPTH(BgL_classz00_7690); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7693;
BgL_idxz00_7693 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7691); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7694;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7695;
BgL_arg1825z00_7695 = 
(BgL_idxz00_7693+BgL_arg1816z00_7692); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7696;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7697;
BgL_aux3193z00_7697 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7697))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7696 = BgL_aux3193z00_7697; }  else 
{ 
 obj_t BgL_auxz00_14935;
BgL_auxz00_14935 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7697); 
FAILURE(BgL_auxz00_14935,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5346z00_14939;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_14940;
BgL_tmpz00_14940 = 
VECTOR_LENGTH(BgL_vectorz00_7696); 
BgL_test5346z00_14939 = 
BOUND_CHECK(BgL_arg1825z00_7695, BgL_tmpz00_14940); } 
if(BgL_test5346z00_14939)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7694 = 
VECTOR_REF(BgL_vectorz00_7696,BgL_arg1825z00_7695); }  else 
{ 
 obj_t BgL_auxz00_14944;
BgL_auxz00_14944 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7696, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7696)), 
(int)(BgL_arg1825z00_7695)); 
FAILURE(BgL_auxz00_14944,BFALSE,BFALSE);} } } } 
BgL_test5342z00_14924 = 
(BgL_arg1824z00_7694==BgL_classz00_7690); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7698;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7699;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7700; long BgL_arg1554z00_7701;
BgL_arg1552z00_7700 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7702;
BgL_arg1555z00_7702 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7691); 
BgL_arg1554z00_7701 = 
(BgL_arg1555z00_7702-OBJECT_TYPE); } 
BgL_oclassz00_7699 = 
VECTOR_REF(BgL_arg1552z00_7700,BgL_arg1554z00_7701); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7703;
BgL__ortest_1222z00_7703 = 
(BgL_classz00_7690==BgL_oclassz00_7699); 
if(BgL__ortest_1222z00_7703)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7698 = BgL__ortest_1222z00_7703; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7704;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7705;
BgL_arg1822z00_7705 = 
(BgL_oclassz00_7699); 
BgL_odepthz00_7704 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7705); } 
if(
(BgL_arg1816z00_7692<BgL_odepthz00_7704))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7706;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7707;
BgL_arg1821z00_7707 = 
(BgL_oclassz00_7699); 
BgL_arg1820z00_7706 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7707, BgL_arg1816z00_7692); } 
BgL_res2666z00_7698 = 
(BgL_arg1820z00_7706==BgL_classz00_7690); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7698 = ((bool_t)0); } } } } 
BgL_test5342z00_14924 = BgL_res2666z00_7698; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5342z00_14924 = ((bool_t)0)
; } } 
if(BgL_test5342z00_14924)
{ /* Llib/object.scm 1457 */
BgL_objz00_7708 = 
((BgL_objectz00_bglt)BgL_objz00_5348); }  else 
{ 
 obj_t BgL_auxz00_14966;
BgL_auxz00_14966 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63658L), BGl_string3936z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_5348); 
FAILURE(BgL_auxz00_14966,BFALSE,BFALSE);} } 
if(
OUTPUT_PORTP(BgL_portz00_5349))
{ /* Llib/object.scm 1457 */
BgL_portz00_7709 = BgL_portz00_5349; }  else 
{ 
 obj_t BgL_auxz00_14972;
BgL_auxz00_14972 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63658L), BGl_string3936z00zz__objectz00, BGl_string3937z00zz__objectz00, BgL_portz00_5349); 
FAILURE(BgL_auxz00_14972,BFALSE,BFALSE);} 
if(
PROCEDUREP(BgL_printzd2slotzd2_5350))
{ /* Llib/object.scm 1457 */
BgL_printzd2slotzd2_7710 = BgL_printzd2slotzd2_5350; }  else 
{ 
 obj_t BgL_auxz00_14978;
BgL_auxz00_14978 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63658L), BGl_string3936z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_printzd2slotzd2_5350); 
FAILURE(BgL_auxz00_14978,BFALSE,BFALSE);} 
{ /* Llib/object.scm 1457 */
 obj_t BgL_classz00_7711;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7712; long BgL_arg1554z00_7713;
BgL_arg1552z00_7712 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7714;
BgL_arg1555z00_7714 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_7708); 
BgL_arg1554z00_7713 = 
(BgL_arg1555z00_7714-OBJECT_TYPE); } 
BgL_classz00_7711 = 
VECTOR_REF(BgL_arg1552z00_7712,BgL_arg1554z00_7713); } 
{ /* Llib/object.scm 1457 */
 obj_t BgL_classzd2namezd2_7715;
{ /* Llib/object.scm 1458 */
 obj_t BgL_classz00_7716;
if(
BGL_CLASSP(BgL_classz00_7711))
{ /* Llib/object.scm 1458 */
BgL_classz00_7716 = BgL_classz00_7711; }  else 
{ 
 obj_t BgL_auxz00_14988;
BgL_auxz00_14988 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63719L), BGl_string3916z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_7711); 
FAILURE(BgL_auxz00_14988,BFALSE,BFALSE);} 
BgL_classzd2namezd2_7715 = 
BGL_CLASS_NAME(BgL_classz00_7716); } 
{ /* Llib/object.scm 1458 */
 obj_t BgL_fieldsz00_7717;
{ /* Llib/object.scm 1459 */
 obj_t BgL_classz00_7718;
if(
BGL_CLASSP(BgL_classz00_7711))
{ /* Llib/object.scm 1459 */
BgL_classz00_7718 = BgL_classz00_7711; }  else 
{ 
 obj_t BgL_auxz00_14995;
BgL_auxz00_14995 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63756L), BGl_string3916z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_7711); 
FAILURE(BgL_auxz00_14995,BFALSE,BFALSE);} 
BgL_fieldsz00_7717 = 
BGL_CLASS_ALL_FIELDS(BgL_classz00_7718); } 
{ /* Llib/object.scm 1460 */

bgl_display_string(BGl_string3933z00zz__objectz00, BgL_portz00_7709); 
bgl_display_obj(BgL_classzd2namezd2_7715, BgL_portz00_7709); 
{ /* Llib/object.scm 1463 */
 bool_t BgL_test5353z00_15002;
{ /* Llib/object.scm 1324 */
 obj_t BgL_klassz00_7719;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7720; long BgL_arg1554z00_7721;
BgL_arg1552z00_7720 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7722;
BgL_arg1555z00_7722 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_7708); 
BgL_arg1554z00_7721 = 
(BgL_arg1555z00_7722-OBJECT_TYPE); } 
BgL_klassz00_7719 = 
VECTOR_REF(BgL_arg1552z00_7720,BgL_arg1554z00_7721); } 
{ /* Llib/object.scm 1325 */
 obj_t BgL_arg1813z00_7723;
{ /* Llib/object.scm 1325 */
 obj_t BgL_classz00_7724;
if(
BGL_CLASSP(BgL_klassz00_7719))
{ /* Llib/object.scm 1325 */
BgL_classz00_7724 = BgL_klassz00_7719; }  else 
{ 
 obj_t BgL_auxz00_15009;
BgL_auxz00_15009 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(57675L), BGl_string3916z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_klassz00_7719); 
FAILURE(BgL_auxz00_15009,BFALSE,BFALSE);} 
if(
BGL_CLASSP(BgL_classz00_7724))
{ /* Llib/object.scm 758 */
 obj_t BgL__ortest_1220z00_7725;
BgL__ortest_1220z00_7725 = 
BGL_CLASS_NIL(BgL_classz00_7724); 
if(
CBOOL(BgL__ortest_1220z00_7725))
{ /* Llib/object.scm 758 */
BgL_arg1813z00_7723 = BgL__ortest_1220z00_7725; }  else 
{ /* Llib/object.scm 758 */
BgL_arg1813z00_7723 = 
BGl_classzd2nilzd2initz12z12zz__objectz00(BgL_classz00_7724); } }  else 
{ /* Llib/object.scm 757 */
BgL_arg1813z00_7723 = 
BGl_bigloozd2typezd2errorz00zz__errorz00(BGl_string3563z00zz__objectz00, BGl_string3487z00zz__objectz00, BgL_classz00_7724); } } 
BgL_test5353z00_15002 = 
(BgL_arg1813z00_7723==
((obj_t)BgL_objz00_7708)); } } 
if(BgL_test5353z00_15002)
{ /* Llib/object.scm 1463 */
return 
bgl_display_string(BGl_string3934z00zz__objectz00, BgL_portz00_7709);}  else 
{ /* Llib/object.scm 1463 */
return 
bgl_display_string(BGl_string3935z00zz__objectz00, BgL_portz00_7709);} } } } } } } } 

}



/* &object-hashnumber1397 */
obj_t BGl_z62objectzd2hashnumber1397zb0zz__objectz00(obj_t BgL_envz00_5351, obj_t BgL_objectz00_5352)
{
{ /* Llib/object.scm 1412 */
{ /* Llib/object.scm 1413 */
 long BgL_tmpz00_15024;
{ /* Llib/object.scm 1413 */
 BgL_objectz00_bglt BgL_objectz00_7744;
{ /* Llib/object.scm 1413 */
 bool_t BgL_test5357z00_15025;
{ /* Llib/object.scm 1413 */
 obj_t BgL_classz00_7726;
BgL_classz00_7726 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objectz00_5352))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7727; long BgL_arg1816z00_7728;
BgL_arg1815z00_7727 = 
(BgL_objectz00_bglt)(BgL_objectz00_5352); 
BgL_arg1816z00_7728 = 
BGL_CLASS_DEPTH(BgL_classz00_7726); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7729;
BgL_idxz00_7729 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7727); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7730;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7731;
BgL_arg1825z00_7731 = 
(BgL_idxz00_7729+BgL_arg1816z00_7728); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7732;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7733;
BgL_aux3193z00_7733 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7733))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7732 = BgL_aux3193z00_7733; }  else 
{ 
 obj_t BgL_auxz00_15036;
BgL_auxz00_15036 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7733); 
FAILURE(BgL_auxz00_15036,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5361z00_15040;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15041;
BgL_tmpz00_15041 = 
VECTOR_LENGTH(BgL_vectorz00_7732); 
BgL_test5361z00_15040 = 
BOUND_CHECK(BgL_arg1825z00_7731, BgL_tmpz00_15041); } 
if(BgL_test5361z00_15040)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7730 = 
VECTOR_REF(BgL_vectorz00_7732,BgL_arg1825z00_7731); }  else 
{ 
 obj_t BgL_auxz00_15045;
BgL_auxz00_15045 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7732, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7732)), 
(int)(BgL_arg1825z00_7731)); 
FAILURE(BgL_auxz00_15045,BFALSE,BFALSE);} } } } 
BgL_test5357z00_15025 = 
(BgL_arg1824z00_7730==BgL_classz00_7726); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7734;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7735;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7736; long BgL_arg1554z00_7737;
BgL_arg1552z00_7736 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7738;
BgL_arg1555z00_7738 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7727); 
BgL_arg1554z00_7737 = 
(BgL_arg1555z00_7738-OBJECT_TYPE); } 
BgL_oclassz00_7735 = 
VECTOR_REF(BgL_arg1552z00_7736,BgL_arg1554z00_7737); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7739;
BgL__ortest_1222z00_7739 = 
(BgL_classz00_7726==BgL_oclassz00_7735); 
if(BgL__ortest_1222z00_7739)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7734 = BgL__ortest_1222z00_7739; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7740;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7741;
BgL_arg1822z00_7741 = 
(BgL_oclassz00_7735); 
BgL_odepthz00_7740 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7741); } 
if(
(BgL_arg1816z00_7728<BgL_odepthz00_7740))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7742;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7743;
BgL_arg1821z00_7743 = 
(BgL_oclassz00_7735); 
BgL_arg1820z00_7742 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7743, BgL_arg1816z00_7728); } 
BgL_res2666z00_7734 = 
(BgL_arg1820z00_7742==BgL_classz00_7726); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7734 = ((bool_t)0); } } } } 
BgL_test5357z00_15025 = BgL_res2666z00_7734; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5357z00_15025 = ((bool_t)0)
; } } 
if(BgL_test5357z00_15025)
{ /* Llib/object.scm 1413 */
BgL_objectz00_7744 = 
((BgL_objectz00_bglt)BgL_objectz00_5352); }  else 
{ 
 obj_t BgL_auxz00_15067;
BgL_auxz00_15067 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61916L), BGl_string3938z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objectz00_5352); 
FAILURE(BgL_auxz00_15067,BFALSE,BFALSE);} } 
BgL_tmpz00_15024 = 
bgl_obj_hash_number(
((obj_t)BgL_objectz00_7744)); } 
return 
BINT(BgL_tmpz00_15024);} } 

}



/* &object-write1395 */
obj_t BGl_z62objectzd2write1395zb0zz__objectz00(obj_t BgL_envz00_5353, obj_t BgL_objz00_5354, obj_t BgL_portz00_5355)
{
{ /* Llib/object.scm 1405 */
{ /* Llib/object.scm 1406 */
 BgL_objectz00_bglt BgL_objz00_7763;
{ /* Llib/object.scm 1406 */
 bool_t BgL_test5364z00_15074;
{ /* Llib/object.scm 1406 */
 obj_t BgL_classz00_7745;
BgL_classz00_7745 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objz00_5354))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7746; long BgL_arg1816z00_7747;
BgL_arg1815z00_7746 = 
(BgL_objectz00_bglt)(BgL_objz00_5354); 
BgL_arg1816z00_7747 = 
BGL_CLASS_DEPTH(BgL_classz00_7745); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7748;
BgL_idxz00_7748 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7746); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7749;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7750;
BgL_arg1825z00_7750 = 
(BgL_idxz00_7748+BgL_arg1816z00_7747); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7751;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7752;
BgL_aux3193z00_7752 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7752))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7751 = BgL_aux3193z00_7752; }  else 
{ 
 obj_t BgL_auxz00_15085;
BgL_auxz00_15085 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7752); 
FAILURE(BgL_auxz00_15085,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5368z00_15089;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15090;
BgL_tmpz00_15090 = 
VECTOR_LENGTH(BgL_vectorz00_7751); 
BgL_test5368z00_15089 = 
BOUND_CHECK(BgL_arg1825z00_7750, BgL_tmpz00_15090); } 
if(BgL_test5368z00_15089)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7749 = 
VECTOR_REF(BgL_vectorz00_7751,BgL_arg1825z00_7750); }  else 
{ 
 obj_t BgL_auxz00_15094;
BgL_auxz00_15094 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7751, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7751)), 
(int)(BgL_arg1825z00_7750)); 
FAILURE(BgL_auxz00_15094,BFALSE,BFALSE);} } } } 
BgL_test5364z00_15074 = 
(BgL_arg1824z00_7749==BgL_classz00_7745); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7753;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7754;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7755; long BgL_arg1554z00_7756;
BgL_arg1552z00_7755 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7757;
BgL_arg1555z00_7757 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7746); 
BgL_arg1554z00_7756 = 
(BgL_arg1555z00_7757-OBJECT_TYPE); } 
BgL_oclassz00_7754 = 
VECTOR_REF(BgL_arg1552z00_7755,BgL_arg1554z00_7756); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7758;
BgL__ortest_1222z00_7758 = 
(BgL_classz00_7745==BgL_oclassz00_7754); 
if(BgL__ortest_1222z00_7758)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7753 = BgL__ortest_1222z00_7758; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7759;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7760;
BgL_arg1822z00_7760 = 
(BgL_oclassz00_7754); 
BgL_odepthz00_7759 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7760); } 
if(
(BgL_arg1816z00_7747<BgL_odepthz00_7759))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7761;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7762;
BgL_arg1821z00_7762 = 
(BgL_oclassz00_7754); 
BgL_arg1820z00_7761 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7762, BgL_arg1816z00_7747); } 
BgL_res2666z00_7753 = 
(BgL_arg1820z00_7761==BgL_classz00_7745); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7753 = ((bool_t)0); } } } } 
BgL_test5364z00_15074 = BgL_res2666z00_7753; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5364z00_15074 = ((bool_t)0)
; } } 
if(BgL_test5364z00_15074)
{ /* Llib/object.scm 1406 */
BgL_objz00_7763 = 
((BgL_objectz00_bglt)BgL_objz00_5354); }  else 
{ 
 obj_t BgL_auxz00_15116;
BgL_auxz00_15116 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61530L), BGl_string3939z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_5354); 
FAILURE(BgL_auxz00_15116,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1406 */
 obj_t BgL_portz00_7764;
if(
PAIRP(BgL_portz00_5355))
{ /* Llib/object.scm 1406 */
BgL_portz00_7764 = 
CAR(BgL_portz00_5355); }  else 
{ /* Llib/object.scm 1406 */
 obj_t BgL_tmpz00_15123;
BgL_tmpz00_15123 = 
BGL_CURRENT_DYNAMIC_ENV(); 
BgL_portz00_7764 = 
BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_15123); } 
{ /* Llib/object.scm 1407 */
 obj_t BgL_auxz00_15126;
if(
OUTPUT_PORTP(BgL_portz00_7764))
{ /* Llib/object.scm 1407 */
BgL_auxz00_15126 = BgL_portz00_7764
; }  else 
{ 
 obj_t BgL_auxz00_15129;
BgL_auxz00_15129 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61619L), BGl_string3912z00zz__objectz00, BGl_string3937z00zz__objectz00, BgL_portz00_7764); 
FAILURE(BgL_auxz00_15129,BFALSE,BFALSE);} 
return 
BGl_objectzd2printzd2zz__objectz00(BgL_objz00_7763, BgL_auxz00_15126, BGl_writezd2envzd2zz__r4_output_6_10_3z00);} } } } 

}



/* &object-display1392 */
obj_t BGl_z62objectzd2display1392zb0zz__objectz00(obj_t BgL_envz00_5356, obj_t BgL_objz00_5357, obj_t BgL_portz00_5358)
{
{ /* Llib/object.scm 1398 */
{ /* Llib/object.scm 1399 */
 BgL_objectz00_bglt BgL_objz00_7783;
{ /* Llib/object.scm 1399 */
 bool_t BgL_test5373z00_15134;
{ /* Llib/object.scm 1399 */
 obj_t BgL_classz00_7765;
BgL_classz00_7765 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objz00_5357))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7766; long BgL_arg1816z00_7767;
BgL_arg1815z00_7766 = 
(BgL_objectz00_bglt)(BgL_objz00_5357); 
BgL_arg1816z00_7767 = 
BGL_CLASS_DEPTH(BgL_classz00_7765); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7768;
BgL_idxz00_7768 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7766); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7769;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7770;
BgL_arg1825z00_7770 = 
(BgL_idxz00_7768+BgL_arg1816z00_7767); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7771;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7772;
BgL_aux3193z00_7772 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7772))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7771 = BgL_aux3193z00_7772; }  else 
{ 
 obj_t BgL_auxz00_15145;
BgL_auxz00_15145 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7772); 
FAILURE(BgL_auxz00_15145,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5377z00_15149;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15150;
BgL_tmpz00_15150 = 
VECTOR_LENGTH(BgL_vectorz00_7771); 
BgL_test5377z00_15149 = 
BOUND_CHECK(BgL_arg1825z00_7770, BgL_tmpz00_15150); } 
if(BgL_test5377z00_15149)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7769 = 
VECTOR_REF(BgL_vectorz00_7771,BgL_arg1825z00_7770); }  else 
{ 
 obj_t BgL_auxz00_15154;
BgL_auxz00_15154 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7771, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7771)), 
(int)(BgL_arg1825z00_7770)); 
FAILURE(BgL_auxz00_15154,BFALSE,BFALSE);} } } } 
BgL_test5373z00_15134 = 
(BgL_arg1824z00_7769==BgL_classz00_7765); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7773;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7774;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7775; long BgL_arg1554z00_7776;
BgL_arg1552z00_7775 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7777;
BgL_arg1555z00_7777 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7766); 
BgL_arg1554z00_7776 = 
(BgL_arg1555z00_7777-OBJECT_TYPE); } 
BgL_oclassz00_7774 = 
VECTOR_REF(BgL_arg1552z00_7775,BgL_arg1554z00_7776); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7778;
BgL__ortest_1222z00_7778 = 
(BgL_classz00_7765==BgL_oclassz00_7774); 
if(BgL__ortest_1222z00_7778)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7773 = BgL__ortest_1222z00_7778; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7779;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7780;
BgL_arg1822z00_7780 = 
(BgL_oclassz00_7774); 
BgL_odepthz00_7779 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7780); } 
if(
(BgL_arg1816z00_7767<BgL_odepthz00_7779))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7781;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7782;
BgL_arg1821z00_7782 = 
(BgL_oclassz00_7774); 
BgL_arg1820z00_7781 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7782, BgL_arg1816z00_7767); } 
BgL_res2666z00_7773 = 
(BgL_arg1820z00_7781==BgL_classz00_7765); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7773 = ((bool_t)0); } } } } 
BgL_test5373z00_15134 = BgL_res2666z00_7773; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5373z00_15134 = ((bool_t)0)
; } } 
if(BgL_test5373z00_15134)
{ /* Llib/object.scm 1399 */
BgL_objz00_7783 = 
((BgL_objectz00_bglt)BgL_objz00_5357); }  else 
{ 
 obj_t BgL_auxz00_15176;
BgL_auxz00_15176 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61149L), BGl_string3940z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_5357); 
FAILURE(BgL_auxz00_15176,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1399 */
 obj_t BgL_portz00_7784;
if(
PAIRP(BgL_portz00_5358))
{ /* Llib/object.scm 1399 */
BgL_portz00_7784 = 
CAR(BgL_portz00_5358); }  else 
{ /* Llib/object.scm 1399 */
 obj_t BgL_tmpz00_15183;
BgL_tmpz00_15183 = 
BGL_CURRENT_DYNAMIC_ENV(); 
BgL_portz00_7784 = 
BGL_ENV_CURRENT_OUTPUT_PORT(BgL_tmpz00_15183); } 
{ /* Llib/object.scm 1400 */
 obj_t BgL_auxz00_15186;
if(
OUTPUT_PORTP(BgL_portz00_7784))
{ /* Llib/object.scm 1400 */
BgL_auxz00_15186 = BgL_portz00_7784
; }  else 
{ 
 obj_t BgL_auxz00_15189;
BgL_auxz00_15189 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61238L), BGl_string3910z00zz__objectz00, BGl_string3937z00zz__objectz00, BgL_portz00_7784); 
FAILURE(BgL_auxz00_15189,BFALSE,BFALSE);} 
return 
BGl_objectzd2printzd2zz__objectz00(BgL_objz00_7783, BgL_auxz00_15186, BGl_displayzd2envzd2zz__r4_output_6_10_3z00);} } } } 

}



/* object-display */
BGL_EXPORTED_DEF obj_t BGl_objectzd2displayzd2zz__objectz00(BgL_objectz00_bglt BgL_objz00_163, obj_t BgL_portz00_164)
{
{ /* Llib/object.scm 1398 */
{ /* Llib/object.scm 1398 */
 obj_t BgL_method1394z00_2553;
{ /* Llib/object.scm 1398 */
 obj_t BgL_res2690z00_4376;
{ /* Llib/object.scm 1284 */
 long BgL_objzd2classzd2numz00_4347;
BgL_objzd2classzd2numz00_4347 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_163); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arg1803z00_4348;
BgL_arg1803z00_4348 = 
PROCEDURE_REF(BGl_objectzd2displayzd2envz00zz__objectz00, 
(int)(1L)); 
{ /* Llib/object.scm 1285 */
 int BgL_offsetz00_4351;
BgL_offsetz00_4351 = 
(int)(BgL_objzd2classzd2numz00_4347); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_4352;
BgL_offsetz00_4352 = 
(
(long)(BgL_offsetz00_4351)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_4353;
BgL_modz00_4353 = 
(BgL_offsetz00_4352 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_4355;
BgL_restz00_4355 = 
(BgL_offsetz00_4352 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_4357;
BgL_bucketz00_4357 = 
VECTOR_REF(
((obj_t)BgL_arg1803z00_4348),BgL_modz00_4353); 
BgL_res2690z00_4376 = 
VECTOR_REF(
((obj_t)BgL_bucketz00_4357),BgL_restz00_4355); } } } } } } } } 
BgL_method1394z00_2553 = BgL_res2690z00_4376; } 
{ /* Llib/object.scm 1398 */
 obj_t BgL_valz00_6288;
{ /* Llib/object.scm 1398 */
 obj_t BgL_list2222z00_2554;
BgL_list2222z00_2554 = 
MAKE_YOUNG_PAIR(BgL_portz00_164, BNIL); 
{ /* Llib/object.scm 1398 */
 obj_t BgL_aux3446z00_6285;
BgL_aux3446z00_6285 = 
BGl_consza2za2zz__r4_pairs_and_lists_6_3z00(
((obj_t)BgL_objz00_163), BgL_list2222z00_2554); 
{ /* Llib/object.scm 1398 */
 bool_t BgL_test5382z00_15221;
if(
PAIRP(BgL_aux3446z00_6285))
{ /* Llib/object.scm 1398 */
BgL_test5382z00_15221 = ((bool_t)1)
; }  else 
{ /* Llib/object.scm 1398 */
BgL_test5382z00_15221 = 
NULLP(BgL_aux3446z00_6285)
; } 
if(BgL_test5382z00_15221)
{ /* Llib/object.scm 1398 */
BgL_valz00_6288 = BgL_aux3446z00_6285; }  else 
{ 
 obj_t BgL_auxz00_15225;
BgL_auxz00_15225 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61094L), BGl_string3941z00zz__objectz00, BGl_string3942z00zz__objectz00, BgL_aux3446z00_6285); 
FAILURE(BgL_auxz00_15225,BFALSE,BFALSE);} } } } 
{ /* Llib/object.scm 1398 */
 long BgL_len3448z00_6289;
BgL_len3448z00_6289 = 
(int)(
bgl_list_length(BgL_valz00_6288)); 
if(
PROCEDURE_CORRECT_ARITYP(BgL_method1394z00_2553, BgL_len3448z00_6289))
{ /* Llib/object.scm 1398 */
return 
apply(BgL_method1394z00_2553, BgL_valz00_6288);}  else 
{ /* Llib/object.scm 1398 */
FAILURE(BGl_symbol3943z00zz__objectz00,BGl_string3944z00zz__objectz00,BGl_list3945z00zz__objectz00);} } } } } 

}



/* &object-display */
obj_t BGl_z62objectzd2displayzb0zz__objectz00(obj_t BgL_envz00_5359, obj_t BgL_objz00_5360, obj_t BgL_portz00_5361)
{
{ /* Llib/object.scm 1398 */
{ /* Llib/object.scm 1398 */
 BgL_objectz00_bglt BgL_auxz00_15236;
{ /* Llib/object.scm 1398 */
 bool_t BgL_test5385z00_15237;
{ /* Llib/object.scm 1398 */
 obj_t BgL_classz00_7786;
BgL_classz00_7786 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objz00_5360))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7787; long BgL_arg1816z00_7788;
BgL_arg1815z00_7787 = 
(BgL_objectz00_bglt)(BgL_objz00_5360); 
BgL_arg1816z00_7788 = 
BGL_CLASS_DEPTH(BgL_classz00_7786); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7789;
BgL_idxz00_7789 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7787); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7790;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7791;
BgL_arg1825z00_7791 = 
(BgL_idxz00_7789+BgL_arg1816z00_7788); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7792;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7793;
BgL_aux3193z00_7793 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7793))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7792 = BgL_aux3193z00_7793; }  else 
{ 
 obj_t BgL_auxz00_15248;
BgL_auxz00_15248 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7793); 
FAILURE(BgL_auxz00_15248,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5389z00_15252;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15253;
BgL_tmpz00_15253 = 
VECTOR_LENGTH(BgL_vectorz00_7792); 
BgL_test5389z00_15252 = 
BOUND_CHECK(BgL_arg1825z00_7791, BgL_tmpz00_15253); } 
if(BgL_test5389z00_15252)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7790 = 
VECTOR_REF(BgL_vectorz00_7792,BgL_arg1825z00_7791); }  else 
{ 
 obj_t BgL_auxz00_15257;
BgL_auxz00_15257 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7792, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7792)), 
(int)(BgL_arg1825z00_7791)); 
FAILURE(BgL_auxz00_15257,BFALSE,BFALSE);} } } } 
BgL_test5385z00_15237 = 
(BgL_arg1824z00_7790==BgL_classz00_7786); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7794;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7795;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7796; long BgL_arg1554z00_7797;
BgL_arg1552z00_7796 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7798;
BgL_arg1555z00_7798 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7787); 
BgL_arg1554z00_7797 = 
(BgL_arg1555z00_7798-OBJECT_TYPE); } 
BgL_oclassz00_7795 = 
VECTOR_REF(BgL_arg1552z00_7796,BgL_arg1554z00_7797); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7799;
BgL__ortest_1222z00_7799 = 
(BgL_classz00_7786==BgL_oclassz00_7795); 
if(BgL__ortest_1222z00_7799)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7794 = BgL__ortest_1222z00_7799; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7800;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7801;
BgL_arg1822z00_7801 = 
(BgL_oclassz00_7795); 
BgL_odepthz00_7800 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7801); } 
if(
(BgL_arg1816z00_7788<BgL_odepthz00_7800))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7802;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7803;
BgL_arg1821z00_7803 = 
(BgL_oclassz00_7795); 
BgL_arg1820z00_7802 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7803, BgL_arg1816z00_7788); } 
BgL_res2666z00_7794 = 
(BgL_arg1820z00_7802==BgL_classz00_7786); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7794 = ((bool_t)0); } } } } 
BgL_test5385z00_15237 = BgL_res2666z00_7794; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5385z00_15237 = ((bool_t)0)
; } } 
if(BgL_test5385z00_15237)
{ /* Llib/object.scm 1398 */
BgL_auxz00_15236 = 
((BgL_objectz00_bglt)BgL_objz00_5360)
; }  else 
{ 
 obj_t BgL_auxz00_15279;
BgL_auxz00_15279 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61094L), BGl_string3968z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_5360); 
FAILURE(BgL_auxz00_15279,BFALSE,BFALSE);} } 
return 
BGl_objectzd2displayzd2zz__objectz00(BgL_auxz00_15236, BgL_portz00_5361);} } 

}



/* object-write */
BGL_EXPORTED_DEF obj_t BGl_objectzd2writezd2zz__objectz00(BgL_objectz00_bglt BgL_objz00_165, obj_t BgL_portz00_166)
{
{ /* Llib/object.scm 1405 */
{ /* Llib/object.scm 1405 */
 obj_t BgL_method1396z00_2555;
{ /* Llib/object.scm 1405 */
 obj_t BgL_res2695z00_4407;
{ /* Llib/object.scm 1284 */
 long BgL_objzd2classzd2numz00_4378;
BgL_objzd2classzd2numz00_4378 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_165); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arg1803z00_4379;
BgL_arg1803z00_4379 = 
PROCEDURE_REF(BGl_objectzd2writezd2envz00zz__objectz00, 
(int)(1L)); 
{ /* Llib/object.scm 1285 */
 int BgL_offsetz00_4382;
BgL_offsetz00_4382 = 
(int)(BgL_objzd2classzd2numz00_4378); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_4383;
BgL_offsetz00_4383 = 
(
(long)(BgL_offsetz00_4382)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_4384;
BgL_modz00_4384 = 
(BgL_offsetz00_4383 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_4386;
BgL_restz00_4386 = 
(BgL_offsetz00_4383 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_4388;
BgL_bucketz00_4388 = 
VECTOR_REF(
((obj_t)BgL_arg1803z00_4379),BgL_modz00_4384); 
BgL_res2695z00_4407 = 
VECTOR_REF(
((obj_t)BgL_bucketz00_4388),BgL_restz00_4386); } } } } } } } } 
BgL_method1396z00_2555 = BgL_res2695z00_4407; } 
{ /* Llib/object.scm 1405 */
 obj_t BgL_valz00_6297;
{ /* Llib/object.scm 1405 */
 obj_t BgL_list2223z00_2556;
BgL_list2223z00_2556 = 
MAKE_YOUNG_PAIR(BgL_portz00_166, BNIL); 
{ /* Llib/object.scm 1405 */
 obj_t BgL_aux3451z00_6294;
BgL_aux3451z00_6294 = 
BGl_consza2za2zz__r4_pairs_and_lists_6_3z00(
((obj_t)BgL_objz00_165), BgL_list2223z00_2556); 
{ /* Llib/object.scm 1405 */
 bool_t BgL_test5392z00_15311;
if(
PAIRP(BgL_aux3451z00_6294))
{ /* Llib/object.scm 1405 */
BgL_test5392z00_15311 = ((bool_t)1)
; }  else 
{ /* Llib/object.scm 1405 */
BgL_test5392z00_15311 = 
NULLP(BgL_aux3451z00_6294)
; } 
if(BgL_test5392z00_15311)
{ /* Llib/object.scm 1405 */
BgL_valz00_6297 = BgL_aux3451z00_6294; }  else 
{ 
 obj_t BgL_auxz00_15315;
BgL_auxz00_15315 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61477L), BGl_string3969z00zz__objectz00, BGl_string3942z00zz__objectz00, BgL_aux3451z00_6294); 
FAILURE(BgL_auxz00_15315,BFALSE,BFALSE);} } } } 
{ /* Llib/object.scm 1405 */
 long BgL_len3453z00_6298;
BgL_len3453z00_6298 = 
(int)(
bgl_list_length(BgL_valz00_6297)); 
if(
PROCEDURE_CORRECT_ARITYP(BgL_method1396z00_2555, BgL_len3453z00_6298))
{ /* Llib/object.scm 1405 */
return 
apply(BgL_method1396z00_2555, BgL_valz00_6297);}  else 
{ /* Llib/object.scm 1405 */
FAILURE(BGl_symbol3970z00zz__objectz00,BGl_string3944z00zz__objectz00,BGl_list3971z00zz__objectz00);} } } } } 

}



/* &object-write */
obj_t BGl_z62objectzd2writezb0zz__objectz00(obj_t BgL_envz00_5362, obj_t BgL_objz00_5363, obj_t BgL_portz00_5364)
{
{ /* Llib/object.scm 1405 */
{ /* Llib/object.scm 1405 */
 BgL_objectz00_bglt BgL_auxz00_15326;
{ /* Llib/object.scm 1405 */
 bool_t BgL_test5395z00_15327;
{ /* Llib/object.scm 1405 */
 obj_t BgL_classz00_7805;
BgL_classz00_7805 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objz00_5363))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7806; long BgL_arg1816z00_7807;
BgL_arg1815z00_7806 = 
(BgL_objectz00_bglt)(BgL_objz00_5363); 
BgL_arg1816z00_7807 = 
BGL_CLASS_DEPTH(BgL_classz00_7805); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7808;
BgL_idxz00_7808 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7806); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7809;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7810;
BgL_arg1825z00_7810 = 
(BgL_idxz00_7808+BgL_arg1816z00_7807); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7811;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7812;
BgL_aux3193z00_7812 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7812))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7811 = BgL_aux3193z00_7812; }  else 
{ 
 obj_t BgL_auxz00_15338;
BgL_auxz00_15338 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7812); 
FAILURE(BgL_auxz00_15338,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5399z00_15342;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15343;
BgL_tmpz00_15343 = 
VECTOR_LENGTH(BgL_vectorz00_7811); 
BgL_test5399z00_15342 = 
BOUND_CHECK(BgL_arg1825z00_7810, BgL_tmpz00_15343); } 
if(BgL_test5399z00_15342)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7809 = 
VECTOR_REF(BgL_vectorz00_7811,BgL_arg1825z00_7810); }  else 
{ 
 obj_t BgL_auxz00_15347;
BgL_auxz00_15347 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7811, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7811)), 
(int)(BgL_arg1825z00_7810)); 
FAILURE(BgL_auxz00_15347,BFALSE,BFALSE);} } } } 
BgL_test5395z00_15327 = 
(BgL_arg1824z00_7809==BgL_classz00_7805); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7813;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7814;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7815; long BgL_arg1554z00_7816;
BgL_arg1552z00_7815 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7817;
BgL_arg1555z00_7817 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7806); 
BgL_arg1554z00_7816 = 
(BgL_arg1555z00_7817-OBJECT_TYPE); } 
BgL_oclassz00_7814 = 
VECTOR_REF(BgL_arg1552z00_7815,BgL_arg1554z00_7816); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7818;
BgL__ortest_1222z00_7818 = 
(BgL_classz00_7805==BgL_oclassz00_7814); 
if(BgL__ortest_1222z00_7818)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7813 = BgL__ortest_1222z00_7818; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7819;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7820;
BgL_arg1822z00_7820 = 
(BgL_oclassz00_7814); 
BgL_odepthz00_7819 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7820); } 
if(
(BgL_arg1816z00_7807<BgL_odepthz00_7819))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7821;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7822;
BgL_arg1821z00_7822 = 
(BgL_oclassz00_7814); 
BgL_arg1820z00_7821 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7822, BgL_arg1816z00_7807); } 
BgL_res2666z00_7813 = 
(BgL_arg1820z00_7821==BgL_classz00_7805); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7813 = ((bool_t)0); } } } } 
BgL_test5395z00_15327 = BgL_res2666z00_7813; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5395z00_15327 = ((bool_t)0)
; } } 
if(BgL_test5395z00_15327)
{ /* Llib/object.scm 1405 */
BgL_auxz00_15326 = 
((BgL_objectz00_bglt)BgL_objz00_5363)
; }  else 
{ 
 obj_t BgL_auxz00_15369;
BgL_auxz00_15369 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61477L), BGl_string3980z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_5363); 
FAILURE(BgL_auxz00_15369,BFALSE,BFALSE);} } 
return 
BGl_objectzd2writezd2zz__objectz00(BgL_auxz00_15326, BgL_portz00_5364);} } 

}



/* object-hashnumber */
BGL_EXPORTED_DEF long BGl_objectzd2hashnumberzd2zz__objectz00(BgL_objectz00_bglt BgL_objectz00_167)
{
{ /* Llib/object.scm 1412 */
{ /* Llib/object.scm 1412 */
 obj_t BgL_method1400z00_2557;
{ /* Llib/object.scm 1412 */
 obj_t BgL_res2700z00_4438;
{ /* Llib/object.scm 1284 */
 long BgL_objzd2classzd2numz00_4409;
BgL_objzd2classzd2numz00_4409 = 
BGL_OBJECT_CLASS_NUM(BgL_objectz00_167); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arg1803z00_4410;
BgL_arg1803z00_4410 = 
PROCEDURE_REF(BGl_objectzd2hashnumberzd2envz00zz__objectz00, 
(int)(1L)); 
{ /* Llib/object.scm 1285 */
 int BgL_offsetz00_4413;
BgL_offsetz00_4413 = 
(int)(BgL_objzd2classzd2numz00_4409); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_4414;
BgL_offsetz00_4414 = 
(
(long)(BgL_offsetz00_4413)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_4415;
BgL_modz00_4415 = 
(BgL_offsetz00_4414 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_4417;
BgL_restz00_4417 = 
(BgL_offsetz00_4414 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_4419;
BgL_bucketz00_4419 = 
VECTOR_REF(
((obj_t)BgL_arg1803z00_4410),BgL_modz00_4415); 
BgL_res2700z00_4438 = 
VECTOR_REF(
((obj_t)BgL_bucketz00_4419),BgL_restz00_4417); } } } } } } } } 
BgL_method1400z00_2557 = BgL_res2700z00_4438; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_method1400z00_2557, 1))
{ /* Llib/object.scm 1412 */
 obj_t BgL_tmpz00_15400;
{ /* Llib/object.scm 1412 */
 obj_t BgL_aux3457z00_6304;
BgL_aux3457z00_6304 = 
BGL_PROCEDURE_CALL1(BgL_method1400z00_2557, 
((obj_t)BgL_objectz00_167)); 
if(
INTEGERP(BgL_aux3457z00_6304))
{ /* Llib/object.scm 1412 */
BgL_tmpz00_15400 = BgL_aux3457z00_6304
; }  else 
{ 
 obj_t BgL_auxz00_15408;
BgL_auxz00_15408 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61856L), BGl_string3981z00zz__objectz00, BGl_string3485z00zz__objectz00, BgL_aux3457z00_6304); 
FAILURE(BgL_auxz00_15408,BFALSE,BFALSE);} } 
return 
(long)CINT(BgL_tmpz00_15400);}  else 
{ /* Llib/object.scm 1412 */
FAILURE(BGl_string3982z00zz__objectz00,BGl_list3983z00zz__objectz00,BgL_method1400z00_2557);} } } 

}



/* &object-hashnumber */
obj_t BGl_z62objectzd2hashnumberzb0zz__objectz00(obj_t BgL_envz00_5365, obj_t BgL_objectz00_5366)
{
{ /* Llib/object.scm 1412 */
{ /* Llib/object.scm 1412 */
 long BgL_tmpz00_15414;
{ /* Llib/object.scm 1412 */
 BgL_objectz00_bglt BgL_auxz00_15415;
{ /* Llib/object.scm 1412 */
 bool_t BgL_test5404z00_15416;
{ /* Llib/object.scm 1412 */
 obj_t BgL_classz00_7823;
BgL_classz00_7823 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objectz00_5366))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7824; long BgL_arg1816z00_7825;
BgL_arg1815z00_7824 = 
(BgL_objectz00_bglt)(BgL_objectz00_5366); 
BgL_arg1816z00_7825 = 
BGL_CLASS_DEPTH(BgL_classz00_7823); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7826;
BgL_idxz00_7826 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7824); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7827;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7828;
BgL_arg1825z00_7828 = 
(BgL_idxz00_7826+BgL_arg1816z00_7825); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7829;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7830;
BgL_aux3193z00_7830 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7830))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7829 = BgL_aux3193z00_7830; }  else 
{ 
 obj_t BgL_auxz00_15427;
BgL_auxz00_15427 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7830); 
FAILURE(BgL_auxz00_15427,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5408z00_15431;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15432;
BgL_tmpz00_15432 = 
VECTOR_LENGTH(BgL_vectorz00_7829); 
BgL_test5408z00_15431 = 
BOUND_CHECK(BgL_arg1825z00_7828, BgL_tmpz00_15432); } 
if(BgL_test5408z00_15431)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7827 = 
VECTOR_REF(BgL_vectorz00_7829,BgL_arg1825z00_7828); }  else 
{ 
 obj_t BgL_auxz00_15436;
BgL_auxz00_15436 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7829, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7829)), 
(int)(BgL_arg1825z00_7828)); 
FAILURE(BgL_auxz00_15436,BFALSE,BFALSE);} } } } 
BgL_test5404z00_15416 = 
(BgL_arg1824z00_7827==BgL_classz00_7823); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7831;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7832;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7833; long BgL_arg1554z00_7834;
BgL_arg1552z00_7833 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7835;
BgL_arg1555z00_7835 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7824); 
BgL_arg1554z00_7834 = 
(BgL_arg1555z00_7835-OBJECT_TYPE); } 
BgL_oclassz00_7832 = 
VECTOR_REF(BgL_arg1552z00_7833,BgL_arg1554z00_7834); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7836;
BgL__ortest_1222z00_7836 = 
(BgL_classz00_7823==BgL_oclassz00_7832); 
if(BgL__ortest_1222z00_7836)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7831 = BgL__ortest_1222z00_7836; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7837;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7838;
BgL_arg1822z00_7838 = 
(BgL_oclassz00_7832); 
BgL_odepthz00_7837 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7838); } 
if(
(BgL_arg1816z00_7825<BgL_odepthz00_7837))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7839;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7840;
BgL_arg1821z00_7840 = 
(BgL_oclassz00_7832); 
BgL_arg1820z00_7839 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7840, BgL_arg1816z00_7825); } 
BgL_res2666z00_7831 = 
(BgL_arg1820z00_7839==BgL_classz00_7823); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7831 = ((bool_t)0); } } } } 
BgL_test5404z00_15416 = BgL_res2666z00_7831; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5404z00_15416 = ((bool_t)0)
; } } 
if(BgL_test5404z00_15416)
{ /* Llib/object.scm 1412 */
BgL_auxz00_15415 = 
((BgL_objectz00_bglt)BgL_objectz00_5366)
; }  else 
{ 
 obj_t BgL_auxz00_15458;
BgL_auxz00_15458 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(61856L), BGl_string3986z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objectz00_5366); 
FAILURE(BgL_auxz00_15458,BFALSE,BFALSE);} } 
BgL_tmpz00_15414 = 
BGl_objectzd2hashnumberzd2zz__objectz00(BgL_auxz00_15415); } 
return 
BINT(BgL_tmpz00_15414);} } 

}



/* object-print */
BGL_EXPORTED_DEF obj_t BGl_objectzd2printzd2zz__objectz00(BgL_objectz00_bglt BgL_objz00_170, obj_t BgL_portz00_171, obj_t BgL_printzd2slotzd2_172)
{
{ /* Llib/object.scm 1445 */
{ /* Llib/object.scm 1445 */
 obj_t BgL_method1402z00_2558;
{ /* Llib/object.scm 1445 */
 obj_t BgL_res2705z00_4469;
{ /* Llib/object.scm 1284 */
 long BgL_objzd2classzd2numz00_4440;
BgL_objzd2classzd2numz00_4440 = 
BGL_OBJECT_CLASS_NUM(BgL_objz00_170); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arg1803z00_4441;
BgL_arg1803z00_4441 = 
PROCEDURE_REF(BGl_objectzd2printzd2envz00zz__objectz00, 
(int)(1L)); 
{ /* Llib/object.scm 1285 */
 int BgL_offsetz00_4444;
BgL_offsetz00_4444 = 
(int)(BgL_objzd2classzd2numz00_4440); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_4445;
BgL_offsetz00_4445 = 
(
(long)(BgL_offsetz00_4444)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_4446;
BgL_modz00_4446 = 
(BgL_offsetz00_4445 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_4448;
BgL_restz00_4448 = 
(BgL_offsetz00_4445 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_4450;
BgL_bucketz00_4450 = 
VECTOR_REF(
((obj_t)BgL_arg1803z00_4441),BgL_modz00_4446); 
BgL_res2705z00_4469 = 
VECTOR_REF(
((obj_t)BgL_bucketz00_4450),BgL_restz00_4448); } } } } } } } } 
BgL_method1402z00_2558 = BgL_res2705z00_4469; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_method1402z00_2558, 3))
{ /* Llib/object.scm 1445 */
return 
BGL_PROCEDURE_CALL3(BgL_method1402z00_2558, 
((obj_t)BgL_objz00_170), BgL_portz00_171, BgL_printzd2slotzd2_172);}  else 
{ /* Llib/object.scm 1445 */
FAILURE(BGl_string3987z00zz__objectz00,BGl_list3988z00zz__objectz00,BgL_method1402z00_2558);} } } 

}



/* &object-print */
obj_t BGl_z62objectzd2printzb0zz__objectz00(obj_t BgL_envz00_5367, obj_t BgL_objz00_5368, obj_t BgL_portz00_5369, obj_t BgL_printzd2slotzd2_5370)
{
{ /* Llib/object.scm 1445 */
{ /* Llib/object.scm 1445 */
 obj_t BgL_auxz00_15552; obj_t BgL_auxz00_15545; BgL_objectz00_bglt BgL_auxz00_15498;
if(
PROCEDUREP(BgL_printzd2slotzd2_5370))
{ /* Llib/object.scm 1445 */
BgL_auxz00_15552 = BgL_printzd2slotzd2_5370
; }  else 
{ 
 obj_t BgL_auxz00_15555;
BgL_auxz00_15555 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63293L), BGl_string3993z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_printzd2slotzd2_5370); 
FAILURE(BgL_auxz00_15555,BFALSE,BFALSE);} 
if(
OUTPUT_PORTP(BgL_portz00_5369))
{ /* Llib/object.scm 1445 */
BgL_auxz00_15545 = BgL_portz00_5369
; }  else 
{ 
 obj_t BgL_auxz00_15548;
BgL_auxz00_15548 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63293L), BGl_string3993z00zz__objectz00, BGl_string3937z00zz__objectz00, BgL_portz00_5369); 
FAILURE(BgL_auxz00_15548,BFALSE,BFALSE);} 
{ /* Llib/object.scm 1445 */
 bool_t BgL_test5412z00_15499;
{ /* Llib/object.scm 1445 */
 obj_t BgL_classz00_7841;
BgL_classz00_7841 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_objz00_5368))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7842; long BgL_arg1816z00_7843;
BgL_arg1815z00_7842 = 
(BgL_objectz00_bglt)(BgL_objz00_5368); 
BgL_arg1816z00_7843 = 
BGL_CLASS_DEPTH(BgL_classz00_7841); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7844;
BgL_idxz00_7844 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7842); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7845;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7846;
BgL_arg1825z00_7846 = 
(BgL_idxz00_7844+BgL_arg1816z00_7843); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7847;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7848;
BgL_aux3193z00_7848 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7848))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7847 = BgL_aux3193z00_7848; }  else 
{ 
 obj_t BgL_auxz00_15510;
BgL_auxz00_15510 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7848); 
FAILURE(BgL_auxz00_15510,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5416z00_15514;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15515;
BgL_tmpz00_15515 = 
VECTOR_LENGTH(BgL_vectorz00_7847); 
BgL_test5416z00_15514 = 
BOUND_CHECK(BgL_arg1825z00_7846, BgL_tmpz00_15515); } 
if(BgL_test5416z00_15514)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7845 = 
VECTOR_REF(BgL_vectorz00_7847,BgL_arg1825z00_7846); }  else 
{ 
 obj_t BgL_auxz00_15519;
BgL_auxz00_15519 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7847, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7847)), 
(int)(BgL_arg1825z00_7846)); 
FAILURE(BgL_auxz00_15519,BFALSE,BFALSE);} } } } 
BgL_test5412z00_15499 = 
(BgL_arg1824z00_7845==BgL_classz00_7841); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7849;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7850;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7851; long BgL_arg1554z00_7852;
BgL_arg1552z00_7851 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7853;
BgL_arg1555z00_7853 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7842); 
BgL_arg1554z00_7852 = 
(BgL_arg1555z00_7853-OBJECT_TYPE); } 
BgL_oclassz00_7850 = 
VECTOR_REF(BgL_arg1552z00_7851,BgL_arg1554z00_7852); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7854;
BgL__ortest_1222z00_7854 = 
(BgL_classz00_7841==BgL_oclassz00_7850); 
if(BgL__ortest_1222z00_7854)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7849 = BgL__ortest_1222z00_7854; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7855;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7856;
BgL_arg1822z00_7856 = 
(BgL_oclassz00_7850); 
BgL_odepthz00_7855 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7856); } 
if(
(BgL_arg1816z00_7843<BgL_odepthz00_7855))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7857;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7858;
BgL_arg1821z00_7858 = 
(BgL_oclassz00_7850); 
BgL_arg1820z00_7857 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7858, BgL_arg1816z00_7843); } 
BgL_res2666z00_7849 = 
(BgL_arg1820z00_7857==BgL_classz00_7841); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7849 = ((bool_t)0); } } } } 
BgL_test5412z00_15499 = BgL_res2666z00_7849; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5412z00_15499 = ((bool_t)0)
; } } 
if(BgL_test5412z00_15499)
{ /* Llib/object.scm 1445 */
BgL_auxz00_15498 = 
((BgL_objectz00_bglt)BgL_objz00_5368)
; }  else 
{ 
 obj_t BgL_auxz00_15541;
BgL_auxz00_15541 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(63293L), BGl_string3993z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_objz00_5368); 
FAILURE(BgL_auxz00_15541,BFALSE,BFALSE);} } 
return 
BGl_objectzd2printzd2zz__objectz00(BgL_auxz00_15498, BgL_auxz00_15545, BgL_auxz00_15552);} } 

}



/* object-equal? */
BGL_EXPORTED_DEF bool_t BGl_objectzd2equalzf3z21zz__objectz00(BgL_objectz00_bglt BgL_obj1z00_173, BgL_objectz00_bglt BgL_obj2z00_174)
{
{ /* Llib/object.scm 1476 */
{ /* Llib/object.scm 1476 */
 obj_t BgL_method1404z00_2559;
{ /* Llib/object.scm 1476 */
 obj_t BgL_res2710z00_4500;
{ /* Llib/object.scm 1284 */
 long BgL_objzd2classzd2numz00_4471;
BgL_objzd2classzd2numz00_4471 = 
BGL_OBJECT_CLASS_NUM(BgL_obj1z00_173); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arg1803z00_4472;
BgL_arg1803z00_4472 = 
PROCEDURE_REF(BGl_objectzd2equalzf3zd2envzf3zz__objectz00, 
(int)(1L)); 
{ /* Llib/object.scm 1285 */
 int BgL_offsetz00_4475;
BgL_offsetz00_4475 = 
(int)(BgL_objzd2classzd2numz00_4471); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_4476;
BgL_offsetz00_4476 = 
(
(long)(BgL_offsetz00_4475)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_4477;
BgL_modz00_4477 = 
(BgL_offsetz00_4476 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_4479;
BgL_restz00_4479 = 
(BgL_offsetz00_4476 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_4481;
BgL_bucketz00_4481 = 
VECTOR_REF(
((obj_t)BgL_arg1803z00_4472),BgL_modz00_4477); 
BgL_res2710z00_4500 = 
VECTOR_REF(
((obj_t)BgL_bucketz00_4481),BgL_restz00_4479); } } } } } } } } 
BgL_method1404z00_2559 = BgL_res2710z00_4500; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_method1404z00_2559, 2))
{ /* Llib/object.scm 1476 */
return 
CBOOL(
BGL_PROCEDURE_CALL2(BgL_method1404z00_2559, 
((obj_t)BgL_obj1z00_173), 
((obj_t)BgL_obj2z00_174)));}  else 
{ /* Llib/object.scm 1476 */
FAILURE(BGl_string3994z00zz__objectz00,BGl_list3995z00zz__objectz00,BgL_method1404z00_2559);} } } 

}



/* &object-equal? */
obj_t BGl_z62objectzd2equalzf3z43zz__objectz00(obj_t BgL_envz00_5371, obj_t BgL_obj1z00_5372, obj_t BgL_obj2z00_5373)
{
{ /* Llib/object.scm 1476 */
{ /* Llib/object.scm 1476 */
 bool_t BgL_tmpz00_15595;
{ /* Llib/object.scm 1476 */
 BgL_objectz00_bglt BgL_auxz00_15643; BgL_objectz00_bglt BgL_auxz00_15596;
{ /* Llib/object.scm 1476 */
 bool_t BgL_test5429z00_15644;
{ /* Llib/object.scm 1476 */
 obj_t BgL_classz00_7877;
BgL_classz00_7877 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_obj2z00_5373))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7878; long BgL_arg1816z00_7879;
BgL_arg1815z00_7878 = 
(BgL_objectz00_bglt)(BgL_obj2z00_5373); 
BgL_arg1816z00_7879 = 
BGL_CLASS_DEPTH(BgL_classz00_7877); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7880;
BgL_idxz00_7880 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7878); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7881;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7882;
BgL_arg1825z00_7882 = 
(BgL_idxz00_7880+BgL_arg1816z00_7879); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7883;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7884;
BgL_aux3193z00_7884 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7884))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7883 = BgL_aux3193z00_7884; }  else 
{ 
 obj_t BgL_auxz00_15655;
BgL_auxz00_15655 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7884); 
FAILURE(BgL_auxz00_15655,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5433z00_15659;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15660;
BgL_tmpz00_15660 = 
VECTOR_LENGTH(BgL_vectorz00_7883); 
BgL_test5433z00_15659 = 
BOUND_CHECK(BgL_arg1825z00_7882, BgL_tmpz00_15660); } 
if(BgL_test5433z00_15659)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7881 = 
VECTOR_REF(BgL_vectorz00_7883,BgL_arg1825z00_7882); }  else 
{ 
 obj_t BgL_auxz00_15664;
BgL_auxz00_15664 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7883, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7883)), 
(int)(BgL_arg1825z00_7882)); 
FAILURE(BgL_auxz00_15664,BFALSE,BFALSE);} } } } 
BgL_test5429z00_15644 = 
(BgL_arg1824z00_7881==BgL_classz00_7877); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7885;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7886;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7887; long BgL_arg1554z00_7888;
BgL_arg1552z00_7887 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7889;
BgL_arg1555z00_7889 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7878); 
BgL_arg1554z00_7888 = 
(BgL_arg1555z00_7889-OBJECT_TYPE); } 
BgL_oclassz00_7886 = 
VECTOR_REF(BgL_arg1552z00_7887,BgL_arg1554z00_7888); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7890;
BgL__ortest_1222z00_7890 = 
(BgL_classz00_7877==BgL_oclassz00_7886); 
if(BgL__ortest_1222z00_7890)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7885 = BgL__ortest_1222z00_7890; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7891;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7892;
BgL_arg1822z00_7892 = 
(BgL_oclassz00_7886); 
BgL_odepthz00_7891 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7892); } 
if(
(BgL_arg1816z00_7879<BgL_odepthz00_7891))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7893;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7894;
BgL_arg1821z00_7894 = 
(BgL_oclassz00_7886); 
BgL_arg1820z00_7893 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7894, BgL_arg1816z00_7879); } 
BgL_res2666z00_7885 = 
(BgL_arg1820z00_7893==BgL_classz00_7877); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7885 = ((bool_t)0); } } } } 
BgL_test5429z00_15644 = BgL_res2666z00_7885; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5429z00_15644 = ((bool_t)0)
; } } 
if(BgL_test5429z00_15644)
{ /* Llib/object.scm 1476 */
BgL_auxz00_15643 = 
((BgL_objectz00_bglt)BgL_obj2z00_5373)
; }  else 
{ 
 obj_t BgL_auxz00_15686;
BgL_auxz00_15686 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(64549L), BGl_string3998z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_obj2z00_5373); 
FAILURE(BgL_auxz00_15686,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1476 */
 bool_t BgL_test5422z00_15597;
{ /* Llib/object.scm 1476 */
 obj_t BgL_classz00_7859;
BgL_classz00_7859 = BGl_objectz00zz__objectz00; 
if(
BGL_OBJECTP(BgL_obj1z00_5372))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7860; long BgL_arg1816z00_7861;
BgL_arg1815z00_7860 = 
(BgL_objectz00_bglt)(BgL_obj1z00_5372); 
BgL_arg1816z00_7861 = 
BGL_CLASS_DEPTH(BgL_classz00_7859); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7862;
BgL_idxz00_7862 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7860); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7863;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7864;
BgL_arg1825z00_7864 = 
(BgL_idxz00_7862+BgL_arg1816z00_7861); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7865;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7866;
BgL_aux3193z00_7866 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7866))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7865 = BgL_aux3193z00_7866; }  else 
{ 
 obj_t BgL_auxz00_15608;
BgL_auxz00_15608 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7866); 
FAILURE(BgL_auxz00_15608,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5426z00_15612;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15613;
BgL_tmpz00_15613 = 
VECTOR_LENGTH(BgL_vectorz00_7865); 
BgL_test5426z00_15612 = 
BOUND_CHECK(BgL_arg1825z00_7864, BgL_tmpz00_15613); } 
if(BgL_test5426z00_15612)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7863 = 
VECTOR_REF(BgL_vectorz00_7865,BgL_arg1825z00_7864); }  else 
{ 
 obj_t BgL_auxz00_15617;
BgL_auxz00_15617 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7865, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7865)), 
(int)(BgL_arg1825z00_7864)); 
FAILURE(BgL_auxz00_15617,BFALSE,BFALSE);} } } } 
BgL_test5422z00_15597 = 
(BgL_arg1824z00_7863==BgL_classz00_7859); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7867;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7868;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7869; long BgL_arg1554z00_7870;
BgL_arg1552z00_7869 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7871;
BgL_arg1555z00_7871 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7860); 
BgL_arg1554z00_7870 = 
(BgL_arg1555z00_7871-OBJECT_TYPE); } 
BgL_oclassz00_7868 = 
VECTOR_REF(BgL_arg1552z00_7869,BgL_arg1554z00_7870); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7872;
BgL__ortest_1222z00_7872 = 
(BgL_classz00_7859==BgL_oclassz00_7868); 
if(BgL__ortest_1222z00_7872)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7867 = BgL__ortest_1222z00_7872; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7873;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7874;
BgL_arg1822z00_7874 = 
(BgL_oclassz00_7868); 
BgL_odepthz00_7873 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7874); } 
if(
(BgL_arg1816z00_7861<BgL_odepthz00_7873))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7875;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7876;
BgL_arg1821z00_7876 = 
(BgL_oclassz00_7868); 
BgL_arg1820z00_7875 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7876, BgL_arg1816z00_7861); } 
BgL_res2666z00_7867 = 
(BgL_arg1820z00_7875==BgL_classz00_7859); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7867 = ((bool_t)0); } } } } 
BgL_test5422z00_15597 = BgL_res2666z00_7867; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5422z00_15597 = ((bool_t)0)
; } } 
if(BgL_test5422z00_15597)
{ /* Llib/object.scm 1476 */
BgL_auxz00_15596 = 
((BgL_objectz00_bglt)BgL_obj1z00_5372)
; }  else 
{ 
 obj_t BgL_auxz00_15639;
BgL_auxz00_15639 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(64549L), BGl_string3998z00zz__objectz00, BGl_string3570z00zz__objectz00, BgL_obj1z00_5372); 
FAILURE(BgL_auxz00_15639,BFALSE,BFALSE);} } 
BgL_tmpz00_15595 = 
BGl_objectzd2equalzf3z21zz__objectz00(BgL_auxz00_15596, BgL_auxz00_15643); } 
return 
BBOOL(BgL_tmpz00_15595);} } 

}



/* exception-notify */
BGL_EXPORTED_DEF obj_t BGl_exceptionzd2notifyzd2zz__objectz00(obj_t BgL_excz00_175)
{
{ /* Llib/object.scm 1496 */
if(
BGL_OBJECTP(BgL_excz00_175))
{ /* Llib/object.scm 1496 */
 obj_t BgL_method1406z00_2561;
{ /* Llib/object.scm 1496 */
 obj_t BgL_res2715z00_4531;
{ /* Llib/object.scm 1284 */
 long BgL_objzd2classzd2numz00_4502;
BgL_objzd2classzd2numz00_4502 = 
BGL_OBJECT_CLASS_NUM(
((BgL_objectz00_bglt)BgL_excz00_175)); 
{ /* Llib/object.scm 1285 */
 obj_t BgL_arg1803z00_4503;
BgL_arg1803z00_4503 = 
PROCEDURE_REF(BGl_exceptionzd2notifyzd2envz00zz__objectz00, 
(int)(1L)); 
{ /* Llib/object.scm 1285 */
 int BgL_offsetz00_4506;
BgL_offsetz00_4506 = 
(int)(BgL_objzd2classzd2numz00_4502); 
{ /* Llib/object.scm 931 */
 long BgL_offsetz00_4507;
BgL_offsetz00_4507 = 
(
(long)(BgL_offsetz00_4506)-OBJECT_TYPE); 
{ /* Llib/object.scm 931 */
 long BgL_modz00_4508;
BgL_modz00_4508 = 
(BgL_offsetz00_4507 >> 
(int)(
(long)(
(int)(4L)))); 
{ /* Llib/object.scm 932 */
 long BgL_restz00_4510;
BgL_restz00_4510 = 
(BgL_offsetz00_4507 & 
(long)(
(int)(
(
(long)(
(int)(
(1L << 
(int)(
(long)(
(int)(4L))))))-1L)))); 
{ /* Llib/object.scm 933 */

{ /* Llib/object.scm 934 */
 obj_t BgL_bucketz00_4512;
BgL_bucketz00_4512 = 
VECTOR_REF(
((obj_t)BgL_arg1803z00_4503),BgL_modz00_4508); 
BgL_res2715z00_4531 = 
VECTOR_REF(
((obj_t)BgL_bucketz00_4512),BgL_restz00_4510); } } } } } } } } 
BgL_method1406z00_2561 = BgL_res2715z00_4531; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_method1406z00_2561, 1))
{ /* Llib/object.scm 1496 */
return 
BGL_PROCEDURE_CALL1(BgL_method1406z00_2561, BgL_excz00_175);}  else 
{ /* Llib/object.scm 1496 */
FAILURE(BGl_string3999z00zz__objectz00,BGl_list4000z00zz__objectz00,BgL_method1406z00_2561);} }  else 
{ /* Llib/object.scm 1496 */
 obj_t BgL_fun2225z00_2562;
{ /* Llib/object.scm 1496 */
 obj_t BgL_res2716z00_4532;
{ /* Llib/object.scm 900 */
 obj_t BgL_aux3473z00_6332;
BgL_aux3473z00_6332 = 
PROCEDURE_REF(BGl_exceptionzd2notifyzd2envz00zz__objectz00, 
(int)(0L)); 
if(
PROCEDUREP(BgL_aux3473z00_6332))
{ /* Llib/object.scm 900 */
BgL_res2716z00_4532 = BgL_aux3473z00_6332; }  else 
{ 
 obj_t BgL_auxz00_15730;
BgL_auxz00_15730 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(39357L), BGl_string4005z00zz__objectz00, BGl_string3515z00zz__objectz00, BgL_aux3473z00_6332); 
FAILURE(BgL_auxz00_15730,BFALSE,BFALSE);} } 
BgL_fun2225z00_2562 = BgL_res2716z00_4532; } 
if(
PROCEDURE_CORRECT_ARITYP(BgL_fun2225z00_2562, 1))
{ /* Llib/object.scm 1496 */
return 
BGL_PROCEDURE_CALL1(BgL_fun2225z00_2562, BgL_excz00_175);}  else 
{ /* Llib/object.scm 1496 */
FAILURE(BGl_string3999z00zz__objectz00,BGl_list4006z00zz__objectz00,BgL_fun2225z00_2562);} } } 

}



/* &exception-notify */
obj_t BGl_z62exceptionzd2notifyzb0zz__objectz00(obj_t BgL_envz00_5374, obj_t BgL_excz00_5375)
{
{ /* Llib/object.scm 1496 */
return 
BGl_exceptionzd2notifyzd2zz__objectz00(BgL_excz00_5375);} 

}



/* method-init */
obj_t BGl_methodzd2initzd2zz__objectz00(void)
{
{ /* Llib/object.scm 17 */
BGl_genericzd2addzd2methodz12z12zz__objectz00(BGl_exceptionzd2notifyzd2envz00zz__objectz00, BGl_z62errorz62zz__objectz00, BGl_proc4009z00zz__objectz00, BGl_string4005z00zz__objectz00); 
BGl_genericzd2addzd2methodz12z12zz__objectz00(BGl_exceptionzd2notifyzd2envz00zz__objectz00, BGl_z62iozd2writezd2errorz62zz__objectz00, BGl_proc4010z00zz__objectz00, BGl_string4005z00zz__objectz00); 
return 
BGl_genericzd2addzd2methodz12z12zz__objectz00(BGl_exceptionzd2notifyzd2envz00zz__objectz00, BGl_z62warningz62zz__objectz00, BGl_proc4011z00zz__objectz00, BGl_string4005z00zz__objectz00);} 

}



/* &exception-notify-&wa1412 */
obj_t BGl_z62exceptionzd2notifyzd2z62wa1412z00zz__objectz00(obj_t BgL_envz00_5379, obj_t BgL_excz00_5380)
{
{ /* Llib/object.scm 1528 */
{ /* Llib/object.scm 1529 */
 BgL_z62warningz62_bglt BgL_excz00_7913;
{ /* Llib/object.scm 1529 */
 bool_t BgL_test5440z00_15745;
{ /* Llib/object.scm 1529 */
 obj_t BgL_classz00_7895;
BgL_classz00_7895 = BGl_z62warningz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_excz00_5380))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7896; long BgL_arg1816z00_7897;
BgL_arg1815z00_7896 = 
(BgL_objectz00_bglt)(BgL_excz00_5380); 
BgL_arg1816z00_7897 = 
BGL_CLASS_DEPTH(BgL_classz00_7895); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7898;
BgL_idxz00_7898 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7896); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7899;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7900;
BgL_arg1825z00_7900 = 
(BgL_idxz00_7898+BgL_arg1816z00_7897); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7901;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7902;
BgL_aux3193z00_7902 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7902))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7901 = BgL_aux3193z00_7902; }  else 
{ 
 obj_t BgL_auxz00_15756;
BgL_auxz00_15756 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7902); 
FAILURE(BgL_auxz00_15756,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5444z00_15760;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15761;
BgL_tmpz00_15761 = 
VECTOR_LENGTH(BgL_vectorz00_7901); 
BgL_test5444z00_15760 = 
BOUND_CHECK(BgL_arg1825z00_7900, BgL_tmpz00_15761); } 
if(BgL_test5444z00_15760)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7899 = 
VECTOR_REF(BgL_vectorz00_7901,BgL_arg1825z00_7900); }  else 
{ 
 obj_t BgL_auxz00_15765;
BgL_auxz00_15765 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7901, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7901)), 
(int)(BgL_arg1825z00_7900)); 
FAILURE(BgL_auxz00_15765,BFALSE,BFALSE);} } } } 
BgL_test5440z00_15745 = 
(BgL_arg1824z00_7899==BgL_classz00_7895); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7903;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7904;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7905; long BgL_arg1554z00_7906;
BgL_arg1552z00_7905 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7907;
BgL_arg1555z00_7907 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7896); 
BgL_arg1554z00_7906 = 
(BgL_arg1555z00_7907-OBJECT_TYPE); } 
BgL_oclassz00_7904 = 
VECTOR_REF(BgL_arg1552z00_7905,BgL_arg1554z00_7906); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7908;
BgL__ortest_1222z00_7908 = 
(BgL_classz00_7895==BgL_oclassz00_7904); 
if(BgL__ortest_1222z00_7908)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7903 = BgL__ortest_1222z00_7908; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7909;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7910;
BgL_arg1822z00_7910 = 
(BgL_oclassz00_7904); 
BgL_odepthz00_7909 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7910); } 
if(
(BgL_arg1816z00_7897<BgL_odepthz00_7909))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7911;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7912;
BgL_arg1821z00_7912 = 
(BgL_oclassz00_7904); 
BgL_arg1820z00_7911 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7912, BgL_arg1816z00_7897); } 
BgL_res2666z00_7903 = 
(BgL_arg1820z00_7911==BgL_classz00_7895); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7903 = ((bool_t)0); } } } } 
BgL_test5440z00_15745 = BgL_res2666z00_7903; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5440z00_15745 = ((bool_t)0)
; } } 
if(BgL_test5440z00_15745)
{ /* Llib/object.scm 1529 */
BgL_excz00_7913 = 
((BgL_z62warningz62_bglt)BgL_excz00_5380); }  else 
{ 
 obj_t BgL_auxz00_15787;
BgL_auxz00_15787 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(66749L), BGl_string4012z00zz__objectz00, BGl_string3853z00zz__objectz00, BgL_excz00_5380); 
FAILURE(BgL_auxz00_15787,BFALSE,BFALSE);} } 
return 
BGl_warningzd2notifyzd2zz__errorz00(
((obj_t)BgL_excz00_7913));} } 

}



/* &exception-notify-&io1410 */
obj_t BGl_z62exceptionzd2notifyzd2z62io1410z00zz__objectz00(obj_t BgL_envz00_5381, obj_t BgL_excz00_5382)
{
{ /* Llib/object.scm 1520 */
{ /* Llib/object.scm 1520 */
 BgL_z62iozd2writezd2errorz62_bglt BgL_excz00_7932;
{ /* Llib/object.scm 1520 */
 bool_t BgL_test5447z00_15793;
{ /* Llib/object.scm 1520 */
 obj_t BgL_classz00_7914;
BgL_classz00_7914 = BGl_z62iozd2writezd2errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_excz00_5382))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7915; long BgL_arg1816z00_7916;
BgL_arg1815z00_7915 = 
(BgL_objectz00_bglt)(BgL_excz00_5382); 
BgL_arg1816z00_7916 = 
BGL_CLASS_DEPTH(BgL_classz00_7914); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7917;
BgL_idxz00_7917 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7915); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7918;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7919;
BgL_arg1825z00_7919 = 
(BgL_idxz00_7917+BgL_arg1816z00_7916); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7920;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7921;
BgL_aux3193z00_7921 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7921))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7920 = BgL_aux3193z00_7921; }  else 
{ 
 obj_t BgL_auxz00_15804;
BgL_auxz00_15804 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7921); 
FAILURE(BgL_auxz00_15804,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5451z00_15808;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15809;
BgL_tmpz00_15809 = 
VECTOR_LENGTH(BgL_vectorz00_7920); 
BgL_test5451z00_15808 = 
BOUND_CHECK(BgL_arg1825z00_7919, BgL_tmpz00_15809); } 
if(BgL_test5451z00_15808)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7918 = 
VECTOR_REF(BgL_vectorz00_7920,BgL_arg1825z00_7919); }  else 
{ 
 obj_t BgL_auxz00_15813;
BgL_auxz00_15813 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7920, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7920)), 
(int)(BgL_arg1825z00_7919)); 
FAILURE(BgL_auxz00_15813,BFALSE,BFALSE);} } } } 
BgL_test5447z00_15793 = 
(BgL_arg1824z00_7918==BgL_classz00_7914); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7922;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7923;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7924; long BgL_arg1554z00_7925;
BgL_arg1552z00_7924 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7926;
BgL_arg1555z00_7926 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7915); 
BgL_arg1554z00_7925 = 
(BgL_arg1555z00_7926-OBJECT_TYPE); } 
BgL_oclassz00_7923 = 
VECTOR_REF(BgL_arg1552z00_7924,BgL_arg1554z00_7925); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7927;
BgL__ortest_1222z00_7927 = 
(BgL_classz00_7914==BgL_oclassz00_7923); 
if(BgL__ortest_1222z00_7927)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7922 = BgL__ortest_1222z00_7927; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7928;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7929;
BgL_arg1822z00_7929 = 
(BgL_oclassz00_7923); 
BgL_odepthz00_7928 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7929); } 
if(
(BgL_arg1816z00_7916<BgL_odepthz00_7928))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7930;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7931;
BgL_arg1821z00_7931 = 
(BgL_oclassz00_7923); 
BgL_arg1820z00_7930 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7931, BgL_arg1816z00_7916); } 
BgL_res2666z00_7922 = 
(BgL_arg1820z00_7930==BgL_classz00_7914); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7922 = ((bool_t)0); } } } } 
BgL_test5447z00_15793 = BgL_res2666z00_7922; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5447z00_15793 = ((bool_t)0)
; } } 
if(BgL_test5447z00_15793)
{ /* Llib/object.scm 1520 */
BgL_excz00_7932 = 
((BgL_z62iozd2writezd2errorz62_bglt)BgL_excz00_5382); }  else 
{ 
 obj_t BgL_auxz00_15835;
BgL_auxz00_15835 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(66308L), BGl_string4017z00zz__objectz00, BGl_string3769z00zz__objectz00, BgL_excz00_5382); 
FAILURE(BgL_auxz00_15835,BFALSE,BFALSE);} } 
{ 

{ /* Llib/object.scm 1522 */
 bool_t BgL_test5454z00_15839;
{ /* Llib/object.scm 1522 */
 obj_t BgL_arg2229z00_7935; obj_t BgL_arg2230z00_7936;
BgL_arg2229z00_7935 = 
(((BgL_z62errorz62_bglt)COBJECT(
((BgL_z62errorz62_bglt)BgL_excz00_7932)))->BgL_objz00); 
{ /* Llib/object.scm 1522 */
 obj_t BgL_tmpz00_15842;
BgL_tmpz00_15842 = 
BGL_CURRENT_DYNAMIC_ENV(); 
BgL_arg2230z00_7936 = 
BGL_ENV_CURRENT_ERROR_PORT(BgL_tmpz00_15842); } 
BgL_test5454z00_15839 = 
(BgL_arg2229z00_7935==BgL_arg2230z00_7936); } 
if(BgL_test5454z00_15839)
{ /* Llib/object.scm 1522 */
return BFALSE;}  else 
{ /* Llib/object.scm 1522 */
{ /* Llib/object.scm 1520 */
 obj_t BgL_nextzd2method1409zd2_7934;
BgL_nextzd2method1409zd2_7934 = 
BGl_findzd2superzd2classzd2methodzd2zz__objectz00(
((BgL_objectz00_bglt)BgL_excz00_7932), BGl_exceptionzd2notifyzd2envz00zz__objectz00, BGl_z62iozd2writezd2errorz62zz__objectz00); 
if(
PROCEDURE_CORRECT_ARITYP(BgL_nextzd2method1409zd2_7934, 1))
{ /* Llib/object.scm 1520 */
return 
BGL_PROCEDURE_CALL1(BgL_nextzd2method1409zd2_7934, 
((obj_t)BgL_excz00_7932));}  else 
{ /* Llib/object.scm 1520 */
FAILURE(BGl_string4013z00zz__objectz00,BGl_list4014z00zz__objectz00,BgL_nextzd2method1409zd2_7934);} } } } } } } 

}



/* &exception-notify-&er1408 */
obj_t BGl_z62exceptionzd2notifyzd2z62er1408z00zz__objectz00(obj_t BgL_envz00_5383, obj_t BgL_excz00_5384)
{
{ /* Llib/object.scm 1514 */
{ /* Llib/object.scm 1515 */
 BgL_z62errorz62_bglt BgL_excz00_7955;
{ /* Llib/object.scm 1515 */
 bool_t BgL_test5456z00_15856;
{ /* Llib/object.scm 1515 */
 obj_t BgL_classz00_7937;
BgL_classz00_7937 = BGl_z62errorz62zz__objectz00; 
if(
BGL_OBJECTP(BgL_excz00_5384))
{ /* Llib/object.scm 1334 */
 BgL_objectz00_bglt BgL_arg1815z00_7938; long BgL_arg1816z00_7939;
BgL_arg1815z00_7938 = 
(BgL_objectz00_bglt)(BgL_excz00_5384); 
BgL_arg1816z00_7939 = 
BGL_CLASS_DEPTH(BgL_classz00_7937); 
if(
BGL_CONDEXPAND_ISA_ARCH64())
{ /* Llib/object.scm 1375 */
 long BgL_idxz00_7940;
BgL_idxz00_7940 = 
BGL_OBJECT_INHERITANCE_NUM(BgL_arg1815z00_7938); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_arg1824z00_7941;
{ /* Llib/object.scm 1376 */
 long BgL_arg1825z00_7942;
BgL_arg1825z00_7942 = 
(BgL_idxz00_7940+BgL_arg1816z00_7939); 
{ /* Llib/object.scm 1376 */
 obj_t BgL_vectorz00_7943;
{ /* Llib/object.scm 1376 */
 obj_t BgL_aux3193z00_7944;
BgL_aux3193z00_7944 = BGl_za2inheritancesza2z00zz__objectz00; 
if(
VECTORP(BgL_aux3193z00_7944))
{ /* Llib/object.scm 1376 */
BgL_vectorz00_7943 = BgL_aux3193z00_7944; }  else 
{ 
 obj_t BgL_auxz00_15867;
BgL_auxz00_15867 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60120L), BGl_string3633z00zz__objectz00, BGl_string3486z00zz__objectz00, BgL_aux3193z00_7944); 
FAILURE(BgL_auxz00_15867,BFALSE,BFALSE);} } 
{ /* Llib/object.scm 1376 */
 bool_t BgL_test5460z00_15871;
{ /* Llib/object.scm 1376 */
 long BgL_tmpz00_15872;
BgL_tmpz00_15872 = 
VECTOR_LENGTH(BgL_vectorz00_7943); 
BgL_test5460z00_15871 = 
BOUND_CHECK(BgL_arg1825z00_7942, BgL_tmpz00_15872); } 
if(BgL_test5460z00_15871)
{ /* Llib/object.scm 1376 */
BgL_arg1824z00_7941 = 
VECTOR_REF(BgL_vectorz00_7943,BgL_arg1825z00_7942); }  else 
{ 
 obj_t BgL_auxz00_15876;
BgL_auxz00_15876 = 
BGl_indexzd2outzd2ofzd2boundszd2errorz00zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(60108L), BGl_string3634z00zz__objectz00, BgL_vectorz00_7943, 
(int)(
VECTOR_LENGTH(BgL_vectorz00_7943)), 
(int)(BgL_arg1825z00_7942)); 
FAILURE(BgL_auxz00_15876,BFALSE,BFALSE);} } } } 
BgL_test5456z00_15856 = 
(BgL_arg1824z00_7941==BgL_classz00_7937); } }  else 
{ /* Llib/object.scm 1354 */
 bool_t BgL_res2666z00_7945;
{ /* Llib/object.scm 1362 */
 obj_t BgL_oclassz00_7946;
{ /* Llib/object.scm 893 */
 obj_t BgL_arg1552z00_7947; long BgL_arg1554z00_7948;
BgL_arg1552z00_7947 = 
(BGl_za2classesza2z00zz__objectz00); 
{ /* Llib/object.scm 894 */
 long BgL_arg1555z00_7949;
BgL_arg1555z00_7949 = 
BGL_OBJECT_CLASS_NUM(BgL_arg1815z00_7938); 
BgL_arg1554z00_7948 = 
(BgL_arg1555z00_7949-OBJECT_TYPE); } 
BgL_oclassz00_7946 = 
VECTOR_REF(BgL_arg1552z00_7947,BgL_arg1554z00_7948); } 
{ /* Llib/object.scm 1363 */
 bool_t BgL__ortest_1222z00_7950;
BgL__ortest_1222z00_7950 = 
(BgL_classz00_7937==BgL_oclassz00_7946); 
if(BgL__ortest_1222z00_7950)
{ /* Llib/object.scm 1363 */
BgL_res2666z00_7945 = BgL__ortest_1222z00_7950; }  else 
{ /* Llib/object.scm 1364 */
 long BgL_odepthz00_7951;
{ /* Llib/object.scm 1364 */
 obj_t BgL_arg1822z00_7952;
BgL_arg1822z00_7952 = 
(BgL_oclassz00_7946); 
BgL_odepthz00_7951 = 
BGL_CLASS_DEPTH(BgL_arg1822z00_7952); } 
if(
(BgL_arg1816z00_7939<BgL_odepthz00_7951))
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1820z00_7953;
{ /* Llib/object.scm 1366 */
 obj_t BgL_arg1821z00_7954;
BgL_arg1821z00_7954 = 
(BgL_oclassz00_7946); 
BgL_arg1820z00_7953 = 
BGL_CLASS_ANCESTORS_REF(BgL_arg1821z00_7954, BgL_arg1816z00_7939); } 
BgL_res2666z00_7945 = 
(BgL_arg1820z00_7953==BgL_classz00_7937); }  else 
{ /* Llib/object.scm 1365 */
BgL_res2666z00_7945 = ((bool_t)0); } } } } 
BgL_test5456z00_15856 = BgL_res2666z00_7945; } }  else 
{ /* Llib/object.scm 1333 */
BgL_test5456z00_15856 = ((bool_t)0)
; } } 
if(BgL_test5456z00_15856)
{ /* Llib/object.scm 1515 */
BgL_excz00_7955 = 
((BgL_z62errorz62_bglt)BgL_excz00_5384); }  else 
{ 
 obj_t BgL_auxz00_15898;
BgL_auxz00_15898 = 
BGl_typezd2errorzd2zz__errorz00(BGl_string3483z00zz__objectz00, 
BINT(66065L), BGl_string4018z00zz__objectz00, BGl_string3731z00zz__objectz00, BgL_excz00_5384); 
FAILURE(BgL_auxz00_15898,BFALSE,BFALSE);} } 
return 
BGl_errorzd2notifyzd2zz__errorz00(
((obj_t)BgL_excz00_7955));} } 

}

#ifdef __cplusplus
}
#endif
