diff mc-inline.c @ 504:48e4f6e6178c

*** empty log message ***
author kono
date Fri, 23 Dec 2005 20:14:15 +0900
parents 3c95c69aa80e
children 5d4112735c5c
line wrap: on
line diff
--- a/mc-inline.c	Fri Dec 23 19:44:26 2005 +0900
+++ b/mc-inline.c	Fri Dec 23 20:14:15 2005 +0900
@@ -20,6 +20,7 @@
 st_decl(int e1){
     // NMTBL *n = (NMTBL *)caddr(e1);
     // int stmode = cadddr(e1);
+    g_expr_u(cadr(e1));
 }
  
 extern void
@@ -45,6 +46,7 @@
 	fwddef(l1);
     }
     // conv->if_endif_();
+    g_expr_u(cadr(e1));
 }
 
  
@@ -68,6 +70,7 @@
     fwddef(blabel);
     clabel=scontinue;
     blabel=sbreak;
+    g_expr_u(cadr(e1));
 }
 
  
@@ -97,6 +100,7 @@
     fwddef(blabel);
     clabel=scontinue;
     blabel=sbreak;
+    g_expr_u(cadr(e1));
 }
 
  
@@ -141,6 +145,7 @@
     fwddef(blabel);
     clabel=scontinue;
     blabel=sbreak;
+    g_expr_u(cadr(e1));
 }
 
  
@@ -179,12 +184,14 @@
     fwddef(blabel);
     blabel=sbreak;
     cslist = slist;
+    g_expr_u(cadr(e1));
 }
 
  
 extern void
 st_comp(int e1){
     g_expr_u(caddr(e1));
+    g_expr_u(cadr(e1));
 }
 
  
@@ -194,6 +201,7 @@
     // conv->break_();
     if (control)
 	gen_jmp(blabel);
+    g_expr_u(cadr(e1));
 }
 
  
@@ -202,6 +210,7 @@
     checkret();
     // conv->continue_();
     if (control) gen_jmp(clabel);
+    g_expr_u(cadr(e1));
 }
 
  
@@ -252,6 +261,7 @@
     cmpdimm(car(c),csvalue1,cslabel=fwdlabel(),1);
     if (l) fwddef(l);
 #endif
+    g_expr_u(cadr(e1));
 }
 
  
@@ -262,6 +272,7 @@
     if (dlabel) error(STERR);  // double default:
     dlabel = backdef();
     // conv->case_(0,1);
+    g_expr_u(cadr(e1));
 }
 
  
@@ -274,6 +285,7 @@
         // conv->return_();
         // conv->return_end_();
         retpending = 1;
+	g_expr_u(cadr(e1));
         return;
     }
     // conv->return_();
@@ -301,6 +313,7 @@
     }
     // conv->return_end_();
     retpending = 1;
+    g_expr_u(cadr(e1));
 }
 
  
@@ -314,6 +327,7 @@
     e1 = caddr(e);
     if (car(e1)==RINDIRECT) {
 	gen_indirect_goto(cadr(e1));
+	g_expr_u(cadr(e1));
 	return;
     } else if (car(e1)==FLABEL) {
 	nlist = (NMTBL *)cadr(e1);
@@ -330,6 +344,7 @@
         control=0;
         // conv->sm_();
         // conv->goto_label_(nptr0);
+	g_expr_u(cadr(e1));
         return;
     } else {
 	/*   CbC continuation */
@@ -348,6 +363,7 @@
 	gexpr(list3(CODE,e1,env),0);
 	control=0;
 	// conv->sm_();
+	g_expr_u(cadr(e1));
 	return;
     }
 }
@@ -358,6 +374,7 @@
 st_asm(int e1){
     checkret();
     g_expr_u(list3(ASM,caddr(e1),cadddr(e1)));
+    g_expr_u(cadr(e1));
 }
 #endif
 
@@ -380,11 +397,13 @@
 	nptr->dsp = backdef();
     }
     // conv->label_();
+    g_expr_u(cadr(e1));
 }
 
 extern void
 st_comment(int e1){
     gen_comment((char *)caddr(e1));
+    g_expr_u(cadr(e1));
 }
 
 /*