From 9a1716fdb289e7bcdabf9050bfdf051106e2cce0 Mon Sep 17 00:00:00 2001 From: matz Date: Tue, 30 May 2000 04:24:17 +0000 Subject: 2000-05-30 git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@717 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- array.c | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'array.c') diff --git a/array.c b/array.c index 25de8b150b..d8dc37195c 100644 --- a/array.c +++ b/array.c @@ -1082,6 +1082,13 @@ rb_ary_delete_at(ary, pos) return del; } +VALUE +rb_ary_delete_at_m(ary, pos) + VALUE ary, pos; +{ + return rb_ary_delete_at(ary, NUM2LONG(pos)); +} + static VALUE rb_ary_slice_bang(argc, argv, ary) int argc; @@ -1629,7 +1636,7 @@ Init_Array() rb_define_method(rb_cArray, "map!", rb_ary_collect_bang, 0); rb_define_method(rb_cArray, "filter", rb_ary_filter, 0); rb_define_method(rb_cArray, "delete", rb_ary_delete, 1); - rb_define_method(rb_cArray, "delete_at", rb_ary_delete_at, -1); + rb_define_method(rb_cArray, "delete_at", rb_ary_delete_at_m, 1); rb_define_method(rb_cArray, "delete_if", rb_ary_delete_if, 0); rb_define_method(rb_cArray, "reject!", rb_ary_delete_if, 0); rb_define_method(rb_cArray, "replace", rb_ary_replace_m, 1); -- cgit v1.2.3