nstrs             622 src/string.c       int size = 0, len = 0, nstrs, ndelim, i, flags = 0;
nstrs             628 src/string.c       nstrs = Scm_Length(strs);
nstrs             629 src/string.c       if (nstrs < 0) Scm_Error("improper list not allowed: %S", strs);
nstrs             630 src/string.c       if (nstrs == 0) {
nstrs             637 src/string.c       if (nstrs >= BODY_ARRAY_SIZE) {
nstrs             638 src/string.c           bodies = SCM_NEW_ARRAY(const ScmStringBody *, nstrs);
nstrs             666 src/string.c           ndelim = nstrs - 1;
nstrs             668 src/string.c           ndelim = nstrs;
nstrs             678 src/string.c       for (i=0; i<nstrs; i++) {
nstrs             682 src/string.c           if (i < nstrs-1) {