diff options
| author | Robert Dewar <dewar@adacore.com> | 2011-08-01 15:59:50 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-01 17:59:50 +0200 |
| commit | 8d606a78a331b91295e7ce1e27bf12e419084093 (patch) | |
| tree | 7d4732f0abe2b223aae59d11f570aaab5a66bdf0 /gcc/ada/sem_ch8.ads | |
| parent | 1982d5a85436cb4798d3b58a6f306b33c996ff24 (diff) | |
| download | gcc-8d606a78a331b91295e7ce1e27bf12e419084093.zip gcc-8d606a78a331b91295e7ce1e27bf12e419084093.tar.gz gcc-8d606a78a331b91295e7ce1e27bf12e419084093.tar.bz2 | |
sem_ch3.adb, [...]: Minor reformatting
2011-08-01 Robert Dewar <dewar@adacore.com>
* sem_ch3.adb, sem_ch3.ads, sem_ch5.adb, prj-part.adb, par-ch4.adb,
sem_util.adb, sem_ch4.adb, sem_ch6.adb, sem_ch6.ads, sem_ch8.adb,
sem_ch8.ads, sem_ch13.ads, par-ch5.adb, prj-env.ads: Minor reformatting
From-SVN: r177055
Diffstat (limited to 'gcc/ada/sem_ch8.ads')
| -rw-r--r-- | gcc/ada/sem_ch8.ads | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/gcc/ada/sem_ch8.ads b/gcc/ada/sem_ch8.ads index bf5fb3d..6d02a41 100644 --- a/gcc/ada/sem_ch8.ads +++ b/gcc/ada/sem_ch8.ads @@ -102,13 +102,13 @@ package Sem_Ch8 is -- processing for 'Class attribute references. function Has_Loop_In_Inner_Open_Scopes (S : Entity_Id) return Boolean; - -- S is the entity of an open scope. This function determines if there - -- is an inner scope of S which is a loop (i.e. it appears somewhere in - -- the scope stack after S). + -- S is the entity of an open scope. This function determines if there is + -- an inner scope of S which is a loop (i.e. it appears somewhere in the + -- scope stack after S). function In_Open_Scopes (S : Entity_Id) return Boolean; - -- S is the entity of a scope. This function determines if this scope - -- is currently open (i.e. it appears somewhere in the scope stack). + -- S is the entity of a scope. This function determines if this scope is + -- currently open (i.e. it appears somewhere in the scope stack). procedure Initialize; -- Initializes data structures used for visibility analysis. Must be @@ -125,13 +125,13 @@ package Sem_Ch8 is -- analysis of the subunit, the parent's environment is again identical. procedure Push_Scope (S : Entity_Id); - -- Make new scope stack entry, pushing S, the entity for a scope - -- onto the top of the scope table. The current setting of the scope - -- suppress flags is saved for restoration on exit. + -- Make new scope stack entry, pushing S, the entity for a scope onto the + -- top of the scope table. The current setting of the scope suppress flags + -- is saved for restoration on exit. procedure Pop_Scope; - -- Remove top entry from scope stack, restoring the saved setting - -- of the scope suppress flags. + -- Remove top entry from scope stack, restoring the saved setting of the + -- scope suppress flags. function Present_System_Aux (N : Node_Id := Empty) return Boolean; -- Return True if the auxiliary system file has been successfully loaded. |