From ddefcea1511fec7416145dc2e6fba9cf6f59e229 Mon Sep 17 00:00:00 2001
From: "Yukihiro \"Matz\" Matsumoto" <matz@ruby.or.jp>
Date: Tue, 13 Dec 2022 10:51:44 +0900
Subject: [PATCH] mruby-eval/eval.c (f_instance_eval): skip mrb_value to get
 singleton

Use mrb_singleton_class_ptr() instead of mrb_instance_class(), because
the former returns NULL, when the latter raises error for immediate
objects.

```
1.instance_eval <<END
  def foo
    :foo
  end
END
```
---
 mrbgems/mruby-eval/src/eval.c | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/mrbgems/mruby-eval/src/eval.c b/mrbgems/mruby-eval/src/eval.c
index 5fead153b..3e430dbcb 100644
--- a/mrbgems/mruby-eval/src/eval.c
+++ b/mrbgems/mruby-eval/src/eval.c
@@ -177,15 +177,15 @@ f_instance_eval(mrb_state *mrb, mrb_value self)
     mrb_int len;
     const char *file = NULL;
     mrb_int line = 1;
-    mrb_value cv;
+    struct RClass *c;
     struct RProc *proc;
 
     mrb_get_args(mrb, "s|zi", &s, &len, &file, &line);
-    cv = mrb_singleton_class(mrb, self);
+    c = mrb_singleton_class_ptr(mrb, self);
     proc = create_proc_from_string(mrb, s, len, mrb_nil_value(), file, line);
-    MRB_PROC_SET_TARGET_CLASS(proc, mrb_class_ptr(cv));
+    MRB_PROC_SET_TARGET_CLASS(proc, c);
     mrb_assert(!MRB_PROC_CFUNC_P(proc));
-    mrb_vm_ci_target_class_set(mrb->c->ci, mrb_class_ptr(cv));
+    mrb_vm_ci_target_class_set(mrb->c->ci, c);
     return exec_irep(mrb, self, proc);
   }
   else {