[ruby-dev:8164] [patch] reduce recursive calls to rb_eval()

えぐち＠エスアンドイー です。

a &&= b と a ||= b って
a = b if a と a = b unless a
の制御構造なんですねぇ(ちょっと感動)。

で、rb_eval() が再帰してたので、
＃右辺に複雑な式を書く人はいないかも知れませんが、
Thread などの事を考えるとスタック小さくするに
越した事は無いと思うので、if/unless や &&/|| の
要領で非再帰版にしてみました。

	えぐち

Mon Nov  1 14:22:15 1999  EGUCHI Osamu  <[e-mail]>

	* eval.c (rb_eval): reduce recursive calls to rb_eval()
	  case of ||= and &&= .

---
Index: eval.c
===================================================================
RCS file: /usr/home/eguchi/cvs.netlab.co.jp//ruby/eval.c,v
retrieving revision 1.13
diff -d -u -r1.13 eval.c
--- eval.c	1999/10/16 10:33:05	1.13
+++ eval.c	1999/11/01 02:12:12
@@ -2334,17 +2334,15 @@
 
       case NODE_OP_ASGN_AND:
 	result = rb_eval(self, node->nd_head);
-	if (RTEST(result)) {
-	    result = rb_eval(self, node->nd_value);
-	}
-	break;
+	if (!RTEST(result)) break;
+	node = node->nd_value;
+	goto again;
 
       case NODE_OP_ASGN_OR:
 	result = rb_eval(self, node->nd_head);
-	if (!RTEST(result)) {
-	    result = rb_eval(self, node->nd_value);
-	}
-	break;
+	if (RTEST(result)) break;
+	node = node->nd_value;
+	goto again;
 
       case NODE_MASGN:
 	result = massign(self, node, rb_eval(self, node->nd_value),0);