[前][次][番号順一覧][スレッド一覧]

ruby-changes:5037

From: nobu <ko1@a...>
Date: Thu, 22 May 2008 18:55:58 +0900 (JST)
Subject: [ruby-changes:5037] nobu - Ruby:r16530 (trunk): * vm.c (vm_get_ruby_level_cfp): moved from eval_intern.h.

nobu	2008-05-22 18:55:36 +0900 (Thu, 22 May 2008)

  New Revision: 16530

  Modified files:
    trunk/ChangeLog
    trunk/eval_intern.h
    trunk/vm.c

  Log:
    * vm.c (vm_get_ruby_level_cfp): moved from eval_intern.h.


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=16530&r2=16529&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/vm.c?r1=16530&r2=16529&diff_format=u
  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/eval_intern.h?r1=16530&r2=16529&diff_format=u

Index: eval_intern.h
===================================================================
--- eval_intern.h	(revision 16529)
+++ eval_intern.h	(revision 16530)
@@ -228,21 +228,8 @@
 NODE *vm_cref_push(rb_thread_t * const th, const VALUE, const int);
 NODE *vm_set_special_cref(rb_thread_t *th, VALUE *lfp, NODE * cref_stack);
 VALUE vm_make_jump_tag_but_local_jump(const int state, VALUE val);
-
 NODE *ruby_cref(void);
-
-static rb_control_frame_t *
-vm_get_ruby_level_cfp(rb_thread_t *th, rb_control_frame_t *cfp)
-{
-    while (!RUBY_VM_CONTROL_FRAME_STACK_OVERFLOW_P(th, cfp)) {
-	if (RUBY_VM_NORMAL_ISEQ_P(cfp->iseq)) {
-	    return cfp;
-	}
-	cfp = RUBY_VM_PREVIOUS_CONTROL_FRAME(cfp);
-    }
-    return 0;
-}
-
+rb_control_frame_t *vm_get_ruby_level_cfp(rb_thread_t *th, rb_control_frame_t *cfp);
 VALUE rb_obj_is_proc(VALUE);
 void rb_vm_check_redefinition_opt_method(NODE * const node);
 VALUE rb_vm_call_cfunc(const VALUE recv, VALUE (* const func)(VALUE),
Index: ChangeLog
===================================================================
--- ChangeLog	(revision 16529)
+++ ChangeLog	(revision 16530)
@@ -1,3 +1,7 @@
+Thu May 22 18:55:33 2008  Nobuyoshi Nakada  <nobu@r...>
+
+	* vm.c (vm_get_ruby_level_cfp): moved from eval_intern.h.
+
 Thu May 22 17:18:35 2008  Tanaka Akira  <akr@f...>
 
 	* array.c (rb_ary_compact_bang): fix reallocation size.
Index: vm.c
===================================================================
--- vm.c	(revision 16529)
+++ vm.c	(revision 16530)
@@ -94,6 +94,18 @@
     }
 }
 
+rb_control_frame_t *
+vm_get_ruby_level_cfp(rb_thread_t *th, rb_control_frame_t *cfp)
+{
+    while (!RUBY_VM_CONTROL_FRAME_STACK_OVERFLOW_P(th, cfp)) {
+	if (RUBY_VM_NORMAL_ISEQ_P(cfp->iseq)) {
+	    return cfp;
+	}
+	cfp = RUBY_VM_PREVIOUS_CONTROL_FRAME(cfp);
+    }
+    return 0;
+}
+
 /* Env */
 
 static void
@@ -787,6 +799,7 @@
     return ary;
 }
 
+#if 0
 static void
 check_svar(void)
 {
@@ -802,6 +815,7 @@
 	cfp++;
     }
 }
+#endif
 
 NODE *
 ruby_cref(void)
@@ -1545,6 +1559,7 @@
 #endif
 }
 
+#ifdef USE_THREAD_RECYCLE
 static rb_thread_t *
 thread_recycle_struct(void)
 {
@@ -1552,6 +1567,7 @@
     memset(p, 0, sizeof(rb_thread_t));
     return p;
 }
+#endif
 
 static void
 thread_free(void * const ptr)
@@ -1721,6 +1737,7 @@
 #endif
 
 /* debug functions */
+#if VMDEBUG
 
 static VALUE
 sdr(void)
@@ -1752,6 +1769,7 @@
 #endif
     return ary;
 }
+#endif
 
 void
 Init_VM(void)

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/

[前][次][番号順一覧][スレッド一覧]