| class AS_TYPECASE_STMT < $AS_STMT |
|---|
| **** | A "typecase" statement. Parser should put any declaration or assignment in a separate object before this. |
| $AS_STMT | $NEXT{_} | $AS_NODE | $PROG_ERR | AS_STMT | AS_NODE |
| attr else_part:AS_STMT_LIST; |
|---|
| **** | The "else" part. |
| attr name:IDENT; |
|---|
| **** | The local to switch on. |
| attr no_else:BOOL; |
|---|
| **** | True if there is no "else" part. |
| attr when_part:AS_TYPECASE_WHEN; |
|---|
| **** | The list of "when" clauses. |
| attr else_part:AS_STMT_LIST; |
|---|
| **** | The "else" part. |
| attr name:IDENT; |
|---|
| **** | The local to switch on. |
| attr no_else:BOOL; |
|---|
| **** | True if there is no "else" part. |
| attr when_part:AS_TYPECASE_WHEN; |
|---|
| **** | The list of "when" clauses. |