From: ceriel <none@none>
Date: Thu, 24 Jun 1993 15:48:46 +0000 (+0000)
Subject: Fixed infinite loop
X-Git-Tag: release-5-5~315
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=eaa9dab166a6e482f7720be2624efe9c555df5d7;p=ack.git

Fixed infinite loop
---

diff --git a/lang/cem/cemcom.ansi/proto.c b/lang/cem/cemcom.ansi/proto.c
index f50662a39..3e236c3a9 100644
--- a/lang/cem/cemcom.ansi/proto.c
+++ b/lang/cem/cemcom.ansi/proto.c
@@ -402,7 +402,7 @@ call_proto(expp)
 	if (left != NILEXPR) {		/* in case of an error */
 		register struct type *tp = left->ex_type;
 
-		while (tp && tp->tp_fund != FUNCTION)
+		while (tp && tp->tp_fund != FUNCTION && tp != error_type)
 			tp = tp->tp_up;
 		if (tp && tp->tp_proto)
 			pl = tp->tp_proto;