summaryrefslogtreecommitdiff
path: root/blockinlining.c
diff options
context:
space:
mode:
authorko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2007-07-12 04:25:46 +0000
committerko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2007-07-12 04:25:46 +0000
commit6b6bf4dd481f744faf54b5efcda5f32e4565bd7d (patch)
tree793fe567ccc6f9f6a8588a9ae2d5d5b040984b37 /blockinlining.c
parent2e601474e7dc483aca0e7c7b7ced750e869aab7f (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.c25
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];