aboutsummaryrefslogtreecommitdiff
path: root/tests/if2.ek
diff options
context:
space:
mode:
authorKimplul <kimi.h.kuparinen@gmail.com>2024-04-07 01:28:45 +0300
committerKimplul <kimi.h.kuparinen@gmail.com>2024-04-07 01:28:45 +0300
commit170f3ddc3d8967c0b5d4755c0221c396db215b2f (patch)
tree00314209cd7878b9d5b3fe6fc2e0c7297f76dec8 /tests/if2.ek
parent2bdf1f8b1856bca8091d66a7a447e6c90993c297 (diff)
downloadek-170f3ddc3d8967c0b5d4755c0221c396db215b2f.tar.gz
ek-170f3ddc3d8967c0b5d4755c0221c396db215b2f.zip
implement some initial qbt backend stuff
Diffstat (limited to 'tests/if2.ek')
-rw-r--r--tests/if2.ek29
1 files changed, 29 insertions, 0 deletions
diff --git a/tests/if2.ek b/tests/if2.ek
new file mode 100644
index 0000000..b41b389
--- /dev/null
+++ b/tests/if2.ek
@@ -0,0 +1,29 @@
+typedef i9 {}
+typedef i27 {}
+
+putchar(i9 c)
+{
+ *i9 p = 19683 as *i9;
+ p* = c;
+}
+
+main()
+{
+ if 0 {
+ for i27 i = 0; i < 5; i = i + 1 {
+ putchar('0' + i);
+ }
+ }
+ else if 1 {
+ for i27 i = 0; i < 5; i = i + 1 {
+ putchar('A' + i);
+ }
+ }
+ else {
+ for i27 i = 0; i < 5; i = i + 1 {
+ putchar('K' + i);
+ }
+ }
+
+ putchar('\n');
+}