diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-11-20 11:47:23 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-11-20 11:47:23 +0100 |
| commit | 58b81ab059d8963e7b867bf67424714d88f1da94 (patch) | |
| tree | 27df60533d5cf70b00dc7fc5615ceb165f9bd3b9 /gcc/ada/exp_ch4.adb | |
| parent | 6654786e8fcc06afd500494533b0400138241b98 (diff) | |
| download | gcc-58b81ab059d8963e7b867bf67424714d88f1da94.zip gcc-58b81ab059d8963e7b867bf67424714d88f1da94.tar.gz gcc-58b81ab059d8963e7b867bf67424714d88f1da94.tar.bz2 | |
Minor reformatting.
From-SVN: r217833
Diffstat (limited to 'gcc/ada/exp_ch4.adb')
| -rw-r--r-- | gcc/ada/exp_ch4.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb index ca58e47..0cceea1 100644 --- a/gcc/ada/exp_ch4.adb +++ b/gcc/ada/exp_ch4.adb @@ -10623,7 +10623,8 @@ package body Exp_Ch4 is -- Ada 2005 (AI-251): Handle interface type conversion if Is_Interface (Actual_Op_Typ) - or else Is_Interface (Actual_Targ_Typ) + or else + Is_Interface (Actual_Targ_Typ) then Expand_Interface_Conversion (N); goto Done; |