8 lines
242 B
Text
8 lines
242 B
Text
/* CASE STATEMENT - EXECUTES STATEMENT0, STATEMENT1, ETC. */
|
|
/* DEPENDING ON WHETHER EXPR EVALUATES TO 0, 1, ... */
|
|
/* EXPR MUST BE IN RANGE OR THE PROGRAM WILL JUMP TO HYPERSPACE */
|
|
DO CASE EXPR;
|
|
STATEMENT0;
|
|
STATEMENT1;
|
|
...
|
|
END;
|