glcpp: Set line locations in the lexer.
authorKenneth Graunke <kenneth@whitecape.org>
Thu, 17 Jun 2010 00:41:12 +0000 (17:41 -0700)
committerKenneth Graunke <kenneth@whitecape.org>
Mon, 21 Jun 2010 18:31:56 +0000 (11:31 -0700)
glcpp/glcpp-lex.l

index f17336974e6ed1972994e91be6b2b9b0a7faca89..3703ad90fe23d8f323554336932c623b56e174c0 100644 (file)
 
 #include "glcpp.h"
 #include "glcpp-parse.h"
+
+#define YY_USER_ACTION                                          \
+   do {                                                         \
+      yylloc->source = 0;                                       \
+      yylloc->first_column = yycolumn + 1;                      \
+      yylloc->first_line = yylineno + 1;                        \
+      yycolumn += yyleng;                                       \
+   } while(0);
 %}
 
 %option bison-bridge bison-locations reentrant noyywrap
 %option extra-type="glcpp_parser_t *"
 %option prefix="glcpp_"
+%option stack
 
-%x DONE
+%x DONE COMMENT
 
 SPACE          [[:space:]]
 NONSPACE       [^[:space:]]
@@ -48,17 +57,23 @@ DECIMAL_INTEGER             [1-9][0-9]*[uU]?
 OCTAL_INTEGER          0[0-7]*[uU]?
 HEXADECIMAL_INTEGER    0[xX][0-9a-fA-F]+[uU]?
 
-NON_STARS_THEN_STARS   [^*]*[*]+
-
 %%
 
        /* Single-line comments */
 "//"[^\n]+\n {
+       yylineno++;
+       yycolumn = 0;
        return NEWLINE;
 }
 
        /* Multi-line comments */
-"/*"({NON_STARS_THEN_STARS}[^*/])*{NON_STARS_THEN_STARS}"/" {
+"/*"                    { yy_push_state(COMMENT, yyscanner); }
+<COMMENT>[^*\n]*
+<COMMENT>[^*\n]*\n      { yylineno++; yycolumn = 0; }
+<COMMENT>"*"+[^*/\n]*
+<COMMENT>"*"+[^*/\n]*\n { yylineno++; yycolumn = 0; }
+<COMMENT>"*"+"/"        {
+       yy_pop_state(yyscanner);
        if (yyextra->space_tokens)
                return SPACE;
 }
@@ -216,6 +231,8 @@ NON_STARS_THEN_STARS        [^*]*[*]+
 
 \n {
        yyextra->lexing_if = 0;
+       yylineno++;
+       yycolumn = 0;
        return NEWLINE;
 }