From 385f0e8af657b1334e477e6837b0846cc14fa00d Mon Sep 17 00:00:00 2001
From: ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Mon, 19 May 2008 03:08:50 +0000
Subject: * vm.c, insns.def, eval.c, vm_insnhelper.c: fix CREF handling.   VM
 value stack frame of block contains cref information.   (dfp[-1] points CREF)
 * compile.c, eval_intern.h, eval_method.c, load.c, proc.c,   vm_dump.h,
 vm_core.h: ditto. * include/ruby/ruby.h, gc.c: remove T_VALUES because of
 above   changes. * bootstraptest/test_eval.rb, test_knownbug.rb: move solved
 test.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@16468 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 vm_dump.c | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

(limited to 'vm_dump.c')

diff --git a/vm_dump.c b/vm_dump.c
index d3e1e423a5..a0c6db5759 100644
--- a/vm_dump.c
+++ b/vm_dump.c
@@ -140,7 +140,7 @@ control_frame_dump(rb_thread_t *th, rb_control_frame_t *cfp)
 void
 vm_stack_dump_raw(rb_thread_t *th, rb_control_frame_t *cfp)
 {
-#if 0
+#if 1
     VALUE *sp = cfp->sp, *bp = cfp->bp;
     VALUE *lfp = cfp->lfp;
     VALUE *dfp = cfp->dfp;
@@ -174,6 +174,13 @@ vm_stack_dump_raw(rb_thread_t *th, rb_control_frame_t *cfp)
     fprintf(stderr, "---------------------------\n");
 }
 
+void
+vm_stack_dump_raw_current(void)
+{
+    rb_thread_t *th = GET_THREAD();
+    vm_stack_dump_raw(th, th->cfp);
+}
+
 void
 env_dump_raw(rb_env_t *env, VALUE *lfp, VALUE *dfp)
 {
-- 
cgit v1.2.3