/*===========================================================================*/
/*   (Object/slots.scm)                                                      */
/*   Bigloo (2.6b)                                                           */
/*   Inria -- Sophia Antipolis (c)       Mon Dec 15 12:14:36 CET 2003        */
/*===========================================================================*/
/* COMPILATION: (/users/serrano/prgm/project/bigloo/bin/bigloo -q -afile .afile -fsharing -fno-reflection -cc gcc-2.95 -lib-dir /users/serrano/prgm/project/bigloo/lib/2.6b -unsafev -no-hello -O2 -rm -unsafe -s -indent Object/slots.scm)*/
/* GC selection */
#define THE_GC BOEHM_GC

#include <bigloo.h>


/* Object type definitions */
typedef struct BgL_typez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   obj_t BgL_siza7eza7;
   obj_t BgL_classz00;
   obj_t BgL_coercezd2tozd2;
   obj_t BgL_parentsz00;
   bool_t BgL_initzf3zf3;
   bool_t BgL_magiczf3zf3;
   obj_t BgL_z42z42;
   obj_t BgL_aliasz00;
   obj_t BgL_pointedzd2tozd2byz00;
   obj_t BgL_tvectorz00;
   obj_t BgL_locationz00;
   obj_t BgL_importzd2locationzd2;
} *BgL_typez00_bglt;

typedef struct BgL_tvecz00_bgl {
   struct BgL_typez00_bgl * BgL_itemzd2typezd2;
} *BgL_tvecz00_bglt;

typedef struct BgL_tclassz00_bgl {
   obj_t BgL_itszd2superzd2;
   obj_t BgL_slotsz00;
   struct BgL_globalz00_bgl * BgL_holderz00;
   obj_t BgL_wideningz00;
   long BgL_depthz00;
   bool_t BgL_finalzf3zf3;
   obj_t BgL_constructorz00;
   obj_t BgL_virtualzd2slotszd2numberz00;
   bool_t BgL_abstractzf3zf3;
   obj_t BgL_widezd2typezd2;
} *BgL_tclassz00_bglt;

typedef struct BgL_jclassz00_bgl {
   obj_t BgL_itszd2superzd2;
   obj_t BgL_slotsz00;
   obj_t BgL_packagez00;
} *BgL_jclassz00_bglt;

typedef struct BgL_wclassz00_bgl {
   obj_t BgL_itszd2classzd2;
} *BgL_wclassz00_bglt;

typedef struct BgL_valuez00_bgl {
   header_t header;
   obj_t widening;
} *BgL_valuez00_bglt;

typedef struct BgL_variablez00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
} *BgL_variablez00_bglt;

typedef struct BgL_globalz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
   obj_t BgL_modulez00;
   obj_t BgL_importz00;
   bool_t BgL_evaluablezf3zf3;
   bool_t BgL_libraryzf3zf3;
   bool_t BgL_userzf3zf3;
   obj_t BgL_pragmaz00;
   obj_t BgL_srcz00;
   obj_t BgL_jvmzd2typezd2namez00;
} *BgL_globalz00_bglt;

typedef struct BgL_localz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   struct BgL_typez00_bgl * BgL_typez00;
   struct BgL_valuez00_bgl * BgL_valuez00;
   obj_t BgL_accessz00;
   obj_t BgL_fastzd2alphazd2;
   obj_t BgL_removablez00;
   long BgL_occurrencez00;
   bool_t BgL_userzf3zf3;
   long BgL_keyz00;
} *BgL_localz00_bglt;

typedef struct BgL_funz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
} *BgL_funz00_bglt;

typedef struct BgL_sfunz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
   obj_t BgL_propertyz00;
   obj_t BgL_argsz00;
   obj_t BgL_bodyz00;
   obj_t BgL_classz00;
   obj_t BgL_dssslzd2keywordszd2;
   obj_t BgL_locz00;
} *BgL_sfunz00_bglt;

typedef struct BgL_cfunz00_bgl {
   header_t header;
   obj_t widening;
   long BgL_arityz00;
   obj_t BgL_sidezd2effectzf3z21;
   obj_t BgL_predicatezd2ofzd2;
   obj_t BgL_stackzd2allocatorzd2;
   bool_t BgL_topzf3zf3;
   obj_t BgL_thezd2closurezd2;
   obj_t BgL_effectz00;
   obj_t BgL_argszd2typezd2;
   bool_t BgL_macrozf3zf3;
   bool_t BgL_infixzf3zf3;
   obj_t BgL_methodz00;
} *BgL_cfunz00_bglt;

typedef struct BgL_svarz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_locz00;
} *BgL_svarz00_bglt;

typedef struct BgL_scnstz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_nodez00;
   obj_t BgL_classz00;
   obj_t BgL_locz00;
} *BgL_scnstz00_bglt;

typedef struct BgL_cvarz00_bgl {
   header_t header;
   obj_t widening;
   bool_t BgL_macrozf3zf3;
} *BgL_cvarz00_bglt;

typedef struct BgL_sexitz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_handlerz00;
   bool_t BgL_detachedzf3zf3;
} *BgL_sexitz00_bglt;

typedef struct BgL_feffectz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_readz00;
   obj_t BgL_writez00;
} *BgL_feffectz00_bglt;

typedef struct BgL_slotz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_namez00;
   obj_t BgL_srcz00;
   obj_t BgL_classzd2ownerzd2;
   obj_t BgL_typez00;
   bool_t BgL_readzd2onlyzf3z21;
   obj_t BgL_defaultzd2valuezd2;
   obj_t BgL_virtualzd2numzd2;
   obj_t BgL_getterz00;
   obj_t BgL_setterz00;
   obj_t BgL_indexedz00;
   obj_t BgL_userzd2infozd2;
} *BgL_slotz00_bglt;


