diff options
author | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-07-12 04:25:46 +0000 |
---|---|---|
committer | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-07-12 04:25:46 +0000 |
commit | 6b6bf4dd481f744faf54b5efcda5f32e4565bd7d (patch) | |
tree | 793fe567ccc6f9f6a8588a9ae2d5d5b040984b37 /blockinlining.c | |
parent | 2e601474e7dc483aca0e7c7b7ced750e869aab7f (diff) |
* blockinlining.c: remove "yarv" prefix.
* array.c, numeric.c: ditto.
* insnhelper.ci, insns.def, vm_evalbody.ci: ditto.
* yarvcore.c: removed.
* yarvcore.h: renamed to core.h.
* cont.c, debug.c, error.c, process.c, signal.c : ditto.
* ext/probeprofiler/probeprofiler.c: ditto.
* id.c, id.h: added.
* inits.c: ditto.
* compile.c: rename internal functions.
* compile.h: fix debug flag.
* eval.c, object.c, vm.c: remove ruby_top_self.
use rb_vm_top_self() instead.
* eval_intern.h, eval_load: ditto.
* gc.c: rename yarv_machine_stack_mark() to
rb_gc_mark_machine_stack().
* insnhelper.h: remove unused macros.
* iseq.c: add iseq_compile() to create iseq object
from source string.
* proc.c: rename a internal function.
* template/insns.inc.tmpl: remove YARV prefix.
* thread.c:
* vm.c (rb_iseq_eval): added.
* vm.c: move some functions from yarvcore.c.
* vm_dump.c: fix to remove compiler warning.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12741 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'blockinlining.c')
-rw-r--r-- | blockinlining.c | 25 |
1 files changed, 11 insertions, 14 deletions
diff --git a/blockinlining.c b/blockinlining.c index 4f491c1ba1..35a9d6199f 100644 --- a/blockinlining.c +++ b/blockinlining.c @@ -11,13 +11,10 @@ #include "ruby/ruby.h" #include "ruby/node.h" -#include "yarvcore.h" - -VALUE yarv_new_iseqval(VALUE node, VALUE name, VALUE file, - VALUE parent, VALUE type, VALUE block_opt, VALUE opt); +#include "vm_core.h" static VALUE -yarv_iseq_special_block(rb_iseq_t *iseq, void *builder) +iseq_special_block(rb_iseq_t *iseq, void *builder) { #if OPT_BLOCKINLINING VALUE parent = Qfalse; @@ -181,14 +178,14 @@ build_Integer_times_node(rb_iseq_t *iseq, NODE * node, NODE * lnode, } VALUE -yarv_invoke_Integer_times_special_block(VALUE num) +invoke_Integer_times_special_block(VALUE num) { rb_thread_t *th = GET_THREAD(); rb_block_t *orig_block = GC_GUARDED_PTR_REF(th->cfp->lfp[0]); if (orig_block && BUILTIN_TYPE(orig_block->iseq) != T_NODE) { - VALUE tsiseqval = yarv_iseq_special_block(orig_block->iseq, - build_Integer_times_node); + VALUE tsiseqval = iseq_special_block(orig_block->iseq, + build_Integer_times_node); rb_iseq_t *tsiseq; VALUE argv[2], val; @@ -297,8 +294,8 @@ build_Range_each_node_LT(rb_iseq_t *iseq, NODE * node, NODE * lnode, } VALUE -yarv_invoke_Range_each_special_block(VALUE range, - VALUE beg, VALUE end, int excl) +invoke_Range_each_special_block(VALUE range, + VALUE beg, VALUE end, int excl) { rb_thread_t *th = GET_THREAD(); rb_block_t *orig_block = GC_GUARDED_PTR_REF(th->cfp->lfp[0]); @@ -306,7 +303,7 @@ yarv_invoke_Range_each_special_block(VALUE range, if (BUILTIN_TYPE(orig_block->iseq) != T_NODE) { void *builder = excl ? build_Range_each_node_LT : build_Range_each_node_LE; - VALUE tsiseqval = yarv_iseq_special_block(orig_block->iseq, builder); + VALUE tsiseqval = iseq_special_block(orig_block->iseq, builder); rb_iseq_t *tsiseq; VALUE argv[2]; @@ -429,14 +426,14 @@ build_Array_each_node(rb_iseq_t *iseq, NODE * node, NODE * lnode, } VALUE -yarv_invoke_Array_each_special_block(VALUE ary) +invoke_Array_each_special_block(VALUE ary) { rb_thread_t *th = GET_THREAD(); rb_block_t *orig_block = GC_GUARDED_PTR_REF(th->cfp->lfp[0]); if (BUILTIN_TYPE(orig_block->iseq) != T_NODE) { - VALUE tsiseqval = yarv_iseq_special_block(orig_block->iseq, - build_Array_each_node); + VALUE tsiseqval = iseq_special_block(orig_block->iseq, + build_Array_each_node); rb_iseq_t *tsiseq; VALUE argv[2]; |