RosettaCodeData/Task/Flow-control-structures/Oz/flow-control-structures-1.oz
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

5 lines
74 B
Text

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