/*===========================================================================*/
/*   (Object/java-access.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/java-access.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_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_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_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;

typedef struct BgL_ccompz00_bgl {
   header_t header;
   obj_t widening;
   obj_t BgL_idz00;
   obj_t BgL_producerz00;
   obj_t BgL_consumerz00;
   obj_t BgL_finaliza7erza7;
} *BgL_ccompz00_bglt;


BGL_IMPORT obj_t BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(obj_t, obj_t);
static obj_t BGl_methodzd2initzd2zzobject_javazd2accesszd2();
BGL_IMPORT obj_t open_input_string(obj_t);
static obj_t BGl__importzd2javazd2classzd2accessorsz122126zc0zzobject_javazd2accesszd2(obj_t, obj_t, obj_t, obj_t, obj_t, obj_t, 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_typez00zztype_typez00;
static obj_t BGl_cnstzd2initzd2zzobject_javazd2accesszd2();
BGL_EXPORTED_DECL obj_t BGl_importzd2javazd2classzd2accessorsz12zc0zzobject_javazd2accesszd2(obj_t, obj_t, BgL_jclassz00_bglt, bool_t, obj_t, obj_t);
static obj_t BGl_importedzd2moduleszd2initz00zzobject_javazd2accesszd2();
extern obj_t BGl_makezd2javazd2classzd2slotszd2zzobject_slotsz00(BgL_jclassz00_bglt, obj_t, obj_t, obj_t);
BGL_IMPORT obj_t string_append_3(obj_t, obj_t, obj_t);
extern obj_t BGl_jclassz00zzobject_classz00;
BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zzobject_javazd2accesszd2(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_tracez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_errorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztools_miscz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_typez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_envz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_toolsz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zztype_cachez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_varz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzast_identz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_classz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_structz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_slotsz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_toolsz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_getterz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_creatorz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_predicatez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzobject_coercionz00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmodule_modulez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzmodule_impusez00(long, char *);
extern obj_t BGl_modulezd2initializa7ationz75zzengine_paramz00(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 *);
extern obj_t BGl_userzd2errorzd2zztools_errorz00(obj_t, obj_t, obj_t, obj_t);
extern obj_t BGl_genzd2javazd2classzd2coercionsz12zc0zzobject_coercionz00(obj_t);
extern obj_t BGl_importzd2javazd2classzd2predz12zc0zzobject_predicatez00(BgL_jclassz00_bglt, obj_t, obj_t);
extern obj_t BGl_importzd2javazd2classzd2creatorzd2zzobject_creatorz00(BgL_jclassz00_bglt, obj_t, obj_t);
static bool_t BGl_correctzd2javazd2classzf3zf3zzobject_javazd2accesszd2(BgL_jclassz00_bglt, obj_t);
extern obj_t BGl_genzd2javazd2classzd2slotszd2accessz12z12zzobject_getterz00(BgL_jclassz00_bglt, obj_t, obj_t);
BGL_IMPORT obj_t bgl_append2(obj_t, obj_t);
static obj_t BGl_requirezd2initializa7ationz75zzobject_javazd2accesszd2 = BUNSPEC;
extern obj_t BGl_genzd2javazd2classzd2constructorszd2zzobject_creatorz00(BgL_jclassz00_bglt, obj_t, obj_t);
static obj_t BGl_libraryzd2moduleszd2initz00zzobject_javazd2accesszd2();
static obj_t __cnst[ 1 ] ;


DEFINE_STRING( BGl_string2142z00zzobject_javazd2accesszd2, BgL_bgl_string2142za700za7za7object_javaza7d2accessza7d22168za7, "foreign ", 8 );
DEFINE_STRING( BGl_string2141z00zzobject_javazd2accesszd2, BgL_bgl_string2141za700za7za7object_javaza7d2accessza7d22169za7, "' is not a class", 16 );
DEFINE_STRING( BGl_string2140z00zzobject_javazd2accesszd2, BgL_bgl_string2140za700za7za7object_javaza7d2accessza7d22170za7, "super of `", 10 );
DEFINE_EXPORT_PROCEDURE( BGl_importzd2javazd2classzd2accessorsz12zd2envz12zzobject_javazd2accesszd2, BgL_bgl__importza7d2javaza7d2classza7d2accessorsza7122126za7c0za7za7object_javaza7d2accessza7d22171za7, BGl__importzd2javazd2classzd2accessorsz122126zc0zzobject_javazd2accesszd2, 0L, 6 );



/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zzobject_javazd2accesszd2(long BgL_checksumz00_594, char * BgL_fromz00_595)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zzobject_javazd2accesszd2))
{ 
BGl_requirezd2initializa7ationz75zzobject_javazd2accesszd2 = 
BBOOL(((bool_t)0)); 
BGl_libraryzd2moduleszd2initz00zzobject_javazd2accesszd2(); 
BGl_cnstzd2initzd2zzobject_javazd2accesszd2(); 
BGl_importedzd2moduleszd2initz00zzobject_javazd2accesszd2(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* library-modules-init */
obj_t BGl_libraryzd2moduleszd2initz00zzobject_javazd2accesszd2()
{ AN_OBJECT;
{ /* ./Object/java-access.scm 21 */
BGl_modulezd2initializa7ationz75zz__r4_pairs_and_lists_6_3z00(((long)0), "object_java-access"); 
BGl_modulezd2initializa7ationz75zz__readerz00(((long)0), "object_java-access"); 
BGl_modulezd2initializa7ationz75zz__objectz00(((long)0), "object_java-access"); 
return BUNSPEC;} 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zzobject_javazd2accesszd2()
{ AN_OBJECT;
{ /* ./Object/java-access.scm 21 */
{ /* ./Object/java-access.scm 21 */
obj_t BgL_cportz00_587;
BgL_cportz00_587 = 
open_input_string(BGl_string2142z00zzobject_javazd2accesszd2); 
{ 
long BgL_iz00_588;
BgL_iz00_588 = ((long)0); 
BgL_loopz00_589:
{ /* ./Object/java-access.scm 21 */
bool_t BgL_test2144z00_590;
BgL_test2144z00_590 = 
(BgL_iz00_588==((long)-1)); 
if(BgL_test2144z00_590)
{ /* ./Object/java-access.scm 21 */
return BUNSPEC;}  else 
{ /* ./Object/java-access.scm 21 */
{ /* ./Object/java-access.scm 21 */
obj_t BgL_arg2146z00_591;
{ /* ./Object/java-access.scm 21 */
obj_t BgL_list2149z00_592;
BgL_list2149z00_592 = 
MAKE_PAIR(BgL_cportz00_587, BNIL); 
BgL_arg2146z00_591 = 
BGl_readz00zz__readerz00(BgL_list2149z00_592); } 
{ /* ./Object/java-access.scm 21 */
int BgL_auxz00_610;
BgL_auxz00_610 = 
(int)(BgL_iz00_588); 
CNST_TABLE_SET(BgL_auxz00_610, BgL_arg2146z00_591); } } 
{ /* ./Object/java-access.scm 21 */
int BgL_auxz00_593;
{ /* ./Object/java-access.scm 21 */
long BgL_auxz00_613;
BgL_auxz00_613 = 
(BgL_iz00_588-((long)1)); 
BgL_auxz00_593 = 
(int)(BgL_auxz00_613); } 
{ 
long BgL_iz00_616;
BgL_iz00_616 = 
(long)(BgL_auxz00_593); 
BgL_iz00_588 = BgL_iz00_616; 
goto BgL_loopz00_589;} } } } } } } 
}



/* import-java-class-accessors! */
BGL_EXPORTED_DEF obj_t BGl_importzd2javazd2classzd2accessorsz12zc0zzobject_javazd2accesszd2(obj_t BgL_pslotsz00_1, obj_t BgL_constrsz00_2, BgL_jclassz00_bglt BgL_classz00_3, bool_t BgL_abstractzf3zf3_4, obj_t BgL_modulez00_5, obj_t BgL_srcz00_6)
{ AN_OBJECT;
{ /* ./Object/java-access.scm 49 */
{ /* ./Object/java-access.scm 51 */
bool_t BgL_test1890z00_377;
BgL_test1890z00_377 = 
BGl_correctzd2javazd2classzf3zf3zzobject_javazd2accesszd2(BgL_classz00_3, BgL_srcz00_6); 
if(BgL_test1890z00_377)
{ /* ./Object/java-access.scm 51 */
{ /* ./Object/java-access.scm 55 */
obj_t BgL_cslotsz00_562;
{ /* ./Object/java-access.scm 55 */
obj_t BgL_arg1951z00_563;
{ 
obj_t BgL_auxz00_620;
{ /* ./Object/java-access.scm 55 */
BgL_objectz00_bglt BgL_auxz00_621;
BgL_auxz00_621 = 
(BgL_objectz00_bglt)(BgL_classz00_3); 
BgL_auxz00_620 = 
BGL_OBJECT_WIDENING(BgL_auxz00_621); } 
BgL_arg1951z00_563 = 
(((BgL_jclassz00_bglt)CREF(BgL_auxz00_620))->BgL_itszd2superzd2); } 
BgL_cslotsz00_562 = 
BGl_makezd2javazd2classzd2slotszd2zzobject_slotsz00(BgL_classz00_3, BgL_pslotsz00_1, BgL_arg1951z00_563, BgL_srcz00_6); } 
{ /* ./Object/java-access.scm 55 */
obj_t BgL_val1701z00_566;
BgL_val1701z00_566 = BgL_cslotsz00_562; 
{ 
obj_t BgL_auxz00_626;
{ /* ./Object/java-access.scm 55 */
BgL_objectz00_bglt BgL_auxz00_627;
BgL_auxz00_627 = 
(BgL_objectz00_bglt)(BgL_classz00_3); 
BgL_auxz00_626 = 
BGL_OBJECT_WIDENING(BgL_auxz00_627); } 
((((BgL_jclassz00_bglt)CREF(BgL_auxz00_626))->BgL_slotsz00) = ((obj_t)BgL_val1701z00_566), BUNSPEC); } } } 
BGl_genzd2javazd2classzd2coercionsz12zc0zzobject_coercionz00(
(obj_t)(BgL_classz00_3)); 
{ /* ./Object/java-access.scm 60 */
obj_t BgL_fieldsz00_379;
{ /* ./Object/java-access.scm 60 */
obj_t BgL_arg1920z00_389;
{ 
obj_t BgL_auxz00_633;
{ /* ./Object/java-access.scm 60 */
BgL_objectz00_bglt BgL_auxz00_634;
BgL_auxz00_634 = 
(BgL_objectz00_bglt)(BgL_classz00_3); 
BgL_auxz00_633 = 
BGL_OBJECT_WIDENING(BgL_auxz00_634); } 
BgL_arg1920z00_389 = 
(((BgL_jclassz00_bglt)CREF(BgL_auxz00_633))->BgL_slotsz00); } 
BgL_fieldsz00_379 = 
BGl_genzd2javazd2classzd2slotszd2accessz12z12zzobject_getterz00(BgL_classz00_3, BgL_arg1920z00_389, BgL_srcz00_6); } 
{ /* ./Object/java-access.scm 61 */
bool_t BgL_test1893z00_380;
{ /* ./Object/java-access.scm 61 */
obj_t BgL_auxz00_642;obj_t BgL_auxz00_639;
BgL_auxz00_642 = 
CNST_TABLE_REF(((long)0)); 
{ /* ./Object/java-access.scm 61 */
BgL_typez00_bglt BgL_obj1003z00_568;
BgL_obj1003z00_568 = 
(BgL_typez00_bglt)(BgL_classz00_3); 
BgL_auxz00_639 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_568))->BgL_idz00); } 
BgL_test1893z00_380 = 
(BgL_auxz00_639==BgL_auxz00_642); } 
if(BgL_test1893z00_380)
{ /* ./Object/java-access.scm 61 */
return BgL_fieldsz00_379;}  else 
{ /* ./Object/java-access.scm 63 */
obj_t BgL_predz00_381;
BgL_predz00_381 = 
BGl_importzd2javazd2classzd2predz12zc0zzobject_predicatez00(BgL_classz00_3, BgL_srcz00_6, BgL_modulez00_5); 
if(BgL_abstractzf3zf3_4)
{ /* ./Object/java-access.scm 64 */
return 
bgl_append2(BgL_predz00_381, BgL_fieldsz00_379);}  else 
{ /* ./Object/java-access.scm 66 */
obj_t BgL_constz00_382;
BgL_constz00_382 = 
BGl_genzd2javazd2classzd2constructorszd2zzobject_creatorz00(BgL_classz00_3, BgL_constrsz00_2, BgL_srcz00_6); 
{ /* ./Object/java-access.scm 66 */
obj_t BgL_creatorz00_383;
BgL_creatorz00_383 = 
BGl_importzd2javazd2classzd2creatorzd2zzobject_creatorz00(BgL_classz00_3, BgL_constrsz00_2, BgL_srcz00_6); 
{ /* ./Object/java-access.scm 69 */

return 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_predz00_381, 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_creatorz00_383, 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_fieldsz00_379, 
BGl_eappendzd22zd2zz__r4_pairs_and_lists_6_3z00(BgL_constz00_382, BNIL))));} } } } } } }  else 
{ /* ./Object/java-access.scm 51 */
return BNIL;} } } 
}



