From 37fe3d666f12f4dbd0e2fc1688d83ece94667f4e Mon Sep 17 00:00:00 2001 From: Yukihiro Matz Matsumoto Date: Fri, 15 Feb 2013 10:20:55 +0900 Subject: add Module#remove_const --- src/variable.c | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'src/variable.c') diff --git a/src/variable.c b/src/variable.c index 6aa6e71bd..a5ff36f6f 100644 --- a/src/variable.c +++ b/src/variable.c @@ -889,7 +889,7 @@ mrb_const_set(mrb_state *mrb, mrb_value mod, mrb_sym sym, mrb_value v) mrb_iv_set(mrb, mod, sym, v); } -void + void mrb_vm_const_set(mrb_state *mrb, mrb_sym sym, mrb_value v) { struct RClass *c = mrb->ci->proc->target_class; @@ -898,6 +898,13 @@ mrb_vm_const_set(mrb_state *mrb, mrb_sym sym, mrb_value v) mrb_obj_iv_set(mrb, (struct RObject*)c, sym, v); } +void +mrb_const_remove(mrb_state *mrb, mrb_value mod, mrb_sym sym) +{ + mod_const_check(mrb, mod); + mrb_iv_remove(mrb, mod, sym); +} + void mrb_define_const(mrb_state *mrb, struct RClass *mod, const char *name, mrb_value v) { -- cgit v1.2.3