8742036cbd
etc. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@9785 626c5289-ae23-0410-ae9c-e8d60b6d4f22
65 lines
1.4 KiB
Ruby
65 lines
1.4 KiB
Ruby
#!/usr/bin/env ruby
|
|
#
|
|
# Put description here
|
|
#
|
|
#
|
|
#
|
|
#
|
|
#
|
|
|
|
require 'swig_assert'
|
|
|
|
|
|
# This is the union runtime testcase. It ensures that values within a
|
|
# union embedded within a struct can be set and read correctly.
|
|
|
|
require 'unions'
|
|
|
|
# Create new instances of SmallStruct and BigStruct for later use
|
|
small = Unions::SmallStruct.new()
|
|
small.jill = 200
|
|
|
|
big = Unions::BigStruct.new()
|
|
big.smallstruct = small
|
|
big.jack = 300
|
|
|
|
# Use SmallStruct then BigStruct to setup EmbeddedUnionTest.
|
|
# Ensure values in EmbeddedUnionTest are set correctly for each.
|
|
eut = Unions::EmbeddedUnionTest.new()
|
|
|
|
# First check the SmallStruct in EmbeddedUnionTest
|
|
eut.number = 1
|
|
eut.uni.small = small
|
|
Jill1 = eut.uni.small.jill
|
|
if (Jill1 != 200)
|
|
print "Runtime test1 failed. eut.uni.small.jill=" , Jill1 , "\n"
|
|
exit 1
|
|
end
|
|
|
|
Num1 = eut.number
|
|
if (Num1 != 1)
|
|
print "Runtime test2 failed. eut.number=" , Num1 , "\n"
|
|
exit 1
|
|
end
|
|
|
|
# Secondly check the BigStruct in EmbeddedUnionTest
|
|
eut.number = 2
|
|
eut.uni.big = big
|
|
Jack1 = eut.uni.big.jack
|
|
if (Jack1 != 300)
|
|
print "Runtime test3 failed. eut.uni.big.jack=" , Jack1 , "\n"
|
|
exit 1
|
|
end
|
|
|
|
Jill2 = eut.uni.big.smallstruct.jill
|
|
if (Jill2 != 200)
|
|
print "Runtime test4 failed. eut.uni.big.smallstruct.jill=" , Jill2 , "\n"
|
|
exit 1
|
|
end
|
|
|
|
Num2 = eut.number
|
|
if (Num2 != 2)
|
|
print "Runtime test5 failed. eut.number=" , Num2 , "\n"
|
|
exit 1
|
|
end
|
|
|