1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
#!/usr/bin/env ruby
#
# Tests the bounds checking for integral parameters passed to wrapped functions.
#
require 'swig_assert'
require 'numeric_bounds_checking'
limits = Numeric_bounds_checking::Limits.new
checker = Numeric_bounds_checking::Checker.new
all_ok = true
types = %w(schar uchar
shrt ushrt
int uint
long ulong)
types += %w(llong ullong) if limits.respond_to?(:llong_min)
types.each do |t|
min = limits.send("#{t}_min")
max = limits.send("#{t}_max")
meth = "pass_#{t}"
# check within bounds
swig_assert_equal("checker.#{meth}(#{min})", "#{min}", binding)
swig_assert_equal("checker.#{meth}(#{max})", "#{max}", binding)
# check outside bounds
[ min - 1, max + 1 ].each do |val|
ok = false
begin
ret = checker.send("#{meth}", val)
rescue RangeError, TypeError
ok = true
end
$stderr.puts "\n#{meth}(#{val}): Expected exception but got #{ret} for #{val} (type '#{t}') " unless ok
all_ok = all_ok && ok
end
raise SwigRubyError.new("\nAt least one bounds check failed ") unless all_ok
end
|
