version 1.54, 2009/04/14 21:16:40 |
version 1.55, 2010/07/09 20:07:05 |
|
|
type = RCS_TOK_SCOLON; |
type = RCS_TOK_SCOLON; |
} else if (ch == ':') { |
} else if (ch == ':') { |
type = RCS_TOK_COLON; |
type = RCS_TOK_COLON; |
} else if (isalpha(ch) || ch == '_' || ch == '$' || ch == '.' || ch == '-') { |
} else if (isalpha(ch)) { |
type = RCS_TOK_ID; |
type = RCS_TOK_ID; |
*(bp++) = ch; |
*(bp++) = ch; |
for (;;) { |
for (;;) { |
|
|
if (ch == EOF) { |
if (ch == EOF) { |
type = RCS_TOK_EOF; |
type = RCS_TOK_EOF; |
break; |
break; |
} else if (!isalnum(ch) && ch != '_' && ch != '-' && |
} else if (!isgraph(ch) || |
ch != '/' && ch != '.' && ch != '$') { |
strchr(rcs_sym_invch, ch) != NULL) { |
ungetc(ch, pdp->rp_file); |
ungetc(ch, pdp->rp_file); |
break; |
break; |
} |
} |