aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_ch7.adb
diff options
context:
space:
mode:
authorHristian Kirtchev <kirtchev@adacore.com>2019-07-10 09:01:33 +0000
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>2019-07-10 09:01:33 +0000
commit7f8c1cd3675b0e30817d98e52740b918b4e970b0 (patch)
treec893e1819017c5d50981513e99833bb2cf9abc1d /gcc/ada/sem_ch7.adb
parent0b6694b4e41d394df12d159c319be4b1326745ca (diff)
downloadgcc-7f8c1cd3675b0e30817d98e52740b918b4e970b0.zip
gcc-7f8c1cd3675b0e30817d98e52740b918b4e970b0.tar.gz
gcc-7f8c1cd3675b0e30817d98e52740b918b4e970b0.tar.bz2
[Ada] Minor reformatting
2019-07-10 Hristian Kirtchev <kirtchev@adacore.com> gcc/ada/ * bindo-graphs.adb, bindo.adb, debug.adb, exp_ch6.adb, sem_ch10.adb, sem_ch13.adb, sem_ch3.adb, sem_ch4.adb, sem_ch6.adb, sem_ch7.adb, sem_res.adb, sem_spark.adb, sem_util.adb, warnsw.ads: Minor reformatting. From-SVN: r273335
Diffstat (limited to 'gcc/ada/sem_ch7.adb')
-rw-r--r--gcc/ada/sem_ch7.adb10
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/sem_ch7.adb b/gcc/ada/sem_ch7.adb
index e97f15e..e0d20ef 100644
--- a/gcc/ada/sem_ch7.adb
+++ b/gcc/ada/sem_ch7.adb
@@ -790,7 +790,7 @@ package body Sem_Ch7 is
-- Deactivate expansion inside the body of ignored Ghost entities,
-- as this code will ultimately be ignored. This avoids requiring the
-- presence of run-time units which are not needed. Only do this for
- -- user entities, as internally generated entitities might still need
+ -- user entities, as internally generated entities might still need
-- to be expanded (e.g. those generated for types).
if Present (Ignored_Ghost_Region)
@@ -1063,7 +1063,7 @@ package body Sem_Ch7 is
-- to the linker as their Is_Public flag is set to True. This proactive
-- approach is necessary because an inlined or a generic body for which
-- code is generated in other units may need to see these entities. Cut
- -- down the number of global symbols that do not neet public visibility
+ -- down the number of global symbols that do not need public visibility
-- as this has two beneficial effects:
-- (1) It makes the compilation process more efficient.
-- (2) It gives the code generator more leeway to optimize within each
@@ -1883,7 +1883,7 @@ package body Sem_Ch7 is
end if;
-- Nested package specs that do not require bodies are not checked for
- -- ineffective use clauses due to the possbility of subunits. This is
+ -- ineffective use clauses due to the possibility of subunits. This is
-- because at this stage it is impossible to tell whether there will be
-- a separate body.
@@ -2261,7 +2261,7 @@ package body Sem_Ch7 is
procedure Swap_Private_Dependents (Priv_Deps : Elist_Id);
-- When the full view of a private type is made available, we do the
-- same for its private dependents under proper visibility conditions.
- -- When compiling a grand-chid unit this needs to be done recursively.
+ -- When compiling a grandchild unit this needs to be done recursively.
-----------------------------
-- Swap_Private_Dependents --
@@ -3196,7 +3196,7 @@ package body Sem_Ch7 is
E : Entity_Id;
Requires_Body : Boolean := False;
- -- Flag set when the unit has at least one construct that requries
+ -- Flag set when the unit has at least one construct that requires
-- completion in a body.
begin