* gcc -Wall clean-up.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4151 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
matz 2003-07-24 18:33:50 +00:00
parent c9aad4c098
commit 5dd2b7102c
17 changed files with 15 additions and 59 deletions

23
range.c
View file

@ -108,17 +108,6 @@ range_eq(range, obj)
return Qtrue;
}
static int
r_eq(a, b)
VALUE a, b;
{
if (a == b) return Qtrue;
if (rb_funcall(a, id_cmp, 1, b) == INT2FIX(0))
return Qtrue;
return Qfalse;
}
static int
r_lt(a, b)
VALUE a, b;
@ -142,17 +131,6 @@ r_le(a, b)
}
static int
r_gt(a,b)
VALUE a, b;
{
VALUE r = rb_funcall(a, id_cmp, 1, b);
if (NIL_P(r)) return Qfalse;
if (rb_cmpint(r, a, b) > 0) return Qtrue;
return Qfalse;
}
static VALUE
range_eql(range, obj)
VALUE range, obj;
@ -383,7 +361,6 @@ rb_range_beg_len(range, begp, lenp, len, err)
len = end - beg;
if (len < 0) goto out_of_range;
length_set:
*begp = beg;
*lenp = len;
return Qtrue;