diff options
Diffstat (limited to 'gcc/ada/sem_aggr.adb')
| -rw-r--r-- | gcc/ada/sem_aggr.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_aggr.adb b/gcc/ada/sem_aggr.adb index e66d15b3a5e..1d75a3c75a9 100644 --- a/gcc/ada/sem_aggr.adb +++ b/gcc/ada/sem_aggr.adb @@ -3577,7 +3577,7 @@ package body Sem_Aggr is -- for the rest, if other components are present. -- The type of the aggregate is the known subtype of -- the component. The capture of discriminants must - -- be recursive because subcomponents may be contrained + -- be recursive because subcomponents may be constrained -- (transitively) by discriminants of enclosing types. -- For a private type with discriminants, a call to the -- initialization procedure will be generated, and no |