From 7ea2ceddb832b9973694fecac9fe3c30400735ba Mon Sep 17 00:00:00 2001 From: matz Date: Fri, 16 Jan 1998 12:19:22 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r11, which included commits to RCS files with non-trunk default branches. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/dbm/dbm.c | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) (limited to 'ext/dbm/dbm.c') diff --git a/ext/dbm/dbm.c b/ext/dbm/dbm.c index ea0ac1930f..b416802241 100644 --- a/ext/dbm/dbm.c +++ b/ext/dbm/dbm.c @@ -122,17 +122,15 @@ fdbm_fetch(obj, keystr) } static VALUE -fdbm_indexes(obj, args) - VALUE obj; - struct RArray *args; +fdbm_indexes(obj, ag) + VALUE obj, ag; { VALUE *p, *pend; VALUE new; int i = 0; + struct RArray *args = RARRAY(rb_Array(ag)); - args = (struct RArray*)rb_to_a(args); new = ary_new2(args->len); - p = args->ptr; pend = p + args->len; while (p < pend) { ary_push(new, fdbm_fetch(obj, *p++)); -- cgit v1.2.3