summaryrefslogtreecommitdiffhomepage
path: root/src
diff options
context:
space:
mode:
authorYukihiro "Matz" Matsumoto <[email protected]>2019-09-14 19:51:52 +0900
committerYukihiro "Matz" Matsumoto <[email protected]>2019-09-14 23:21:44 +0900
commit57d7fe94a9049c7abaa5b061a0f61a5f44815733 (patch)
tree66034c80933797fbb59540e5c589a608fb3d01ae /src
parent6f1c08f7d8a43a5d220aca7a5c449a8d04d3017b (diff)
downloadmruby-57d7fe94a9049c7abaa5b061a0f61a5f44815733.tar.gz
mruby-57d7fe94a9049c7abaa5b061a0f61a5f44815733.zip
Add a macro `mrb_frozen_p` that points to `MRB_FROZEN_P`.
Diffstat (limited to 'src')
-rw-r--r--src/array.c2
-rw-r--r--src/error.c2
-rw-r--r--src/hash.c2
-rw-r--r--src/kernel.c4
-rw-r--r--src/string.c4
5 files changed, 7 insertions, 7 deletions
diff --git a/src/array.c b/src/array.c
index 33baceb9c..a958e12e0 100644
--- a/src/array.c
+++ b/src/array.c
@@ -388,7 +388,7 @@ ary_replace(mrb_state *mrb, struct RArray *a, struct RArray *b)
mrb_write_barrier(mrb, (struct RBasic*)a);
return;
}
- if (!MRB_FROZEN_P(b) && len > ARY_REPLACE_SHARED_MIN) {
+ if (!mrb_frozen_p(b) && len > ARY_REPLACE_SHARED_MIN) {
ary_make_shared(mrb, b);
goto shared_b;
}
diff --git a/src/error.c b/src/error.c
index 2bb505d85..ad0be209d 100644
--- a/src/error.c
+++ b/src/error.c
@@ -233,7 +233,7 @@ mrb_exc_set(mrb_state *mrb, mrb_value exc)
(struct RBasic*)mrb->exc == mrb->gc.arena[mrb->gc.arena_idx-1]) {
mrb->gc.arena_idx--;
}
- if (!mrb->gc.out_of_memory && !MRB_FROZEN_P(mrb->exc)) {
+ if (!mrb->gc.out_of_memory && !mrb_frozen_p(mrb->exc)) {
exc_debug_info(mrb, mrb->exc);
mrb_keep_backtrace(mrb, exc);
}
diff --git a/src/hash.c b/src/hash.c
index 2a0a19363..83c986c46 100644
--- a/src/hash.c
+++ b/src/hash.c
@@ -576,7 +576,7 @@ static void mrb_hash_modify(mrb_state *mrb, mrb_value hash);
static inline mrb_value
ht_key(mrb_state *mrb, mrb_value key)
{
- if (mrb_string_p(key) && !MRB_FROZEN_P(mrb_str_ptr(key))) {
+ if (mrb_string_p(key) && !mrb_frozen_p(mrb_str_ptr(key))) {
key = mrb_str_dup(mrb, key);
MRB_SET_FROZEN_FLAG(mrb_str_ptr(key));
}
diff --git a/src/kernel.c b/src/kernel.c
index f0935a2f8..bde0cb22a 100644
--- a/src/kernel.c
+++ b/src/kernel.c
@@ -436,7 +436,7 @@ mrb_obj_freeze(mrb_state *mrb, mrb_value self)
{
if (!mrb_immediate_p(self)) {
struct RBasic *b = mrb_basic_ptr(self);
- if (!MRB_FROZEN_P(b)) {
+ if (!mrb_frozen_p(b)) {
MRB_SET_FROZEN_FLAG(b);
if (b->c->tt == MRB_TT_SCLASS) MRB_SET_FROZEN_FLAG(b->c);
}
@@ -447,7 +447,7 @@ mrb_obj_freeze(mrb_state *mrb, mrb_value self)
static mrb_value
mrb_obj_frozen(mrb_state *mrb, mrb_value self)
{
- return mrb_bool_value(mrb_immediate_p(self) || MRB_FROZEN_P(mrb_basic_ptr(self)));
+ return mrb_bool_value(mrb_immediate_p(self) || mrb_frozen_p(mrb_basic_ptr(self)));
}
/* 15.3.1.3.15 */
diff --git a/src/string.c b/src/string.c
index 2454eb0fb..7abb3148c 100644
--- a/src/string.c
+++ b/src/string.c
@@ -535,7 +535,7 @@ str_make_shared(mrb_state *mrb, struct RString *orig, struct RString *s)
else if (RSTR_FSHARED_P(orig)) {
str_init_fshared(orig, s, orig->as.heap.aux.fshared);
}
- else if (MRB_FROZEN_P(orig) && !RSTR_POOL_P(orig)) {
+ else if (mrb_frozen_p(orig) && !RSTR_POOL_P(orig)) {
str_init_fshared(orig, s, orig);
}
else {
@@ -2405,7 +2405,7 @@ mrb_string_value_cstr(mrb_state *mrb, mrb_value *ptr)
if (p[len] == '\0') {
return p;
}
- if (MRB_FROZEN_P(ps) || RSTR_CAPA(ps) == len) {
+ if (mrb_frozen_p(ps) || RSTR_CAPA(ps) == len) {
ps = str_new(mrb, NULL, len+1);
memcpy(RSTR_PTR(ps), p, len);
RSTR_SET_LEN(ps, len);