Skip to content

R
riscv-gcc-1
Commit 123483ca by Piotr Trojanek Committed by Pierre-Marie de Rodat
Options

[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
parent 3a09e026
Showing with 6 additions and 2 deletions
gcc/ada/ChangeLog
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
......
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,
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment