/* Generated automatically from libmisc.scm.  DO NOT EDIT */
#define LIBGAUCHE_BODY 
#include <gauche.h>
#include <gauche/code.h>

#line 36 "libmisc.scm"
#include <gauche/vminsn.h>

static ScmObj libmischas_setterP(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmischas_setterP__STUB, 1, 0,SCM_FALSE,libmischas_setterP, NULL, NULL);

static ScmObj libmiscundefined(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmiscundefined__STUB, 0, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmiscundefined, SCM_MAKE_INT(SCM_VM_CONSTU), NULL);

static ScmObj libmiscundefinedP(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmiscundefinedP__STUB, 1, 0,1, SCM_FALSE,0, libmiscundefinedP, NULL, NULL);

static ScmObj libmisc_25uninitialized(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmisc_25uninitialized__STUB, 0, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmisc_25uninitialized, NULL, NULL);

static ScmObj libmiscdebug_label(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmiscdebug_label__STUB, 1, 0,SCM_FALSE,libmiscdebug_label, NULL, NULL);

static ScmObj libmiscforeign_pointer_invalidP(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmiscforeign_pointer_invalidP__STUB, 1, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmiscforeign_pointer_invalidP, NULL, NULL);

static ScmObj libmiscforeign_pointer_invalidateX(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmiscforeign_pointer_invalidateX__STUB, 1, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmiscforeign_pointer_invalidateX, NULL, NULL);

static ScmObj libmiscforeign_pointer_attributes(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmiscforeign_pointer_attributes__STUB, 1, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmiscforeign_pointer_attributes, NULL, NULL);

static ScmObj libmiscforeign_pointer_attribute_get(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmiscforeign_pointer_attribute_get__STUB, 2, 2,SCM_FALSE,libmiscforeign_pointer_attribute_get, NULL, NULL);

static ScmObj libmiscforeign_pointer_attribute_setX(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmiscforeign_pointer_attribute_setX__STUB, 3, 0,SCM_FALSE,libmiscforeign_pointer_attribute_setX, NULL, NULL);

static ScmObj libmisccond_features(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmisccond_features__STUB, 0, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmisccond_features, NULL, NULL);

