aboutsummaryrefslogtreecommitdiffstats
path: root/test/ruby/test_backtrace.rb
diff options
context:
space:
mode:
Diffstat (limited to 'test/ruby/test_backtrace.rb')
-rw-r--r--test/ruby/test_backtrace.rb34
1 files changed, 32 insertions, 2 deletions
diff --git a/test/ruby/test_backtrace.rb b/test/ruby/test_backtrace.rb
index 9f2d4c465c..c35b95c9e1 100644
--- a/test/ruby/test_backtrace.rb
+++ b/test/ruby/test_backtrace.rb
@@ -40,7 +40,7 @@ class TestBacktrace < Test::Unit::TestCase
rec[n-1]
}
else
- max.times{|i|
+ (max*3).times{|i|
total_size = caller(0).size
c = caller(i)
if c
@@ -53,5 +53,35 @@ class TestBacktrace < Test::Unit::TestCase
rec[max]
}.resume
end
-end
+ def test_caller_lev_and_n
+ m = 10
+ rec = lambda{|n|
+ if n < 0
+ (m*6).times{|lev|
+ (m*6).times{|n|
+ t = caller(0).size
+ r = caller(lev, n)
+ r = r.size if r.respond_to? :size
+
+ # STDERR.puts [t, lev, n, r].inspect
+ if n == 0
+ assert_equal(0, r, [t, lev, n, r].inspect)
+ elsif t < lev
+ assert_equal(nil, r, [t, lev, n, r].inspect)
+ else
+ if t - lev > n
+ assert_equal(n, r, [t, lev, n, r].inspect)
+ else
+ assert_equal(t - lev, r, [t, lev, n, r].inspect)
+ end
+ end
+ }
+ }
+ else
+ rec[n-1]
+ end
+ }
+ rec[m]
+ end
+end