pattern          2389 src/extlib.c    SCM_RESULT = (regexp->pattern?SCM_OBJ(regexp->pattern):SCM_FALSE);
pattern          2499 src/gauche.h       ScmString *pattern;
pattern          2518 src/gauche.h   SCM_EXTERN ScmObj Scm_RegComp(ScmString *pattern, int flags);
pattern          2616 src/gauche.h   SCM_EXTERN ScmObj Scm_GlobDirectory(ScmString *pattern);
pattern            45 src/gauche/macro.h     ScmObj pattern;             /* subpattern */
pattern            62 src/gauche/macro.h     ScmObj pattern;             /* pattern to match */
pattern           102 src/macro.c                   SCM_SYNTAX_PATTERN(obj)->pattern,
pattern           112 src/macro.c        p->pattern = SCM_NIL;
pattern           133 src/macro.c            Scm_Printf(port, "   pattern  = %S\n", r->rules[i].pattern);
pattern           390 src/macro.c                    nspat->pattern = compile_rule1(SCM_CAR(pp), nspat, ctx,
pattern           501 src/macro.c            pat->pattern = compile_rule1(SCM_CDR(ctx.form), pat, &ctx, TRUE);
pattern           504 src/macro.c            tmpl->pattern = compile_rule1(ctx.form, tmpl, &ctx, FALSE);
pattern           506 src/macro.c            sr->rules[i].pattern  = SCM_OBJ(pat->pattern);
pattern           507 src/macro.c            sr->rules[i].template = SCM_OBJ(tmpl->pattern);
pattern           600 src/macro.c    static int match_synrule(ScmObj form, ScmObj pattern, ScmObj env,
pattern           698 src/macro.c            if (!match_synrule(SCM_CAR(form), pat->pattern, env, mvec))
pattern           710 src/macro.c    static int match_synrule(ScmObj form, ScmObj pattern, ScmObj env,
pattern           713 src/macro.c        if (PVREF_P(pattern)) {
pattern           714 src/macro.c            match_insert(pattern, form, mvec);
pattern           717 src/macro.c        if (SCM_IDENTIFIERP(pattern)) {
pattern           718 src/macro.c            return match_identifier(SCM_IDENTIFIER(pattern), form, env);
pattern           720 src/macro.c        if (SCM_SYNTAX_PATTERN_P(pattern)) {
pattern           721 src/macro.c            return match_subpattern(form, SCM_SYNTAX_PATTERN(pattern), env, mvec);
pattern           723 src/macro.c        if (SCM_PAIRP(pattern)) {
pattern           724 src/macro.c            while (SCM_PAIRP(pattern)) {
pattern           725 src/macro.c                ScmObj elt = SCM_CAR(pattern);
pattern           734 src/macro.c                    pattern = SCM_CDR(pattern);
pattern           738 src/macro.c            if (!SCM_NULLP(pattern))
pattern           739 src/macro.c                return match_synrule(form, pattern, env, mvec);
pattern           743 src/macro.c        if (SCM_VECTORP(pattern)) {
pattern           746 src/macro.c            plen = SCM_VECTOR_SIZE(pattern);
pattern           749 src/macro.c            elli = SCM_SYNTAX_PATTERN_P(SCM_VECTOR_ELEMENT(pattern, plen-1));
pattern           753 src/macro.c                                   SCM_VECTOR_ELEMENT(pattern, i),
pattern           759 src/macro.c                ScmObj pat = SCM_VECTOR_ELEMENT(pattern, plen-1);
pattern           769 src/macro.c        return Scm_EqualP(pattern, form);
pattern           815 src/macro.c                r = realize_template_rec(pat->pattern, mvec, level+1, indices, idlist, exlev);
pattern           882 src/macro.c            Scm_Printf(SCM_CUROUT, "pattern #%d: %S\n", i, sr->rules[i].pattern);
pattern           885 src/macro.c            if (match_synrule(SCM_CDR(form), sr->rules[i].pattern, env, mvec)) {
pattern           199 src/regexp.c       rx->pattern = NULL;
pattern           205 src/regexp.c       if (SCM_REGEXP(rx)->pattern) {
pattern           206 src/regexp.c           Scm_Printf(out, "#/%A/", SCM_REGEXP(rx)->pattern);
pattern           218 src/regexp.c       return !(SCM_REGEXP(x)->pattern
pattern           219 src/regexp.c                && SCM_REGEXP(y)->pattern
pattern           220 src/regexp.c                && Scm_StringEqual(SCM_STRING(SCM_REGEXP(x)->pattern),
pattern           221 src/regexp.c                                   SCM_STRING(SCM_REGEXP(y)->pattern))
pattern           246 src/regexp.c       ScmString *pattern;         /* original pattern */
pattern           260 src/regexp.c       ctx->pattern = rx->pattern;
pattern           262 src/regexp.c       if (rx->pattern) {
pattern           263 src/regexp.c           ctx->ipat = SCM_PORT(Scm_MakeInputStringPort(rx->pattern, FALSE));
pattern           343 src/regexp.c                         ctx->pattern);
pattern           522 src/regexp.c               Scm_Error("{n,m}-syntax requires n <= m: %S", ctx->pattern);
pattern           537 src/regexp.c                 MAX_LIMITED_REPEAT, ctx->pattern);
pattern           573 src/regexp.c                   Scm_Error("unterminated grouping in regexp %S", ctx->pattern);
pattern           579 src/regexp.c                   Scm_Error("extra close parenthesis in regexp %S", ctx->pattern);
pattern           725 src/regexp.c       Scm_Error("bad regexp syntax in %S", ctx->pattern);
pattern           749 src/regexp.c           Scm_Error("bad charset spec in pattern: %S", ctx->pattern);
pattern          1596 src/regexp.c   ScmObj Scm_RegComp(ScmString *pattern, int flags)
pattern          1602 src/regexp.c       if (SCM_STRING_INCOMPLETE_P(pattern)) {
pattern          1603 src/regexp.c           Scm_Error("incomplete string is not allowed: %S", pattern);
pattern          1605 src/regexp.c       rx->pattern = SCM_STRING(Scm_CopyStringWithFlags(pattern,
pattern            56 src/syslib.c     ScmString* pattern;
pattern            60 src/syslib.c     pattern = SCM_STRING(pattern_scm);
pattern            64 src/syslib.c   SCM_RESULT = Scm_GlobDirectory(pattern);
pattern           187 src/system.c   ScmObj Scm_GlobDirectory(ScmString *pattern)
pattern           193 src/system.c       SCM_SYSCALL(r, glob(Scm_GetStringConst(pattern), 0, NULL, &globbed));
pattern           199 src/system.c           Scm_Error("Couldn't glob %S", pattern);
pattern           212 src/system.c       const char *path = Scm_GetStringConst(pattern);