Mercurial > libjeffpc
changeset 169:1f880a69170e v0.10-rc5
sexpr: allow ? in symbol names
Signed-off-by: Josef 'Jeff' Sipek <jeffpc@josefsipek.net>
| author | Josef 'Jeff' Sipek <jeffpc@josefsipek.net> |
|---|---|
| date | Tue, 11 Apr 2017 15:40:42 -0400 |
| parents | e70bfdcd6016 |
| children | 287e20b47ae1 |
| files | sexpr.l |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/sexpr.l Tue Apr 11 14:08:40 2017 -0400 +++ b/sexpr.l Tue Apr 11 15:40:42 2017 -0400 @@ -80,7 +80,7 @@ #\\[^ ] { yylval->i = yytext[2]; return CHAR; } /* TODO: handle '#\<utf-8>' */ [1-9][0-9]* { ASSERT0(str2u64(yytext, &yylval->i)); return NUMBER; } -[a-zA-Z+=|&*_-]?[a-zA-Z0-9+=|&*_-]* { yylval->s = STR_DUP(yytext); return SYMBOL; } +[a-zA-Z+=|&*?_-]?[a-zA-Z0-9+=|&*?_-]* { yylval->s = STR_DUP(yytext); return SYMBOL; } [ \r\t] { /* ignore */ } \n { inc_lineno(yyscanner); /* ignore */} ;[^\n]* { /* comment: ignore it */ }