From: ceriel <none@none>
Date: Mon, 13 May 1991 13:57:25 +0000 (+0000)
Subject: fixed two possible null-references
X-Git-Tag: release-5-5~1118
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=f4757c837046ccb3fa388e69f05ce611f2d0216a;p=ack.git

fixed two possible null-references
---

diff --git a/lang/m2/comp/chk_expr.c b/lang/m2/comp/chk_expr.c
index aca253b7c..ba1b2364d 100644
--- a/lang/m2/comp/chk_expr.c
+++ b/lang/m2/comp/chk_expr.c
@@ -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) {