diff options
author | Hristian Kirtchev <kirtchev@adacore.com> | 2019-07-11 08:02:03 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-07-11 08:02:03 +0000 |
commit | 29c64a0f6d13bf413cf338da23580e8a94ead23c (patch) | |
tree | 2d47c3d14a4bdfaf9484ead9543d20c175552d6c /gcc/ada/sem_ch8.adb | |
parent | bce6accb664712f2d046bad9566fee810b43fed6 (diff) | |
download | gcc-29c64a0f6d13bf413cf338da23580e8a94ead23c.zip gcc-29c64a0f6d13bf413cf338da23580e8a94ead23c.tar.gz gcc-29c64a0f6d13bf413cf338da23580e8a94ead23c.tar.bz2 |
[Ada] Minor reformatting
2019-07-11 Hristian Kirtchev <kirtchev@adacore.com>
gcc/ada/
* checks.adb, exp_ch6.adb, gnat1drv.adb, sem_aux.adb,
sem_ch2.adb, sem_ch8.adb, sem_res.adb: Minor reformatting.
From-SVN: r273388
Diffstat (limited to 'gcc/ada/sem_ch8.adb')
-rw-r--r-- | gcc/ada/sem_ch8.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch8.adb b/gcc/ada/sem_ch8.adb index 90b0c65..c9d6151 100644 --- a/gcc/ada/sem_ch8.adb +++ b/gcc/ada/sem_ch8.adb @@ -815,8 +815,7 @@ package body Sem_Ch8 is -- it does not apply to records with limited components, for which -- this syntactic flag is not set, but whose size is also fixed. - elsif (Is_Record_Type (Typ) - and then Is_Limited_Type (Typ)) + elsif (Is_Record_Type (Typ) and then Is_Limited_Type (Typ)) or else (Ekind (Typ) = E_Limited_Private_Type and then Has_Discriminants (Typ) |