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

#line 37 "libmacbase.scm"
#include "gauche/priv/macroP.h"

static ScmObj libmacbaseunwrap_syntax(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbaseunwrap_syntax__STUB, 1, 2,SCM_FALSE,libmacbaseunwrap_syntax, NULL, NULL);

static ScmObj libmacbaseunwrap_syntax_1(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbaseunwrap_syntax_1__STUB, 1, 0,SCM_FALSE,libmacbaseunwrap_syntax_1, NULL, NULL);

static ScmObj libmacbasemacroP(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbasemacroP__STUB, 1, 0,SCM_FALSE,libmacbasemacroP, NULL, NULL);

static ScmObj libmacbasesyntaxP(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbasesyntaxP__STUB, 1, 0,SCM_FALSE,libmacbasesyntaxP, NULL, NULL);

static ScmObj libmacbasecompile_syntax_rules(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbasecompile_syntax_rules__STUB, 7, 0,SCM_FALSE,libmacbasecompile_syntax_rules, NULL, NULL);

static ScmObj libmacbasemacro_transformer(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmacbasemacro_transformer__STUB, 1, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmacbasemacro_transformer, NULL, NULL);

static ScmObj libmacbasemacro_name(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmacbasemacro_name__STUB, 1, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmacbasemacro_name, NULL, NULL);

static ScmObj libmacbaseidentifier_macroP(ScmObj*, int, void*);
static SCM_DEFINE_SUBRX(libmacbaseidentifier_macroP__STUB, 1, 0,0, SCM_FALSE,SCM_SUBR_IMMEDIATE_ARG, libmacbaseidentifier_macroP, NULL, NULL);

static ScmObj libmacbasemake_syntax(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbasemake_syntax__STUB, 3, 0,SCM_FALSE,libmacbasemake_syntax, NULL, NULL);

static ScmObj libmacbasemake_syntactic_closure(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbasemake_syntactic_closure__STUB, 3, 0,SCM_FALSE,libmacbasemake_syntactic_closure, NULL, NULL);

static ScmObj libmacbasecall_syntax_handler(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbasecall_syntax_handler__STUB, 3, 0,SCM_FALSE,libmacbasecall_syntax_handler, NULL, NULL);

