* array.c: reduce shade operations.

* array.c (rb_ary_modify): use RARRAY_RAWPTR().
* array.c (ary_make_substitution, rb_ary_s_create, ary_make_partial,
  rb_ary_splice, rb_ary_resize, rb_ary_rotate_m, rb_ary_times):
  use ary_memcpy().



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@42071 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
ko1 2013-07-19 12:12:31 +00:00
parent 9cc7f5f829
commit 8d8ead142c
2 changed files with 33 additions and 21 deletions

View File

@ -1,3 +1,13 @@
Fri Jul 19 20:58:20 2013 Koichi Sasada <ko1@atdot.net>
* array.c: reduce shade operations.
* array.c (rb_ary_modify): use RARRAY_RAWPTR().
* array.c (ary_make_substitution, rb_ary_s_create, ary_make_partial,
rb_ary_splice, rb_ary_resize, rb_ary_rotate_m, rb_ary_times):
use ary_memcpy().
Fri Jul 19 19:55:28 2013 Koichi Sasada <ko1@atdot.net> Fri Jul 19 19:55:28 2013 Koichi Sasada <ko1@atdot.net>
* array.c (ary_mem_clear): added. This operation doesn't need WB * array.c (ary_mem_clear): added. This operation doesn't need WB

44
array.c
View File