static obj_t BGl__fillzd2slotz123240zc0zzobject_slotsz00(obj_t, obj_t, 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_methodzd2initzd2zzobject_slotsz00();
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl_schemezd2symbolzd2ze3czd2stringz31zzobject_slotsz00(obj_t);
BGL_IMPORT long BGl_classzd2numzd2zz__objectz00(obj_t);
BGL_IMPORT obj_t BGl_stringzd2downcasezd2zz__r4_strings_6_7z00(obj_t);
BGL_IMPORT obj_t BGl_readz00zz__readerz00(obj_t);
BGL_IMPORT bool_t BGl_iszd2azf3z21zz__objectz00(obj_t, obj_t);
extern obj_t BGl_tclassz00zzobject_classz00;
BGL_IMPORT obj_t BGl_objectz00zz__objectz00;
extern obj_t BGl_userzd2errorzf2locationz20zztools_errorz00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_registerzd2classz12zc0zz__objectz00(obj_t, obj_t, obj_t, obj_t, long, obj_t, obj_t, obj_t);
static obj_t BGl__allocatezd2slotzd2zzobject_slotsz00(obj_t);
extern obj_t BGl_za2_za2z00zztype_cachez00;
BGL_IMPORT obj_t BGl_gensymz00zz__r4_symbols_6_4z00;
extern obj_t BGl_findzd2locationzd2zztools_locationz00(obj_t);
extern obj_t BGl_typez00zztype_typez00;
static obj_t BGl_structzb2objectzd2ze3objectzd2slot1999z51zzobject_slotsz00(obj_t, obj_t, obj_t);
extern obj_t BGl_za2astzd2casezd2sensitiveza2z00zzengine_paramz00;
BGL_IMPORT obj_t BGl_reversez12z12zz__r4_pairs_and_lists_6_3z00(obj_t);
static obj_t BGl_ensurezd2typezd2definedz12z12zzobject_slotsz00(BgL_typez00_bglt, obj_t);
static obj_t BGl__makezd2classzd2makezd2typedzd2formals3234z00zzobject_slotsz00(obj_t, obj_t, obj_t);
static obj_t BGl__slotzd2nozd2defaultzd2valuezd2markz00zzobject_slotsz00(obj_t);
static obj_t BGl_cnstzd2initzd2zzobject_slotsz00();
BGL_EXPORTED_DECL BgL_slotz00_bglt BGl_makezd2slotzd2zzobject_slotsz00(obj_t, obj_t, obj_t, obj_t, obj_t, bool_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
static obj_t BGl__makezd2javazd2classzd2slots3228zd2zzobject_slotsz00(obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_slotzd2defaultzf3z21zzobject_slotsz00(BgL_slotz00_bglt);
static obj_t BGl__makezd2classzd2slots3226z00zzobject_slotsz00(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT obj_t BGl_stringzd2appendzd2zz__r4_strings_6_7z00(obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzobject_slotsz00();
BGL_EXPORTED_DECL obj_t BGl_slotzd2nozd2defaultzd2valuezd2markz00zzobject_slotsz00();
BGL_IMPORT obj_t make_struct(obj_t, int, obj_t);
BGL_EXPORTED_DECL obj_t BGl_makezd2javazd2classzd2slotszd2zzobject_slotsz00(BgL_jclassz00_bglt, obj_t, obj_t, obj_t);
extern obj_t BGl_findzd2locationzf2locz20zztools_locationz00(obj_t, obj_t);
BGL_IMPORT obj_t BGl_addzd2methodz12zc0zz__objectz00(obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL obj_t BGl_makezd2classzd2slotsz00zzobject_slotsz00(BgL_tclassz00_bglt, obj_t, obj_t, int, obj_t);
extern obj_t BGl_makezd2typedzd2identz00zzast_identz00(obj_t, obj_t);
static obj_t BGl_toplevelzd2initzd2zzobject_slotsz00();
BGL_IMPORT obj_t BGl_2zb2zb2zz__r4_numbers_6_5z00(obj_t, obj_t);
extern obj_t BGl_jclassz00zzobject_classz00;
BGL_EXPORTED_DEF obj_t BGl_slotz00zzobject_slotsz00 = BUNSPEC;
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzobject_slotsz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_tracez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_locationz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_shapez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_cachez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztvector_tvectorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_classz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_identz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_glozd2declzd2(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__errorz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__objectz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__readerz00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_symbols_6_4z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5z00(long, char *);
BGL_IMPORT obj_t BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(long, char *);
static obj_t BGl_findzd2slotzd2typez00zzobject_slotsz00(obj_t, obj_t);
extern obj_t BGl_userzd2errorzd2zztools_errorz00(obj_t, obj_t, obj_t, obj_t);
BGL_IMPORT bool_t BGl_2ze3zd3z30zz__r4_numbers_6_5z00(obj_t, obj_t);
static obj_t BGl__slotzd2virtualzf33224z21zzobject_slotsz00(obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_slotzf3zf3zzobject_slotsz00(obj_t);
BGL_IMPORT obj_t bgl_reverse(obj_t);
extern obj_t BGl_za2longza2z00zztype_cachez00;
extern obj_t BGl_za2warningzd2overridenzd2slotsza2z00zzengine_paramz00;
BGL_EXPORTED_DECL obj_t BGl_makezd2classzd2makezd2formalszd2zzobject_slotsz00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_makezd2classzd2makezd2typedzd2formalsz00zzobject_slotsz00(obj_t, obj_t);
static obj_t BGl_findzd2virtualzd2attrz00zzobject_slotsz00(obj_t);
extern obj_t BGl_shapez00zztools_shapez00(obj_t);
BGL_EXPORTED_DECL obj_t BGl_getzd2localzd2virtualzd2slotszd2numberz00zzobject_slotsz00(BgL_tclassz00_bglt, obj_t);
BGL_IMPORT obj_t BGl_memqz00zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
static obj_t BGl_objectzd2ze3structzd2slot1997ze3zzobject_slotsz00(obj_t, obj_t);
extern BgL_typez00_bglt BGl_declarezd2subtypez12zc0zztype_envz00(obj_t, obj_t, obj_t, obj_t);
BGL_EXPORTED_DECL bool_t BGl_slotzd2virtualzf3z21zzobject_slotsz00(BgL_slotz00_bglt);
static obj_t BGl__getzd2localzd2virtualzd2slotszd2number3230z00zzobject_slotsz00(obj_t, obj_t, obj_t);
static obj_t BGl__makezd2slot3238zd2zzobject_slotsz00(obj_t, 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__slotzd2defaultzf33222z21zzobject_slotsz00(obj_t, obj_t);
static obj_t BGl__slotzf3zf3zzobject_slotsz00(obj_t, obj_t);
static obj_t BGl_findzd2defaultzd2attrz00zzobject_slotsz00(obj_t);
BGL_IMPORT obj_t BGl_symbolzd2appendzd2zz__r4_symbols_6_4z00(obj_t);
static obj_t BGl_shapezd2slot1995zd2zzobject_slotsz00(obj_t, obj_t);
static obj_t BGl__makezd2classzd2makezd2formals3232zd2zzobject_slotsz00(obj_t, obj_t);
BGL_EXPORTED_DECL BgL_slotz00_bglt BGl_fillzd2slotz12zc0zzobject_slotsz00(BgL_slotz00_bglt, obj_t, obj_t, obj_t, obj_t, obj_t, bool_t, obj_t, obj_t, obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_za2objza2z00zztype_cachez00;
static obj_t BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00 = BUNSPEC;
static obj_t BGl_objectzd2initzd2zzobject_slotsz00();
static obj_t BGl_requirezd2initializa7ationz75zzobject_slotsz00 = BUNSPEC;
extern obj_t BGl_tvecz00zztvector_tvectorz00;
extern obj_t BGl_idzd2ze3namez31zzast_identz00(obj_t);
extern obj_t BGl_wideningzd2tveczd2zztvector_tvectorz00(BgL_typez00_bglt);
BGL_IMPORT obj_t BGl_za2warningza2z00zz__errorz00;
extern obj_t BGl_parsezd2idzd2zzast_identz00(obj_t, obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzobject_slotsz00();
BGL_EXPORTED_DECL BgL_slotz00_bglt BGl_allocatezd2slotzd2zzobject_slotsz00();
extern obj_t BGl_userzd2warningzf2locationz20zztools_errorz00(obj_t, obj_t, obj_t, obj_t);
extern BgL_globalz00_bglt BGl_declarezd2globalzd2cvarz12z12zzast_glozd2declzd2(obj_t, obj_t, obj_t, bool_t, obj_t, obj_t);
extern obj_t BGl_markzd2symbolzd2nonzd2userz12zc0zzast_identz00(obj_t);
static obj_t BGl_findzd2infozd2attrz00zzobject_slotsz00(obj_t);
static obj_t __cnst[ 16 ] ;


DEFINE_EXPORT_PROCEDURE( BGl_allocatezd2slotzd2envz00zzobject_slotsz00, BgL_bgl__allocateza7d2slotza7d2za7za7object_slotsza7003514za7, BGl__allocatezd2slotzd2zzobject_slotsz00, 0L, 0 );
extern obj_t BGl_shapezd2envzd2zztools_shapez00;
BGL_IMPORT obj_t BGl_objectzd2ze3structzd2envze3zz__objectz00;
DEFINE_STRING( BGl_string3480z00zzobject_slotsz00, BgL_bgl_string3480za700za7za7object_slotsza7003515z00, "slot static final - foreign set get info default id * -len read-only bigloo obj slot-no-default-value__17_5_1996 ", 113 );
DEFINE_STRING( BGl_string3479z00zzobject_slotsz00, BgL_bgl_string3479za700za7za7object_slotsza7003516z00, "<", 1 );
DEFINE_STRING( BGl_string3478z00zzobject_slotsz00, BgL_bgl_string3478za700za7za7object_slotsza7003517z00, "(", 1 );
DEFINE_STRING( BGl_string3477z00zzobject_slotsz00, BgL_bgl_string3477za700za7za7object_slotsza7003518z00, ") ", 2 );
DEFINE_STRING( BGl_string3476z00zzobject_slotsz00, BgL_bgl_string3476za700za7za7object_slotsza7003519z00, " owner=", 7 );
DEFINE_STRING( BGl_string3475z00zzobject_slotsz00, BgL_bgl_string3475za700za7za7object_slotsza7003520z00, " type=", 6 );
DEFINE_STRING( BGl_string3474z00zzobject_slotsz00, BgL_bgl_string3474za700za7za7object_slotsza7003521z00, ">", 1 );
DEFINE_STRING( BGl_string3470z00zzobject_slotsz00, BgL_bgl_string3470za700za7za7object_slotsza7003522z00, "Unknown class slot type", 23 );
DEFINE_STRING( BGl_string3469z00zzobject_slotsz00, BgL_bgl_string3469za700za7za7object_slotsza7003523z00, "Illegal virtual slot (missing setter)", 37 );
DEFINE_STRING( BGl_string3468z00zzobject_slotsz00, BgL_bgl_string3468za700za7za7object_slotsza7003524z00, "Illegal virtual slot (read-only)", 32 );
DEFINE_STRING( BGl_string3467z00zzobject_slotsz00, BgL_bgl_string3467za700za7za7object_slotsza7003525z00, "Illegal virtual slot (missing getter)", 37 );
DEFINE_STRING( BGl_string3466z00zzobject_slotsz00, BgL_bgl_string3466za700za7za7object_slotsza7003526z00, "virtual slot can't be indexed", 29 );
DEFINE_STRING( BGl_string3465z00zzobject_slotsz00, BgL_bgl_string3465za700za7za7object_slotsza7003527z00, "Parse error", 11 );
DEFINE_STRING( BGl_string3464z00zzobject_slotsz00, BgL_bgl_string3464za700za7za7object_slotsza7003528z00, "Overriden virtual slot", 22 );
DEFINE_STRING( BGl_string3463z00zzobject_slotsz00, BgL_bgl_string3463za700za7za7object_slotsza7003529z00, "Illegal duplicated virtual slot", 31 );
DEFINE_STRING( BGl_string3462z00zzobject_slotsz00, BgL_bgl_string3462za700za7za7object_slotsza7003530z00, "Class declarator", 16 );
DEFINE_STRING( BGl_string3461z00zzobject_slotsz00, BgL_bgl_string3461za700za7za7object_slotsza7003531z00, "Can't find type definition", 26 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2javazd2classzd2slotszd2envz00zzobject_slotsz00, BgL_bgl__makeza7d2javaza7d2classza7d2slots3228za7d2za7za7object_slotsza7003532za7, BGl__makezd2javazd2classzd2slots3228zd2zzobject_slotsz00, 0L, 4 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2classzd2slotszd2envzd2zzobject_slotsz00, BgL_bgl__makeza7d2classza7d2slots3226za700za7za7object_slotsza7003533z00, BGl__makezd2classzd2slots3226z00zzobject_slotsz00, 0L, 5 );
DEFINE_EXPORT_PROCEDURE( BGl_slotzd2defaultzf3zd2envzf3zzobject_slotsz00, BgL_bgl__slotza7d2defaultza7f33222za721za7za7object_slotsza7003534z00, BGl__slotzd2defaultzf33222z21zzobject_slotsz00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_fillzd2slotz12zd2envz12zzobject_slotsz00, BgL_bgl__fillza7d2slotza7123240za7c0za7za7object_slotsza7003535z00, BGl__fillzd2slotz123240zc0zzobject_slotsz00, 0L, 13 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2classzd2makezd2typedzd2formalszd2envzd2zzobject_slotsz00, BgL_bgl__makeza7d2classza7d2makeza7d2typedza7d2formals3234za700za7za7object_slotsza7003536z00, BGl__makezd2classzd2makezd2typedzd2formals3234z00zzobject_slotsz00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_slotzd2nozd2defaultzd2valuezd2markzd2envzd2zzobject_slotsz00, BgL_bgl__slotza7d2noza7d2defaultza7d2valueza7d2markza700za7za7object_slotsza7003537z00, BGl__slotzd2nozd2defaultzd2valuezd2markz00zzobject_slotsz00, 0L, 0 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2classzd2makezd2formalszd2envz00zzobject_slotsz00, BgL_bgl__makeza7d2classza7d2makeza7d2formals3232za7d2za7za7object_slotsza7003538za7, BGl__makezd2classzd2makezd2formals3232zd2zzobject_slotsz00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_slotzd2virtualzf3zd2envzf3zzobject_slotsz00, BgL_bgl__slotza7d2virtualza7f33224za721za7za7object_slotsza7003539z00, BGl__slotzd2virtualzf33224z21zzobject_slotsz00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_slotzf3zd2envz21zzobject_slotsz00, BgL_bgl__slotza7f3za7f3za7za7object_slotsza7003540za7, BGl__slotzf3zf3zzobject_slotsz00, 0L, 1 );
DEFINE_EXPORT_PROCEDURE( BGl_getzd2localzd2virtualzd2slotszd2numberzd2envzd2zzobject_slotsz00, BgL_bgl__getza7d2localza7d2virtualza7d2slotsza7d2number3230za700za7za7object_slotsza7003541z00, BGl__getzd2localzd2virtualzd2slotszd2number3230z00zzobject_slotsz00, 0L, 2 );
DEFINE_STATIC_PROCEDURE( BGl_proc3471z00zzobject_slotsz00, BgL_bgl_shapeza7d2slot1995za7d2za7za7object_slotsza7003542za7, BGl_shapezd2slot1995zd2zzobject_slotsz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3472z00zzobject_slotsz00, BgL_bgl_objectza7d2za7e3structza7d2slot1997za7e3za7za7object_slotsza7003543za7, BGl_objectzd2ze3structzd2slot1997ze3zzobject_slotsz00, 0L, 1 );
DEFINE_STATIC_PROCEDURE( BGl_proc3473z00zzobject_slotsz00, BgL_bgl_structza7b2objectza7d2za7e3objectza7d2slot1999za751za7za7object_slotsza7003544z00, BGl_structzb2objectzd2ze3objectzd2slot1999z51zzobject_slotsz00, 0L, 2 );
DEFINE_EXPORT_PROCEDURE( BGl_makezd2slotzd2envz00zzobject_slotsz00, BgL_bgl__makeza7d2slot3238za7d2za7za7object_slotsza7003545za7, BGl__makezd2slot3238zd2zzobject_slotsz00, 0L, 12 );
BGL_IMPORT obj_t BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00;



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzobject_slotsz00(long BgL_checksumz00_1889, char * BgL_fromz00_1890)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzobject_slotsz00))
{ 
BGl_requirezd2initializa7ationz75zzobject_slotsz00 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzobject_slotsz00(); 
BGl_cnstzd2initzd2zzobject_slotsz00(); 
BGl_importedzd2moduleszd2initz00zzobject_slotsz00(); 
BGl_objectzd2initzd2zzobject_slotsz00(); 
BGl_methodzd2initzd2zzobject_slotsz00(); 
BGl_toplevelzd2initzd2zzobject_slotsz00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 15 */
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "object_slots"); 
BGl_modulezd2initializa7ationz75zz__r4_strings_6_7z00(((long)0), "object_slots"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "object_slots"); 
BGl_modulezd2initializa7ationz75zz__r4_symbols_6_4z00(((long)0), "object_slots"); 
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "object_slots"); 
BGl_modulezd2initializa7ationz75zz__r4_numbers_6_5z00(((long)0), "object_slots"); 
BGl_modulezd2initializa7ationz75zz__errorz00(((long)0), "object_slots"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 15 */
{ /* ./Object/slots.scm 15 */
obj_t BgL_cportz00_1834;
BgL_cportz00_1834 = 
open_input_string(BGl_string3480z00zzobject_slotsz00); 
{ 
long BgL_iz00_1835;
BgL_iz00_1835 = ((long)15); 
BgL_loopz00_1836:
{ /* ./Object/slots.scm 15 */
bool_t BgL_test3482z00_1837;
BgL_test3482z00_1837 = 
(BgL_iz00_1835==((long)-1)); 
if(BgL_test3482z00_1837)
{ /* ./Object/slots.scm 15 */
return BUNSPEC;}  else 
{ /* ./Object/slots.scm 15 */
{ /* ./Object/slots.scm 15 */
obj_t BgL_arg3484z00_1838;
{ /* ./Object/slots.scm 15 */
obj_t BgL_list3487z00_1839;
BgL_list3487z00_1839 = 
MAKE_PAIR(BgL_cportz00_1834, BNIL); 
BgL_arg3484z00_1838 = 
BGl_readz00zz__readerz00(BgL_list3487z00_1839); } 
{ /* ./Object/slots.scm 15 */
int BgL_auxz00_1912;
BgL_auxz00_1912 = 
(int)(BgL_iz00_1835); 
CNST_TABLE_SET(BgL_auxz00_1912, BgL_arg3484z00_1838); } } 
{ /* ./Object/slots.scm 15 */
int BgL_auxz00_1840;
{ /* ./Object/slots.scm 15 */
long BgL_auxz00_1915;
BgL_auxz00_1915 = 
(BgL_iz00_1835-((long)1)); 
BgL_auxz00_1840 = 
(int)(BgL_auxz00_1915); } 
{ 
long BgL_iz00_1918;
BgL_iz00_1918 = 
(long)(BgL_auxz00_1840); 
BgL_iz00_1835 = BgL_iz00_1918; 
goto BgL_loopz00_1836;} } } } } } } 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 15 */
return ( 
BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00 = 
CNST_TABLE_REF(((long)0)), BUNSPEC) ;} 
}



/* slot-no-default-value-mark */
BGL_EXPORTED_DEF obj_t BGl_slotzd2nozd2defaultzd2valuezd2markz00zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 83 */
return BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00;} 
}



/* _slot-no-default-value-mark */
obj_t BGl__slotzd2nozd2defaultzd2valuezd2markz00zzobject_slotsz00(obj_t BgL_envz00_1763)
{ AN_OBJECT;
{ /* ./Object/slots.scm 83 */
return BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00;} 
}



/* slot-default? */
BGL_EXPORTED_DEF bool_t BGl_slotzd2defaultzf3z21zzobject_slotsz00(BgL_slotz00_bglt BgL_slotz00_2)
{ AN_OBJECT;
{ /* ./Object/slots.scm 89 */
{ /* ./Object/slots.scm 90 */
bool_t BgL_testz00_1921;
{ /* ./Object/slots.scm 90 */
obj_t BgL_auxz00_1924;obj_t BgL_auxz00_1922;
BgL_auxz00_1924 = BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00; 
BgL_auxz00_1922 = 
(((BgL_slotz00_bglt)CREF(BgL_slotz00_2))->BgL_defaultzd2valuezd2); 
BgL_testz00_1921 = 
(BgL_auxz00_1922==BgL_auxz00_1924); } 
if(BgL_testz00_1921)
{ /* ./Object/slots.scm 90 */
return ((bool_t)0);}  else 
{ /* ./Object/slots.scm 90 */
return ((bool_t)1);} } } 
}



/* _slot-default?3222 */
obj_t BGl__slotzd2defaultzf33222z21zzobject_slotsz00(obj_t BgL_envz00_1764, obj_t BgL_slotz00_1765)
{ AN_OBJECT;
{ /* ./Object/slots.scm 89 */
{ /* ./Object/slots.scm 90 */
bool_t BgL_auxz00_1926;
BgL_auxz00_1926 = 
BGl_slotzd2defaultzf3z21zzobject_slotsz00(
(BgL_slotz00_bglt)(BgL_slotz00_1765)); 
return 
BBOOL(BgL_auxz00_1926);} } 
}



/* slot-virtual? */
BGL_EXPORTED_DEF bool_t BGl_slotzd2virtualzf3z21zzobject_slotsz00(BgL_slotz00_bglt BgL_slotz00_3)
{ AN_OBJECT;
{ /* ./Object/slots.scm 95 */
{ /* ./Object/slots.scm 96 */
long BgL_auxz00_1930;
{ /* ./Object/slots.scm 96 */
obj_t BgL_auxz00_1931;
BgL_auxz00_1931 = 
(((BgL_slotz00_bglt)CREF(BgL_slotz00_3))->BgL_virtualzd2numzd2); 
BgL_auxz00_1930 = 
(long)CINT(BgL_auxz00_1931); } 
return 
(BgL_auxz00_1930>=((long)0));} } 
}



/* _slot-virtual?3224 */
obj_t BGl__slotzd2virtualzf33224z21zzobject_slotsz00(obj_t BgL_envz00_1766, obj_t BgL_slotz00_1767)
{ AN_OBJECT;
{ /* ./Object/slots.scm 95 */
{ /* ./Object/slots.scm 96 */
bool_t BgL_auxz00_1935;
BgL_auxz00_1935 = 
BGl_slotzd2virtualzf3z21zzobject_slotsz00(
(BgL_slotz00_bglt)(BgL_slotz00_1767)); 
return 
BBOOL(BgL_auxz00_1935);} } 
}



/* ensure-type-defined! */
obj_t BGl_ensurezd2typezd2definedz12z12zzobject_slotsz00(BgL_typez00_bglt BgL_typez00_4, obj_t BgL_srcz00_5)
{ AN_OBJECT;
{ /* ./Object/slots.scm 101 */
{ /* ./Object/slots.scm 102 */
bool_t BgL_test2015z00_401;
BgL_test2015z00_401 = 
(((BgL_typez00_bglt)CREF(BgL_typez00_4))->BgL_initzf3zf3); 
if(BgL_test2015z00_401)
{ /* ./Object/slots.scm 102 */
return BFALSE;}  else 
{ /* ./Object/slots.scm 103 */
obj_t BgL_arg2019z00_403;
BgL_arg2019z00_403 = 
(((BgL_typez00_bglt)CREF(BgL_typez00_4))->BgL_idz00); 
return 
BGl_userzd2errorzd2zztools_errorz00(BGl_string3461z00zzobject_slotsz00, BgL_arg2019z00_403, BgL_srcz00_5, BNIL);} } } 
}



/* make-class-slots */
BGL_EXPORTED_DEF obj_t BGl_makezd2classzd2slotsz00zzobject_slotsz00(BgL_tclassz00_bglt BgL_classz00_6, obj_t BgL_slotsz00_7, obj_t BgL_superz00_8, int BgL_vnumz00_9, obj_t BgL_srcz00_10)
{ AN_OBJECT;
{ /* ./Object/slots.scm 108 */
{ 
obj_t BgL_slotzd2idzd2_540;obj_t BgL_sz00_550;obj_t BgL_slotzd2idzd2_551;obj_t BgL_attrz00_552;obj_t BgL_vgetz00_553;obj_t BgL_vsetz00_554;obj_t BgL_vnumz00_555;obj_t BgL_sz00_591;obj_t BgL_slotzd2idzd2_592;obj_t BgL_attrz00_593;obj_t BgL_slotsz00_642;obj_t BgL_slotz00_677;obj_t BgL_slotzd2listzd2_678;
{ 
obj_t BgL_slotsz00_413;obj_t BgL_resz00_414;obj_t BgL_vnumz00_415;
{ /* ./Object/slots.scm 277 */
obj_t BgL_arg2025z00_417;
{ /* ./Object/slots.scm 277 */
bool_t BgL_test2027z00_418;
BgL_test2027z00_418 = 
BGl_iszd2azf3z21zz__objectz00(BgL_superz00_8, BGl_typez00zztype_typez00); 
if(BgL_test2027z00_418)
{ /* ./Object/slots.scm 279 */
bool_t BgL_test2028z00_419;
BgL_test2028z00_419 = 
BGl_iszd2azf3z21zz__objectz00(BgL_superz00_8, BGl_tclassz00zzobject_classz00); 
if(BgL_test2028z00_419)
{ /* ./Object/slots.scm 279 */
{ /* ./Object/slots.scm 286 */
obj_t BgL_auxz00_1947;
{ /* ./Object/slots.scm 286 */
BgL_tclassz00_bglt BgL_obj1202z00_1119;
BgL_obj1202z00_1119 = 
(BgL_tclassz00_bglt)(BgL_superz00_8); 
{ 
obj_t BgL_auxz00_1949;
{ /* ./Object/slots.scm 286 */
BgL_objectz00_bglt BgL_auxz00_1950;
BgL_auxz00_1950 = 
(BgL_objectz00_bglt)(BgL_obj1202z00_1119); 
BgL_auxz00_1949 = 
BGL_OBJECT_WIDENING(BgL_auxz00_1950); } 
BgL_auxz00_1947 = 
(((BgL_tclassz00_bglt)CREF(BgL_auxz00_1949))->BgL_slotsz00); } } 
BgL_arg2025z00_417 = 
bgl_reverse(BgL_auxz00_1947); } }  else 
{ /* ./Object/slots.scm 279 */
BgL_arg2025z00_417 = BNIL; } }  else 
{ /* ./Object/slots.scm 277 */
BgL_arg2025z00_417 = BNIL; } } 
BgL_slotsz00_413 = BgL_slotsz00_7; 
BgL_resz00_414 = BgL_arg2025z00_417; 
BgL_vnumz00_415 = 
BINT(BgL_vnumz00_9); 
BgL_loopz00_416:
{ /* ./Object/slots.scm 288 */
bool_t BgL_test2035z00_421;
BgL_test2035z00_421 = 
NULLP(BgL_slotsz00_413); 
if(BgL_test2035z00_421)
{ /* ./Object/slots.scm 288 */
BgL_slotsz00_642 = BgL_resz00_414; 
{ 
obj_t BgL_slotsz00_644;obj_t BgL_resz00_645;
BgL_slotsz00_644 = BgL_slotsz00_642; 
BgL_resz00_645 = BNIL; 
BgL_loopz00_646:
{ /* ./Object/slots.scm 160 */
bool_t BgL_test2459z00_647;
BgL_test2459z00_647 = 
NULLP(BgL_slotsz00_644); 
if(BgL_test2459z00_647)
{ /* ./Object/slots.scm 160 */
return BgL_resz00_645;}  else 
{ /* ./Object/slots.scm 162 */
bool_t BgL_test2460z00_648;
{ /* ./Object/slots.scm 162 */
obj_t BgL_auxz00_1959;
BgL_auxz00_1959 = 
CAR(BgL_slotsz00_644); 
BgL_test2460z00_648 = 
NULLP(BgL_auxz00_1959); } 
if(BgL_test2460z00_648)
{ /* ./Object/slots.scm 162 */
{ /* ./Object/slots.scm 165 */
obj_t BgL_arg2462z00_649;
BgL_arg2462z00_649 = 
CDR(BgL_slotsz00_644); 
{ 
obj_t BgL_resz00_1965;obj_t BgL_slotsz00_1964;
BgL_slotsz00_1964 = BgL_arg2462z00_649; 
BgL_resz00_1965 = BNIL; 
BgL_resz00_645 = BgL_resz00_1965; 
BgL_slotsz00_644 = BgL_slotsz00_1964; 
goto BgL_loopz00_646;} } }  else 
{ /* ./Object/slots.scm 166 */
bool_t BgL_test2466z00_651;
{ /* ./Object/slots.scm 166 */
BgL_slotz00_bglt BgL_slotz00_1412;
{ /* ./Object/slots.scm 166 */
obj_t BgL_auxz00_1966;
BgL_auxz00_1966 = 
CAR(BgL_slotsz00_644); 
BgL_slotz00_1412 = 
(BgL_slotz00_bglt)(BgL_auxz00_1966); } 
{ /* ./Object/slots.scm 166 */
long BgL_auxz00_1969;
{ /* ./Object/slots.scm 166 */
obj_t BgL_auxz00_1970;
BgL_auxz00_1970 = 
(((BgL_slotz00_bglt)CREF(BgL_slotz00_1412))->BgL_virtualzd2numzd2); 
BgL_auxz00_1969 = 
(long)CINT(BgL_auxz00_1970); } 
BgL_test2466z00_651 = 
(BgL_auxz00_1969>=((long)0)); } } 
if(BgL_test2466z00_651)
{ /* ./Object/slots.scm 166 */
{ /* ./Object/slots.scm 167 */
obj_t BgL_otherz00_652;
BgL_slotz00_677 = 
CAR(BgL_slotsz00_644); 
BgL_slotzd2listzd2_678 = BgL_resz00_645; 
{ /* ./Object/slots.scm 146 */
obj_t BgL_idz00_680;
{ /* ./Object/slots.scm 146 */
BgL_slotz00_bglt BgL_obj1871z00_1440;
BgL_obj1871z00_1440 = 
(BgL_slotz00_bglt)(BgL_slotz00_677); 
BgL_idz00_680 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1871z00_1440))->BgL_idz00); } 
{ 
obj_t BgL_slotzd2listzd2_681;
BgL_slotzd2listzd2_681 = BgL_slotzd2listzd2_678; 
BgL_loopz00_682:
if(
NULLP(BgL_slotzd2listzd2_681))
{ /* ./Object/slots.scm 149 */
BgL_otherz00_652 = BFALSE; }  else 
{ /* ./Object/slots.scm 151 */
bool_t BgL_testz00_1979;
{ /* ./Object/slots.scm 151 */
obj_t BgL_auxz00_1980;
{ /* ./Object/slots.scm 151 */
BgL_slotz00_bglt BgL_obj1871z00_1443;
{ /* ./Object/slots.scm 151 */
obj_t BgL_auxz00_1981;
BgL_auxz00_1981 = 
CAR(BgL_slotzd2listzd2_681); 
BgL_obj1871z00_1443 = 
(BgL_slotz00_bglt)(BgL_auxz00_1981); } 
BgL_auxz00_1980 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1871z00_1443))->BgL_idz00); } 
BgL_testz00_1979 = 
(BgL_auxz00_1980==BgL_idz00_680); } 
if(BgL_testz00_1979)
{ /* ./Object/slots.scm 151 */
BgL_otherz00_652 = 
CAR(BgL_slotzd2listzd2_681); }  else 
{ /* ./Object/slots.scm 151 */
{ 
obj_t BgL_slotzd2listzd2_1987;
BgL_slotzd2listzd2_1987 = 
CDR(BgL_slotzd2listzd2_681); 
BgL_slotzd2listzd2_681 = BgL_slotzd2listzd2_1987; 
goto BgL_loopz00_682;} } } } } 
{ /* ./Object/slots.scm 168 */
bool_t BgL_test2467z00_653;
BgL_test2467z00_653 = 
BGl_iszd2azf3z21zz__objectz00(BgL_otherz00_652, BGl_slotz00zzobject_slotsz00); 
if(BgL_test2467z00_653)
{ /* ./Object/slots.scm 169 */
obj_t BgL_locz00_654;obj_t BgL_idz00_655;
BgL_locz00_654 = 
BGl_findzd2locationzd2zztools_locationz00(BgL_srcz00_10); 
{ /* ./Object/slots.scm 170 */
BgL_slotz00_bglt BgL_obj1871z00_1422;
{ /* ./Object/slots.scm 170 */
obj_t BgL_auxz00_1993;
BgL_auxz00_1993 = 
CAR(BgL_slotsz00_644); 
BgL_obj1871z00_1422 = 
(BgL_slotz00_bglt)(BgL_auxz00_1993); } 
BgL_idz00_655 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1871z00_1422))->BgL_idz00); } 
{ /* ./Object/slots.scm 171 */
bool_t BgL_test2468z00_656;
{ /* ./Object/slots.scm 171 */
obj_t BgL_auxz00_2002;obj_t BgL_auxz00_1997;
{ /* ./Object/slots.scm 172 */
BgL_slotz00_bglt BgL_obj1874z00_1425;
BgL_obj1874z00_1425 = 
(BgL_slotz00_bglt)(BgL_otherz00_652); 
BgL_auxz00_2002 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1874z00_1425))->BgL_classzd2ownerzd2); } 
{ /* ./Object/slots.scm 171 */
BgL_slotz00_bglt BgL_obj1874z00_1424;
{ /* ./Object/slots.scm 171 */
obj_t BgL_auxz00_1998;
BgL_auxz00_1998 = 
CAR(BgL_slotsz00_644); 
BgL_obj1874z00_1424 = 
(BgL_slotz00_bglt)(BgL_auxz00_1998); } 
BgL_auxz00_1997 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1874z00_1424))->BgL_classzd2ownerzd2); } 
BgL_test2468z00_656 = 
(BgL_auxz00_1997==BgL_auxz00_2002); } 
if(BgL_test2468z00_656)
{ /* ./Object/slots.scm 171 */
return 
BGl_userzd2errorzf2locationz20zztools_errorz00(BgL_locz00_654, BGl_string3462z00zzobject_slotsz00, BGl_string3463z00zzobject_slotsz00, BgL_idz00_655, BNIL);}  else 
{ /* ./Object/slots.scm 178 */
obj_t BgL_newzd2numzd2_658;
{ /* ./Object/slots.scm 178 */
BgL_slotz00_bglt BgL_obj1878z00_1427;
{ /* ./Object/slots.scm 178 */
obj_t BgL_auxz00_2008;
BgL_auxz00_2008 = 
CAR(BgL_slotsz00_644); 
BgL_obj1878z00_1427 = 
(BgL_slotz00_bglt)(BgL_auxz00_2008); } 
BgL_newzd2numzd2_658 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1878z00_1427))->BgL_virtualzd2numzd2); } 
{ /* ./Object/slots.scm 181 */
BgL_slotz00_bglt BgL_obj1880z00_1428;obj_t BgL_val1879z00_1429;
BgL_obj1880z00_1428 = 
(BgL_slotz00_bglt)(BgL_otherz00_652); 
BgL_val1879z00_1429 = BgL_newzd2numzd2_658; 
((((BgL_slotz00_bglt)CREF(BgL_obj1880z00_1428))->BgL_virtualzd2numzd2) = ((obj_t)BgL_val1879z00_1429), BUNSPEC); } 
{ /* ./Object/slots.scm 183 */
bool_t BgL_test2472z00_659;
{ /* ./Object/slots.scm 183 */
bool_t BgL_test2474z00_660;
{ /* ./Object/slots.scm 183 */
bool_t BgL_res3212z00_1434;
{ /* ./Object/slots.scm 183 */
obj_t BgL_objz00_1430;
BgL_objz00_1430 = BGl_za2warningza2z00zz__errorz00; 
if(
INTEGERP(BgL_objz00_1430))
{ /* ./Object/slots.scm 183 */
BgL_res3212z00_1434 = ((bool_t)1); }  else 
{ /* ./Object/slots.scm 183 */
BgL_res3212z00_1434 = 
REALP(BgL_objz00_1430); } } 
BgL_test2474z00_660 = BgL_res3212z00_1434; } 
if(BgL_test2474z00_660)
{ /* ./Object/slots.scm 184 */
bool_t BgL_test2475z00_661;
BgL_test2475z00_661 = 
BGl_2ze3zd3z30zz__r4_numbers_6_5z00(BGl_za2warningza2z00zz__errorz00, 
BINT(((long)2))); 
if(BgL_test2475z00_661)
{ /* ./Object/slots.scm 184 */
BgL_test2472z00_659 = 
CBOOL(BGl_za2warningzd2overridenzd2slotsza2z00zzengine_paramz00); }  else 
{ /* ./Object/slots.scm 184 */
BgL_test2472z00_659 = ((bool_t)0); } }  else 
{ /* ./Object/slots.scm 183 */
BgL_test2472z00_659 = ((bool_t)0); } } 
if(BgL_test2472z00_659)
{ /* ./Object/slots.scm 183 */
BGl_userzd2warningzf2locationz20zztools_errorz00(BgL_locz00_654, BGl_string3462z00zzobject_slotsz00, BGl_string3464z00zzobject_slotsz00, BgL_idz00_655); }  else 
{ /* ./Object/slots.scm 183 */BFALSE; } } 
{ /* ./Object/slots.scm 191 */
obj_t BgL_arg2479z00_662;
BgL_arg2479z00_662 = 
CDR(BgL_slotsz00_644); 
{ 
obj_t BgL_slotsz00_2025;
BgL_slotsz00_2025 = BgL_arg2479z00_662; 
BgL_slotsz00_644 = BgL_slotsz00_2025; 
goto BgL_loopz00_646;} } } } }  else 
{ /* ./Object/slots.scm 192 */
obj_t BgL_arg2501z00_668;obj_t BgL_arg2502z00_669;
BgL_arg2501z00_668 = 
CDR(BgL_slotsz00_644); 
{ /* ./Object/slots.scm 192 */
obj_t BgL_arg2506z00_670;
BgL_arg2506z00_670 = 
CAR(BgL_slotsz00_644); 
BgL_arg2502z00_669 = 
MAKE_PAIR(BgL_arg2506z00_670, BgL_resz00_645); } 
{ 
obj_t BgL_resz00_2030;obj_t BgL_slotsz00_2029;
BgL_slotsz00_2029 = BgL_arg2501z00_668; 
BgL_resz00_2030 = BgL_arg2502z00_669; 
BgL_resz00_645 = BgL_resz00_2030; 
BgL_slotsz00_644 = BgL_slotsz00_2029; 
goto BgL_loopz00_646;} } } } }  else 
{ /* ./Object/slots.scm 166 */
{ /* ./Object/slots.scm 194 */
obj_t BgL_arg2515z00_672;obj_t BgL_arg2516z00_673;
BgL_arg2515z00_672 = 
CDR(BgL_slotsz00_644); 
{ /* ./Object/slots.scm 194 */
obj_t BgL_arg2520z00_674;
BgL_arg2520z00_674 = 
CAR(BgL_slotsz00_644); 
BgL_arg2516z00_673 = 
MAKE_PAIR(BgL_arg2520z00_674, BgL_resz00_645); } 
{ 
obj_t BgL_resz00_2035;obj_t BgL_slotsz00_2034;
BgL_slotsz00_2034 = BgL_arg2515z00_672; 
BgL_resz00_2035 = BgL_arg2516z00_673; 
BgL_resz00_645 = BgL_resz00_2035; 
BgL_slotsz00_644 = BgL_slotsz00_2034; 
goto BgL_loopz00_646;} } } } } } } }  else 
{ /* ./Object/slots.scm 294 */
obj_t BgL_sz00_422;
BgL_sz00_422 = 
CAR(BgL_slotsz00_413); 
{ 
obj_t BgL_idz00_423;obj_t BgL_attrz00_424;obj_t BgL_idz00_426;obj_t BgL_attrz00_427;obj_t BgL_idz00_429;
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2037z00_433;
BgL_test2037z00_433 = 
PAIRP(BgL_sz00_422); 
if(BgL_test2037z00_433)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2175zd2_434;
BgL_cdrzd2175zd2_434 = 
CDR(BgL_sz00_422); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2038z00_435;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2042;obj_t BgL_auxz00_2040;
BgL_auxz00_2042 = 
CNST_TABLE_REF(((long)5)); 
BgL_auxz00_2040 = 
CAR(BgL_sz00_422); 
BgL_test2038z00_435 = 
(BgL_auxz00_2040==BgL_auxz00_2042); } 
if(BgL_test2038z00_435)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2039z00_436;
BgL_test2039z00_436 = 
PAIRP(BgL_cdrzd2175zd2_434); 
if(BgL_test2039z00_436)
{ /* ./Object/slots.scm 295 */
obj_t BgL_carzd2178zd2_437;
BgL_carzd2178zd2_437 = 
CAR(BgL_cdrzd2175zd2_434); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2040z00_438;
BgL_test2040z00_438 = 
PAIRP(BgL_carzd2178zd2_437); 
if(BgL_test2040z00_438)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2182zd2_439;
BgL_cdrzd2182zd2_439 = 
CDR(BgL_carzd2178zd2_437); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2041z00_440;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2054;obj_t BgL_auxz00_2052;
BgL_auxz00_2054 = 
CNST_TABLE_REF(((long)6)); 
BgL_auxz00_2052 = 
CAR(BgL_carzd2178zd2_437); 
BgL_test2041z00_440 = 
(BgL_auxz00_2052==BgL_auxz00_2054); } 
if(BgL_test2041z00_440)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2042z00_441;
BgL_test2042z00_441 = 
PAIRP(BgL_cdrzd2182zd2_439); 
if(BgL_test2042z00_441)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2043z00_442;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2060;
BgL_auxz00_2060 = 
CDR(BgL_cdrzd2182zd2_439); 
BgL_test2043z00_442 = 
NULLP(BgL_auxz00_2060); } 
if(BgL_test2043z00_442)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2045z00_443;obj_t BgL_arg2046z00_444;
BgL_arg2045z00_443 = 
CAR(BgL_cdrzd2182zd2_439); 
BgL_arg2046z00_444 = 
CDR(BgL_cdrzd2175zd2_434); 
BgL_idz00_423 = BgL_arg2045z00_443; 
BgL_attrz00_424 = BgL_arg2046z00_444; 
{ /* ./Object/slots.scm 297 */
BgL_slotz00_bglt BgL_svalz00_524;
BgL_sz00_591 = BgL_sz00_422; 
BgL_slotzd2idzd2_592 = BgL_idz00_423; 
BgL_attrz00_593 = BgL_attrz00_424; 
{ /* ./Object/slots.scm 197 */
obj_t BgL_vgetz00_595;
BgL_vgetz00_595 = 
BGl_findzd2virtualzd2attrz00zzobject_slotsz00(BgL_attrz00_593); 
{ /* ./Object/slots.scm 199 */
obj_t BgL_vsetz00_596;
{ /* ./Object/slots.scm 199 */
int BgL_nz00_1299;
BgL_nz00_1299 = 
(int)(((long)1)); 
BgL_vsetz00_596 = 
BGL_MVALUES_VAL(BgL_nz00_1299); } 
{ /* ./Object/slots.scm 199 */
bool_t BgL_test2379z00_597;
if(
CBOOL(BgL_vgetz00_595))
{ /* ./Object/slots.scm 199 */
BgL_test2379z00_597 = ((bool_t)1); }  else 
{ /* ./Object/slots.scm 199 */
BgL_test2379z00_597 = 
CBOOL(BgL_vsetz00_596); } 
if(BgL_test2379z00_597)
{ /* ./Object/slots.scm 200 */
obj_t BgL_arg2383z00_600;
BgL_arg2383z00_600 = 
CAR(BgL_slotzd2idzd2_592); 
BGl_userzd2errorzf2locationz20zztools_errorz00(BGl_string3465z00zzobject_slotsz00, BGl_string3466z00zzobject_slotsz00, BgL_arg2383z00_600, BNIL, BNIL); }  else 
{ /* ./Object/slots.scm 199 */BFALSE; } } } } 
{ /* ./Object/slots.scm 204 */
obj_t BgL_ftypez00_603;
BgL_ftypez00_603 = 
BGl_findzd2slotzd2typez00zzobject_slotsz00(BgL_slotzd2idzd2_592, BgL_srcz00_10); 
{ /* ./Object/slots.scm 204 */
obj_t BgL_iidz00_604;
BgL_iidz00_604 = 
PROCEDURE_ENTRY(BGl_gensymz00zz__r4_symbols_6_4z00)(BGl_gensymz00zz__r4_symbols_6_4z00, BEOA); 
{ /* ./Object/slots.scm 205 */
BgL_typez00_bglt BgL_itypez00_605;
{ /* ./Object/slots.scm 207 */
obj_t BgL_arg2447z00_638;obj_t BgL_arg2448z00_639;obj_t BgL_arg2449z00_640;
BgL_arg2447z00_638 = 
SYMBOL_TO_STRING(BgL_iidz00_604); 
{ /* ./Object/slots.scm 208 */
obj_t BgL_list2453z00_641;
{ /* ./Object/slots.scm 208 */
obj_t BgL_auxz00_2079;
BgL_auxz00_2079 = 
CNST_TABLE_REF(((long)1)); 
BgL_list2453z00_641 = 
MAKE_PAIR(BgL_auxz00_2079, BNIL); } 
BgL_arg2448z00_639 = BgL_list2453z00_641; } 
BgL_arg2449z00_640 = 
CNST_TABLE_REF(((long)2)); 
BgL_itypez00_605 = 
BGl_declarezd2subtypez12zc0zztype_envz00(BgL_iidz00_604, BgL_arg2447z00_638, BgL_arg2448z00_639, BgL_arg2449z00_640); } 
{ /* ./Object/slots.scm 206 */
BgL_slotz00_bglt BgL_svalz00_606;
{ /* ./Object/slots.scm 211 */
obj_t BgL_arg2416z00_623;obj_t BgL_arg2417z00_624;obj_t BgL_arg2418z00_625;BgL_tclassz00_bglt BgL_arg2419z00_626;obj_t BgL_arg2420z00_627;obj_t BgL_arg2421z00_628;obj_t BgL_arg2422z00_629;BgL_typez00_bglt BgL_arg2424z00_631;obj_t BgL_arg2425z00_632;
BgL_arg2416z00_623 = 
CAR(BgL_slotzd2idzd2_592); 
{ /* ./Object/slots.scm 212 */
obj_t BgL_arg2429z00_633;
BgL_arg2429z00_633 = 
CAR(BgL_slotzd2idzd2_592); 
BgL_arg2417z00_624 = 
BGl_schemezd2symbolzd2ze3czd2stringz31zzobject_slotsz00(BgL_arg2429z00_633); } 
BgL_arg2418z00_625 = BgL_sz00_591; 
BgL_arg2419z00_626 = BgL_classz00_6; 
BgL_arg2420z00_627 = BgL_ftypez00_603; 
BgL_arg2421z00_628 = 
BGl_memqz00zz__r4_pairs_and_lists_6_3z00(
CNST_TABLE_REF(((long)3)), BgL_attrz00_593); 
BgL_arg2422z00_629 = 
BGl_findzd2defaultzd2attrz00zzobject_slotsz00(BgL_attrz00_593); 
{ /* ./Object/slots.scm 218 */
BgL_typez00_bglt BgL_obj1986z00_634;
BgL_obj1986z00_634 = 
((BgL_typez00_bglt)BgL_itypez00_605); 
{ /* ./Object/slots.scm 219 */
obj_t BgL_arg2435z00_635;
{ /* ./Object/slots.scm 219 */
obj_t BgL_arg2438z00_636;
BgL_arg2438z00_636 = BgL_ftypez00_603; 
BgL_arg2435z00_635 = 
BGl_wideningzd2tveczd2zztvector_tvectorz00(
(BgL_typez00_bglt)(BgL_arg2438z00_636)); } 
{ /* ./Object/slots.scm 218 */
BgL_objectz00_bglt BgL_auxz00_2093;
BgL_auxz00_2093 = 
(BgL_objectz00_bglt)(BgL_obj1986z00_634); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2093, BgL_arg2435z00_635); } } 
{ /* ./Object/slots.scm 218 */
long BgL_arg2441z00_637;
BgL_arg2441z00_637 = 
BGl_classzd2numzd2zz__objectz00(BGl_tvecz00zztvector_tvectorz00); 
{ /* ./Object/slots.scm 218 */
BgL_objectz00_bglt BgL_objz00_1306;
BgL_objz00_1306 = 
(BgL_objectz00_bglt)(BgL_obj1986z00_634); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1306, BgL_arg2441z00_637); } } 
{ /* ./Object/slots.scm 218 */
obj_t BgL_objz00_1308;
BgL_objz00_1308 = 
(obj_t)(BgL_obj1986z00_634); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1308); BUNSPEC; } 
BgL_arg2424z00_631 = BgL_obj1986z00_634; } 
BgL_arg2425z00_632 = 
BGl_findzd2infozd2attrz00zzobject_slotsz00(BgL_attrz00_593); 
{ /* ./Object/slots.scm 210 */
BgL_slotz00_bglt BgL_res3207z00_1354;
{ /* ./Object/slots.scm 210 */
obj_t BgL_classzd2owner1892zd2_1312;bool_t BgL_readzd2onlyzf31894z21_1314;obj_t BgL_virtualzd2num1896zd2_1316;obj_t BgL_indexed1899z00_1319;
BgL_classzd2owner1892zd2_1312 = 
(obj_t)(BgL_arg2419z00_626); 
BgL_readzd2onlyzf31894z21_1314 = 
CBOOL(BgL_arg2421z00_628); 
BgL_virtualzd2num1896zd2_1316 = 
BINT(((long)-1)); 
BgL_indexed1899z00_1319 = 
(obj_t)(BgL_arg2424z00_631); 
{ /* ./Object/slots.scm 210 */
BgL_slotz00_bglt BgL_new1901z00_1321;
{ /* ./Object/slots.scm 210 */
BgL_slotz00_bglt BgL_res3205z00_1327;
{ /* ./Object/slots.scm 210 */
BgL_slotz00_bglt BgL_new1929z00_1322;
BgL_new1929z00_1322 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 210 */
long BgL_arg2887z00_1323;
BgL_arg2887z00_1323 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 210 */
BgL_objectz00_bglt BgL_objz00_1324;
BgL_objz00_1324 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1322); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1324, BgL_arg2887z00_1323); } } 
{ /* ./Object/slots.scm 210 */
BgL_objectz00_bglt BgL_auxz00_2110;
BgL_auxz00_2110 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1322); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2110, BFALSE); } 
{ /* ./Object/slots.scm 210 */
obj_t BgL_objz00_1326;
BgL_objz00_1326 = 
(obj_t)(BgL_new1929z00_1322); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1326); BUNSPEC; } 
BgL_res3205z00_1327 = BgL_new1929z00_1322; } 
BgL_new1901z00_1321 = BgL_res3205z00_1327; } 
{ /* ./Object/slots.scm 210 */
BgL_slotz00_bglt BgL_res3206z00_1353;
{ /* ./Object/slots.scm 210 */
BgL_slotz00_bglt BgL_new1915z00_1328;
BgL_new1915z00_1328 = BgL_new1901z00_1321; 
{ /* ./Object/slots.scm 210 */
obj_t BgL_id1903z00_1341;obj_t BgL_name1904z00_1342;obj_t BgL_src1905z00_1343;obj_t BgL_classzd2owner1906zd2_1344;obj_t BgL_type1907z00_1345;bool_t BgL_readzd2onlyzf31908z21_1346;obj_t BgL_defaultzd2value1909zd2_1347;obj_t BgL_virtualzd2num1910zd2_1348;obj_t BgL_getter1911z00_1349;obj_t BgL_setter1912z00_1350;obj_t BgL_indexed1913z00_1351;obj_t BgL_userzd2info1914zd2_1352;
BgL_id1903z00_1341 = BgL_arg2416z00_623; 
BgL_name1904z00_1342 = BgL_arg2417z00_624; 
BgL_src1905z00_1343 = BgL_arg2418z00_625; 
BgL_classzd2owner1906zd2_1344 = BgL_classzd2owner1892zd2_1312; 
BgL_type1907z00_1345 = BgL_arg2420z00_627; 
BgL_readzd2onlyzf31908z21_1346 = BgL_readzd2onlyzf31894z21_1314; 
BgL_defaultzd2value1909zd2_1347 = BgL_arg2422z00_629; 
BgL_virtualzd2num1910zd2_1348 = BgL_virtualzd2num1896zd2_1316; 
BgL_getter1911z00_1349 = BFALSE; 
BgL_setter1912z00_1350 = BFALSE; 
BgL_indexed1913z00_1351 = BgL_indexed1899z00_1319; 
BgL_userzd2info1914zd2_1352 = BgL_arg2425z00_632; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_idz00) = ((obj_t)BgL_id1903z00_1341), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_namez00) = ((obj_t)BgL_name1904z00_1342), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1343), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1344), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_typez00) = ((obj_t)BgL_type1907z00_1345), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1346), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1347), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1348), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1349), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1350), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1351), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1328))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1352), BUNSPEC); 
BgL_res3206z00_1353 = BgL_new1915z00_1328; } } BgL_res3206z00_1353; } 
BgL_res3207z00_1354 = BgL_new1901z00_1321; } } 
BgL_svalz00_606 = BgL_res3207z00_1354; } } 
{ /* ./Object/slots.scm 210 */
BgL_slotz00_bglt BgL_slenz00_607;
{ /* ./Object/slots.scm 221 */
obj_t BgL_lenzd2idzd2_610;
{ /* ./Object/slots.scm 221 */
obj_t BgL_arg2406z00_619;obj_t BgL_arg2407z00_620;
BgL_arg2406z00_619 = 
CAR(BgL_slotzd2idzd2_592); 
BgL_arg2407z00_620 = 
CNST_TABLE_REF(((long)4)); 
{ /* ./Object/slots.scm 221 */
obj_t BgL_list2409z00_621;
{ /* ./Object/slots.scm 221 */
obj_t BgL_arg2411z00_622;
BgL_arg2411z00_622 = 
MAKE_PAIR(BgL_arg2407z00_620, BNIL); 
BgL_list2409z00_621 = 
MAKE_PAIR(BgL_arg2406z00_619, BgL_arg2411z00_622); } 
BgL_lenzd2idzd2_610 = 
BGl_symbolzd2appendzd2zz__r4_symbols_6_4z00(BgL_list2409z00_621); } } 
{ /* ./Object/slots.scm 223 */
obj_t BgL_arg2394z00_611;obj_t BgL_arg2395z00_612;obj_t BgL_arg2396z00_613;BgL_tclassz00_bglt BgL_arg2397z00_614;obj_t BgL_arg2398z00_615;bool_t BgL_arg2399z00_616;obj_t BgL_arg2400z00_617;
BgL_arg2394z00_611 = BgL_lenzd2idzd2_610; 
BgL_arg2395z00_612 = 
BGl_schemezd2symbolzd2ze3czd2stringz31zzobject_slotsz00(BgL_lenzd2idzd2_610); 
BgL_arg2396z00_613 = BgL_sz00_591; 
BgL_arg2397z00_614 = BgL_classz00_6; 
BgL_arg2398z00_615 = BGl_za2longza2z00zztype_cachez00; 
BgL_arg2399z00_616 = ((bool_t)1); 
BgL_arg2400z00_617 = BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00; 
{ /* ./Object/slots.scm 222 */
BgL_slotz00_bglt BgL_res3210z00_1401;
{ /* ./Object/slots.scm 222 */
obj_t BgL_classzd2owner1892zd2_1359;obj_t BgL_virtualzd2num1896zd2_1363;
BgL_classzd2owner1892zd2_1359 = 
(obj_t)(BgL_arg2397z00_614); 
BgL_virtualzd2num1896zd2_1363 = 
BINT(((long)-1)); 
{ /* ./Object/slots.scm 222 */
BgL_slotz00_bglt BgL_new1901z00_1368;
{ /* ./Object/slots.scm 222 */
BgL_slotz00_bglt BgL_res3208z00_1374;
{ /* ./Object/slots.scm 222 */
BgL_slotz00_bglt BgL_new1929z00_1369;
BgL_new1929z00_1369 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 222 */
long BgL_arg2887z00_1370;
BgL_arg2887z00_1370 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 222 */
BgL_objectz00_bglt BgL_objz00_1371;
BgL_objz00_1371 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1369); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1371, BgL_arg2887z00_1370); } } 
{ /* ./Object/slots.scm 222 */
BgL_objectz00_bglt BgL_auxz00_2139;
BgL_auxz00_2139 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1369); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2139, BFALSE); } 
{ /* ./Object/slots.scm 222 */
obj_t BgL_objz00_1373;
BgL_objz00_1373 = 
(obj_t)(BgL_new1929z00_1369); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1373); BUNSPEC; } 
BgL_res3208z00_1374 = BgL_new1929z00_1369; } 
BgL_new1901z00_1368 = BgL_res3208z00_1374; } 
{ /* ./Object/slots.scm 222 */
BgL_slotz00_bglt BgL_res3209z00_1400;
{ /* ./Object/slots.scm 222 */
BgL_slotz00_bglt BgL_new1915z00_1375;
BgL_new1915z00_1375 = BgL_new1901z00_1368; 
{ /* ./Object/slots.scm 222 */
obj_t BgL_id1903z00_1388;obj_t BgL_name1904z00_1389;obj_t BgL_src1905z00_1390;obj_t BgL_classzd2owner1906zd2_1391;obj_t BgL_type1907z00_1392;bool_t BgL_readzd2onlyzf31908z21_1393;obj_t BgL_defaultzd2value1909zd2_1394;obj_t BgL_virtualzd2num1910zd2_1395;obj_t BgL_getter1911z00_1396;obj_t BgL_setter1912z00_1397;obj_t BgL_indexed1913z00_1398;obj_t BgL_userzd2info1914zd2_1399;
BgL_id1903z00_1388 = BgL_arg2394z00_611; 
BgL_name1904z00_1389 = BgL_arg2395z00_612; 
BgL_src1905z00_1390 = BgL_arg2396z00_613; 
BgL_classzd2owner1906zd2_1391 = BgL_classzd2owner1892zd2_1359; 
BgL_type1907z00_1392 = BgL_arg2398z00_615; 
BgL_readzd2onlyzf31908z21_1393 = BgL_arg2399z00_616; 
BgL_defaultzd2value1909zd2_1394 = BgL_arg2400z00_617; 
BgL_virtualzd2num1910zd2_1395 = BgL_virtualzd2num1896zd2_1363; 
BgL_getter1911z00_1396 = BFALSE; 
BgL_setter1912z00_1397 = BFALSE; 
BgL_indexed1913z00_1398 = BFALSE; 
BgL_userzd2info1914zd2_1399 = BUNSPEC; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_idz00) = ((obj_t)BgL_id1903z00_1388), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_namez00) = ((obj_t)BgL_name1904z00_1389), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1390), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1391), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_typez00) = ((obj_t)BgL_type1907z00_1392), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1393), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1394), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1395), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1396), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1397), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1398), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1375))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1399), BUNSPEC); 
BgL_res3209z00_1400 = BgL_new1915z00_1375; } } BgL_res3209z00_1400; } 
BgL_res3210z00_1401 = BgL_new1901z00_1368; } } 
BgL_slenz00_607 = BgL_res3210z00_1401; } } } 
{ /* ./Object/slots.scm 221 */

{ /* ./Object/slots.scm 229 */
BgL_typez00_bglt BgL_obj1021z00_1402;bool_t BgL_val1020z00_1403;
BgL_obj1021z00_1402 = BgL_itypez00_605; 
BgL_val1020z00_1403 = ((bool_t)1); 
((((BgL_typez00_bglt)CREF(BgL_obj1021z00_1402))->BgL_initzf3zf3) = ((bool_t)BgL_val1020z00_1403), BUNSPEC); } 
{ /* ./Object/slots.scm 230 */
int BgL_nz00_1404;
BgL_nz00_1404 = 
(int)(((long)2)); 
BGL_MVALUES_NUMBER_SET(BgL_nz00_1404); } 
{ /* ./Object/slots.scm 230 */
int BgL_nz00_1405;obj_t BgL_oz00_1406;
BgL_nz00_1405 = 
(int)(((long)1)); 
BgL_oz00_1406 = 
(obj_t)(BgL_slenz00_607); 
BGL_MVALUES_VAL_SET(BgL_nz00_1405, BgL_oz00_1406); } 
BgL_svalz00_524 = BgL_svalz00_606; } } } } } } 
{ /* ./Object/slots.scm 299 */
obj_t BgL_slenz00_525;
{ /* ./Object/slots.scm 299 */
int BgL_nz00_1195;
BgL_nz00_1195 = 
(int)(((long)1)); 
BgL_slenz00_525 = 
BGL_MVALUES_VAL(BgL_nz00_1195); } 
{ /* ./Object/slots.scm 299 */
obj_t BgL_arg2260z00_526;obj_t BgL_arg2261z00_527;
BgL_arg2260z00_526 = 
CDR(BgL_slotsz00_413); 
{ /* ./Object/slots.scm 300 */
obj_t BgL_arg2265z00_528;
BgL_arg2265z00_528 = 
MAKE_PAIR(BgL_slenz00_525, BgL_resz00_414); 
{ /* ./Object/slots.scm 300 */
obj_t BgL_auxz00_2166;
BgL_auxz00_2166 = 
(obj_t)(BgL_svalz00_524); 
BgL_arg2261z00_527 = 
MAKE_PAIR(BgL_auxz00_2166, BgL_arg2265z00_528); } } 
{ 
obj_t BgL_resz00_2170;obj_t BgL_slotsz00_2169;
BgL_slotsz00_2169 = BgL_arg2260z00_526; 
BgL_resz00_2170 = BgL_arg2261z00_527; 
BgL_resz00_414 = BgL_resz00_2170; 
BgL_slotsz00_413 = BgL_slotsz00_2169; 
goto BgL_loopz00_416;} } } } }  else 
{ /* ./Object/slots.scm 295 */
obj_t BgL_carzd2192zd2_445;
BgL_carzd2192zd2_445 = 
CAR(BgL_sz00_422); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2050z00_446;
BgL_test2050z00_446 = 
PAIRP(BgL_carzd2192zd2_445); 
if(BgL_test2050z00_446)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2196zd2_447;
BgL_cdrzd2196zd2_447 = 
CDR(BgL_carzd2192zd2_445); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2051z00_448;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2177;obj_t BgL_auxz00_2175;
BgL_auxz00_2177 = 
CNST_TABLE_REF(((long)6)); 
BgL_auxz00_2175 = 
CAR(BgL_carzd2192zd2_445); 
BgL_test2051z00_448 = 
(BgL_auxz00_2175==BgL_auxz00_2177); } 
if(BgL_test2051z00_448)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2053z00_449;
BgL_test2053z00_449 = 
PAIRP(BgL_cdrzd2196zd2_447); 
if(BgL_test2053z00_449)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2054z00_450;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2183;
BgL_auxz00_2183 = 
CDR(BgL_cdrzd2196zd2_447); 
BgL_test2054z00_450 = 
NULLP(BgL_auxz00_2183); } 
if(BgL_test2054z00_450)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2056z00_451;
BgL_arg2056z00_451 = 
CAR(BgL_cdrzd2196zd2_447); 
BgL_idz00_426 = BgL_arg2056z00_451; 
BgL_attrz00_427 = BgL_cdrzd2175zd2_434; 
BgL_tagzd2166zd2_428:
{ /* ./Object/slots.scm 303 */
obj_t BgL_vgetz00_529;
BgL_vgetz00_529 = 
BGl_findzd2virtualzd2attrz00zzobject_slotsz00(BgL_attrz00_427); 
{ /* ./Object/slots.scm 305 */
obj_t BgL_vsetz00_530;
{ /* ./Object/slots.scm 305 */
int BgL_nz00_1197;
BgL_nz00_1197 = 
(int)(((long)1)); 
BgL_vsetz00_530 = 
BGL_MVALUES_VAL(BgL_nz00_1197); } 
{ /* ./Object/slots.scm 305 */
obj_t BgL_arg2271z00_531;obj_t BgL_arg2272z00_532;obj_t BgL_arg2273z00_533;
BgL_arg2271z00_531 = 
CDR(BgL_slotsz00_413); 
{ /* ./Object/slots.scm 306 */
obj_t BgL_arg2277z00_534;
BgL_sz00_550 = BgL_sz00_422; 
BgL_slotzd2idzd2_551 = BgL_idz00_426; 
BgL_attrz00_552 = BgL_attrz00_427; 
BgL_vgetz00_553 = BgL_vgetz00_529; 
BgL_vsetz00_554 = BgL_vsetz00_530; 
BgL_vnumz00_555 = BgL_vnumz00_415; 
{ /* ./Object/slots.scm 234 */
obj_t BgL_readozf3zf3_557;
BgL_readozf3zf3_557 = 
BGl_memqz00zz__r4_pairs_and_lists_6_3z00(
CNST_TABLE_REF(((long)3)), BgL_attrz00_552); 
{ /* ./Object/slots.scm 236 */
bool_t BgL_test2317z00_558;
if(
CBOOL(BgL_vsetz00_554))
{ /* ./Object/slots.scm 236 */
if(
CBOOL(BgL_vgetz00_553))
{ /* ./Object/slots.scm 236 */
BgL_test2317z00_558 = ((bool_t)0); }  else 
{ /* ./Object/slots.scm 236 */
BgL_test2317z00_558 = ((bool_t)1); } }  else 
{ /* ./Object/slots.scm 236 */
BgL_test2317z00_558 = ((bool_t)0); } 
if(BgL_test2317z00_558)
{ /* ./Object/slots.scm 236 */
{ /* ./Object/slots.scm 237 */
obj_t BgL_arg2319z00_559;obj_t BgL_arg2322z00_562;
BgL_arg2319z00_559 = 
BGl_findzd2locationzd2zztools_locationz00(BgL_sz00_550); 
BgL_arg2322z00_562 = 
CAR(BgL_slotzd2idzd2_551); 
{ /* ./Object/slots.scm 237 */
obj_t BgL_list2325z00_564;
BgL_list2325z00_564 = 
MAKE_PAIR(BNIL, BNIL); 
BgL_arg2277z00_534 = 
BGl_userzd2errorzf2locationz20zztools_errorz00(BgL_arg2319z00_559, BGl_string3465z00zzobject_slotsz00, BGl_string3467z00zzobject_slotsz00, BgL_arg2322z00_562, BgL_list2325z00_564); } } }  else 
{ /* ./Object/slots.scm 242 */
bool_t BgL_test2329z00_565;
if(
CBOOL(BgL_vsetz00_554))
{ /* ./Object/slots.scm 242 */
BgL_test2329z00_565 = 
CBOOL(BgL_readozf3zf3_557); }  else 
{ /* ./Object/slots.scm 242 */
BgL_test2329z00_565 = ((bool_t)0); } 
if(BgL_test2329z00_565)
{ /* ./Object/slots.scm 242 */
{ /* ./Object/slots.scm 243 */
obj_t BgL_arg2331z00_566;obj_t BgL_arg2334z00_569;
BgL_arg2331z00_566 = 
BGl_findzd2locationzd2zztools_locationz00(BgL_sz00_550); 
BgL_arg2334z00_569 = 
CAR(BgL_slotzd2idzd2_551); 
{ /* ./Object/slots.scm 243 */
obj_t BgL_list2337z00_571;
BgL_list2337z00_571 = 
MAKE_PAIR(BNIL, BNIL); 
BgL_arg2277z00_534 = 
BGl_userzd2errorzf2locationz20zztools_errorz00(BgL_arg2331z00_566, BGl_string3465z00zzobject_slotsz00, BGl_string3468z00zzobject_slotsz00, BgL_arg2334z00_569, BgL_list2337z00_571); } } }  else 
{ /* ./Object/slots.scm 248 */
bool_t BgL_test2341z00_572;
if(
CBOOL(BgL_vgetz00_553))
{ /* ./Object/slots.scm 248 */
if(
CBOOL(BgL_vsetz00_554))
{ /* ./Object/slots.scm 248 */
BgL_test2341z00_572 = ((bool_t)0); }  else 
{ /* ./Object/slots.scm 248 */
if(
CBOOL(BgL_readozf3zf3_557))
{ /* ./Object/slots.scm 248 */
BgL_test2341z00_572 = ((bool_t)0); }  else 
{ /* ./Object/slots.scm 248 */
BgL_test2341z00_572 = ((bool_t)1); } } }  else 
{ /* ./Object/slots.scm 248 */
BgL_test2341z00_572 = ((bool_t)0); } 
if(BgL_test2341z00_572)
{ /* ./Object/slots.scm 248 */
{ /* ./Object/slots.scm 249 */
obj_t BgL_arg2343z00_573;obj_t BgL_arg2346z00_576;
BgL_arg2343z00_573 = 
BGl_findzd2locationzd2zztools_locationz00(BgL_sz00_550); 
BgL_arg2346z00_576 = 
CAR(BgL_slotzd2idzd2_551); 
{ /* ./Object/slots.scm 249 */
obj_t BgL_list2350z00_578;
BgL_list2350z00_578 = 
MAKE_PAIR(BNIL, BNIL); 
BgL_arg2277z00_534 = 
BGl_userzd2errorzf2locationz20zztools_errorz00(BgL_arg2343z00_573, BGl_string3465z00zzobject_slotsz00, BGl_string3469z00zzobject_slotsz00, BgL_arg2346z00_576, BgL_list2350z00_578); } } }  else 
{ /* ./Object/slots.scm 248 */
{ /* ./Object/slots.scm 256 */
obj_t BgL_arg2355z00_579;obj_t BgL_arg2356z00_580;obj_t BgL_arg2357z00_581;BgL_tclassz00_bglt BgL_arg2358z00_582;obj_t BgL_arg2360z00_583;obj_t BgL_arg2361z00_584;obj_t BgL_arg2362z00_585;obj_t BgL_arg2363z00_586;obj_t BgL_arg2364z00_587;obj_t BgL_arg2365z00_588;obj_t BgL_arg2366z00_589;
BgL_arg2355z00_579 = 
CAR(BgL_slotzd2idzd2_551); 
{ /* ./Object/slots.scm 257 */
obj_t BgL_arg2371z00_590;
BgL_arg2371z00_590 = 
CAR(BgL_slotzd2idzd2_551); 
BgL_arg2356z00_580 = 
BGl_schemezd2symbolzd2ze3czd2stringz31zzobject_slotsz00(BgL_arg2371z00_590); } 
BgL_arg2357z00_581 = BgL_sz00_550; 
BgL_arg2358z00_582 = BgL_classz00_6; 
BgL_arg2360z00_583 = 
BGl_findzd2slotzd2typez00zzobject_slotsz00(BgL_slotzd2idzd2_551, BgL_sz00_550); 
BgL_arg2361z00_584 = BgL_readozf3zf3_557; 
BgL_arg2362z00_585 = 
BGl_findzd2defaultzd2attrz00zzobject_slotsz00(BgL_attrz00_552); 
if(
CBOOL(BgL_vgetz00_553))
{ /* ./Object/slots.scm 263 */
BgL_arg2363z00_586 = BgL_vnumz00_555; }  else 
{ /* ./Object/slots.scm 263 */
BgL_arg2363z00_586 = 
BINT(((long)-1)); } 
BgL_arg2364z00_587 = BgL_vgetz00_553; 
BgL_arg2365z00_588 = BgL_vsetz00_554; 
BgL_arg2366z00_589 = 
BGl_findzd2infozd2attrz00zzobject_slotsz00(BgL_attrz00_552); 
{ /* ./Object/slots.scm 255 */
BgL_slotz00_bglt BgL_res3203z00_1298;
{ /* ./Object/slots.scm 255 */
obj_t BgL_classzd2owner1892zd2_1256;bool_t BgL_readzd2onlyzf31894z21_1258;
BgL_classzd2owner1892zd2_1256 = 
(obj_t)(BgL_arg2358z00_582); 
BgL_readzd2onlyzf31894z21_1258 = 
CBOOL(BgL_arg2361z00_584); 
{ /* ./Object/slots.scm 255 */
BgL_slotz00_bglt BgL_new1901z00_1265;
{ /* ./Object/slots.scm 255 */
BgL_slotz00_bglt BgL_res3201z00_1271;
{ /* ./Object/slots.scm 255 */
BgL_slotz00_bglt BgL_new1929z00_1266;
BgL_new1929z00_1266 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 255 */
long BgL_arg2887z00_1267;
BgL_arg2887z00_1267 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 255 */
BgL_objectz00_bglt BgL_objz00_1268;
BgL_objz00_1268 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1266); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1268, BgL_arg2887z00_1267); } } 
{ /* ./Object/slots.scm 255 */
BgL_objectz00_bglt BgL_auxz00_2237;
BgL_auxz00_2237 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1266); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2237, BFALSE); } 
{ /* ./Object/slots.scm 255 */
obj_t BgL_objz00_1270;
BgL_objz00_1270 = 
(obj_t)(BgL_new1929z00_1266); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1270); BUNSPEC; } 
BgL_res3201z00_1271 = BgL_new1929z00_1266; } 
BgL_new1901z00_1265 = BgL_res3201z00_1271; } 
{ /* ./Object/slots.scm 255 */
BgL_slotz00_bglt BgL_res3202z00_1297;
{ /* ./Object/slots.scm 255 */
BgL_slotz00_bglt BgL_new1915z00_1272;
BgL_new1915z00_1272 = BgL_new1901z00_1265; 
{ /* ./Object/slots.scm 255 */
obj_t BgL_id1903z00_1285;obj_t BgL_name1904z00_1286;obj_t BgL_src1905z00_1287;obj_t BgL_classzd2owner1906zd2_1288;obj_t BgL_type1907z00_1289;bool_t BgL_readzd2onlyzf31908z21_1290;obj_t BgL_defaultzd2value1909zd2_1291;obj_t BgL_virtualzd2num1910zd2_1292;obj_t BgL_getter1911z00_1293;obj_t BgL_setter1912z00_1294;obj_t BgL_indexed1913z00_1295;obj_t BgL_userzd2info1914zd2_1296;
BgL_id1903z00_1285 = BgL_arg2355z00_579; 
BgL_name1904z00_1286 = BgL_arg2356z00_580; 
BgL_src1905z00_1287 = BgL_arg2357z00_581; 
BgL_classzd2owner1906zd2_1288 = BgL_classzd2owner1892zd2_1256; 
BgL_type1907z00_1289 = BgL_arg2360z00_583; 
BgL_readzd2onlyzf31908z21_1290 = BgL_readzd2onlyzf31894z21_1258; 
BgL_defaultzd2value1909zd2_1291 = BgL_arg2362z00_585; 
BgL_virtualzd2num1910zd2_1292 = BgL_arg2363z00_586; 
BgL_getter1911z00_1293 = BgL_arg2364z00_587; 
BgL_setter1912z00_1294 = BgL_arg2365z00_588; 
BgL_indexed1913z00_1295 = BFALSE; 
BgL_userzd2info1914zd2_1296 = BgL_arg2366z00_589; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_idz00) = ((obj_t)BgL_id1903z00_1285), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_namez00) = ((obj_t)BgL_name1904z00_1286), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1287), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1288), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_typez00) = ((obj_t)BgL_type1907z00_1289), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1290), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1291), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1292), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1293), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1294), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1295), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1272))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1296), BUNSPEC); 
BgL_res3202z00_1297 = BgL_new1915z00_1272; } } BgL_res3202z00_1297; } 
BgL_res3203z00_1298 = BgL_new1901z00_1265; } } 
BgL_arg2277z00_534 = 
(obj_t)(BgL_res3203z00_1298); } } } } } } } 
BgL_arg2272z00_532 = 
MAKE_PAIR(BgL_arg2277z00_534, BgL_resz00_414); } 
{ /* ./Object/slots.scm 308 */
bool_t BgL_testz00_2256;
if(
CBOOL(BgL_vgetz00_529))
{ /* ./Object/slots.scm 308 */
BgL_testz00_2256 = ((bool_t)1)
; }  else 
{ /* ./Object/slots.scm 308 */
BgL_testz00_2256 = 
CBOOL(BgL_vsetz00_530)
; } 
if(BgL_testz00_2256)
{ /* ./Object/slots.scm 308 */
BgL_arg2273z00_533 = 
BGl_2zb2zb2zz__r4_numbers_6_5z00(BgL_vnumz00_415, 
BINT(((long)1))); }  else 
{ /* ./Object/slots.scm 308 */
BgL_arg2273z00_533 = BgL_vnumz00_415; } } 
{ 
obj_t BgL_vnumz00_2264;obj_t BgL_resz00_2263;obj_t BgL_slotsz00_2262;
BgL_slotsz00_2262 = BgL_arg2271z00_531; 
BgL_resz00_2263 = BgL_arg2272z00_532; 
BgL_vnumz00_2264 = BgL_arg2273z00_533; 
BgL_vnumz00_415 = BgL_vnumz00_2264; 
BgL_resz00_414 = BgL_resz00_2263; 
BgL_slotsz00_413 = BgL_slotsz00_2262; 
goto BgL_loopz00_416;} } } } }  else 
{ /* ./Object/slots.scm 295 */
BgL_tagzd2168zd2_431:
{ /* ./Object/slots.scm 314 */
obj_t BgL_list2294z00_539;
BgL_list2294z00_539 = 
MAKE_PAIR(BNIL, BNIL); 
return 
BGl_userzd2errorzd2zztools_errorz00(BGl_string3465z00zzobject_slotsz00, BGl_string3470z00zzobject_slotsz00, BgL_sz00_422, BgL_list2294z00_539);} } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } } }  else 
{ /* ./Object/slots.scm 295 */
obj_t BgL_carzd2214zd2_457;
BgL_carzd2214zd2_457 = 
CAR(BgL_sz00_422); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2083z00_458;
BgL_test2083z00_458 = 
PAIRP(BgL_carzd2214zd2_457); 
if(BgL_test2083z00_458)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2218zd2_459;
BgL_cdrzd2218zd2_459 = 
CDR(BgL_carzd2214zd2_457); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2084z00_460;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2273;obj_t BgL_auxz00_2271;
BgL_auxz00_2273 = 
CNST_TABLE_REF(((long)6)); 
BgL_auxz00_2271 = 
CAR(BgL_carzd2214zd2_457); 
BgL_test2084z00_460 = 
(BgL_auxz00_2271==BgL_auxz00_2273); } 
if(BgL_test2084z00_460)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2085z00_461;
BgL_test2085z00_461 = 
PAIRP(BgL_cdrzd2218zd2_459); 
if(BgL_test2085z00_461)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2086z00_462;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2279;
BgL_auxz00_2279 = 
CDR(BgL_cdrzd2218zd2_459); 
BgL_test2086z00_462 = 
NULLP(BgL_auxz00_2279); } 
if(BgL_test2086z00_462)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2088z00_463;
BgL_arg2088z00_463 = 
CAR(BgL_cdrzd2218zd2_459); 
{ 
obj_t BgL_attrz00_2285;obj_t BgL_idz00_2284;
BgL_idz00_2284 = BgL_arg2088z00_463; 
BgL_attrz00_2285 = BgL_cdrzd2175zd2_434; 
BgL_attrz00_427 = BgL_attrz00_2285; 
BgL_idz00_426 = BgL_idz00_2284; 
goto BgL_tagzd2166zd2_428;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } } }  else 
{ /* ./Object/slots.scm 295 */
obj_t BgL_carzd2236zd2_468;
BgL_carzd2236zd2_468 = 
CAR(BgL_sz00_422); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2111z00_469;
BgL_test2111z00_469 = 
PAIRP(BgL_carzd2236zd2_468); 
if(BgL_test2111z00_469)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2240zd2_470;
BgL_cdrzd2240zd2_470 = 
CDR(BgL_carzd2236zd2_468); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2112z00_471;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2292;obj_t BgL_auxz00_2290;
BgL_auxz00_2292 = 
CNST_TABLE_REF(((long)6)); 
BgL_auxz00_2290 = 
CAR(BgL_carzd2236zd2_468); 
BgL_test2112z00_471 = 
(BgL_auxz00_2290==BgL_auxz00_2292); } 
if(BgL_test2112z00_471)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2113z00_472;
BgL_test2113z00_472 = 
PAIRP(BgL_cdrzd2240zd2_470); 
if(BgL_test2113z00_472)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2114z00_473;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2298;
BgL_auxz00_2298 = 
CDR(BgL_cdrzd2240zd2_470); 
BgL_test2114z00_473 = 
NULLP(BgL_auxz00_2298); } 
if(BgL_test2114z00_473)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2116z00_474;
BgL_arg2116z00_474 = 
CAR(BgL_cdrzd2240zd2_470); 
{ 
obj_t BgL_attrz00_2304;obj_t BgL_idz00_2303;
BgL_idz00_2303 = BgL_arg2116z00_474; 
BgL_attrz00_2304 = BgL_cdrzd2175zd2_434; 
BgL_attrz00_427 = BgL_attrz00_2304; 
BgL_idz00_426 = BgL_idz00_2303; 
goto BgL_tagzd2166zd2_428;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } } } }  else 
{ /* ./Object/slots.scm 295 */
obj_t BgL_carzd2258zd2_481;
BgL_carzd2258zd2_481 = 
CAR(BgL_sz00_422); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2146z00_482;
BgL_test2146z00_482 = 
PAIRP(BgL_carzd2258zd2_481); 
if(BgL_test2146z00_482)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2262zd2_483;
BgL_cdrzd2262zd2_483 = 
CDR(BgL_carzd2258zd2_481); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2147z00_484;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2311;obj_t BgL_auxz00_2309;
BgL_auxz00_2311 = 
CNST_TABLE_REF(((long)6)); 
BgL_auxz00_2309 = 
CAR(BgL_carzd2258zd2_481); 
BgL_test2147z00_484 = 
(BgL_auxz00_2309==BgL_auxz00_2311); } 
if(BgL_test2147z00_484)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2148z00_485;
BgL_test2148z00_485 = 
PAIRP(BgL_cdrzd2262zd2_483); 
if(BgL_test2148z00_485)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2149z00_486;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2317;
BgL_auxz00_2317 = 
CDR(BgL_cdrzd2262zd2_483); 
BgL_test2149z00_486 = 
NULLP(BgL_auxz00_2317); } 
if(BgL_test2149z00_486)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2151z00_487;
BgL_arg2151z00_487 = 
CAR(BgL_cdrzd2262zd2_483); 
{ 
obj_t BgL_attrz00_2323;obj_t BgL_idz00_2322;
BgL_idz00_2322 = BgL_arg2151z00_487; 
BgL_attrz00_2323 = BgL_cdrzd2175zd2_434; 
BgL_attrz00_427 = BgL_attrz00_2323; 
BgL_idz00_426 = BgL_idz00_2322; 
goto BgL_tagzd2166zd2_428;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } } } }  else 
{ /* ./Object/slots.scm 295 */
obj_t BgL_carzd2280zd2_492;
BgL_carzd2280zd2_492 = 
CAR(BgL_sz00_422); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2175z00_493;
BgL_test2175z00_493 = 
PAIRP(BgL_carzd2280zd2_492); 
if(BgL_test2175z00_493)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2284zd2_494;
BgL_cdrzd2284zd2_494 = 
CDR(BgL_carzd2280zd2_492); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2176z00_495;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2330;obj_t BgL_auxz00_2328;
BgL_auxz00_2330 = 
CNST_TABLE_REF(((long)6)); 
BgL_auxz00_2328 = 
CAR(BgL_carzd2280zd2_492); 
BgL_test2176z00_495 = 
(BgL_auxz00_2328==BgL_auxz00_2330); } 
if(BgL_test2176z00_495)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2177z00_496;
BgL_test2177z00_496 = 
PAIRP(BgL_cdrzd2284zd2_494); 
if(BgL_test2177z00_496)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2178z00_497;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2336;
BgL_auxz00_2336 = 
CDR(BgL_cdrzd2284zd2_494); 
BgL_test2178z00_497 = 
NULLP(BgL_auxz00_2336); } 
if(BgL_test2178z00_497)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2180z00_498;
BgL_arg2180z00_498 = 
CAR(BgL_cdrzd2284zd2_494); 
{ 
obj_t BgL_attrz00_2342;obj_t BgL_idz00_2341;
BgL_idz00_2341 = BgL_arg2180z00_498; 
BgL_attrz00_2342 = BgL_cdrzd2175zd2_434; 
BgL_attrz00_427 = BgL_attrz00_2342; 
BgL_idz00_426 = BgL_idz00_2341; 
goto BgL_tagzd2166zd2_428;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } } }  else 
{ /* ./Object/slots.scm 295 */
obj_t BgL_carzd2302zd2_503;
BgL_carzd2302zd2_503 = 
CAR(BgL_sz00_422); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2203z00_504;
BgL_test2203z00_504 = 
PAIRP(BgL_carzd2302zd2_503); 
if(BgL_test2203z00_504)
{ /* ./Object/slots.scm 295 */
obj_t BgL_cdrzd2306zd2_505;
BgL_cdrzd2306zd2_505 = 
CDR(BgL_carzd2302zd2_503); 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2204z00_506;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2349;obj_t BgL_auxz00_2347;
BgL_auxz00_2349 = 
CNST_TABLE_REF(((long)6)); 
BgL_auxz00_2347 = 
CAR(BgL_carzd2302zd2_503); 
BgL_test2204z00_506 = 
(BgL_auxz00_2347==BgL_auxz00_2349); } 
if(BgL_test2204z00_506)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2205z00_507;
BgL_test2205z00_507 = 
PAIRP(BgL_cdrzd2306zd2_505); 
if(BgL_test2205z00_507)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2206z00_508;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2355;
BgL_auxz00_2355 = 
CDR(BgL_cdrzd2306zd2_505); 
BgL_test2206z00_508 = 
NULLP(BgL_auxz00_2355); } 
if(BgL_test2206z00_508)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2209z00_509;
BgL_arg2209z00_509 = 
CAR(BgL_cdrzd2306zd2_505); 
{ 
obj_t BgL_attrz00_2361;obj_t BgL_idz00_2360;
BgL_idz00_2360 = BgL_arg2209z00_509; 
BgL_attrz00_2361 = BgL_cdrzd2175zd2_434; 
BgL_attrz00_427 = BgL_attrz00_2361; 
BgL_idz00_426 = BgL_idz00_2360; 
goto BgL_tagzd2166zd2_428;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } }  else 
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2228z00_515;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2362;
BgL_auxz00_2362 = 
CNST_TABLE_REF(((long)6)); 
BgL_test2228z00_515 = 
(BgL_carzd2302zd2_503==BgL_auxz00_2362); } 
if(BgL_test2228z00_515)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2229z00_516;
BgL_test2229z00_516 = 
PAIRP(BgL_cdrzd2175zd2_434); 
if(BgL_test2229z00_516)
{ /* ./Object/slots.scm 295 */
bool_t BgL_test2230z00_517;
{ /* ./Object/slots.scm 295 */
obj_t BgL_auxz00_2368;
BgL_auxz00_2368 = 
CDR(BgL_cdrzd2175zd2_434); 
BgL_test2230z00_517 = 
NULLP(BgL_auxz00_2368); } 
if(BgL_test2230z00_517)
{ /* ./Object/slots.scm 295 */
obj_t BgL_arg2232z00_518;
BgL_arg2232z00_518 = 
CAR(BgL_cdrzd2175zd2_434); 
BgL_idz00_429 = BgL_arg2232z00_518; 
{ /* ./Object/slots.scm 310 */
obj_t BgL_arg2285z00_536;obj_t BgL_arg2286z00_537;
BgL_arg2285z00_536 = 
CDR(BgL_slotsz00_413); 
{ /* ./Object/slots.scm 311 */
BgL_slotz00_bglt BgL_arg2290z00_538;
BgL_slotzd2idzd2_540 = BgL_idz00_429; 
{ /* ./Object/slots.scm 270 */
obj_t BgL_arg2300z00_542;obj_t BgL_arg2301z00_543;obj_t BgL_arg2303z00_544;BgL_tclassz00_bglt BgL_arg2304z00_545;obj_t BgL_arg2305z00_546;obj_t BgL_arg2306z00_547;
BgL_arg2300z00_542 = 
CAR(BgL_slotzd2idzd2_540); 
{ /* ./Object/slots.scm 271 */
obj_t BgL_arg2311z00_549;
BgL_arg2311z00_549 = 
CAR(BgL_slotzd2idzd2_540); 
BgL_arg2301z00_543 = 
BGl_schemezd2symbolzd2ze3czd2stringz31zzobject_slotsz00(BgL_arg2311z00_549); } 
BgL_arg2303z00_544 = BgL_slotzd2idzd2_540; 
BgL_arg2304z00_545 = BgL_classz00_6; 
BgL_arg2305z00_546 = 
BGl_findzd2slotzd2typez00zzobject_slotsz00(BgL_slotzd2idzd2_540, BgL_srcz00_10); 
BgL_arg2306z00_547 = BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00; 
{ /* ./Object/slots.scm 269 */
BgL_slotz00_bglt BgL_res3200z00_1247;
{ /* ./Object/slots.scm 269 */
obj_t BgL_classzd2owner1892zd2_1205;obj_t BgL_virtualzd2num1896zd2_1209;
BgL_classzd2owner1892zd2_1205 = 
(obj_t)(BgL_arg2304z00_545); 
BgL_virtualzd2num1896zd2_1209 = 
BINT(((long)-1)); 
{ /* ./Object/slots.scm 269 */
BgL_slotz00_bglt BgL_new1901z00_1214;
{ /* ./Object/slots.scm 269 */
BgL_slotz00_bglt BgL_res3198z00_1220;
{ /* ./Object/slots.scm 269 */
BgL_slotz00_bglt BgL_new1929z00_1215;
BgL_new1929z00_1215 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 269 */
long BgL_arg2887z00_1216;
BgL_arg2887z00_1216 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 269 */
BgL_objectz00_bglt BgL_objz00_1217;
BgL_objz00_1217 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1215); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1217, BgL_arg2887z00_1216); } } 
{ /* ./Object/slots.scm 269 */
BgL_objectz00_bglt BgL_auxz00_2384;
BgL_auxz00_2384 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1215); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2384, BFALSE); } 
{ /* ./Object/slots.scm 269 */
obj_t BgL_objz00_1219;
BgL_objz00_1219 = 
(obj_t)(BgL_new1929z00_1215); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1219); BUNSPEC; } 
BgL_res3198z00_1220 = BgL_new1929z00_1215; } 
BgL_new1901z00_1214 = BgL_res3198z00_1220; } 
{ /* ./Object/slots.scm 269 */
BgL_slotz00_bglt BgL_res3199z00_1246;
{ /* ./Object/slots.scm 269 */
BgL_slotz00_bglt BgL_new1915z00_1221;
BgL_new1915z00_1221 = BgL_new1901z00_1214; 
{ /* ./Object/slots.scm 269 */
obj_t BgL_id1903z00_1234;obj_t BgL_name1904z00_1235;obj_t BgL_src1905z00_1236;obj_t BgL_classzd2owner1906zd2_1237;obj_t BgL_type1907z00_1238;bool_t BgL_readzd2onlyzf31908z21_1239;obj_t BgL_defaultzd2value1909zd2_1240;obj_t BgL_virtualzd2num1910zd2_1241;obj_t BgL_getter1911z00_1242;obj_t BgL_setter1912z00_1243;obj_t BgL_indexed1913z00_1244;obj_t BgL_userzd2info1914zd2_1245;
BgL_id1903z00_1234 = BgL_arg2300z00_542; 
BgL_name1904z00_1235 = BgL_arg2301z00_543; 
BgL_src1905z00_1236 = BgL_arg2303z00_544; 
BgL_classzd2owner1906zd2_1237 = BgL_classzd2owner1892zd2_1205; 
BgL_type1907z00_1238 = BgL_arg2305z00_546; 
BgL_readzd2onlyzf31908z21_1239 = ((bool_t)0); 
BgL_defaultzd2value1909zd2_1240 = BgL_arg2306z00_547; 
BgL_virtualzd2num1910zd2_1241 = BgL_virtualzd2num1896zd2_1209; 
BgL_getter1911z00_1242 = BFALSE; 
BgL_setter1912z00_1243 = BFALSE; 
BgL_indexed1913z00_1244 = BFALSE; 
BgL_userzd2info1914zd2_1245 = BUNSPEC; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_idz00) = ((obj_t)BgL_id1903z00_1234), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_namez00) = ((obj_t)BgL_name1904z00_1235), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1236), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1237), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_typez00) = ((obj_t)BgL_type1907z00_1238), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1239), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1240), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1241), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1242), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1243), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1244), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1221))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1245), BUNSPEC); 
BgL_res3199z00_1246 = BgL_new1915z00_1221; } } BgL_res3199z00_1246; } 
BgL_res3200z00_1247 = BgL_new1901z00_1214; } } 
BgL_arg2290z00_538 = BgL_res3200z00_1247; } } 
{ /* ./Object/slots.scm 311 */
obj_t BgL_auxz00_2401;
BgL_auxz00_2401 = 
(obj_t)(BgL_arg2290z00_538); 
BgL_arg2286z00_537 = 
MAKE_PAIR(BgL_auxz00_2401, BgL_resz00_414); } } 
{ 
obj_t BgL_resz00_2405;obj_t BgL_slotsz00_2404;
BgL_slotsz00_2404 = BgL_arg2285z00_536; 
BgL_resz00_2405 = BgL_arg2286z00_537; 
BgL_resz00_414 = BgL_resz00_2405; 
BgL_slotsz00_413 = BgL_slotsz00_2404; 
goto BgL_loopz00_416;} } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } } } } }  else 
{ /* ./Object/slots.scm 295 */
goto BgL_tagzd2168zd2_431;} } } } } } } } } 
}



