mirror of
https://github.com/polserver/polserver
synced 2026-08-13 08:23:08 -04:00
18 lines
252 B
Text
18 lines
252 B
Text
|
enum class MyEnum
|
||
|
|
FOO,
|
||
|
|
BAR,
|
||
|
|
BAZ
|
||
|
|
endenum
|
||
|
|
|
||
|
|
print( MyEnum::FOO );
|
||
|
|
print( MyEnum::BAR );
|
||
|
|
print( MyEnum::BAZ );
|
||
|
|
|
||
|
|
for i := 0 to 2
|
||
|
|
case (i)
|
||
|
|
MyEnum::FOO: print("zero");
|
||
|
|
MyEnum::BAR: print("one");
|
||
|
|
MyEnum::BAZ: print("two");
|
||
|
|
endcase
|
||
|
|
endfor
|