Mercurial > lbo > hg > ylisp
changeset 116:3267a9631763
gen: Lex literal strings without quotes
author | Lewin Bormann <lbo@spheniscida.de> |
---|---|
date | Sat, 31 Aug 2019 21:29:24 +0200 |
parents | 1d1f29d0954d |
children | b9ef95fb35dc |
files | gen/y.lex |
diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/gen/y.lex Thu Aug 29 22:48:22 2019 +0200 +++ b/gen/y.lex Sat Aug 31 21:29:24 2019 +0200 @@ -34,7 +34,10 @@ {NUMBER} { yylval->number = atoll(yytext); return TOK_NUMBER_LITERAL; } {ATOM} { yylval->atom = strdup(yytext); return TOK_ATOM; } {QUOTE} { return TOK_QUOTE; } -{STRING_LIT} { yylval->string = strdup(yytext); return TOK_STRING_LITERAL; } +{STRING_LIT} { + yylval->string = strndup(yytext+1, strlen(yytext)-2); + return TOK_STRING_LITERAL; + } %% // Lex input from in. Closes after finishing.