PerformanceTests.sctunit 985 B

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677
  1. testgroup PerformanceTests for statechart PerformanceTest {
  2. test test_100_000 {
  3. enter
  4. assert active(PerformanceTest.mr.A)
  5. while [ c < 100000 ] {
  6. if [active(PerformanceTest.mr.A)] {
  7. raise e1
  8. } else {
  9. if [c % 2 == 0] {
  10. raise e2
  11. } else {
  12. raise e3
  13. }
  14. }
  15. cycle
  16. }
  17. assert a > 2
  18. }
  19. //----------------
  20. test test_1_000_000 {
  21. enter
  22. assert active(PerformanceTest.mr.A)
  23. while [ c < 1000000 ] {
  24. if [active(PerformanceTest.mr.A)] {
  25. raise e1
  26. } else {
  27. if [c % 2 == 0] {
  28. raise e2
  29. } else {
  30. raise e3
  31. }
  32. }
  33. cycle
  34. }
  35. assert a > 2
  36. }
  37. test test_10_000_000 {
  38. enter
  39. assert active(PerformanceTest.mr.A)
  40. while [ c < 10000000 ] {
  41. if [active(PerformanceTest.mr.A)] {
  42. raise e1
  43. } else {
  44. if [c % 2 == 0] {
  45. raise e2
  46. } else {
  47. raise e3
  48. }
  49. }
  50. cycle
  51. }
  52. assert a > 2
  53. }
  54. }