Download
29 lines 554 BTextModified 2022-09-21 raw
1234567891011121314151617181920212223242526272829
enum Color{Red, Green, Blue}

x := Color.Red
say "x = $x"
say "Color: $(Color)"

for c in [Color.Red, Color.Green, Color.Blue]
    when c is Color.Blue
        say "Blue: $c"
    is Color.Red
        say "Red: $c"
    else
        say "Other: $c"
    say "$c == $x? $(c == x)"

enum FooType {
    Zero,
    One = 5,
    Two = 7,
    Three,
    Four,
}

vals := [FooType.Zero, FooType.One, FooType.Two, FooType.Three, FooType.Four, nil]
expected := [0, 5, 7, 8, 9, 10]
for i,val in vals
    say "$val = $(val:Int)"
    fail unless val:Int == expected[i]