* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
- #include "parse.h"
+#include <config.h>
+#include "parse.h"
}
-%option noyywrap bison-locations reentrant
+%option nodefault noyywrap bison-locations reentrant never-interactive
+%option extra-type="_Bool"
+%option prefix="cdecl__yy"
%{
#define lex_error(msg) do { \
- yyerror(yylloc, NULL, NULL, (msg)); \
+ cdecl__yyerror(yylloc, NULL, NULL, (msg)); \
return T_LEX_ERROR; \
} while(0)
+
+#define dup_token() do { \
+ yylval->strval = malloc(yyleng+1); \
+ if (!yylval->strval) \
+ lex_error("failed to allocate memory"); \
+ strcpy(yylval->strval, yytext); \
+} while(0)
%}
+%s ENGLISH
+
IDENT [_[:alpha:]][_[:alnum:]]*
INTEGER 0x[[:xdigit:]]+|0[0-7]+|[[:digit:]]+
%%
+%{
+ if (yyextra) {
+ yyextra = 0;
+ BEGIN(ENGLISH);
+ return T_ENGLISH;
+ }
+%}
+
"..." return T_ELLIPSIS;
";" return T_SEMICOLON;
"*" return T_ASTERISK;
return T_UINT;
}
-{IDENT} {
- yylval->strval = malloc(yyleng+1);
- if (!yylval->strval)
- lex_error("failed to allocate memory");
-
- strcpy(yylval->strval, yytext);
- return T_IDENT;
+<ENGLISH>{
+ "variable-length" return T_VLA;
+ "type" return T_TYPE;
+ "declare" return T_DECLARE;
+ "pointer" return T_POINTER;
+ "function" return T_FUNCTION;
+ "returning" return T_RETURNING;
+ "array" return T_ARRAY;
+ "to" return T_TO;
+ "of" return T_OF;
+ "as" return T_AS;
}
+{IDENT} { dup_token(); return T_IDENT; }
+
[[:space:]]+
. {
char buf[] = "syntax error, unexpected #";