summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authornobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-08-13 09:52:06 +0000
committernobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2005-08-13 09:52:06 +0000
commite2d65d76ba540e81184a3b72b280ecbb7ed2d1c4 (patch)
tree2a4751c5b4143bf966848491d0e7d0696293fd25
parent9e4b5948f66d98956450387052df422c5cc3f549 (diff)
downloadruby-e2d65d76ba540e81184a3b72b280ecbb7ed2d1c4.tar.gz
ruby-e2d65d76ba540e81184a3b72b280ecbb7ed2d1c4.tar.xz
ruby-e2d65d76ba540e81184a3b72b280ecbb7ed2d1c4.zip
* eval.c (rb_block_pass): distinguish current block from others.
fixed: [ruby-dev:26274] git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@8981 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r--ChangeLog10
-rw-r--r--eval.c4
2 files changed, 12 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 67488f9b5..297f5604e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,4 +1,12 @@
-Sat Aug 13 18:35:27 2005 Nobuyoshi Nakada <nobu@ruby-lang.org>
+Sat Aug 13 18:51:26 2005 Nobuyoshi Nakada <nobu@ruby-lang.org>
+
+ * eval.c (rb_block_pass): distinguish current block from others.
+ fixed: [ruby-dev:26274]
+
+Sat Aug 13 18:51:25 2005 Nobuyoshi Nakada <nobu@ruby-lang.org>
+
+ * eval.c (rb_block_pass): distinguish current block from others.
+ fixed: [ruby-dev:26274]
* ext/stringio/stringio.c (strio_set_string): disallow nil.
http://www.rubyist.net/~nobu/t/20050811.html#c05
diff --git a/eval.c b/eval.c
index 69357dfcb..de8c05ef9 100644
--- a/eval.c
+++ b/eval.c
@@ -931,6 +931,7 @@ static struct iter *ruby_iter;
#define ITER_NOT 0
#define ITER_PRE 1
#define ITER_CUR 2
+#define ITER_PAS 3
#define PUSH_ITER(i) do { \
struct iter _iter; \
@@ -5617,6 +5618,7 @@ rb_call0(klass, recv, id, oid, argc, argv, body, nosuper)
switch (ruby_iter->iter) {
case ITER_PRE:
+ case ITER_PAS:
itr = ITER_CUR;
break;
case ITER_CUR:
@@ -8618,7 +8620,7 @@ block_pass(self, node)
}
if (ruby_block && ruby_block->block_obj == proc) {
- PUSH_ITER(ITER_PRE);
+ PUSH_ITER(ITER_PAS);
result = rb_eval(self, node->nd_iter);
POP_ITER();
return result;