1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* array.c (rb_ary_reverse_m): copy directly.

Browse Source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@26365 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2010-01-21 02:12:07 +00:00
parent bb8f1415e8
commit 2cb9f63bab
2 changed files with 22 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ChangeLog
View File

@ -1,3 +1,7 @@
Thu Jan 21 11:12:06 2010 Nobuyoshi Nakada <nobu@ruby-lang.org>
* array.c (rb_ary_reverse_m): copy directly.
Thu Jan 21 09:38:00 2010 Nobuyoshi Nakada <nobu@ruby-lang.org> Thu Jan 21 09:38:00 2010 Nobuyoshi Nakada <nobu@ruby-lang.org>
* configure.in: use AS_CASE instead of when, to get rid of * configure.in: use AS_CASE instead of when, to get rid of

22
array.c
View File

@ -1495,16 +1495,22 @@ rb_ary_empty_p(VALUE ary)
return Qfalse; return Qfalse;
} }
VALUE static VALUE
rb_ary_dup(VALUE ary) rb_ary_dup_setup(VALUE ary)
{ {
VALUE dup = rb_ary_new2(RARRAY_LEN(ary)); VALUE dup = rb_ary_new2(RARRAY_LEN(ary));
int is_embed = ARY_EMBED_P(dup); int is_embed = ARY_EMBED_P(dup);
DUPSETUP(dup, ary); DUPSETUP(dup, ary);
if (is_embed) FL_SET_EMBED(dup); if (is_embed) FL_SET_EMBED(dup);
MEMCPY(RARRAY_PTR(dup), RARRAY_PTR(ary), VALUE, RARRAY_LEN(ary));
ARY_SET_LEN(dup, RARRAY_LEN(ary)); ARY_SET_LEN(dup, RARRAY_LEN(ary));
return dup;
}
VALUE
rb_ary_dup(VALUE ary)
{
VALUE dup = rb_ary_dup_setup(ary);
MEMCPY(RARRAY_PTR(dup), RARRAY_PTR(ary), VALUE, RARRAY_LEN(ary));
return dup; return dup;
} }
@ -1787,7 +1793,15 @@ rb_ary_reverse_bang(VALUE ary)
static VALUE static VALUE
rb_ary_reverse_m(VALUE ary) rb_ary_reverse_m(VALUE ary)
{ {
return rb_ary_reverse(rb_ary_dup(ary)); VALUE dup = rb_ary_dup_setup(ary);
long len = RARRAY_LEN(ary);
if (len > 0) {
VALUE *p1 = RARRAY_PTR(ary);
VALUE *p2 = RARRAY_PTR(dup) + len - 1;
do *p2-- = *p1++; while (--len > 0);
}
return dup;
} }
struct ary_sort_data { struct ary_sort_data {