41 if (recursive)
return Qnil;
61 if (recursive)
return Qnil;
78 if (x == y)
return Qtrue;
197 if (
cmpint(min, max) > 0) {
202 if (c == 0)
return x;
203 if (c < 0)
return min;
205 if (c > 0)
return max;
252 #define rb_intern(str) rb_intern_const(str) static VALUE classname(VALUE klass, int *permanent)
Returns +classpath+ of klass, if it is named, or +nil+ for anonymous +class+/+module+.
static VALUE cmp_gt(VALUE x, VALUE y)
void Init_Comparable(void)
static VALUE cmp_le(VALUE x, VALUE y)
static int max(int a, int b)
static VALUE invcmp_recursive(VALUE x, VALUE y, int recursive)
static VALUE cmp_equal(VALUE x, VALUE y)
static int cmpint(VALUE x, VALUE y)
void rb_raise(VALUE exc, const char *fmt,...)
VALUE rb_exec_recursive(VALUE(*)(VALUE, VALUE, int), VALUE, VALUE)
static VALUE rb_cmp(VALUE x, VALUE y)
int rb_cmpint(VALUE val, VALUE a, VALUE b)
static VALUE cmp_clamp(VALUE x, VALUE min, VALUE max)
static VALUE cmp_between(VALUE x, VALUE min, VALUE max)
static VALUE cmp_ge(VALUE x, VALUE y)
static VALUE cmp_eq_recursive(VALUE arg1, VALUE arg2, int recursive)
static VALUE cmp_lt(VALUE x, VALUE y)
VALUE rb_exec_recursive_paired_outer(VALUE(*)(VALUE, VALUE, int), VALUE, VALUE, VALUE)
#define SPECIAL_CONST_P(x)
VALUE rb_define_module(const char *name)
VALUE rb_invcmp(VALUE x, VALUE y)
void rb_define_method(VALUE klass, const char *name, VALUE(*func)(ANYARGS), int argc)
void rb_cmperr(VALUE x, VALUE y)
VALUE rb_obj_class(VALUE)