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

produce debugging info

Browse source
This commit is contained in:
ceriel 1991-06-26 17:30:48 +00:00
parent 47dccc3c67
commit e505a02ad7
2 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
util/ego/il/il.c
View file

@ -83,7 +83,7 @@ pass1(lnam,bnam,cnam)
remunit(LDATA,(proc_p) 0,l); remunit(LDATA,(proc_p) 0,l);
continue; 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); assert(INSTR(g->b_start) == ps_pro);
curproc->p_start = g; curproc->p_start = g;
curproc->P_LADDR = laddr; curproc->P_LADDR = laddr;
@ -97,10 +97,10 @@ pass1(lnam,bnam,cnam)
} }
calnr = 0; calnr = 0;
anal_proc(curproc,cf,ccf); 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); remunit(LTEXT,curproc,(line_p) 0);
/* remove control flow graph + text */ /* 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); Ldeleteset(mesregs);
mesregs = Lempty_set(); mesregs = Lempty_set();
} }

4
util/ego/il/il2_aux.c
View file

@ -325,7 +325,7 @@ STATIC bool is_dispensable(callee,ccf)
(complete_program || (callee->p_flags1 & PF_EXTERNAL) == 0) && (complete_program || (callee->p_flags1 & PF_EXTERNAL) == 0) &&
(callee->p_flags1 & PF_LPI) == 0) { (callee->p_flags1 & PF_LPI) == 0) {
DISPENSABLE(callee); DISPENSABLE(callee);
OUTTRACE("procedure %d can be removed",callee->p_id); OUTVERBOSE("dispensable: procedure %d can be removed",callee->p_id);
#ifdef VERBOSE #ifdef VERBOSE
Spremoved++; Spremoved++;
#endif #endif
@ -473,7 +473,7 @@ STATIC singles(cals)
EVER_EXPANDED(find_origin(c)); EVER_EXPANDED(find_origin(c));
DISPENSABLE(c->cl_proc); DISPENSABLE(c->cl_proc);
CHANGED(c->cl_caller); CHANGED(c->cl_caller);
OUTTRACE("procedure %d can be removed", OUTVERBOSE("singles: procedure %d can be removed",
c->cl_proc->p_id); c->cl_proc->p_id);
#ifdef VERBOSE #ifdef VERBOSE
Spremoved++; Spremoved++;