diff options
Diffstat (limited to 'src/bind-lex.l')
-rw-r--r-- | src/bind-lex.l | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/bind-lex.l b/src/bind-lex.l index 67fade0..10df618 100644 --- a/src/bind-lex.l +++ b/src/bind-lex.l @@ -42,7 +42,7 @@ P [1-9][0-9]* %% /* C-style comments */ -"/*".* BEGIN(COMMENT); +"/*" BEGIN(COMMENT); <COMMENT>[^*\n]* /* eat anything that's not a '*' */ <COMMENT>"*"+[^*/\n]* /* eat up '*'s not followed by '/'s */ <COMMENT>\n ++grecs_current_locus.line; @@ -68,7 +68,8 @@ P [1-9][0-9]* BIND_CONTROLS : BIND_IDENT; } /* Strings */ -[a-zA-Z0-9_\.\*/:@-]+ { grecs_line_begin(); +[a-zA-Z0-9_\.\*/:@-]([a-zA-Z0-9_\./:@-][a-zA-Z0-9_\.\*/:@-]*)? { + grecs_line_begin(); grecs_line_add(yytext, yyleng); yylval.string = grecs_line_finish(); return BIND_STRING; } |