/* _import-java-class-accessors!2126 */
obj_t BGl__importzd2javazd2classzd2accessorsz122126zc0zzobject_javazd2accesszd2(obj_t BgL_envz00_580, obj_t BgL_pslotsz00_581, obj_t BgL_constrsz00_582, obj_t BgL_classz00_583, obj_t BgL_abstractzf3zf3_584, obj_t BgL_modulez00_585, obj_t BgL_srcz00_586)
{ AN_OBJECT;
{ /* ./Object/java-access.scm 49 */
return 
BGl_importzd2javazd2classzd2accessorsz12zc0zzobject_javazd2accesszd2(BgL_pslotsz00_581, BgL_constrsz00_582, 
(BgL_jclassz00_bglt)(BgL_classz00_583), 
CBOOL(BgL_abstractzf3zf3_584), BgL_modulez00_585, BgL_srcz00_586);} 
}



/* correct-java-class? */
bool_t BGl_correctzd2javazd2classzf3zf3zzobject_javazd2accesszd2(BgL_jclassz00_bglt BgL_classz00_8, obj_t BgL_srcz00_9)
{ AN_OBJECT;
{ /* ./Object/java-access.scm 91 */
{ /* ./Object/java-access.scm 92 */
obj_t BgL_superz00_392;obj_t BgL_classzd2idzd2_393;
{ 
obj_t BgL_auxz00_658;
{ /* ./Object/java-access.scm 92 */
BgL_objectz00_bglt BgL_auxz00_659;
BgL_auxz00_659 = 
(BgL_objectz00_bglt)(BgL_classz00_8); 
BgL_auxz00_658 = 
BGL_OBJECT_WIDENING(BgL_auxz00_659); } 
BgL_superz00_392 = 
(((BgL_jclassz00_bglt)CREF(BgL_auxz00_658))->BgL_itszd2superzd2); } 
{ /* ./Object/java-access.scm 93 */
BgL_typez00_bglt BgL_obj1003z00_570;
BgL_obj1003z00_570 = 
(BgL_typez00_bglt)(BgL_classz00_8); 
BgL_classzd2idzd2_393 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_570))->BgL_idz00); } 
{ /* ./Object/java-access.scm 97 */
bool_t BgL_test1925z00_394;
{ /* ./Object/java-access.scm 97 */
bool_t BgL_test1942z00_401;
BgL_test1942z00_401 = 
BGl_iszd2azf3z21zz__objectz00(BgL_superz00_392, BGl_typez00zztype_typez00); 
if(BgL_test1942z00_401)
{ /* ./Object/java-access.scm 97 */
bool_t BgL_test1943z00_402;
BgL_test1943z00_402 = 
BGl_iszd2azf3z21zz__objectz00(BgL_superz00_392, BGl_jclassz00zzobject_classz00); 
if(BgL_test1943z00_402)
{ /* ./Object/java-access.scm 97 */
BgL_test1925z00_394 = ((bool_t)0); }  else 
{ /* ./Object/java-access.scm 97 */
BgL_test1925z00_394 = ((bool_t)1); } }  else 
{ /* ./Object/java-access.scm 97 */
BgL_test1925z00_394 = ((bool_t)0); } } 
if(BgL_test1925z00_394)
{ /* ./Object/java-access.scm 97 */
{ /* ./Object/java-access.scm 98 */
obj_t BgL_arg1928z00_395;obj_t BgL_arg1930z00_396;
{ /* ./Object/java-access.scm 98 */
BgL_typez00_bglt BgL_obj1003z00_573;
BgL_obj1003z00_573 = 
(BgL_typez00_bglt)(BgL_superz00_392); 
BgL_arg1928z00_395 = 
(((BgL_typez00_bglt)CREF(BgL_obj1003z00_573))->BgL_idz00); } 
{ /* ./Object/java-access.scm 99 */
obj_t BgL_arg1938z00_399;
BgL_arg1938z00_399 = 
SYMBOL_TO_STRING(BgL_classzd2idzd2_393); 
BgL_arg1930z00_396 = 
string_append_3(BGl_string2140z00zzobject_javazd2accesszd2, BgL_arg1938z00_399, BGl_string2141z00zzobject_javazd2accesszd2); } 
{ /* ./Object/java-access.scm 98 */
obj_t BgL_list1932z00_397;
BgL_list1932z00_397 = 
MAKE_PAIR(BGl_typez00zztype_typez00, BNIL); 
BGl_userzd2errorzd2zztools_errorz00(BgL_arg1928z00_395, BgL_arg1930z00_396, BgL_srcz00_9, BgL_list1932z00_397); } } 
return ((bool_t)0);}  else 
{ /* ./Object/java-access.scm 97 */
return ((bool_t)1);} } } } 
}



