From 18e01f63816ec36d10b8d958b8298b73950dd89f Mon Sep 17 00:00:00 2001
From: ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Tue, 29 Jan 2013 08:25:32 +0000
Subject: * vm_backtrace.c: fix issue of rb_debug_inspector_open().   The order
 of making binding should be stack (frame) top to bottom.   [Bug #7635]   And
 also fix issue of collecting klass. Collecting klass is same   as
 TracePoint#defined_class.   (previous version, it returns T_ICLASS (internal
 objects). * test/-ext-/debug/test_debug.rb: add a test. *
 ext/-test-/debug/extconf.rb, init.c, inspector.c: ditto. * vm_backtrace.c:
 remove magic number and add enum CALLER_BINDING_*. * vm_backtrace.c,
 include/ruby/debug.h: add new C api (experimental)  
 rb_debug_inspector_frame_self_get(). * vm.c, vm_core.h, vm_trace.c: move
 decl. of   rb_vm_control_frame_id_and_class() and constify first parameter.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@38970 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 test/-ext-/debug/test_debug.rb | 58 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 58 insertions(+)
 create mode 100644 test/-ext-/debug/test_debug.rb

(limited to 'test')

diff --git a/test/-ext-/debug/test_debug.rb b/test/-ext-/debug/test_debug.rb
new file mode 100644
index 0000000000..4c45057b5d
--- /dev/null
+++ b/test/-ext-/debug/test_debug.rb
@@ -0,0 +1,58 @@
+require 'test/unit'
+require '-test-/debug'
+
+class TestDebug < Test::Unit::TestCase
+
+  def binds_check binds
+    count = Hash.new(0)
+    assert_instance_of(Array, binds)
+    binds.each{|(_self, bind, klass, iseq, loc)|
+      if _self == self
+        count[:self] += 1
+      end
+
+      if bind
+        assert_instance_of(Binding, bind)
+        count[:bind] += 1
+      end
+
+      if klass
+        assert(klass.instance_of?(Module) || klass.instance_of?(Class))
+        count[:class] += 1
+      end
+
+      if iseq
+        count[:iseq] += 1
+        assert_instance_of(RubyVM::InstructionSequence, iseq)
+
+        # check same location
+        assert_equal(loc.path, iseq.path)
+        assert_equal(loc.absolute_path, iseq.absolute_path)
+        assert_equal(loc.label, iseq.label)
+        assert_operator(loc.lineno, :>=, iseq.first_lineno)
+      end
+
+      assert_instance_of(Thread::Backtrace::Location, loc)
+
+    }
+    assert_operator(0, :<, count[:self])
+    assert_operator(0, :<, count[:bind])
+    assert_operator(0, :<, count[:iseq])
+    assert_operator(0, :<, count[:class])
+  end
+
+  def test_inspector_open
+    binds = Bug::Debug.inspector
+    binds_check binds
+  end
+
+  def inspector_in_eval
+    eval("Bug::Debug.inspector")
+  end
+
+  def test_inspector_open_in_eval
+    bug7635 = '[ruby-core:51640]'
+    binds = inspector_in_eval
+    binds_check binds
+  end
+end
-- 
cgit v1.2.3