static ScmObj libmacbasesyntax_handler(ScmObj*, int, void*);
static SCM_DEFINE_SUBR(libmacbasesyntax_handler__STUB, 1, 0,SCM_FALSE,libmacbasesyntax_handler, 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 d1616[117];
} scm__sc SCM_UNUSED = {
  {   /* ScmString d1616 */
      SCM_STRING_CONST_INITIALIZER("macroexpand", 11, 11),
      SCM_STRING_CONST_INITIALIZER("too many arguments for", 22, 22),
      SCM_STRING_CONST_INITIALIZER("lambda", 6, 6),
      SCM_STRING_CONST_INITIALIZER("form", 4, 4),
      SCM_STRING_CONST_INITIALIZER("optional", 8, 8),
      SCM_STRING_CONST_INITIALIZER("env/flag", 8, 8),
      SCM_STRING_CONST_INITIALIZER("%do-macroexpand", 15, 15),
      SCM_STRING_CONST_INITIALIZER("error", 5, 5),
      SCM_STRING_CONST_INITIALIZER("gauche.internal", 15, 15),
      SCM_STRING_CONST_INITIALIZER("source-info", 11, 11),
      SCM_STRING_CONST_INITIALIZER("libmacbase.scm", 14, 14),
      SCM_STRING_CONST_INITIALIZER("unused-args", 11, 11),
      SCM_STRING_CONST_INITIALIZER("macroexpand-1", 13, 13),
      SCM_STRING_CONST_INITIALIZER("boolean\077", 8, 8),
      SCM_STRING_CONST_INITIALIZER("vm-current-module", 17, 17),
      SCM_STRING_CONST_INITIALIZER("module\077", 7, 7),
      SCM_STRING_CONST_INITIALIZER("argument must be a boolean or a module, but got:", 48, 48),
      SCM_STRING_CONST_INITIALIZER("make-cenv", 9, 9),
      SCM_STRING_CONST_INITIALIZER("%internal-macro-expand", 22, 22),
      SCM_STRING_CONST_INITIALIZER("unravel-syntax", 14, 14),
      SCM_STRING_CONST_INITIALIZER("once\077", 5, 5),
      SCM_STRING_CONST_INITIALIZER("unwrap-syntax", 13, 13),
      SCM_STRING_CONST_INITIALIZER("to_immutable", 12, 12),
      SCM_STRING_CONST_INITIALIZER("bind-info", 9, 9),
      SCM_STRING_CONST_INITIALIZER("gauche", 6, 6),
      SCM_STRING_CONST_INITIALIZER("<top>", 5, 5),
      SCM_STRING_CONST_INITIALIZER("*", 1, 1),
      SCM_STRING_CONST_INITIALIZER("->", 2, 2),
      SCM_STRING_CONST_INITIALIZER("unwrap-syntax-1", 15, 15),
      SCM_STRING_CONST_INITIALIZER("obj", 3, 3),
      SCM_STRING_CONST_INITIALIZER("wrapped-identifier\077", 19, 19),
      SCM_STRING_CONST_INITIALIZER("vector-map", 10, 10),
      SCM_STRING_CONST_INITIALIZER("rec", 3, 3),
      SCM_STRING_CONST_INITIALIZER("eq\077", 3, 3),
      SCM_STRING_CONST_INITIALIZER("make-hash-table", 15, 15),
      SCM_STRING_CONST_INITIALIZER("hash-table-get", 14, 14),
      SCM_STRING_CONST_INITIALIZER("make-identifier", 15, 15),
      SCM_STRING_CONST_INITIALIZER("global-identifier=\077", 19, 19),
      SCM_STRING_CONST_INITIALIZER("hash-table-put!", 15, 15),
      SCM_STRING_CONST_INITIALIZER("id->sym", 7, 7),
      SCM_STRING_CONST_INITIALIZER("i", 1, 1),
      SCM_STRING_CONST_INITIALIZER("_", 1, 1),
      SCM_STRING_CONST_INITIALIZER("c", 1, 1),
      SCM_STRING_CONST_INITIALIZER("hash-table-fold", 15, 15),
      SCM_STRING_CONST_INITIALIZER(".", 1, 1),
      SCM_STRING_CONST_INITIALIZER("symbol-append", 13, 13),
      SCM_STRING_CONST_INITIALIZER("id", 2, 2),
      SCM_STRING_CONST_INITIALIZER("macro\077", 6, 6),
      SCM_STRING_CONST_INITIALIZER("<boolean>", 9, 9),
      SCM_STRING_CONST_INITIALIZER("syntax\077", 7, 7),
      SCM_STRING_CONST_INITIALIZER("compile-syntax-rules", 20, 20),
      SCM_STRING_CONST_INITIALIZER("name", 4, 4),
      SCM_STRING_CONST_INITIALIZER("src", 3, 3),
      SCM_STRING_CONST_INITIALIZER("ellipsis", 8, 8),
      SCM_STRING_CONST_INITIALIZER("literals", 8, 8),
      SCM_STRING_CONST_INITIALIZER("rules", 5, 5),
      SCM_STRING_CONST_INITIALIZER("mod", 3, 3),
      SCM_STRING_CONST_INITIALIZER("env", 3, 3),
      SCM_STRING_CONST_INITIALIZER("macro-transformer", 17, 17),
      SCM_STRING_CONST_INITIALIZER("mac", 3, 3),
      SCM_STRING_CONST_INITIALIZER("<macro>", 7, 7),
      SCM_STRING_CONST_INITIALIZER("macro-name", 10, 10),
      SCM_STRING_CONST_INITIALIZER("identifier-macro\077", 17, 17),
      SCM_STRING_CONST_INITIALIZER("*trace-macro*", 13, 13),
      SCM_STRING_CONST_INITIALIZER("%toplevel", 9, 9),
      SCM_STRING_CONST_INITIALIZER("%macro-traced\077", 14, 14),
      SCM_STRING_CONST_INITIALIZER("regexp\077", 7, 7),
      SCM_STRING_CONST_INITIALIZER("symbol->string", 14, 14),
      SCM_STRING_CONST_INITIALIZER("z", 1, 1),
      SCM_STRING_CONST_INITIALIZER("find", 4, 4),
      SCM_STRING_CONST_INITIALIZER("call-macro-expander", 19, 19),
      SCM_STRING_CONST_INITIALIZER("extended-pair\077", 14, 14),
      SCM_STRING_CONST_INITIALIZER("extended-cons", 13, 13),
      SCM_STRING_CONST_INITIALIZER("original", 8, 8),
      SCM_STRING_CONST_INITIALIZER("pair-attribute-set!", 19, 19),
      SCM_STRING_CONST_INITIALIZER("Macro input>>>\012", 15, 15),
      SCM_STRING_CONST_INITIALIZER("current-trace-port", 18, 18),
      SCM_STRING_CONST_INITIALIZER("display", 7, 7),
      SCM_STRING_CONST_INITIALIZER("port", 4, 4),
      SCM_STRING_CONST_INITIALIZER("level", 5, 5),
      SCM_STRING_CONST_INITIALIZER("length", 6, 6),
      SCM_STRING_CONST_INITIALIZER("pprint", 6, 6),
      SCM_STRING_CONST_INITIALIZER("\012Macro output<<<\012", 17, 17),
      SCM_STRING_CONST_INITIALIZER("\012", 1, 1),
      SCM_STRING_CONST_INITIALIZER("flush", 5, 5),
      SCM_STRING_CONST_INITIALIZER("expr", 4, 4),
      SCM_STRING_CONST_INITIALIZER("cenv", 4, 4),
      SCM_STRING_CONST_INITIALIZER("call-id-macro-expander", 22, 22),
      SCM_STRING_CONST_INITIALIZER("Non-identifier-macro can't appear in this context:", 50, 50),
      SCM_STRING_CONST_INITIALIZER("make-syntax", 11, 11),
      SCM_STRING_CONST_INITIALIZER("module", 6, 6),
      SCM_STRING_CONST_INITIALIZER("proc", 4, 4),
      SCM_STRING_CONST_INITIALIZER("<symbol>", 8, 8),
      SCM_STRING_CONST_INITIALIZER("<module>", 8, 8),
      SCM_STRING_CONST_INITIALIZER("make-syntactic-closure", 22, 22),
      SCM_STRING_CONST_INITIALIZER("call-syntax-handler", 19, 19),
      SCM_STRING_CONST_INITIALIZER("syn", 3, 3),
      SCM_STRING_CONST_INITIALIZER("program", 7, 7),
      SCM_STRING_CONST_INITIALIZER("syntax-handler", 14, 14),
      SCM_STRING_CONST_INITIALIZER("trace-macro", 11, 11),
      SCM_STRING_CONST_INITIALIZER("G1638", 5, 5),
      SCM_STRING_CONST_INITIALIZER("x", 1, 1),
      SCM_STRING_CONST_INITIALIZER("procedure\077", 10, 10),
      SCM_STRING_CONST_INITIALIZER("every", 5, 5),
      SCM_STRING_CONST_INITIALIZER("Argument(s) of trace-macro should be a boolean, or symbols or regexps, but got:", 79, 79),
      SCM_STRING_CONST_INITIALIZER("list\077", 5, 5),
      SCM_STRING_CONST_INITIALIZER("delete-duplicates", 17, 17),
      SCM_STRING_CONST_INITIALIZER("G1636", 5, 5),
      SCM_STRING_CONST_INITIALIZER("objs", 4, 4),
      SCM_STRING_CONST_INITIALIZER("equal\077", 6, 6),
      SCM_STRING_CONST_INITIALIZER("match:error", 11, 11),
      SCM_STRING_CONST_INITIALIZER("util.match", 10, 10),
      SCM_STRING_CONST_INITIALIZER("args", 4, 4),
      SCM_STRING_CONST_INITIALIZER("untrace-macro", 13, 13),
      SCM_STRING_CONST_INITIALIZER("member", 6, 6),
      SCM_STRING_CONST_INITIALIZER("G1646", 5, 5),
      SCM_STRING_CONST_INITIALIZER("remove", 6, 6),
  },
};
static struct scm__rcRec {
  ScmCompiledCode d1619[18];
  ScmWord d1618[742];
  ScmPair d1617[240] SCM_ALIGN_PAIR;
  ScmObj d1615[255];
} scm__rc SCM_UNUSED = {
  {   /* ScmCompiledCode d1619 */
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* macroexpand */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[0])), 35,
            16, 1, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[17]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* macroexpand-1 */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[35])), 36,
            16, 1, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[29]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %do-macroexpand */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[71])), 53,
            22, 3, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[37]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* rec */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[124])), 39,
            11, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[61]),
            SCM_OBJ(&scm__rc.d1619[6]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* #f */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[163])), 12,
            10, 3, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[76]),
            SCM_OBJ(&scm__rc.d1619[5]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* id->sym */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[175])), 67,
            27, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[84]),
            SCM_OBJ(&scm__rc.d1619[6]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* unravel-syntax */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[242])), 17,
            15, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[89]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %toplevel */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[259])), 4,
            0, 0, 0, SCM_FALSE, SCM_NIL, SCM_FALSE,
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* #f */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[263])), 25,
            10, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[152]),
            SCM_OBJ(&scm__rc.d1619[9]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %macro-traced? */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[288])), 25,
            16, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[157]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* call-macro-expander */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[313])), 155,
            30, 3, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[165]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* call-id-macro-expander */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[468])), 22,
            11, 2, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[171]),
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* (trace-macro G1638) */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[490])), 7,
            4, 1, 0, SCM_OBJ(&scm__rc.d1617[214]), SCM_NIL, SCM_OBJ(&scm__rc.d1617[220]),
            SCM_OBJ(&scm__rc.d1619[15]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* G1636 */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[497])), 50,
            14, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[225]),
            SCM_OBJ(&scm__rc.d1619[14]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* trace-macro */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[547])), 123,
            15, 0, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[230]),
            SCM_OBJ(&scm__rc.d1619[15]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* %toplevel */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[670])), 7,
            4, 0, 0, SCM_FALSE, SCM_NIL, SCM_FALSE,
            SCM_FALSE, SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* #f */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[677])), 5,
            5, 1, 0, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[234]),
            SCM_OBJ(&scm__rc.d1619[17]), SCM_FALSE),
        SCM_COMPILED_CODE_CONST_INITIALIZER(  /* untrace-macro */
            (ScmWord*)(SCM_OBJ(&scm__rc.d1618[682])), 60,
            11, 0, 1, SCM_FALSE, SCM_NIL, SCM_OBJ(&scm__rc.d1617[239]),
            SCM_FALSE, SCM_FALSE),
  },
  {   /* ScmWord d1618 */
    /* macroexpand */
    0x0000003d    /*   0 (LREF0) */,
    0x00000022    /*   1 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]) + 6),
    0x00000004    /*   3 (CONSTF) */,
    0x00000013    /*   4 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]) + 7),
    0x0000006a    /*   6 (LREF0-CAR) */,
    0x0000000d    /*   7 (PUSH) */,
    0x0000003d    /*   8 (LREF0) */,
    0x00000022    /*   9 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]) + 14),
    0x00000003    /*  11 (CONSTN) */,
    0x00000013    /*  12 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]) + 15),
    0x00000076    /*  14 (LREF0-CDR) */,
    0x00002018    /*  15 (PUSH-LOCAL-ENV 2) */,
    0x0000003d    /*  16 (LREF0) */,
    0x00000022    /*  17 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]) + 21),
    0x00000013    /*  19 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]) + 29),
    0x0000200e    /*  21 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]) + 29),
    0x00000006    /*  23 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[1])) /* "too many arguments for" */,
    0x00000006    /*  25 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1617[10])) /* (lambda (form :optional (env/flag #f)) (%do-macroexpand form env/flag #f)) */,
    0x0000205f    /*  27 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#error.a6d11100> */,
    0x0000004d    /*  29 (LREF11-PUSH) */,
    0x00000049    /*  30 (LREF1-PUSH) */,
    0x00000009    /*  31 (CONSTF-PUSH) */,
    0x00003060    /*  32 (GREF-TAIL-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%do-macroexpand.a6d263e0> */,
    0x00000014    /*  34 (RET) */,
    /* macroexpand-1 */
    0x0000003d    /*   0 (LREF0) */,
    0x00000022    /*   1 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]) + 6),
    0x00000004    /*   3 (CONSTF) */,
    0x00000013    /*   4 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]) + 7),
    0x0000006a    /*   6 (LREF0-CAR) */,
    0x0000000d    /*   7 (PUSH) */,
    0x0000003d    /*   8 (LREF0) */,
    0x00000022    /*   9 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]) + 14),
    0x00000003    /*  11 (CONSTN) */,
    0x00000013    /*  12 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]) + 15),
    0x00000076    /*  14 (LREF0-CDR) */,
    0x00002018    /*  15 (PUSH-LOCAL-ENV 2) */,
    0x0000003d    /*  16 (LREF0) */,
    0x00000022    /*  17 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]) + 21),
    0x00000013    /*  19 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]) + 29),
    0x0000200e    /*  21 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]) + 29),
    0x00000006    /*  23 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[1])) /* "too many arguments for" */,
    0x00000006    /*  25 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1617[24])) /* (lambda (form :optional (env/flag #f)) (%do-macroexpand form env/flag #t)) */,
    0x0000205f    /*  27 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#error.a685eb20> */,
    0x0000004d    /*  29 (LREF11-PUSH) */,
    0x00000049    /*  30 (LREF1-PUSH) */,
    0x00000006    /*  31 (CONST-PUSH) */,
    SCM_WORD(SCM_TRUE) /* #t */,
    0x00003060    /*  33 (GREF-TAIL-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%do-macroexpand.a685e160> */,
    0x00000014    /*  35 (RET) */,
    /* %do-macroexpand */
    0x0000100e    /*   0 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 5),
    0x00000049    /*   2 (LREF1-PUSH) */,
    0x0000105f    /*   3 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#boolean?.a6a9a320> */,
    0x0000001e    /*   5 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 13),
    0x0000000e    /*   7 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 30),
    0x0000005f    /*   9 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#vm-current-module.a6a9a2c0> */,
    0x00000013    /*  11 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 30),
    0x0000100e    /*  13 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 18),
    0x00000049    /*  15 (LREF1-PUSH) */,
    0x0000105f    /*  16 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#module?.a6a9a260> */,
    0x0000001e    /*  18 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 23),
    0x0000003e    /*  20 (LREF1) */,
    0x00000013    /*  21 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 30),
    0x0000200e    /*  23 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 30),
    0x00000006    /*  25 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[16])) /* "argument must be a boolean or a module, but got:" */,
    0x00000049    /*  27 (LREF1-PUSH) */,
    0x0000205f    /*  28 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#error.a6a9a1a0> */,
    0x00001018    /*  30 (PUSH-LOCAL-ENV 1) */,
    0x0000300e    /*  31 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 43),
    0x0000004e    /*  33 (LREF12-PUSH) */,
    0x0000100e    /*  34 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 39),
    0x00000048    /*  36 (LREF0-PUSH) */,
    0x0000105f    /*  37 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make-cenv.a6a9a0c0> */,
    0x0000000d    /*  39 (PUSH) */,
    0x0000004c    /*  40 (LREF10-PUSH) */,
    0x0000305f    /*  41 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%internal-macro-expand.a6a9a120> */,
    0x00001018    /*  43 (PUSH-LOCAL-ENV 1) */,
    0x00000045    /*  44 (LREF21) */,
    0x0000002e    /*  45 (BNEQC) */,
    SCM_WORD(SCM_FALSE) /* #f */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]) + 52)  /*     52 */,
    0x00000048    /*  48 (LREF0-PUSH) */,
    0x00001060    /*  49 (GREF-TAIL-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#unravel-syntax.a6a9fee0> */,
    0x00000014    /*  51 (RET) */,
    0x00000053    /*  52 (LREF0-RET) */,
    /* (unravel-syntax rec) */
    0x0000100e    /*   0 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]) + 5),
    0x00000048    /*   2 (LREF0-PUSH) */,
    0x0000105f    /*   3 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#wrapped-identifier?.a85509c0> */,
    0x0000001e    /*   5 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]) + 11),
    0x00000048    /*   7 (LREF0-PUSH) */,
    0x00000042    /*   8 (LREF11) */,
    0x00001012    /*   9 (TAIL-CALL 1) */,
    0x00000014    /*  10 (RET) */,
    0x0000003d    /*  11 (LREF0) */,
    0x00000098    /*  12 (PAIRP) */,
    0x0000001e    /*  13 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]) + 29),
    0x0000100e    /*  15 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]) + 21),
    0x0000006a    /*  17 (LREF0-CAR) */,
    0x0000000d    /*  18 (PUSH) */,
    0x00000041    /*  19 (LREF10) */,
    0x0000101c    /*  20 (LOCAL-ENV-CALL 1) */,
    0x0000100f    /*  21 (PUSH-PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]) + 27),
    0x00000076    /*  23 (LREF0-CDR) */,
    0x0000000d    /*  24 (PUSH) */,
    0x00000041    /*  25 (LREF10) */,
    0x0000101c    /*  26 (LOCAL-ENV-CALL 1) */,
    0x00000066    /*  27 (CONS) */,
    0x00000014    /*  28 (RET) */,
    0x0000003d    /*  29 (LREF0) */,
    0x0000009d    /*  30 (VECTORP) */,
    0x0000001e    /*  31 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]) + 38),
    0x0000004c    /*  33 (LREF10-PUSH) */,
    0x00000048    /*  34 (LREF0-PUSH) */,
    0x00002060    /*  35 (GREF-TAIL-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#vector-map.a85504e0> */,
    0x00000014    /*  37 (RET) */,
    0x00000053    /*  38 (LREF0-RET) */,
    /* (unravel-syntax id->sym #f) */
    0x0000100e    /*   0 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[163]) + 5),
    0x0000004a    /*   2 (LREF2-PUSH) */,
    0x0000105f    /*   3 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#unwrap-syntax.a854e5c0> */,
    0x0000000d    /*   5 (PUSH) */,
    0x00000041    /*   6 (LREF10) */,
    0x00000020    /*   7 (BNEQ) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[163]) + 11),
    0x000010bd    /*   9 (LREF0-NUMADDI 1) */,
    0x00000014    /*  10 (RET) */,
    0x00000053    /*  11 (LREF0-RET) */,
    /* (unravel-syntax id->sym) */
    0x0000300e    /*   0 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 7),
    0x0000004c    /*   2 (LREF10-PUSH) */,
    0x00000048    /*   3 (LREF0-PUSH) */,
    0x00000009    /*   4 (CONSTF-PUSH) */,
    0x0000305f    /*   5 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#hash-table-get.a854a860> */,
    0x00000031    /*   7 (RT) */,
    0x0000100e    /*   8 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 13),
    0x00000048    /*  10 (LREF0-PUSH) */,
    0x0000105f    /*  11 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#unwrap-syntax.a854a6a0> */,
    0x00001018    /*  13 (PUSH-LOCAL-ENV 1) */,
    0x0000200e    /*  14 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 30),
    0x0000004c    /*  16 (LREF10-PUSH) */,
    0x0000300e    /*  17 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 28),
    0x00000048    /*  19 (LREF0-PUSH) */,
    0x0000000e    /*  20 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 24),
    0x0000005f    /*  22 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#vm-current-module.a854a3c0> */,
    0x0000000d    /*  24 (PUSH) */,
    0x00000008    /*  25 (CONSTN-PUSH) */,
    0x0000305f    /*  26 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make-identifier.a854a460> */,
    0x00002062    /*  28 (PUSH-GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#global-identifier=?.a854a520> */,
    0x0000001e    /*  30 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 40),
    0x0000300e    /*  32 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 39),
    0x0000004f    /*  34 (LREF20-PUSH) */,
    0x0000004c    /*  35 (LREF10-PUSH) */,
    0x00000048    /*  36 (LREF0-PUSH) */,
    0x0000305f    /*  37 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#hash-table-put!.a854a060> */,
    0x00000053    /*  39 (LREF0-RET) */,
    0x0000300e    /*  40 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 49),
    0x0000004f    /*  42 (LREF20-PUSH) */,
    0x00000016    /*  43 (CLOSURE) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1619[4])) /* #<compiled-code (unravel-syntax id->sym #f)@0x7f2ca6979540> */,
    0x0000000d    /*  45 (PUSH) */,
    0x00000007    /*  46 (CONSTI-PUSH 0) */,
    0x0000305f    /*  47 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#hash-table-fold.a854e880> */,
    0x00001018    /*  49 (PUSH-LOCAL-ENV 1) */,
    0x0000300e    /*  50 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 58),
    0x0000004c    /*  52 (LREF10-PUSH) */,
    0x00000006    /*  53 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[44])) /* "." */,
    0x00000048    /*  55 (LREF0-PUSH) */,
    0x0000305f    /*  56 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#symbol-append.a854e260> */,
    0x00001018    /*  58 (PUSH-LOCAL-ENV 1) */,
    0x0000300e    /*  59 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]) + 66),
    0x00004047    /*  61 (LREF-PUSH 4 0) */,
    0x00000051    /*  62 (LREF30-PUSH) */,
    0x00000048    /*  63 (LREF0-PUSH) */,
    0x0000305f    /*  64 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#hash-table-put!.a8550fc0> */,
    0x00000053    /*  66 (LREF0-RET) */,
    /* unravel-syntax */
    0x00002019    /*   0 (LOCAL-ENV-CLOSURES 2) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1617[63])) /* (#<undef> #<compiled-code (unravel-syntax rec)@0x7f2ca6979600>) */,
    0x0000100e    /*   2 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[242]) + 8),
    0x00000006    /*   4 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* eq? */,
    0x0000105f    /*   6 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#make-hash-table.a854aba0> */,
    0x00001018    /*   8 (PUSH-LOCAL-ENV 1) */,
    0x00000016    /*   9 (CLOSURE) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1619[5])) /* #<compiled-code (unravel-syntax id->sym)@0x7f2ca69795a0> */,
    0x0000001a    /*  11 (POP-LOCAL-ENV) */,
    0x000010e8    /*  12 (ENV-SET 1) */,
    0x0000004c    /*  13 (LREF10-PUSH) */,
    0x0000003d    /*  14 (LREF0) */,
    0x0000101d    /*  15 (LOCAL-ENV-TAIL-CALL 1) */,
    0x00000014    /*  16 (RET) */,
    /* %toplevel */
    0x00000004    /*   0 (CONSTF) */,
    0x00000015    /*   1 (DEFINE 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6d875e0> */,
    0x00000014    /*   3 (RET) */,
    /* (%macro-traced? #f) */
    0x0000003d    /*   0 (LREF0) */,
    0x0000009c    /*   1 (SYMBOLP) */,
    0x0000001e    /*   2 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[263]) + 8),
    0x00000048    /*   4 (LREF0-PUSH) */,
    0x00000041    /*   5 (LREF10) */,
    0x0000008f    /*   6 (EQ) */,
    0x00000014    /*   7 (RET) */,
    0x0000100e    /*   8 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[263]) + 13),
    0x00000048    /*  10 (LREF0-PUSH) */,
    0x0000105f    /*  11 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#regexp?.a6da2fc0> */,
    0x0000001e    /*  13 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[263]) + 24),
    0x0000100e    /*  15 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[263]) + 20),
    0x0000004c    /*  17 (LREF10-PUSH) */,
    0x0000105f    /*  18 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#symbol->string.a6da2f40> */,
    0x0000000d    /*  20 (PUSH) */,
    0x0000003d    /*  21 (LREF0) */,
    0x00001012    /*  22 (TAIL-CALL 1) */,
    0x00000014    /*  23 (RET) */,
    0x0000000b    /*  24 (CONSTF-RET) */,
    /* %macro-traced? */
    0x0000005d    /*   0 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6da05a0> */,
    0x0000002e    /*   2 (BNEQC) */,
    SCM_WORD(SCM_TRUE) /* #t */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]) + 6)  /*      6 */,
    0x00000014    /*   5 (RET) */,
    0x0000100e    /*   6 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]) + 15),
    0x0000100e    /*   8 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]) + 13),
    0x00000048    /*  10 (LREF0-PUSH) */,
    0x0000105f    /*  11 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#macro-name.a6da0340> */,
    0x00001062    /*  13 (PUSH-GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#unwrap-syntax.a6da0380> */,
    0x00001018    /*  15 (PUSH-LOCAL-ENV 1) */,
    0x0000003d    /*  16 (LREF0) */,
    0x00000030    /*  17 (RF) */,
    0x00000016    /*  18 (CLOSURE) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1619[8])) /* #<compiled-code (%macro-traced? #f)@0x7f2ca6e622a0> */,
    0x00000061    /*  20 (PUSH-GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6da2e40> */,
    0x00002063    /*  22 (PUSH-GREF-TAIL-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#find.a6da0280> */,
    0x00000014    /*  24 (RET) */,
    /* call-macro-expander */
    0x0000200e    /*   0 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 10),
    0x00000049    /*   2 (LREF1-PUSH) */,
    0x00000048    /*   3 (LREF0-PUSH) */,
    0x0000100e    /*   4 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 9),
    0x0000004a    /*   6 (LREF2-PUSH) */,
    0x0000105f    /*   7 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#macro-transformer.a6a714c0> */,
    0x00002011    /*   9 (CALL 2) */,
    0x00001018    /*  10 (PUSH-LOCAL-ENV 1) */,
    0x0000003d    /*  11 (LREF0) */,
    0x00000098    /*  12 (PAIRP) */,
    0x0000001e    /*  13 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 52),
    0x0000004d    /*  15 (LREF11-PUSH) */,
    0x0000003d    /*  16 (LREF0) */,
    0x00000020    /*  17 (BNEQ) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 22),
    0x0000003d    /*  19 (LREF0) */,
    0x00000013    /*  20 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 53),
    0x0000100e    /*  22 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 27),
    0x00000048    /*  24 (LREF0-PUSH) */,
    0x0000105f    /*  25 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#extended-pair?.a6a710a0> */,
    0x0000001e    /*  27 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 32),
    0x0000003d    /*  29 (LREF0) */,
    0x00000013    /*  30 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 39),
    0x0000200e    /*  32 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 39),
    0x0000006a    /*  34 (LREF0-CAR) */,
    0x0000000d    /*  35 (PUSH) */,
    0x00000076    /*  36 (LREF0-CDR) */,
    0x00002062    /*  37 (PUSH-GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#extended-cons.a6a78fe0> */,
    0x00001018    /*  39 (PUSH-LOCAL-ENV 1) */,
    0x0000300e    /*  40 (PRE-CALL 3) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 48),
    0x00000048    /*  42 (LREF0-PUSH) */,
    0x00000006    /*  43 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* original */,
    0x00000050    /*  45 (LREF21-PUSH) */,
    0x0000305f    /*  46 (GREF-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#pair-attribute-set!.a6a78ec0> */,
    0x0000003d    /*  48 (LREF0) */,
    0x0000001a    /*  49 (POP-LOCAL-ENV) */,
    0x00000013    /*  50 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 53),
    0x0000003d    /*  52 (LREF0) */,
    0x00001018    /*  53 (PUSH-LOCAL-ENV 1) */,
    0x0000005d    /*  54 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6a78a60> */,
    0x0000001e    /*  56 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 154),
    0x0000100e    /*  58 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 63),
    0x00802047    /*  60 (LREF-PUSH 2 2) */,
    0x0000105f    /*  61 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#%macro-traced?.a6a78a00> */,
    0x0000001e    /*  63 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 154),
    0x0000100e    /*  65 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 72),
    0x00000050    /*  67 (LREF21-PUSH) */,
    0x0000003d    /*  68 (LREF0) */,
    0x00000067    /*  69 (CONS-PUSH) */,
    0x0000105f    /*  70 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#unravel-syntax.a6a78800> */,
    0x00001018    /*  72 (PUSH-LOCAL-ENV 1) */,
    0x0000200e    /*  73 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 83),
    0x00000006    /*  75 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[75])) /* "Macro input>>>\n" */,
    0x0000000e    /*  77 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 81),
    0x0000005f    /*  79 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#current-trace-port.a6a78680> */,
    0x00002062    /*  81 (PUSH-GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#display.a6a786e0> */,
    0x0000700e    /*  83 (PRE-CALL 7) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 102),
    0x0000006a    /*  85 (LREF0-CAR) */,
    0x0000000d    /*  86 (PUSH) */,
    0x00000006    /*  87 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :port */,
    0x0000000e    /*  89 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 93),
    0x0000005f    /*  91 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#current-trace-port.a6a78580> */,
    0x0000000d    /*  93 (PUSH) */,
    0x00000006    /*  94 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :level */,
    0x00000009    /*  96 (CONSTF-PUSH) */,
    0x00000006    /*  97 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :length */,
    0x00000009    /*  99 (CONSTF-PUSH) */,
    0x0000705f    /* 100 (GREF-CALL 7) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#pprint.a6a78640> */,
    0x0000200e    /* 102 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 112),
    0x00000006    /* 104 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[82])) /* "\nMacro output<<<\n" */,
    0x0000000e    /* 106 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 110),
    0x0000005f    /* 108 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#current-trace-port.a6a783e0> */,
    0x00002062    /* 110 (PUSH-GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#display.a6a78460> */,
    0x0000700e    /* 112 (PRE-CALL 7) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 131),
    0x00000076    /* 114 (LREF0-CDR) */,
    0x0000000d    /* 115 (PUSH) */,
    0x00000006    /* 116 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :port */,
    0x0000000e    /* 118 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 122),
    0x0000005f    /* 120 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#current-trace-port.a6a782e0> */,
    0x0000000d    /* 122 (PUSH) */,
    0x00000006    /* 123 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :level */,
    0x00000009    /* 125 (CONSTF-PUSH) */,
    0x00000006    /* 126 (CONST-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* :length */,
    0x00000009    /* 128 (CONSTF-PUSH) */,
    0x0000705f    /* 129 (GREF-CALL 7) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#pprint.a6a783a0> */,
    0x0000200e    /* 131 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 141),
    0x00000006    /* 133 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[83])) /* "\n" */,
    0x0000000e    /* 135 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 139),
    0x0000005f    /* 137 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#current-trace-port.a6a78160> */,
    0x00002062    /* 139 (PUSH-GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#display.a6a781e0> */,
    0x0000100e    /* 141 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 149),
    0x0000000e    /* 143 (PRE-CALL 0) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 147),
    0x0000005f    /* 145 (GREF-CALL 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#current-trace-port.a6a780c0> */,
    0x00001062    /* 147 (PUSH-GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#flush.a6a78120> */,
    0x0000001a    /* 149 (POP-LOCAL-ENV) */,
    0x00000013    /* 150 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 154),
    0x00000013    /* 152 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]) + 154),
    0x00000053    /* 154 (LREF0-RET) */,
    /* call-id-macro-expander */
    0x0000100e    /*   0 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[468]) + 5),
    0x00000049    /*   2 (LREF1-PUSH) */,
    0x0000105f    /*   3 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#identifier-macro?.a68b29a0> */,
    0x0000001e    /*   5 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[468]) + 9),
    0x00000013    /*   7 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[468]) + 16),
    0x0000200e    /*   9 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[468]) + 16),
    0x00000006    /*  11 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[88])) /* "Non-identifier-macro can't appear in this context:" */,
    0x00000049    /*  13 (LREF1-PUSH) */,
    0x0000205f    /*  14 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#error.a68b2820> */,
    0x00000049    /*  16 (LREF1-PUSH) */,
    0x00000049    /*  17 (LREF1-PUSH) */,
    0x00000048    /*  18 (LREF0-PUSH) */,
    0x00003060    /*  19 (GREF-TAIL-CALL 3) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#call-macro-expander.a68b2760> */,
    0x00000014    /*  21 (RET) */,
    /* (trace-macro G1638) */
    0x0000003d    /*   0 (LREF0) */,
    0x0000009c    /*   1 (SYMBOLP) */,
    0x00000031    /*   2 (RT) */,
    0x00000048    /*   3 (LREF0-PUSH) */,
    0x00001060    /*   4 (GREF-TAIL-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#regexp?.a7544100> */,
    0x00000014    /*   6 (RET) */,
    /* (trace-macro G1636) */
    0x0000200e    /*   0 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 6),
    0x0000004f    /*   2 (LREF20-PUSH) */,
    0x00000048    /*   3 (LREF0-PUSH) */,
    0x0000205f    /*   4 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#every.a7544600> */,
    0x0000001e    /*   6 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 10),
    0x00000013    /*   8 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 17),
    0x0000200e    /*  10 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 17),
    0x00000006    /*  12 (CONST-PUSH) */,
    SCM_WORD(SCM_OBJ(&scm__sc.d1616[104])) /* "Argument(s) of trace-macro should be a boolean, or symbols or regexps, but got:" */,
    0x0000004c    /*  14 (LREF10-PUSH) */,
    0x0000205f    /*  15 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#error.a7546a20> */,
    0x0000005d    /*  17 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a7546700> */,
    0x0000001e    /*  19 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 36),
    0x0000100e    /*  21 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 27),
    0x0000005e    /*  23 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a7546420> */,
    0x0000105f    /*  25 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#list?.a7546480> */,
    0x0000001e    /*  27 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 33),
    0x0000005d    /*  29 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a75463c0> */,
    0x00000013    /*  31 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 37),
    0x00000004    /*  33 (CONSTF) */,
    0x00000013    /*  34 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 37),
    0x00000003    /*  36 (CONSTN) */,
    0x00001018    /*  37 (PUSH-LOCAL-ENV 1) */,
    0x0000003d    /*  38 (LREF0) */,
    0x00000030    /*  39 (RF) */,
    0x0000100e    /*  40 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]) + 47),
    0x0000004c    /*  42 (LREF10-PUSH) */,
    0x0000003d    /*  43 (LREF0) */,
    0x00002091    /*  44 (APPEND 2) */,
    0x00001062    /*  45 (PUSH-GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#delete-duplicates.a754bac0> */,
    0x0000003b    /*  47 (GSET) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a754bb00> */,
    0x00000014    /*  49 (RET) */,
    /* trace-macro */
    0x0000100e    /*   0 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 6),
    0x0000005e    /*   2 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#pprint.a7530260> */,
    0x0000105f    /*   4 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#procedure?.a75302c0> */,
    0x00000016    /*   6 (CLOSURE) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1619[13])) /* #<compiled-code (trace-macro #:G1636)@0x7f2ca9f2f0c0> */,
    0x00001018    /*   8 (PUSH-LOCAL-ENV 1) */,
    0x00000041    /*   9 (LREF10) */,
    0x00000022    /*  10 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 14),
    0x00000013    /*  12 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x00000041    /*  14 (LREF10) */,
    0x00000098    /*  15 (PAIRP) */,
    0x0000001e    /*  16 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 100),
    0x0000200e    /*  18 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 26),
    0x0000006e    /*  20 (LREF10-CAR) */,
    0x0000000d    /*  21 (PUSH) */,
    0x00000006    /*  22 (CONST-PUSH) */,
    SCM_WORD(SCM_TRUE) /* #t */,
    0x0000205f    /*  24 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#equal?.a754ddc0> */,
    0x0000001e    /*  26 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 58),
    0x0000007a    /*  28 (LREF10-CDR) */,
    0x00000022    /*  29 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 37),
    0x00000001    /*  31 (CONST) */,
    SCM_WORD(SCM_TRUE) /* #t */,
    0x0000003b    /*  33 (GSET) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a754b580> */,
    0x00000013    /*  35 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000100e    /*  37 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 42),
    0x0000004c    /*  39 (LREF10-PUSH) */,
    0x0000105f    /*  40 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#list?.a754da60> */,
    0x0000001e    /*  42 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 51),
    0x0000100e    /*  44 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000004c    /*  46 (LREF10-PUSH) */,
    0x0000003d    /*  47 (LREF0) */,
    0x0000101c    /*  48 (LOCAL-ENV-CALL 1) */,
    0x00000013    /*  49 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000100e    /*  51 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000004c    /*  53 (LREF10-PUSH) */,
    0x0000105f    /*  54 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier util.match#match:error.a9eae2e0> */,
    0x00000013    /*  56 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000200e    /*  58 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 65),
    0x0000006e    /*  60 (LREF10-CAR) */,
    0x0000000d    /*  61 (PUSH) */,
    0x00000009    /*  62 (CONSTF-PUSH) */,
    0x0000205f    /*  63 (GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#equal?.a754d8c0> */,
    0x0000001e    /*  65 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 75),
    0x0000007a    /*  67 (LREF10-CDR) */,
    0x00000022    /*  68 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 75),
    0x00000004    /*  70 (CONSTF) */,
    0x0000003b    /*  71 (GSET) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a754b6a0> */,
    0x00000013    /*  73 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000100e    /*  75 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 80),
    0x0000004c    /*  77 (LREF10-PUSH) */,
    0x0000105f    /*  78 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#list?.a754d4c0> */,
    0x0000001e    /*  80 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 89),
    0x0000100e    /*  82 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000004c    /*  84 (LREF10-PUSH) */,
    0x0000003d    /*  85 (LREF0) */,
    0x0000101c    /*  86 (LOCAL-ENV-CALL 1) */,
    0x00000013    /*  87 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000100e    /*  89 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000004c    /*  91 (LREF10-PUSH) */,
    0x0000105f    /*  92 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier util.match#match:error.a9eae2e0> */,
    0x00000013    /*  94 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x00000013    /*  96 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 75),
    0x00000013    /*  98 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000100e    /* 100 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 105),
    0x0000004c    /* 102 (LREF10-PUSH) */,
    0x0000105f    /* 103 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#list?.a754d360> */,
    0x0000001e    /* 105 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 114),
    0x0000100e    /* 107 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000004c    /* 109 (LREF10-PUSH) */,
    0x0000003d    /* 110 (LREF0) */,
    0x0000101c    /* 111 (LOCAL-ENV-CALL 1) */,
    0x00000013    /* 112 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000100e    /* 114 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]) + 119),
    0x0000004c    /* 116 (LREF10-PUSH) */,
    0x0000105f    /* 117 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier util.match#match:error.a9eae2e0> */,
    0x0000001a    /* 119 (POP-LOCAL-ENV) */,
    0x0000005d    /* 120 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a754d180> */,
    0x00000014    /* 122 (RET) */,
    /* %toplevel */
    0x00001019    /*   0 (LOCAL-ENV-CLOSURES 1) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1617[221])) /* (#<compiled-code (trace-macro #:G1638)@0x7f2ca9f2f240>) */,
    0x00000016    /*   2 (CLOSURE) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1619[14])) /* #<compiled-code trace-macro@0x7f2ca9f2f120> */,
    0x00000015    /*   4 (DEFINE 0) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier gauche#trace-macro.a7530380> */,
    0x00000014    /*   6 (RET) */,
    /* (untrace-macro #f) */
    0x00000048    /*   0 (LREF0-PUSH) */,
    0x0000004f    /*   1 (LREF20-PUSH) */,
    0x00000041    /*   2 (LREF10) */,
    0x00002012    /*   3 (TAIL-CALL 2) */,
    0x00000014    /*   4 (RET) */,
    /* untrace-macro */
    0x0000003d    /*   0 (LREF0) */,
    0x00000022    /*   1 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 8),
    0x00000004    /*   3 (CONSTF) */,
    0x0000003b    /*   4 (GSET) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6d6df80> */,
    0x00000013    /*   6 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 57),
    0x0000100e    /*   8 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 13),
    0x00000048    /*  10 (LREF0-PUSH) */,
    0x0000105f    /*  11 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#list?.a6d6de40> */,
    0x0000001e    /*  13 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 52),
    0x0000100e    /*  15 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 21),
    0x0000005e    /*  17 (GREF-PUSH) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6d69260> */,
    0x0000105f    /*  19 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#list?.a6d692a0> */,
    0x0000001e    /*  21 (BF) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 57),
    0x0000200e    /*  23 (PRE-CALL 2) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 37),
    0x00001019    /*  25 (LOCAL-ENV-CLOSURES 1) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1617[231])) /* (#<undef>) */,
    0x0000005d    /*  27 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#member.a6d6b860> */,
    0x000000e8    /*  29 (ENV-SET 0) */,
    0x00000016    /*  30 (CLOSURE) */,
    SCM_WORD(SCM_OBJ(&scm__rc.d1619[16])) /* #<compiled-code (untrace-macro #f)@0x7f2ca6e62a20> */,
    0x0000001a    /*  32 (POP-LOCAL-ENV) */,
    0x00000061    /*  33 (PUSH-GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6d6b660> */,
    0x00002062    /*  35 (PUSH-GREF-CALL 2) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#remove.a6d69060> */,
    0x00001018    /*  37 (PUSH-LOCAL-ENV 1) */,
    0x0000003d    /*  38 (LREF0) */,
    0x00000022    /*  39 (BNNULL) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 44),
    0x00000004    /*  41 (CONSTF) */,
    0x00000013    /*  42 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 45),
    0x0000003d    /*  44 (LREF0) */,
    0x0000003b    /*  45 (GSET) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6d6b160> */,
    0x0000001a    /*  47 (POP-LOCAL-ENV) */,
    0x00000013    /*  48 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 57),
    0x00000013    /*  50 (JUMP) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 57),
    0x0000100e    /*  52 (PRE-CALL 1) */,
    SCM_WORD((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]) + 57),
    0x00000048    /*  54 (LREF0-PUSH) */,
    0x0000105f    /*  55 (GREF-CALL 1) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier util.match#match:error.a9eae2e0> */,
    0x0000005d    /*  57 (GREF) */,
    SCM_WORD(SCM_UNDEFINED) /* #<identifier #f#*trace-macro*.a6d6dd20> */,
    0x00000014    /*  59 (RET) */,
  },
  {   /* ScmPair d1617 */
       { SCM_NIL, SCM_NIL },
       { SCM_FALSE, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[1])},
       { SCM_OBJ(&scm__rc.d1617[2]), SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[3])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[4])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[2])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[6])},
       { SCM_OBJ(&scm__rc.d1617[7]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[5]), SCM_OBJ(&scm__rc.d1617[8])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[9])},
       { SCM_MAKE_INT(54U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[11])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[12])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[14]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[13]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_TRUE, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[18])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[19])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[20])},
       { SCM_OBJ(&scm__rc.d1617[21]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[5]), SCM_OBJ(&scm__rc.d1617[22])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[23])},
       { SCM_MAKE_INT(57U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[25])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[26])},
       { SCM_OBJ(&scm__rc.d1617[27]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[30])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[31])},
       { SCM_MAKE_INT(60U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[33])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[34])},
       { SCM_OBJ(&scm__rc.d1617[35]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[38])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[39])},
       { SCM_MAKE_INT(74U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[41])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[42])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[44])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[45])},
       { SCM_OBJ(&scm__rc.d1617[46]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[43]), SCM_OBJ(&scm__rc.d1617[47])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(79U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[50])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[51])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[53])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[54])},
       { SCM_OBJ(&scm__rc.d1617[55]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[52]), SCM_OBJ(&scm__rc.d1617[56])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[58])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_OBJ(&scm__rc.d1619[3]), SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[62])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[1])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[64])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[66])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[67])},
       { SCM_MAKE_INT(99U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[69])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[70])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[72])},
       { SCM_OBJ(&scm__rc.d1617[73]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[71]), SCM_OBJ(&scm__rc.d1617[74])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[77])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(91U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[80])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[81])},
       { SCM_OBJ(&scm__rc.d1617[82]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(88U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[85])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[86])},
       { SCM_OBJ(&scm__rc.d1617[87]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(118U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[90])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[91])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[93])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[94])},
       { SCM_OBJ(&scm__rc.d1617[95]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[92]), SCM_OBJ(&scm__rc.d1617[96])},
       { SCM_MAKE_INT(119U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[98])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[99])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[101])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[102])},
       { SCM_OBJ(&scm__rc.d1617[103]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[100]), SCM_OBJ(&scm__rc.d1617[104])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[106])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[107])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[108])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[109])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[110])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[111])},
       { SCM_MAKE_INT(144U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[113])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[114])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[116])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[117])},
       { SCM_OBJ(&scm__rc.d1617[118]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[115]), SCM_OBJ(&scm__rc.d1617[119])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(147U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[122])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[123])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[125])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[126])},
       { SCM_OBJ(&scm__rc.d1617[127]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[124]), SCM_OBJ(&scm__rc.d1617[128])},
       { SCM_MAKE_INT(148U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[130])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[131])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[133])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[134])},
       { SCM_OBJ(&scm__rc.d1617[135]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[132]), SCM_OBJ(&scm__rc.d1617[136])},
       { SCM_MAKE_INT(149U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[138])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[139])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[141])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[142])},
       { SCM_OBJ(&scm__rc.d1617[143]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[140]), SCM_OBJ(&scm__rc.d1617[144])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[1])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(160U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[148])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[149])},
       { SCM_OBJ(&scm__rc.d1617[150]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(157U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[153])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[154])},
       { SCM_OBJ(&scm__rc.d1617[155]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[158])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[159])},
       { SCM_MAKE_INT(165U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[161])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[162])},
       { SCM_OBJ(&scm__rc.d1617[163]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[158])},
       { SCM_MAKE_INT(185U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[167])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[168])},
       { SCM_OBJ(&scm__rc.d1617[169]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[172])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[173])},
       { SCM_MAKE_INT(190U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[175])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[176])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[178])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[179])},
       { SCM_OBJ(&scm__rc.d1617[180]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[177]), SCM_OBJ(&scm__rc.d1617[181])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[183])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[184])},
       { SCM_MAKE_INT(193U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[186])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[187])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[189])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[190])},
       { SCM_OBJ(&scm__rc.d1617[191]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[188]), SCM_OBJ(&scm__rc.d1617[192])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[158])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[194])},
       { SCM_MAKE_INT(196U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[196])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[197])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[199])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[200])},
       { SCM_OBJ(&scm__rc.d1617[201]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[198]), SCM_OBJ(&scm__rc.d1617[202])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(200U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[205])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[206])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[208])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[209])},
       { SCM_OBJ(&scm__rc.d1617[210]), SCM_NIL},
       { SCM_OBJ(&scm__rc.d1617[207]), SCM_OBJ(&scm__rc.d1617[211])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[213])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(213U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[216])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[217])},
       { SCM_OBJ(&scm__rc.d1617[218]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_OBJ(&scm__rc.d1619[12]), SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[222])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(204U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[226])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[227])},
       { SCM_OBJ(&scm__rc.d1617[228]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[1])},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_UNDEFINED, SCM_NIL},
       { SCM_MAKE_INT(223U), SCM_NIL},
       { SCM_OBJ(&scm__sc.d1616[10]), SCM_OBJ(&scm__rc.d1617[235])},
       { SCM_UNDEFINED, SCM_OBJ(&scm__rc.d1617[236])},
       { SCM_OBJ(&scm__rc.d1617[237]), SCM_OBJ(&scm__rc.d1617[15])},
       { SCM_UNDEFINED, SCM_NIL},
  },
  {   /* ScmObj d1615 */
    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_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(6, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_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_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(11, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_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_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(7, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(7, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_OBJ(SCM_CLASS_STATIC_TAG(Scm_VectorClass)) /* <vector> */,
    SCM_VECTOR_SIZE_SLOT_INITIALIZER(5, FALSE),
    SCM_MAKE_INT(1U),
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNDEFINED,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_UNBOUND,
    SCM_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 libmacbaseunwrap_syntax(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj form_scm;
  ScmObj form;
  ScmObj to_immutable_scm;
  int to_immutable;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("unwrap-syntax");
  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);
  }
  form_scm = SCM_SUBRARGS[0];
  if (!(form_scm)) Scm_Error("scheme object required, but got %S", form_scm);
  form = (form_scm);
  if (SCM_ARGCNT > 1+1) {
    to_immutable_scm = SCM_SUBRARGS[1];
  } else {
    to_immutable_scm = SCM_FALSE;
  }
  if (!SCM_BOOLP(to_immutable_scm)) Scm_Error("boolean required, but got %S", to_immutable_scm);
  to_immutable = SCM_BOOL_VALUE(to_immutable_scm);
  {
{
ScmObj SCM_RESULT;

#line 75 "libmacbase.scm"
{SCM_RESULT=(Scm_UnwrapSyntax2(form,to_immutable));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


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

#line 80 "libmacbase.scm"
if (SCM_IDENTIFIERP(obj)){
{SCM_RESULT=(SCM_OBJ(Scm_UnwrapIdentifier(SCM_IDENTIFIER(obj))));goto SCM_STUB_RETURN;}} else {
{SCM_RESULT=(obj);goto SCM_STUB_RETURN;}}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


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


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

static void Scm_MacroClass_PRINT(ScmObj obj, ScmPort *port, ScmWriteContext *ctx SCM_UNUSED)
{

#line 134 "libmacbase.scm"
Scm_Printf(port,"#<macro %A>",(SCM_MACRO(obj))->name);
}

SCM_DEFINE_BUILTIN_CLASS(Scm_MacroClass, Scm_MacroClass_PRINT, NULL, NULL, NULL, SCM_CLASS_DEFAULT_CPL);

static ScmObj Scm_MacroClass_name_GET(ScmObj OBJARG)
{
  ScmMacro* obj = SCM_MACRO(OBJARG);
  return SCM_OBJ_SAFE(obj->name);
}

static ScmObj Scm_MacroClass_transformer_GET(ScmObj OBJARG)
{
  ScmMacro* obj = SCM_MACRO(OBJARG);
  return SCM_OBJ_SAFE(obj->transformer);
}

static ScmObj Scm_MacroClass_info_alist_GET(ScmObj OBJARG)
{
  ScmMacro* obj = SCM_MACRO(OBJARG);
  return SCM_OBJ_SAFE(obj->info_alist);
}

static ScmObj Scm_MacroClass_flags_GET(ScmObj OBJARG)
{
  ScmMacro* obj = SCM_MACRO(OBJARG);
  return Scm_MakeIntegerU(obj->flags);
}

static ScmClassStaticSlotSpec Scm_MacroClass__SLOTS[] = {
  SCM_CLASS_SLOT_SPEC("name", Scm_MacroClass_name_GET, NULL),
  SCM_CLASS_SLOT_SPEC("transformer", Scm_MacroClass_transformer_GET, NULL),
  SCM_CLASS_SLOT_SPEC("info-alist", Scm_MacroClass_info_alist_GET, NULL),
  SCM_CLASS_SLOT_SPEC("flags", Scm_MacroClass_flags_GET, NULL),
  SCM_CLASS_SLOT_SPEC_END()
};


static ScmObj libmacbasecompile_syntax_rules(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj name_scm;
  ScmObj name;
  ScmObj src_scm;
  ScmObj src;
  ScmObj ellipsis_scm;
  ScmObj ellipsis;
  ScmObj literals_scm;
  ScmObj literals;
  ScmObj rules_scm;
  ScmObj rules;
  ScmObj mod_scm;
  ScmObj mod;
  ScmObj env_scm;
  ScmObj env;
  ScmObj SCM_SUBRARGS[7];
  SCM_ENTER_SUBR("compile-syntax-rules");
  for (int SCM_i=0; SCM_i<7; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  name_scm = SCM_SUBRARGS[0];
  if (!(name_scm)) Scm_Error("scheme object required, but got %S", name_scm);
  name = (name_scm);
  src_scm = SCM_SUBRARGS[1];
  if (!(src_scm)) Scm_Error("scheme object required, but got %S", src_scm);
  src = (src_scm);
  ellipsis_scm = SCM_SUBRARGS[2];
  if (!(ellipsis_scm)) Scm_Error("scheme object required, but got %S", ellipsis_scm);
  ellipsis = (ellipsis_scm);
  literals_scm = SCM_SUBRARGS[3];
  if (!(literals_scm)) Scm_Error("scheme object required, but got %S", literals_scm);
  literals = (literals_scm);
  rules_scm = SCM_SUBRARGS[4];
  if (!(rules_scm)) Scm_Error("scheme object required, but got %S", rules_scm);
  rules = (rules_scm);
  mod_scm = SCM_SUBRARGS[5];
  if (!(mod_scm)) Scm_Error("scheme object required, but got %S", mod_scm);
  mod = (mod_scm);
  env_scm = SCM_SUBRARGS[6];
  if (!(env_scm)) Scm_Error("scheme object required, but got %S", env_scm);
  env = (env_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_CompileSyntaxRules(name,src,ellipsis,literals,rules,mod,env));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmacbasemacro_transformer(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj mac_scm;
  ScmMacro* mac;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("macro-transformer");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  mac_scm = SCM_SUBRARGS[0];
  if (!SCM_MACROP(mac_scm)) Scm_Error("macro required, but got %S", mac_scm);
  mac = SCM_MACRO(mac_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_MacroTransformer(mac));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmacbasemacro_name(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj mac_scm;
  ScmMacro* mac;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("macro-name");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  mac_scm = SCM_SUBRARGS[0];
  if (!SCM_MACROP(mac_scm)) Scm_Error("macro required, but got %S", mac_scm);
  mac = SCM_MACRO(mac_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_MacroName(mac));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmacbaseidentifier_macroP(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj mac_scm;
  ScmMacro* mac;
  ScmObj SCM_SUBRARGS[1];
  SCM_ENTER_SUBR("identifier-macro?");
  for (int SCM_i=0; SCM_i<1; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  mac_scm = SCM_SUBRARGS[0];
  if (!SCM_MACROP(mac_scm)) Scm_Error("macro required, but got %S", mac_scm);
  mac = SCM_MACRO(mac_scm);
  {
{
int SCM_RESULT;

#line 150 "libmacbase.scm"
{SCM_RESULT=(((mac)->flags)&(SCM_MACRO_IDENTIFIER));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_MAKE_BOOL(SCM_RESULT));
}
  }
}


static ScmObj libmacbasemake_syntax(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj name_scm;
  ScmSymbol* name;
  ScmObj module_scm;
  ScmModule* module;
  ScmObj proc_scm;
  ScmObj proc;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("make-syntax");
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  name_scm = SCM_SUBRARGS[0];
  if (!SCM_SYMBOLP(name_scm)) Scm_Error("<symbol> required, but got %S", name_scm);
  name = SCM_SYMBOL(name_scm);
  module_scm = SCM_SUBRARGS[1];
  if (!SCM_MODULEP(module_scm)) Scm_Error("<module> required, but got %S", module_scm);
  module = SCM_MODULE(module_scm);
  proc_scm = SCM_SUBRARGS[2];
  if (!(proc_scm)) Scm_Error("scheme object required, but got %S", proc_scm);
  proc = (proc_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_MakeSyntax(name,module,proc));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmacbasemake_syntactic_closure(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj env_scm;
  ScmObj env;
  ScmObj literals_scm;
  ScmObj literals;
  ScmObj expr_scm;
  ScmObj expr;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("make-syntactic-closure");
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  env_scm = SCM_SUBRARGS[0];
  if (!(env_scm)) Scm_Error("scheme object required, but got %S", env_scm);
  env = (env_scm);
  literals_scm = SCM_SUBRARGS[1];
  if (!(literals_scm)) Scm_Error("scheme object required, but got %S", literals_scm);
  literals = (literals_scm);
  expr_scm = SCM_SUBRARGS[2];
  if (!(expr_scm)) Scm_Error("scheme object required, but got %S", expr_scm);
  expr = (expr_scm);
  {
{
ScmObj SCM_RESULT;
{SCM_RESULT=(Scm_MakeSyntacticClosure(env,literals,expr));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


static ScmObj libmacbasecall_syntax_handler(ScmObj *SCM_FP SCM_UNUSED, int SCM_ARGCNT SCM_UNUSED, void *data_ SCM_UNUSED)
{
  ScmObj syn_scm;
  ScmObj syn;
  ScmObj program_scm;
  ScmObj program;
  ScmObj cenv_scm;
  ScmObj cenv;
  ScmObj SCM_SUBRARGS[3];
  SCM_ENTER_SUBR("call-syntax-handler");
  for (int SCM_i=0; SCM_i<3; SCM_i++) {
    SCM_SUBRARGS[SCM_i] = SCM_ARGREF(SCM_i);
  }
  syn_scm = SCM_SUBRARGS[0];
  if (!(syn_scm)) Scm_Error("scheme object required, but got %S", syn_scm);
  syn = (syn_scm);
  program_scm = SCM_SUBRARGS[1];
  if (!(program_scm)) Scm_Error("scheme object required, but got %S", program_scm);
  program = (program_scm);
  cenv_scm = SCM_SUBRARGS[2];
  if (!(cenv_scm)) Scm_Error("scheme object required, but got %S", cenv_scm);
  cenv = (cenv_scm);
  {
{
ScmObj SCM_RESULT;

#line 197 "libmacbase.scm"
SCM_ASSERT(SCM_SYNTAXP(syn));

#line 198 "libmacbase.scm"
{SCM_RESULT=(Scm_VMApply2((SCM_SYNTAX(syn))->handler,program,cenv));goto SCM_STUB_RETURN;}
goto SCM_STUB_RETURN;
SCM_STUB_RETURN:
SCM_RETURN(SCM_OBJ_SAFE(SCM_RESULT));
}
  }
}


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

#line 201 "libmacbase.scm"
SCM_ASSERT(SCM_SYNTAXP(syn));

#line 202 "libmacbase.scm"
{SCM_RESULT=((SCM_SYNTAX(syn))->handler);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.d1619[7])),
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[15])),
 NULL /*termination*/
};
void Scm_Init_libmacbase() {
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1615[0] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[0])),TRUE); /* macroexpand */
  scm__rc.d1615[1] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[2])),TRUE); /* lambda */
  scm__rc.d1615[2] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[3])),TRUE); /* form */
  scm__rc.d1615[3] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1616[4]))); /* :optional */
  scm__rc.d1615[4] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[5])),TRUE); /* env/flag */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[2]), scm__rc.d1615[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[4]), scm__rc.d1615[3]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[5]), scm__rc.d1615[2]);
  scm__rc.d1615[5] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[6])),TRUE); /* %do-macroexpand */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[6]), scm__rc.d1615[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[7]), scm__rc.d1615[5]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[10]), scm__rc.d1615[1]);
  scm__rc.d1615[7] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[7])),TRUE); /* error */
  scm__rc.d1615[9] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[8])),TRUE); /* gauche.internal */
  scm__rc.d1615[8] = SCM_OBJ(Scm_FindModule(SCM_SYMBOL(scm__rc.d1615[9]), SCM_FIND_MODULE_CREATE|SCM_FIND_MODULE_PLACEHOLDING)); /* module gauche.internal */
  scm__rc.d1615[6] = Scm_MakeIdentifier(scm__rc.d1615[7], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#error */
  scm__rc.d1615[10] = Scm_MakeIdentifier(scm__rc.d1615[5], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#%do-macroexpand */
  scm__rc.d1615[11] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[9])),TRUE); /* source-info */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[13]), scm__rc.d1615[11]);
  scm__rc.d1615[12] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[11])),TRUE); /* unused-args */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[14]), scm__rc.d1615[12]);
  scm__rc.d1615[13] = Scm_MakeExtendedPair(scm__rc.d1615[0], SCM_OBJ(&scm__rc.d1617[5]), SCM_OBJ(&scm__rc.d1617[16]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[17]), scm__rc.d1615[13]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[0]))->name = scm__rc.d1615[0];/* macroexpand */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]))[28] = SCM_WORD(scm__rc.d1615[6]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[0]))[33] = SCM_WORD(scm__rc.d1615[10]);
  ScmObj G1620 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[0]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1615[0]) /* macroexpand */, G1620,0);

  scm__rc.d1615[14] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[12])),TRUE); /* macroexpand-1 */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[19]), scm__rc.d1615[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[20]), scm__rc.d1615[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[21]), scm__rc.d1615[5]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[24]), scm__rc.d1615[1]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[27]), scm__rc.d1615[11]);
  scm__rc.d1615[15] = Scm_MakeExtendedPair(scm__rc.d1615[14], SCM_OBJ(&scm__rc.d1617[5]), SCM_OBJ(&scm__rc.d1617[28]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[29]), scm__rc.d1615[15]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[1]))->name = scm__rc.d1615[14];/* macroexpand-1 */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]))[28] = SCM_WORD(scm__rc.d1615[6]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[35]))[34] = SCM_WORD(scm__rc.d1615[10]);
  ScmObj G1624 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[1]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1615[14]) /* macroexpand-1 */, G1624,0);

  scm__rc.d1615[17] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[13])),TRUE); /* boolean? */
  scm__rc.d1615[16] = Scm_MakeIdentifier(scm__rc.d1615[17], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#boolean? */
  scm__rc.d1615[19] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[14])),TRUE); /* vm-current-module */
  scm__rc.d1615[18] = Scm_MakeIdentifier(scm__rc.d1615[19], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#vm-current-module */
  scm__rc.d1615[21] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[15])),TRUE); /* module? */
  scm__rc.d1615[20] = Scm_MakeIdentifier(scm__rc.d1615[21], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#module? */
  scm__rc.d1615[23] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[17])),TRUE); /* make-cenv */
  scm__rc.d1615[22] = Scm_MakeIdentifier(scm__rc.d1615[23], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#make-cenv */
  scm__rc.d1615[25] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[18])),TRUE); /* %internal-macro-expand */
  scm__rc.d1615[24] = Scm_MakeIdentifier(scm__rc.d1615[25], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#%internal-macro-expand */
  scm__rc.d1615[27] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[19])),TRUE); /* unravel-syntax */
  scm__rc.d1615[26] = Scm_MakeIdentifier(scm__rc.d1615[27], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#unravel-syntax */
  scm__rc.d1615[28] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[20])),TRUE); /* once? */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[30]), scm__rc.d1615[28]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[31]), scm__rc.d1615[4]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[32]), scm__rc.d1615[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[35]), scm__rc.d1615[11]);
  scm__rc.d1615[29] = Scm_MakeExtendedPair(scm__rc.d1615[5], SCM_OBJ(&scm__rc.d1617[32]), SCM_OBJ(&scm__rc.d1617[36]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[37]), scm__rc.d1615[29]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[2]))->name = scm__rc.d1615[5];/* %do-macroexpand */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]))[4] = SCM_WORD(scm__rc.d1615[16]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]))[10] = SCM_WORD(scm__rc.d1615[18]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]))[17] = SCM_WORD(scm__rc.d1615[20]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]))[29] = SCM_WORD(scm__rc.d1615[6]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]))[38] = SCM_WORD(scm__rc.d1615[22]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]))[42] = SCM_WORD(scm__rc.d1615[24]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[71]))[50] = SCM_WORD(scm__rc.d1615[26]);
  ScmObj G1625 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[2]), NULL);

  Scm_MakeBinding(SCM_MODULE(Scm_CurrentModule()) /*  */, SCM_SYMBOL(scm__rc.d1615[5]) /* %do-macroexpand */, G1625,0);

   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
  scm__rc.d1615[30] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[21])),TRUE); /* unwrap-syntax */
  scm__rc.d1615[31] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[22])),TRUE); /* to_immutable */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[38]), scm__rc.d1615[31]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[39]), scm__rc.d1615[3]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[40]), scm__rc.d1615[2]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[43]), scm__rc.d1615[11]);
  scm__rc.d1615[32] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[23])),TRUE); /* bind-info */
  scm__rc.d1615[33] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[24])),TRUE); /* gauche */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[44]), scm__rc.d1615[30]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[45]), scm__rc.d1615[33]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[46]), scm__rc.d1615[32]);
  scm__rc.d1615[34] = Scm_MakeExtendedPair(scm__rc.d1615[30], SCM_OBJ(&scm__rc.d1617[40]), SCM_OBJ(&scm__rc.d1617[48]));
  scm__rc.d1615[35] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[25])),TRUE); /* <top> */
  scm__rc.d1615[36] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[26])),TRUE); /* * */
  scm__rc.d1615[37] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[27])),TRUE); /* -> */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[38]))[3] = scm__rc.d1615[33];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[38]))[4] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[38]))[5] = scm__rc.d1615[36];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[38]))[6] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[38]))[7] = scm__rc.d1615[35];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("unwrap-syntax")), SCM_OBJ(&libmacbaseunwrap_syntax__STUB), 0);
  libmacbaseunwrap_syntax__STUB.common.info = scm__rc.d1615[34];
  libmacbaseunwrap_syntax__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[38]);
  scm__rc.d1615[46] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[28])),TRUE); /* unwrap-syntax-1 */
  scm__rc.d1615[47] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[29])),TRUE); /* obj */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[49]), scm__rc.d1615[47]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[52]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[53]), scm__rc.d1615[46]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[54]), scm__rc.d1615[33]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[55]), scm__rc.d1615[32]);
  scm__rc.d1615[48] = Scm_MakeExtendedPair(scm__rc.d1615[46], SCM_OBJ(&scm__rc.d1617[49]), SCM_OBJ(&scm__rc.d1617[57]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[49]))[3] = scm__rc.d1615[33];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[49]))[4] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[49]))[5] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[49]))[6] = scm__rc.d1615[35];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), SCM_SYMBOL(SCM_INTERN("unwrap-syntax-1")), SCM_OBJ(&libmacbaseunwrap_syntax_1__STUB), 0);
  libmacbaseunwrap_syntax_1__STUB.common.info = scm__rc.d1615[48];
  libmacbaseunwrap_syntax_1__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[49]);
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1615[57] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[30])),TRUE); /* wrapped-identifier? */
  scm__rc.d1615[56] = Scm_MakeIdentifier(scm__rc.d1615[57], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#wrapped-identifier? */
  scm__rc.d1615[59] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[31])),TRUE); /* vector-map */
  scm__rc.d1615[58] = Scm_MakeIdentifier(scm__rc.d1615[59], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#vector-map */
  scm__rc.d1615[60] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[32])),TRUE); /* rec */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[58]), scm__rc.d1615[60]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[59]), scm__rc.d1615[27]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[60]), scm__rc.d1615[2]);
  scm__rc.d1615[61] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1617[59]), SCM_OBJ(&scm__rc.d1617[60]), SCM_OBJ(&scm__rc.d1617[15]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[61]), scm__rc.d1615[61]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[3]))->name = scm__rc.d1615[60];/* (unravel-syntax rec) */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]))[4] = SCM_WORD(scm__rc.d1615[56]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[124]))[36] = SCM_WORD(scm__rc.d1615[58]);
  scm__rc.d1615[62] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[33])),TRUE); /* eq? */
  scm__rc.d1615[64] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[34])),TRUE); /* make-hash-table */
  scm__rc.d1615[63] = Scm_MakeIdentifier(scm__rc.d1615[64], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#make-hash-table */
  scm__rc.d1615[66] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[35])),TRUE); /* hash-table-get */
  scm__rc.d1615[65] = Scm_MakeIdentifier(scm__rc.d1615[66], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#hash-table-get */
  scm__rc.d1615[67] = Scm_MakeIdentifier(scm__rc.d1615[30], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#unwrap-syntax */
  scm__rc.d1615[69] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[36])),TRUE); /* make-identifier */
  scm__rc.d1615[68] = Scm_MakeIdentifier(scm__rc.d1615[69], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#make-identifier */
  scm__rc.d1615[71] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[37])),TRUE); /* global-identifier=? */
  scm__rc.d1615[70] = Scm_MakeIdentifier(scm__rc.d1615[71], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#global-identifier=? */
  scm__rc.d1615[73] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[38])),TRUE); /* hash-table-put! */
  scm__rc.d1615[72] = Scm_MakeIdentifier(scm__rc.d1615[73], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#hash-table-put! */
  scm__rc.d1615[74] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[39])),TRUE); /* id->sym */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[64]), scm__rc.d1615[74]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[65]), scm__rc.d1615[27]);
  scm__rc.d1615[75] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[40])),TRUE); /* i */
  scm__rc.d1615[76] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[41])),TRUE); /* _ */
  scm__rc.d1615[77] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[42])),TRUE); /* c */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[66]), scm__rc.d1615[77]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[67]), scm__rc.d1615[76]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[68]), scm__rc.d1615[75]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[71]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[72]), scm__rc.d1615[76]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[73]), scm__rc.d1615[12]);
  scm__rc.d1615[78] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1617[65]), SCM_OBJ(&scm__rc.d1617[68]), SCM_OBJ(&scm__rc.d1617[75]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[76]), scm__rc.d1615[78]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[163]))[4] = SCM_WORD(scm__rc.d1615[67]);
  scm__rc.d1615[80] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[43])),TRUE); /* hash-table-fold */
  scm__rc.d1615[79] = Scm_MakeIdentifier(scm__rc.d1615[80], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#hash-table-fold */
  scm__rc.d1615[82] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[45])),TRUE); /* symbol-append */
  scm__rc.d1615[81] = Scm_MakeIdentifier(scm__rc.d1615[82], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#symbol-append */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[77]), scm__rc.d1615[74]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[78]), scm__rc.d1615[27]);
  scm__rc.d1615[83] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[46])),TRUE); /* id */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[79]), scm__rc.d1615[83]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[82]), scm__rc.d1615[11]);
  scm__rc.d1615[84] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1617[78]), SCM_OBJ(&scm__rc.d1617[79]), SCM_OBJ(&scm__rc.d1617[83]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[84]), scm__rc.d1615[84]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[5]))->name = scm__rc.d1615[74];/* (unravel-syntax id->sym) */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[6] = SCM_WORD(scm__rc.d1615[65]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[12] = SCM_WORD(scm__rc.d1615[67]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[23] = SCM_WORD(scm__rc.d1615[18]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[27] = SCM_WORD(scm__rc.d1615[68]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[29] = SCM_WORD(scm__rc.d1615[70]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[38] = SCM_WORD(scm__rc.d1615[72]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[48] = SCM_WORD(scm__rc.d1615[79]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[57] = SCM_WORD(scm__rc.d1615[81]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[175]))[65] = SCM_WORD(scm__rc.d1615[72]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[87]), scm__rc.d1615[11]);
  scm__rc.d1615[85] = Scm_MakeExtendedPair(scm__rc.d1615[27], SCM_OBJ(&scm__rc.d1617[60]), SCM_OBJ(&scm__rc.d1617[88]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[89]), scm__rc.d1615[85]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[6]))->name = scm__rc.d1615[27];/* unravel-syntax */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[242]))[5] = SCM_WORD(scm__rc.d1615[62]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[242]))[7] = SCM_WORD(scm__rc.d1615[63]);
  ScmObj G1626 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[6]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1615[27]) /* unravel-syntax */, G1626,0);

   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1615[86] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[47])),TRUE); /* macro? */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[92]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[93]), scm__rc.d1615[86]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[94]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[95]), scm__rc.d1615[32]);
  scm__rc.d1615[87] = Scm_MakeExtendedPair(scm__rc.d1615[86], SCM_OBJ(&scm__rc.d1617[49]), SCM_OBJ(&scm__rc.d1617[97]));
  scm__rc.d1615[88] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[48])),TRUE); /* <boolean> */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[89]))[3] = scm__rc.d1615[9];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[89]))[4] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[89]))[5] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[89]))[6] = scm__rc.d1615[88];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("macro?")), SCM_OBJ(&libmacbasemacroP__STUB), 0);
  libmacbasemacroP__STUB.common.info = scm__rc.d1615[87];
  libmacbasemacroP__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[89]);
  scm__rc.d1615[96] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[49])),TRUE); /* syntax? */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[100]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[101]), scm__rc.d1615[96]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[102]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[103]), scm__rc.d1615[32]);
  scm__rc.d1615[97] = Scm_MakeExtendedPair(scm__rc.d1615[96], SCM_OBJ(&scm__rc.d1617[49]), SCM_OBJ(&scm__rc.d1617[105]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("syntax?")), SCM_OBJ(&libmacbasesyntaxP__STUB), 0);
  libmacbasesyntaxP__STUB.common.info = scm__rc.d1615[97];
  libmacbasesyntaxP__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[89]);
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())));
  Scm_InitStaticClassWithMeta(&Scm_MacroClass, "<macro>", SCM_MODULE(SCM_OBJ(Scm_GaucheModule())), NULL, SCM_FALSE, Scm_MacroClass__SLOTS, 0);
   Scm_SelectModule(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())));
  scm__rc.d1615[98] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[50])),TRUE); /* compile-syntax-rules */
  scm__rc.d1615[99] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[51])),TRUE); /* name */
  scm__rc.d1615[100] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[52])),TRUE); /* src */
  scm__rc.d1615[101] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[53])),TRUE); /* ellipsis */
  scm__rc.d1615[102] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[54])),TRUE); /* literals */
  scm__rc.d1615[103] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[55])),TRUE); /* rules */
  scm__rc.d1615[104] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[56])),TRUE); /* mod */
  scm__rc.d1615[105] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[57])),TRUE); /* env */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[106]), scm__rc.d1615[105]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[107]), scm__rc.d1615[104]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[108]), scm__rc.d1615[103]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[109]), scm__rc.d1615[102]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[110]), scm__rc.d1615[101]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[111]), scm__rc.d1615[100]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[112]), scm__rc.d1615[99]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[115]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[116]), scm__rc.d1615[98]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[117]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[118]), scm__rc.d1615[32]);
  scm__rc.d1615[106] = Scm_MakeExtendedPair(scm__rc.d1615[98], SCM_OBJ(&scm__rc.d1617[112]), SCM_OBJ(&scm__rc.d1617[120]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[3] = scm__rc.d1615[9];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[4] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[5] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[6] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[7] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[8] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[9] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[10] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[11] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[107]))[12] = scm__rc.d1615[35];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("compile-syntax-rules")), SCM_OBJ(&libmacbasecompile_syntax_rules__STUB), 0);
  libmacbasecompile_syntax_rules__STUB.common.info = scm__rc.d1615[106];
  libmacbasecompile_syntax_rules__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[107]);
  scm__rc.d1615[120] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[58])),TRUE); /* macro-transformer */
  scm__rc.d1615[121] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[59])),TRUE); /* mac */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[121]), scm__rc.d1615[121]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[124]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[125]), scm__rc.d1615[120]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[126]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[127]), scm__rc.d1615[32]);
  scm__rc.d1615[122] = Scm_MakeExtendedPair(scm__rc.d1615[120], SCM_OBJ(&scm__rc.d1617[121]), SCM_OBJ(&scm__rc.d1617[129]));
  scm__rc.d1615[123] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[60])),TRUE); /* <macro> */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[124]))[3] = scm__rc.d1615[9];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[124]))[4] = scm__rc.d1615[123];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[124]))[5] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[124]))[6] = scm__rc.d1615[35];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("macro-transformer")), SCM_OBJ(&libmacbasemacro_transformer__STUB), 0);
  libmacbasemacro_transformer__STUB.common.info = scm__rc.d1615[122];
  libmacbasemacro_transformer__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[124]);
  scm__rc.d1615[131] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[61])),TRUE); /* macro-name */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[132]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[133]), scm__rc.d1615[131]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[134]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[135]), scm__rc.d1615[32]);
  scm__rc.d1615[132] = Scm_MakeExtendedPair(scm__rc.d1615[131], SCM_OBJ(&scm__rc.d1617[121]), SCM_OBJ(&scm__rc.d1617[137]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("macro-name")), SCM_OBJ(&libmacbasemacro_name__STUB), 0);
  libmacbasemacro_name__STUB.common.info = scm__rc.d1615[132];
  libmacbasemacro_name__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[124]);
  scm__rc.d1615[133] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[62])),TRUE); /* identifier-macro? */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[140]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[141]), scm__rc.d1615[133]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[142]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[143]), scm__rc.d1615[32]);
  scm__rc.d1615[134] = Scm_MakeExtendedPair(scm__rc.d1615[133], SCM_OBJ(&scm__rc.d1617[121]), SCM_OBJ(&scm__rc.d1617[145]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[135]))[3] = scm__rc.d1615[9];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[135]))[4] = scm__rc.d1615[123];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[135]))[5] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[135]))[6] = scm__rc.d1615[88];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("identifier-macro?")), SCM_OBJ(&libmacbaseidentifier_macroP__STUB), 0);
  libmacbaseidentifier_macroP__STUB.common.info = scm__rc.d1615[134];
  libmacbaseidentifier_macroP__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[135]);
  scm__rc.d1615[143] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[63])),TRUE); /* *trace-macro* */
  scm__rc.d1615[142] = Scm_MakeIdentifier(scm__rc.d1615[143], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#*trace-macro* */
  scm__rc.d1615[144] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[64])),TRUE); /* %toplevel */
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[7]))->name = scm__rc.d1615[144];/* %toplevel */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[259]))[2] = SCM_WORD(scm__rc.d1615[142]);
  scm__rc.d1615[145] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[65])),TRUE); /* %macro-traced? */
  scm__rc.d1615[146] = Scm_MakeIdentifier(scm__rc.d1615[131], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#macro-name */
  scm__rc.d1615[148] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[66])),TRUE); /* regexp? */
  scm__rc.d1615[147] = Scm_MakeIdentifier(scm__rc.d1615[148], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#regexp? */
  scm__rc.d1615[150] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[67])),TRUE); /* symbol->string */
  scm__rc.d1615[149] = Scm_MakeIdentifier(scm__rc.d1615[150], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#symbol->string */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[146]), scm__rc.d1615[145]);
  scm__rc.d1615[151] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[68])),TRUE); /* z */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[147]), scm__rc.d1615[151]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[150]), scm__rc.d1615[11]);
  scm__rc.d1615[152] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1617[146]), SCM_OBJ(&scm__rc.d1617[147]), SCM_OBJ(&scm__rc.d1617[151]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[152]), scm__rc.d1615[152]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[263]))[12] = SCM_WORD(scm__rc.d1615[147]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[263]))[19] = SCM_WORD(scm__rc.d1615[149]);
  scm__rc.d1615[154] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[69])),TRUE); /* find */
  scm__rc.d1615[153] = Scm_MakeIdentifier(scm__rc.d1615[154], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#find */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[155]), scm__rc.d1615[11]);
  scm__rc.d1615[155] = Scm_MakeExtendedPair(scm__rc.d1615[145], SCM_OBJ(&scm__rc.d1617[121]), SCM_OBJ(&scm__rc.d1617[156]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[157]), scm__rc.d1615[155]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[9]))->name = scm__rc.d1615[145];/* %macro-traced? */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]))[1] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]))[12] = SCM_WORD(scm__rc.d1615[146]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]))[14] = SCM_WORD(scm__rc.d1615[67]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]))[21] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[288]))[23] = SCM_WORD(scm__rc.d1615[153]);
  ScmObj G1627 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[9]), NULL);

  Scm_MakeBinding(SCM_MODULE(Scm_CurrentModule()) /*  */, SCM_SYMBOL(scm__rc.d1615[145]) /* %macro-traced? */, G1627,0);

  scm__rc.d1615[156] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[70])),TRUE); /* call-macro-expander */
  scm__rc.d1615[157] = Scm_MakeIdentifier(scm__rc.d1615[120], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#macro-transformer */
  scm__rc.d1615[159] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[71])),TRUE); /* extended-pair? */
  scm__rc.d1615[158] = Scm_MakeIdentifier(scm__rc.d1615[159], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#extended-pair? */
  scm__rc.d1615[161] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[72])),TRUE); /* extended-cons */
  scm__rc.d1615[160] = Scm_MakeIdentifier(scm__rc.d1615[161], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#extended-cons */
  scm__rc.d1615[162] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[73])),TRUE); /* original */
  scm__rc.d1615[164] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[74])),TRUE); /* pair-attribute-set! */
  scm__rc.d1615[163] = Scm_MakeIdentifier(scm__rc.d1615[164], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#pair-attribute-set! */
  scm__rc.d1615[165] = Scm_MakeIdentifier(scm__rc.d1615[145], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#%macro-traced? */
  scm__rc.d1615[167] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[76])),TRUE); /* current-trace-port */
  scm__rc.d1615[166] = Scm_MakeIdentifier(scm__rc.d1615[167], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#current-trace-port */
  scm__rc.d1615[169] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[77])),TRUE); /* display */
  scm__rc.d1615[168] = Scm_MakeIdentifier(scm__rc.d1615[169], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#display */
  scm__rc.d1615[170] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1616[78]))); /* :port */
  scm__rc.d1615[171] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1616[79]))); /* :level */
  scm__rc.d1615[172] = Scm_MakeKeyword(SCM_STRING(SCM_OBJ(&scm__sc.d1616[80]))); /* :length */
  scm__rc.d1615[174] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[81])),TRUE); /* pprint */
  scm__rc.d1615[173] = Scm_MakeIdentifier(scm__rc.d1615[174], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#pprint */
  scm__rc.d1615[176] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[84])),TRUE); /* flush */
  scm__rc.d1615[175] = Scm_MakeIdentifier(scm__rc.d1615[176], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#flush */
  scm__rc.d1615[177] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[85])),TRUE); /* expr */
  scm__rc.d1615[178] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[86])),TRUE); /* cenv */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[158]), scm__rc.d1615[178]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[159]), scm__rc.d1615[177]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[160]), scm__rc.d1615[121]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[163]), scm__rc.d1615[11]);
  scm__rc.d1615[179] = Scm_MakeExtendedPair(scm__rc.d1615[156], SCM_OBJ(&scm__rc.d1617[160]), SCM_OBJ(&scm__rc.d1617[164]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[165]), scm__rc.d1615[179]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[10]))->name = scm__rc.d1615[156];/* call-macro-expander */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[8] = SCM_WORD(scm__rc.d1615[157]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[26] = SCM_WORD(scm__rc.d1615[158]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[38] = SCM_WORD(scm__rc.d1615[160]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[44] = SCM_WORD(scm__rc.d1615[162]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[47] = SCM_WORD(scm__rc.d1615[163]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[55] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[62] = SCM_WORD(scm__rc.d1615[165]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[71] = SCM_WORD(scm__rc.d1615[26]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[80] = SCM_WORD(scm__rc.d1615[166]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[82] = SCM_WORD(scm__rc.d1615[168]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[88] = SCM_WORD(scm__rc.d1615[170]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[92] = SCM_WORD(scm__rc.d1615[166]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[95] = SCM_WORD(scm__rc.d1615[171]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[98] = SCM_WORD(scm__rc.d1615[172]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[101] = SCM_WORD(scm__rc.d1615[173]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[109] = SCM_WORD(scm__rc.d1615[166]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[111] = SCM_WORD(scm__rc.d1615[168]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[117] = SCM_WORD(scm__rc.d1615[170]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[121] = SCM_WORD(scm__rc.d1615[166]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[124] = SCM_WORD(scm__rc.d1615[171]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[127] = SCM_WORD(scm__rc.d1615[172]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[130] = SCM_WORD(scm__rc.d1615[173]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[138] = SCM_WORD(scm__rc.d1615[166]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[140] = SCM_WORD(scm__rc.d1615[168]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[146] = SCM_WORD(scm__rc.d1615[166]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[313]))[148] = SCM_WORD(scm__rc.d1615[175]);
  ScmObj G1628 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[10]), NULL);

  Scm_MakeBinding(SCM_MODULE(Scm_CurrentModule()) /*  */, SCM_SYMBOL(scm__rc.d1615[156]) /* call-macro-expander */, G1628,0);

  scm__rc.d1615[180] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[87])),TRUE); /* call-id-macro-expander */
  scm__rc.d1615[181] = Scm_MakeIdentifier(scm__rc.d1615[133], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#identifier-macro? */
  scm__rc.d1615[182] = Scm_MakeIdentifier(scm__rc.d1615[156], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#call-macro-expander */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[166]), scm__rc.d1615[121]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[169]), scm__rc.d1615[11]);
  scm__rc.d1615[183] = Scm_MakeExtendedPair(scm__rc.d1615[180], SCM_OBJ(&scm__rc.d1617[166]), SCM_OBJ(&scm__rc.d1617[170]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[171]), scm__rc.d1615[183]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[11]))->name = scm__rc.d1615[180];/* call-id-macro-expander */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[468]))[4] = SCM_WORD(scm__rc.d1615[181]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[468]))[15] = SCM_WORD(scm__rc.d1615[6]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[468]))[20] = SCM_WORD(scm__rc.d1615[182]);
  ScmObj G1629 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[11]), NULL);

  Scm_MakeBinding(SCM_MODULE(Scm_CurrentModule()) /*  */, SCM_SYMBOL(scm__rc.d1615[180]) /* call-id-macro-expander */, G1629,0);

  scm__rc.d1615[184] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[89])),TRUE); /* make-syntax */
  scm__rc.d1615[185] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[90])),TRUE); /* module */
  scm__rc.d1615[186] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[91])),TRUE); /* proc */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[172]), scm__rc.d1615[186]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[173]), scm__rc.d1615[185]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[174]), scm__rc.d1615[99]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[177]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[178]), scm__rc.d1615[184]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[179]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[180]), scm__rc.d1615[32]);
  scm__rc.d1615[187] = Scm_MakeExtendedPair(scm__rc.d1615[184], SCM_OBJ(&scm__rc.d1617[174]), SCM_OBJ(&scm__rc.d1617[182]));
  scm__rc.d1615[188] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[92])),TRUE); /* <symbol> */
  scm__rc.d1615[189] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[93])),TRUE); /* <module> */
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[190]))[3] = scm__rc.d1615[9];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[190]))[4] = scm__rc.d1615[188];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[190]))[5] = scm__rc.d1615[189];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[190]))[6] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[190]))[7] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[190]))[8] = scm__rc.d1615[35];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("make-syntax")), SCM_OBJ(&libmacbasemake_syntax__STUB), 0);
  libmacbasemake_syntax__STUB.common.info = scm__rc.d1615[187];
  libmacbasemake_syntax__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[190]);
  scm__rc.d1615[199] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[94])),TRUE); /* make-syntactic-closure */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[183]), scm__rc.d1615[177]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[184]), scm__rc.d1615[102]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[185]), scm__rc.d1615[105]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[188]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[189]), scm__rc.d1615[199]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[190]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[191]), scm__rc.d1615[32]);
  scm__rc.d1615[200] = Scm_MakeExtendedPair(scm__rc.d1615[199], SCM_OBJ(&scm__rc.d1617[185]), SCM_OBJ(&scm__rc.d1617[193]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[201]))[3] = scm__rc.d1615[9];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[201]))[4] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[201]))[5] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[201]))[6] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[201]))[7] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[201]))[8] = scm__rc.d1615[35];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("make-syntactic-closure")), SCM_OBJ(&libmacbasemake_syntactic_closure__STUB), 0);
  libmacbasemake_syntactic_closure__STUB.common.info = scm__rc.d1615[200];
  libmacbasemake_syntactic_closure__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[201]);
  scm__rc.d1615[210] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[95])),TRUE); /* call-syntax-handler */
  scm__rc.d1615[211] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[96])),TRUE); /* syn */
  scm__rc.d1615[212] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[97])),TRUE); /* program */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[194]), scm__rc.d1615[212]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[195]), scm__rc.d1615[211]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[198]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[199]), scm__rc.d1615[210]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[200]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[201]), scm__rc.d1615[32]);
  scm__rc.d1615[213] = Scm_MakeExtendedPair(scm__rc.d1615[210], SCM_OBJ(&scm__rc.d1617[195]), SCM_OBJ(&scm__rc.d1617[203]));
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("call-syntax-handler")), SCM_OBJ(&libmacbasecall_syntax_handler__STUB), 0);
  libmacbasecall_syntax_handler__STUB.common.info = scm__rc.d1615[213];
  libmacbasecall_syntax_handler__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[201]);
  scm__rc.d1615[214] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[98])),TRUE); /* syntax-handler */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[204]), scm__rc.d1615[211]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[207]), scm__rc.d1615[11]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[208]), scm__rc.d1615[214]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[209]), scm__rc.d1615[9]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[210]), scm__rc.d1615[32]);
  scm__rc.d1615[215] = Scm_MakeExtendedPair(scm__rc.d1615[214], SCM_OBJ(&scm__rc.d1617[204]), SCM_OBJ(&scm__rc.d1617[212]));
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[216]))[3] = scm__rc.d1615[9];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[216]))[4] = scm__rc.d1615[35];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[216]))[5] = scm__rc.d1615[37];
  ((ScmObj*)SCM_OBJ(&scm__rc.d1615[216]))[6] = scm__rc.d1615[35];
  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheInternalModule())), SCM_SYMBOL(SCM_INTERN("syntax-handler")), SCM_OBJ(&libmacbasesyntax_handler__STUB), 0);
  libmacbasesyntax_handler__STUB.common.info = scm__rc.d1615[215];
  libmacbasesyntax_handler__STUB.common.typeHint = SCM_OBJ(&scm__rc.d1615[216]);
  scm__rc.d1615[223] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[99])),TRUE); /* trace-macro */
  scm__rc.d1615[224] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[100])),FALSE); /* G1638 */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[213]), scm__rc.d1615[224]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[214]), scm__rc.d1615[223]);
  scm__rc.d1615[225] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[101])),TRUE); /* x */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[215]), scm__rc.d1615[225]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[218]), scm__rc.d1615[11]);
  scm__rc.d1615[226] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1617[214]), SCM_OBJ(&scm__rc.d1617[215]), SCM_OBJ(&scm__rc.d1617[219]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[220]), scm__rc.d1615[226]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[490]))[5] = SCM_WORD(scm__rc.d1615[147]);
  scm__rc.d1615[228] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[102])),TRUE); /* procedure? */
  scm__rc.d1615[227] = Scm_MakeIdentifier(scm__rc.d1615[228], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#procedure? */
  scm__rc.d1615[230] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[103])),TRUE); /* every */
  scm__rc.d1615[229] = Scm_MakeIdentifier(scm__rc.d1615[230], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#every */
  scm__rc.d1615[232] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[105])),TRUE); /* list? */
  scm__rc.d1615[231] = Scm_MakeIdentifier(scm__rc.d1615[232], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#list? */
  scm__rc.d1615[234] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[106])),TRUE); /* delete-duplicates */
  scm__rc.d1615[233] = Scm_MakeIdentifier(scm__rc.d1615[234], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#delete-duplicates */
  scm__rc.d1615[235] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[107])),FALSE); /* G1636 */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[222]), scm__rc.d1615[235]);
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[223]), scm__rc.d1615[223]);
  scm__rc.d1615[236] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[108])),TRUE); /* objs */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[224]), scm__rc.d1615[236]);
  scm__rc.d1615[237] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1617[223]), SCM_OBJ(&scm__rc.d1617[224]), SCM_OBJ(&scm__rc.d1617[15]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[225]), scm__rc.d1615[237]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[13]))->name = scm__rc.d1615[235];/* (trace-macro G1636) */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[5] = SCM_WORD(scm__rc.d1615[229]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[16] = SCM_WORD(scm__rc.d1615[6]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[18] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[24] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[26] = SCM_WORD(scm__rc.d1615[231]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[30] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[46] = SCM_WORD(scm__rc.d1615[233]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[497]))[48] = SCM_WORD(scm__rc.d1615[142]);
  scm__rc.d1615[239] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[109])),TRUE); /* equal? */
  scm__rc.d1615[238] = Scm_MakeIdentifier(scm__rc.d1615[239], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#equal? */
  scm__rc.d1615[241] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[110])),TRUE); /* match:error */
  scm__rc.d1615[243] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[111])),TRUE); /* util.match */
  scm__rc.d1615[242] = SCM_OBJ(Scm_FindModule(SCM_SYMBOL(scm__rc.d1615[243]), SCM_FIND_MODULE_CREATE|SCM_FIND_MODULE_PLACEHOLDING)); /* module util.match */
  scm__rc.d1615[240] = Scm_MakeIdentifier(scm__rc.d1615[241], SCM_MODULE(scm__rc.d1615[242]), SCM_NIL); /* util.match#match:error */
  scm__rc.d1615[244] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[112])),TRUE); /* args */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[228]), scm__rc.d1615[11]);
  scm__rc.d1615[245] = Scm_MakeExtendedPair(scm__rc.d1615[223], scm__rc.d1615[244], SCM_OBJ(&scm__rc.d1617[229]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[230]), scm__rc.d1615[245]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[14]))->name = scm__rc.d1615[223];/* trace-macro */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[3] = SCM_WORD(scm__rc.d1615[173]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[5] = SCM_WORD(scm__rc.d1615[227]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[25] = SCM_WORD(scm__rc.d1615[238]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[34] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[41] = SCM_WORD(scm__rc.d1615[231]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[55] = SCM_WORD(scm__rc.d1615[240]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[64] = SCM_WORD(scm__rc.d1615[238]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[72] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[79] = SCM_WORD(scm__rc.d1615[231]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[93] = SCM_WORD(scm__rc.d1615[240]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[104] = SCM_WORD(scm__rc.d1615[231]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[118] = SCM_WORD(scm__rc.d1615[240]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[547]))[121] = SCM_WORD(scm__rc.d1615[142]);
  scm__rc.d1615[246] = Scm_MakeIdentifier(scm__rc.d1615[223], SCM_MODULE(Scm_GaucheModule()), SCM_NIL); /* gauche#trace-macro */
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[15]))->name = scm__rc.d1615[144];/* %toplevel */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[670]))[5] = SCM_WORD(scm__rc.d1615[246]);
  scm__rc.d1615[247] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[113])),TRUE); /* untrace-macro */
  scm__rc.d1615[249] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[114])),TRUE); /* member */
  scm__rc.d1615[248] = Scm_MakeIdentifier(scm__rc.d1615[249], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#member */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[232]), scm__rc.d1615[247]);
  scm__rc.d1615[250] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[115])),FALSE); /* G1646 */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[233]), scm__rc.d1615[250]);
  scm__rc.d1615[251] = Scm_MakeExtendedPair(SCM_OBJ(&scm__rc.d1617[232]), SCM_OBJ(&scm__rc.d1617[233]), SCM_OBJ(&scm__rc.d1617[15]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[234]), scm__rc.d1615[251]);
  scm__rc.d1615[253] = Scm_MakeSymbol(SCM_STRING(SCM_OBJ(&scm__sc.d1616[116])),TRUE); /* remove */
  scm__rc.d1615[252] = Scm_MakeIdentifier(scm__rc.d1615[253], SCM_MODULE(scm__rc.d1615[8]), SCM_NIL); /* gauche.internal#remove */
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[237]), scm__rc.d1615[11]);
  scm__rc.d1615[254] = Scm_MakeExtendedPair(scm__rc.d1615[247], scm__rc.d1615[244], SCM_OBJ(&scm__rc.d1617[238]));
  SCM_SET_CAR(SCM_OBJ(&scm__rc.d1617[239]), scm__rc.d1615[254]);
  SCM_COMPILED_CODE(SCM_OBJ(&scm__rc.d1619[17]))->name = scm__rc.d1615[247];/* untrace-macro */
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[5] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[12] = SCM_WORD(scm__rc.d1615[231]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[18] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[20] = SCM_WORD(scm__rc.d1615[231]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[28] = SCM_WORD(scm__rc.d1615[248]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[34] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[36] = SCM_WORD(scm__rc.d1615[252]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[46] = SCM_WORD(scm__rc.d1615[142]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[56] = SCM_WORD(scm__rc.d1615[240]);
  ((ScmWord*)SCM_OBJ(&scm__rc.d1618[682]))[58] = SCM_WORD(scm__rc.d1615[142]);
  ScmObj G1648 = Scm_MakeClosure(SCM_OBJ(&scm__rc.d1619[17]), NULL);

  Scm_MakeBinding(SCM_MODULE(SCM_OBJ(Scm_GaucheModule())) /* gauche */, SCM_SYMBOL(scm__rc.d1615[247]) /* untrace-macro */, G1648,0);

  Scm_VMExecuteToplevels(toplevels);
}
