diff options
author | akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2009-04-16 14:17:14 +0000 |
---|---|---|
committer | akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2009-04-16 14:17:14 +0000 |
commit | 8b27d153d22a266d77f3bdfa98ff60a1bfa53322 (patch) | |
tree | 46d2b5cfc923aa18bc9f70405a0e6460252a4196 /vm_method.c | |
parent | bded3bb726d1c2b052d20a1b1398a6ed8eebae6e (diff) |
* class.c (rb_define_method_id): use rb_define_notimplement_method_id
if rb_f_notimplement is given.
(rb_define_protected_method): ditto.
(rb_define_private_method): ditto.
(rb_define_method): use rb_define_method_id.
* include/ruby/intern.h (rb_f_notimplement): declared.
(rb_define_notimplement_method_id): declared.
* proc.c (method_inspect): show not-implemented.
* vm_method.c (notimplement_body): new variable.
(rb_notimplement_body_p): new function.
(rb_method_boundp): return false if not implemented.
(rb_f_notimplement): new function.
(rb_define_notimplement_method_id): new function.
* process.c (rb_f_fork): use rb_f_notimplement if not implemented.
* file.c (rb_file_s_lchmod): use rb_f_notimplement if not implemented.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@23192 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'vm_method.c')
-rw-r--r-- | vm_method.c | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/vm_method.c b/vm_method.c index 774fa1eda9..307471d3d1 100644 --- a/vm_method.c +++ b/vm_method.c @@ -24,6 +24,8 @@ static struct cache_entry cache[CACHE_SIZE]; #define ruby_running (GET_VM()->running) /* int ruby_running = 0; */ +static NODE *notimplement_body = 0; + void rb_clear_cache(void) { @@ -414,6 +416,12 @@ rb_export_method(VALUE klass, ID name, ID noex) } int +rb_notimplement_body_p(NODE *method) +{ + return method == notimplement_body ? Qtrue : Qfalse; +} + +int rb_method_boundp(VALUE klass, ID id, int ex) { NODE *method; @@ -422,6 +430,8 @@ rb_method_boundp(VALUE klass, ID id, int ex) if (ex && (method->nd_noex & NOEX_PRIVATE)) { return Qfalse; } + if (rb_notimplement_body_p(method->nd_body)) + return Qfalse; return Qtrue; } return Qfalse; @@ -811,6 +821,18 @@ rb_mod_alias_method(VALUE mod, VALUE newname, VALUE oldname) return mod; } +VALUE +rb_f_notimplement(int argc, VALUE *argv, VALUE obj) +{ + rb_notimplement(); +} + +void +rb_define_notimplement_method_id(VALUE mod, ID id, int noex) +{ + rb_add_method(mod, id, notimplement_body, noex); +} + static void secure_visibility(VALUE self) { @@ -1137,5 +1159,8 @@ Init_eval_method(void) singleton_removed = rb_intern("singleton_method_removed"); undefined = rb_intern("method_undefined"); singleton_undefined = rb_intern("singleton_method_undefined"); + + rb_global_variable(¬implement_body); + notimplement_body = NEW_CFUNC(rb_f_notimplement, -1); } |