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

#line 40 "libalpha.scm"
#include <gauche/vminsn.h>
#include <gauche/priv/macroP.h>


static ScmObj libalphamake_vector(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphamake_vector__STUB, 1, 2,SCM_FALSE,libalphamake_vector, NULL, NULL);


static ScmObj libalphagetter_with_setter(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libalphagetter_with_setter__STUB, 2, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libalphagetter_with_setter, NULL, NULL);


static ScmObj libalphasetter_SETTER(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphasetter_SETTER__STUB, 2, 0,SCM_FALSE,libalphasetter_SETTER, NULL, NULL);


static ScmObj libalphasetter(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphasetter__STUB, 1, 0,SCM_FALSE,libalphasetter, SCM_MAKE_INT(SCM_VM_SETTER), NULL);


static ScmObj libalphabox(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphabox__STUB, 0, 2,SCM_FALSE,libalphabox, NULL, NULL);


static ScmObj libalphaboxP(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphaboxP__STUB, 1, 0,SCM_FALSE,libalphaboxP, NULL, NULL);


static ScmObj libalphaunbox(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphaunbox__STUB, 1, 0,SCM_FALSE,libalphaunbox, NULL, NULL);


static ScmObj libalphaset_boxX(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphaset_boxX__STUB, 1, 1,SCM_FALSE,libalphaset_boxX, NULL, NULL);


static ScmObj libalphabox_arity(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphabox_arity__STUB, 1, 0,SCM_FALSE,libalphabox_arity, NULL, NULL);


static ScmObj libalphaunbox_value(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphaunbox_value__STUB, 2, 0,SCM_FALSE,libalphaunbox_value, NULL, NULL);


static ScmObj libalphaset_box_valueX(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphaset_box_valueX__STUB, 3, 0,SCM_FALSE,libalphaset_box_valueX, NULL, NULL);

static ScmObj case_lambda_dispatch(ScmObj* args,int nargs,void* data);

static ScmObj libalphamake_case_lambda_dispatcher(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalphamake_case_lambda_dispatcher__STUB, 3, 0,SCM_FALSE,libalphamake_case_lambda_dispatcher, NULL, NULL);


