From dbee678630736a5d873cde1f262bf2cfc87e8dfe Mon Sep 17 00:00:00 2001 From: ko1 Date: Wed, 17 Jan 2007 08:48:52 +0000 Subject: * some refactoring around yarvcore and proc. * eval_proc.c: renamed to proc.c. * common.mk: ditto. * yarvcore.h, yarvcore.c: rename or remove some global variables removed: mYarvCore, mYarvInsns renamed: cYarvISeq -> rb_cISeq, cYarvProc -> rb_cProc, cYarvBinding -> rb_cBinding ::YarvCore module is removed and ::YarvCore::VM class becomes ::VM. And change/remove some functions which added with YARV. * compile.c: ditto. * eval.c: ditto. * iseq.c: ditto. * vm.c: ditto. * inits.c: rename Init_yarvcore to Init_vm. * yarvcore.c, proc.c: move some functions and initialization from yarvcore.c to proc.c. * intern.h, proc.c: add global function rb_binding_new(void). git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@11541 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- vm.c | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) (limited to 'vm.c') diff --git a/vm.c b/vm.c index 29092e6419..8898cfb516 100644 --- a/vm.c +++ b/vm.c @@ -180,7 +180,6 @@ th_set_eval_stack(yarv_thread_t *th, VALUE iseqval) } static int check_env(yarv_env_t *env); -VALUE yarv_env_alloc(VALUE klass); static VALUE th_make_env_each(yarv_thread_t *th, yarv_control_frame_t *cfp, @@ -216,10 +215,9 @@ th_make_env_each(yarv_thread_t *th, yarv_control_frame_t *cfp, *envptr = GC_GUARDED_PTR(pcfp->dfp); } } -//SDR2(cfp); -//fprintf(stderr, "lfp: %p, cfp: %p, endptr: %p\n", cfp->lfp, cfp->dfp, endptr); + /* allocate env */ - envval = yarv_env_alloc(cYarvEnv); + envval = yarv_env_alloc(); GetEnvPtr(envval, env); if (!YARV_NORMAL_ISEQ_P(cfp->iseq)) { @@ -402,7 +400,7 @@ th_make_proc(yarv_thread_t *th, yarv_control_frame_t *cfp, if (PROCDEBUG) { check_env_value(envval); } - procval = yarv_proc_alloc(cYarvProc); + procval = yarv_proc_alloc(); GetProcPtr(procval, proc); proc->blockprocval = blockprocval; proc->block.self = block->self; -- cgit v1.2.3