class AS_TYPECASE_WHEN < $AS_NODE, $NEXT{AS_TYPECASE_WHEN}
****
 A "when" clause of a "typecase" statement.

Flattened version is here

Ancestors
$NEXT{_} $AS_NODE $PROG_ERR AS_NODE


Public


Readable Attributes
attr then_part:AS_STMT_LIST;
**** The statements to execute.
attr tp:AS_TYPE_SPEC;
**** A type to compare against.

Writable Attributes
attr then_part:AS_STMT_LIST;
**** The statements to execute.
attr tp:AS_TYPE_SPEC;
**** A type to compare against.

Features