add field specifiers

[ccc.git] / scan.l

diff --git a/scan.l b/scan.l
index 3a2eabc..c6ebb87 100644 (file)
--- a/scan.l
+++ b/scan.l
@@ -42,13 +42,14 @@ return      return RETURN;
 \}          return CCLOSE;
 \;          return SEMICOLON;
 \[\]        return NIL;
+\.          return DOT;
 ,           return COMMA;
 '([^']|\\[abtnvfr]|\\x[0-9a-fA-F]{2})' {
        yylval = ast_char(yytext); return CHAR; }
 [0-9]+ {
        yylval = ast_int(atoi(yytext)); return INTEGER; }
 [_a-zA-Z][_a-zA-Z0-9]* {
-       yylval = ast_ident(yytext); return IDENT; }
+       yylval = ast_identc(yytext); return IDENT; }
 [ \n\t]  ;
 
 %%