diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-10-27 12:21:23 +0100 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2015-10-27 12:21:23 +0100 |
commit | f6f401140a4a93899d25eeb05a537d35f4324f6f (patch) | |
tree | d27facc59cc94a59a1d88d59f763949e8b0d6e65 /gcc/ada/lib-xref.ads | |
parent | 3f8743e802e6927c8ea91911fd9e313137b73c50 (diff) | |
download | gcc-f6f401140a4a93899d25eeb05a537d35f4324f6f.zip gcc-f6f401140a4a93899d25eeb05a537d35f4324f6f.tar.gz gcc-f6f401140a4a93899d25eeb05a537d35f4324f6f.tar.bz2 |
[multiple changes]
2015-10-27 Yannick Moy <moy@adacore.com>
* lib-xref-spark_specific.adb
(Enclosing_Subprogram_Or_Library_Package): detect library-level
subprograms and handle entries as subprograms, i.e. now both
library-level subprograms and entry bodies act as enclosing
scopes.
(Traverse_Declarations_Or_Statements): process entry bodies just
like subprogram bodies.
* lib-xref.ads (Enclosing_Subprogram_Or_Library_Package): comment
simplified while keeping its the meaning and minor typo fixed
("of" -> "or").
* spark_xrefs.ads (Xref Section): fix in description of the ALI
line for subprogram calls; such lines start with captial "F"
followed by a space.
2015-10-27 Ed Schonberg <schonberg@adacore.com>
* sem_ch8.adb (Find_Direct_Name): A parameter association is
a legal context for applying an implicit dereference.
(Analyze_Expanded_Name): Minor code cleanup.
From-SVN: r229418
Diffstat (limited to 'gcc/ada/lib-xref.ads')
-rw-r--r-- | gcc/ada/lib-xref.ads | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/gcc/ada/lib-xref.ads b/gcc/ada/lib-xref.ads index 9d1037c..63d78c7 100644 --- a/gcc/ada/lib-xref.ads +++ b/gcc/ada/lib-xref.ads @@ -624,10 +624,9 @@ package Lib.Xref is function Enclosing_Subprogram_Or_Library_Package (N : Node_Id) return Entity_Id; - -- Return the closest enclosing subprogram of package. Only return a - -- library level package. If the package is enclosed in a subprogram, - -- return the subprogram. This ensures that GNATprove can distinguish - -- local variables from global variables. + -- Return the closest enclosing subprogram or library-level package. + -- This ensures that GNATprove can distinguish local variables from + -- global variables. procedure Generate_Dereference (N : Node_Id; |