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

fixed two possible null-references

Browse source
This commit is contained in:
ceriel 1991-05-13 13:57:25 +00:00
parent d8d30b403b
commit f4757c8370
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lang/m2/comp/chk_expr.c
View file

@ -616,7 +616,8 @@ getarg(argp, bases, designator, edf)
register t_node *arg = nextarg(argp, edf);
register t_node *left;
if (! arg->nd_LEFT ||
if (! arg ||
! arg->nd_LEFT ||
! (designator ? ChkVariable(&(arg->nd_LEFT), D_USED|D_DEFINED) : ChkExpression(&(arg->nd_LEFT)))) {
return 0;
}
@ -652,7 +653,7 @@ getname(argp, kinds, bases, edf)
register t_node *arg = nextarg(argp, edf);
register t_node *left;
if (!arg->nd_LEFT || ! ChkDesig(&(arg->nd_LEFT), D_USED)) return 0;
if (!arg || !arg->nd_LEFT || ! ChkDesig(&(arg->nd_LEFT), D_USED)) return 0;
left = arg->nd_LEFT;
if (left->nd_class != Def) {