diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | array.c | 2 |
2 files changed, 6 insertions, 1 deletions
@@ -1,3 +1,8 @@ +Wed Apr 9 21:54:45 2008 Akinori MUSHA <knu@iDaemons.org> + + * array.c (rb_ary_pop): Do not reallocate too often; backported + from 1.9. + Wed Apr 9 21:13:05 2008 Akinori MUSHA <knu@iDaemons.org> * array.c (rb_ary_each, rb_ary_each_index, rb_ary_reverse_each, @@ -450,7 +450,7 @@ rb_ary_pop(ary) rb_ary_modify_check(ary); if (RARRAY(ary)->len == 0) return Qnil; if (!FL_TEST(ary, ELTS_SHARED) && - RARRAY(ary)->len * 2 < RARRAY(ary)->aux.capa && + RARRAY(ary)->len * 3 < RARRAY(ary)->aux.capa && RARRAY(ary)->aux.capa > ARY_DEFAULT_SIZE) { RARRAY(ary)->aux.capa = RARRAY(ary)->len * 2; REALLOC_N(RARRAY(ary)->ptr, VALUE, RARRAY(ary)->aux.capa); |