diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/class.c | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/src/class.c b/src/class.c index 9424e8d84..fa6adaf28 100644 --- a/src/class.c +++ b/src/class.c @@ -806,6 +806,20 @@ mrb_instance_new(mrb_state *mrb, mrb_value cv) return obj; } +mrb_value +mrb_class_new_class(mrb_state *mrb, mrb_value cv) +{ + mrb_value super; + if(mrb->ci->argc > 0) { + mrb_get_args(mrb, "o", &super); + } + else { + super = mrb_obj_value(mrb->object_class); + } + struct RClass *new_class = mrb_class_new(mrb, mrb_class_ptr(super)); + return mrb_obj_value(new_class); +} + static mrb_value mrb_bob_init(mrb_state *mrb, mrb_value cv) { @@ -1226,6 +1240,7 @@ mrb_init_class(mrb_state *mrb) mrb_define_method(mrb, bob, "initialize", mrb_bob_init, ARGS_NONE()); mrb_define_method(mrb, bob, "!", mrb_bob_not, ARGS_NONE()); mrb_define_method(mrb, bob, "method_missing", mrb_bob_missing, ARGS_ANY()); /* 15.3.1.3.30 */ + mrb_define_class_method(mrb, cls, "new", mrb_class_new_class, ARGS_ANY()); mrb_define_method(mrb, cls, "new", mrb_instance_new, ARGS_ANY()); mrb_define_method(mrb, cls, "inherited", mrb_bob_init, ARGS_REQ(1)); mrb_define_method(mrb, mod, "include", mrb_mod_include, ARGS_REQ(1)); |