1 /* Tree-dumping functionality for C-family languages.
2 Copyright (C) 2002 Free Software Foundation, Inc.
3 Written by Mark Mitchell <mark@codesourcery.com>
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2, or (at your option) any later
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING. If not, write to the Free
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
24 #include "coretypes.h"
28 #include "tree-dump.h"
30 /* Dump information common to statements from STMT. */
33 dump_stmt (dump_info_p di, tree t)
35 location_t *locus = EXPR_LOCUS (t);
37 dump_int (di, "line", locus->line);
40 /* Dump the next statement after STMT. */
43 dump_next_stmt (dump_info_p di, tree t)
45 dump_child ("next", TREE_CHAIN (t));
48 /* Dump any C-specific tree codes and attributes of common codes. */
51 c_dump_tree (void *dump_info, tree t)
54 dump_info_p di = (dump_info_p) dump_info;
56 /* Figure out what kind of node this is. */
62 if (DECL_C_BIT_FIELD (t))
63 dump_string (di, "bitfield");
68 if (ASM_VOLATILE_P (t))
69 dump_string (di, "volatile");
70 dump_child ("strg", ASM_STRING (t));
71 dump_child ("outs", ASM_OUTPUTS (t));
72 dump_child ("ins", ASM_INPUTS (t));
73 dump_child ("clbr", ASM_CLOBBERS (t));
74 dump_next_stmt (di, t);
80 dump_next_stmt (di, t);
84 /* Note that a case label is not like other statements; there is
85 no way to get the line-number of a case label. */
86 dump_child ("low", CASE_LOW (t));
87 dump_child ("high", CASE_HIGH (t));
88 dump_next_stmt (di, t);
93 dump_child ("decl", CLEANUP_DECL (t));
94 dump_child ("expr", CLEANUP_EXPR (t));
95 dump_next_stmt (di, t);
100 dump_child ("body", COMPOUND_BODY (t));
101 dump_next_stmt (di, t);
106 dump_child ("decl", DECL_STMT_DECL (t));
107 dump_next_stmt (di, t);
112 dump_child ("body", DO_BODY (t));
113 dump_child ("cond", DO_COND (t));
114 dump_next_stmt (di, t);
119 dump_child ("expr", EXPR_STMT_EXPR (t));
120 dump_next_stmt (di, t);
125 dump_child ("init", FOR_INIT_STMT (t));
126 dump_child ("cond", FOR_COND (t));
127 dump_child ("expr", FOR_EXPR (t));
128 dump_child ("body", FOR_BODY (t));
129 dump_next_stmt (di, t);
134 dump_child ("dest", GOTO_DESTINATION (t));
135 dump_next_stmt (di, t);
140 dump_child ("cond", IF_COND (t));
141 dump_child ("then", THEN_CLAUSE (t));
142 dump_child ("else", ELSE_CLAUSE (t));
143 dump_next_stmt (di, t);
148 dump_child ("labl", LABEL_STMT_LABEL (t));
149 dump_next_stmt (di, t);
154 dump_child ("expr", RETURN_STMT_EXPR (t));
155 dump_next_stmt (di, t);
160 dump_child ("cond", SWITCH_COND (t));
161 dump_child ("body", SWITCH_BODY (t));
162 dump_next_stmt (di, t);
167 dump_child ("cond", WHILE_COND (t));
168 dump_child ("body", WHILE_BODY (t));
169 dump_next_stmt (di, t);
174 if (SCOPE_BEGIN_P (t))
175 dump_string (di, "begn");
177 dump_string (di, "end");
178 if (SCOPE_NULLIFIED_P (t))
179 dump_string (di, "null");
180 if (!SCOPE_NO_CLEANUPS_P (t))
181 dump_string (di, "clnp");
182 dump_next_stmt (di, t);
186 dump_child ("stmt", STMT_EXPR_STMT (t));