code for '*(ip = iarr) = x' was wrong
This commit is contained in:
parent
f0c0b894f2
commit
ad7e46a324
1 changed files with 3 additions and 1 deletions
|
@ -42,7 +42,9 @@ ch3mon(oper, expp)
|
||||||
symbol2str((*expp)->ex_type->tp_fund));
|
symbol2str((*expp)->ex_type->tp_fund));
|
||||||
} else {
|
} else {
|
||||||
expr = *expp;
|
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 */
|
/* dereference in administration only */
|
||||||
expr->ex_type = expr->ex_type->tp_up;
|
expr->ex_type = expr->ex_type->tp_up;
|
||||||
else /* runtime code */
|
else /* runtime code */
|
||||||
|
|
Loading…
Reference in a new issue