diff options
| author | Javier Miranda <miranda@adacore.com> | 2008-08-04 14:51:10 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-08-04 14:51:10 +0200 |
| commit | bb98fe758e60c8c1055548c9be932ba265f59671 (patch) | |
| tree | dd157aa5b06c98019b1044357df7727b64619412 | |
| parent | 9fa33291c780a0d1d3bef0c0aa4650fa6829ade3 (diff) | |
| download | gcc-bb98fe758e60c8c1055548c9be932ba265f59671.zip gcc-bb98fe758e60c8c1055548c9be932ba265f59671.tar.gz gcc-bb98fe758e60c8c1055548c9be932ba265f59671.tar.bz2 | |
sem_eval.adb (Subtypes_Statically_Match): Remove superfluous patch added in previous patch to handle access to subprograms.
2008-08-04 Javier Miranda <miranda@adacore.com>
* sem_eval.adb (Subtypes_Statically_Match): Remove superfluous patch
added in previous patch to handle access to subprograms.
From-SVN: r138616
| -rw-r--r-- | gcc/ada/sem_eval.adb | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/gcc/ada/sem_eval.adb b/gcc/ada/sem_eval.adb index ea4f769..d806791 100644 --- a/gcc/ada/sem_eval.adb +++ b/gcc/ada/sem_eval.adb @@ -4388,12 +4388,7 @@ package body Sem_Eval is return Subtype_Conformant (Designated_Type (T1), - Designated_Type (T2)) - - -- Convention check required to cover protected subprograms - - and then Convention (Designated_Type (T1)) = - Convention (Designated_Type (T2)); + Designated_Type (T2)); else return Subtypes_Statically_Match |