diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2018-07-17 08:09:59 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2018-07-17 08:09:59 +0000 |
| commit | 123483ca18f7d6d0c5b28230e826a44a7cf4f111 (patch) | |
| tree | 16600aee398cf8d1a7a055883fc5a629d4675f3a /gcc | |
| parent | 3a09e0260a6ed1b8e16f6b2eaa29ec5bf51d1e61 (diff) | |
| download | gcc-123483ca18f7d6d0c5b28230e826a44a7cf4f111.zip gcc-123483ca18f7d6d0c5b28230e826a44a7cf4f111.tar.gz gcc-123483ca18f7d6d0c5b28230e826a44a7cf4f111.tar.bz2 | |
[Ada] Remove extra parentheses in Expand_Inlined_Call
2018-07-17 Piotr Trojanek <trojanek@adacore.com>
gcc/ada/
* inline.adb (Expand_Inlined_Call): Remove extra parentheses.
From-SVN: r262791
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/inline.adb | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index d078d6b..189605a 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2018-07-17 Piotr Trojanek <trojanek@adacore.com> + + * inline.adb (Expand_Inlined_Call): Remove extra parentheses. + 2018-07-17 Eric Botcazou <ebotcazou@adacore.com> * exp_disp.adb (Gen_Parameters_Profile): Make the _Init parameter an diff --git a/gcc/ada/inline.adb b/gcc/ada/inline.adb index b425094..8f0b75d 100644 --- a/gcc/ada/inline.adb +++ b/gcc/ada/inline.adb @@ -3295,8 +3295,8 @@ package body Inline is and then Ekind (F) /= E_Out_Parameter and then not Same_Type (Etype (F), Etype (A)) then - pragma Assert (not (Is_By_Reference_Type (Etype (A)))); - pragma Assert (not (Is_Limited_Type (Etype (A)))); + pragma Assert (not Is_By_Reference_Type (Etype (A))); + pragma Assert (not Is_Limited_Type (Etype (A))); Append_To (Decls, Make_Object_Declaration (Loc, |