kotovalexarian-likes-github
/
ruby--ruby
mirror of https://github.com/ruby/ruby.git
1
0
Fork 0
Code Releases Activity

* array.c (rb_ary_shift, rb_ary_shift_m): clears unused elements. 

[ruby-dev:38448]


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@23433 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2009-05-15 08:35:35 +00:00
parent f4a0a73175
commit 62e5fa1737
2 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@ -1,3 +1,8 @@
Fri May 15 17:35:33 2009 Nobuyoshi Nakada <nobu@ruby-lang.org>
* array.c (rb_ary_shift, rb_ary_shift_m): clears unused elements.
[ruby-dev:38448]
Fri May 15 15:15:12 2009 Nobuyoshi Nakada <nobu@ruby-lang.org>
* variable.c (rb_autoload_load): checks if iv_tbl is valid.

6
array.c
View File

@ -807,6 +807,9 @@ rb_ary_shift(VALUE ary)
RARRAY_PTR(ary)[0] = Qnil;
ary_make_shared(ary);
}
else if (ARY_SHARED_NUM(ARY_SHARED(ary)) == 1) {
RARRAY_PTR(ary)[0] = Qnil;
}
ARY_INCREASE_PTR(ary, 1); /* shift ptr */
ARY_INCREASE_LEN(ary, -1);
@ -848,6 +851,9 @@ rb_ary_shift_m(int argc, VALUE *argv, VALUE ary)
result = ary_take_first_or_last(argc, argv, ary, ARY_TAKE_FIRST);
n = RARRAY_LEN(result);
if (ARY_SHARED_P(ary)) {
if (ARY_SHARED_NUM(ARY_SHARED(ary)) == 1) {
rb_mem_clear(RARRAY_PTR(ary), n);
}
ARY_INCREASE_PTR(ary, n);
}
else {