From: Yusuke ENDOH <mame@...>
Date: 2009-11-24T21:41:47+09:00
Subject: [ruby-dev:39766] Re: [Bug #2395] 	可視性の変更による alias 	されたメソッドの無効化

遠藤です。

2009年11月24日13:09 Yusuke ENDOH <mame@tsg.ne.jp>:
> スーパークラスのメソッドの public/private を ZSUPER で実装することが
> 原因だと思いますが、どう直したものでしょうね。ZSUPER を alias する時は
> メソッド実体を複製する？

こっちを実装しました。
[ruby-dev:39760] のコードだと :foo, :foo と出力するようになります。

このパッチを当てると original_id と違う名前の ZSUPER なメソッドは発生
し得なくなるはずなので、[ruby-dev:39761] のパッチは不要になります。

make check でもエラーは増えなかったので、反対意見が無ければコミット
しようと思います。


diff --git a/vm_method.c b/vm_method.c
index 215db50..3b86713 100644
--- a/vm_method.c
+++ b/vm_method.c
@@ -858,7 +858,9 @@ rb_method_definition_eq(const
rb_method_definition_t *d1, const rb_method_defini
 void
 rb_alias(VALUE klass, ID name, ID def)
 {
+    VALUE target_klass = klass;
     rb_method_entry_t *orig_me;
+    rb_method_flag_t flag = NOEX_UNDEF;

     if (NIL_P(klass)) {
 	rb_raise(rb_eTypeError, "no class to make alias");
@@ -869,6 +871,7 @@ rb_alias(VALUE klass, ID name, ID def)
 	rb_secure(4);
     }

+  again:
     orig_me = search_method(klass, def);

     if (UNDEFINED_METHOD_ENTRY_P(orig_me)) {
@@ -877,8 +880,15 @@ rb_alias(VALUE klass, ID name, ID def)
 	    rb_print_undef(klass, def, 0);
 	}
     }
+    if (orig_me->def->type == VM_METHOD_TYPE_ZSUPER) {
+	klass = RCLASS_SUPER(klass);
+	def = orig_me->def->original_id;
+	flag = orig_me->flag;
+	goto again;
+    }

-    rb_add_method_me(klass, name, orig_me, orig_me->flag);
+    if (flag == NOEX_UNDEF) flag = orig_me->flag;
+    rb_add_method_me(target_klass, name, orig_me, flag);
 }

 /*

-- 
Yusuke ENDOH <mame@tsg.ne.jp>