From: ceriel <none@none>
Date: Wed, 26 Jun 1991 17:30:48 +0000 (+0000)
Subject: produce debugging info
X-Git-Tag: release-5-5~1093
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=e505a02ad70dc7bbaf539627e755dfc4cacc53f2;p=ack.git

produce debugging info
---

diff --git a/util/ego/il/il.c b/util/ego/il/il.c
index 4da42e176..d825fa6d1 100644
--- a/util/ego/il/il.c
+++ b/util/ego/il/il.c
@@ -83,7 +83,7 @@ pass1(lnam,bnam,cnam)
 			remunit(LDATA,(proc_p) 0,l);
 			continue;
 		}
-		/* OUTTRACE("flow graph of proc %d read",curproc->p_id); */
+		OUTTRACE("flow graph of proc %d read",curproc->p_id);
 		assert(INSTR(g->b_start) == ps_pro);
 		curproc->p_start = g;
 		curproc->P_LADDR = laddr;
@@ -97,10 +97,10 @@ pass1(lnam,bnam,cnam)
 		}
 		calnr = 0;
 		anal_proc(curproc,cf,ccf);
-		/* OUTTRACE("proc %d processed",curproc->p_id); */
+		OUTTRACE("proc %d processed",curproc->p_id);
 		remunit(LTEXT,curproc,(line_p) 0);
 		/* remove control flow graph + text */
-		/* OUTTRACE("graph of proc %d removed",curproc->p_id); */
+		OUTTRACE("graph of proc %d removed",curproc->p_id);
 		Ldeleteset(mesregs);
 		mesregs = Lempty_set();
 	}
diff --git a/util/ego/il/il2_aux.c b/util/ego/il/il2_aux.c
index 32f8b6a16..ae67476a1 100644
--- a/util/ego/il/il2_aux.c
+++ b/util/ego/il/il2_aux.c
@@ -325,7 +325,7 @@ STATIC bool is_dispensable(callee,ccf)
 	    (complete_program || (callee->p_flags1 & PF_EXTERNAL) == 0) &&
 	    (callee->p_flags1 & PF_LPI) == 0) {
 		DISPENSABLE(callee);
-		OUTTRACE("procedure %d can be removed",callee->p_id);
+		OUTVERBOSE("dispensable: procedure %d can be removed",callee->p_id);
 #ifdef VERBOSE
 		Spremoved++;
 #endif
@@ -473,7 +473,7 @@ STATIC singles(cals)
 				EVER_EXPANDED(find_origin(c));
 				DISPENSABLE(c->cl_proc);
 				CHANGED(c->cl_caller);
-				OUTTRACE("procedure %d can be removed",
+				OUTVERBOSE("singles: procedure %d can be removed",
 				  c->cl_proc->p_id);
 #ifdef VERBOSE
 				  Spremoved++;