diff options
Diffstat (limited to 'tests/i/selection/program.cps')
| -rw-r--r-- | tests/i/selection/program.cps | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/tests/i/selection/program.cps b/tests/i/selection/program.cps new file mode 100644 index 0000000..7edff5c --- /dev/null +++ b/tests/i/selection/program.cps @@ -0,0 +1,19 @@ +DECLARE X : INTEGER +X <- 4 +IF X > 0 THEN + IF X = 4 THEN + OUTPUT "nested" + ELSE + OUTPUT "wrong" + ENDIF +ENDIF +CASE OF X + 1 TO 5 : OUTPUT "first" + 4 : OUTPUT "wrong" + OTHERWISE : OUTPUT "wrong" +ENDCASE +X <- 9 +CASE OF X + 1 TO 5 : OUTPUT "wrong" + OTHERWISE : OUTPUT "otherwise" +ENDCASE |
