aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorJustin Squirek <squirek@adacore.com>2018-01-11 08:50:38 +0000
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>2018-01-11 08:50:38 +0000
commit6b199a185b21857c2c26b470f8241d95d767c8c9 (patch)
treeb10197f7a0200d8962e3b01573bf9c52b719a596 /gcc
parent05344a331c26080d119316e88043397ee6478fa8 (diff)
downloadgcc-6b199a185b21857c2c26b470f8241d95d767c8c9.zip
gcc-6b199a185b21857c2c26b470f8241d95d767c8c9.tar.gz
gcc-6b199a185b21857c2c26b470f8241d95d767c8c9.tar.bz2
[Ada] Minor reformatting
2018-01-11 Justin Squirek <squirek@adacore.com> gcc/ada/ * sem_ch8.adb: Minor comment fix. From-SVN: r256487
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/ChangeLog4
-rw-r--r--gcc/ada/sem_ch8.adb3
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 07705c5..625f305 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2018-01-11 Justin Squirek <squirek@adacore.com>
+
+ * sem_ch8.adb: Minor comment fix.
+
2018-01-11 Hristian Kirtchev <kirtchev@adacore.com>
* exp_ch4.adb (Process_Action): Do not abandon the inspection of an
diff --git a/gcc/ada/sem_ch8.adb b/gcc/ada/sem_ch8.adb
index a51abd5..955db28 100644
--- a/gcc/ada/sem_ch8.adb
+++ b/gcc/ada/sem_ch8.adb
@@ -9118,6 +9118,7 @@ package body Sem_Ch8 is
-----------------------------
procedure Update_Use_Clause_Chain is
+
procedure Update_Chain_In_Scope (Level : Int);
-- Iterate through one level in the scope stack verifying each use-type
-- clause within said level is used then reset the Current_Use_Clause
@@ -9161,7 +9162,7 @@ package body Sem_Ch8 is
if Nkind (Curr) = N_Use_Package_Clause then
-- Renamings and formal subprograms may cause the associated
- -- to be marked as effective instead of the original.
+ -- node to be marked as effective instead of the original.
if not (Present (Associated_Node (N))
and then Present