static ScmObj libalpha_25make_macro_transformer(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libalpha_25make_macro_transformer__STUB, 2, 3,SCM_FALSE,libalpha_25make_macro_transformer, 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 d1562[100];
} scm__sc SCM_UNUSED = {
  {   /* ScmString d1562 */
      SCM_STRING_CONST_INITIALIZER("%error-scan-keys", 16, 16),
      SCM_STRING_CONST_INITIALIZER("reverse!", 8, 8),
      SCM_STRING_CONST_INITIALIZER("gauche.internal", 15, 15),
      SCM_STRING_CONST_INITIALIZER("keyword\077", 8, 8),
      SCM_STRING_CONST_INITIALIZER("args", 4, 4),
      SCM_STRING_CONST_INITIALIZER("source-info", 11, 11),
      SCM_STRING_CONST_INITIALIZER("libalpha.scm", 12, 12),
      SCM_STRING_CONST_INITIALIZER("unused-args", 11, 11),
      SCM_STRING_CONST_INITIALIZER("%make-error-message", 19, 19),
      SCM_STRING_CONST_INITIALIZER("open-output-string", 18, 18),
      SCM_STRING_CONST_INITIALIZER("display", 7, 7),
      SCM_STRING_CONST_INITIALIZER(" ", 1, 1),
      SCM_STRING_CONST_INITIALIZER("write/ss", 8, 8),
      SCM_STRING_CONST_INITIALIZER("get-output-string", 17, 17),
      SCM_STRING_CONST_INITIALIZER("msg", 3, 3),
      SCM_STRING_CONST_INITIALIZER("make-error", 10, 10),
      SCM_STRING_CONST_INITIALIZER("<error>", 7, 7),
      SCM_STRING_CONST_INITIALIZER("message", 7, 7),
      SCM_STRING_CONST_INITIALIZER("message-prefix", 14, 14),
      SCM_STRING_CONST_INITIALIZER("message-args", 12, 12),
      SCM_STRING_CONST_INITIALIZER("make", 4, 4),
      SCM_STRING_CONST_INITIALIZER("error", 5, 5),
      SCM_STRING_CONST_INITIALIZER("<condition-meta>", 16, 16),
      SCM_STRING_CONST_INITIALIZER("is-a\077", 5, 5),
      SCM_STRING_CONST_INITIALIZER("raise", 5, 5),
      SCM_STRING_CONST_INITIALIZER("errorf", 6, 6),
      SCM_STRING_CONST_INITIALIZER("format/ss", 9, 9),
      SCM_STRING_CONST_INITIALIZER("fmt", 3, 3),
      SCM_STRING_CONST_INITIALIZER("make-vector", 11, 11),
      SCM_STRING_CONST_INITIALIZER("k", 1, 1),
      SCM_STRING_CONST_INITIALIZER("optional", 8, 8),
      SCM_STRING_CONST_INITIALIZER("fill", 4, 4),
      SCM_STRING_CONST_INITIALIZER("bind-info", 9, 9),
      SCM_STRING_CONST_INITIALIZER("scheme", 6, 6),
      SCM_STRING_CONST_INITIALIZER("getter-with-setter", 18, 18),
      SCM_STRING_CONST_INITIALIZER("proc", 4, 4),
      SCM_STRING_CONST_INITIALIZER("set", 3, 3),
      SCM_STRING_CONST_INITIALIZER("gauche", 6, 6),
      SCM_STRING_CONST_INITIALIZER("setter", 6, 6),
      SCM_STRING_CONST_INITIALIZER("(setter setter)", 15, 15),
      SCM_STRING_CONST_INITIALIZER("box", 3, 3),
      SCM_STRING_CONST_INITIALIZER("rest", 4, 4),
      SCM_STRING_CONST_INITIALIZER("optarray", 8, 8),
      SCM_STRING_CONST_INITIALIZER("argv", 4, 4),
      SCM_STRING_CONST_INITIALIZER("box\077", 4, 4),
      SCM_STRING_CONST_INITIALIZER("v", 1, 1),
      SCM_STRING_CONST_INITIALIZER("unbox", 5, 5),
      SCM_STRING_CONST_INITIALIZER("b", 1, 1),
      SCM_STRING_CONST_INITIALIZER("set-box!", 8, 8),
      SCM_STRING_CONST_INITIALIZER("vs", 2, 2),
      SCM_STRING_CONST_INITIALIZER("box-arity", 9, 9),
      SCM_STRING_CONST_INITIALIZER("unbox-value", 11, 11),
      SCM_STRING_CONST_INITIALIZER("i", 1, 1),
      SCM_STRING_CONST_INITIALIZER("set-box-value!", 14, 14),
      SCM_STRING_CONST_INITIALIZER("val", 3, 3),
      SCM_STRING_CONST_INITIALIZER("make-case-lambda-dispatcher", 27, 27),
      SCM_STRING_CONST_INITIALIZER("case-lambda-dispatcher", 22, 22),
      SCM_STRING_CONST_INITIALIZER("dispatch-vector", 15, 15),
      SCM_STRING_CONST_INITIALIZER("min-reqargs", 11, 11),
      SCM_STRING_CONST_INITIALIZER("name", 4, 4),
      SCM_STRING_CONST_INITIALIZER("make-case-lambda", 16, 16),
      SCM_STRING_CONST_INITIALIZER("too many arguments for", 22, 22),
      SCM_STRING_CONST_INITIALIZER("lambda", 6, 6),
      SCM_STRING_CONST_INITIALIZER("minarg", 6, 6),
      SCM_STRING_CONST_INITIALIZER("maxarg", 6, 6),
      SCM_STRING_CONST_INITIALIZER("formals", 7, 7),
      SCM_STRING_CONST_INITIALIZER("closures", 8, 8),
      SCM_STRING_CONST_INITIALIZER("define", 6, 6),
      SCM_STRING_CONST_INITIALIZER("fill-dispatch-vector!", 21, 21),
      SCM_STRING_CONST_INITIALIZER("closure", 7, 7),
      SCM_STRING_CONST_INITIALIZER("%set", 4, 4),
      SCM_STRING_CONST_INITIALIZER("n", 1, 1),
      SCM_STRING_CONST_INITIALIZER("let1", 4, 4),
      SCM_STRING_CONST_INITIALIZER("-", 1, 1),
      SCM_STRING_CONST_INITIALIZER("unless", 6, 6),
      SCM_STRING_CONST_INITIALIZER("vector-ref", 10, 10),
      SCM_STRING_CONST_INITIALIZER("vector-set!", 11, 11),
      SCM_STRING_CONST_INITIALIZER("let", 3, 3),
      SCM_STRING_CONST_INITIALIZER("loop", 4, 4),
      SCM_STRING_CONST_INITIALIZER("cond", 4, 4),
      SCM_STRING_CONST_INITIALIZER(">", 1, 1),
      SCM_STRING_CONST_INITIALIZER("+", 1, 1),
      SCM_STRING_CONST_INITIALIZER("null\077", 5, 5),
      SCM_STRING_CONST_INITIALIZER("pair\077", 5, 5),
      SCM_STRING_CONST_INITIALIZER("cdr", 3, 3),
      SCM_STRING_CONST_INITIALIZER("else", 4, 4),
      SCM_STRING_CONST_INITIALIZER("fs", 2, 2),
      SCM_STRING_CONST_INITIALIZER("cs", 2, 2),
      SCM_STRING_CONST_INITIALIZER("car", 3, 3),
      SCM_STRING_CONST_INITIALIZER("with-module", 11, 11),
      SCM_STRING_CONST_INITIALIZER("case-lambda-info", 16, 16),
      SCM_STRING_CONST_INITIALIZER("subr\077", 5, 5),
      SCM_STRING_CONST_INITIALIZER("procedure-info", 14, 14),
      SCM_STRING_CONST_INITIALIZER("integer\077", 8, 8),
      SCM_STRING_CONST_INITIALIZER("reverse", 7, 7),
      SCM_STRING_CONST_INITIALIZER("%toplevel", 9, 9),
      SCM_STRING_CONST_INITIALIZER("%make-macro-transformer", 23, 23),
      SCM_STRING_CONST_INITIALIZER("transformer", 11, 11),
      SCM_STRING_CONST_INITIALIZER("src", 3, 3),
      SCM_STRING_CONST_INITIALIZER("describer", 9, 9),
  },
};
static struct scm__rcRec {
  ScmCompiledCode d1565[9];
  ScmPair d1564[292] SCM_ALIGN_PAIR;
  ScmWord d1563[454];
  ScmObj d1561[140];
} scm__rc SCM_UNUSED = {
  {   /* ScmCompiledCode d1565 */
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %error-scan-keys */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[0])), 43,
            21, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[8]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %make-error-message */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[43])), 44,
            29, 2, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[14]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* make-error */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[87])), 20,
            14, 1, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[20]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* error */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[107])), 57,
            26, 1, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[25]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* errorf */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[164])), 66,
            24, 1, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[31]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %set */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[230])), 15,
            6, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[267]),
            SCM_OBJ(&scm__rc.d1565[6]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* make-case-lambda */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[245])), 107,
            50, 4, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[273]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* case-lambda-info */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[352])), 101,
            36, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1564[278]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %toplevel */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1563[453])), 1,
            0, 0, 0, SCM_FALSE, SCM_NIL, SCM_FALSE,
            SCM_FALSE, SCM_FALSE),
  },
  {   /* ScmPair d1564 */
       { SCM_NIL, SCM_NIL },
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(48U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[2])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[3])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[5]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[4]), SCM_OBJ(&scm__rc.d1564[6])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[1])},
       { SCM_MAKE_INT(56U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[10])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[11])},
       { SCM_OBJ(&scm__rc.d1564[12]), SCM_OBJ(&scm__rc.d1564[6])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_UNDEFINED},
       { SCM_MAKE_INT(63U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[16])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[17])},
       { SCM_OBJ(&scm__rc.d1564[18]), SCM_OBJ(&scm__rc.d1564[6])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(69U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[21])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[22])},
       { SCM_OBJ(&scm__rc.d1564[23]), SCM_OBJ(&scm__rc.d1564[6])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_UNDEFINED},
       { SCM_MAKE_INT(80U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[27])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[28])},
       { SCM_OBJ(&scm__rc.d1564[29]), SCM_OBJ(&scm__rc.d1564[6])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[32])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[33])},
       { SCM_MAKE_INT(97U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[35])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[36])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[38])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[39])},
       { SCM_OBJ(&scm__rc.d1564[40]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[37]), SCM_OBJ(&scm__rc.d1564[41])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[43])},
       { SCM_MAKE_INT(107U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[45])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[46])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[48])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[49])},
       { SCM_OBJ(&scm__rc.d1564[50]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[47]), SCM_OBJ(&scm__rc.d1564[51])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(121U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[54])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[55])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[57])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[58])},
       { SCM_OBJ(&scm__rc.d1564[59]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[56]), SCM_OBJ(&scm__rc.d1564[60])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[62])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[63])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[64])},
       { SCM_MAKE_INT(132U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[66])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[67])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[69])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[70])},
       { SCM_OBJ(&scm__rc.d1564[71]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[68]), SCM_OBJ(&scm__rc.d1564[72])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(138U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[75])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[76])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[78])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[79])},
       { SCM_OBJ(&scm__rc.d1564[80]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[77]), SCM_OBJ(&scm__rc.d1564[81])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(140U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[84])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[85])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[87])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[88])},
       { SCM_OBJ(&scm__rc.d1564[89]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[86]), SCM_OBJ(&scm__rc.d1564[90])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[92])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[93])},
       { SCM_MAKE_INT(147U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[95])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[96])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[98])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[99])},
       { SCM_OBJ(&scm__rc.d1564[100]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[97]), SCM_OBJ(&scm__rc.d1564[101])},
       { SCM_MAKE_INT(164U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[103])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[104])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[106])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[107])},
       { SCM_OBJ(&scm__rc.d1564[108]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[105]), SCM_OBJ(&scm__rc.d1564[109])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[111])},
       { SCM_MAKE_INT(170U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[113])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[114])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[116])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[117])},
       { SCM_OBJ(&scm__rc.d1564[118]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[115]), SCM_OBJ(&scm__rc.d1564[119])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[121])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[122])},
       { SCM_MAKE_INT(182U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[124])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[125])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[127])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[128])},
       { SCM_OBJ(&scm__rc.d1564[129]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[126]), SCM_OBJ(&scm__rc.d1564[130])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[132])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[133])},
       { SCM_MAKE_INT(272U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[135])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[136])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[138])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[139])},
       { SCM_OBJ(&scm__rc.d1564[140]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[137]), SCM_OBJ(&scm__rc.d1564[141])},
       { SCM_FALSE, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[143])},
       { SCM_OBJ(&scm__rc.d1564[144]), SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[145])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[146])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[147])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[148])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[149])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[151])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[152])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[153])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[155])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[157])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[158])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[111])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[160])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[151])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[162])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[163])},
       { SCM_OBJ(&scm__rc.d1564[164]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[161]), SCM_OBJ(&scm__rc.d1564[165])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[166])},
       { SCM_OBJ(&scm__rc.d1564[167]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[159]), SCM_OBJ(&scm__rc.d1564[168])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[169])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[170])},
       { SCM_OBJ(&scm__rc.d1564[171]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[156]), SCM_OBJ(&scm__rc.d1564[172])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[173])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[175])},
       { SCM_MAKE_INT(0), SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[177])},
       { SCM_OBJ(&scm__rc.d1564[178]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[176]), SCM_OBJ(&scm__rc.d1564[179])},
       { SCM_MAKE_INT(1U), SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[181])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[182])},
       { SCM_OBJ(&scm__rc.d1564[183]), SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[184])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[185])},
       { SCM_OBJ(&scm__rc.d1564[186]), SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[175])},
       { SCM_OBJ(&scm__rc.d1564[156]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[188]), SCM_OBJ(&scm__rc.d1564[189])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[175])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[175])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[181])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[193])},
       { SCM_OBJ(&scm__rc.d1564[194]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[192]), SCM_OBJ(&scm__rc.d1564[195])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[196])},
       { SCM_OBJ(&scm__rc.d1564[197]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[191]), SCM_OBJ(&scm__rc.d1564[198])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[195])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[200])},
       { SCM_OBJ(&scm__rc.d1564[201]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[156]), SCM_OBJ(&scm__rc.d1564[202])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[203])},
       { SCM_OBJ(&scm__rc.d1564[204]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[199]), SCM_OBJ(&scm__rc.d1564[205])},
       { SCM_OBJ(&scm__rc.d1564[190]), SCM_OBJ(&scm__rc.d1564[206])},
       { SCM_OBJ(&scm__rc.d1564[187]), SCM_OBJ(&scm__rc.d1564[207])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[208])},
       { SCM_OBJ(&scm__rc.d1564[209]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[180]), SCM_OBJ(&scm__rc.d1564[210])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[211])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[212])},
       { SCM_OBJ(&scm__rc.d1564[213]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[174]), SCM_OBJ(&scm__rc.d1564[214])},
       { SCM_OBJ(&scm__rc.d1564[154]), SCM_OBJ(&scm__rc.d1564[215])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[216])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[157])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[218])},
       { SCM_MAKE_INT(2U), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[219]), SCM_OBJ(&scm__rc.d1564[220])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[221])},
       { SCM_OBJ(&scm__rc.d1564[222]), SCM_OBJ(&scm__rc.d1564[143])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[223])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[175])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[226])},
       { SCM_OBJ(&scm__rc.d1564[227]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[225]), SCM_OBJ(&scm__rc.d1564[228])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[230])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[230])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[233])},
       { SCM_OBJ(&scm__rc.d1564[234]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[232]), SCM_OBJ(&scm__rc.d1564[235])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[236])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[237])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[230])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[233])},
       { SCM_OBJ(&scm__rc.d1564[240]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[239]), SCM_OBJ(&scm__rc.d1564[241])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[242])},
       { SCM_OBJ(&scm__rc.d1564[243]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[238]), SCM_OBJ(&scm__rc.d1564[244])},
       { SCM_OBJ(&scm__rc.d1564[231]), SCM_OBJ(&scm__rc.d1564[245])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[246])},
       { SCM_OBJ(&scm__rc.d1564[247]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[229]), SCM_OBJ(&scm__rc.d1564[248])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[249])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[250])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[139])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[132])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[253])},
       { SCM_OBJ(&scm__rc.d1564[252]), SCM_OBJ(&scm__rc.d1564[254])},
       { SCM_OBJ(&scm__rc.d1564[255]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[251]), SCM_OBJ(&scm__rc.d1564[256])},
       { SCM_OBJ(&scm__rc.d1564[224]), SCM_OBJ(&scm__rc.d1564[257])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[258])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[259])},
       { SCM_OBJ(&scm__rc.d1564[260]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[217]), SCM_OBJ(&scm__rc.d1564[261])},
       { SCM_OBJ(&scm__rc.d1564[150]), SCM_OBJ(&scm__rc.d1564[262])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[263])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[265])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_OBJ(&scm__rc.d1565[5]), SCM_NIL},
       { SCM_MAKE_INT(291U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[269])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[270])},
       { SCM_OBJ(&scm__rc.d1564[271]), SCM_OBJ(&scm__rc.d1564[6])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(317U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[274])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[275])},
       { SCM_OBJ(&scm__rc.d1564[276]), SCM_OBJ(&scm__rc.d1564[6])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[279])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[280])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[281])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[282])},
       { SCM_MAKE_INT(343U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1562[6]), SCM_OBJ(&scm__rc.d1564[284])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[285])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[287])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1564[288])},
       { SCM_OBJ(&scm__rc.d1564[289]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1564[286]), SCM_OBJ(&scm__rc.d1564[290])},
  },
  {   /* ScmWord d1563 */
    /* %error-scan-keys */
    0x00000048    /*   0 (LREF0-PUSH) */,
    0x00000008    /*   1 (CONSTN-PUSH) */,
    0x00002017    /*   2 (LOCAL-ENV 2) */,
    0x0000003e    /*   3 (LREF1) */,
    0x00000022    /*   4 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 14),
    0x0000100e    /*   6 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 11),
    0x00000048    /*   8 (LREF0-PUSH) */,
    0x0000105f    /*   9 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#reverse!.dafb3300> */,
    0x0000000d    /*  11 (PUSH) */,
    0x0000003e    /*  12 (LREF1) */,
    0x000020a3    /*  13 (VALUES-RET 2) */,
    0x0000100e    /*  14 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 19),
    0x0000006b    /*  16 (LREF1-CAR) */,
    0x00001062    /*  17 (PUSH-GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#keyword?.dafb3540> */,
    0x0000001e    /*  19 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 6),
    0x00000077    /*  21 (LREF1-CDR) */,
    0x00000022    /*  22 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 27),
    0x00000013    /*  24 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 6),
    0x00000014    /*  26 (RET) */,
    0x0000003e    /*  27 (LREF1) */,
    0x00000087    /*  28 (CDDR-PUSH) */,
    0x0000003e    /*  29 (LREF1) */,
    0x00000083    /*  30 (CADR-PUSH) */,
    0x0000006b    /*  31 (LREF1-CAR) */,
    0x0000000d    /*  32 (PUSH) */,
    0x0000003d    /*  33 (LREF0) */,
    0x00003089    /*  34 (LIST-STAR 3) */,
    0x0000000d    /*  35 (PUSH) */,
    0x0000101b    /*  36 (LOCAL-ENV-JUMP 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 3),
    0x00000014    /*  38 (RET) */,
    0x00000013    /*  39 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]) + 6),
    0x00000014    /*  41 (RET) */,
    0x00000014    /*  42 (RET) */,
    /* %make-error-message */
    0x0000000e    /*   0 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]) + 4),
    0x0000005f    /*   2 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#open-output-string.da8c5440> */,
    0x00001018    /*   4 (PUSH-LOCAL-ENV 1) */,
    0x0000200e    /*   5 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]) + 11),
    0x0000004d    /*   7 (LREF11-PUSH) */,
    0x00000048    /*   8 (LREF0-PUSH) */,
    0x0000205f    /*   9 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#display.da8c53e0> */,
    0x0000100e    /*  11 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]) + 40),
    0x0000004c    /*  13 (LREF10-PUSH) */,
    0x00001017    /*  14 (LOCAL-ENV 1) */,
    0x0000003d    /*  15 (LREF0) */,
    0x00000022    /*  16 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]) + 19),
    0x0000000c    /*  18 (CONSTU-RET) */,
    0x0000006a    /*  19 (LREF0-CAR) */,
    0x00001018    /*  20 (PUSH-LOCAL-ENV 1) */,
    0x0000200e    /*  21 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]) + 28),
    0x00000006    /*  23 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1562[11])) /* " " */,
    0x0000004f    /*  25 (LREF20-PUSH) */,
    0x0000205f    /*  26 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#display.da8c9fa0> */,
    0x0000200e    /*  28 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]) + 34),
    0x00000048    /*  30 (LREF0-PUSH) */,
    0x0000004f    /*  31 (LREF20-PUSH) */,
    0x0000205f    /*  32 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#write/ss.da8c9f20> */,
    0x0000001a    /*  34 (POP-LOCAL-ENV) */,
    0x00000076    /*  35 (LREF0-CDR) */,
    0x0000000d    /*  36 (PUSH) */,
    0x0000101b    /*  37 (LOCAL-ENV-JUMP 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]) + 15),
    0x00000014    /*  39 (RET) */,
    0x00000048    /*  40 (LREF0-PUSH) */,
    0x00001060    /*  41 (GREF-TAIL-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#get-output-string.da8c9d60> */,
    0x00000014    /*  43 (RET) */,
    /* make-error */
    0x0000005e    /*   0 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#<error>.da9b77e0> */,
    0x00000006    /*   2 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :message */,
    0x0000200e    /*   4 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[87]) + 10),
    0x00000049    /*   6 (LREF1-PUSH) */,
    0x00000048    /*   7 (LREF0-PUSH) */,
    0x0000205f    /*   8 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%make-error-message.da9b7760> */,
    0x0000000d    /*  10 (PUSH) */,
    0x00000006    /*  11 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :message-prefix */,
    0x00000049    /*  13 (LREF1-PUSH) */,
    0x00000006    /*  14 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :message-args */,
    0x00000048    /*  16 (LREF0-PUSH) */,
    0x00007060    /*  17 (GREF-TAIL-CALL 7) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make.da9b7820> */,
    0x00000014    /*  19 (RET) */,
    /* error */
    0x0000200e    /*   0 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 7),
    0x00000049    /*   2 (LREF1-PUSH) */,
    0x0000005e    /*   3 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#<condition-meta>.daa52600> */,
    0x0000205f    /*   5 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#is-a?.daa52660> */,
    0x0000001e    /*   7 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 47),
    0x0000100e    /*   9 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 14),
    0x00000048    /*  11 (LREF0-PUSH) */,
    0x0000105f    /*  12 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%error-scan-keys.daa52560> */,
    0x00002036    /*  14 (TAIL-RECEIVE 2 0) */,
    0x0000003d    /*  15 (LREF0) */,
    0x00000022    /*  16 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 27),
    0x0000000e    /*  18 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 44),
    0x0000005e    /*  20 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make.daa52460> */,
    0x0000004d    /*  22 (LREF11-PUSH) */,
    0x0000003e    /*  23 (LREF1) */,
    0x00003095    /*  24 (TAIL-APPLY 3) */,
    0x00000013    /*  25 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 44),
    0x0000000e    /*  27 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 44),
    0x0000005e    /*  29 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make.daa523c0> */,
    0x0000004d    /*  31 (LREF11-PUSH) */,
    0x00000006    /*  32 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :message */,
    0x0000200e    /*  34 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 41),
    0x0000006a    /*  36 (LREF0-CAR) */,
    0x0000000d    /*  37 (PUSH) */,
    0x00000076    /*  38 (LREF0-CDR) */,
    0x00002062    /*  39 (PUSH-GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%make-error-message.daa52320> */,
    0x0000000d    /*  41 (PUSH) */,
    0x0000003e    /*  42 (LREF1) */,
    0x00005095    /*  43 (TAIL-APPLY 5) */,
    0x0000001a    /*  44 (POP-LOCAL-ENV) */,
    0x00000013    /*  45 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 54),
    0x0000000e    /*  47 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]) + 54),
    0x0000005e    /*  49 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make-error.daa521e0> */,
    0x00000049    /*  51 (LREF1-PUSH) */,
    0x0000003d    /*  52 (LREF0) */,
    0x00003095    /*  53 (TAIL-APPLY 3) */,
    0x00001063    /*  54 (PUSH-GREF-TAIL-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#raise.daa52700> */,
    0x00000014    /*  56 (RET) */,
    /* errorf */
    0x0000200e    /*   0 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 7),
    0x00000049    /*   2 (LREF1-PUSH) */,
    0x0000005e    /*   3 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#<condition-meta>.dab7b680> */,
    0x0000205f    /*   5 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#is-a?.dab7b6e0> */,
    0x0000001e    /*   7 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 47),
    0x0000100e    /*   9 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 14),
    0x00000048    /*  11 (LREF0-PUSH) */,
    0x0000105f    /*  12 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%error-scan-keys.dab7b5e0> */,
    0x00002036    /*  14 (TAIL-RECEIVE 2 0) */,
    0x0000003d    /*  15 (LREF0) */,
    0x00000022    /*  16 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 27),
    0x0000000e    /*  18 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 44),
    0x0000005e    /*  20 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make.dab7b4e0> */,
    0x0000004d    /*  22 (LREF11-PUSH) */,
    0x0000003e    /*  23 (LREF1) */,
    0x00003095    /*  24 (TAIL-APPLY 3) */,
    0x00000013    /*  25 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 44),
    0x0000000e    /*  27 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 44),
    0x0000005e    /*  29 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make.dab7b440> */,
    0x0000004d    /*  31 (LREF11-PUSH) */,
    0x00000006    /*  32 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :message */,
    0x0000000e    /*  34 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 41),
    0x0000005e    /*  36 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#format/ss.dab7b380> */,
    0x00000009    /*  38 (CONSTF-PUSH) */,
    0x0000003d    /*  39 (LREF0) */,
    0x00003095    /*  40 (TAIL-APPLY 3) */,
    0x0000000d    /*  41 (PUSH) */,
    0x0000003e    /*  42 (LREF1) */,
    0x00005095    /*  43 (TAIL-APPLY 5) */,
    0x0000001a    /*  44 (POP-LOCAL-ENV) */,
    0x00000013    /*  45 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 63),
    0x0000300e    /*  47 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 63),
    0x0000005e    /*  49 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#<error>.dab7b260> */,
    0x00000006    /*  51 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :message */,
    0x0000000e    /*  53 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]) + 61),
    0x0000005e    /*  55 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#format/ss.dab7b1c0> */,
    0x00000009    /*  57 (CONSTF-PUSH) */,
    0x00000049    /*  58 (LREF1-PUSH) */,
    0x0000003d    /*  59 (LREF0) */,
    0x00004095    /*  60 (TAIL-APPLY 4) */,
    0x00003062    /*  61 (PUSH-GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make.dab7b2a0> */,
    0x00001063    /*  63 (PUSH-GREF-TAIL-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#raise.dab7b780> */,
    0x00000014    /*  65 (RET) */,
    /* (make-case-lambda %set) */
    0x00000048    /*   0 (LREF0-PUSH) */,
    0x0100603c    /*   1 (LREF 6 4) */,
    0x000000b3    /*   2 (NUMSUB2) */,
    0x00001018    /*   3 (PUSH-LOCAL-ENV 1) */,
    0x00005047    /*   4 (LREF-PUSH 5 0) */,
    0x0000003d    /*   5 (LREF0) */,
    0x000000a8    /*   6 (VEC-REF) */,
    0x0000001e    /*   7 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[230]) + 10),
    0x0000000c    /*   9 (CONSTU-RET) */,
    0x00005047    /*  10 (LREF-PUSH 5 0) */,
    0x00000048    /*  11 (LREF0-PUSH) */,
    0x00000046    /*  12 (LREF30) */,
    0x000000a9    /*  13 (VEC-SET) */,
    0x00000014    /*  14 (RET) */,
    /* make-case-lambda */
    0x0000003d    /*   0 (LREF0) */,
    0x00000022    /*   1 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 6),
    0x00000004    /*   3 (CONSTF) */,
    0x00000013    /*   4 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 7),
    0x0000006a    /*   6 (LREF0-CAR) */,
    0x0000000d    /*   7 (PUSH) */,
    0x0000003d    /*   8 (LREF0) */,
    0x00000022    /*   9 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 14),
    0x00000003    /*  11 (CONSTN) */,
    0x00000013    /*  12 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 15),
    0x00000076    /*  14 (LREF0-CDR) */,
    0x00002018    /*  15 (PUSH-LOCAL-ENV 2) */,
    0x0000003d    /*  16 (LREF0) */,
    0x00000022    /*  17 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 21),
    0x00000013    /*  19 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 29),
    0x0000200e    /*  21 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 29),
    0x00000006    /*  23 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1562[61])) /* "too many arguments for" */,
    0x00000006    /*  25 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1564[264])) /* (lambda (minarg maxarg formals closures :optional (name #f)) (define (fill-dispatch-vector! v formals closure) (define (%set n) (let1 i (- n minarg) (unless (vector-ref v i) (vector-set! v i closure)))) (let loop ((formals formals) (n 0)) (cond ((> n (+ maxarg 1))) ((null? formals) (%set n)) ((pair? formals) (loop (cdr formals) (+ n 1))) (else (%set n) (loop formals (+ n 1)))))) (let1 v (make-vector (+ (- maxarg minarg) 2) #f) (let loop ((fs formals) (cs closures)) (unless (null? fs) (fill-dispatch-vector! v (car fs) (car cs)) (loop (cdr fs) (cdr cs)))) ((with-module gauche.internal make-case-lambda-dispatcher) v minarg name))) */,
    0x0000205f    /*  27 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#error.db574200> */,
    0x0000200e    /*  29 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 39),
    0x00c01047    /*  31 (LREF-PUSH 1 3) */,
    0x0100103c    /*  32 (LREF 1 4) */,
    0x000000b3    /*  33 (NUMSUB2) */,
    0x000020bc    /*  34 (NUMADDI 2) */,
    0x0000000d    /*  35 (PUSH) */,
    0x00000009    /*  36 (CONSTF-PUSH) */,
    0x0000205f    /*  37 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make-vector.db5a8040> */,
    0x00001018    /*  39 (PUSH-LOCAL-ENV 1) */,
    0x0000200e    /*  40 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 101),
    0x00802047    /*  42 (LREF-PUSH 2 2) */,
    0x00000050    /*  43 (LREF21-PUSH) */,
    0x00002017    /*  44 (LOCAL-ENV 2) */,
    0x0000003e    /*  45 (LREF1) */,
    0x00000022    /*  46 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 49),
    0x0000000c    /*  48 (CONSTU-RET) */,
    0x0000006b    /*  49 (LREF1-CAR) */,
    0x0000000d    /*  50 (PUSH) */,
    0x0000006a    /*  51 (LREF0-CAR) */,
    0x00002018    /*  52 (PUSH-LOCAL-ENV 2) */,
    0x00001019    /*  53 (LOCAL-ENV-CLOSURES 1) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1564[268])) /* (#<compiled-code (make-case-lambda %set)@0x7fd3db834d80>) */,
    0x0000200e    /*  55 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 92),
    0x0000004d    /*  57 (LREF11-PUSH) */,
    0x00000007    /*  58 (CONSTI-PUSH 0) */,
    0x00002017    /*  59 (LOCAL-ENV 2) */,
    0x00c0603c    /*  60 (LREF 6 3) */,
    0x000010bc    /*  61 (NUMADDI 1) */,
    0x0000002b    /*  62 (LREF-VAL0-BNGT 0 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 65),
    0x00000014    /*  64 (RET) */,
    0x0000003e    /*  65 (LREF1) */,
    0x00000022    /*  66 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 72),
    0x00000048    /*  68 (LREF0-PUSH) */,
    0x00000041    /*  69 (LREF10) */,
    0x0000101d    /*  70 (LOCAL-ENV-TAIL-CALL 1) */,
    0x00000014    /*  71 (RET) */,
    0x0000003e    /*  72 (LREF1) */,
    0x00000098    /*  73 (PAIRP) */,
    0x0000001e    /*  74 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 82),
    0x00000077    /*  76 (LREF1-CDR) */,
    0x0000000d    /*  77 (PUSH) */,
    0x000010c7    /*  78 (LREF0-NUMADDI-PUSH 1) */,
    0x0000101b    /*  79 (LOCAL-ENV-JUMP 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 60),
    0x00000014    /*  81 (RET) */,
    0x0000100e    /*  82 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 87),
    0x00000048    /*  84 (LREF0-PUSH) */,
    0x00000041    /*  85 (LREF10) */,
    0x0000101c    /*  86 (LOCAL-ENV-CALL 1) */,
    0x00000049    /*  87 (LREF1-PUSH) */,
    0x000010c7    /*  88 (LREF0-NUMADDI-PUSH 1) */,
    0x0000101b    /*  89 (LOCAL-ENV-JUMP 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 60),
    0x00000014    /*  91 (RET) */,
    0x0000001a    /*  92 (POP-LOCAL-ENV) */,
    0x0000001a    /*  93 (POP-LOCAL-ENV) */,
    0x00000077    /*  94 (LREF1-CDR) */,
    0x0000000d    /*  95 (PUSH) */,
    0x00000076    /*  96 (LREF0-CDR) */,
    0x0000000d    /*  97 (PUSH) */,
    0x0000101b    /*  98 (LOCAL-ENV-JUMP 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]) + 45),
    0x00000014    /* 100 (RET) */,
    0x00000048    /* 101 (LREF0-PUSH) */,
    0x01002047    /* 102 (LREF-PUSH 2 4) */,
    0x0000004d    /* 103 (LREF11-PUSH) */,
    0x00003060    /* 104 (GREF-TAIL-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier gauche.internal#make-case-lambda-dispatcher.db5aec80> */,
    0x00000014    /* 106 (RET) */,
    /* case-lambda-info */
    0x0000100e    /*   0 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 5),
    0x00000048    /*   2 (LREF0-PUSH) */,
    0x0000105f    /*   3 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#subr?.db36f0c0> */,
    0x00000030    /*   5 (RF) */,
    0x0000100e    /*   6 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 11),
    0x00000048    /*   8 (LREF0-PUSH) */,
    0x0000105f    /*   9 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#procedure-info.db3f35a0> */,
    0x00001018    /*  11 (PUSH-LOCAL-ENV 1) */,
    0x0000003d    /*  12 (LREF0) */,
    0x00000098    /*  13 (PAIRP) */,
    0x00000030    /*  14 (RF) */,
    0x00000076    /*  15 (LREF0-CDR) */,
    0x00000098    /*  16 (PAIRP) */,
    0x00000030    /*  17 (RF) */,
    0x0000100e    /*  18 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 24),
    0x0000003d    /*  20 (LREF0) */,
    0x00000083    /*  21 (CADR-PUSH) */,
    0x0000105f    /*  22 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#integer?.db3f3320> */,
    0x00000030    /*  24 (RF) */,
    0x0000003d    /*  25 (LREF0) */,
    0x00000086    /*  26 (CDDR) */,
    0x00000098    /*  27 (PAIRP) */,
    0x00000030    /*  28 (RF) */,
    0x0000003d    /*  29 (LREF0) */,
    0x00000086    /*  30 (CDDR) */,
    0x00000068    /*  31 (CAR) */,
    0x0000009d    /*  32 (VECTORP) */,
    0x00000030    /*  33 (RF) */,
    0x0000003d    /*  34 (LREF0) */,
    0x00000083    /*  35 (CADR-PUSH) */,
    0x00001017    /*  36 (LOCAL-ENV 1) */,
    0x00000041    /*  37 (LREF10) */,
    0x00000086    /*  38 (CDDR) */,
    0x00000069    /*  39 (CAR-PUSH) */,
    0x00001017    /*  40 (LOCAL-ENV 1) */,
    0x0000003d    /*  41 (LREF0) */,
    0x000000a7    /*  42 (VEC-LEN) */,
    0x00001018    /*  43 (PUSH-LOCAL-ENV 1) */,
    0x00000008    /*  44 (CONSTN-PUSH) */,
    0x00000007    /*  45 (CONSTI-PUSH 0) */,
    0x00002017    /*  46 (LOCAL-ENV 2) */,
    -0x00000f3f   /*  47 (LREF10-NUMADDI -1) */,
    0x00000028    /*  48 (LREF-VAL0-BNUMNE 0 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 75),
    0x0000004f    /*  50 (LREF20-PUSH) */,
    0x0000003d    /*  51 (LREF0) */,
    0x000000a8    /*  52 (VEC-REF) */,
    0x00001018    /*  53 (PUSH-LOCAL-ENV 1) */,
    0x0000003d    /*  54 (LREF0) */,
    0x0000001e    /*  55 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 72),
    0x0000004d    /*  57 (LREF11-PUSH) */,
    0x0000403c    /*  58 (LREF 4 0) */,
    0x000010b6    /*  59 (LREF-VAL0-NUMADD2 1 0) */,
    -0x00000f44   /*  60 (NUMADDI -1) */,
    0x0000000d    /*  61 (PUSH) */,
    0x00000006    /*  62 (CONST-PUSH) */,
    SCM_WORD(SCM_TRUE) /* #t */,
    0x0000003d    /*  64 (LREF0) */,
    0x00002088    /*  65 (LIST 2) */,
    0x00000067    /*  66 (CONS-PUSH) */,
    0x00000003    /*  67 (CONSTN) */,
    0x00000067    /*  68 (CONS-PUSH) */,
    0x00002060    /*  69 (GREF-TAIL-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#reverse.db3f8100> */,
    0x00000014    /*  71 (RET) */,
    0x00000042    /*  72 (LREF11) */,
    0x00000093    /*  73 (REVERSE) */,
    0x00000014    /*  74 (RET) */,
    0x0000004f    /*  75 (LREF20-PUSH) */,
    0x0000003d    /*  76 (LREF0) */,
    0x000000a8    /*  77 (VEC-REF) */,
    0x00001018    /*  78 (PUSH-LOCAL-ENV 1) */,
    0x0000003d    /*  79 (LREF0) */,
    0x0000001e    /*  80 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 95),
    0x0000403c    /*  82 (LREF 4 0) */,
    0x000010b6    /*  83 (LREF-VAL0-NUMADD2 1 0) */,
    0x0000000d    /*  84 (PUSH) */,
    0x00000009    /*  85 (CONSTF-PUSH) */,
    0x0000003d    /*  86 (LREF0) */,
    0x00002088    /*  87 (LIST 2) */,
    0x00000067    /*  88 (CONS-PUSH) */,
    0x00000042    /*  89 (LREF11) */,
    0x00000067    /*  90 (CONS-PUSH) */,
    0x000010cb    /*  91 (LREF10-NUMADDI-PUSH 1) */,
    0x0000201b    /*  92 (LOCAL-ENV-JUMP 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 47),
    0x00000014    /*  94 (RET) */,
    0x0000004d    /*  95 (LREF11-PUSH) */,
    0x000010cb    /*  96 (LREF10-NUMADDI-PUSH 1) */,
    0x0000201b    /*  97 (LOCAL-ENV-JUMP 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]) + 47),
    0x00000014    /*  99 (RET) */,
    0x00000014    /* 100 (RET) */,
    /* %toplevel */
    0x00000014    /*   0 (RET) */,
  },
  {   /* ScmObj d1561 */
    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_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_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_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_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_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_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,
  },
};
static ScmObj libalphamake_vector(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj k_scm;
  ScmSmallInt k;
  ScmObj fill_scm;
  ScmObj fill;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("make-vector");
  if (SCM_ARGCNT >= 3
      && !SCM_NULLP(SCM_ARGREF(SCM_ARGCNT-1)))
    Scm_Error("too many arguments: up to 2 is expected, %d given.", SCM_ARGCNT + Scm_Length(SCM_ARGREF(SCM_ARGCNT-1)) - 1);
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  k_scm = SCM_SUBRARGS[0];
  if (!SCM_INTP(k_scm)) Scm_Error("small integer required, but got %S", k_scm);
  k = SCM_INT_VALUE(k_scm);
  if (SCM_ARGCNT > 1+1) {
    fill_scm = SCM_SUBRARGS[1];
  } else {
    fill_scm = SCM_UNBOUND;
  }
  fill = (fill_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_MakeVector(k,fill));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmObj libalphagetter_with_setter(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj proc_scm;
  ScmProcedure* proc;
  ScmObj set_scm;
  ScmProcedure* set;
  ScmObj SCM_SUBRARGS[2];
  SCM_ENTER_SUBR("getter-with-setter");
  for (int SCM_i=0; SCM_i<2; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  proc_scm = SCM_SUBRARGS[0];
  if (!SCM_PROCEDUREP(proc_scm)) Scm_Error("procedure required, but got %S", proc_scm);
  proc = SCM_PROCEDURE(proc_scm);
  set_scm = SCM_SUBRARGS[1];
  if (!SCM_PROCEDUREP(set_scm)) Scm_Error("procedure required, but got %S", set_scm);
  set = SCM_PROCEDURE(set_scm);
  {
{
ScmObj SCM_RESULT;

#line 108 "libalpha.scm"
switch (SCM_PROCEDURE_TYPE(proc)) {
case SCM_PROC_SUBR : case SCM_PROC_CLOSURE : {break;}
case SCM_PROC_GENERIC : case SCM_PROC_METHOD : {
Scm_Error("You can't attach a setter to a generic function or a method using getter-with-setter.  Instead, you can define a setter method using the name (setter %S).",
#line 114 "libalpha.scm"
SCM_PROCEDURE_INFO(proc));break;}default: {
Scm_Error("You can't attach a setter to %S.",SCM_OBJ(proc));break;}}

#line 116 "libalpha.scm"
{ScmObj p=Scm_CopyProcedure(proc);
#line 118 "libalpha.scm"
SCM_PROCEDURE_SETTER_LOCKED(p)=(FALSE);
{SCM_RESULT=(Scm_SetterSet(SCM_PROCEDURE(p),set,TRUE));goto SCM_STUB_RETURN;}}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmObj libalphasetter_SETTER(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj proc_scm;
  ScmProcedure* proc;
  ScmObj setter_scm;
  ScmProcedure* setter;
  ScmObj SCM_SUBRARGS[2];
  SCM_ENTER_SUBR("(setter setter)");
  for (int SCM_i=0; SCM_i<2; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  proc_scm = SCM_SUBRARGS[0];
  if (!SCM_PROCEDUREP(proc_scm)) Scm_Error("procedure required, but got %S", proc_scm);
  proc = SCM_PROCEDURE(proc_scm);
  setter_scm = SCM_SUBRARGS[1];
  if (!SCM_PROCEDUREP(setter_scm)) Scm_Error("procedure required, but got %S", setter_scm);
  setter = SCM_PROCEDURE(setter_scm);
  {

#line 124 "libalpha.scm"
Scm_SetterSet(proc,setter,FALSE);
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_UNDEFINED);
  }
}

static ScmObj libalphasetter(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("setter");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  proc_scm = SCM_SUBRARGS[0];
  proc = (proc_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_Setter(proc));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmObj libalphabox(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj* argv;
  int argc;
  ScmObj rest_scm;
  ScmObj rest;
  ScmObj SCM_SUBRARGS[4];
  SCM_ENTER_SUBR("box");
  for (int SCM_i=0; SCM_i<4; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  argv = &SCM_SUBRARGS[0];
  argc = SCM_ARGCNT-1-0;
  rest_scm = SCM_SUBRARGS[SCM_ARGCNT-1];
  rest = (rest_scm);
  {
{
ScmObj SCM_RESULT;

#line 133 "libalpha.scm"
if (
(argc)==(0)){{SCM_RESULT=(SCM_OBJ(Scm_MakeMVBox(0,SCM_FALSE)));goto SCM_STUB_RETURN;}}else if(
SCM_NULLP(rest)){{SCM_RESULT=(SCM_OBJ(Scm_MakeBox((argv)[0])));goto SCM_STUB_RETURN;}} else {
{SCM_RESULT=(SCM_OBJ(Scm_ListToMVBox(Scm_Cons((argv)[0],rest))));goto SCM_STUB_RETURN;}}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmObj libalphaboxP(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj v_scm;
  ScmObj v;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("box?");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  v_scm = SCM_SUBRARGS[0];
  v = (v_scm);
  {
{
int SCM_RESULT;

#line 138 "libalpha.scm"
{SCM_RESULT=((SCM_BOXP(v))||(SCM_MVBOXP(v)));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_MAKE_BOOL(SCM_RESULT));
}
  }
}

static ScmObj libalphaunbox(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj b_scm;
  ScmObj b;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("unbox");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  b_scm = SCM_SUBRARGS[0];
  b = (b_scm);
  {
{
ScmObj SCM_RESULT;

#line 141 "libalpha.scm"
if (
SCM_BOXP(b)){{SCM_RESULT=(SCM_BOX_VALUE(b));goto SCM_STUB_RETURN;}}else if(
SCM_MVBOXP(b)){{SCM_RESULT=(Scm_ValuesFromArray(SCM_MVBOX_VALUES(b),
SCM_MVBOX_SIZE(b)));goto SCM_STUB_RETURN;}} else {
SCM_TYPE_ERROR(b,"<box> or <mv-box>");{SCM_RESULT=(SCM_UNDEFINED);goto SCM_STUB_RETURN;}}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmObj libalphaset_boxX(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj b_scm;
  ScmObj b;
  ScmObj vs_scm;
  ScmObj vs;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("set-box!");
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  b_scm = SCM_SUBRARGS[0];
  b = (b_scm);
  vs_scm = SCM_SUBRARGS[SCM_ARGCNT-1];
  vs = (vs_scm);
  {

#line 148 "libalpha.scm"
if (
SCM_BOXP(b)){
if (!((SCM_PAIRP(vs))&&(SCM_NULLP(SCM_CDR(vs))))){{
Scm_Error("Wrong number of values to set to a single-value box %S: %S",b,vs);}}
#line 153 "libalpha.scm"
SCM_BOX_SET(b,SCM_CAR(vs));}else if(
SCM_MVBOXP(b)){
{ScmSmallInt argc=Scm_Length(vs);ScmSmallInt i=0;
#line 157 "libalpha.scm"
if (!((argc)==(SCM_MVBOX_SIZE(b)))){{
Scm_Error("Wrong number of values to set to a multi-value box %S: %S",b,vs);}}
#line 160 "libalpha.scm"
for (; (i)<(argc); (i)++,vs=(SCM_CDR(vs))){
(SCM_MVBOX_VALUES(b))[i]=(SCM_CAR(vs));}}} else {
SCM_TYPE_ERROR(b,"<box> or <mv-box>");}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_UNDEFINED);
  }
}

static ScmObj libalphabox_arity(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj b_scm;
  ScmObj b;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("box-arity");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  b_scm = SCM_SUBRARGS[0];
  b = (b_scm);
  {
{
int SCM_RESULT;

#line 165 "libalpha.scm"
if (
SCM_BOXP(b)){{SCM_RESULT=(1);goto SCM_STUB_RETURN;}}else if(
SCM_MVBOXP(b)){{SCM_RESULT=(SCM_MVBOX_SIZE(b));goto SCM_STUB_RETURN;}} else {
SCM_TYPE_ERROR(b,"<box> or <mv-box>");}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(Scm_MakeInteger(SCM_RESULT));
}
  }
}

static ScmObj libalphaunbox_value(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj b_scm;
  ScmObj b;
  ScmObj i_scm;
  ScmSmallInt i;
  ScmObj SCM_SUBRARGS[2];
  SCM_ENTER_SUBR("unbox-value");
  for (int SCM_i=0; SCM_i<2; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  b_scm = SCM_SUBRARGS[0];
  b = (b_scm);
  i_scm = SCM_SUBRARGS[1];
  if (!SCM_INTP(i_scm)) Scm_Error("small integer required, but got %S", i_scm);
  i = SCM_INT_VALUE(i_scm);
  {
{
ScmObj SCM_RESULT;

#line 171 "libalpha.scm"
if (
SCM_BOXP(b)){
if (!((i)==(0))){{Scm_Error("index out of range for %S: %d",b,i);}}
{SCM_RESULT=(SCM_BOX_VALUE(b));goto SCM_STUB_RETURN;}}else if(
SCM_MVBOXP(b)){
if (!(((0)<=(i))&&(
(i)<(SCM_MVBOX_SIZE(b))))){{
Scm_Error("index out of range for %S: %d",b,i);}}
{SCM_RESULT=((SCM_MVBOX_VALUES(b))[i]);goto SCM_STUB_RETURN;}} else {
SCM_TYPE_ERROR(b,"<box> or <mv-box>");}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmObj libalphaset_box_valueX(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj b_scm;
  ScmObj b;
  ScmObj i_scm;
  ScmSmallInt i;
  ScmObj val_scm;
  ScmObj val;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("set-box-value!");
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  b_scm = SCM_SUBRARGS[0];
  b = (b_scm);
  i_scm = SCM_SUBRARGS[1];
  if (!SCM_INTP(i_scm)) Scm_Error("small integer required, but got %S", i_scm);
  i = SCM_INT_VALUE(i_scm);
  val_scm = SCM_SUBRARGS[2];
  val = (val_scm);
  {

#line 183 "libalpha.scm"
if (
SCM_BOXP(b)){
if (!((i)==(0))){{Scm_Error("index out of range for %S: %d",b,i);}}
SCM_BOX_SET(b,val);}else if(
SCM_MVBOXP(b)){
if (!(((0)<=(i))&&(
(i)<(SCM_MVBOX_SIZE(b))))){{
Scm_Error("index out of range for %S: %d",b,i);}}
(SCM_MVBOX_VALUES(b))[i]=(val);} else {
SCM_TYPE_ERROR(b,"<box> or <mv-box>");}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_UNDEFINED);
  }
}

typedef struct case_lambda_packet_rec {
    ScmVector *dispatch_vector;
    int max_optargs;
    int min_reqargs;
 } case_lambda_packet;
static ScmObj case_lambda_dispatch(ScmObj* args,int nargs,void* data){{
#line 241 "libalpha.scm"
{case_lambda_packet* d=((case_lambda_packet* )(data));ScmObj rarg=
(args)[(nargs)-(1)];
SCM_ASSERT((nargs)>((d)->min_reqargs));
SCM_ASSERT((nargs)<=((((d)->min_reqargs)+((d)->max_optargs))+(1)));
#line 248 "libalpha.scm"
{ScmObj p=SCM_VECTOR_ELEMENT((d)->dispatch_vector,
((nargs)-((d)->min_reqargs))-(1));
if (SCM_FALSEP(p)){{
Scm_Error("wrong number of arguments to case lambda: %S",
Scm_ArrayToListWithTail(args,(nargs)-(1),
(args)[(nargs)-(1)]));}}
if (SCM_NULLP(rarg)){
switch ((nargs)-(1)) {
case 0 : {return (Scm_VMApply0(p));break;}
case 1 : {return (Scm_VMApply1(p,(args)[0]));break;}
case 2 : {return (Scm_VMApply2(p,(args)[0],(args)[1]));break;}
case 3 : {return (Scm_VMApply3(p,(args)[0],(args)[1],
(args)[2]));break;}
case 4 : {return (Scm_VMApply4(p,(args)[0],(args)[1],
(args)[2],(args)[3]));break;}default: {
return (Scm_VMApply(p,Scm_ArrayToList(args,(nargs)-(1))));break;}}} else {
return (
Scm_VMApply(p,Scm_ArrayToListWithTail(args,(nargs)-(1),rarg)));}}}}}
static ScmObj libalphamake_case_lambda_dispatcher(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj dispatch_vector_scm;
  ScmVector* dispatch_vector;
  ScmObj min_reqargs_scm;
  int min_reqargs;
  ScmObj name_scm;
  ScmObj name;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("make-case-lambda-dispatcher");
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  dispatch_vector_scm = SCM_SUBRARGS[0];
  if (!SCM_VECTORP(dispatch_vector_scm)) Scm_Error("vector required, but got %S", dispatch_vector_scm);
  dispatch_vector = SCM_VECTOR(dispatch_vector_scm);
  min_reqargs_scm = SCM_SUBRARGS[1];
  if (!SCM_INTEGERP(min_reqargs_scm)) Scm_Error("C integer required, but got %S", min_reqargs_scm);
  min_reqargs = Scm_GetInteger(min_reqargs_scm);
  name_scm = SCM_SUBRARGS[2];
  name = (name_scm);
  {
{
ScmObj SCM_RESULT;

#line 275 "libalpha.scm"
{int max_optargs=SCM_VECTOR_SIZE(dispatch_vector);case_lambda_packet* packet=
SCM_NEW(case_lambda_packet);
(packet)->min_reqargs=(min_reqargs),
(packet)->max_optargs=(max_optargs),
(packet)->dispatch_vector=(dispatch_vector);
{SCM_RESULT=(Scm_MakeSubr(case_lambda_dispatch,packet,min_reqargs,max_optargs,
#line 282 "libalpha.scm"
SCM_LIST3(((SCM_FALSEP(name))?(
scm__rc.d1561[84]):(name)),
#line 285 "libalpha.scm"
SCM_MAKE_INT(min_reqargs),
SCM_OBJ(dispatch_vector))));goto SCM_STUB_RETURN;}}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}

static ScmObj libalpha_25make_macro_transformer(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj name_scm;
  ScmObj name;
  ScmObj transformer_scm;
  ScmObj transformer;
  ScmObj src_scm;
  ScmObj src;
  ScmObj describer_scm;
  ScmObj describer;
  ScmObj SCM_SUBRARGS[6];
  SCM_ENTER_SUBR("%make-macro-transformer");
  if (SCM_ARGCNT >= 5
      && !SCM_NULLP(SCM_ARGREF(SCM_ARGCNT-1)))
    Scm_Error("too many arguments: up to 4 is expected, %d given.", SCM_ARGCNT + Scm_Length(SCM_ARGREF(SCM_ARGCNT-1)) - 1);
  for (int SCM_i=0; SCM_i<6; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  name_scm = SCM_SUBRARGS[0];
  name = (name_scm);
  transformer_scm = SCM_SUBRARGS[1];
  transformer = (transformer_scm);
  if (SCM_ARGCNT > 2+1) {
    src_scm = SCM_SUBRARGS[2];
  } else {
    src_scm = SCM_FALSE;
  }
  src = (src_scm);
  if (SCM_ARGCNT > 3+1) {
    describer_scm = SCM_SUBRARGS[3];
  } else {
    describer_scm = SCM_FALSE;
  }
  describer = (describer_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_MakeMacro(name,transformer,src,describer));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.d1565[8])),
 NULL /*termination*/
};
void Scm_Init_libalpha() {
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1561[0] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[0])),TRUE); /* %error-scan-keys */
  scm__rc.d1561[2] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[1])),TRUE); /* reverse! */
  scm__rc.d1561[4] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[2])),TRUE); /* gauche.internal */
  scm__rc.d1561[3] = SCM_OBJ(Scm_FindModule(SCM_SYMBOL(scm__rc.d1561[4]), SCM_FIND_MODULE_CREATE|SCM_FIND_MODULE_PLACEHOLDING)); /* module gauche.internal */
  scm__rc.d1561[1] = Scm_MakeIdentifier(scm__rc.d1561[2], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#reverse! */
  scm__rc.d1561[6] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[3])),TRUE); /* keyword? */
  scm__rc.d1561[5] = Scm_MakeIdentifier(scm__rc.d1561[6], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#keyword? */
  scm__rc.d1561[7] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[4])),TRUE); /* args */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[1]), scm__rc.d1561[7]);
  scm__rc.d1561[8] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[5])),TRUE); /* source-info */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[4]), scm__rc.d1561[8]);
  scm__rc.d1561[9] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[7])),TRUE); /* unused-args */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[5]), scm__rc.d1561[9]);
  scm__rc.d1561[10] = Scm_MakeExtendedPair(scm__rc.d1561[0], SCM_OBJ(&scm__rc.d1564[1]), SCM_OBJ(&scm__rc.d1564[7]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[8]), scm__rc.d1561[10]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[0]))->name = scm__rc.d1561[0];/* %error-scan-keys */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]))[10] = SCM_WORD(scm__rc.d1561[1]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[0]))[18] = SCM_WORD(scm__rc.d1561[5]);
  ScmObj G1566 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1565[0]), NULL);

  Scm_MakeBinding(SCM_MODULE(Scm_CurrentModule()) /*  */, SCM_SYMBOL(scm__rc.d1561[0]) /* %error-scan-keys */, G1566,0);

  scm__rc.d1561[11] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[8])),TRUE); /* %make-error-message */
  scm__rc.d1561[13] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[9])),TRUE); /* open-output-string */
  scm__rc.d1561[12] = Scm_MakeIdentifier(scm__rc.d1561[13], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#open-output-string */
  scm__rc.d1561[15] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[10])),TRUE); /* display */
  scm__rc.d1561[14] = Scm_MakeIdentifier(scm__rc.d1561[15], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#display */
  scm__rc.d1561[17] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[12])),TRUE); /* write/ss */
  scm__rc.d1561[16] = Scm_MakeIdentifier(scm__rc.d1561[17], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#write/ss */
  scm__rc.d1561[19] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[13])),TRUE); /* get-output-string */
  scm__rc.d1561[18] = Scm_MakeIdentifier(scm__rc.d1561[19], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#get-output-string */
  scm__rc.d1561[20] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[14])),TRUE); /* msg */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[9]), scm__rc.d1561[20]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[12]), scm__rc.d1561[8]);
  scm__rc.d1561[21] = Scm_MakeExtendedPair(scm__rc.d1561[11], SCM_OBJ(&scm__rc.d1564[9]), SCM_OBJ(&scm__rc.d1564[13]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[14]), scm__rc.d1561[21]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[1]))->name = scm__rc.d1561[11];/* %make-error-message */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]))[3] = SCM_WORD(scm__rc.d1561[12]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]))[10] = SCM_WORD(scm__rc.d1561[14]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]))[27] = SCM_WORD(scm__rc.d1561[14]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]))[33] = SCM_WORD(scm__rc.d1561[16]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[43]))[42] = SCM_WORD(scm__rc.d1561[18]);
  ScmObj G1568 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1565[1]), NULL);

  Scm_MakeBinding(SCM_MODULE(Scm_CurrentModule()) /*  */, SCM_SYMBOL(scm__rc.d1561[11]) /* %make-error-message */, G1568,0);

  scm__rc.d1561[22] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[15])),TRUE); /* make-error */
  scm__rc.d1561[24] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[16])),TRUE); /* <error> */
  scm__rc.d1561[23] = Scm_MakeIdentifier(scm__rc.d1561[24], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#<error> */
  scm__rc.d1561[25] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1562[17]))); /* :message */
  scm__rc.d1561[26] = Scm_MakeIdentifier(scm__rc.d1561[11], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#%make-error-message */
  scm__rc.d1561[27] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1562[18]))); /* :message-prefix */
  scm__rc.d1561[28] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1562[19]))); /* :message-args */
  scm__rc.d1561[30] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[20])),TRUE); /* make */
  scm__rc.d1561[29] = Scm_MakeIdentifier(scm__rc.d1561[30], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#make */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[15]), scm__rc.d1561[20]);
  SCM_SET_CDR(SCM_OBJ(&scm__rc.d1564[15]), scm__rc.d1561[7]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[18]), scm__rc.d1561[8]);
  scm__rc.d1561[31] = Scm_MakeExtendedPair(scm__rc.d1561[22], SCM_OBJ(&scm__rc.d1564[15]), SCM_OBJ(&scm__rc.d1564[19]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[20]), scm__rc.d1561[31]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[2]))->name = scm__rc.d1561[22];/* make-error */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[87]))[1] = SCM_WORD(scm__rc.d1561[23]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[87]))[3] = SCM_WORD(scm__rc.d1561[25]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[87]))[9] = SCM_WORD(scm__rc.d1561[26]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[87]))[12] = SCM_WORD(scm__rc.d1561[27]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[87]))[15] = SCM_WORD(scm__rc.d1561[28]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[87]))[18] = SCM_WORD(scm__rc.d1561[29]);
  ScmObj G1569 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1565[2]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1561[22]) /* make-error */, G1569,0);

  scm__rc.d1561[32] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[21])),TRUE); /* error */
  scm__rc.d1561[34] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[22])),TRUE); /* <condition-meta> */
  scm__rc.d1561[33] = Scm_MakeIdentifier(scm__rc.d1561[34], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#<condition-meta> */
  scm__rc.d1561[36] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[23])),TRUE); /* is-a? */
  scm__rc.d1561[35] = Scm_MakeIdentifier(scm__rc.d1561[36], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#is-a? */
  scm__rc.d1561[37] = Scm_MakeIdentifier(scm__rc.d1561[0], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#%error-scan-keys */
  scm__rc.d1561[38] = Scm_MakeIdentifier(scm__rc.d1561[22], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#make-error */
  scm__rc.d1561[40] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[24])),TRUE); /* raise */
  scm__rc.d1561[39] = Scm_MakeIdentifier(scm__rc.d1561[40], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#raise */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[23]), scm__rc.d1561[8]);
  scm__rc.d1561[41] = Scm_MakeExtendedPair(scm__rc.d1561[32], SCM_OBJ(&scm__rc.d1564[15]), SCM_OBJ(&scm__rc.d1564[24]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[25]), scm__rc.d1561[41]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[3]))->name = scm__rc.d1561[32];/* error */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[4] = SCM_WORD(scm__rc.d1561[33]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[6] = SCM_WORD(scm__rc.d1561[35]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[13] = SCM_WORD(scm__rc.d1561[37]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[21] = SCM_WORD(scm__rc.d1561[29]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[30] = SCM_WORD(scm__rc.d1561[29]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[33] = SCM_WORD(scm__rc.d1561[25]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[40] = SCM_WORD(scm__rc.d1561[26]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[50] = SCM_WORD(scm__rc.d1561[38]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[107]))[55] = SCM_WORD(scm__rc.d1561[39]);
  ScmObj G1570 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1565[3]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1561[32]) /* error */, G1570,0);

  scm__rc.d1561[42] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[25])),TRUE); /* errorf */
  scm__rc.d1561[44] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[26])),TRUE); /* format/ss */
  scm__rc.d1561[43] = Scm_MakeIdentifier(scm__rc.d1561[44], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#format/ss */
  scm__rc.d1561[45] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[27])),TRUE); /* fmt */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[26]), scm__rc.d1561[45]);
  SCM_SET_CDR(SCM_OBJ(&scm__rc.d1564[26]), scm__rc.d1561[7]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[29]), scm__rc.d1561[8]);
  scm__rc.d1561[46] = Scm_MakeExtendedPair(scm__rc.d1561[42], SCM_OBJ(&scm__rc.d1564[26]), SCM_OBJ(&scm__rc.d1564[30]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[31]), scm__rc.d1561[46]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[4]))->name = scm__rc.d1561[42];/* errorf */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[4] = SCM_WORD(scm__rc.d1561[33]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[6] = SCM_WORD(scm__rc.d1561[35]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[13] = SCM_WORD(scm__rc.d1561[37]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[21] = SCM_WORD(scm__rc.d1561[29]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[30] = SCM_WORD(scm__rc.d1561[29]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[33] = SCM_WORD(scm__rc.d1561[25]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[37] = SCM_WORD(scm__rc.d1561[43]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[50] = SCM_WORD(scm__rc.d1561[23]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[52] = SCM_WORD(scm__rc.d1561[25]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[56] = SCM_WORD(scm__rc.d1561[43]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[62] = SCM_WORD(scm__rc.d1561[29]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[164]))[64] = SCM_WORD(scm__rc.d1561[39]);
  ScmObj G1571 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1565[4]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1561[42]) /* errorf */, G1571,0);

   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_SchemeModule())));
  scm__rc.d1561[47] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[28])),TRUE); /* make-vector */
  scm__rc.d1561[48] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[29])),TRUE); /* k */
  scm__rc.d1561[49] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1562[30]))); /* :optional */
  scm__rc.d1561[50] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[31])),TRUE); /* fill */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[32]), scm__rc.d1561[50]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[33]), scm__rc.d1561[49]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[34]), scm__rc.d1561[48]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[37]), scm__rc.d1561[8]);
  scm__rc.d1561[51] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[32])),TRUE); /* bind-info */
  scm__rc.d1561[52] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[33])),TRUE); /* scheme */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[38]), scm__rc.d1561[47]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[39]), scm__rc.d1561[52]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[40]), scm__rc.d1561[51]);
  scm__rc.d1561[53] = Scm_MakeExtendedPair(scm__rc.d1561[47], SCM_OBJ(&scm__rc.d1564[34]), SCM_OBJ(&scm__rc.d1564[42]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_SchemeModule())), SCM_SYMBOL(SCM_INTERN("make-vector")), SCM_OBJ(&libalphamake_vector__STUB), 0);
  libalphamake_vector__STUB.common.info = scm__rc.d1561[53];
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
  scm__rc.d1561[54] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[34])),TRUE); /* getter-with-setter */
  scm__rc.d1561[55] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[35])),TRUE); /* proc */
  scm__rc.d1561[56] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[36])),TRUE); /* set */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[43]), scm__rc.d1561[56]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[44]), scm__rc.d1561[55]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[47]), scm__rc.d1561[8]);
  scm__rc.d1561[57] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[37])),TRUE); /* gauche */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[48]), scm__rc.d1561[54]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[49]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[50]), scm__rc.d1561[51]);
  scm__rc.d1561[58] = Scm_MakeExtendedPair(scm__rc.d1561[54], SCM_OBJ(&scm__rc.d1564[44]), SCM_OBJ(&scm__rc.d1564[52]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("getter-with-setter")), SCM_OBJ(&libalphagetter_with_setter__STUB), 0);
  libalphagetter_with_setter__STUB.common.info = scm__rc.d1561[58];
  scm__rc.d1561[59] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[38])),TRUE); /* setter */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[53]), scm__rc.d1561[55]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[56]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[57]), scm__rc.d1561[59]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[58]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[59]), scm__rc.d1561[51]);
  scm__rc.d1561[60] = Scm_MakeExtendedPair(scm__rc.d1561[59], SCM_OBJ(&scm__rc.d1564[53]), SCM_OBJ(&scm__rc.d1564[61]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("setter")), SCM_OBJ(&libalphasetter__STUB), SCM_BINDING_INLINABLE);
  libalphasetter__STUB.common.info = scm__rc.d1561[60];
  Scm_SetterSet(SCM_PROCEDURE(&libalphasetter__STUB), SCM_PROCEDURE(&libalphasetter_SETTER__STUB), TRUE);
  scm__rc.d1561[61] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[40])),TRUE); /* box */
  scm__rc.d1561[62] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1562[41]))); /* :rest */
  scm__rc.d1561[63] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[41])),TRUE); /* rest */
  scm__rc.d1561[64] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1562[42]))); /* :optarray */
  scm__rc.d1561[65] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[43])),TRUE); /* argv */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[62]), scm__rc.d1561[65]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[63]), scm__rc.d1561[64]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[64]), scm__rc.d1561[63]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[65]), scm__rc.d1561[62]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[68]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[69]), scm__rc.d1561[61]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[70]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[71]), scm__rc.d1561[51]);
  scm__rc.d1561[66] = Scm_MakeExtendedPair(scm__rc.d1561[61], SCM_OBJ(&scm__rc.d1564[65]), SCM_OBJ(&scm__rc.d1564[73]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("box")), SCM_OBJ(&libalphabox__STUB), 0);
  libalphabox__STUB.common.info = scm__rc.d1561[66];
  scm__rc.d1561[67] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[44])),TRUE); /* box? */
  scm__rc.d1561[68] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[45])),TRUE); /* v */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[74]), scm__rc.d1561[68]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[77]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[78]), scm__rc.d1561[67]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[79]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[80]), scm__rc.d1561[51]);
  scm__rc.d1561[69] = Scm_MakeExtendedPair(scm__rc.d1561[67], SCM_OBJ(&scm__rc.d1564[74]), SCM_OBJ(&scm__rc.d1564[82]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("box?")), SCM_OBJ(&libalphaboxP__STUB), 0);
  libalphaboxP__STUB.common.info = scm__rc.d1561[69];
  scm__rc.d1561[70] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[46])),TRUE); /* unbox */
  scm__rc.d1561[71] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[47])),TRUE); /* b */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[83]), scm__rc.d1561[71]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[86]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[87]), scm__rc.d1561[70]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[88]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[89]), scm__rc.d1561[51]);
  scm__rc.d1561[72] = Scm_MakeExtendedPair(scm__rc.d1561[70], SCM_OBJ(&scm__rc.d1564[83]), SCM_OBJ(&scm__rc.d1564[91]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("unbox")), SCM_OBJ(&libalphaunbox__STUB), 0);
  libalphaunbox__STUB.common.info = scm__rc.d1561[72];
  scm__rc.d1561[73] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[48])),TRUE); /* set-box! */
  scm__rc.d1561[74] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[49])),TRUE); /* vs */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[92]), scm__rc.d1561[74]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[93]), scm__rc.d1561[62]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[94]), scm__rc.d1561[71]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[97]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[98]), scm__rc.d1561[73]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[99]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[100]), scm__rc.d1561[51]);
  scm__rc.d1561[75] = Scm_MakeExtendedPair(scm__rc.d1561[73], SCM_OBJ(&scm__rc.d1564[94]), SCM_OBJ(&scm__rc.d1564[102]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("set-box!")), SCM_OBJ(&libalphaset_boxX__STUB), 0);
  libalphaset_boxX__STUB.common.info = scm__rc.d1561[75];
  scm__rc.d1561[76] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[50])),TRUE); /* box-arity */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[105]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[106]), scm__rc.d1561[76]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[107]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[108]), scm__rc.d1561[51]);
  scm__rc.d1561[77] = Scm_MakeExtendedPair(scm__rc.d1561[76], SCM_OBJ(&scm__rc.d1564[83]), SCM_OBJ(&scm__rc.d1564[110]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("box-arity")), SCM_OBJ(&libalphabox_arity__STUB), 0);
  libalphabox_arity__STUB.common.info = scm__rc.d1561[77];
  scm__rc.d1561[78] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[51])),TRUE); /* unbox-value */
  scm__rc.d1561[79] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[52])),TRUE); /* i */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[111]), scm__rc.d1561[79]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[112]), scm__rc.d1561[71]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[115]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[116]), scm__rc.d1561[78]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[117]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[118]), scm__rc.d1561[51]);
  scm__rc.d1561[80] = Scm_MakeExtendedPair(scm__rc.d1561[78], SCM_OBJ(&scm__rc.d1564[112]), SCM_OBJ(&scm__rc.d1564[120]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("unbox-value")), SCM_OBJ(&libalphaunbox_value__STUB), 0);
  libalphaunbox_value__STUB.common.info = scm__rc.d1561[80];
  scm__rc.d1561[81] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[53])),TRUE); /* set-box-value! */
  scm__rc.d1561[82] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[54])),TRUE); /* val */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[121]), scm__rc.d1561[82]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[122]), scm__rc.d1561[79]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[123]), scm__rc.d1561[71]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[126]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[127]), scm__rc.d1561[81]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[128]), scm__rc.d1561[57]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[129]), scm__rc.d1561[51]);
  scm__rc.d1561[83] = Scm_MakeExtendedPair(scm__rc.d1561[81], SCM_OBJ(&scm__rc.d1564[123]), SCM_OBJ(&scm__rc.d1564[131]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("set-box-value!")), SCM_OBJ(&libalphaset_box_valueX__STUB), 0);
  libalphaset_box_valueX__STUB.common.info = scm__rc.d1561[83];
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1561[84] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[56])),TRUE); /* case-lambda-dispatcher */
  scm__rc.d1561[85] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[55])),TRUE); /* make-case-lambda-dispatcher */
  scm__rc.d1561[86] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[57])),TRUE); /* dispatch-vector */
  scm__rc.d1561[87] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[58])),TRUE); /* min-reqargs */
  scm__rc.d1561[88] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[59])),TRUE); /* name */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[132]), scm__rc.d1561[88]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[133]), scm__rc.d1561[87]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[134]), scm__rc.d1561[86]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[137]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[138]), scm__rc.d1561[85]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[139]), scm__rc.d1561[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[140]), scm__rc.d1561[51]);
  scm__rc.d1561[89] = Scm_MakeExtendedPair(scm__rc.d1561[85], SCM_OBJ(&scm__rc.d1564[134]), SCM_OBJ(&scm__rc.d1564[142]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("make-case-lambda-dispatcher")), SCM_OBJ(&libalphamake_case_lambda_dispatcher__STUB), 0);
  libalphamake_case_lambda_dispatcher__STUB.common.info = scm__rc.d1561[89];
  scm__rc.d1561[90] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[60])),TRUE); /* make-case-lambda */
  scm__rc.d1561[91] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[62])),TRUE); /* lambda */
  scm__rc.d1561[92] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[63])),TRUE); /* minarg */
  scm__rc.d1561[93] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[64])),TRUE); /* maxarg */
  scm__rc.d1561[94] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[65])),TRUE); /* formals */
  scm__rc.d1561[95] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[66])),TRUE); /* closures */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[144]), scm__rc.d1561[88]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[146]), scm__rc.d1561[49]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[147]), scm__rc.d1561[95]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[148]), scm__rc.d1561[94]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[149]), scm__rc.d1561[93]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[150]), scm__rc.d1561[92]);
  scm__rc.d1561[96] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[67])),TRUE); /* define */
  scm__rc.d1561[97] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[68])),TRUE); /* fill-dispatch-vector! */
  scm__rc.d1561[98] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[69])),TRUE); /* closure */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[151]), scm__rc.d1561[98]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[152]), scm__rc.d1561[94]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[153]), scm__rc.d1561[68]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[154]), scm__rc.d1561[97]);
  scm__rc.d1561[99] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[70])),TRUE); /* %set */
  scm__rc.d1561[100] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[71])),TRUE); /* n */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[155]), scm__rc.d1561[100]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[156]), scm__rc.d1561[99]);
  scm__rc.d1561[101] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[72])),TRUE); /* let1 */
  scm__rc.d1561[102] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[73])),TRUE); /* - */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[157]), scm__rc.d1561[92]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[158]), scm__rc.d1561[100]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[159]), scm__rc.d1561[102]);
  scm__rc.d1561[103] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[74])),TRUE); /* unless */
  scm__rc.d1561[104] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[75])),TRUE); /* vector-ref */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[160]), scm__rc.d1561[68]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[161]), scm__rc.d1561[104]);
  scm__rc.d1561[105] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[76])),TRUE); /* vector-set! */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[162]), scm__rc.d1561[79]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[163]), scm__rc.d1561[68]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[164]), scm__rc.d1561[105]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[167]), scm__rc.d1561[103]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[170]), scm__rc.d1561[79]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[171]), scm__rc.d1561[101]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[174]), scm__rc.d1561[96]);
  scm__rc.d1561[106] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[77])),TRUE); /* let */
  scm__rc.d1561[107] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[78])),TRUE); /* loop */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[175]), scm__rc.d1561[94]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[176]), scm__rc.d1561[94]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[178]), scm__rc.d1561[100]);
  scm__rc.d1561[108] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[79])),TRUE); /* cond */
  scm__rc.d1561[109] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[80])),TRUE); /* > */
  scm__rc.d1561[110] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[81])),TRUE); /* + */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[182]), scm__rc.d1561[93]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[183]), scm__rc.d1561[110]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[185]), scm__rc.d1561[100]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[186]), scm__rc.d1561[109]);
  scm__rc.d1561[111] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[82])),TRUE); /* null? */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[188]), scm__rc.d1561[111]);
  scm__rc.d1561[112] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[83])),TRUE); /* pair? */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[191]), scm__rc.d1561[112]);
  scm__rc.d1561[113] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[84])),TRUE); /* cdr */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[192]), scm__rc.d1561[113]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[193]), scm__rc.d1561[100]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[194]), scm__rc.d1561[110]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[197]), scm__rc.d1561[107]);
  scm__rc.d1561[114] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[85])),TRUE); /* else */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[200]), scm__rc.d1561[94]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[201]), scm__rc.d1561[107]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[204]), scm__rc.d1561[114]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[209]), scm__rc.d1561[108]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[212]), scm__rc.d1561[107]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[213]), scm__rc.d1561[106]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[217]), scm__rc.d1561[96]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[218]), scm__rc.d1561[93]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[219]), scm__rc.d1561[102]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[222]), scm__rc.d1561[110]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[224]), scm__rc.d1561[47]);
  scm__rc.d1561[115] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[86])),TRUE); /* fs */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[225]), scm__rc.d1561[115]);
  scm__rc.d1561[116] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[87])),TRUE); /* cs */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[226]), scm__rc.d1561[95]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[227]), scm__rc.d1561[116]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[230]), scm__rc.d1561[115]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[231]), scm__rc.d1561[111]);
  scm__rc.d1561[117] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[88])),TRUE); /* car */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[232]), scm__rc.d1561[117]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[233]), scm__rc.d1561[116]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[234]), scm__rc.d1561[117]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[237]), scm__rc.d1561[68]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[238]), scm__rc.d1561[97]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[239]), scm__rc.d1561[113]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[240]), scm__rc.d1561[113]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[243]), scm__rc.d1561[107]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[247]), scm__rc.d1561[103]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[250]), scm__rc.d1561[107]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[251]), scm__rc.d1561[106]);
  scm__rc.d1561[118] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[89])),TRUE); /* with-module */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[252]), scm__rc.d1561[118]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[253]), scm__rc.d1561[92]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[254]), scm__rc.d1561[68]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[259]), scm__rc.d1561[68]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[260]), scm__rc.d1561[101]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[264]), scm__rc.d1561[91]);
  scm__rc.d1561[119] = Scm_MakeIdentifier(scm__rc.d1561[32], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#error */
  scm__rc.d1561[120] = Scm_MakeIdentifier(scm__rc.d1561[47], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#make-vector */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[265]), scm__rc.d1561[99]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[266]), scm__rc.d1561[90]);
  scm__rc.d1561[121] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1564[266]), SCM_OBJ(&scm__rc.d1564[155]), SCM_OBJ(&scm__rc.d1564[6]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[267]), scm__rc.d1561[121]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[5]))->name = scm__rc.d1561[99];/* (make-case-lambda %set) */
  scm__rc.d1561[122] = Scm_MakeIdentifier(scm__rc.d1561[85], SCM_MODULE(Scm_GaucheInternalModule()), SCM_NIL); /* gauche.internal#make-case-lambda-dispatcher */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[271]), scm__rc.d1561[8]);
  scm__rc.d1561[123] = Scm_MakeExtendedPair(scm__rc.d1561[90], SCM_OBJ(&scm__rc.d1564[150]), SCM_OBJ(&scm__rc.d1564[272]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[273]), scm__rc.d1561[123]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[6]))->name = scm__rc.d1561[90];/* make-case-lambda */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]))[28] = SCM_WORD(scm__rc.d1561[119]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]))[38] = SCM_WORD(scm__rc.d1561[120]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[245]))[105] = SCM_WORD(scm__rc.d1561[122]);
  ScmObj G1575 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1565[6]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())) /* gauche.internal */, SCM_SYMBOL(scm__rc.d1561[90]) /* make-case-lambda */, G1575,0);

  scm__rc.d1561[124] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[90])),TRUE); /* case-lambda-info */
  scm__rc.d1561[126] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[91])),TRUE); /* subr? */
  scm__rc.d1561[125] = Scm_MakeIdentifier(scm__rc.d1561[126], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#subr? */
  scm__rc.d1561[128] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[92])),TRUE); /* procedure-info */
  scm__rc.d1561[127] = Scm_MakeIdentifier(scm__rc.d1561[128], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#procedure-info */
  scm__rc.d1561[130] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[93])),TRUE); /* integer? */
  scm__rc.d1561[129] = Scm_MakeIdentifier(scm__rc.d1561[130], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#integer? */
  scm__rc.d1561[132] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[94])),TRUE); /* reverse */
  scm__rc.d1561[131] = Scm_MakeIdentifier(scm__rc.d1561[132], SCM_MODULE(scm__rc.d1561[3]), SCM_NIL); /* gauche.internal#reverse */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[276]), scm__rc.d1561[8]);
  scm__rc.d1561[133] = Scm_MakeExtendedPair(scm__rc.d1561[124], SCM_OBJ(&scm__rc.d1564[53]), SCM_OBJ(&scm__rc.d1564[277]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[278]), scm__rc.d1561[133]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[7]))->name = scm__rc.d1561[124];/* case-lambda-info */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]))[4] = SCM_WORD(scm__rc.d1561[125]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]))[10] = SCM_WORD(scm__rc.d1561[127]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]))[23] = SCM_WORD(scm__rc.d1561[129]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1563[352]))[70] = SCM_WORD(scm__rc.d1561[131]);
  ScmObj G1576 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1565[7]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1561[124]) /* case-lambda-info */, G1576,0);

  scm__rc.d1561[134] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[95])),TRUE); /* %toplevel */
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1565[8]))->name = scm__rc.d1561[134];/* %toplevel */
  scm__rc.d1561[135] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[96])),TRUE); /* %make-macro-transformer */
  scm__rc.d1561[136] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[97])),TRUE); /* transformer */
  scm__rc.d1561[137] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[98])),TRUE); /* src */
  scm__rc.d1561[138] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1562[99])),TRUE); /* describer */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[279]), scm__rc.d1561[138]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[280]), scm__rc.d1561[137]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[281]), scm__rc.d1561[49]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[282]), scm__rc.d1561[136]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[283]), scm__rc.d1561[88]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[286]), scm__rc.d1561[8]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[287]), scm__rc.d1561[135]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[288]), scm__rc.d1561[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1564[289]), scm__rc.d1561[51]);
  scm__rc.d1561[139] = Scm_MakeExtendedPair(scm__rc.d1561[135], SCM_OBJ(&scm__rc.d1564[283]), SCM_OBJ(&scm__rc.d1564[291]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("%make-macro-transformer")), SCM_OBJ(&libalpha_25make_macro_transformer__STUB), 0);
  libalpha_25make_macro_transformer__STUB.common.info = scm__rc.d1561[139];
  Scm_VMExecuteToplevels(toplevels);
}
