From 4c26b23dbb944cc4848b8b9a5cab00815a635b44 Mon Sep 17 00:00:00 2001 From: matz Date: Fri, 2 May 2003 16:11:48 +0000 Subject: * class.c (rb_class_protected_instance_methods): now gives warnings to show migration path. * lib/delegate.rb (Delegator::initialize): instance_methods etc. now recurse by default. need to specify false. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3749 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- class.c | 22 ++++++++++++++++++++-- 1 file changed, 20 insertions(+), 2 deletions(-) (limited to 'class.c') diff --git a/class.c b/class.c index 833f96c4b4..be2be7e5ae 100644 --- a/class.c +++ b/class.c @@ -563,7 +563,10 @@ rb_class_instance_methods(argc, argv, mod) VALUE recur; rb_scan_args(argc, argv, "01", &recur); - if (argc == 0) recur = Qtrue; + if (argc == 0) { + rb_warn("instance_methods() default to true; specify false explicitly"); + recur = Qtrue; + } return method_list(mod, RTEST(recur), ins_methods_i); } @@ -576,6 +579,10 @@ rb_class_protected_instance_methods(argc, argv, mod) VALUE recur; rb_scan_args(argc, argv, "01", &recur); + if (argc == 0) { + rb_warn("protected_instance_methods() default to true; specify false explicitly"); + recur = Qtrue; + } if (argc == 0) recur = Qtrue; return method_list(mod, RTEST(recur), ins_methods_prot_i); } @@ -589,6 +596,10 @@ rb_class_private_instance_methods(argc, argv, mod) VALUE recur; rb_scan_args(argc, argv, "01", &recur); + if (argc == 0) { + rb_warn("private_instance_methods() default to true; specify false explicitly"); + recur = Qtrue; + } if (argc == 0) recur = Qtrue; return method_list(mod, RTEST(recur), ins_methods_priv_i); } @@ -602,6 +613,10 @@ rb_class_public_instance_methods(argc, argv, mod) VALUE recur; rb_scan_args(argc, argv, "01", &recur); + if (argc == 0) { + rb_warn("public_instance_methods() default to true; specify false explicitly"); + recur = Qtrue; + } if (argc == 0) recur = Qtrue; return method_list(mod, RTEST(recur), ins_methods_pub_i); } @@ -616,7 +631,10 @@ rb_obj_singleton_methods(argc, argv, obj) st_table *list; rb_scan_args(argc, argv, "01", &all); - if (argc == 0) all = Qtrue; + if (argc == 0) { + rb_warn("singleton_methods() default to true; specify false explicitly"); + all = Qtrue; + } klass = CLASS_OF(obj); list = st_init_numtable(); while (klass && FL_TEST(klass, FL_SINGLETON)) { -- cgit v1.2.3