godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

code for '*(ip = iarr) = x' was wrong

Browse Source
This commit is contained in:
eck 1990-04-04 15:08:45 +00:00
parent ae3d58b76f
commit b50e3aeab5
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lang/cem/cemcom.ansi/ch3mon.c
View File

@ -42,7 +42,9 @@ ch3mon(oper, expp)
symbol2str((*expp)->ex_type->tp_fund));
} else {
expr = *expp;
if (expr->ex_lvalue == 0 && expr->ex_class != String)
if ((expr->ex_type->tp_fund == ARRAY
&& expr->ex_class != String)
|| expr->ex_type->tp_fund == FUNCTION)
/* dereference in administration only */
expr->ex_type = expr->ex_type->tp_up;
else /* runtime code */