diff options
Diffstat (limited to 'gcc/ada/sem_ch7.adb')
-rw-r--r-- | gcc/ada/sem_ch7.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch7.adb b/gcc/ada/sem_ch7.adb index ebeec699183..fe1bcb5f24f 100644 --- a/gcc/ada/sem_ch7.adb +++ b/gcc/ada/sem_ch7.adb @@ -1002,7 +1002,7 @@ package body Sem_Ch7 is -- is both unnecessary and wrong, because it would cause the -- clauses to be chained to themselves in the use clauses -- list of the scope stack entry. That in turn would cause - -- an endless loop from End_Use_Clauses upon sccope exit. + -- an endless loop from End_Use_Clauses upon scope exit. -- The parent is now fully visible. It may be a hidden open -- scope if we are currently compiling some child instance @@ -1383,7 +1383,7 @@ package body Sem_Ch7 is begin -- If the full view is a scalar type, the type is the anonymous -- base type, but the operation mentions the first subtype, so - -- check the signature againt the base type. + -- check the signature against the base type. if Base_Type (Etype (S)) = Base_Type (T) then return True; |