fdo-mirrors/mesa
1
0
Fork 0
mirror of https://gitlab.freedesktop.org/mesa/mesa.git synced 2025-12-30 16:30:10 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

glsl/glcpp: Abstract a bit of common code for returning string tokens

Browse source 
Now that we have a common macro for returning tokens, it makes sense to
perform some of the common work there, (such as copying string values).

Reviewed-by: Jordan Justen <jordan.l.justen@intel.com>
This commit is contained in:
Carl Worth 2014-06-20 15:30:21 -07:00
parent 828686d4eb
commit 09b4e12900
1 changed files with 18 additions and 22 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

40
src/glsl/glcpp/glcpp-lex.l
View file

@ -70,6 +70,12 @@ void glcpp_set_column (int column_no , yyscan_t yyscanner);
return (token); \
} while(0)
#define RETURN_STRING_TOKEN(token) \
do { \
yylval->str = ralloc_strdup (yyextra, yytext); \
RETURN_TOKEN (token); \
} while(0)
%}
%option bison-bridge bison-locations reentrant noyywrap
@ -183,18 +189,16 @@ HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
}
{HASH}version{HSPACE}+ {
yylval->str = ralloc_strdup (yyextra, yytext);
yyextra->space_tokens = 0;
RETURN_TOKEN (HASH_VERSION);
RETURN_STRING_TOKEN (HASH_VERSION);
}
/* glcpp doesn't handle #extension, #version, or #pragma directives.
* Simply pass them through to the main compiler's lexer/parser. */
{HASH}(extension|pragma)[^\n]* {
yylval->str = ralloc_strdup (yyextra, yytext);
yylineno++;
yycolumn = 0;
RETURN_TOKEN (OTHER);
RETURN_STRING_TOKEN (OTHER);
}
{HASH}line{HSPACE}+ {
@ -274,15 +278,13 @@ HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
/* An identifier immediately followed by '(' */
<DEFINE>{IDENTIFIER}/"(" {
yy_pop_state(yyscanner);
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (FUNC_IDENTIFIER);
RETURN_STRING_TOKEN (FUNC_IDENTIFIER);
}
/* An identifier not immediately followed by '(' */
<DEFINE>{IDENTIFIER} {
yy_pop_state(yyscanner);
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (OBJ_IDENTIFIER);
RETURN_STRING_TOKEN (OBJ_IDENTIFIER);
}
/* Whitespace */
@ -294,7 +296,7 @@ HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
<DEFINE>[/][^*]{NONSPACE}* {
BEGIN INITIAL;
glcpp_error(yylloc, yyextra, "#define followed by a non-identifier: %s", yytext);
RETURN_TOKEN (INTEGER_STRING);
RETURN_STRING_TOKEN (INTEGER_STRING);
}
/* A character that can't start an identifier, comment, or
@ -302,7 +304,7 @@ HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
<DEFINE>[^_a-zA-Z/[:space:]]{NONSPACE}* {
BEGIN INITIAL;
glcpp_error(yylloc, yyextra, "#define followed by a non-identifier: %s", yytext);
RETURN_TOKEN (INTEGER_STRING);
RETURN_STRING_TOKEN (INTEGER_STRING);
}
{HASH}undef {
@ -316,18 +318,15 @@ HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
}
{DECIMAL_INTEGER} {
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (INTEGER_STRING);
RETURN_STRING_TOKEN (INTEGER_STRING);
}
{OCTAL_INTEGER} {
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (INTEGER_STRING);
RETURN_STRING_TOKEN (INTEGER_STRING);
}
{HEXADECIMAL_INTEGER} {
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (INTEGER_STRING);
RETURN_STRING_TOKEN (INTEGER_STRING);
}
"<<" {
@ -373,13 +372,11 @@ HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
}
{IDENTIFIER} {
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (IDENTIFIER);
RETURN_STRING_TOKEN (IDENTIFIER);
}
{PP_NUMBER} {
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (OTHER);
RETURN_STRING_TOKEN (OTHER);
}
{PUNCTUATION} {
@ -387,8 +384,7 @@ HEXADECIMAL_INTEGER 0[xX][0-9a-fA-F]+[uU]?
}
{OTHER}+ {
yylval->str = ralloc_strdup (yyextra, yytext);
RETURN_TOKEN (OTHER);
RETURN_STRING_TOKEN (OTHER);
}
{HSPACE} {