kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* array.c (rb_ary_set_len): new function to set array length.

Browse source 
* vm_eval.c (method_missing): set the length of argv array, to mark
  arguments.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@32740 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2011-07-29 14:53:51 +00:00
parent 0d6329343a
commit d93746490d
4 changed files with 23 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
ChangeLog
View file

@ -1,4 +1,9 @@
Fri Jul 29 23:53:44 2011 Nobuyoshi Nakada <nobu@ruby-lang.org> Fri Jul 29 23:53:48 2011 Nobuyoshi Nakada <nobu@ruby-lang.org>
* array.c (rb_ary_set_len): new function to set array length.
* vm_eval.c (method_missing): set the length of argv array, to mark
arguments.
* vm_eval.c (rb_apply): get rid of too large alloca. * vm_eval.c (rb_apply): get rid of too large alloca.

15
array.c
View file

@ -1310,6 +1310,21 @@ rb_ary_splice(VALUE ary, long beg, long len, VALUE rpl)
} }
} }
void
rb_ary_set_len(VALUE ary, long len)
{
long capa;
rb_ary_modify_check(ary);
if (ARY_SHARED_P(ary)) {
rb_raise(rb_eRuntimeError, "can't set length of shared ");
}
if (len > (capa = (long)ARY_CAPA(ary))) {
rb_bug("probable buffer overflow: %ld for %ld", len, capa);
}
ARY_SET_LEN(ary, len);
}
/*! /*!
* expands or shrinks \a ary to \a len elements. * expands or shrinks \a ary to \a len elements.
* expanded region will be filled with Qnil. * expanded region will be filled with Qnil.

1
internal.h
View file

@ -41,6 +41,7 @@ struct vtm; /* defined by timev.h */
/* array.c */ /* array.c */
VALUE rb_ary_last(int, VALUE *, VALUE); VALUE rb_ary_last(int, VALUE *, VALUE);
void rb_ary_set_len(VALUE, long);
/* bignum.c */ /* bignum.c */
VALUE rb_big_fdiv(VALUE x, VALUE y); VALUE rb_big_fdiv(VALUE x, VALUE y);

1
vm_eval.c
View file

@ -568,6 +568,7 @@ method_missing(VALUE obj, ID id, int argc, const VALUE *argv, int call_status)
} }
nargv[0] = ID2SYM(id); nargv[0] = ID2SYM(id);
MEMCPY(nargv + 1, argv, VALUE, argc); MEMCPY(nargv + 1, argv, VALUE, argc);
if (argv_ary) rb_ary_set_len(argv_ary, argc + 1);
if (rb_method_basic_definition_p(CLASS_OF(obj) , idMethodMissing)) { if (rb_method_basic_definition_p(CLASS_OF(obj) , idMethodMissing)) {
raise_method_missing(th, argc+1, nargv, obj, call_status | NOEX_MISSING); raise_method_missing(th, argc+1, nargv, obj, call_status | NOEX_MISSING);