diff options
Diffstat (limited to 'gcc/ada/ada-tree.h')
| -rw-r--r-- | gcc/ada/ada-tree.h | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/gcc/ada/ada-tree.h b/gcc/ada/ada-tree.h index aa256dc..572a5b7 100644 --- a/gcc/ada/ada-tree.h +++ b/gcc/ada/ada-tree.h @@ -294,5 +294,15 @@ struct lang_type GTY(()) /* We store the Sloc in statement nodes. */ #define TREE_SLOC(NODE) TREE_COMPLEXITY (STMT_CHECK (NODE)) -/* There is just one field in an EXPR_STMT: the expression. */ #define EXPR_STMT_EXPR(NODE) TREE_OPERAND_CHECK_CODE (NODE, EXPR_STMT, 0) +#define BLOCK_STMT_LIST(NODE) TREE_OPERAND_CHECK_CODE (NODE, BLOCK_STMT, 0) +#define IF_STMT_COND(NODE) TREE_OPERAND_CHECK_CODE (NODE, IF_STMT, 0) +#define IF_STMT_TRUE(NODE) TREE_OPERAND_CHECK_CODE (NODE, IF_STMT, 1) +#define IF_STMT_ELSEIF(NODE) TREE_OPERAND_CHECK_CODE (NODE, IF_STMT, 2) +#define IF_STMT_ELSE(NODE) TREE_OPERAND_CHECK_CODE (NODE, IF_STMT, 3) +#define GOTO_STMT_LABEL(NODE) TREE_OPERAND_CHECK_CODE (NODE, GOTO_STMT, 0) +#define LABEL_STMT_LABEL(NODE) TREE_OPERAND_CHECK_CODE (NODE, LABEL_STMT, 0) +#define LABEL_STMT_FIRST_IN_EH(NODE) \ + (LABEL_STMT_CHECK (NODE)->common.unsigned_flag) +#define RETURN_STMT_EXPR(NODE) TREE_OPERAND_CHECK_CODE (NODE, RETURN_STMT, 0) + |