From 7c1a2f61921392a7f8df3e52ca7ae5b78252f522 Mon Sep 17 00:00:00 2001 From: glass Date: Wed, 17 Jul 2013 13:17:01 +0000 Subject: * hash.c (rb_hash_replace): performance improvement by using st_copy(). git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@42027 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ChangeLog | 5 +++++ hash.c | 32 +++++++++++++++++++++++--------- 2 files changed, 28 insertions(+), 9 deletions(-) diff --git a/ChangeLog b/ChangeLog index 511976d288..25d44ac1da 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +Wed Jul 17 22:13:26 2013 Masaki Matsushita + + * hash.c (rb_hash_replace): performance improvement by using + st_copy(). + Wed Jul 17 17:19:54 2013 Koichi Sasada * gc.c: rename heap management functions with prefix "heap_". diff --git a/hash.c b/hash.c index e170e67660..275d87f1d5 100644 --- a/hash.c +++ b/hash.c @@ -1342,21 +1342,35 @@ rb_hash_initialize_copy(VALUE hash, VALUE hash2) static VALUE rb_hash_replace(VALUE hash, VALUE hash2) { + st_table *table2; + rb_hash_modify_check(hash); - hash2 = to_hash(hash2); if (hash == hash2) return hash; - rb_hash_clear(hash); - if (RHASH(hash2)->ntbl) { - hash_tbl(hash); - RHASH(hash)->ntbl->type = RHASH(hash2)->ntbl->type; - } - rb_hash_foreach(hash2, replace_i, hash); + hash2 = to_hash(hash2); + RHASH_SET_IFNONE(hash, RHASH_IFNONE(hash2)); - if (FL_TEST(hash2, HASH_PROC_DEFAULT)) { + if (FL_TEST(hash2, HASH_PROC_DEFAULT)) FL_SET(hash, HASH_PROC_DEFAULT); + else + FL_UNSET(hash, HASH_PROC_DEFAULT); + + table2 = RHASH(hash2)->ntbl; + + if (RHASH_EMPTY_P(hash2)) { + rb_hash_clear(hash); + if (table2) hash_tbl(hash)->type = table2->type; + return hash; + } + + if (RHASH_ITER_LEV(hash) > 0) { + rb_hash_clear(hash); + hash_tbl(hash)->type = table2->type; + rb_hash_foreach(hash2, replace_i, hash); } else { - FL_UNSET(hash, HASH_PROC_DEFAULT); + st_table *old_table = RHASH(hash)->ntbl; + if (old_table) st_free_table(old_table); + RHASH(hash)->ntbl = st_copy(table2); } return hash; -- cgit v1.2.3