#if defined(__CYGWIN__) || defined(GAUCHE_WINDOWS)
#define SCM_CGEN_CONST /*empty*/
#else
#define SCM_CGEN_CONST const
#endif
static SCM_CGEN_CONST struct scm__scRec {
  ScmString d1612[42];
} scm__sc SCM_UNUSED = {
  {   /* ScmString d1612 */
      SCM_STRING_CONST_INITIALIZER("has-setter\077", 11, 11),
      SCM_STRING_CONST_INITIALIZER("proc", 4, 4),
      SCM_STRING_CONST_INITIALIZER("source-info", 11, 11),
      SCM_STRING_CONST_INITIALIZER("libmisc.scm", 11, 11),
      SCM_STRING_CONST_INITIALIZER("bind-info", 9, 9),
      SCM_STRING_CONST_INITIALIZER("gauche", 6, 6),
      SCM_STRING_CONST_INITIALIZER("<top>", 5, 5),
      SCM_STRING_CONST_INITIALIZER("->", 2, 2),
      SCM_STRING_CONST_INITIALIZER("<boolean>", 9, 9),
      SCM_STRING_CONST_INITIALIZER("undefined", 9, 9),
      SCM_STRING_CONST_INITIALIZER("undefined\077", 10, 10),
      SCM_STRING_CONST_INITIALIZER("obj", 3, 3),
      SCM_STRING_CONST_INITIALIZER("warn", 4, 4),
      SCM_STRING_CONST_INITIALIZER("GAUCHE_SUPPRESS_WARNING", 23, 23),
      SCM_STRING_CONST_INITIALIZER("sys-getenv", 10, 10),
      SCM_STRING_CONST_INITIALIZER("format", 6, 6),
      SCM_STRING_CONST_INITIALIZER("WARNING: ", 9, 9),
      SCM_STRING_CONST_INITIALIZER("string-append", 13, 13),
      SCM_STRING_CONST_INITIALIZER("flush", 5, 5),
      SCM_STRING_CONST_INITIALIZER("fmt", 3, 3),
      SCM_STRING_CONST_INITIALIZER("args", 4, 4),
      SCM_STRING_CONST_INITIALIZER("unused-args", 11, 11),
      SCM_STRING_CONST_INITIALIZER("%uninitialized", 14, 14),
      SCM_STRING_CONST_INITIALIZER("gauche.internal", 15, 15),
      SCM_STRING_CONST_INITIALIZER("debug-label", 11, 11),
      SCM_STRING_CONST_INITIALIZER("foreign-pointer-invalid\077", 24, 24),
      SCM_STRING_CONST_INITIALIZER("fp", 2, 2),
      SCM_STRING_CONST_INITIALIZER("<foreign-pointer>", 17, 17),
      SCM_STRING_CONST_INITIALIZER("foreign-pointer-invalidate!", 27, 27),
      SCM_STRING_CONST_INITIALIZER("<void>", 6, 6),
      SCM_STRING_CONST_INITIALIZER("foreign-pointer-attributes", 26, 26),
      SCM_STRING_CONST_INITIALIZER("foreign-pointer-attribute-get", 29, 29),
      SCM_STRING_CONST_INITIALIZER("key", 3, 3),
      SCM_STRING_CONST_INITIALIZER("optional", 8, 8),
      SCM_STRING_CONST_INITIALIZER("fallback", 8, 8),
      SCM_STRING_CONST_INITIALIZER("*", 1, 1),
      SCM_STRING_CONST_INITIALIZER("foreign-pointer-attribute-set!", 30, 30),
      SCM_STRING_CONST_INITIALIZER("value", 5, 5),
      SCM_STRING_CONST_INITIALIZER("foreign-pointer-attribute-set", 29, 29),
      SCM_STRING_CONST_INITIALIZER("%toplevel", 9, 9),
      SCM_STRING_CONST_INITIALIZER("cond-features", 13, 13),
      SCM_STRING_CONST_INITIALIZER("SLIB_DIR", 8, 8),
  },
};
static struct scm__rcRec {
  ScmCompiledCode d1616[2];
  ScmWord d1615[33];
  ScmPair d1614[95] SCM_ALIGN_PAIR;
  ScmObj d1613[123];
} scm__rc SCM_UNUSED = {
  {   /* ScmCompiledCode d1616 */
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* warn */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1615[0])), 28,
            20, 1, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1614[30]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %toplevel */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1615[28])), 5,
            0, 0, 0, SCM_FALSE, SCM_NIL, SCM_FALSE,
            SCM_FALSE, SCM_FALSE),
  },
  {   /* ScmWord d1615 */
    /* warn */
    0x0000100e    /*   0 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]) + 6),
    0x00000006    /*   2 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1612[13])) /* "GAUCHE_SUPPRESS_WARNING" */,
    0x0000105f    /*   4 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#sys-getenv.fa6cae0> */,
    0x0000001e    /*   6 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]) + 9),
    0x0000000c    /*   8 (CONSTU-RET) */,
    0x0000000e    /*   9 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]) + 24),
    0x0000005e    /*  11 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#format.fa6c9c0> */,
    0x000000e0    /*  13 (CURERR) */,
    0x0000200f    /*  14 (PUSH-PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]) + 21),
    0x00000006    /*  16 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1612[16])) /* "WARNING: " */,
    0x00000049    /*  18 (LREF1-PUSH) */,
    0x0000205f    /*  19 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#string-append.fa6c960> */,
    0x0000000d    /*  21 (PUSH) */,
    0x0000003d    /*  22 (LREF0) */,
    0x00004095    /*  23 (TAIL-APPLY 4) */,
    0x000000e0    /*  24 (CURERR) */,
    0x00001063    /*  25 (PUSH-GREF-TAIL-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#flush.fa6c800> */,
    0x00000014    /*  27 (RET) */,
    /* %toplevel */
    0x0000005d    /*   0 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#foreign-pointer-attribute-set!.f1a6540> */,
    0x00000015    /*   2 (DEFINE 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#foreign-pointer-attribute-set.f1a6660> */,
    0x00000014    /*   4 (RET) */,
  },
  {   /* ScmPair d1614 */
       { SCM_NIL, SCM_NIL },
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(44U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[2])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[3])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[5])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[6])},
       { SCM_OBJ(&scm__rc.d1614[7]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[4]), SCM_OBJ(&scm__rc.d1614[8])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[10])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[11])},
       { SCM_OBJ(&scm__rc.d1614[12]), SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(47U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[15])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[16])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[18])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[19])},
       { SCM_OBJ(&scm__rc.d1614[20]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[17]), SCM_OBJ(&scm__rc.d1614[21])},
       { SCM_UNDEFINED, SCM_UNDEFINED},
       { SCM_MAKE_INT(49U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[24])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[25])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[27]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[26]), SCM_OBJ(&scm__rc.d1614[28])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[31])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[32])},
       { SCM_OBJ(&scm__rc.d1614[33]), SCM_NIL},
       { SCM_MAKE_INT(61U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[35])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[36])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[38])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[39])},
       { SCM_OBJ(&scm__rc.d1614[40]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[37]), SCM_OBJ(&scm__rc.d1614[41])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(67U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[44])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[45])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[47])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[48])},
       { SCM_OBJ(&scm__rc.d1614[49]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[46]), SCM_OBJ(&scm__rc.d1614[50])},
       { SCM_MAKE_INT(70U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[52])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[53])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[55])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[56])},
       { SCM_OBJ(&scm__rc.d1614[57]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[54]), SCM_OBJ(&scm__rc.d1614[58])},
       { SCM_MAKE_INT(73U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[60])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[61])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[63])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[64])},
       { SCM_OBJ(&scm__rc.d1614[65]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[62]), SCM_OBJ(&scm__rc.d1614[66])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[68])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[69])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[70])},
       { SCM_MAKE_INT(76U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[72])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[73])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[75])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[76])},
       { SCM_OBJ(&scm__rc.d1614[77]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[74]), SCM_OBJ(&scm__rc.d1614[78])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[80])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[81])},
       { SCM_MAKE_INT(80U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1612[3]), SCM_OBJ(&scm__rc.d1614[83])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[84])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[86])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[87])},
       { SCM_OBJ(&scm__rc.d1614[88]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1614[85]), SCM_OBJ(&scm__rc.d1614[89])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[91])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1614[92])},
       { SCM_OBJ(&scm__rc.d1614[93]), SCM_NIL},
  },
  {   /* ScmObj d1613 */
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(4, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(4, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(7, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(7, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
  },
};

static ScmObj libmischas_setterP(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj proc_scm;
  ScmObj proc;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("has-setter?");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  proc_scm = SCM_SUBRARGS[0];
  if (!(proc_scm)) Scm_Error("scheme object required, but got %S", proc_scm);
  proc = (proc_scm);
  {
{
int SCM_RESULT;
{SCM_RESULT=(Scm_HasSetter(proc));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_MAKE_BOOL(SCM_RESULT));
}
  }
}


static ScmObj libmiscundefined(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  SCM_ENTER_SUBR("undefined");
  {
{
ScmObj SCM_RESULT;

#line 46 "libmisc.scm"
{SCM_RESULT=(SCM_UNDEFINED);goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmiscundefinedP(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj obj_scm;
  ScmObj obj;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("undefined?");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  obj_scm = SCM_SUBRARGS[0];
  if (!(obj_scm)) Scm_Error("scheme object required, but got %S", obj_scm);
  obj = (obj_scm);
  {
{
int SCM_RESULT;
{SCM_RESULT=(SCM_UNDEFINEDP(obj));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_MAKE_BOOL(SCM_RESULT));
}
  }
}


static ScmObj libmisc_25uninitialized(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  SCM_ENTER_SUBR("%uninitialized");
  {
{
ScmObj SCM_RESULT;

#line 57 "libmisc.scm"
{SCM_RESULT=(SCM_UNINITIALIZED);goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmiscdebug_label(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj obj_scm;
  ScmObj obj;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("debug-label");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  obj_scm = SCM_SUBRARGS[0];
  if (!(obj_scm)) Scm_Error("scheme object required, but got %S", obj_scm);
  obj = (obj_scm);
  {
{
ScmObj SCM_RESULT;

#line 61 "libmisc.scm"
{SCM_RESULT=(Scm_Sprintf("@%lx",obj));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmiscforeign_pointer_invalidP(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj fp_scm;
  ScmForeignPointer* fp;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("foreign-pointer-invalid?");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  fp_scm = SCM_SUBRARGS[0];
  if (!SCM_FOREIGN_POINTER_P(fp_scm)) Scm_Error("<foreign-pointer> required, but got %S", fp_scm);
  fp = SCM_FOREIGN_POINTER(fp_scm);
  {
{
int SCM_RESULT;
{SCM_RESULT=(Scm_ForeignPointerInvalidP(fp));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_MAKE_BOOL(SCM_RESULT));
}
  }
}


static ScmObj libmiscforeign_pointer_invalidateX(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj fp_scm;
  ScmForeignPointer* fp;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("foreign-pointer-invalidate!");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  fp_scm = SCM_SUBRARGS[0];
  if (!SCM_FOREIGN_POINTER_P(fp_scm)) Scm_Error("<foreign-pointer> required, but got %S", fp_scm);
  fp = SCM_FOREIGN_POINTER(fp_scm);
  {
Scm_ForeignPointerInvalidate(fp);
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_UNDEFINED);
  }
}


static ScmObj libmiscforeign_pointer_attributes(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj fp_scm;
  ScmForeignPointer* fp;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("foreign-pointer-attributes");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  fp_scm = SCM_SUBRARGS[0];
  if (!SCM_FOREIGN_POINTER_P(fp_scm)) Scm_Error("<foreign-pointer> required, but got %S", fp_scm);
  fp = SCM_FOREIGN_POINTER(fp_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_ForeignPointerAttr(fp));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmiscforeign_pointer_attribute_get(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj fp_scm;
  ScmForeignPointer* fp;
  ScmObj key_scm;
  ScmObj key;
  ScmObj fallback_scm;
  ScmObj fallback;
  ScmObj SCM_SUBRARGS[4];
  SCM_ENTER_SUBR("foreign-pointer-attribute-get");
  if (SCM_ARGCNT >= 4
      && !SCM_NULLP(SCM_ARGREF(SCM_ARGCNT-1)))
    Scm_Error("too many arguments: up to 3 is expected, %d given.", SCM_ARGCNT + Scm_Length(SCM_ARGREF(SCM_ARGCNT-1)) - 1);
  for (int SCM_i=0; SCM_i<4; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  fp_scm = SCM_SUBRARGS[0];
  if (!SCM_FOREIGN_POINTER_P(fp_scm)) Scm_Error("<foreign-pointer> required, but got %S", fp_scm);
  fp = SCM_FOREIGN_POINTER(fp_scm);
  key_scm = SCM_SUBRARGS[1];
  if (!(key_scm)) Scm_Error("scheme object required, but got %S", key_scm);
  key = (key_scm);
  if (SCM_ARGCNT > 2+1) {
    fallback_scm = SCM_SUBRARGS[2];
  } else {
    fallback_scm = SCM_UNBOUND;
  }
  if (!(fallback_scm)) Scm_Error("scheme object required, but got %S", fallback_scm);
  fallback = (fallback_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_ForeignPointerAttrGet(fp,key,fallback));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmiscforeign_pointer_attribute_setX(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj fp_scm;
  ScmForeignPointer* fp;
  ScmObj key_scm;
  ScmObj key;
  ScmObj value_scm;
  ScmObj value;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("foreign-pointer-attribute-set!");
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  fp_scm = SCM_SUBRARGS[0];
  if (!SCM_FOREIGN_POINTER_P(fp_scm)) Scm_Error("<foreign-pointer> required, but got %S", fp_scm);
  fp = SCM_FOREIGN_POINTER(fp_scm);
  key_scm = SCM_SUBRARGS[1];
  if (!(key_scm)) Scm_Error("scheme object required, but got %S", key_scm);
  key = (key_scm);
  value_scm = SCM_SUBRARGS[2];
  if (!(value_scm)) Scm_Error("scheme object required, but got %S", value_scm);
  value = (value_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_ForeignPointerAttrSet(fp,key,value));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmisccond_features(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  SCM_ENTER_SUBR("cond-features");
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_GetFeatures());goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmCompiledCode *toplevels[] = {
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1616[1])),
 NULL /*termination*/
};
void Scm_Init_libmisc() {
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
  scm__rc.d1613[0] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[0])),TRUE); /* has-setter? */
  scm__rc.d1613[1] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[1])),TRUE); /* proc */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[1]), scm__rc.d1613[1]);
  scm__rc.d1613[2] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[2])),TRUE); /* source-info */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[4]), scm__rc.d1613[2]);
  scm__rc.d1613[3] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[4])),TRUE); /* bind-info */
  scm__rc.d1613[4] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[5])),TRUE); /* gauche */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[5]), scm__rc.d1613[0]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[6]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[7]), scm__rc.d1613[3]);
  scm__rc.d1613[5] = Scm_MakeExtendedPair(scm__rc.d1613[0], SCM_OBJ(&scm__rc.d1614[1]), SCM_OBJ(&scm__rc.d1614[9]));
  scm__rc.d1613[6] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[6])),TRUE); /* <top> */
  scm__rc.d1613[7] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[7])),TRUE); /* -> */
  scm__rc.d1613[8] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[8])),TRUE); /* <boolean> */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[9]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[9]))[4] = scm__rc.d1613[6];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[9]))[5] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[9]))[6] = scm__rc.d1613[8];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("has-setter?")), SCM_OBJ(&libmischas_setterP__STUB), 0);
  libmischas_setterP__STUB.common.info = scm__rc.d1613[5];
  libmischas_setterP__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[9]);
  scm__rc.d1613[16] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[9])),TRUE); /* undefined */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[10]), scm__rc.d1613[16]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[11]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[12]), scm__rc.d1613[3]);
  scm__rc.d1613[17] = Scm_MakeExtendedPair(scm__rc.d1613[16], SCM_NIL, SCM_OBJ(&scm__rc.d1614[13]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[18]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[18]))[4] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[18]))[5] = scm__rc.d1613[6];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("undefined")), SCM_OBJ(&libmiscundefined__STUB), SCM_BINDING_INLINABLE);
  libmiscundefined__STUB.common.info = scm__rc.d1613[17];
  libmiscundefined__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[18]);
  scm__rc.d1613[24] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[10])),TRUE); /* undefined? */
  scm__rc.d1613[25] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[11])),TRUE); /* obj */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[14]), scm__rc.d1613[25]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[17]), scm__rc.d1613[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[18]), scm__rc.d1613[24]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[19]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[20]), scm__rc.d1613[3]);
  scm__rc.d1613[26] = Scm_MakeExtendedPair(scm__rc.d1613[24], SCM_OBJ(&scm__rc.d1614[14]), SCM_OBJ(&scm__rc.d1614[22]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("undefined?")), SCM_OBJ(&libmiscundefinedP__STUB), SCM_BINDING_INLINABLE);
  libmiscundefinedP__STUB.common.info = scm__rc.d1613[26];
  libmiscundefinedP__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[9]);
  scm__rc.d1613[27] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[12])),TRUE); /* warn */
  scm__rc.d1613[29] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[14])),TRUE); /* sys-getenv */
  scm__rc.d1613[30] = SCM_OBJ(Scm_FindModule(SCM_SYMBOL(scm__rc.d1613[4]), SCM_FIND_MODULE_CREATE|SCM_FIND_MODULE_PLACEHOLDING)); /* module gauche */
  scm__rc.d1613[28] = Scm_MakeIdentifier(scm__rc.d1613[29], SCM_MODULE(scm__rc.d1613[30]), SCM_NIL); /* gauche#sys-getenv */
  scm__rc.d1613[32] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[15])),TRUE); /* format */
  scm__rc.d1613[31] = Scm_MakeIdentifier(scm__rc.d1613[32], SCM_MODULE(scm__rc.d1613[30]), SCM_NIL); /* gauche#format */
  scm__rc.d1613[34] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[17])),TRUE); /* string-append */
  scm__rc.d1613[33] = Scm_MakeIdentifier(scm__rc.d1613[34], SCM_MODULE(scm__rc.d1613[30]), SCM_NIL); /* gauche#string-append */
  scm__rc.d1613[36] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[18])),TRUE); /* flush */
  scm__rc.d1613[35] = Scm_MakeIdentifier(scm__rc.d1613[36], SCM_MODULE(scm__rc.d1613[30]), SCM_NIL); /* gauche#flush */
  scm__rc.d1613[37] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[19])),TRUE); /* fmt */
  scm__rc.d1613[38] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[20])),TRUE); /* args */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[23]), scm__rc.d1613[37]);
  SCM_SET_CDR(SCM_OBJ(&scm__rc.d1614[23]), scm__rc.d1613[38]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[26]), scm__rc.d1613[2]);
  scm__rc.d1613[39] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[21])),TRUE); /* unused-args */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[27]), scm__rc.d1613[39]);
  scm__rc.d1613[40] = Scm_MakeExtendedPair(scm__rc.d1613[27], SCM_OBJ(&scm__rc.d1614[23]), SCM_OBJ(&scm__rc.d1614[29]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[30]), scm__rc.d1613[40]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1616[0]))->name = scm__rc.d1613[27];/* warn */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]))[5] = SCM_WORD(scm__rc.d1613[28]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]))[12] = SCM_WORD(scm__rc.d1613[31]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]))[20] = SCM_WORD(scm__rc.d1613[33]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1615[0]))[26] = SCM_WORD(scm__rc.d1613[35]);
  ScmObj G1617 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1616[0]), NULL);

  Scm_MakeBinding(SCM_MODULE(Scm_CurrentModule()) /*  */, SCM_SYMBOL(scm__rc.d1613[27]) /* warn */, G1617,0);

   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1613[41] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[22])),TRUE); /* %uninitialized */
  scm__rc.d1613[42] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[23])),TRUE); /* gauche.internal */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[31]), scm__rc.d1613[41]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[32]), scm__rc.d1613[42]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[33]), scm__rc.d1613[3]);
  scm__rc.d1613[43] = Scm_MakeExtendedPair(scm__rc.d1613[41], SCM_NIL, SCM_OBJ(&scm__rc.d1614[34]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[44]))[3] = scm__rc.d1613[42];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[44]))[4] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[44]))[5] = scm__rc.d1613[6];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("%uninitialized")), SCM_OBJ(&libmisc_25uninitialized__STUB), 0);
  libmisc_25uninitialized__STUB.common.info = scm__rc.d1613[43];
  libmisc_25uninitialized__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[44]);
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
  scm__rc.d1613[50] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[24])),TRUE); /* debug-label */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[37]), scm__rc.d1613[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[38]), scm__rc.d1613[50]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[39]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[40]), scm__rc.d1613[3]);
  scm__rc.d1613[51] = Scm_MakeExtendedPair(scm__rc.d1613[50], SCM_OBJ(&scm__rc.d1614[14]), SCM_OBJ(&scm__rc.d1614[42]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[52]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[52]))[4] = scm__rc.d1613[6];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[52]))[5] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[52]))[6] = scm__rc.d1613[6];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("debug-label")), SCM_OBJ(&libmiscdebug_label__STUB), 0);
  libmiscdebug_label__STUB.common.info = scm__rc.d1613[51];
  libmiscdebug_label__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[52]);
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
  scm__rc.d1613[59] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[25])),TRUE); /* foreign-pointer-invalid? */
  scm__rc.d1613[60] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[26])),TRUE); /* fp */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[43]), scm__rc.d1613[60]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[46]), scm__rc.d1613[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[47]), scm__rc.d1613[59]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[48]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[49]), scm__rc.d1613[3]);
  scm__rc.d1613[61] = Scm_MakeExtendedPair(scm__rc.d1613[59], SCM_OBJ(&scm__rc.d1614[43]), SCM_OBJ(&scm__rc.d1614[51]));
  scm__rc.d1613[62] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[27])),TRUE); /* <foreign-pointer> */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[63]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[63]))[4] = scm__rc.d1613[62];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[63]))[5] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[63]))[6] = scm__rc.d1613[8];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("foreign-pointer-invalid?")), SCM_OBJ(&libmiscforeign_pointer_invalidP__STUB), 0);
  libmiscforeign_pointer_invalidP__STUB.common.info = scm__rc.d1613[61];
  libmiscforeign_pointer_invalidP__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[63]);
  scm__rc.d1613[70] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[28])),TRUE); /* foreign-pointer-invalidate! */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[54]), scm__rc.d1613[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[55]), scm__rc.d1613[70]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[56]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[57]), scm__rc.d1613[3]);
  scm__rc.d1613[71] = Scm_MakeExtendedPair(scm__rc.d1613[70], SCM_OBJ(&scm__rc.d1614[43]), SCM_OBJ(&scm__rc.d1614[59]));
  scm__rc.d1613[72] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[29])),TRUE); /* <void> */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[73]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[73]))[4] = scm__rc.d1613[62];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[73]))[5] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[73]))[6] = scm__rc.d1613[72];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("foreign-pointer-invalidate!")), SCM_OBJ(&libmiscforeign_pointer_invalidateX__STUB), 0);
  libmiscforeign_pointer_invalidateX__STUB.common.info = scm__rc.d1613[71];
  libmiscforeign_pointer_invalidateX__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[73]);
  scm__rc.d1613[80] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[30])),TRUE); /* foreign-pointer-attributes */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[62]), scm__rc.d1613[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[63]), scm__rc.d1613[80]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[64]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[65]), scm__rc.d1613[3]);
  scm__rc.d1613[81] = Scm_MakeExtendedPair(scm__rc.d1613[80], SCM_OBJ(&scm__rc.d1614[43]), SCM_OBJ(&scm__rc.d1614[67]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[82]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[82]))[4] = scm__rc.d1613[62];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[82]))[5] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[82]))[6] = scm__rc.d1613[6];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("foreign-pointer-attributes")), SCM_OBJ(&libmiscforeign_pointer_attributes__STUB), 0);
  libmiscforeign_pointer_attributes__STUB.common.info = scm__rc.d1613[81];
  libmiscforeign_pointer_attributes__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[82]);
  scm__rc.d1613[89] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[31])),TRUE); /* foreign-pointer-attribute-get */
  scm__rc.d1613[90] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[32])),TRUE); /* key */
  scm__rc.d1613[91] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1612[33]))); /* :optional */
  scm__rc.d1613[92] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[34])),TRUE); /* fallback */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[68]), scm__rc.d1613[92]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[69]), scm__rc.d1613[91]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[70]), scm__rc.d1613[90]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[71]), scm__rc.d1613[60]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[74]), scm__rc.d1613[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[75]), scm__rc.d1613[89]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[76]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[77]), scm__rc.d1613[3]);
  scm__rc.d1613[93] = Scm_MakeExtendedPair(scm__rc.d1613[89], SCM_OBJ(&scm__rc.d1614[71]), SCM_OBJ(&scm__rc.d1614[79]));
  scm__rc.d1613[94] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[35])),TRUE); /* * */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[95]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[95]))[4] = scm__rc.d1613[62];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[95]))[5] = scm__rc.d1613[6];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[95]))[6] = scm__rc.d1613[94];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[95]))[7] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[95]))[8] = scm__rc.d1613[6];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("foreign-pointer-attribute-get")), SCM_OBJ(&libmiscforeign_pointer_attribute_get__STUB), 0);
  libmiscforeign_pointer_attribute_get__STUB.common.info = scm__rc.d1613[93];
  libmiscforeign_pointer_attribute_get__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[95]);
  scm__rc.d1613[104] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[36])),TRUE); /* foreign-pointer-attribute-set! */
  scm__rc.d1613[105] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[37])),TRUE); /* value */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[80]), scm__rc.d1613[105]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[81]), scm__rc.d1613[90]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[82]), scm__rc.d1613[60]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[85]), scm__rc.d1613[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[86]), scm__rc.d1613[104]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[87]), scm__rc.d1613[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[88]), scm__rc.d1613[3]);
  scm__rc.d1613[106] = Scm_MakeExtendedPair(scm__rc.d1613[104], SCM_OBJ(&scm__rc.d1614[82]), SCM_OBJ(&scm__rc.d1614[90]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[107]))[3] = scm__rc.d1613[4];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[107]))[4] = scm__rc.d1613[62];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[107]))[5] = scm__rc.d1613[6];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[107]))[6] = scm__rc.d1613[6];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[107]))[7] = scm__rc.d1613[7];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1613[107]))[8] = scm__rc.d1613[6];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("foreign-pointer-attribute-set!")), SCM_OBJ(&libmiscforeign_pointer_attribute_setX__STUB), 0);
  libmiscforeign_pointer_attribute_setX__STUB.common.info = scm__rc.d1613[106];
  libmiscforeign_pointer_attribute_setX__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[107]);
  scm__rc.d1613[116] = Scm_MakeIdentifier(scm__rc.d1613[104], SCM_MODULE(scm__rc.d1613[30]), SCM_NIL); /* gauche#foreign-pointer-attribute-set! */
  scm__rc.d1613[118] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[38])),TRUE); /* foreign-pointer-attribute-set */
  scm__rc.d1613[117] = Scm_MakeIdentifier(scm__rc.d1613[118], SCM_MODULE(scm__rc.d1613[30]), SCM_NIL); /* gauche#foreign-pointer-attribute-set */
  scm__rc.d1613[119] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[39])),TRUE); /* %toplevel */
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1616[1]))->name = scm__rc.d1613[119];/* %toplevel */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1615[28]))[1] = SCM_WORD(scm__rc.d1613[116]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1615[28]))[3] = SCM_WORD(scm__rc.d1613[117]);
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1613[120] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[40])),TRUE); /* cond-features */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[91]), scm__rc.d1613[120]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[92]), scm__rc.d1613[42]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1614[93]), scm__rc.d1613[3]);
  scm__rc.d1613[121] = Scm_MakeExtendedPair(scm__rc.d1613[120], SCM_NIL, SCM_OBJ(&scm__rc.d1614[94]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("cond-features")), SCM_OBJ(&libmisccond_features__STUB), 0);
  libmisccond_features__STUB.common.info = scm__rc.d1613[121];
  libmisccond_features__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1613[44]);
  scm__rc.d1613[122] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1612[41])),TRUE); /* SLIB_DIR */
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(scm__rc.d1613[122]), 
#line 94 "libmisc.scm"
SCM_MAKE_STR_IMMUTABLE(SLIB_DIR), SCM_BINDING_CONST);

  Scm_VMExecuteToplevels(toplevels);
}
