d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

fixed problem with 'if (array)'

Browse source
This commit is contained in:
ceriel 1988-08-04 14:37:06 +00:00
parent 1726d23a44
commit 28d39e927b
1 changed files with 11 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
lang/cem/cemcom/arith.c
View file

@ -357,13 +357,20 @@ opnd2logical(expp, oper)
register struct expr **expp;
int oper;
{
int fund;
int fund = (*expp)->ex_type->tp_fund;
if ((*expp)->ex_type->tp_fund == FUNCTION)
if (fund == FUNCTION || fund == ARRAY) {
expr_warning(*expp, "%s operand to %s",
symbol2str(fund),
symbol2str(oper));
if (fund == FUNCTION) {
function2pointer(*expp);
}
else array2pointer(*expp);
}
#ifndef NOBITFIELD
else
if ((*expp)->ex_type->tp_fund == FIELD)
if (fund == FIELD)
field2arith(expp);
#endif NOBITFIELD
switch (fund = (*expp)->ex_type->tp_fund) {