diff options
author | Hristian Kirtchev <kirtchev@adacore.com> | 2018-07-16 14:12:28 +0000 |
---|---|---|
committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-07-16 14:12:28 +0000 |
commit | 400ad4e950bcd8f0940990ea558b1227d8930285 (patch) | |
tree | 34c990bf91315fc62636fc041e795b493a1d3a69 /gcc/ada/sem.adb | |
parent | 4af4c79a53886d0807f187f23e066fe4f0265897 (diff) | |
download | gcc-400ad4e950bcd8f0940990ea558b1227d8930285.zip gcc-400ad4e950bcd8f0940990ea558b1227d8930285.tar.gz gcc-400ad4e950bcd8f0940990ea558b1227d8930285.tar.bz2 |
[Ada] Minor reformatting
2018-07-16 Hristian Kirtchev <kirtchev@adacore.com>
gcc/ada/
* einfo.adb, exp_ch7.adb, exp_ch9.adb, exp_unst.adb, inline.adb,
sem.adb, sem_ch12.adb, sem_ch13.adb, sem_ch3.adb, sem_eval.adb,
sem_util.adb: Minor reformatting.
From-SVN: r262730
Diffstat (limited to 'gcc/ada/sem.adb')
-rw-r--r-- | gcc/ada/sem.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/sem.adb b/gcc/ada/sem.adb index b80dfcf..7fbf7bd 100644 --- a/gcc/ada/sem.adb +++ b/gcc/ada/sem.adb @@ -2180,6 +2180,7 @@ package body Sem is function Is_Subunit_Of_Main (U : Node_Id) return Boolean is Lib : Node_Id; + begin if Present (U) and then Nkind (Unit (U)) = N_Subunit then Lib := Library_Unit (U); |