diff options
author | Gary Dismukes <dismukes@adacore.com> | 2019-12-13 14:20:56 -0500 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-02 04:58:08 -0400 |
commit | 6618a9b67ca825c92d0cdd88df8c81bdf58de90c (patch) | |
tree | 2db72e3f30397393b0b3f85ccc2b7da782f2a11b /gcc/ada | |
parent | 663091bc782563d7d9adc8b09e58afbac3656d13 (diff) | |
download | gcc-6618a9b67ca825c92d0cdd88df8c81bdf58de90c.zip gcc-6618a9b67ca825c92d0cdd88df8c81bdf58de90c.tar.gz gcc-6618a9b67ca825c92d0cdd88df8c81bdf58de90c.tar.bz2 |
[Ada] Two typo fixes
2020-06-02 Gary Dismukes <dismukes@adacore.com>
gcc/ada/
* sem_ch3.adb: Two typo fixes.
Diffstat (limited to 'gcc/ada')
-rw-r--r-- | gcc/ada/sem_ch3.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb index 3fa2dd8..c57be77 100644 --- a/gcc/ada/sem_ch3.adb +++ b/gcc/ada/sem_ch3.adb @@ -662,8 +662,8 @@ package body Sem_Ch3 is -- first create the list of components for the derived type from that of -- the parent by means of Inherit_Components and then build a copy of the -- declaration tree of the parent with the help of the mapping returned by - -- Inherit_Components, which will for example by used to validate record - -- representation claused given for the derived type. If the parent type + -- Inherit_Components, which will for example be used to validate record + -- representation clauses given for the derived type. If the parent type -- is private and has discriminants, the ancestor discriminants used in the -- inheritance are that of the private declaration, whereas the ancestor -- discriminants present in the declaration tree of the parent are that of |