From 8771d1a0fcf5c100885630a1e9a6bef1a44f32ff Mon Sep 17 00:00:00 2001 From: nobu Date: Sat, 11 Oct 2014 04:46:56 +0000 Subject: [PATCH] vm.c: precedence of duplicated keys * vm.c (kwmerge_i): override existing keys by new keys. [ruby-core:65368] [Bug #10315] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@47878 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ChangeLog | 5 ++++- test/ruby/test_syntax.rb | 8 ++++---- vm.c | 12 +----------- 3 files changed, 9 insertions(+), 16 deletions(-) diff --git a/ChangeLog b/ChangeLog index afe887032b..136f34ec5b 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,4 +1,7 @@ -Sat Oct 11 13:46:53 2014 Nobuyoshi Nakada +Sat Oct 11 13:46:58 2014 Nobuyoshi Nakada + + * vm.c (kwmerge_i): override existing keys by new keys. + [ruby-core:65368] [Bug #10315] * parse.y (assocs): concatenate splatted literal hashes. the former key has precedence even if duplicated literal keys diff --git a/test/ruby/test_syntax.rb b/test/ruby/test_syntax.rb index 013d9dcac3..5a7d2f8a62 100644 --- a/test/ruby/test_syntax.rb +++ b/test/ruby/test_syntax.rb @@ -109,12 +109,12 @@ class TestSyntax < Test::Unit::TestCase def o.kw(k1: 1, k2: 2) [k1, k2] end h = {k1: 11, k2: 12} assert_equal([11, 12], o.kw(**h)) - assert_equal([11, 22], o.kw(k2: 22, **h)) - assert_equal([11, 12], o.kw(**h, **{k2: 22})) - assert_equal([11, 22], o.kw(**{k2: 22}, **h)) + assert_equal([11, 12], o.kw(k2: 22, **h)) + assert_equal([11, 22], o.kw(**h, **{k2: 22})) + assert_equal([11, 12], o.kw(**{k2: 22}, **h)) bug10315 = '[ruby-core:65368] [Bug #10315]' - assert_equal([22, 2], o.kw(**{k1: 22}, **{k1: 23}), bug10315) + assert_equal([23, 2], o.kw(**{k1: 22}, **{k1: 23}), bug10315) h = {k3: 31} assert_raise(ArgumentError) {o.kw(**h)} diff --git a/vm.c b/vm.c index 0c45f96c38..3a4b26195e 100644 --- a/vm.c +++ b/vm.c @@ -2342,21 +2342,11 @@ m_core_hash_merge_ptr(int argc, VALUE *argv, VALUE recv) return hash; } -static int -kwmerge_ii(st_data_t *key, st_data_t *value, st_data_t arg, int existing) -{ - if (existing) return ST_STOP; - *value = arg; - return ST_CONTINUE; -} - static int kwmerge_i(VALUE key, VALUE value, VALUE hash) { if (!SYMBOL_P(key)) Check_Type(key, T_SYMBOL); - if (st_update(RHASH_TBL_RAW(hash), key, kwmerge_ii, (st_data_t)value) == 0) { /* !existing */ - RB_OBJ_WRITTEN(hash, Qundef, value); - } + rb_hash_aset(hash, key, value); return ST_CONTINUE; }