1 files changed, 42 insertions, 0 deletions
diff --git a/Examples/test-suite/ruby/numeric_bounds_checking_runme.rb b/Examples/test-suite/ruby/numeric_bounds_checking_runme.rb
new file mode 100644
index 000000000..1db51be38
--- /dev/null
+++ b/Examples/test-suite/ruby/numeric_bounds_checking_runme.rb
@@ -0,0 +1,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