| class AS_LOCK_IF_WHEN < $AS_NODE |
|---|
| **** | A "if - when" clause of a "lock" statement. The parser should make one of these for each object listed, eg. "if x when a,b,c then". |
| $AS_NODE | $PROG_ERR | AS_NODE |
| attr e_list: $AS_EXPR; |
|---|
| **** | the expressions to be locked. |
| attr then_part:AS_STMT_LIST; |
|---|
| **** | The statements to execute. |
| attr val:$AS_EXPR; |
|---|
| **** | the guard. |
| attr e_list: $AS_EXPR; |
|---|
| **** | the expressions to be locked. |
| attr then_part:AS_STMT_LIST; |
|---|
| **** | The statements to execute. |
| attr val:$AS_EXPR; |
|---|
| **** | the guard. |
| elts_size:INT |
|---|