aboutsummaryrefslogtreecommitdiff
path: root/testsuite/runnable/enumeration_members.elna
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/runnable/enumeration_members.elna')
-rw-r--r--testsuite/runnable/enumeration_members.elna19
1 files changed, 19 insertions, 0 deletions
diff --git a/testsuite/runnable/enumeration_members.elna b/testsuite/runnable/enumeration_members.elna
new file mode 100644
index 0000000..b865f98
--- /dev/null
+++ b/testsuite/runnable/enumeration_members.elna
@@ -0,0 +1,19 @@
+program()
+type
+ E1 = (one, two, three, four)
+ E2 = (zero = 0, one, two, three)
+ E3 = (minus = -5, two = 2, ten = 10)
+
+begin
+ assert(cast(E1.one: Int) = 1);
+ assert(cast(E1.two: Int) = 2);
+ assert(cast(E1.four: Int) = 4);
+
+ assert(cast(E2.zero: Int) = 0);
+ assert(cast(E2.one: Int) = 1);
+ assert(cast(E2.three: Int) = 3);
+
+ assert(cast(E3.minus: Int) = -5);
+ assert(cast(E3.two: Int) = 2);
+ assert(cast(E3.ten: Int) = 10)
+end.