diff options
| author | Robert Dewar <dewar@adacore.com> | 2011-08-29 09:34:19 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-29 11:34:19 +0200 |
| commit | f0f88eb6da6cebf88ec1b3fc2d75b6b350c1bfba (patch) | |
| tree | 4ddce1f125b1a2af8c3d5dd0c7454f02fe1040a4 /gcc/ada/atree.ads | |
| parent | 3e37be71aa737869a2c02a8d041dd63d14d80025 (diff) | |
| download | gcc-f0f88eb6da6cebf88ec1b3fc2d75b6b350c1bfba.zip gcc-f0f88eb6da6cebf88ec1b3fc2d75b6b350c1bfba.tar.gz gcc-f0f88eb6da6cebf88ec1b3fc2d75b6b350c1bfba.tar.bz2 | |
exp_ch9.adb, [...]: Minor reformatting.
2011-08-29 Robert Dewar <dewar@adacore.com>
* exp_ch9.adb, mlib-prj.adb, prj.adb, prj.ads, ttypes.ads, sem_ch4.adb,
makeutl.adb, makeutl.ads, atree.ads, snames.adb-tmpl,
snames.ads-tmpl: Minor reformatting.
From-SVN: r178179
Diffstat (limited to 'gcc/ada/atree.ads')
| -rw-r--r-- | gcc/ada/atree.ads | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/gcc/ada/atree.ads b/gcc/ada/atree.ads index e75a95f..4e20b0b 100644 --- a/gcc/ada/atree.ads +++ b/gcc/ada/atree.ads @@ -429,9 +429,6 @@ package Atree is -- Source to be Empty, in which case Relocate_Node simply returns -- Empty as the result. - function Copy_Separate_List (Source : List_Id) return List_Id; - -- Apply the following to a list of nodes - function Copy_Separate_Tree (Source : Node_Id) return Node_Id; -- Given a node that is the root of a subtree, Copy_Separate_Tree copies -- the entire syntactic subtree, including recursively any descendants @@ -444,6 +441,10 @@ package Atree is -- However, to ensure that no entities are shared between the two when the -- source is already analyzed, entity fields in the copy are zeroed out. + function Copy_Separate_List (Source : List_Id) return List_Id; + -- Applies Copy_Separate_Tree to each element of the Source list, returning + -- a new list of the results of these copy operations. + procedure Exchange_Entities (E1 : Entity_Id; E2 : Entity_Id); -- Exchange the contents of two entities. The parent pointers are switched -- as well as the Defining_Identifier fields in the parents, so that the |