diff options
Diffstat (limited to 'variable.c')
-rw-r--r-- | variable.c | 63 |
1 files changed, 14 insertions, 49 deletions
diff --git a/variable.c b/variable.c index 871f715d03..dbc1967d02 100644 --- a/variable.c +++ b/variable.c @@ -1327,6 +1327,20 @@ rb_define_global_const(name, val) rb_define_const(rb_cObject, name, val); } +VALUE +rb_cvar_singleton(obj) + VALUE obj; +{ + switch (TYPE(obj)) { + case T_MODULE: + case T_CLASS: + return obj; + default: + break; + } + return CLASS_OF(obj); +} + void rb_cvar_set(klass, id, val) VALUE klass; @@ -1411,55 +1425,6 @@ rb_cvar_defined(klass, id) return Qfalse; } -int -rb_cvar_defined_singleton(obj, id) - VALUE obj; - ID id; -{ - switch (TYPE(obj)) { - case T_MODULE: - case T_CLASS: - break; - default: - obj = CLASS_OF(obj); - break; - } - return rb_cvar_defined(obj, id); -} - -void -rb_cvar_set_singleton(obj, id, value) - VALUE obj; - ID id; - VALUE value; -{ - switch (TYPE(obj)) { - case T_MODULE: - case T_CLASS: - break; - default: - obj = CLASS_OF(obj); - break; - } - rb_cvar_set(obj, id, value); -} - -VALUE -rb_cvar_get_singleton(obj, id) - VALUE obj; - ID id; -{ - switch (TYPE(obj)) { - case T_MODULE: - case T_CLASS: - break; - default: - obj = CLASS_OF(obj); - break; - } - return rb_cvar_get(obj, id); -} - void rb_cv_set(klass, name, val) VALUE klass; |