mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
matz
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1049 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
parent
8f54a9b470
commit
39563af994
14 changed files with 259 additions and 86 deletions
20
array.c
20
array.c
|
@ -22,7 +22,7 @@ VALUE rb_cArray;
|
|||
void
|
||||
rb_mem_clear(mem, size)
|
||||
register VALUE *mem;
|
||||
register size_t size;
|
||||
register long size;
|
||||
{
|
||||
while (size--) {
|
||||
*mem++ = Qnil;
|
||||
|
@ -32,7 +32,7 @@ rb_mem_clear(mem, size)
|
|||
static void
|
||||
memfill(mem, size, val)
|
||||
register VALUE *mem;
|
||||
register size_t size;
|
||||
register long size;
|
||||
register VALUE val;
|
||||
{
|
||||
while (size--) {
|
||||
|
@ -400,11 +400,8 @@ rb_ary_subseq(ary, beg, len)
|
|||
VALUE ary2;
|
||||
|
||||
if (beg > RARRAY(ary)->len) return Qnil;
|
||||
if (beg < 0) {
|
||||
len += beg;
|
||||
beg = 0;
|
||||
}
|
||||
if (len < 0) return Qnil;
|
||||
if (beg < 0 || len < 0) return Qnil;
|
||||
|
||||
if (beg + len > RARRAY(ary)->len) {
|
||||
len = RARRAY(ary)->len - beg;
|
||||
}
|
||||
|
@ -532,7 +529,7 @@ rb_ary_replace(ary, beg, len, rpl)
|
|||
VALUE ary, rpl;
|
||||
long beg, len;
|
||||
{
|
||||
int rlen;
|
||||
long rlen;
|
||||
|
||||
if (len < 0) rb_raise(rb_eIndexError, "negative length %d", len);
|
||||
if (beg < 0) {
|
||||
|
@ -1254,8 +1251,8 @@ VALUE
|
|||
rb_ary_concat(x, y)
|
||||
VALUE x, y;
|
||||
{
|
||||
int xlen = RARRAY(x)->len;
|
||||
int ylen;
|
||||
long xlen = RARRAY(x)->len;
|
||||
long ylen;
|
||||
|
||||
y = to_ary(y);
|
||||
ylen = RARRAY(y)->len;
|
||||
|
@ -1371,7 +1368,8 @@ rb_ary_hash(ary)
|
|||
VALUE ary;
|
||||
{
|
||||
long i;
|
||||
int n, h;
|
||||
VALUE n;
|
||||
long h;
|
||||
|
||||
h = RARRAY(ary)->len;
|
||||
for (i=0; i<RARRAY(ary)->len; i++) {
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue