don't optimize when ms_gto

util/ego/bo/bo.c

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

util/ego/cj/cj.c

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

util/ego/cs/cs.c

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

util/ego/il/il1_anal.c

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

util/ego/lv/lv.c

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

util/ego/ra/ra.c

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

util/ego/sp/sp.c

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

util/ego/sr/sr.c

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

util/ego/ud/ud.c

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