From 400ccecf0a072fed0be0945277b752ce6aace79b Mon Sep 17 00:00:00 2001 From: "Yukihiro \"Matz\" Matsumoto" Date: Thu, 10 Oct 2013 12:12:29 +0900 Subject: add mrb_gv_remove(); untested --- src/variable.c | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'src') diff --git a/src/variable.c b/src/variable.c index f2a474201..dd0ad5da4 100644 --- a/src/variable.c +++ b/src/variable.c @@ -1031,6 +1031,17 @@ mrb_gv_set(mrb_state *mrb, mrb_sym sym, mrb_value v) iv_put(mrb, t, sym, v); } +void +mrb_gv_remove(mrb_state *mrb, mrb_sym sym) +{ + iv_tbl *t; + + if (!mrb->globals) { + return; + } + iv_del(mrb, mrb->globals, sym, NULL); +} + static int gv_i(mrb_state *mrb, mrb_sym sym, mrb_value v, void *p) { -- cgit v1.2.3