diff options
author | Richard Henderson <rth@redhat.com> | 2003-09-21 16:39:40 -0700 |
---|---|---|
committer | Richard Henderson <rth@gcc.gnu.org> | 2003-09-21 16:39:40 -0700 |
commit | 7e2af53a14ce4710e1dca754acf603db0f9d8802 (patch) | |
tree | d04ef32430711aab636f45451f9e7a3ad34ab36f /gcc/ada | |
parent | d6a1d39a7dbf00f373ace14470d5edb5cc4337be (diff) | |
download | gcc-7e2af53a14ce4710e1dca754acf603db0f9d8802.zip gcc-7e2af53a14ce4710e1dca754acf603db0f9d8802.tar.gz gcc-7e2af53a14ce4710e1dca754acf603db0f9d8802.tar.bz2 |
tree.h (TREE_LOCUS): Rename from DECL_SOURCE_LOCATION; make const.
* tree.h (TREE_LOCUS): Rename from DECL_SOURCE_LOCATION; make const.
(TREE_FILENAME, TREE_LINENO): Likewise.
(set_tree_locus, copy_tree_locus, set_tree_file_line): New.
(TREE_LOCUS_SET_P): New.
* c-aux-info.c, c-decl.c, c-parse.in, coverage.c, dbxout.c,
diagnostic.c, dwarf2out.c, dwarfout.c, function.c, integrate.c,
print-tree.c, stmt.c, toplev.c, tree-dump.c, tree-inline.c,
tree-optimize.c, tree.c, tree.def, xcoffout.c, config/alpha/alpha.c,
config/mips/mips.c, doc/c-tree.texi, objc/objc-act.c: Update to match.
ada/
* trans.c, utils.c: Update for DECL_SOURCE_LOCATION rename and
change to const.
cp/
* class.c, cp-tree.h, decl.c, decl2.c, error.c, init.c,
method.c, optimize.c, pt.c, semantics.c, tree.c: Update for
DECL_SOURCE_LOCATION rename and change to const.
f/
* com.c, ste.c: Update for DECL_SOURCE_LOCATION rename and
change to const.
java/
* class.c, decl.c, jcf-parse.c, jcf-write.c, parse.y,
resource.c: Update for DECL_SOURCE_LOCATION rename and change to const.
treelang/
* treetree.c: Update for DECL_SOURCE_LOCATION rename and
change to const.
From-SVN: r71636
Diffstat (limited to 'gcc/ada')
-rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/ada/trans.c | 4 | ||||
-rw-r--r-- | gcc/ada/utils.c | 6 |
3 files changed, 10 insertions, 5 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 2dfbc37..51ba6b4 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2003-09-21 Richard Henderson <rth@redhat.com> + + * trans.c, utils.c: Update for DECL_SOURCE_LOCATION rename and + change to const. + 2003-09-04 Michael Matz <matz@suse.de> * misc.c: Include "target.h". diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c index 8e6f9ac..889b267 100644 --- a/gcc/ada/trans.c +++ b/gcc/ada/trans.c @@ -2611,7 +2611,7 @@ tree_transform (gnat_node) the body so that the line number notes are written correctly. */ set_lineno (gnat_node, 0); - DECL_SOURCE_LOCATION (gnu_subprog_decl) = input_location; + set_tree_locus (gnu_subprog_decl, input_location); begin_subprog_body (gnu_subprog_decl); set_lineno (gnat_node, 1); @@ -5333,7 +5333,7 @@ build_unit_elab (gnat_unit, body_p, gnu_elab_list) { tree lhs = TREE_PURPOSE (gnu_elab_list); - input_location = DECL_SOURCE_LOCATION (lhs); + input_location = TREE_LOCUS (lhs); /* If LHS has a padded type, convert it to the unpadded type so the assignment is done properly. */ diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c index 186b0fd..eddfb32 100644 --- a/gcc/ada/utils.c +++ b/gcc/ada/utils.c @@ -1655,9 +1655,9 @@ create_label_decl (label_name) { tree label_decl = build_decl (LABEL_DECL, label_name, void_type_node); - DECL_CONTEXT (label_decl) = current_function_decl; - DECL_MODE (label_decl) = VOIDmode; - DECL_SOURCE_LOCATION (label_decl) = input_location; + DECL_CONTEXT (label_decl) = current_function_decl; + DECL_MODE (label_decl) = VOIDmode; + set_tree_locus (label_decl, input_location); return label_decl; } |