diff options
Diffstat (limited to 'tests/i/strings/program.cps')
| -rw-r--r-- | tests/i/strings/program.cps | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/i/strings/program.cps b/tests/i/strings/program.cps new file mode 100644 index 0000000..e1f934b --- /dev/null +++ b/tests/i/strings/program.cps @@ -0,0 +1,9 @@ +DECLARE Empty : STRING +DECLARE Text : STRING +Empty <- "" +Text <- "ABCDEFGH" +OUTPUT LENGTH(Empty), ":", LENGTH(Text) +OUTPUT MID(Text, 2, 3), ":", RIGHT(Text, 3) +OUTPUT "Summer" & " " & "Pudding" +OUTPUT LCASE('W'), ":", UCASE('h'), ":", LCASE('@') +OUTPUT "same" = ("sa" & "me"), ":", "A" < "B" |