RosettaCodeData/Task/Conditional-structures/Forth/conditional-structures-3.fth
2023-07-01 13:44:08 -04:00

5 lines
119 B
Forth

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