PageRenderTime 52ms CodeModel.GetById 26ms RepoModel.GetById 0ms app.codeStats 1ms

/trunk/Examples/test-suite/octave/unions_runme.m

#
MATLAB | 49 lines | 38 code | 11 blank | 0 comment | 7 complexity | eb5f9236f4721e9773924261d7c6b97e MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0 
    

  1. 

  2. # This is the union runtime testcase. It ensures that values within a 
    3. 

  3. # union embedded within a struct can be set and read correctly.
    4. 

  4. 

  5. unions
    6. 

  6. 

  7. # Create new instances of SmallStruct and BigStruct for later use
    8. 

  8. small = unions.SmallStruct();
    9. 

  9. small.jill = 200;
    10. 

  10. 

  11. big = unions.BigStruct();
    12. 

  12. big.smallstruct = small;
    13. 

  13. big.jack = 300;
    14. 

  14. 

  15. # Use SmallStruct then BigStruct to setup EmbeddedUnionTest.
    16. 

  16. # Ensure values in EmbeddedUnionTest are set correctly for each.
    17. 

  17. eut = unions.EmbeddedUnionTest();
    18. 

  18. 

  19. # First check the SmallStruct in EmbeddedUnionTest
    20. 

  20. eut.number = 1;
    21. 

  21. eut.uni.small = small;
    22. 

  22. Jill1 = eut.uni.small.jill;
    23. 

  23. if (Jill1 != 200)
    24. 

  24.     error("Runtime test1 failed. eut.uni.small.jill=%i" , Jill1)
    25. 

  25. endif
    26. 

  26. 

  27. Num1 = eut.number;
    28. 

  28. if (Num1 != 1)
    29. 

  29.     error("Runtime test2 failed. eut.number=%i" , Num1)
    30. 

  30. endif
    31. 

  31. 

  32. # Secondly check the BigStruct in EmbeddedUnionTest
    33. 

  33. eut.number = 2;
    34. 

  34. eut.uni.big = big;
    35. 

  35. Jack1 = eut.uni.big.jack;
    36. 

  36. if (Jack1 != 300)
    37. 

  37.     error("Runtime test3 failed. eut.uni.big.jack=%i" , Jack1)
    38. 

  38. endif
    39. 

  39. 

  40. Jill2 = eut.uni.big.smallstruct.jill;
    41. 

  41. if (Jill2 != 200)
    42. 

  42.     error("Runtime test4 failed. eut.uni.big.smallstruct.jill=%i" , Jill2)
    43. 

  43. endif
    44. 

  44. 

  45. Num2 = eut.number;
    46. 

  46. if (Num2 != 2)
    47. 

  47.     error("Runtime test5 failed. eut.number=%i" , Num2)
    48. 

  48. endif
    49. 

  49. 

  50.