/* find-default-attr */
obj_t BGl_findzd2defaultzd2attrz00zzobject_slotsz00(obj_t BgL_attrz00_738)
{ AN_OBJECT;
{ /* ./Object/slots.scm 118 */
BGl_findzd2defaultzd2attrz00zzobject_slotsz00:
if(
PAIRP(BgL_attrz00_738))
{ 

{ /* ./Object/slots.scm 114 */
obj_t BgL_ezd2122zd2_744;
BgL_ezd2122zd2_744 = 
CAR(BgL_attrz00_738); 
if(
PAIRP(BgL_ezd2122zd2_744))
{ /* ./Object/slots.scm 114 */
obj_t BgL_cdrzd2126zd2_746;
BgL_cdrzd2126zd2_746 = 
CDR(BgL_ezd2122zd2_744); 
{ /* ./Object/slots.scm 114 */
bool_t BgL_testz00_2413;
{ /* ./Object/slots.scm 114 */
obj_t BgL_auxz00_2416;obj_t BgL_auxz00_2414;
BgL_auxz00_2416 = 
CNST_TABLE_REF(((long)7)); 
BgL_auxz00_2414 = 
CAR(BgL_ezd2122zd2_744); 
BgL_testz00_2413 = 
(BgL_auxz00_2414==BgL_auxz00_2416); } 
if(BgL_testz00_2413)
{ /* ./Object/slots.scm 114 */
if(
PAIRP(BgL_cdrzd2126zd2_746))
{ /* ./Object/slots.scm 114 */
bool_t BgL_testz00_2421;
{ /* ./Object/slots.scm 114 */
obj_t BgL_auxz00_2422;
BgL_auxz00_2422 = 
CDR(BgL_cdrzd2126zd2_746); 
BgL_testz00_2421 = 
NULLP(BgL_auxz00_2422); } 
if(BgL_testz00_2421)
{ /* ./Object/slots.scm 114 */
return 
CAR(BgL_cdrzd2126zd2_746);}  else 
{ /* ./Object/slots.scm 114 */
BgL_tagzd2121zd2_743:
{ 
obj_t BgL_attrz00_2426;
BgL_attrz00_2426 = 
CDR(BgL_attrz00_738); 
BgL_attrz00_738 = BgL_attrz00_2426; 
goto BGl_findzd2defaultzd2attrz00zzobject_slotsz00;} } }  else 
{ /* ./Object/slots.scm 114 */
goto BgL_tagzd2121zd2_743;} }  else 
{ /* ./Object/slots.scm 114 */
goto BgL_tagzd2121zd2_743;} } }  else 
{ /* ./Object/slots.scm 114 */
goto BgL_tagzd2121zd2_743;} } }  else 
{ /* ./Object/slots.scm 112 */
return BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00;} } 
}



