mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
0046a4a519
"TracePoint.enable" is implemented in prelude.rb since
r66003 / commit 96990203b7
and not available in miniruby. I tried using regular "ruby"
for testing, but it proved noisy and caused test failures.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@66336 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
57 lines
1.4 KiB
Ruby
57 lines
1.4 KiB
Ruby
# frozen_string_literal: false
|
|
require_relative 'helper'
|
|
|
|
module DTrace
|
|
class TestSingletonFunctionEntry < TestCase
|
|
def test_entry
|
|
probe = <<-eoprobe
|
|
ruby$target:::method-entry
|
|
/strstr(copyinstr(arg0), "Foo") != NULL/
|
|
{
|
|
printf("%s %s %s %d\\n", copyinstr(arg0), copyinstr(arg1), copyinstr(arg2), arg3);
|
|
}
|
|
eoprobe
|
|
|
|
trap_probe(probe, ruby_program) { |d_file, rb_file, probes|
|
|
foo_calls = probes.map { |line| line.split }.find_all { |row|
|
|
row.first == 'Foo' && row[1] == 'foo'
|
|
}
|
|
|
|
assert_equal 10, foo_calls.length, probes.inspect
|
|
line = '3'
|
|
foo_calls.each { |f| assert_equal line, f[3] }
|
|
foo_calls.each { |f| assert_equal rb_file, f[2] }
|
|
}
|
|
end
|
|
|
|
def test_exit
|
|
probe = <<-eoprobe
|
|
ruby$target:::method-return
|
|
{
|
|
printf("%s %s %s %d\\n", copyinstr(arg0), copyinstr(arg1), copyinstr(arg2), arg3);
|
|
}
|
|
eoprobe
|
|
|
|
trap_probe(probe, ruby_program) { |d_file, rb_file, probes|
|
|
foo_calls = probes.map { |line| line.split }.find_all { |row|
|
|
row.first == 'Foo' && row[1] == 'foo'
|
|
}
|
|
|
|
assert_equal 10, foo_calls.length, probes.inspect
|
|
line = '3'
|
|
foo_calls.each { |f| assert_equal line, f[3] }
|
|
foo_calls.each { |f| assert_equal rb_file, f[2] }
|
|
}
|
|
end
|
|
|
|
def ruby_program
|
|
<<-eoruby
|
|
TracePoint.new{}.__enable(nil, nil)
|
|
class Foo
|
|
def self.foo; end
|
|
end
|
|
10.times { Foo.foo }
|
|
eoruby
|
|
end
|
|
end
|
|
end if defined?(DTrace::TestCase)
|