RosettaCodeData/Task/Flow-control-structures/Oz/flow-control-structures-1.oz

6 lines
74 B
Plaintext

case {OS.rand} mod 3
of 0 then {Foo}
[] 1 then {Bar}
[] 2 then {Buzz}
end