/* find-info-attr */
obj_t BGl_findzd2infozd2attrz00zzobject_slotsz00(obj_t BgL_attrz00_723)
{ AN_OBJECT;
{ /* ./Object/slots.scm 127 */
BGl_findzd2infozd2attrz00zzobject_slotsz00:
if(
PAIRP(BgL_attrz00_723))
{ 

{ /* ./Object/slots.scm 123 */
obj_t BgL_ezd2133zd2_728;
BgL_ezd2133zd2_728 = 
CAR(BgL_attrz00_723); 
if(
PAIRP(BgL_ezd2133zd2_728))
{ /* ./Object/slots.scm 123 */
obj_t BgL_cdrzd2135zd2_730;
BgL_cdrzd2135zd2_730 = 
CDR(BgL_ezd2133zd2_728); 
{ /* ./Object/slots.scm 123 */
bool_t BgL_testz00_2434;
{ /* ./Object/slots.scm 123 */
obj_t BgL_auxz00_2437;obj_t BgL_auxz00_2435;
BgL_auxz00_2437 = 
CNST_TABLE_REF(((long)8)); 
BgL_auxz00_2435 = 
CAR(BgL_ezd2133zd2_728); 
BgL_testz00_2434 = 
(BgL_auxz00_2435==BgL_auxz00_2437); } 
if(BgL_testz00_2434)
{ /* ./Object/slots.scm 123 */
if(
PAIRP(BgL_cdrzd2135zd2_730))
{ /* ./Object/slots.scm 123 */
bool_t BgL_testz00_2442;
{ /* ./Object/slots.scm 123 */
obj_t BgL_auxz00_2443;
BgL_auxz00_2443 = 
CDR(BgL_cdrzd2135zd2_730); 
BgL_testz00_2442 = 
NULLP(BgL_auxz00_2443); } 
if(BgL_testz00_2442)
{ /* ./Object/slots.scm 123 */
return BgL_ezd2133zd2_728;}  else 
{ /* ./Object/slots.scm 123 */
BgL_tagzd2132zd2_727:
{ 
obj_t BgL_attrz00_2446;
BgL_attrz00_2446 = 
CDR(BgL_attrz00_723); 
BgL_attrz00_723 = BgL_attrz00_2446; 
goto BGl_findzd2infozd2attrz00zzobject_slotsz00;} } }  else 
{ /* ./Object/slots.scm 123 */
goto BgL_tagzd2132zd2_727;} }  else 
{ /* ./Object/slots.scm 123 */
goto BgL_tagzd2132zd2_727;} } }  else 
{ /* ./Object/slots.scm 123 */
goto BgL_tagzd2132zd2_727;} } }  else 
{ /* ./Object/slots.scm 121 */
return BFALSE;} } 
}



