aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--insns.def11
-rw-r--r--test/ruby/test_defined.rb16
3 files changed, 32 insertions, 0 deletions
diff --git a/ChangeLog b/ChangeLog
index 016c307ef5..248cc22c11 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sun May 5 16:29:41 2013 Nobuyoshi Nakada <nobu@ruby-lang.org>
+
+ * insns.def (defined): get method entry from the method top level
+ frame, not block frame. [ruby-core:54769] [Bug #8367]
+
Sun May 5 13:28:54 2013 Nobuyoshi Nakada <nobu@ruby-lang.org>
* template/ruby.pc.in (Cflags): use rubyarchhdrdir for multiarch.
diff --git a/insns.def b/insns.def
index b51e60018c..d8be61114e 100644
--- a/insns.def
+++ b/insns.def
@@ -765,6 +765,17 @@ defined
break;
case DEFINED_ZSUPER:{
const rb_method_entry_t *me = GET_CFP()->me;
+ if (!me) {
+ const rb_control_frame_t *end_cfp = RUBY_VM_END_CONTROL_FRAME(GET_THREAD());
+ const rb_control_frame_t *cfp = GET_CFP();
+ const VALUE *const local_ep = rb_vm_ep_local_ep(cfp->ep);
+ while (RUBY_VM_VALID_CONTROL_FRAME_P(cfp = RUBY_VM_PREVIOUS_CONTROL_FRAME(cfp), end_cfp)) {
+ if (cfp->ep == local_ep) {
+ me = cfp->me;
+ break;
+ }
+ }
+ }
if (me) {
VALUE klass = vm_search_normal_superclass(GET_CFP()->klass);
ID id = me->def ? me->def->original_id : me->called_id;
diff --git a/test/ruby/test_defined.rb b/test/ruby/test_defined.rb
index 511444fa8d..7533e7d9dd 100644
--- a/test/ruby/test_defined.rb
+++ b/test/ruby/test_defined.rb
@@ -188,4 +188,20 @@ class TestDefined < Test::Unit::TestCase
end
assert_equal("super", c.new.m)
end
+
+ def test_super_in_block
+ bug8367 = '[ruby-core:54769] [Bug #8367]'
+ c = Class.new do
+ def x; end
+ end
+
+ m = Module.new do
+ def b; yield; end
+ def x; b {return defined?(super)}; end
+ end
+
+ o = c.new
+ o.extend(m)
+ assert_equal("super", o.x)
+ end
end