diff options
| author | Robert Dewar <dewar@adacore.com> | 2014-02-24 17:13:34 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-02-24 18:13:34 +0100 |
| commit | f34b5d88f05e8908d717355339bbded72d7c18d5 (patch) | |
| tree | 70832e0c0a55635b5e21af2b4975858632902e52 /gcc/ada/atree.ads | |
| parent | 2dade09735a63a5bd57e353bc02d99b2991aa441 (diff) | |
| download | gcc-f34b5d88f05e8908d717355339bbded72d7c18d5.zip gcc-f34b5d88f05e8908d717355339bbded72d7c18d5.tar.gz gcc-f34b5d88f05e8908d717355339bbded72d7c18d5.tar.bz2 | |
g-sercom-mingw.adb, [...]: Minor reformatting.
2014-02-24 Robert Dewar <dewar@adacore.com>
* g-sercom-mingw.adb, g-sercom-linux.adb, sem_prag.adb, freeze.adb,
atree.adb, atree.ads: Minor reformatting.
From-SVN: r208088
Diffstat (limited to 'gcc/ada/atree.ads')
| -rw-r--r-- | gcc/ada/atree.ads | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/gcc/ada/atree.ads b/gcc/ada/atree.ads index ee2ecde..de6fd2e8 100644 --- a/gcc/ada/atree.ads +++ b/gcc/ada/atree.ads @@ -501,14 +501,17 @@ package Atree is -- a copied node by the parent field are also copied.) The parent pointers -- in the copy are properly set. Copy_Separate_Tree (Empty/Error) returns -- Empty/Error. The new subtree does not share entities with the source, - -- but has new entities with the same name. Most of the time this routine - -- is called on an unanalyzed tree, and no semantic information is copied. - -- 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, - -- as well as Etype fields and the Analyzed flag. + -- but has new entities with the same name. + -- + -- Most of the time this routine is called on an unanalyzed tree, and no + -- semantic information is copied. However, to ensure that no entities + -- are shared between the two when the source is already analyzed, and + -- that the result looks like an unanalyzed tree from the parser, Entity + -- fields and Etype fields are set to Empty, and Analyzed flags set False. + -- -- In addition, Expanded_Name nodes are converted back into the original - -- parser form (where they are Selected_Components), so that renalysis does - -- the right thing. + -- parser form (where they are Selected_Components), so that reanalysis + -- does the right thing. function Copy_Separate_List (Source : List_Id) return List_Id; -- Applies Copy_Separate_Tree to each element of the Source list, returning |