/* find-virtual-attr */
obj_t BGl_findzd2virtualzd2attrz00zzobject_slotsz00(obj_t BgL_attrz00_688)
{ AN_OBJECT;
{ /* ./Object/slots.scm 141 */
{ 
obj_t BgL_attrz00_690;obj_t BgL_getz00_691;obj_t BgL_setz00_692;
BgL_attrz00_690 = BgL_attrz00_688; 
BgL_getz00_691 = BFALSE; 
BgL_setz00_692 = BFALSE; 
BgL_loopz00_693:
{ /* ./Object/slots.scm 133 */
bool_t BgL_test2552z00_694;
BgL_test2552z00_694 = 
PAIRP(BgL_attrz00_690); 
if(BgL_test2552z00_694)
{ 

{ /* ./Object/slots.scm 135 */
obj_t BgL_ezd2141zd2_700;
BgL_ezd2141zd2_700 = 
CAR(BgL_attrz00_690); 
{ /* ./Object/slots.scm 135 */
bool_t BgL_test2553z00_701;
BgL_test2553z00_701 = 
PAIRP(BgL_ezd2141zd2_700); 
if(BgL_test2553z00_701)
{ /* ./Object/slots.scm 135 */
obj_t BgL_cdrzd2146zd2_702;
BgL_cdrzd2146zd2_702 = 
CDR(BgL_ezd2141zd2_700); 
{ /* ./Object/slots.scm 135 */
bool_t BgL_test2554z00_703;
{ /* ./Object/slots.scm 135 */
obj_t BgL_auxz00_2456;obj_t BgL_auxz00_2454;
BgL_auxz00_2456 = 
CNST_TABLE_REF(((long)9)); 
BgL_auxz00_2454 = 
CAR(BgL_ezd2141zd2_700); 
BgL_test2554z00_703 = 
(BgL_auxz00_2454==BgL_auxz00_2456); } 
if(BgL_test2554z00_703)
{ /* ./Object/slots.scm 135 */
bool_t BgL_test2555z00_704;
BgL_test2555z00_704 = 
PAIRP(BgL_cdrzd2146zd2_702); 
if(BgL_test2555z00_704)
{ /* ./Object/slots.scm 135 */
bool_t BgL_test2556z00_705;
{ /* ./Object/slots.scm 135 */
obj_t BgL_auxz00_2462;
BgL_auxz00_2462 = 
CDR(BgL_cdrzd2146zd2_702); 
BgL_test2556z00_705 = 
NULLP(BgL_auxz00_2462); } 
if(BgL_test2556z00_705)
{ /* ./Object/slots.scm 135 */
obj_t BgL_arg2558z00_706;
BgL_arg2558z00_706 = 
CAR(BgL_cdrzd2146zd2_702); 
{ /* ./Object/slots.scm 135 */
obj_t BgL_arg2600z00_1456;
BgL_arg2600z00_1456 = 
CDR(BgL_attrz00_690); 
{ 
obj_t BgL_getz00_2469;obj_t BgL_attrz00_2468;
BgL_attrz00_2468 = BgL_arg2600z00_1456; 
BgL_getz00_2469 = BgL_arg2558z00_706; 
BgL_getz00_691 = BgL_getz00_2469; 
BgL_attrz00_690 = BgL_attrz00_2468; 
goto BgL_loopz00_693;} } }  else 
{ /* ./Object/slots.scm 135 */
BgL_tagzd2140zd2_699:
{ /* ./Object/slots.scm 141 */
obj_t BgL_arg2608z00_720;
BgL_arg2608z00_720 = 
CDR(BgL_attrz00_690); 
{ 
obj_t BgL_attrz00_2471;
BgL_attrz00_2471 = BgL_arg2608z00_720; 
BgL_attrz00_690 = BgL_attrz00_2471; 
goto BgL_loopz00_693;} } } }  else 
{ /* ./Object/slots.scm 135 */
goto BgL_tagzd2140zd2_699;} }  else 
{ /* ./Object/slots.scm 135 */
bool_t BgL_test2568z00_709;
{ /* ./Object/slots.scm 135 */
obj_t BgL_auxz00_2474;obj_t BgL_auxz00_2472;
BgL_auxz00_2474 = 
CNST_TABLE_REF(((long)10)); 
BgL_auxz00_2472 = 
CAR(BgL_ezd2141zd2_700); 
BgL_test2568z00_709 = 
(BgL_auxz00_2472==BgL_auxz00_2474); } 
if(BgL_test2568z00_709)
{ /* ./Object/slots.scm 135 */
bool_t BgL_test2569z00_710;
BgL_test2569z00_710 = 
PAIRP(BgL_cdrzd2146zd2_702); 
if(BgL_test2569z00_710)
{ /* ./Object/slots.scm 135 */
bool_t BgL_test2570z00_711;
{ /* ./Object/slots.scm 135 */
obj_t BgL_auxz00_2480;
BgL_auxz00_2480 = 
CDR(BgL_cdrzd2146zd2_702); 
BgL_test2570z00_711 = 
NULLP(BgL_auxz00_2480); } 
if(BgL_test2570z00_711)
{ /* ./Object/slots.scm 135 */
obj_t BgL_arg2573z00_712;
BgL_arg2573z00_712 = 
CAR(BgL_cdrzd2146zd2_702); 
{ /* ./Object/slots.scm 135 */
obj_t BgL_arg2604z00_1465;
BgL_arg2604z00_1465 = 
CDR(BgL_attrz00_690); 
{ 
obj_t BgL_setz00_2487;obj_t BgL_attrz00_2486;
BgL_attrz00_2486 = BgL_arg2604z00_1465; 
BgL_setz00_2487 = BgL_arg2573z00_712; 
BgL_setz00_692 = BgL_setz00_2487; 
BgL_attrz00_690 = BgL_attrz00_2486; 
goto BgL_loopz00_693;} } }  else 
{ /* ./Object/slots.scm 135 */
goto BgL_tagzd2140zd2_699;} }  else 
{ /* ./Object/slots.scm 135 */
goto BgL_tagzd2140zd2_699;} }  else 
{ /* ./Object/slots.scm 135 */
goto BgL_tagzd2140zd2_699;} } } }  else 
{ /* ./Object/slots.scm 135 */
goto BgL_tagzd2140zd2_699;} } } }  else 
{ /* ./Object/slots.scm 133 */
{ /* ./Object/slots.scm 134 */
int BgL_nz00_1472;
BgL_nz00_1472 = 
(int)(((long)2)); 
BGL_MVALUES_NUMBER_SET(BgL_nz00_1472); } 
{ /* ./Object/slots.scm 134 */
int BgL_nz00_1473;
BgL_nz00_1473 = 
(int)(((long)1)); 
BGL_MVALUES_VAL_SET(BgL_nz00_1473, BgL_setz00_692); } 
return BgL_getz00_691;} } } } 
}



