internal.c: move some functions to <mruby/internal.h>.

Ref #5776

include/mruby/internal.h

@@ -155,6 +155,9 @@ void mrb_gc_free_iv(mrb_state*, struct RObject*);
 
 /* VM */
 mrb_int mrb_ci_bidx(mrb_callinfo *ci);
+mrb_value mrb_exec_irep(mrb_state *mrb, mrb_value self, struct RProc *p);
+mrb_value mrb_obj_instance_eval(mrb_state*, mrb_value);
+mrb_value mrb_mod_module_eval(mrb_state*, mrb_value);
 
 #ifdef MRB_USE_BIGINT
 mrb_value mrb_bint_new_int(mrb_state *mrb, mrb_int x);

mrbgems/mruby-binding/src/binding.c

@@ -9,7 +9,6 @@
 #include <mruby/presym.h>
 
 void mrb_proc_merge_lvar(mrb_state *mrb, mrb_irep *irep, struct REnv *env, int num, const mrb_sym *lv, const mrb_value *stack);
-mrb_value mrb_exec_irep(mrb_state *mrb, mrb_value self, struct RProc *p);
 const struct RProc *mrb_binding_extract_proc(mrb_state *mrb, mrb_value binding);
 struct REnv *mrb_binding_extract_env(mrb_state *mrb, mrb_value binding);
 typedef mrb_bool mrb_parser_foreach_top_variable_func(mrb_state *mrb, mrb_sym sym, void *user);

mrbgems/mruby-eval/src/eval.c

@@ -7,11 +7,9 @@
 #include <mruby/error.h>
 #include <mruby/presym.h>
 #include <mruby/variable.h>
+#include <mruby/internal.h>
 
 struct REnv *mrb_env_new(mrb_state *mrb, struct mrb_context *c, mrb_callinfo *ci, int nstacks, mrb_value *stack, struct RClass *tc);
-mrb_value mrb_exec_irep(mrb_state *mrb, mrb_value self, struct RProc *p);
-mrb_value mrb_obj_instance_eval(mrb_state *mrb, mrb_value self);
-mrb_value mrb_mod_module_eval(mrb_state*, mrb_value);
 void mrb_codedump_all(mrb_state*, struct RProc*);
 
 static struct RProc*

mrbgems/mruby-method/src/method.c

@@ -7,8 +7,6 @@
 #include "mruby/internal.h"
 #include "mruby/presym.h"
 
-mrb_value mrb_exec_irep(mrb_state *mrb, mrb_value self, struct RProc *p);
-
 // Defined by mruby-proc-ext on which mruby-method depends
 mrb_value mrb_proc_parameters(mrb_state *mrb, mrb_value proc);
 mrb_value mrb_proc_source_location(mrb_state *mrb, struct RProc *p);

src/class.c

@@ -1628,9 +1628,6 @@ mrb_mod_initialize(mrb_state *mrb, mrb_value mod)
   return mod;
 }
 
-/* implementation of module_eval/class_eval */
-mrb_value mrb_mod_module_eval(mrb_state*, mrb_value);
-
 static mrb_value
 mrb_mod_dummy_visibility(mrb_state *mrb, mrb_value mod)
 {
@@ -2849,8 +2846,6 @@ mrb_obj_dup(mrb_state *mrb, mrb_value obj)
 
 /* implementation of __id__ */
 mrb_value mrb_obj_id_m(mrb_state *mrb, mrb_value self);
-/* implementation of instance_eval */
-mrb_value mrb_obj_instance_eval(mrb_state*, mrb_value);
 
 mrb_noreturn void
 mrb_method_missing(mrb_state *mrb, mrb_sym name, mrb_value self, mrb_value args)