/* method-init */
obj_t BGl_methodzd2initzd2zzobject_javazd2accesszd2()
{ AN_OBJECT;
{ /* ./Object/java-access.scm 21 */
return BUNSPEC;} 
}



/* imported-modules-init */
obj_t BGl_importedzd2moduleszd2initz00zzobject_javazd2accesszd2()
{ AN_OBJECT;
{ /* ./Object/java-access.scm 21 */
BGl_modulezd2initializa7ationz75zztools_tracez00(((long)59211), "object_java-access"); 
BGl_modulezd2initializa7ationz75zztools_errorz00(((long)25566), "object_java-access"); 
BGl_modulezd2initializa7ationz75zztools_miscz00(((long)64117), "object_java-access"); 
BGl_modulezd2initializa7ationz75zztype_typez00(((long)19090), "object_java-access"); 
BGl_modulezd2initializa7ationz75zztype_envz00(((long)25186), "object_java-access"); 
BGl_modulezd2initializa7ationz75zztype_toolsz00(((long)15091), "object_java-access"); 
BGl_modulezd2initializa7ationz75zztype_cachez00(((long)25848), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzast_varz00(((long)44246), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzast_identz00(((long)51504), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_classz00(((long)30791), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_structz00(((long)41062), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_slotsz00(((long)44183), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_toolsz00(((long)58597), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_getterz00(((long)33088), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_creatorz00(((long)1891), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_predicatez00(((long)48253), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzobject_coercionz00(((long)14986), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzmodule_modulez00(((long)8699), "object_java-access"); 
BGl_modulezd2initializa7ationz75zzmodule_impusez00(((long)12782), "object_java-access"); 
return 
BGl_modulezd2initializa7ationz75zzengine_paramz00(((long)14260), "object_java-access");} 
}

