From 44eb1492bed2f9584623ec10ecf14cc46af4bf12 Mon Sep 17 00:00:00 2001 From: Kazuho Oku Date: Thu, 10 Sep 2015 22:24:10 +0900 Subject: freeze the hash key (fixes #2945) --- src/hash.c | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/hash.c b/src/hash.c index 0bda2b48b..42b40482a 100644 --- a/src/hash.c +++ b/src/hash.c @@ -104,9 +104,11 @@ static void mrb_hash_modify(mrb_state *mrb, mrb_value hash); static inline mrb_value mrb_hash_ht_key(mrb_state *mrb, mrb_value key) { - if (mrb_string_p(key)) - return mrb_str_dup(mrb, key); - else + if (mrb_string_p(key)) { + key = mrb_str_dup(mrb, key); + RSTR_SET_FROZEN_FLAG(mrb_str_ptr(key)); + return key; + } else return key; } -- cgit v1.2.3