/* _make-class-slots3226 */
obj_t BGl__makezd2classzd2slots3226z00zzobject_slotsz00(obj_t BgL_envz00_1768, obj_t BgL_classz00_1769, obj_t BgL_slotsz00_1770, obj_t BgL_superz00_1771, obj_t BgL_vnumz00_1772, obj_t BgL_srcz00_1773)
{ AN_OBJECT;
{ /* ./Object/slots.scm 108 */
return 
BGl_makezd2classzd2slotsz00zzobject_slotsz00(
(BgL_tclassz00_bglt)(BgL_classz00_1769), BgL_slotsz00_1770, BgL_superz00_1771, 
CINT(BgL_vnumz00_1772), BgL_srcz00_1773);} 
}



/* make-java-class-slots */
BGL_EXPORTED_DEF obj_t BGl_makezd2javazd2classzd2slotszd2zzobject_slotsz00(BgL_jclassz00_bglt BgL_classz00_11, obj_t BgL_slotsz00_12, obj_t BgL_superz00_13, obj_t BgL_srcz00_14)
{ AN_OBJECT;
{ /* ./Object/slots.scm 322 */
{ /* ./Object/slots.scm 324 */
obj_t BgL_locz00_763;
BgL_locz00_763 = 
BGl_findzd2locationzd2zztools_locationz00(BgL_srcz00_14); 
{ 
obj_t BgL_identz00_809;obj_t BgL_jnamez00_810;obj_t BgL_readozf3zf3_811;obj_t BgL_sz00_812;obj_t BgL_idz00_785;obj_t BgL_jnamez00_786;obj_t BgL_readozf3zf3_787;obj_t BgL_srcz00_788;
{ 
obj_t BgL_slotsz00_766;obj_t BgL_resz00_767;
{ /* ./Object/slots.scm 352 */
obj_t BgL_arg2678z00_769;
{ /* ./Object/slots.scm 352 */
bool_t BgL_test2680z00_770;
BgL_test2680z00_770 = 
BGl_iszd2azf3z21zz__objectz00(BgL_superz00_13, BGl_typez00zztype_typez00); 
if(BgL_test2680z00_770)
{ /* ./Object/slots.scm 354 */
bool_t BgL_test2681z00_771;
BgL_test2681z00_771 = 
BGl_iszd2azf3z21zz__objectz00(BgL_superz00_13, BGl_jclassz00zzobject_classz00); 
if(BgL_test2681z00_771)
{ /* ./Object/slots.scm 354 */
{ /* ./Object/slots.scm 357 */
obj_t BgL_auxz00_2500;
{ /* ./Object/slots.scm 357 */
BgL_jclassz00_bglt BgL_obj1289z00_1499;
BgL_obj1289z00_1499 = 
(BgL_jclassz00_bglt)(BgL_superz00_13); 
{ 
obj_t BgL_auxz00_2502;
{ /* ./Object/slots.scm 357 */
BgL_objectz00_bglt BgL_auxz00_2503;
BgL_auxz00_2503 = 
(BgL_objectz00_bglt)(BgL_obj1289z00_1499); 
BgL_auxz00_2502 = 
BGL_OBJECT_WIDENING(BgL_auxz00_2503); } 
BgL_auxz00_2500 = 
(((BgL_jclassz00_bglt)CREF(BgL_auxz00_2502))->BgL_slotsz00); } } 
BgL_arg2678z00_769 = 
bgl_reverse(BgL_auxz00_2500); } }  else 
{ /* ./Object/slots.scm 354 */
BgL_arg2678z00_769 = BNIL; } }  else 
{ /* ./Object/slots.scm 352 */
BgL_arg2678z00_769 = BNIL; } } 
BgL_slotsz00_766 = BgL_slotsz00_12; 
BgL_resz00_767 = BgL_arg2678z00_769; 
BgL_loopz00_768:
{ /* ./Object/slots.scm 358 */
bool_t BgL_test2688z00_773;
BgL_test2688z00_773 = 
NULLP(BgL_slotsz00_766); 
if(BgL_test2688z00_773)
{ /* ./Object/slots.scm 358 */
return BgL_resz00_767;}  else 
{ /* ./Object/slots.scm 364 */
obj_t BgL_sz00_774;
BgL_sz00_774 = 
CAR(BgL_slotsz00_766); 
{ /* ./Object/slots.scm 364 */
obj_t BgL_srcz00_775;
BgL_srcz00_775 = 
CAR(BgL_sz00_774); 
{ /* ./Object/slots.scm 365 */
obj_t BgL_idz00_776;
{ /* ./Object/slots.scm 366 */
obj_t BgL_auxz00_2512;
BgL_auxz00_2512 = 
CDR(BgL_sz00_774); 
BgL_idz00_776 = 
CAR(BgL_auxz00_2512); } 
{ /* ./Object/slots.scm 366 */
obj_t BgL_jnamez00_777;
{ /* ./Object/slots.scm 367 */
obj_t BgL_auxz00_2515;
{ /* ./Object/slots.scm 367 */
obj_t BgL_auxz00_2516;
BgL_auxz00_2516 = 
CDR(BgL_sz00_774); 
BgL_auxz00_2515 = 
CDR(BgL_auxz00_2516); } 
BgL_jnamez00_777 = 
CAR(BgL_auxz00_2515); } 
{ /* ./Object/slots.scm 367 */
obj_t BgL_modz00_778;
{ /* ./Object/slots.scm 368 */
obj_t BgL_auxz00_2520;
{ /* ./Object/slots.scm 368 */
obj_t BgL_auxz00_2521;
{ /* ./Object/slots.scm 368 */
obj_t BgL_auxz00_2522;
BgL_auxz00_2522 = 
CDR(BgL_sz00_774); 
BgL_auxz00_2521 = 
CDR(BgL_auxz00_2522); } 
BgL_auxz00_2520 = 
CDR(BgL_auxz00_2521); } 
BgL_modz00_778 = 
CAR(BgL_auxz00_2520); } 
{ /* ./Object/slots.scm 368 */
obj_t BgL_readozf3zf3_779;
BgL_readozf3zf3_779 = 
BGl_memqz00zz__r4_pairs_and_lists_6_3z00(
CNST_TABLE_REF(((long)13)), BgL_modz00_778); 
{ /* ./Object/slots.scm 369 */

{ /* ./Object/slots.scm 370 */
bool_t BgL_test2689z00_780;
{ /* ./Object/slots.scm 370 */
obj_t BgL_auxz00_2529;
BgL_auxz00_2529 = 
BGl_memqz00zz__r4_pairs_and_lists_6_3z00(
CNST_TABLE_REF(((long)14)), BgL_modz00_778); 
BgL_test2689z00_780 = 
CBOOL(BgL_auxz00_2529); } 
if(BgL_test2689z00_780)
{ /* ./Object/slots.scm 370 */
BgL_idz00_785 = BgL_idz00_776; 
BgL_jnamez00_786 = BgL_jnamez00_777; 
BgL_readozf3zf3_787 = BgL_readozf3zf3_779; 
BgL_srcz00_788 = BgL_srcz00_775; 
{ /* ./Object/slots.scm 336 */
obj_t BgL_locz00_790;
BgL_locz00_790 = 
BGl_findzd2locationzf2locz20zztools_locationz00(BgL_srcz00_788, BgL_locz00_763); 
{ /* ./Object/slots.scm 336 */
obj_t BgL_slotzd2idzd2_791;
BgL_slotzd2idzd2_791 = 
BGl_parsezd2idzd2zzast_identz00(BgL_idz00_785, BgL_locz00_790); 
{ /* ./Object/slots.scm 337 */
obj_t BgL_lzd2idzd2_792;
{ /* ./Object/slots.scm 338 */
bool_t BgL_test2728z00_800;
{ /* ./Object/slots.scm 338 */
obj_t BgL_auxz00_2539;obj_t BgL_auxz00_2536;
BgL_auxz00_2539 = 
CNST_TABLE_REF(((long)11)); 
{ /* ./Object/slots.scm 338 */
BgL_typez00_bglt BgL_obj1003z00_1523;
BgL_obj1003z00_1523 = 
(BgL_typez00_bglt)(BgL_classz00_11); 
BgL_auxz00_2536 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_1523))->BgL_idz00); } 
BgL_test2728z00_800 = 
(BgL_auxz00_2536==BgL_auxz00_2539); } 
if(BgL_test2728z00_800)
{ /* ./Object/slots.scm 338 */
BgL_lzd2idzd2_792 = 
CAR(BgL_slotzd2idzd2_791); }  else 
{ /* ./Object/slots.scm 340 */
obj_t BgL_arg2731z00_801;obj_t BgL_arg2732z00_802;obj_t BgL_arg2733z00_803;
{ /* ./Object/slots.scm 340 */
BgL_typez00_bglt BgL_obj1003z00_1525;
BgL_obj1003z00_1525 = 
(BgL_typez00_bglt)(BgL_classz00_11); 
BgL_arg2731z00_801 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_1525))->BgL_idz00); } 
BgL_arg2732z00_802 = 
CNST_TABLE_REF(((long)12)); 
BgL_arg2733z00_803 = 
CAR(BgL_slotzd2idzd2_791); 
{ /* ./Object/slots.scm 340 */
obj_t BgL_list2735z00_804;
{ /* ./Object/slots.scm 340 */
obj_t BgL_arg2737z00_805;
{ /* ./Object/slots.scm 340 */
obj_t BgL_arg2740z00_806;
BgL_arg2740z00_806 = 
MAKE_PAIR(BgL_arg2733z00_803, BNIL); 
BgL_arg2737z00_805 = 
MAKE_PAIR(BgL_arg2732z00_802, BgL_arg2740z00_806); } 
BgL_list2735z00_804 = 
MAKE_PAIR(BgL_arg2731z00_801, BgL_arg2737z00_805); } 
BgL_lzd2idzd2_792 = 
BGl_symbolzd2appendzd2zz__r4_symbols_6_4z00(BgL_list2735z00_804); } } } 
{ /* ./Object/slots.scm 338 */
obj_t BgL_tzd2idzd2_793;
{ /* ./Object/slots.scm 341 */
bool_t BgL_test2722z00_798;
{ /* ./Object/slots.scm 341 */
obj_t BgL_arg2725z00_799;
BgL_arg2725z00_799 = 
CDR(BgL_slotzd2idzd2_791); 
BgL_test2722z00_798 = 
(BgL_arg2725z00_799==BGl_za2_za2z00zztype_cachez00); } 
if(BgL_test2722z00_798)
{ /* ./Object/slots.scm 341 */
BgL_tzd2idzd2_793 = BGl_za2objza2z00zztype_cachez00; }  else 
{ /* ./Object/slots.scm 341 */
BgL_tzd2idzd2_793 = 
CDR(BgL_slotzd2idzd2_791); } } 
{ /* ./Object/slots.scm 344 */

BGl_ensurezd2typezd2definedz12z12zzobject_slotsz00(
(BgL_typez00_bglt)(BgL_tzd2idzd2_793), BgL_srcz00_788); 
{ /* ./Object/slots.scm 346 */
BgL_globalz00_bglt BgL_gz00_795;
{ /* ./Object/slots.scm 347 */
obj_t BgL_arg2719z00_797;
{ /* ./Object/slots.scm 347 */
BgL_typez00_bglt BgL_obj1003z00_1529;
BgL_obj1003z00_1529 = 
(BgL_typez00_bglt)(BgL_tzd2idzd2_793); 
BgL_arg2719z00_797 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_1529))->BgL_idz00); } 
BgL_gz00_795 = 
BGl_declarezd2globalzd2cvarz12z12zzast_glozd2declzd2(BgL_lzd2idzd2_792, BgL_jnamez00_786, BgL_arg2719z00_797, 
CBOOL(BgL_readozf3zf3_787), BgL_srcz00_788, BFALSE); } 
{ /* ./Object/slots.scm 348 */
obj_t BgL_arg2715z00_796;
{ /* ./Object/slots.scm 348 */
BgL_typez00_bglt BgL_obj1003z00_1530;
BgL_obj1003z00_1530 = 
(BgL_typez00_bglt)(BgL_classz00_11); 
BgL_arg2715z00_796 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_1530))->BgL_idz00); } 
{ /* ./Object/slots.scm 348 */
BgL_globalz00_bglt BgL_obj1477z00_1531;obj_t BgL_val1476z00_1532;
BgL_obj1477z00_1531 = BgL_gz00_795; 
BgL_val1476z00_1532 = BgL_arg2715z00_796; 
((((BgL_globalz00_bglt)CREF(BgL_obj1477z00_1531))->BgL_modulez00) = ((obj_t)BgL_val1476z00_1532), BUNSPEC); } } BgL_gz00_795; } } } } } } 
{ /* ./Object/slots.scm 373 */
obj_t BgL_arg2692z00_781;
BgL_arg2692z00_781 = 
CDR(BgL_slotsz00_766); 
{ 
obj_t BgL_slotsz00_2566;
BgL_slotsz00_2566 = BgL_arg2692z00_781; 
BgL_slotsz00_766 = BgL_slotsz00_2566; 
goto BgL_loopz00_768;} } }  else 
{ /* ./Object/slots.scm 374 */
obj_t BgL_arg2696z00_782;obj_t BgL_arg2697z00_783;
BgL_arg2696z00_782 = 
CDR(BgL_slotsz00_766); 
{ /* ./Object/slots.scm 375 */
BgL_slotz00_bglt BgL_arg2701z00_784;
BgL_identz00_809 = BgL_idz00_776; 
BgL_jnamez00_810 = BgL_jnamez00_777; 
BgL_readozf3zf3_811 = BgL_readozf3zf3_779; 
BgL_sz00_812 = BgL_srcz00_775; 
{ /* ./Object/slots.scm 326 */
obj_t BgL_locz00_814;
BgL_locz00_814 = 
BGl_findzd2locationzf2locz20zztools_locationz00(BgL_sz00_812, BgL_locz00_763); 
{ /* ./Object/slots.scm 326 */
obj_t BgL_slotzd2idzd2_815;
BgL_slotzd2idzd2_815 = 
BGl_parsezd2idzd2zzast_identz00(BgL_identz00_809, BgL_locz00_814); 
{ /* ./Object/slots.scm 327 */

{ /* ./Object/slots.scm 329 */
obj_t BgL_arg2754z00_816;obj_t BgL_arg2755z00_817;obj_t BgL_arg2756z00_818;BgL_jclassz00_bglt BgL_arg2757z00_819;obj_t BgL_arg2758z00_820;obj_t BgL_arg2759z00_821;obj_t BgL_arg2760z00_822;
BgL_arg2754z00_816 = 
CAR(BgL_slotzd2idzd2_815); 
BgL_arg2755z00_817 = BgL_jnamez00_810; 
BgL_arg2756z00_818 = BgL_sz00_812; 
BgL_arg2757z00_819 = BgL_classz00_11; 
BgL_arg2758z00_820 = 
BGl_findzd2slotzd2typez00zzobject_slotsz00(BgL_slotzd2idzd2_815, BgL_srcz00_14); 
BgL_arg2759z00_821 = BgL_readozf3zf3_811; 
BgL_arg2760z00_822 = BGl_za2slotzd2nozd2defaultzd2valuezd2markza2z00zzobject_slotsz00; 
{ /* ./Object/slots.scm 328 */
BgL_slotz00_bglt BgL_res3215z00_1579;
{ /* ./Object/slots.scm 328 */
obj_t BgL_classzd2owner1892zd2_1537;bool_t BgL_readzd2onlyzf31894z21_1539;obj_t BgL_virtualzd2num1896zd2_1541;
BgL_classzd2owner1892zd2_1537 = 
(obj_t)(BgL_arg2757z00_819); 
BgL_readzd2onlyzf31894z21_1539 = 
CBOOL(BgL_arg2759z00_821); 
BgL_virtualzd2num1896zd2_1541 = 
BINT(((long)-1)); 
{ /* ./Object/slots.scm 328 */
BgL_slotz00_bglt BgL_new1901z00_1546;
{ /* ./Object/slots.scm 328 */
BgL_slotz00_bglt BgL_res3213z00_1552;
{ /* ./Object/slots.scm 328 */
BgL_slotz00_bglt BgL_new1929z00_1547;
BgL_new1929z00_1547 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 328 */
long BgL_arg2887z00_1548;
BgL_arg2887z00_1548 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 328 */
BgL_objectz00_bglt BgL_objz00_1549;
BgL_objz00_1549 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1547); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1549, BgL_arg2887z00_1548); } } 
{ /* ./Object/slots.scm 328 */
BgL_objectz00_bglt BgL_auxz00_2579;
BgL_auxz00_2579 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1547); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2579, BFALSE); } 
{ /* ./Object/slots.scm 328 */
obj_t BgL_objz00_1551;
BgL_objz00_1551 = 
(obj_t)(BgL_new1929z00_1547); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1551); BUNSPEC; } 
BgL_res3213z00_1552 = BgL_new1929z00_1547; } 
BgL_new1901z00_1546 = BgL_res3213z00_1552; } 
{ /* ./Object/slots.scm 328 */
BgL_slotz00_bglt BgL_res3214z00_1578;
{ /* ./Object/slots.scm 328 */
BgL_slotz00_bglt BgL_new1915z00_1553;
BgL_new1915z00_1553 = BgL_new1901z00_1546; 
{ /* ./Object/slots.scm 328 */
obj_t BgL_id1903z00_1566;obj_t BgL_name1904z00_1567;obj_t BgL_src1905z00_1568;obj_t BgL_classzd2owner1906zd2_1569;obj_t BgL_type1907z00_1570;bool_t BgL_readzd2onlyzf31908z21_1571;obj_t BgL_defaultzd2value1909zd2_1572;obj_t BgL_virtualzd2num1910zd2_1573;obj_t BgL_getter1911z00_1574;obj_t BgL_setter1912z00_1575;obj_t BgL_indexed1913z00_1576;obj_t BgL_userzd2info1914zd2_1577;
BgL_id1903z00_1566 = BgL_arg2754z00_816; 
BgL_name1904z00_1567 = BgL_arg2755z00_817; 
BgL_src1905z00_1568 = BgL_arg2756z00_818; 
BgL_classzd2owner1906zd2_1569 = BgL_classzd2owner1892zd2_1537; 
BgL_type1907z00_1570 = BgL_arg2758z00_820; 
BgL_readzd2onlyzf31908z21_1571 = BgL_readzd2onlyzf31894z21_1539; 
BgL_defaultzd2value1909zd2_1572 = BgL_arg2760z00_822; 
BgL_virtualzd2num1910zd2_1573 = BgL_virtualzd2num1896zd2_1541; 
BgL_getter1911z00_1574 = BFALSE; 
BgL_setter1912z00_1575 = BFALSE; 
BgL_indexed1913z00_1576 = BFALSE; 
BgL_userzd2info1914zd2_1577 = BUNSPEC; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_idz00) = ((obj_t)BgL_id1903z00_1566), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_namez00) = ((obj_t)BgL_name1904z00_1567), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1568), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1569), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_typez00) = ((obj_t)BgL_type1907z00_1570), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1571), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1572), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1573), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1574), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1575), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1576), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1553))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1577), BUNSPEC); 
BgL_res3214z00_1578 = BgL_new1915z00_1553; } } BgL_res3214z00_1578; } 
BgL_res3215z00_1579 = BgL_new1901z00_1546; } } 
BgL_arg2701z00_784 = BgL_res3215z00_1579; } } } } } 
{ /* ./Object/slots.scm 375 */
obj_t BgL_auxz00_2596;
BgL_auxz00_2596 = 
(obj_t)(BgL_arg2701z00_784); 
BgL_arg2697z00_783 = 
MAKE_PAIR(BgL_auxz00_2596, BgL_resz00_767); } } 
{ 
obj_t BgL_resz00_2600;obj_t BgL_slotsz00_2599;
BgL_slotsz00_2599 = BgL_arg2696z00_782; 
BgL_resz00_2600 = BgL_arg2697z00_783; 
BgL_resz00_767 = BgL_resz00_2600; 
BgL_slotsz00_766 = BgL_slotsz00_2599; 
goto BgL_loopz00_768;} } } } } } } } } } } } } } } } 
}



/* _make-java-class-slots3228 */
obj_t BGl__makezd2javazd2classzd2slots3228zd2zzobject_slotsz00(obj_t BgL_envz00_1774, obj_t BgL_classz00_1775, obj_t BgL_slotsz00_1776, obj_t BgL_superz00_1777, obj_t BgL_srcz00_1778)
{ AN_OBJECT;
{ /* ./Object/slots.scm 322 */
return 
BGl_makezd2javazd2classzd2slotszd2zzobject_slotsz00(
(BgL_jclassz00_bglt)(BgL_classz00_1775), BgL_slotsz00_1776, BgL_superz00_1777, BgL_srcz00_1778);} 
}



/* find-slot-type */
obj_t BGl_findzd2slotzd2typez00zzobject_slotsz00(obj_t BgL_slotzd2idzd2_15, obj_t BgL_srcz00_16)
{ AN_OBJECT;
{ /* ./Object/slots.scm 381 */
{ /* ./Object/slots.scm 382 */
obj_t BgL_tz00_826;
{ /* ./Object/slots.scm 382 */
bool_t BgL_test2770z00_827;
{ /* ./Object/slots.scm 382 */
obj_t BgL_arg2773z00_828;
BgL_arg2773z00_828 = 
CDR(BgL_slotzd2idzd2_15); 
BgL_test2770z00_827 = 
(BgL_arg2773z00_828==BGl_za2_za2z00zztype_cachez00); } 
if(BgL_test2770z00_827)
{ /* ./Object/slots.scm 382 */
BgL_tz00_826 = BGl_za2objza2z00zztype_cachez00; }  else 
{ /* ./Object/slots.scm 382 */
BgL_tz00_826 = 
CDR(BgL_slotzd2idzd2_15); } } 
BGl_ensurezd2typezd2definedz12z12zzobject_slotsz00(
(BgL_typez00_bglt)(BgL_tz00_826), BgL_srcz00_16); 
return BgL_tz00_826;} } 
}



/* scheme-symbol->c-string */
obj_t BGl_schemezd2symbolzd2ze3czd2stringz31zzobject_slotsz00(obj_t BgL_symbolz00_17)
{ AN_OBJECT;
{ /* ./Object/slots.scm 389 */
if(
CBOOL(BGl_za2astzd2casezd2sensitiveza2z00zzengine_paramz00))
{ /* ./Object/slots.scm 390 */
return 
BGl_idzd2ze3namez31zzast_identz00(BgL_symbolz00_17);}  else 
{ /* ./Object/slots.scm 392 */
obj_t BgL_arg2778z00_829;
BgL_arg2778z00_829 = 
BGl_idzd2ze3namez31zzast_identz00(BgL_symbolz00_17); 
return 
BGl_stringzd2downcasezd2zz__r4_strings_6_7z00(BgL_arg2778z00_829);} } 
}



