Singleton classes do not have outer class set; fix #3505

matz · matz · commit 47cc5d66e3a2 · 2017-03-16T22:13:58.000+09:00
diff --git a/src/class.c b/src/class.c
@@ -1222,10 +1222,6 @@ mrb_singleton_class(mrb_state *mrb, mrb_value v)
   }
   obj = mrb_basic_ptr(v);
   prepare_singleton_class(mrb, obj);
-  if (mrb->c && mrb->c->ci && mrb->c->ci->target_class) {
-    mrb_obj_iv_set(mrb, (struct RObject*)obj->c, mrb_intern_lit(mrb, "__outer__"),
-                   mrb_obj_value(mrb->c->ci->target_class));
-  }
   return mrb_obj_value(obj->c);
 }
 

Original file line number	Diff line number	Diff line change
`@@ -1222,10 +1222,6 @@ mrb_singleton_class(mrb_state *mrb, mrb_value v)`
`1222`	`1222`	`}`
`1223`	`1223`	`obj = mrb_basic_ptr(v);`
`1224`	`1224`	`prepare_singleton_class(mrb, obj);`
`1225`		`- if (mrb->c && mrb->c->ci && mrb->c->ci->target_class) {`
`1226`		`- mrb_obj_iv_set(mrb, (struct RObject*)obj->c, mrb_intern_lit(mrb, "__outer__"),`
`1227`		`- mrb_obj_value(mrb->c->ci->target_class));`
`1228`		`- }`
`1229`	`1225`	`return mrb_obj_value(obj->c);`
`1230`	`1226`	`}`
`1231`	`1227`