aboutsummaryrefslogtreecommitdiff
path: root/tests/i/enum-range/program.cps
blob: 7c6d1ef8b6bb247b8ca00c63d2040772ba2688bf (plain)
1
2
3
4
5
6
7
8
9

TYPE Season = (Spring, Summer)
DECLARE S : Season
S <- Summer
TRY
    S <- S + 1
CATCH
    OUTPUT "enum caught"
ENDTRY
OUTPUT S = Summer