diff options
| author | Yukihiro "Matz" Matsumoto <[email protected]> | 2013-04-26 10:57:08 +0900 |
|---|---|---|
| committer | Yukihiro "Matz" Matsumoto <[email protected]> | 2013-04-26 10:57:08 +0900 |
| commit | e63b086f1ebcdf0872c02ad13c6c68bda9bba023 (patch) | |
| tree | 931d5762a9a5a74e98d30e39acf20bfc6bf03661 | |
| parent | c99b72b20d3c3814248c9654c934a06e5dff96e5 (diff) | |
| download | mruby-e63b086f1ebcdf0872c02ad13c6c68bda9bba023.tar.gz mruby-e63b086f1ebcdf0872c02ad13c6c68bda9bba023.zip | |
rename mrb_interned API functions
| -rw-r--r-- | include/mruby.h | 6 | ||||
| -rw-r--r-- | src/class.c | 8 | ||||
| -rw-r--r-- | src/kernel.c | 2 | ||||
| -rw-r--r-- | src/symbol.c | 18 |
4 files changed, 17 insertions, 17 deletions
diff --git a/include/mruby.h b/include/mruby.h index 19743eed4..5db987818 100644 --- a/include/mruby.h +++ b/include/mruby.h @@ -208,9 +208,9 @@ mrb_value mrb_funcall_with_block(mrb_state*, mrb_value, mrb_sym, int, mrb_value* mrb_sym mrb_intern_cstr(mrb_state*,const char*); mrb_sym mrb_intern2(mrb_state*,const char*,size_t); mrb_sym mrb_intern_str(mrb_state*,mrb_value); -mrb_value mrb_cstr_interned(mrb_state*,const char*); -mrb_value mrb_interned(mrb_state*,const char*,size_t); -mrb_value mrb_str_interned(mrb_state*,mrb_value); +mrb_value mrb_check_intern_cstr(mrb_state*,const char*); +mrb_value mrb_check_intern(mrb_state*,const char*,size_t); +mrb_value mrb_check_intern_str(mrb_state*,mrb_value); const char *mrb_sym2name(mrb_state*,mrb_sym); const char *mrb_sym2name_len(mrb_state*,mrb_sym,size_t*); mrb_value mrb_sym2str(mrb_state*,mrb_sym); diff --git a/src/class.c b/src/class.c index 5d22dbbc4..983b22a24 100644 --- a/src/class.c +++ b/src/class.c @@ -206,7 +206,7 @@ mrb_vm_define_class(mrb_state *mrb, mrb_value outer, mrb_value super, mrb_sym id int mrb_class_defined(mrb_state *mrb, const char *name) { - mrb_value sym = mrb_cstr_interned(mrb, name); + mrb_value sym = mrb_check_intern_cstr(mrb, name); if (mrb_nil_p(sym)) { return FALSE; } @@ -1532,7 +1532,7 @@ mrb_mod_cvar_defined(mrb_state *mrb, mrb_value mod) } else { mrb_value sym; check_cv_name_str(mrb, id); - sym = mrb_str_interned(mrb, id); + sym = mrb_check_intern_str(mrb, id); if (mrb_nil_p(sym)) { defined_p = FALSE; } else { @@ -1681,7 +1681,7 @@ mrb_mod_method_defined(mrb_state *mrb, mrb_value mod) if (mrb_symbol_p(id)) { method_defined_p = mrb_obj_respond_to(mrb_class_ptr(mod), mrb_symbol(id)); } else { - mrb_value sym = mrb_str_interned(mrb, id); + mrb_value sym = mrb_check_intern_str(mrb, id); if (mrb_nil_p(sym)) { method_defined_p = FALSE; } else { @@ -1766,7 +1766,7 @@ mrb_mod_const_defined(mrb_state *mrb, mrb_value mod) } else { mrb_value sym; check_const_name_str(mrb, id); - sym = mrb_str_interned(mrb, id); + sym = mrb_check_intern_str(mrb, id); if (mrb_nil_p(sym)) { const_defined_p = FALSE; } else { diff --git a/src/kernel.c b/src/kernel.c index 637a7b952..8d266862a 100644 --- a/src/kernel.c +++ b/src/kernel.c @@ -984,7 +984,7 @@ obj_respond_to(mrb_state *mrb, mrb_value self) mrb_raisef(mrb, E_TYPE_ERROR, "%S is not a symbol", tmp); } } - tmp = mrb_str_interned(mrb, mid); + tmp = mrb_check_intern_str(mrb, mid); if (mrb_nil_p(tmp)) { respond_to_p = FALSE; } else { diff --git a/src/symbol.c b/src/symbol.c index 1633a3c65..24db3a4b6 100644 --- a/src/symbol.c +++ b/src/symbol.c @@ -73,13 +73,7 @@ mrb_intern_str(mrb_state *mrb, mrb_value str) } mrb_value -mrb_cstr_interned(mrb_state *mrb, const char *name) -{ - return mrb_interned(mrb, name, strlen(name)); -} - -mrb_value -mrb_interned(mrb_state *mrb, const char *name, size_t len) +mrb_check_intern(mrb_state *mrb, const char *name, size_t len) { khash_t(n2s) *h = mrb->name2sym; symbol_name sname; @@ -96,9 +90,15 @@ mrb_interned(mrb_state *mrb, const char *name, size_t len) } mrb_value -mrb_str_interned(mrb_state *mrb, mrb_value str) +mrb_check_intern_cstr(mrb_state *mrb, const char *name) +{ + return mrb_check_intern(mrb, name, strlen(name)); +} + +mrb_value +mrb_check_intern_str(mrb_state *mrb, mrb_value str) { - return mrb_interned(mrb, RSTRING_PTR(str), RSTRING_LEN(str)); + return mrb_check_intern(mrb, RSTRING_PTR(str), RSTRING_LEN(str)); } /* lenp must be a pointer to a size_t variable */ |
