/*===========================================================================*/
/*   (Llib/type.scm)                                                         */
/*   Bigloo (2.6b)                                                           */
/*   Inria -- Sophia Antipolis (c)       Mon Dec 15 12:14:36 CET 2003        */
/*===========================================================================*/
/* COMPILATION: (/users/serrano/prgm/project/bigloo/bin/bigloo -O3 -mklib -cc gcc-2.95 -fsharing -q -rm -s -unsafev -eval (set! *indent* 4) -copt -DBGL_NO_PIC -g -c Llib/type.scm -indent -o objs/obj_s/Llib/type.c)*/
/* GC selection */
#define THE_GC BOEHM_GC

/* debug mode */
#define BIGLOO_DEBUG 1

#include <bigloo.h>
#include <signal.h>

BGL_EXPORTED_DECL obj_t BGl_modulezd2initializa7ationz75zz__typez00(long, char *);
static obj_t BGl_cnstzd2initzd2zz__typez00();
extern obj_t string_to_symbol(char *);
static obj_t BGl_requirezd2initializa7ationz75zz__typez00 = BUNSPEC;
static obj_t BGl_symbol1698z00zz__typez00 = BUNSPEC;
static obj_t BGl_toplevelzd2initzd2zz__typez00();
static obj_t *__cnst;





/* module-initialization */
BGL_EXPORTED_DEF obj_t BGl_modulezd2initializa7ationz75zz__typez00(long BgL_checksumz00_527, char * BgL_fromz00_528)
{ AN_OBJECT;
{ 
if(
CBOOL(BGl_requirezd2initializa7ationz75zz__typez00))
{ 
BGl_requirezd2initializa7ationz75zz__typez00 = 
BBOOL(((bool_t)0)); 
BGl_cnstzd2initzd2zz__typez00(); 
BGl_toplevelzd2initzd2zz__typez00(); 
return BUNSPEC;}  else 
{ 
return BUNSPEC;} } 
}



/* cnst-init */
obj_t BGl_cnstzd2initzd2zz__typez00()
{ AN_OBJECT;
{ /* ./Llib/type.scm 14 */
return ( 
BGl_symbol1698z00zz__typez00 = 
string_to_symbol("%toplevel@__type"), BUNSPEC) ;} 
}



/* toplevel-init */
obj_t BGl_toplevelzd2initzd2zz__typez00()
{ AN_OBJECT;
{ /* ./Llib/type.scm 14 */
{ /* ./Llib/type.scm 14 */
obj_t BgL_symbol1695z00_525;
BgL_symbol1695z00_525 = BGl_symbol1698z00zz__typez00; 
{ /* ./Llib/type.scm 14 */

PUSH_TRACE(BgL_symbol1695z00_525); BUNSPEC; 
POP_TRACE(); 
return BUNSPEC;} } } 
}

