RosettaCodeData/Task/Conditional-structures/Forth/conditional-structures-3.fth

6 lines
119 B
Forth

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