diff options
author | Piotr Trojanek <trojanek@adacore.com> | 2021-06-11 16:01:36 +0200 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-07-09 12:35:28 +0000 |
commit | 06fd120d19d2636a812c9ffe4b8871f3733ae213 (patch) | |
tree | 306f3361e2b22d83e6cd8d8e219cdfbbbab975ac | |
parent | 90635a37c2d0e0468c3599398c5f8eeecf596f93 (diff) | |
download | gcc-06fd120d19d2636a812c9ffe4b8871f3733ae213.zip gcc-06fd120d19d2636a812c9ffe4b8871f3733ae213.tar.gz gcc-06fd120d19d2636a812c9ffe4b8871f3733ae213.tar.bz2 |
[Ada] Fix typo in comment related to derived discriminated types
gcc/ada/
* exp_util.ads (Map_Types): Fix typo.
-rw-r--r-- | gcc/ada/exp_util.ads | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_util.ads b/gcc/ada/exp_util.ads index 3be0166..5c931c9 100644 --- a/gcc/ada/exp_util.ads +++ b/gcc/ada/exp_util.ads @@ -915,7 +915,7 @@ package Exp_Util is -- Establish the following mapping between the attributes of tagged parent -- type Parent_Type and tagged derived type Derived_Type. -- - -- * Map each discriminant of Parent_Type to ether the corresponding + -- * Map each discriminant of Parent_Type to either the corresponding -- discriminant of Derived_Type or come constraint. -- * Map each primitive operation of Parent_Type to the corresponding |