/* get-local-virtual-slots-number */
BGL_EXPORTED_DEF obj_t BGl_getzd2localzd2virtualzd2slotszd2numberz00zzobject_slotsz00(BgL_tclassz00_bglt BgL_classz00_18, obj_t BgL_slotsz00_19)
{ AN_OBJECT;
{ /* ./Object/slots.scm 406 */
{ 
obj_t BgL_slotsz00_830;obj_t BgL_numz00_831;
{ /* ./Object/slots.scm 407 */
long BgL_auxz00_2614;
BgL_slotsz00_830 = BgL_slotsz00_19; 
BgL_numz00_831 = 
BINT(((long)-1)); 
BgL_loopz00_832:
if(
NULLP(BgL_slotsz00_830))
{ /* ./Object/slots.scm 410 */
{ /* ./Object/slots.scm 411 */
long BgL_auxz00_2617;
BgL_auxz00_2617 = 
(long)CINT(BgL_numz00_831); 
BgL_auxz00_2614 = 
(BgL_auxz00_2617+((long)1)); } }  else 
{ /* ./Object/slots.scm 412 */
bool_t BgL_testz00_2620;
{ /* ./Object/slots.scm 412 */
BgL_slotz00_bglt BgL_slotz00_1586;
{ /* ./Object/slots.scm 412 */
obj_t BgL_auxz00_2621;
BgL_auxz00_2621 = 
CAR(BgL_slotsz00_830); 
BgL_slotz00_1586 = 
(BgL_slotz00_bglt)(BgL_auxz00_2621); } 
{ /* ./Object/slots.scm 412 */
long BgL_auxz00_2624;
{ /* ./Object/slots.scm 412 */
obj_t BgL_auxz00_2625;
BgL_auxz00_2625 = 
(((BgL_slotz00_bglt)CREF(BgL_slotz00_1586))->BgL_virtualzd2numzd2); 
BgL_auxz00_2624 = 
(long)CINT(BgL_auxz00_2625); } 
BgL_testz00_2620 = 
(BgL_auxz00_2624>=((long)0)); } } 
if(BgL_testz00_2620)
{ /* ./Object/slots.scm 412 */
{ /* ./Object/slots.scm 413 */
obj_t BgL_lnumz00_835;
{ /* ./Object/slots.scm 413 */
BgL_slotz00_bglt BgL_obj1878z00_1594;
{ /* ./Object/slots.scm 413 */
obj_t BgL_auxz00_2629;
BgL_auxz00_2629 = 
CAR(BgL_slotsz00_830); 
BgL_obj1878z00_1594 = 
(BgL_slotz00_bglt)(BgL_auxz00_2629); } 
BgL_lnumz00_835 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1878z00_1594))->BgL_virtualzd2numzd2); } 
{ 
obj_t BgL_numz00_2635;obj_t BgL_slotsz00_2633;
BgL_slotsz00_2633 = 
CDR(BgL_slotsz00_830); 
{ /* ./Object/slots.scm 415 */
bool_t BgL_testz00_2636;
{ /* ./Object/slots.scm 415 */
long BgL_auxz00_2639;long BgL_auxz00_2637;
BgL_auxz00_2639 = 
(long)CINT(BgL_numz00_831); 
BgL_auxz00_2637 = 
(long)CINT(BgL_lnumz00_835); 
BgL_testz00_2636 = 
(BgL_auxz00_2637>BgL_auxz00_2639); } 
if(BgL_testz00_2636)
{ /* ./Object/slots.scm 415 */
BgL_numz00_2635 = BgL_lnumz00_835; }  else 
{ /* ./Object/slots.scm 415 */
BgL_numz00_2635 = BgL_numz00_831; } } 
BgL_numz00_831 = BgL_numz00_2635; 
BgL_slotsz00_830 = BgL_slotsz00_2633; 
goto BgL_loopz00_832;} } }  else 
{ /* ./Object/slots.scm 412 */
{ 
obj_t BgL_slotsz00_2642;
BgL_slotsz00_2642 = 
CDR(BgL_slotsz00_830); 
BgL_slotsz00_830 = BgL_slotsz00_2642; 
goto BgL_loopz00_832;} } } 
return 
BINT(BgL_auxz00_2614);} } } 
}



/* _get-local-virtual-slots-number3230 */
obj_t BGl__getzd2localzd2virtualzd2slotszd2number3230z00zzobject_slotsz00(obj_t BgL_envz00_1779, obj_t BgL_classz00_1780, obj_t BgL_slotsz00_1781)
{ AN_OBJECT;
{ /* ./Object/slots.scm 406 */
return 
BGl_getzd2localzd2virtualzd2slotszd2numberz00zzobject_slotsz00(
(BgL_tclassz00_bglt)(BgL_classz00_1780), BgL_slotsz00_1781);} 
}



/* make-class-make-formals */
BGL_EXPORTED_DEF obj_t BGl_makezd2classzd2makezd2formalszd2zzobject_slotsz00(obj_t BgL_slotsz00_20)
{ AN_OBJECT;
{ /* ./Object/slots.scm 424 */
{ 
obj_t BgL_slotsz00_842;obj_t BgL_formalsz00_843;
BgL_slotsz00_842 = BgL_slotsz00_20; 
BgL_formalsz00_843 = BNIL; 
BgL_loopz00_844:
{ /* ./Object/slots.scm 428 */
bool_t BgL_test2806z00_845;
BgL_test2806z00_845 = 
NULLP(BgL_slotsz00_842); 
if(BgL_test2806z00_845)
{ /* ./Object/slots.scm 428 */
return 
BGl_reversez12z12zz__r4_pairs_and_lists_6_3z00(BgL_formalsz00_843);}  else 
{ /* ./Object/slots.scm 430 */
bool_t BgL_test2808z00_846;
{ /* ./Object/slots.scm 430 */
BgL_slotz00_bglt BgL_slotz00_1601;
{ /* ./Object/slots.scm 430 */
obj_t BgL_auxz00_2651;
BgL_auxz00_2651 = 
CAR(BgL_slotsz00_842); 
BgL_slotz00_1601 = 
(BgL_slotz00_bglt)(BgL_auxz00_2651); } 
{ /* ./Object/slots.scm 430 */
long BgL_auxz00_2654;
{ /* ./Object/slots.scm 430 */
obj_t BgL_auxz00_2655;
BgL_auxz00_2655 = 
(((BgL_slotz00_bglt)CREF(BgL_slotz00_1601))->BgL_virtualzd2numzd2); 
BgL_auxz00_2654 = 
(long)CINT(BgL_auxz00_2655); } 
BgL_test2808z00_846 = 
(BgL_auxz00_2654>=((long)0)); } } 
if(BgL_test2808z00_846)
{ /* ./Object/slots.scm 430 */
{ /* ./Object/slots.scm 431 */
obj_t BgL_arg2810z00_847;
BgL_arg2810z00_847 = 
CDR(BgL_slotsz00_842); 
{ 
obj_t BgL_slotsz00_2661;
BgL_slotsz00_2661 = BgL_arg2810z00_847; 
BgL_slotsz00_842 = BgL_slotsz00_2661; 
goto BgL_loopz00_844;} } }  else 
{ /* ./Object/slots.scm 430 */
{ /* ./Object/slots.scm 433 */
obj_t BgL_arg2814z00_848;obj_t BgL_arg2815z00_849;
BgL_arg2814z00_848 = 
CDR(BgL_slotsz00_842); 
{ /* ./Object/slots.scm 434 */
obj_t BgL_arg2819z00_850;
{ /* ./Object/slots.scm 434 */
obj_t BgL_arg2822z00_851;
{ /* ./Object/slots.scm 434 */
obj_t BgL_arg2825z00_852;
{ /* ./Object/slots.scm 434 */
BgL_slotz00_bglt BgL_obj1871z00_1611;
{ /* ./Object/slots.scm 434 */
obj_t BgL_auxz00_2663;
BgL_auxz00_2663 = 
CAR(BgL_slotsz00_842); 
BgL_obj1871z00_1611 = 
(BgL_slotz00_bglt)(BgL_auxz00_2663); } 
BgL_arg2825z00_852 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1871z00_1611))->BgL_idz00); } 
BgL_arg2822z00_851 = 
PROCEDURE_ENTRY(BGl_gensymz00zz__r4_symbols_6_4z00)(BGl_gensymz00zz__r4_symbols_6_4z00, BgL_arg2825z00_852, BEOA); } 
BgL_arg2819z00_850 = 
BGl_markzd2symbolzd2nonzd2userz12zc0zzast_identz00(BgL_arg2822z00_851); } 
BgL_arg2815z00_849 = 
MAKE_PAIR(BgL_arg2819z00_850, BgL_formalsz00_843); } 
{ 
obj_t BgL_formalsz00_2672;obj_t BgL_slotsz00_2671;
BgL_slotsz00_2671 = BgL_arg2814z00_848; 
BgL_formalsz00_2672 = BgL_arg2815z00_849; 
BgL_formalsz00_843 = BgL_formalsz00_2672; 
BgL_slotsz00_842 = BgL_slotsz00_2671; 
goto BgL_loopz00_844;} } } } } } } 
}



/* _make-class-make-formals3232 */
obj_t BGl__makezd2classzd2makezd2formals3232zd2zzobject_slotsz00(obj_t BgL_envz00_1782, obj_t BgL_slotsz00_1783)
{ AN_OBJECT;
{ /* ./Object/slots.scm 424 */
return 
BGl_makezd2classzd2makezd2formalszd2zzobject_slotsz00(BgL_slotsz00_1783);} 
}



/* make-class-make-typed-formals */
BGL_EXPORTED_DEF obj_t BGl_makezd2classzd2makezd2typedzd2formalsz00zzobject_slotsz00(obj_t BgL_idsz00_21, obj_t BgL_slotsz00_22)
{ AN_OBJECT;
{ /* ./Object/slots.scm 440 */
{ 
obj_t BgL_slotsz00_855;obj_t BgL_idsz00_856;obj_t BgL_formalsz00_857;
BgL_slotsz00_855 = BgL_slotsz00_22; 
BgL_idsz00_856 = BgL_idsz00_21; 
BgL_formalsz00_857 = BNIL; 
BgL_loopz00_858:
{ /* ./Object/slots.scm 445 */
bool_t BgL_test2837z00_859;
BgL_test2837z00_859 = 
NULLP(BgL_slotsz00_855); 
if(BgL_test2837z00_859)
{ /* ./Object/slots.scm 445 */
return 
BGl_reversez12z12zz__r4_pairs_and_lists_6_3z00(BgL_formalsz00_857);}  else 
{ /* ./Object/slots.scm 447 */
bool_t BgL_test2839z00_860;
{ /* ./Object/slots.scm 447 */
BgL_slotz00_bglt BgL_slotz00_1614;
{ /* ./Object/slots.scm 447 */
obj_t BgL_auxz00_2677;
BgL_auxz00_2677 = 
CAR(BgL_slotsz00_855); 
BgL_slotz00_1614 = 
(BgL_slotz00_bglt)(BgL_auxz00_2677); } 
{ /* ./Object/slots.scm 447 */
long BgL_auxz00_2680;
{ /* ./Object/slots.scm 447 */
obj_t BgL_auxz00_2681;
BgL_auxz00_2681 = 
(((BgL_slotz00_bglt)CREF(BgL_slotz00_1614))->BgL_virtualzd2numzd2); 
BgL_auxz00_2680 = 
(long)CINT(BgL_auxz00_2681); } 
BgL_test2839z00_860 = 
(BgL_auxz00_2680>=((long)0)); } } 
if(BgL_test2839z00_860)
{ /* ./Object/slots.scm 447 */
{ /* ./Object/slots.scm 448 */
obj_t BgL_arg2841z00_861;
BgL_arg2841z00_861 = 
CDR(BgL_slotsz00_855); 
{ 
obj_t BgL_slotsz00_2687;
BgL_slotsz00_2687 = BgL_arg2841z00_861; 
BgL_slotsz00_855 = BgL_slotsz00_2687; 
goto BgL_loopz00_858;} } }  else 
{ /* ./Object/slots.scm 447 */
{ /* ./Object/slots.scm 450 */
obj_t BgL_arg2845z00_862;obj_t BgL_arg2846z00_863;obj_t BgL_arg2847z00_864;
BgL_arg2845z00_862 = 
CDR(BgL_slotsz00_855); 
BgL_arg2846z00_863 = 
CDR(BgL_idsz00_856); 
{ /* ./Object/slots.scm 452 */
obj_t BgL_arg2852z00_865;
{ /* ./Object/slots.scm 452 */
obj_t BgL_arg2855z00_866;obj_t BgL_arg2856z00_867;
{ /* ./Object/slots.scm 452 */
obj_t BgL_arg2859z00_868;
BgL_arg2859z00_868 = 
CAR(BgL_idsz00_856); 
BgL_arg2855z00_866 = 
BGl_markzd2symbolzd2nonzd2userz12zc0zzast_identz00(BgL_arg2859z00_868); } 
{ /* ./Object/slots.scm 453 */
BgL_typez00_bglt BgL_obj1003z00_1627;
{ /* ./Object/slots.scm 453 */
obj_t BgL_auxz00_2692;
{ /* ./Object/slots.scm 453 */
BgL_slotz00_bglt BgL_obj1875z00_1626;
{ /* ./Object/slots.scm 453 */
obj_t BgL_auxz00_2693;
BgL_auxz00_2693 = 
CAR(BgL_slotsz00_855); 
BgL_obj1875z00_1626 = 
(BgL_slotz00_bglt)(BgL_auxz00_2693); } 
BgL_auxz00_2692 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1875z00_1626))->BgL_typez00); } 
BgL_obj1003z00_1627 = 
(BgL_typez00_bglt)(BgL_auxz00_2692); } 
BgL_arg2856z00_867 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_1627))->BgL_idz00); } 
BgL_arg2852z00_865 = 
BGl_makezd2typedzd2identz00zzast_identz00(BgL_arg2855z00_866, BgL_arg2856z00_867); } 
BgL_arg2847z00_864 = 
MAKE_PAIR(BgL_arg2852z00_865, BgL_formalsz00_857); } 
{ 
obj_t BgL_formalsz00_2703;obj_t BgL_idsz00_2702;obj_t BgL_slotsz00_2701;
BgL_slotsz00_2701 = BgL_arg2845z00_862; 
BgL_idsz00_2702 = BgL_arg2846z00_863; 
BgL_formalsz00_2703 = BgL_arg2847z00_864; 
BgL_formalsz00_857 = BgL_formalsz00_2703; 
BgL_idsz00_856 = BgL_idsz00_2702; 
BgL_slotsz00_855 = BgL_slotsz00_2701; 
goto BgL_loopz00_858;} } } } } } } 
}



/* _make-class-make-typed-formals3234 */
obj_t BGl__makezd2classzd2makezd2typedzd2formals3234z00zzobject_slotsz00(obj_t BgL_envz00_1784, obj_t BgL_idsz00_1785, obj_t BgL_slotsz00_1786)
{ AN_OBJECT;
{ /* ./Object/slots.scm 440 */
return 
BGl_makezd2classzd2makezd2typedzd2formalsz00zzobject_slotsz00(BgL_idsz00_1785, BgL_slotsz00_1786);} 
}



/* object-init */
obj_t BGl_objectzd2initzd2zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 15 */
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg2875z00_872;obj_t BgL_arg2876z00_873;obj_t BgL_arg2880z00_877;
BgL_arg2875z00_872 = 
CNST_TABLE_REF(((long)15)); 
BgL_arg2876z00_873 = BGl_objectz00zz__objectz00; 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1993z00_878;
{ 
int BgL_auxz00_2706;
BgL_auxz00_2706 = 
(int)(((long)0)); 
BgL_v1993z00_878 = 
create_vector(BgL_auxz00_2706); } 
BgL_arg2880z00_877 = BgL_v1993z00_878; } 
BGl_slotz00zzobject_slotsz00 = 
BGl_registerzd2classz12zc0zz__objectz00(BgL_arg2875z00_872, BgL_arg2876z00_873, BFALSE, BGl_allocatezd2slotzd2envz00zzobject_slotsz00, ((long)55947), BNIL, BFALSE, BgL_arg2880z00_877); } 
return BUNSPEC;} 
}



/* slot? */
BGL_EXPORTED_DEF bool_t BGl_slotzf3zf3zzobject_slotsz00(obj_t BgL_obj1980z00_23)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
return 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1980z00_23, BGl_slotz00zzobject_slotsz00);} 
}



/* _slot? */
obj_t BGl__slotzf3zf3zzobject_slotsz00(obj_t BgL_envz00_1788, obj_t BgL_obj1980z00_1789)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ /* ./Object/slots.scm 29 */
bool_t BgL_auxz00_2711;
BgL_auxz00_2711 = 
BGl_iszd2azf3z21zz__objectz00(BgL_obj1980z00_1789, BGl_slotz00zzobject_slotsz00); 
return 
BBOOL(BgL_auxz00_2711);} } 
}



/* make-slot */
BGL_EXPORTED_DEF BgL_slotz00_bglt BGl_makezd2slotzd2zzobject_slotsz00(obj_t BgL_id1889z00_27, obj_t BgL_name1890z00_28, obj_t BgL_src1891z00_29, obj_t BgL_classzd2owner1892zd2_30, obj_t BgL_type1893z00_31, bool_t BgL_readzd2onlyzf31894z21_32, obj_t BgL_defaultzd2value1895zd2_33, obj_t BgL_virtualzd2num1896zd2_34, obj_t BgL_getter1897z00_35, obj_t BgL_setter1898z00_36, obj_t BgL_indexed1899z00_37, obj_t BgL_userzd2info1900zd2_38)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_new1901z00_1628;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_res3219z00_1634;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_new1929z00_1629;
BgL_new1929z00_1629 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 29 */
long BgL_arg2887z00_1630;
BgL_arg2887z00_1630 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 29 */
BgL_objectz00_bglt BgL_objz00_1631;
BgL_objz00_1631 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1629); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1631, BgL_arg2887z00_1630); } } 
{ /* ./Object/slots.scm 29 */
BgL_objectz00_bglt BgL_auxz00_2718;
BgL_auxz00_2718 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1629); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2718, BFALSE); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_objz00_1633;
BgL_objz00_1633 = 
(obj_t)(BgL_new1929z00_1629); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1633); BUNSPEC; } 
BgL_res3219z00_1634 = BgL_new1929z00_1629; } 
BgL_new1901z00_1628 = BgL_res3219z00_1634; } 
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_res3220z00_1660;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_new1915z00_1635;
BgL_new1915z00_1635 = BgL_new1901z00_1628; 
{ /* ./Object/slots.scm 29 */
obj_t BgL_id1903z00_1648;obj_t BgL_name1904z00_1649;obj_t BgL_src1905z00_1650;obj_t BgL_classzd2owner1906zd2_1651;obj_t BgL_type1907z00_1652;bool_t BgL_readzd2onlyzf31908z21_1653;obj_t BgL_defaultzd2value1909zd2_1654;obj_t BgL_virtualzd2num1910zd2_1655;obj_t BgL_getter1911z00_1656;obj_t BgL_setter1912z00_1657;obj_t BgL_indexed1913z00_1658;obj_t BgL_userzd2info1914zd2_1659;
BgL_id1903z00_1648 = BgL_id1889z00_27; 
BgL_name1904z00_1649 = BgL_name1890z00_28; 
BgL_src1905z00_1650 = BgL_src1891z00_29; 
BgL_classzd2owner1906zd2_1651 = BgL_classzd2owner1892zd2_30; 
BgL_type1907z00_1652 = BgL_type1893z00_31; 
BgL_readzd2onlyzf31908z21_1653 = BgL_readzd2onlyzf31894z21_32; 
BgL_defaultzd2value1909zd2_1654 = BgL_defaultzd2value1895zd2_33; 
BgL_virtualzd2num1910zd2_1655 = BgL_virtualzd2num1896zd2_34; 
BgL_getter1911z00_1656 = BgL_getter1897z00_35; 
BgL_setter1912z00_1657 = BgL_setter1898z00_36; 
BgL_indexed1913z00_1658 = BgL_indexed1899z00_37; 
BgL_userzd2info1914zd2_1659 = BgL_userzd2info1900zd2_38; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_idz00) = ((obj_t)BgL_id1903z00_1648), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_namez00) = ((obj_t)BgL_name1904z00_1649), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1650), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1651), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_typez00) = ((obj_t)BgL_type1907z00_1652), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1653), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1654), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1655), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1656), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1657), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1658), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1635))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1659), BUNSPEC); 
BgL_res3220z00_1660 = BgL_new1915z00_1635; } } BgL_res3220z00_1660; } 
return BgL_new1901z00_1628;} } 
}



/* _make-slot3238 */
obj_t BGl__makezd2slot3238zd2zzobject_slotsz00(obj_t BgL_envz00_1790, obj_t BgL_id1889z00_1791, obj_t BgL_name1890z00_1792, obj_t BgL_src1891z00_1793, obj_t BgL_classzd2owner1892zd2_1794, obj_t BgL_type1893z00_1795, obj_t BgL_readzd2onlyzf31894z21_1796, obj_t BgL_defaultzd2value1895zd2_1797, obj_t BgL_virtualzd2num1896zd2_1798, obj_t BgL_getter1897z00_1799, obj_t BgL_setter1898z00_1800, obj_t BgL_indexed1899z00_1801, obj_t BgL_userzd2info1900zd2_1802)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_auxz00_2735;
BgL_auxz00_2735 = 
BGl_makezd2slotzd2zzobject_slotsz00(BgL_id1889z00_1791, BgL_name1890z00_1792, BgL_src1891z00_1793, BgL_classzd2owner1892zd2_1794, BgL_type1893z00_1795, 
CBOOL(BgL_readzd2onlyzf31894z21_1796), BgL_defaultzd2value1895zd2_1797, BgL_virtualzd2num1896zd2_1798, BgL_getter1897z00_1799, BgL_setter1898z00_1800, BgL_indexed1899z00_1801, BgL_userzd2info1900zd2_1802); 
return 
(obj_t)(BgL_auxz00_2735);} } 
}



