/tags/rel-1-3-29/SWIG/Examples/test-suite/ruby/unions_runme.rb
# · Ruby · 54 lines · 36 code · 11 blank · 7 comment · 10 complexity · 53a744e1e048d1ff61a0344bfc78e32a MD5 · raw file
- # 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