variable.c (const_get): stop searching constant before Object.

`String::String` should raise `NameError` exception.
BinaryGears · Apr 24, 2022 · 083691d · 083691d
1 parent 17b4d82
commit 083691d
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/variable.c b/src/variable.c
@@ -774,6 +774,7 @@ const_get(mrb_state *mrb, struct RClass *base, mrb_sym sym, mrb_bool skip)
   mrb_bool retry = FALSE;
   mrb_value name;
 
+  /* if skip then skip the current class (already searched) */
   if (skip) c = c->super;
 L_RETRY:
   while (c) {
@@ -782,6 +783,7 @@ const_get(mrb_state *mrb, struct RClass *base, mrb_sym sym, mrb_bool skip)
         return v;
     }
     c = c->super;
+    if (!skip && c == mrb->object_class) break;
   }
   if (!retry && base->tt == MRB_TT_MODULE) {
     c = mrb->object_class;