d0p1/tcc-stupidos
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Rewrite gexpr a bit

Browse source
This commit is contained in:
herman ten brugge 2024-01-08 11:34:47 +01:00
parent 2701dcfb06
commit 6120656cbf
1 changed files with 4 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
tccgen.c
View file

@ -6545,19 +6545,14 @@ static void expr_eq(void)
ST_FUNC void gexpr(void) ST_FUNC void gexpr(void)
{ {
int comma_found = 0; expr_eq();
while (tok == ',') {
while (1) {
expr_eq();
if (comma_found)
convert_parameter_type (&vtop->type);
if (tok != ',')
break;
constant_p &= (vtop->r & (VT_VALMASK | VT_LVAL)) == VT_CONST && constant_p &= (vtop->r & (VT_VALMASK | VT_LVAL)) == VT_CONST &&
!((vtop->r & VT_SYM) && vtop->sym->a.addrtaken); !((vtop->r & VT_SYM) && vtop->sym->a.addrtaken);
comma_found = 1;
vpop(); vpop();
next(); next();
expr_eq();
convert_parameter_type (&vtop->type);
} }
} }