pp 383 src/macro.c ScmObj pp, h = SCM_NIL, t = SCM_NIL; pp 384 src/macro.c SCM_FOR_EACH(pp, form) { pp 385 src/macro.c if (ELLIPSIS_FOLLOWING(pp)) { pp 387 src/macro.c if (patternp && !SCM_NULLP(SCM_CDDR(pp))) BAD_ELLIPSIS(ctx); pp 390 src/macro.c nspat->pattern = compile_rule1(SCM_CAR(pp), nspat, ctx, pp 412 src/macro.c pp = SCM_CDR(pp); pp 415 src/macro.c compile_rule1(SCM_CAR(pp), spat, ctx, patternp)); pp 418 src/macro.c if (!SCM_NULLP(pp)) pp 419 src/macro.c SCM_APPEND(h, t, compile_rule1(pp, spat, ctx, patternp)); pp 641 src/macro.c ScmObj pp; pp 642 src/macro.c SCM_FOR_EACH(pp, subpat->vars) { pp 643 src/macro.c ScmObj pvref = SCM_CAR(pp); pp 651 src/macro.c ScmObj pp; pp 652 src/macro.c SCM_FOR_EACH(pp, subpat->vars) { pp 653 src/macro.c ScmObj pvref = SCM_CAR(pp);