mirror of
				https://github.com/ruby/ruby.git
				synced 2022-11-09 12:17:21 -05:00 
			
		
		
		
	* vm_backtrace.c (rb_profile_frame_classpath): handle singleton
methods defined directly on an object. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@43442 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
		
							parent
							
								
									be16693f94
								
							
						
					
					
						commit
						5b529e5a3d
					
				
					 3 changed files with 25 additions and 8 deletions
				
			
		| 
						 | 
				
			
			@ -1,3 +1,9 @@
 | 
			
		|||
Mon Oct 28 04:10:41 2013  Aman Gupta <ruby@tmm1.net>
 | 
			
		||||
 | 
			
		||||
	* vm_backtrace.c (rb_profile_frame_classpath): handle singleton
 | 
			
		||||
	  methods defined directly on an object.
 | 
			
		||||
	* test/-ext-/debug/test_profile_frames.rb: test for above.
 | 
			
		||||
 | 
			
		||||
Mon Oct 28 00:52:36 2013  Nobuyoshi Nakada  <nobu@ruby-lang.org>
 | 
			
		||||
 | 
			
		||||
	* struct.c (new_struct): fix warning message, class name and encoding.
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -4,7 +4,8 @@ require '-test-/debug'
 | 
			
		|||
class SampleClassForTestProfileFrames
 | 
			
		||||
  class Sample2
 | 
			
		||||
    def baz(block)
 | 
			
		||||
      block.call
 | 
			
		||||
      instance_eval "def zab(block) block.call end"
 | 
			
		||||
      [self, zab(block)]
 | 
			
		||||
    end
 | 
			
		||||
  end
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			@ -19,12 +20,13 @@ end
 | 
			
		|||
 | 
			
		||||
