diff options
Diffstat (limited to 'gcc/ada/sem_util.adb')
| -rw-r--r-- | gcc/ada/sem_util.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index c1d7581..fd7fbea 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -7345,8 +7345,8 @@ package body Sem_Util is begin return Has_Discriminants (Typ) and then Present (First_Discriminant (Typ)) - and then Present - (Discriminant_Default_Value (First_Discriminant (Typ))); + and then Present (Discriminant_Default_Value + (First_Discriminant (Typ))); end Has_Defaulted_Discriminants; ------------------- |