Mercurial > hg > CbC > old > device

diff mc-codegen.c @ 229:d793c84b3679

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author kono
date Wed, 28 Apr 2004 00:02:59 +0900
parents 1ac647873577
children d60c6c31f63a
line wrap: on
line diff
--- a/mc-codegen.c	Tue Apr 27 23:16:02 2004 +0900
+++ b/mc-codegen.c	Wed Apr 28 00:02:59 2004 +0900
@@ -528,19 +528,19 @@
     case FOP+GE:
     case FOP+EQ:
     case FOP+NEQ:
-	drexpr(cadr(e1),caddr(e1),l1,car(e1));
+	drexpr(cadr(e1),caddr(e1),l1,car(e1),cond);
 	return;
     case FOP+LT:
-	drexpr(caddr(e1),cadr(e1),l1,FOP+GT);
+	drexpr(caddr(e1),cadr(e1),l1,FOP+GT,cond);
 	return;
     case FOP+LE:
-	drexpr(caddr(e1),cadr(e1),l1,FOP+GE);
+	drexpr(caddr(e1),cadr(e1),l1,FOP+GE,cond);
 	return;
     case DOP+LT:
-	drexpr(caddr(e1),cadr(e1),l1,DOP+GT);
+	drexpr(caddr(e1),cadr(e1),l1,DOP+GT,cond);
 	return;
     case DOP+LE:
-	drexpr(caddr(e1),cadr(e1),l1,DOP+GE);
+	drexpr(caddr(e1),cadr(e1),l1,DOP+GE,cond);
 	return;
 #endif
 #if LONGLONG_CODE
@@ -548,23 +548,23 @@
     case LOP+GE:
     case LOP+EQ:
     case LOP+NEQ:
-	lrexpr(cadr(e1),caddr(e1),l1,car(e1));
+	lrexpr(cadr(e1),caddr(e1),l1,car(e1),cond);
 	return;
     case LOP+LT:
-	lrexpr(caddr(e1),cadr(e1),l1,LOP+GT);
+	lrexpr(caddr(e1),cadr(e1),l1,LOP+GT,cond);
 	return;
     case LOP+LE:
-	lrexpr(caddr(e1),cadr(e1),l1,LOP+GE);
+	lrexpr(caddr(e1),cadr(e1),l1,LOP+GE,cond);
 	return;
     case LOP+UGT:
     case LOP+UGE:
-	lrexpr(cadr(e1),caddr(e1),l1,car(e1));
+	lrexpr(cadr(e1),caddr(e1),l1,car(e1),cond);
 	return;
     case LOP+ULT:
-	lrexpr(caddr(e1),cadr(e1),l1,LOP+UGT);
+	lrexpr(caddr(e1),cadr(e1),l1,LOP+UGT,cond);
 	return;
     case LOP+ULE:
-	lrexpr(caddr(e1),cadr(e1),l1,LOP+UGE);
+	lrexpr(caddr(e1),cadr(e1),l1,LOP+UGE,cond);
 	return;
 #endif
     case LAND: