diff options
| -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 ea4f769ea23..d8067915838 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 |