From bd1b925931b2456cf19ee7296de554f518326c4e Mon Sep 17 00:00:00 2001 From: crimsonwoods Date: Thu, 25 Apr 2013 09:51:20 +0900 Subject: modify the type of return value (mrb_bool => mrb_value). --- src/symbol.c | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) (limited to 'src') diff --git a/src/symbol.c b/src/symbol.c index 3d841a636..f1dff6a8d 100644 --- a/src/symbol.c +++ b/src/symbol.c @@ -72,25 +72,30 @@ mrb_intern_str(mrb_state *mrb, mrb_value str) return mrb_intern2(mrb, RSTRING_PTR(str), RSTRING_LEN(str)); } -mrb_bool +mrb_value mrb_cstr_interned(mrb_state *mrb, const char *name) { return mrb_interned(mrb, name, strlen(name)); } -mrb_bool +mrb_value mrb_interned(mrb_state *mrb, const char *name, size_t len) { khash_t(n2s) *h = mrb->name2sym; symbol_name sname; + khiter_t k; sname.len = len; sname.name = name; - return (kh_get(n2s, h, sname) != kh_end(h)) ? TRUE : FALSE; + k = kh_get(n2s, h, sname); + if (k != kh_end(h)) { + return mrb_symbol_value(kh_value(h, k)); + } + return mrb_nil_value(); } -mrb_bool +mrb_value mrb_str_interned(mrb_state *mrb, mrb_value str) { return mrb_interned(mrb, RSTRING_PTR(str), RSTRING_LEN(str)); -- cgit v1.2.3