dynare/dynare++/parser/cc/namelist.y

39 lines
626 B
Plaintext

%{
#include "location.h"
#include "namelist.h"
#include "namelist_tab.hh"
int namelist_error(char*);
int namelist_lex(void);
extern ogp::NameListParser* name_list_parser;
%}
%union {
int integer;
char *string;
char character;
}
%token COMMA CHARACTER
%token <string> NAME;
%name-prefix="namelist_"
%locations
%error-verbose
%%
namelist : namelist NAME {name_list_parser->add_name($2);}
| namelist COMMA NAME {name_list_parser->add_name($3);}
| NAME {name_list_parser->add_name($1);}
;
%%
int namelist_error(char* mes)
{
name_list_parser->namelist_error(mes);
}