switch
— Starts a multiway branch block.
switch( : : ControlExpression : )
switch
starts a block that allows to control the program flow
via a multiway branch.
The parameter ControlExpression
must result in an integer value.
This value determines to what case
label the execution jumps.
Every case
statement includes one integer constant.
If the integer constant of a case
statement is equal to the
calculated value of the parameter ControlExpression
, the program
execution continues there.
In addition, an optional default
statement can be defined as
the last jump label within a switch
block.
The program execution jumps to this default
label, if no
case
constant matches the calculated ControlExpression
value.
As in the programming languages C, C++, and C#, the case
statement is a jump label and---in contrast to elseif
---not the
begin of an enclosed block that is automatically left at the next
case
or default
statement.
In order to leave the switch
block after the execution of the
code lines of a case
branch, as in C or C++ a break
statement must be inserted at the end of the case
branch.
break
statements can be used anywhere within a
switch
block.
This causes the program execution to continue after the closing
endswitch
statement.
Without a break
statement at the end of a branch the program
execution “falls through” to the statements of the following
case
or default
branch.
If the same statements have to be executed in different cases, i.e.,
for multiple control values, several case
statements with different
constant expressions can be listed one below the other.
ControlExpression
(input_control) integer →
(integer)
Integer expression that determines at which case label the program execution is continued.
TestStr := '' for Index := 1 to 8 by 1 TestStr := TestStr + '<' switch (Index) case 1: TestStr := TestStr + '1' break case 2: TestStr := TestStr + '2' * intentionally fall through to 3 case 3: TestStr := TestStr + '3' * intentionally fall through to 4 case 4: TestStr := TestStr + '4' break case 5: case 6: * common case branch for 5 and 5 TestStr := TestStr + '56' break case 7: * continue for loop TestStr := TestStr + '7' continue default: TestStr := TestStr + 'd' break endswitch TestStr := TestStr + '>' endfor
If the condition is correct,
switch
(as an operator) returns 2 (
H_MSG_TRUE)
. Otherwise, an
exception is raised and an error code is returned.
Foundation