diff options
Diffstat (limited to 'gcc/ada/sem_cat.adb')
| -rw-r--r-- | gcc/ada/sem_cat.adb | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/gcc/ada/sem_cat.adb b/gcc/ada/sem_cat.adb index 9a65a05..04638aa 100644 --- a/gcc/ada/sem_cat.adb +++ b/gcc/ada/sem_cat.adb @@ -615,9 +615,7 @@ package body Sem_Cat is E := Current_Scope; loop - if Is_Subprogram (E) - or else - Is_Generic_Subprogram (E) + if Is_Subprogram_Or_Generic_Subprogram (E) or else Is_Concurrent_Type (E) then |