qf/quakeforge
0
0
Fork 0
mirror of https://git.code.sf.net/p/quake/quakeforge synced 2025-02-17 01:11:45 +00:00
Code Issues Projects Releases Packages Wiki Activity

field types are parsed correctly, but parameters have been lost for the

Browse source 
moment
This commit is contained in:
Bill Currie 2001-06-20 23:32:13 +00:00
parent aac91d8cd6
commit ae98ed8603
1 changed files with 35 additions and 52 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

87
tools/qfcc/source/qc-parse.y
View file

@ -8,6 +8,8 @@
extern char *yytext;
extern int lineno;
void PR_PrintType(type_t*);
void
yyerror (const char *s)
{
@ -56,9 +58,9 @@ typedef struct {
%token LOCAL RETURN WHILE DO IF ELSE FOR ELIPSIS
%token <type> TYPE
%type <type> type
%type <type> type maybe_func
%type <def> param param_list def_item def_list def_name
%type <expr> const expr arg_list opt_initializer opt_definition
%type <expr> const expr arg_list opt_initializer
%type <statement> statement statements statement_block
%expect 1
@ -90,25 +92,31 @@ def
type
: TYPE
{
current_type = $1;
}
maybe_func
{
$$ = $3 ? $3 : $1;
}
| '.' TYPE
{
current_type = $2;
}
maybe_func
{
type_t new;
memset (&new, 0, sizeof (new));
new.type = ev_field;
new.aux_type = $2;
new.aux_type = $4 ? $4 : $2;
$$ = PR_FindType (&new);
}
;
def_list
: def_list ',' def_item
| def_item
;
def_item
: def_name opt_initializer
maybe_func
: /* empty */
{
$$ = $1;
$$ = 0;
}
| '('
{
@ -120,54 +128,36 @@ def_item
}
param_list
{
$$ = param_scope.scope_next;
$<def>$ = param_scope.scope_next;
PR_FlushScope (&param_scope);
current_type = $<scope>2.type;
param_scope.scope_next = $<scope>2.pscope;
pr_scope = $<scope>2.scope;
}
')'
{
current_type = parse_params ($<def>4);
}
def_name
{
$$ = $7->scope_next;
$7->scope_next = $<def>4;
}
opt_definition
{
PR_FlushScope ($7);
$7->scope_next = $<def>8;
$$ = $7;
$$ = parse_params ($<def>4);
}
| '(' ')'
{
current_type = parse_params (0);
}
def_name
{
$$ = $4->scope_next;
$4->scope_next = 0;
}
opt_definition
{
$4->scope_next = $<def>5;
$$ = $4;
$$ = parse_params (0);
}
| '(' ELIPSIS ')'
{
current_type = parse_params ((def_t*)1);
$$ = parse_params ((def_t*)1);
}
def_name
;
def_list
: def_list ',' def_item
| def_item
;
def_item
: def_name opt_initializer
{
$$ = $5->scope_next;
$5->scope_next = 0;
}
opt_definition
{
$5->scope_next = $<def>6;
$$ = $5;
$$ = $1;
}
;
@ -211,13 +201,6 @@ opt_initializer
{
$$ = $2;
}
;
opt_definition
: /*empty*/
{
$$ = 0;
}
| '=' '#' const
{
if ($3->type != ex_int && $3->type != ex_float) {