summaryrefslogtreecommitdiff
path: root/variable.c
diff options
context:
space:
mode:
Diffstat (limited to 'variable.c')
-rw-r--r--variable.c33
1 files changed, 13 insertions, 20 deletions
diff --git a/variable.c b/variable.c
index d8e115a204..d182a703cc 100644
--- a/variable.c
+++ b/variable.c
@@ -1264,28 +1264,12 @@ rb_autoload_p(mod, id)
return autoload_file(mod, id);
}
-VALUE
-rb_const_get_at(klass, id)
- VALUE klass;
- ID id;
-{
- VALUE value;
-
- while (RCLASS(klass)->iv_tbl && st_lookup(RCLASS(klass)->iv_tbl, id, &value)) {
- if (value == Qundef) {
- rb_autoload_load(klass, id);
- continue;
- }
- return value;
- }
- return const_missing(klass, id);
-}
-
static VALUE
-rb_const_get_0(klass, id, exclude)
+rb_const_get_0(klass, id, exclude, recurse)
VALUE klass;
ID id;
int exclude;
+ int recurse;
{
VALUE value, tmp;
int mod_retry = 0;
@@ -1304,6 +1288,7 @@ rb_const_get_0(klass, id, exclude)
}
return value;
}
+ if (!recurse && klass != rb_cObject) break;
tmp = RCLASS(tmp)->super;
}
if (!mod_retry && BUILTIN_TYPE(klass) == T_MODULE) {
@@ -1320,7 +1305,7 @@ rb_const_get_from(klass, id)
VALUE klass;
ID id;
{
- return rb_const_get_0(klass, id, Qtrue);
+ return rb_const_get_0(klass, id, Qtrue, Qtrue);
}
VALUE
@@ -1328,7 +1313,15 @@ rb_const_get(klass, id)
VALUE klass;
ID id;
{
- return rb_const_get_0(klass, id, Qfalse);
+ return rb_const_get_0(klass, id, Qfalse, Qtrue);
+}
+
+VALUE
+rb_const_get_at(klass, id)
+ VALUE klass;
+ ID id;
+{
+ return rb_const_get_0(klass, id, Qfalse, Qfalse);
}
VALUE