diff options
| author | Jason Merrill <jason@casey.cygnus.com> | 2000-03-04 09:32:35 +0000 |
|---|---|---|
| committer | Jason Merrill <jason@gcc.gnu.org> | 2000-03-04 04:32:35 -0500 |
| commit | deb5e2801f7c307c0c0d225fd244741c7635deeb (patch) | |
| tree | 7dbe32baf99950bdd8c71c770cc96d2bfec358e9 /gcc/dwarf2out.c | |
| parent | e8965a187162a2da95e059a6ef3d16a68258d046 (diff) | |
| download | gcc-deb5e2801f7c307c0c0d225fd244741c7635deeb.zip gcc-deb5e2801f7c307c0c0d225fd244741c7635deeb.tar.gz gcc-deb5e2801f7c307c0c0d225fd244741c7635deeb.tar.bz2 | |
stmt.c (is_body_block): Move...
* stmt.c (is_body_block): Move...
* dwarfout.c, dwarf2out.c: ...from here.
* tree.h: Declare it.
* emit-rtl.c (remove_unncessary_notes): Don't remove the body block.
* final.c (final_start_function): Do call remove_unnecessary_notes
when scheduling.
From-SVN: r32324
Diffstat (limited to 'gcc/dwarf2out.c')
| -rw-r--r-- | gcc/dwarf2out.c | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/gcc/dwarf2out.c b/gcc/dwarf2out.c index cb8b723..26bb09b 100644 --- a/gcc/dwarf2out.c +++ b/gcc/dwarf2out.c @@ -2436,7 +2436,6 @@ static void output_pubnames PARAMS ((void)); static void add_arange PARAMS ((tree, dw_die_ref)); static void output_aranges PARAMS ((void)); static void output_line_info PARAMS ((void)); -static int is_body_block PARAMS ((tree)); static dw_die_ref base_type_die PARAMS ((tree)); static tree root_type PARAMS ((tree)); static int is_base_type PARAMS ((tree)); @@ -5924,36 +5923,6 @@ output_line_info () ASM_OUTPUT_LABEL (asm_out_file, ".LTEND"); } -/* Given a pointer to a BLOCK node return non-zero if (and only if) the node - in question represents the outermost pair of curly braces (i.e. the "body - block") of a function or method. - - For any BLOCK node representing a "body block" of a function or method, the - BLOCK_SUPERCONTEXT of the node will point to another BLOCK node which - represents the outermost (function) scope for the function or method (i.e. - the one which includes the formal parameters). The BLOCK_SUPERCONTEXT of - *that* node in turn will point to the relevant FUNCTION_DECL node. */ - -static inline int -is_body_block (stmt) - register tree stmt; -{ - if (TREE_CODE (stmt) == BLOCK) - { - register tree parent = BLOCK_SUPERCONTEXT (stmt); - - if (TREE_CODE (parent) == BLOCK) - { - register tree grandparent = BLOCK_SUPERCONTEXT (parent); - - if (TREE_CODE (grandparent) == FUNCTION_DECL) - return 1; - } - } - - return 0; -} - /* Given a pointer to a tree node for some base type, return a pointer to a DIE that describes the given type. |