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

don't optimize when ms_gto

Browse source
This commit is contained in:
ceriel 1987-10-02 12:52:29 +00:00
parent 1ac5d9c95a
commit 102a2b1061
9 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
util/ego/bo/bo.c
View file

@ -303,6 +303,7 @@ bo_optimize(p)
{ {
bblock_p b; bblock_p b;
if (IS_ENTERED_WITH_GTO(p)) return;
bo_extproc(p); bo_extproc(p);
loop_blocks(p); loop_blocks(p);
bo_loops(p); bo_loops(p);

1
util/ego/cj/cj.c
View file

@ -287,6 +287,7 @@ cj_optimize(p)
bblock_p b; bblock_p b;
bool changes = TRUE; bool changes = TRUE;
if (IS_ENTERED_WITH_GTO(p)) return;
while(changes) { while(changes) {
changes = FALSE; changes = FALSE;
b = p->p_start; b = p->p_start;

1
util/ego/cs/cs.c
View file

@ -40,6 +40,7 @@ STATIC cs_optimize(p)
register bblock_p rbp, bdone; register bblock_p rbp, bdone;
if (IS_ENTERED_WITH_GTO(p)) return;
avails = (avail_p) 0; avails = (avail_p) 0;
entities = Lempty_set(); entities = Lempty_set();
cs_clear(); cs_clear();

3
util/ego/il/il1_anal.c
View file

@ -54,7 +54,8 @@ apriori(proctab)
for (p = proctab; p != (proc_p) 0; p = p->p_next) { for (p = proctab; p != (proc_p) 0; p = p->p_next) {
if (!BODY_KNOWN(p) || if (!BODY_KNOWN(p) ||
ENVIRON(p) || RECURSIVE(p) || ENVIRON(p) || RECURSIVE(p) ||
PARAMS_UNKNOWN(p) || MANY_LOCALS(p)) { PARAMS_UNKNOWN(p) || MANY_LOCALS(p) ||
IS_ENTERED_WITH_GTO(p)) {
UNSUITABLE(p); UNSUITABLE(p);
#ifdef VERBOSE #ifdef VERBOSE
if (BODY_KNOWN(p)) { if (BODY_KNOWN(p)) {

1
util/ego/lv/lv.c
View file

@ -591,6 +591,7 @@ lv_flags(p)
lv_optimize(p) lv_optimize(p)
proc_p p; proc_p p;
{ {
if (IS_ENTERED_WITH_GTO(p)) return;
locals = (local_p *) 0; locals = (local_p *) 0;
lv_extend(p); lv_extend(p);
live_variables_analysis(p); live_variables_analysis(p);

1
util/ego/ra/ra.c
View file

@ -355,6 +355,7 @@ ra_optimize(p)
offset locls; offset locls;
bool time_opt = (time_space_ratio == 100); bool time_opt = (time_space_ratio == 100);
if (IS_ENTERED_WITH_GTO(p)) return;
ra_extproc(p); ra_extproc(p);
loop_blocks(p); loop_blocks(p);
alloc_id =0; alloc_id =0;

1
util/ego/sp/sp.c
View file

@ -197,6 +197,7 @@ sp_optimize(p)
{ {
register bblock_p b; register bblock_p b;
if (IS_ENTERED_WITH_GTO(p)) return;
mark_unsave_blocks(p); mark_unsave_blocks(p);
for (b = p->p_start; b != 0; b = b->b_next) { for (b = p->p_start; b != 0; b = b->b_next) {
stack_pollution(b); stack_pollution(b);

1
util/ego/sr/sr.c
View file

@ -216,6 +216,7 @@ STATIC sr_cleanproc(p)
sr_optimize(p) sr_optimize(p)
proc_p p; proc_p p;
{ {
if (IS_ENTERED_WITH_GTO(p)) return;
sr_extproc(p); sr_extproc(p);
loopblocks(p); loopblocks(p);
opt_proc(p); opt_proc(p);

1
util/ego/ud/ud.c
View file

@ -533,6 +533,7 @@ STATIC ud_cleanup(p)
ud_optimize(p) ud_optimize(p)
proc_p p; proc_p p;
{ {
if (IS_ENTERED_WITH_GTO(p)) return;
ud_extend(p); ud_extend(p);
locals = (local_p *) 0; locals = (local_p *) 0;
vardefs = (cset *) 0; vardefs = (cset *) 0;