7cd9063b52
- source files and Makefiles need never be executable - scripts are run directly by their interpreters in the test suites, so also do not need to be executable
61 lines
1.2 KiB
Ruby
61 lines
1.2 KiB
Ruby
#!/usr/bin/env ruby
|
|
#
|
|
# Put script description here.
|
|
#
|
|
#
|
|
#
|
|
#
|
|
#
|
|
|
|
require 'swig_assert'
|
|
require 'apply_strings'
|
|
|
|
include Apply_strings
|
|
|
|
begin
|
|
x = UcharPtr.new
|
|
swig_assert( fail, "UcharPtr should not be defined")
|
|
rescue NameError
|
|
end
|
|
|
|
ptr = 'a'
|
|
['UCharFunction', 'SCharFunction', 'CUCharFunction',
|
|
'CSCharFunction'].each do |m|
|
|
val = Apply_strings.send(m, ptr)
|
|
swig_assert( "val == ptr", binding )
|
|
end
|
|
|
|
|
|
['CharFunction', 'CCharFunction'].each do |m|
|
|
begin
|
|
val = Apply_strings.send(m, ptr)
|
|
swig_assert( false, nil, "Apply_strings.#{m} should raise TypeError" )
|
|
rescue TypeError
|
|
end
|
|
end
|
|
|
|
ptr = 'a'
|
|
foo = DirectorTest.new
|
|
['UCharFunction', 'SCharFunction', 'CUCharFunction',
|
|
'CSCharFunction'].each do |m|
|
|
val = foo.send(m, ptr)
|
|
swig_assert( "val == ptr", binding, "DirectorTest.#{m}" )
|
|
end
|
|
|
|
|
|
['CharFunction', 'CCharFunction'].each do |m|
|
|
begin
|
|
val = foo.send(m, ptr)
|
|
swig_assert( false, nil, "DirectorTest.#{m} should raise TypeError" )
|
|
rescue TypeError
|
|
end
|
|
end
|
|
|
|
|
|
# ary = Apply_strings.DigitsGlobalB
|
|
# { 0 => 'A',
|
|
# 1 => 'B',
|
|
# 2 => 'B' }.each do |k,v|
|
|
# val = ary[k]
|
|
# swig_assert( val == v, "Apply_strings.DigitsGlobalB[#{k}] #{val} != #{v}")
|
|
# end
|