diff options
| author | zack <zack@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-14 02:33:00 +0000 |
|---|---|---|
| committer | zack <zack@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-05-14 02:33:00 +0000 |
| commit | 1acf029802710ffdf59be2af26c8ae49247c394e (patch) | |
| tree | 1d87ff9be659423d0f5eae77a93d234f7f649aa0 /gcc/tree-browser.c | |
| parent | 88bce6369d989a3f87112ad26b981d2415147783 (diff) | |
| download | gcc-1acf029802710ffdf59be2af26c8ae49247c394e.tar.gz | |
* tree.def (documentation): Remove mention of class 'b'.
(BLOCK): Now in class 'x'.
* c-common.c (verify_tree): Remove case 'b'.
* c-typeck.c (same_translation_unit_p): Change 'b' to 'x'.
* calls.c (calls_function_1): Control cannot get past the switch
when exp is a BLOCK.
* print-tree.c (print_node): Move code for class 'b' to the class
'c'/'x' switch, as case BLOCK.
* tree.c (tree_size, make_node_stat, tree_node_structure): Likewise.
(unsafe_for_reeval, substitute_placeholder_in_expr)
(stabilize_reference_1): Remove case 'b'.
* tree-browser.c (browse_tree): Change all tests for TREE_CODE_CLASS
of something being 'b' to tests for TREE_CODE of something being
BLOCK.
* tree-ssa-operands.c (get_expr_operands): Likewise.
ada:
* trans.c (gnat_stabilize_reference_1): Remove case 'b'.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@81831 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/tree-browser.c')
| -rw-r--r-- | gcc/tree-browser.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/tree-browser.c b/gcc/tree-browser.c index f7c6136c51f..891c761e25e 100644 --- a/gcc/tree-browser.c +++ b/gcc/tree-browser.c @@ -239,21 +239,21 @@ browse_tree (tree begin) break; case TB_SUBBLOCKS: - if (head && TREE_CODE_CLASS (TREE_CODE (head)) == 'b') + if (head && TREE_CODE (head) == BLOCK) TB_SET_HEAD (BLOCK_SUBBLOCKS (head)); else TB_WF; break; case TB_SUPERCONTEXT: - if (head && TREE_CODE_CLASS (TREE_CODE (head)) == 'b') + if (head && TREE_CODE (head) == BLOCK) TB_SET_HEAD (BLOCK_SUPERCONTEXT (head)); else TB_WF; break; case TB_VARS: - if (head && TREE_CODE_CLASS (TREE_CODE (head)) == 'b') + if (head && TREE_CODE (head) == BLOCK) TB_SET_HEAD (BLOCK_VARS (head)); else if (head && TREE_CODE (head) == BIND_EXPR) TB_SET_HEAD (TREE_OPERAND (head, 0)); @@ -361,7 +361,7 @@ browse_tree (tree begin) case TB_ABSTRACT_ORIGIN: if (head && TREE_CODE_CLASS (TREE_CODE (head)) == 'd') TB_SET_HEAD (DECL_ABSTRACT_ORIGIN (head)); - else if (head && TREE_CODE_CLASS (TREE_CODE (head)) == 'b') + else if (head && TREE_CODE (head) == BLOCK) TB_SET_HEAD (BLOCK_ABSTRACT_ORIGIN (head)); else TB_WF; @@ -584,7 +584,7 @@ browse_tree (tree begin) case TB_CHAIN: /* Don't go further if it's the last node in this chain. */ - if (head && TREE_CODE_CLASS (TREE_CODE (head)) == 'b') + if (head && TREE_CODE (head) == BLOCK) TB_SET_HEAD (BLOCK_CHAIN (head)); else if (head && TREE_CHAIN (head)) TB_SET_HEAD (TREE_CHAIN (head)); |