diff options
| author | Etienne Servais <servais@adacore.com> | 2021-12-03 15:13:07 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2022-01-06 17:11:35 +0000 |
| commit | 41a7b9484a39657deab7cac7092c2bf634a39365 (patch) | |
| tree | 2f19782ff911aa4ee3a3473e9f4907310eec6686 /gcc/ada/sem_ch6.adb | |
| parent | 1f26ff11b688e3cec00da85b13f6f33e23fc7410 (diff) | |
[Ada] Fix typo in comments found running aspell
gcc/ada/
* atree.adb: Fix typo.
* einfo.ads: Likewise.
* exp_aggr.adb: Likewise.
* exp_ch6.adb: Likewise.
* exp_ch7.adb: Likewise.
* exp_ch9.adb: Likewise.
* exp_prag.adb: Likewise.
* exp_unst.adb: Likewise.
* exp_unst.ads: Likewise.
* exp_util.adb: Likewise.
* par-endh.adb: Likewise.
* par.adb: Likewise.
* restrict.adb: Likewise.
* sem.ads: Likewise.
* sem_ch4.adb: Likewise.
* sem_ch5.adb: Likewise.
* sem_ch6.adb: Likewise.
* sem_ch8.adb: Likewise.
* sem_ch12.adb: Likewise.
* sem_ch13.adb: Likewise.
* sem_dim.adb: Likewise.
* sem_elab.adb: Likewise.
* sem_prag.adb: Likewise.
* sem_res.adb: Likewise.
* sem_util.adb: Likewise.
* sem_util.ads: Likewise.
* sinfo.ads: Likewise.
* sprint.adb: Likewise.
* urealp.adb: Likewise.
Diffstat (limited to 'gcc/ada/sem_ch6.adb')
| -rw-r--r-- | gcc/ada/sem_ch6.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb index 2368dec8abc..bd1bb5065d2 100644 --- a/gcc/ada/sem_ch6.adb +++ b/gcc/ada/sem_ch6.adb @@ -5040,7 +5040,7 @@ package body Sem_Ch6 is -- object representing the minimum of the accessibility level value that -- is passed in and the accessibility level of the callee's parameter -- and locals and use it in the case of a call to a nested subprogram. - -- This generated object is refered to as a "minimum accessiblity + -- This generated object is referred to as a "minimum accessibility -- level." if Present (Spec_Id) or else Present (Body_Id) then @@ -11637,7 +11637,7 @@ package body Sem_Ch6 is E : Entity_Id; begin - -- Search for entities in the enclosing scope of this synchonized + -- Search for entities in the enclosing scope of this synchronized -- type. pragma Assert (Is_Concurrent_Type (Conc_Typ)); |