PerformanceTests.sctunit 927 B

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  1. package tests
  2. testclass PerformanceTests for statechart PerformanceTest {
  3. operation test_100_000 () {
  4. enter
  5. assert active (PerformanceTest.mr.A)
  6. while (c < 100000) {
  7. if (active (PerformanceTest.mr.A)) {
  8. raise e1
  9. } else {
  10. if (c % 2 == 0) {
  11. raise e2
  12. } else {
  13. raise e3
  14. }
  15. }
  16. cycle
  17. }
  18. assert a > 2
  19. } //----------------
  20. operation 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. } operation test_10_000_000 () {
  37. enter
  38. assert active (PerformanceTest.mr.A)
  39. while (c < 10000000) {
  40. if (active (PerformanceTest.mr.A)) {
  41. raise e1
  42. } else {
  43. if (c % 2 == 0) {
  44. raise e2
  45. } else {
  46. raise e3
  47. }
  48. }
  49. cycle
  50. }
  51. assert a > 2
  52. }
  53. }