@ -371,7 +371,7 @@ rb_ary_modify(VALUE ary)
} }
else { else {
VALUE *ptr = ALLOC_N(VALUE, len); VALUE *ptr = ALLOC_N(VALUE, len);
MEMCPY(ptr, RARRAY_PTR(ary), VALUE, len); MEMCPY(ptr, RARRAY_RAWPTR(ary), VALUE, len);
rb_ary_unshare(ary); rb_ary_unshare(ary);
ARY_SET_CAPA(ary, len); ARY_SET_CAPA(ary, len);
ARY_SET_PTR(ary, ptr); ARY_SET_PTR(ary, ptr);
@ -627,10 +627,12 @@ ary_make_shared(VALUE ary)
static VALUE static VALUE
ary_make_substitution(VALUE ary) ary_make_substitution(VALUE ary)
{ {
if (RARRAY_LEN(ary) <= RARRAY_EMBED_LEN_MAX) { long len = RARRAY_LEN(ary);
VALUE subst = rb_ary_new2(RARRAY_LEN(ary));
MEMCPY((VALUE *)ARY_EMBED_PTR(subst), RARRAY_PTR(ary), VALUE, RARRAY_LEN(ary)); if (len <= RARRAY_EMBED_LEN_MAX) {
ARY_SET_EMBED_LEN(subst, RARRAY_LEN(ary)); VALUE subst = rb_ary_new2(len);
ary_memcpy(subst, 0, len, RARRAY_RAWPTR(ary));
ARY_SET_EMBED_LEN(subst, len);
return subst; return subst;
} }
else { else {
@ -808,7 +810,7 @@ rb_ary_s_create(int argc, VALUE *argv, VALUE klass)
{ {
VALUE ary = ary_new(klass, argc); VALUE ary = ary_new(klass, argc);
if (argc > 0 && argv) { if (argc > 0 && argv) {
MEMCPY(RARRAY_PTR(ary), argv, VALUE, argc); ary_memcpy(ary, 0, argc, argv);
ARY_SET_LEN(ary, argc); ARY_SET_LEN(ary, argc);
} }
@ -854,7 +856,7 @@ ary_make_partial(VALUE ary, VALUE klass, long offset, long len)
if (len <= RARRAY_EMBED_LEN_MAX) { if (len <= RARRAY_EMBED_LEN_MAX) {
VALUE result = ary_alloc(klass); VALUE result = ary_alloc(klass);
MEMCPY((VALUE *)ARY_EMBED_PTR(result), RARRAY_PTR(ary) + offset, VALUE, len); ary_memcpy(result, 0, len, RARRAY_RAWPTR(ary) + offset);
ARY_SET_EMBED_LEN(result, len); ARY_SET_EMBED_LEN(result, len);
return result; return result;
} }
@ -1564,7 +1566,7 @@ rb_ary_splice(VALUE ary, long beg, long len, VALUE rpl)
len = beg + rlen; len = beg + rlen;
ary_mem_clear(ary, RARRAY_LEN(ary), beg - RARRAY_LEN(ary)); ary_mem_clear(ary, RARRAY_LEN(ary), beg - RARRAY_LEN(ary));
if (rlen > 0) { if (rlen > 0) {
MEMCPY(RARRAY_PTR(ary) + beg, RARRAY_PTR(rpl), VALUE, rlen); ary_memcpy(ary, beg, rlen, RARRAY_PTR(rpl));
} }
ARY_SET_LEN(ary, len); ARY_SET_LEN(ary, len);
} }
@ -1636,7 +1638,7 @@ rb_ary_resize(VALUE ary, long len)
VALUE tmp[RARRAY_EMBED_LEN_MAX]; VALUE tmp[RARRAY_EMBED_LEN_MAX];
MEMCPY(tmp, ARY_HEAP_PTR(ary), VALUE, len); MEMCPY(tmp, ARY_HEAP_PTR(ary), VALUE, len);
ary_discard(ary); ary_discard(ary);
MEMCPY((VALUE *)ARY_EMBED_PTR(ary), tmp, VALUE, len); ary_memcpy(ary, 0, len, tmp);
ARY_SET_EMBED_LEN(ary, len); ARY_SET_EMBED_LEN(ary, len);
} }
else { else {
@ -2273,7 +2275,8 @@ rb_ary_rotate_bang(int argc, VALUE *argv, VALUE ary)
static VALUE static VALUE
rb_ary_rotate_m(int argc, VALUE *argv, VALUE ary) rb_ary_rotate_m(int argc, VALUE *argv, VALUE ary)
{ {
VALUE rotated, *ptr, *ptr2; VALUE rotated;
const VALUE *ptr;
long len, cnt = 1; long len, cnt = 1;
switch (argc) { switch (argc) {
@ -2286,11 +2289,10 @@ rb_ary_rotate_m(int argc, VALUE *argv, VALUE ary)
rotated = rb_ary_new2(len); rotated = rb_ary_new2(len);
if (len > 0) { if (len > 0) {
cnt = rotate_count(cnt, len); cnt = rotate_count(cnt, len);
ptr = RARRAY_PTR(ary); ptr = RARRAY_RAWPTR(ary);
ptr2 = RARRAY_PTR(rotated);
len -= cnt; len -= cnt;
MEMCPY(ptr2, ptr + cnt, VALUE, len); ary_memcpy(rotated, 0, len, ptr + cnt);
MEMCPY(ptr2 + len, ptr, VALUE, cnt); ary_memcpy(rotated, len, cnt, ptr);
} }
ARY_SET_LEN(rotated, RARRAY_LEN(ary)); ARY_SET_LEN(rotated, RARRAY_LEN(ary));
return rotated; return rotated;
@ -3508,7 +3510,8 @@ rb_ary_concat(VALUE x, VALUE y)
static VALUE static VALUE
rb_ary_times(VALUE ary, VALUE times) rb_ary_times(VALUE ary, VALUE times)
{ {
VALUE ary2, tmp, *ptr, *ptr2; VALUE ary2, tmp;
const VALUE *ptr;
long t, len; long t, len;
tmp = rb_check_string_type(times); tmp = rb_check_string_type(times);
@ -3532,17 +3535,16 @@ rb_ary_times(VALUE ary, VALUE times)
ary2 = ary_new(rb_obj_class(ary), len); ary2 = ary_new(rb_obj_class(ary), len);
ARY_SET_LEN(ary2, len); ARY_SET_LEN(ary2, len);
ptr = RARRAY_PTR(ary); ptr = RARRAY_RAWPTR(ary);
ptr2 = RARRAY_PTR(ary2);
t = RARRAY_LEN(ary); t = RARRAY_LEN(ary);
if (0 < t) { if (0 < t) {
MEMCPY(ptr2, ptr, VALUE, t); ary_memcpy(ary2, 0, t, ptr);
while (t <= len/2) { while (t <= len/2) {
MEMCPY(ptr2+t, ptr2, VALUE, t); ary_memcpy(ary2, t, t, RARRAY_RAWPTR(ary2));
t *= 2; t *= 2;
} }
if (t < len) { if (t < len) {
MEMCPY(ptr2+t, ptr2, VALUE, len-t); ary_memcpy(ary2, t, len-t, RARRAY_RAWPTR(ary2));
} }
} }
out: out: