1require 'dtrace/helper'
2
3module DTrace
4  class TestArrayCreate < TestCase
5    def test_lit
6      trap_probe(probe, '[]') { |_,rbfile,saw|
7        saw = saw.map(&:split).find_all { |num, file, line|
8          file == rbfile && num == '0'
9        }
10        assert_equal([rbfile], saw.map { |line| line[1] })
11        assert_equal(['1'], saw.map { |line| line[2] })
12      }
13    end
14
15    def test_many_lit
16      trap_probe(probe, '[1,2,3,4]') { |_,rbfile,saw|
17        saw = saw.map(&:split).find_all { |num, file, line|
18          file == rbfile && num == '4' && line == '1'
19        }
20        assert_operator saw.length, :>, 0
21      }
22    end
23
24    private
25    def probe type = 'array'
26      <<-eoprobe
27ruby$target:::#{type}-create
28/arg1/
29{
30  printf("%d %s %d\\n", arg0, copyinstr(arg1), arg2);
31}
32      eoprobe
33    end
34  end
35end if defined?(DTrace::TestCase)
36