Use `mrb_field_write_barrier` instead of `mrb_write_barrier` for `push`.

When the array is very big, the simpler `mrb_write_barrier` causes
calling `gc_mark_children` for big arrays repeatedly. That would hinder
performance very badly.

1 files changed, 1 insertions, 1 deletions

diff --git a/src/array.c b/src/array.c
index 150ef2126..4f2b5466c 100644
--- a/src/array.c
+++ b/src/array.c
@@ -524,7 +524,7 @@ mrb_ary_push_m(mrb_state *mrb, mrb_value self)
   }
   array_copy(ARY_PTR(a)+len, argv, argc);
   ARY_SET_LEN(a, len2);
-  while (alen--) {
+  while (argc--) {
     mrb_field_write_barrier_value(mrb, (struct RBasic*)a, *argv);
     argv++;
   }