/* fill-slot! */
BGL_EXPORTED_DEF BgL_slotz00_bglt BGl_fillzd2slotz12zc0zzobject_slotsz00(BgL_slotz00_bglt BgL_new1915z00_39, obj_t BgL_id1903z00_40, obj_t BgL_name1904z00_41, obj_t BgL_src1905z00_42, obj_t BgL_classzd2owner1906zd2_43, obj_t BgL_type1907z00_44, bool_t BgL_readzd2onlyzf31908z21_45, obj_t BgL_defaultzd2value1909zd2_46, obj_t BgL_virtualzd2num1910zd2_47, obj_t BgL_getter1911z00_48, obj_t BgL_setter1912z00_49, obj_t BgL_indexed1913z00_50, obj_t BgL_userzd2info1914zd2_51)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ /* ./Object/slots.scm 29 */
obj_t BgL_id1903z00_1842;obj_t BgL_name1904z00_1843;obj_t BgL_src1905z00_1844;obj_t BgL_classzd2owner1906zd2_1845;obj_t BgL_type1907z00_1846;bool_t BgL_readzd2onlyzf31908z21_1847;obj_t BgL_defaultzd2value1909zd2_1848;obj_t BgL_virtualzd2num1910zd2_1849;obj_t BgL_getter1911z00_1850;obj_t BgL_setter1912z00_1851;obj_t BgL_indexed1913z00_1852;obj_t BgL_userzd2info1914zd2_1853;
BgL_id1903z00_1842 = BgL_id1903z00_40; 
BgL_name1904z00_1843 = BgL_name1904z00_41; 
BgL_src1905z00_1844 = BgL_src1905z00_42; 
BgL_classzd2owner1906zd2_1845 = BgL_classzd2owner1906zd2_43; 
BgL_type1907z00_1846 = BgL_type1907z00_44; 
BgL_readzd2onlyzf31908z21_1847 = BgL_readzd2onlyzf31908z21_45; 
BgL_defaultzd2value1909zd2_1848 = BgL_defaultzd2value1909zd2_46; 
BgL_virtualzd2num1910zd2_1849 = BgL_virtualzd2num1910zd2_47; 
BgL_getter1911z00_1850 = BgL_getter1911z00_48; 
BgL_setter1912z00_1851 = BgL_setter1912z00_49; 
BgL_indexed1913z00_1852 = BgL_indexed1913z00_50; 
BgL_userzd2info1914zd2_1853 = BgL_userzd2info1914zd2_51; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_idz00) = ((obj_t)BgL_id1903z00_1842), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_namez00) = ((obj_t)BgL_name1904z00_1843), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1844), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1845), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_typez00) = ((obj_t)BgL_type1907z00_1846), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1847), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1848), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1849), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1850), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1851), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1852), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_39))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1853), BUNSPEC); 
return BgL_new1915z00_39;} } 
}



/* _fill-slot!3240 */
obj_t BGl__fillzd2slotz123240zc0zzobject_slotsz00(obj_t BgL_envz00_1803, obj_t BgL_new1915z00_1804, obj_t BgL_id1903z00_1805, obj_t BgL_name1904z00_1806, obj_t BgL_src1905z00_1807, obj_t BgL_classzd2owner1906zd2_1808, obj_t BgL_type1907z00_1809, obj_t BgL_readzd2onlyzf31908z21_1810, obj_t BgL_defaultzd2value1909zd2_1811, obj_t BgL_virtualzd2num1910zd2_1812, obj_t BgL_getter1911z00_1813, obj_t BgL_setter1912z00_1814, obj_t BgL_indexed1913z00_1815, obj_t BgL_userzd2info1914zd2_1816)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_auxz00_2751;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_res3496z00_1879;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_new1915z00_1854;bool_t BgL_readzd2onlyzf31908z21_1860;
BgL_new1915z00_1854 = 
(BgL_slotz00_bglt)(BgL_new1915z00_1804); 
BgL_readzd2onlyzf31908z21_1860 = 
CBOOL(BgL_readzd2onlyzf31908z21_1810); 
{ /* ./Object/slots.scm 29 */
obj_t BgL_id1903z00_1867;obj_t BgL_name1904z00_1868;obj_t BgL_src1905z00_1869;obj_t BgL_classzd2owner1906zd2_1870;obj_t BgL_type1907z00_1871;bool_t BgL_readzd2onlyzf31908z21_1872;obj_t BgL_defaultzd2value1909zd2_1873;obj_t BgL_virtualzd2num1910zd2_1874;obj_t BgL_getter1911z00_1875;obj_t BgL_setter1912z00_1876;obj_t BgL_indexed1913z00_1877;obj_t BgL_userzd2info1914zd2_1878;
BgL_id1903z00_1867 = BgL_id1903z00_1805; 
BgL_name1904z00_1868 = BgL_name1904z00_1806; 
BgL_src1905z00_1869 = BgL_src1905z00_1807; 
BgL_classzd2owner1906zd2_1870 = BgL_classzd2owner1906zd2_1808; 
BgL_type1907z00_1871 = BgL_type1907z00_1809; 
BgL_readzd2onlyzf31908z21_1872 = BgL_readzd2onlyzf31908z21_1860; 
BgL_defaultzd2value1909zd2_1873 = BgL_defaultzd2value1909zd2_1811; 
BgL_virtualzd2num1910zd2_1874 = BgL_virtualzd2num1910zd2_1812; 
BgL_getter1911z00_1875 = BgL_getter1911z00_1813; 
BgL_setter1912z00_1876 = BgL_setter1912z00_1814; 
BgL_indexed1913z00_1877 = BgL_indexed1913z00_1815; 
BgL_userzd2info1914zd2_1878 = BgL_userzd2info1914zd2_1816; 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_idz00) = ((obj_t)BgL_id1903z00_1867), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_namez00) = ((obj_t)BgL_name1904z00_1868), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_srcz00) = ((obj_t)BgL_src1905z00_1869), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_classzd2ownerzd2) = ((obj_t)BgL_classzd2owner1906zd2_1870), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_typez00) = ((obj_t)BgL_type1907z00_1871), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_readzd2onlyzf31908z21_1872), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_defaultzd2value1909zd2_1873), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_virtualzd2numzd2) = ((obj_t)BgL_virtualzd2num1910zd2_1874), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_getterz00) = ((obj_t)BgL_getter1911z00_1875), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_setterz00) = ((obj_t)BgL_setter1912z00_1876), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_indexedz00) = ((obj_t)BgL_indexed1913z00_1877), BUNSPEC); 
((((BgL_slotz00_bglt)CREF(BgL_new1915z00_1854))->BgL_userzd2infozd2) = ((obj_t)BgL_userzd2info1914zd2_1878), BUNSPEC); 
BgL_res3496z00_1879 = BgL_new1915z00_1854; } } 
BgL_auxz00_2751 = BgL_res3496z00_1879; } 
return 
(obj_t)(BgL_auxz00_2751);} } 
}



/* allocate-slot */
BGL_EXPORTED_DEF BgL_slotz00_bglt BGl_allocatezd2slotzd2zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_new1929z00_1880;
BgL_new1929z00_1880 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 29 */
long BgL_arg2887z00_1881;
BgL_arg2887z00_1881 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 29 */
BgL_objectz00_bglt BgL_objz00_1882;
BgL_objz00_1882 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1880); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1882, BgL_arg2887z00_1881); } } 
{ /* ./Object/slots.scm 29 */
BgL_objectz00_bglt BgL_auxz00_2771;
BgL_auxz00_2771 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1880); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2771, BFALSE); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_objz00_1883;
BgL_objz00_1883 = 
(obj_t)(BgL_new1929z00_1880); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1883); BUNSPEC; } 
return BgL_new1929z00_1880;} } 
}



/* _allocate-slot */
obj_t BGl__allocatezd2slotzd2zzobject_slotsz00(obj_t BgL_envz00_1787)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_auxz00_2776;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_res3497z00_1888;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_new1929z00_1884;
BgL_new1929z00_1884 = 
((BgL_slotz00_bglt)BREF( GC_MALLOC ( sizeof(struct BgL_slotz00_bgl) ))); 
{ /* ./Object/slots.scm 29 */
long BgL_arg2887z00_1885;
BgL_arg2887z00_1885 = 
BGl_classzd2numzd2zz__objectz00(BGl_slotz00zzobject_slotsz00); 
{ /* ./Object/slots.scm 29 */
BgL_objectz00_bglt BgL_objz00_1886;
BgL_objz00_1886 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1884); 
BGL_OBJECT_CLASS_NUM_SET(BgL_objz00_1886, BgL_arg2887z00_1885); } } 
{ /* ./Object/slots.scm 29 */
BgL_objectz00_bglt BgL_auxz00_2781;
BgL_auxz00_2781 = 
(BgL_objectz00_bglt)(BgL_new1929z00_1884); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2781, BFALSE); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_objz00_1887;
BgL_objz00_1887 = 
(obj_t)(BgL_new1929z00_1884); 
BGL_HEAP_DEBUG_MARK_OBJ(BgL_objz00_1887); BUNSPEC; } 
BgL_res3497z00_1888 = BgL_new1929z00_1884; } 
BgL_auxz00_2776 = BgL_res3497z00_1888; } 
return 
(obj_t)(BgL_auxz00_2776);} } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 15 */
BGl_addzd2methodz12zc0zz__objectz00(BGl_shapezd2envzd2zztools_shapez00, BGl_slotz00zzobject_slotsz00, BGl_proc3471z00zzobject_slotsz00); 
BGl_addzd2methodz12zc0zz__objectz00(BGl_objectzd2ze3structzd2envze3zz__objectz00, BGl_slotz00zzobject_slotsz00, BGl_proc3472z00zzobject_slotsz00); 
return 
BGl_addzd2methodz12zc0zz__objectz00(BGl_structzb2objectzd2ze3objectzd2envz51zz__objectz00, BGl_slotz00zzobject_slotsz00, BGl_proc3473z00zzobject_slotsz00);} 
}



/* struct+object->object-slot1999 */
obj_t BGl_structzb2objectzd2ze3objectzd2slot1999z51zzobject_slotsz00(obj_t BgL_envz00_1820, obj_t BgL_oz00_1821, obj_t BgL_sz00_1822)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ 
BgL_slotz00_bglt BgL_oz00_1090;obj_t BgL_sz00_1091;
{ /* ./Object/slots.scm 29 */
BgL_slotz00_bglt BgL_auxz00_2790;
BgL_oz00_1090 = 
(BgL_slotz00_bglt)(BgL_oz00_1821); 
BgL_sz00_1091 = BgL_sz00_1822; 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3165z00_1094;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2791;
BgL_auxz00_2791 = 
(int)(((long)0)); 
BgL_arg3165z00_1094 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2791); } 
{ /* ./Object/slots.scm 29 */
BgL_objectz00_bglt BgL_auxz00_2794;
BgL_auxz00_2794 = 
(BgL_objectz00_bglt)(BgL_oz00_1090); 
BGL_OBJECT_WIDENING_SET(BgL_auxz00_2794, BgL_arg3165z00_1094); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1934z00_1095;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2797;
BgL_auxz00_2797 = 
(int)(((long)1)); 
BgL_v1934z00_1095 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2797); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_idz00) = ((obj_t)BgL_v1934z00_1095), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1938z00_1096;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2801;
BgL_auxz00_2801 = 
(int)(((long)2)); 
BgL_v1938z00_1096 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2801); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_namez00) = ((obj_t)BgL_v1938z00_1096), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1942z00_1097;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2805;
BgL_auxz00_2805 = 
(int)(((long)3)); 
BgL_v1942z00_1097 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2805); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_srcz00) = ((obj_t)BgL_v1942z00_1097), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1946z00_1098;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2809;
BgL_auxz00_2809 = 
(int)(((long)4)); 
BgL_v1946z00_1098 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2809); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_classzd2ownerzd2) = ((obj_t)BgL_v1946z00_1098), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1950z00_1099;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2813;
BgL_auxz00_2813 = 
(int)(((long)5)); 
BgL_v1950z00_1099 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2813); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_typez00) = ((obj_t)BgL_v1950z00_1099), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
bool_t BgL_v1954z00_1100;
{ /* ./Object/slots.scm 29 */
obj_t BgL_auxz00_2817;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2818;
BgL_auxz00_2818 = 
(int)(((long)6)); 
BgL_auxz00_2817 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2818); } 
BgL_v1954z00_1100 = 
CBOOL(BgL_auxz00_2817); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_readzd2onlyzf3z21) = ((bool_t)BgL_v1954z00_1100), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1958z00_1101;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2823;
BgL_auxz00_2823 = 
(int)(((long)7)); 
BgL_v1958z00_1101 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2823); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_defaultzd2valuezd2) = ((obj_t)BgL_v1958z00_1101), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1962z00_1102;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2827;
BgL_auxz00_2827 = 
(int)(((long)8)); 
BgL_v1962z00_1102 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2827); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_virtualzd2numzd2) = ((obj_t)BgL_v1962z00_1102), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1966z00_1103;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2831;
BgL_auxz00_2831 = 
(int)(((long)9)); 
BgL_v1966z00_1103 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2831); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_getterz00) = ((obj_t)BgL_v1966z00_1103), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1970z00_1104;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2835;
BgL_auxz00_2835 = 
(int)(((long)10)); 
BgL_v1970z00_1104 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2835); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_setterz00) = ((obj_t)BgL_v1970z00_1104), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1974z00_1105;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2839;
BgL_auxz00_2839 = 
(int)(((long)11)); 
BgL_v1974z00_1105 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2839); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_indexedz00) = ((obj_t)BgL_v1974z00_1105), BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_v1978z00_1106;
{ /* ./Object/slots.scm 29 */
int BgL_auxz00_2843;
BgL_auxz00_2843 = 
(int)(((long)12)); 
BgL_v1978z00_1106 = 
STRUCT_REF(BgL_sz00_1091, BgL_auxz00_2843); } 
((((BgL_slotz00_bglt)CREF(BgL_oz00_1090))->BgL_userzd2infozd2) = ((obj_t)BgL_v1978z00_1106), BUNSPEC); } 
BgL_auxz00_2790 = BgL_oz00_1090; 
return 
(obj_t)(BgL_auxz00_2790);} } } 
}



/* object->struct-slot1997 */
obj_t BGl_objectzd2ze3structzd2slot1997ze3zzobject_slotsz00(obj_t BgL_envz00_1823, obj_t BgL_obj1930z00_1824)
{ AN_OBJECT;
{ /* ./Object/slots.scm 29 */
{ 
BgL_slotz00_bglt BgL_obj1930z00_1060;
BgL_obj1930z00_1060 = 
(BgL_slotz00_bglt)(BgL_obj1930z00_1824); 
{ /* ./Object/slots.scm 29 */
obj_t BgL_res1931z00_1063;
{ /* ./Object/slots.scm 29 */
obj_t BgL_keyz00_1683;int BgL_lenz00_1684;
BgL_keyz00_1683 = 
CNST_TABLE_REF(((long)15)); 
BgL_lenz00_1684 = 
(int)(((long)13)); 
BgL_res1931z00_1063 = 
make_struct(BgL_keyz00_1683, BgL_lenz00_1684, BUNSPEC); } 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1687;
BgL_kz00_1687 = 
(int)(((long)0)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1687, BFALSE); } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3098z00_1065;
BgL_arg3098z00_1065 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_idz00); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1691;
BgL_kz00_1691 = 
(int)(((long)1)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1691, BgL_arg3098z00_1065); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3103z00_1067;
BgL_arg3103z00_1067 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_namez00); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1695;
BgL_kz00_1695 = 
(int)(((long)2)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1695, BgL_arg3103z00_1067); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3108z00_1069;
BgL_arg3108z00_1069 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_srcz00); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1699;
BgL_kz00_1699 = 
(int)(((long)3)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1699, BgL_arg3108z00_1069); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3113z00_1071;
BgL_arg3113z00_1071 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_classzd2ownerzd2); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1703;
BgL_kz00_1703 = 
(int)(((long)4)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1703, BgL_arg3113z00_1071); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3118z00_1073;
BgL_arg3118z00_1073 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_typez00); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1707;
BgL_kz00_1707 = 
(int)(((long)5)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1707, BgL_arg3118z00_1073); } } 
{ /* ./Object/slots.scm 29 */
bool_t BgL_arg3123z00_1075;
BgL_arg3123z00_1075 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_readzd2onlyzf3z21); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1711;obj_t BgL_oz00_1712;
BgL_kz00_1711 = 
(int)(((long)6)); 
BgL_oz00_1712 = 
BBOOL(BgL_arg3123z00_1075); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1711, BgL_oz00_1712); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3129z00_1077;
BgL_arg3129z00_1077 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_defaultzd2valuezd2); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1715;
BgL_kz00_1715 = 
(int)(((long)7)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1715, BgL_arg3129z00_1077); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3134z00_1079;
BgL_arg3134z00_1079 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_virtualzd2numzd2); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1719;
BgL_kz00_1719 = 
(int)(((long)8)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1719, BgL_arg3134z00_1079); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3139z00_1081;
BgL_arg3139z00_1081 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_getterz00); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1723;
BgL_kz00_1723 = 
(int)(((long)9)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1723, BgL_arg3139z00_1081); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3144z00_1083;
BgL_arg3144z00_1083 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_setterz00); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1727;
BgL_kz00_1727 = 
(int)(((long)10)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1727, BgL_arg3144z00_1083); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3149z00_1085;
BgL_arg3149z00_1085 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_indexedz00); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1731;
BgL_kz00_1731 = 
(int)(((long)11)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1731, BgL_arg3149z00_1085); } } 
{ /* ./Object/slots.scm 29 */
obj_t BgL_arg3154z00_1087;
BgL_arg3154z00_1087 = 
(((BgL_slotz00_bglt)CREF(BgL_obj1930z00_1060))->BgL_userzd2infozd2); 
{ /* ./Object/slots.scm 29 */
int BgL_kz00_1735;
BgL_kz00_1735 = 
(int)(((long)12)); 
STRUCT_SET(BgL_res1931z00_1063, BgL_kz00_1735, BgL_arg3154z00_1087); } } 
return BgL_res1931z00_1063;} } } 
}



/* shape-slot1995 */
obj_t BGl_shapezd2slot1995zd2zzobject_slotsz00(obj_t BgL_envz00_1825, obj_t BgL_sz00_1826)
{ AN_OBJECT;
{ /* ./Object/slots.scm 67 */
{ 
BgL_slotz00_bglt BgL_sz00_1031;
BgL_sz00_1031 = 
(BgL_slotz00_bglt)(BgL_sz00_1826); 
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3037z00_1036;obj_t BgL_arg3039z00_1038;obj_t BgL_arg3042z00_1041;obj_t BgL_arg3044z00_1043;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3077z00_1055;
BgL_arg3077z00_1055 = 
(((BgL_slotz00_bglt)CREF(BgL_sz00_1031))->BgL_idz00); 
BgL_arg3037z00_1036 = 
SYMBOL_TO_STRING(BgL_arg3077z00_1055); } 
BgL_arg3039z00_1038 = 
(((BgL_slotz00_bglt)CREF(BgL_sz00_1031))->BgL_namez00); 
{ /* ./Object/slots.scm 70 */
obj_t BgL_arg3082z00_1056;
BgL_arg3082z00_1056 = 
(((BgL_slotz00_bglt)CREF(BgL_sz00_1031))->BgL_classzd2ownerzd2); 
BgL_arg3042z00_1041 = 
BGl_shapez00zztools_shapez00(BgL_arg3082z00_1056); } 
{ /* ./Object/slots.scm 71 */
obj_t BgL_arg3086z00_1057;
BgL_arg3086z00_1057 = 
(((BgL_slotz00_bglt)CREF(BgL_sz00_1031))->BgL_typez00); 
BgL_arg3044z00_1043 = 
BGl_shapez00zztools_shapez00(BgL_arg3086z00_1057); } 
{ /* ./Object/slots.scm 69 */
obj_t BgL_list3047z00_1045;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3049z00_1046;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3052z00_1047;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3055z00_1048;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3058z00_1049;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3061z00_1050;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3064z00_1051;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3067z00_1052;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3070z00_1053;
{ /* ./Object/slots.scm 69 */
obj_t BgL_arg3073z00_1054;
BgL_arg3073z00_1054 = 
MAKE_PAIR(BGl_string3474z00zzobject_slotsz00, BNIL); 
BgL_arg3070z00_1053 = 
MAKE_PAIR(BgL_arg3044z00_1043, BgL_arg3073z00_1054); } 
BgL_arg3067z00_1052 = 
MAKE_PAIR(BGl_string3475z00zzobject_slotsz00, BgL_arg3070z00_1053); } 
BgL_arg3064z00_1051 = 
MAKE_PAIR(BgL_arg3042z00_1041, BgL_arg3067z00_1052); } 
BgL_arg3061z00_1050 = 
MAKE_PAIR(BGl_string3476z00zzobject_slotsz00, BgL_arg3064z00_1051); } 
BgL_arg3058z00_1049 = 
MAKE_PAIR(BGl_string3477z00zzobject_slotsz00, BgL_arg3061z00_1050); } 
BgL_arg3055z00_1048 = 
MAKE_PAIR(BgL_arg3039z00_1038, BgL_arg3058z00_1049); } 
BgL_arg3052z00_1047 = 
MAKE_PAIR(BGl_string3478z00zzobject_slotsz00, BgL_arg3055z00_1048); } 
BgL_arg3049z00_1046 = 
MAKE_PAIR(BgL_arg3037z00_1036, BgL_arg3052z00_1047); } 
BgL_list3047z00_1045 = 
MAKE_PAIR(BGl_string3479z00zzobject_slotsz00, BgL_arg3049z00_1046); } 
return 
BGl_stringzd2appendzd2zz__r4_strings_6_7z00(BgL_list3047z00_1045);} } } } 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzobject_slotsz00()
{ AN_OBJECT;
{ /* ./Object/slots.scm 15 */
BGl_modulezd2initializa7ationz75zztools_tracez00(((long)59211), "object_slots"); 
BGl_modulezd2initializa7ationz75zztools_errorz00(((long)25566), "object_slots"); 
BGl_modulezd2initializa7ationz75zztools_locationz00(((long)32118), "object_slots"); 
BGl_modulezd2initializa7ationz75zztools_shapez00(((long)30833), "object_slots"); 
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "object_slots"); 
BGl_modulezd2initializa7ationz75zztype_cachez00(((long)25848), "object_slots"); 
BGl_modulezd2initializa7ationz75zztype_envz00(((long)25186), "object_slots"); 
BGl_modulezd2initializa7ationz75zztvector_tvectorz00(((long)32501), "object_slots"); 
BGl_modulezd2initializa7ationz75zzengine_paramz00(((long)14260), "object_slots"); 
BGl_modulezd2initializa7ationz75zzobject_classz00(((long)30791), "object_slots"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "object_slots"); 
BGl_modulezd2initializa7ationz75zzast_identz00(((long)51504), "object_slots"); 
return 
BGl_modulezd2initializa7ationz75zzast_glozd2declzd2(((long)31087), "object_slots");} 
}

