diff options
author | Piotr Trojanek <trojanek@adacore.com> | 2021-01-14 17:28:31 +0100 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-05-05 04:19:06 -0400 |
commit | d24ef4e60998f7f9f4fde52896af3afa42ec246c (patch) | |
tree | 4a6f41510fa3ba6fe380e83351f436616185aa76 /gcc/ada/sem_case.ads | |
parent | 8adc8d9b7c61f4ed9e349ebe9c091ce45e6978e4 (diff) | |
download | gcc-d24ef4e60998f7f9f4fde52896af3afa42ec246c.zip gcc-d24ef4e60998f7f9f4fde52896af3afa42ec246c.tar.gz gcc-d24ef4e60998f7f9f4fde52896af3afa42ec246c.tar.bz2 |
[Ada] Fix expansion of attributes Input/Output for unchecked union types
gcc/ada/
* exp_attr.adb (Expand_N_Attribute_Reference): Fix expansion of
attributes Input and Output for unchecked unions.
* sem_case.ads: Fix typo "disriminant" and refill comment.
Diffstat (limited to 'gcc/ada/sem_case.ads')
-rw-r--r-- | gcc/ada/sem_case.ads | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_case.ads b/gcc/ada/sem_case.ads index f939eb2..00b7dd3 100644 --- a/gcc/ada/sem_case.ads +++ b/gcc/ada/sem_case.ads @@ -44,8 +44,8 @@ -- till the freeze point in this case. -- 3. Set the Others_Discrete_Choices list for an others choice. This is --- used in various ways, e.g. to construct the disriminant checking function --- for the case of a variant with an others choice. +-- used in various ways, e.g. to construct the discriminant checking +-- function for the case of a variant with an others choice. -- 4. In the case of static predicates, we need to expand out choices that -- correspond to the predicate for the back end. This expansion destroys |