From 2156870525be05f0bd769af141c3f6cff9fff8c4 Mon Sep 17 00:00:00 2001 From: matz Date: Sat, 2 Sep 2006 14:42:08 +0000 Subject: * ruby.h (struct RArray): embed small arrays. (RARRAY_LEN): defined for accessing array members. (RARRAY_PTR): ditto. * array.c: use RARRAY_LEN and RARRAY_PTR. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@10833 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/sdbm/init.c | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'ext/sdbm/init.c') diff --git a/ext/sdbm/init.c b/ext/sdbm/init.c index 758d737277..08a3ab8bf5 100644 --- a/ext/sdbm/init.c +++ b/ext/sdbm/init.c @@ -323,8 +323,8 @@ fsdbm_delete_if(VALUE obj) GetDBM2(obj, dbmp, dbm); } - for (i = 0; i < RARRAY(ary)->len; i++) { - keystr = RARRAY(ary)->ptr[i]; + for (i = 0; i < RARRAY_LEN(ary); i++) { + keystr = RARRAY_PTR(ary)[i]; StringValue(keystr); key.dptr = RSTRING_PTR(keystr); key.dsize = RSTRING_LEN(keystr); @@ -333,7 +333,7 @@ fsdbm_delete_if(VALUE obj) } } if (status) rb_jump_tag(status); - if (n > 0) dbmp->di_size = n - RARRAY(ary)->len; + if (n > 0) dbmp->di_size = n - RARRAY_LEN(ary); return obj; } @@ -416,10 +416,10 @@ static VALUE update_i(VALUE pair, VALUE dbm) { Check_Type(pair, T_ARRAY); - if (RARRAY(pair)->len < 2) { + if (RARRAY_LEN(pair) < 2) { rb_raise(rb_eArgError, "pair must be [key, value]"); } - fsdbm_store(dbm, RARRAY(pair)->ptr[0], RARRAY(pair)->ptr[1]); + fsdbm_store(dbm, RARRAY_PTR(pair)[0], RARRAY_PTR(pair)[1]); return Qnil; } -- cgit v1.2.3