class TestProfileFrames < Test::Unit::TestCase
 | 
			
		||||
  def test_profile_frames
 | 
			
		||||
    frames = Fiber.new{
 | 
			
		||||
    obj, frames = Fiber.new{
 | 
			
		||||
      Fiber.yield SampleClassForTestProfileFrames.new.foo(lambda{ Bug::Debug.profile_frames(0, 10) })
 | 
			
		||||
    }.resume
 | 
			
		||||
 | 
			
		||||
    labels = [
 | 
			
		||||
      "block (2 levels) in test_profile_frames",
 | 
			
		||||
      "zab",
 | 
			
		||||
      "baz",
 | 
			
		||||
      "bar",
 | 
			
		||||
      "foo",
 | 
			
		||||
| 
						 | 
				
			
			@ -32,6 +34,7 @@ class TestProfileFrames < Test::Unit::TestCase
 | 
			
		|||
    ]
 | 
			
		||||
    base_labels = [
 | 
			
		||||
      "test_profile_frames",
 | 
			
		||||
      "zab",
 | 
			
		||||
      "baz",
 | 
			
		||||
      "bar",
 | 
			
		||||
      "foo",
 | 
			
		||||
| 
						 | 
				
			
			@ -39,6 +42,7 @@ class TestProfileFrames < Test::Unit::TestCase
 | 
			
		|||
    ]
 | 
			
		||||
    full_labels = [
 | 
			
		||||
      "block (2 levels) in TestProfileFrames#test_profile_frames",
 | 
			
		||||
      "#{obj.inspect}.zab",
 | 
			
		||||
      "SampleClassForTestProfileFrames::Sample2#baz",
 | 
			
		||||
      "SampleClassForTestProfileFrames.bar",
 | 
			
		||||
      "SampleClassForTestProfileFrames#foo",
 | 
			
		||||
| 
						 | 
				
			
			@ -46,16 +50,18 @@ class TestProfileFrames < Test::Unit::TestCase
 | 
			
		|||
    ]
 | 
			
		||||
    classes = [
 | 
			
		||||
      TestProfileFrames,
 | 
			
		||||
      obj,
 | 
			
		||||
      SampleClassForTestProfileFrames::Sample2,
 | 
			
		||||
      SampleClassForTestProfileFrames, # singleton method
 | 
			
		||||
      SampleClassForTestProfileFrames,
 | 
			
		||||
      TestProfileFrames,
 | 
			
		||||
    ]
 | 
			
		||||
    singleton_method_p = [
 | 
			
		||||
      false, false, true, false, false, false,
 | 
			
		||||
      false, true, false, true, false, false, false,
 | 
			
		||||
    ]
 | 
			
		||||
    method_names = [
 | 
			
		||||
      "test_profile_frames",
 | 
			
		||||
      "zab",
 | 
			
		||||
      "baz",
 | 
			
		||||
      "bar",
 | 
			
		||||
      "foo",
 | 
			
		||||
| 
						 | 
				
			
			@ -63,11 +69,14 @@ class TestProfileFrames < Test::Unit::TestCase
 | 
			
		|||
    ]
 | 
			
		||||
    qualified_method_names = [
 | 
			
		||||
      "TestProfileFrames#test_profile_frames",
 | 
			
		||||
      "#{obj.inspect}.zab",
 | 
			
		||||
      "SampleClassForTestProfileFrames::Sample2#baz",
 | 
			
		||||
      "SampleClassForTestProfileFrames.bar",
 | 
			
		||||
      "SampleClassForTestProfileFrames#foo",
 | 
			
		||||
      "TestProfileFrames#test_profile_frames",
 | 
			
		||||
    ]
 | 
			
		||||
    paths = [ file=__FILE__, "(eval)", file, file, file, file ]
 | 
			
		||||
    absolute_paths = [ file, nil, file, file, file, file ]
 | 
			
		||||
 | 
			
		||||
    # pp frames
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			@ -76,15 +85,15 @@ class TestProfileFrames < Test::Unit::TestCase
 | 
			
		|||
    frames.each.with_index{|(path, absolute_path, label, base_label, full_label, first_lineno,
 | 
			
		||||
                            classpath, singleton_p, method_name, qualified_method_name), i|
 | 
			
		||||
      err_msg = "#{i}th frame"
 | 
			
		||||
      assert_equal(__FILE__, path, err_msg)
 | 
			
		||||
      assert_equal(__FILE__, absolute_path, err_msg)
 | 
			
		||||
      assert_equal(paths[i], path, err_msg)
 | 
			
		||||
      assert_equal(absolute_paths[i], absolute_path, err_msg)
 | 
			
		||||
      assert_equal(labels[i], label, err_msg)
 | 
			
		||||
      assert_equal(base_labels[i], base_label, err_msg)
 | 
			
		||||
      assert_equal(full_labels[i], full_label, err_msg)
 | 
			
		||||
      assert_equal(classes[i].to_s, classpath, err_msg)
 | 
			
		||||
      assert_equal(singleton_method_p[i], singleton_p, err_msg)
 | 
			
		||||
      assert_equal(method_names[i], method_name, err_msg)
 | 
			
		||||
      assert_equal(qualified_method_names[i], qualified_method_name, err_msg)
 | 
			
		||||
      assert_match(qualified_method_names[i], qualified_method_name, err_msg)
 | 
			
		||||
      assert_match(full_labels[i], full_label, err_msg)
 | 
			
		||||
      assert_match(classes[i].inspect, classpath, err_msg)
 | 
			
		||||
      if label == method_name
 | 
			
		||||
        c = classes[i]
 | 
			
		||||
        m = singleton_p ? c.method(method_name) : c.instance_method(method_name)
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
| 
						 | 
				
			
			@ -1297,6 +1297,8 @@ rb_profile_frame_classpath(VALUE frame)
 | 
			
		|||
	}
 | 
			
		||||
	else if (FL_TEST(klass, FL_SINGLETON)) {
 | 
			
		||||
	    klass = rb_ivar_get(klass, id__attached__);
 | 
			
		||||
	    if (!RB_TYPE_P(klass, T_CLASS))
 | 
			
		||||
		return rb_inspect(klass);
 | 
			
		||||
	}
 | 
			
		||||
	return rb_class_path(klass);
 | 
			
		||||
    }
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue