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
));