RosettaCodeData/Task/Conditional-structures/Forth/conditional-structures-3.fth
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

5 lines
119 B
Forth

( n -- ) CASE
( integer ) OF ( statements ) ENDOF
( integer ) OF ( statements ) ENDOF
( default instructions )
ENDCASE