From: bal <none@none>
Date: Wed, 23 Jan 1985 16:10:43 +0000 (+0000)
Subject: bug fixed in routine get_ca_lines(): test on nil-pointer.
X-Git-Tag: release-5-5~5723
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=e95492dfb0a7cec5ff2befbe2bae2f2de9fb1a8b;p=ack.git

bug fixed in routine get_ca_lines(): test on nil-pointer.
---

diff --git a/util/ego/ca/ca.c b/util/ego/ca/ca.c
index 0f5ac615b..abf1779a7 100644
--- a/util/ego/ca/ca.c
+++ b/util/ego/ca/ca.c
@@ -90,7 +90,7 @@ STATIC line_p get_ca_lines(lf,p_out)
 		}
 	}
 	*pp = (line_p) 0;
-	if (INSTR(head) == ps_pro) {
+	if (head != (line_p) 0 && INSTR(head) == ps_pro) {
 		/* append register message without arguments to list */
 		l = newline(OPLIST);
 		l->l_instr = ps_mes;