Commit 6a890c58 by Gary Dismukes Committed by Pierre-Marie de Rodat

[Ada] Minor reformatting

2018-05-28  Gary Dismukes  <dismukes@adacore.com>

gcc/ada/

	* exp_ch3.adb: Minor reformatting

From-SVN: r260823
parent 341e0bb6
2018-05-28 Gary Dismukes <dismukes@adacore.com>
* exp_ch3.adb: Minor reformatting
2018-05-28 Justin Squirek <squirek@adacore.com> 2018-05-28 Justin Squirek <squirek@adacore.com>
* exp_ch3.adb * exp_ch3.adb
......
...@@ -1565,7 +1565,7 @@ package body Exp_Ch3 is ...@@ -1565,7 +1565,7 @@ package body Exp_Ch3 is
Append_To (Args, Append_To (Args,
New_Occurrence_Of (Standard_True, Loc)); New_Occurrence_Of (Standard_True, Loc));
-- Otherwise, we pass False to perform null excluding checks -- Otherwise, we pass False to perform null-excluding checks
else else
Append_To (Args, Append_To (Args,
...@@ -8666,10 +8666,10 @@ package body Exp_Ch3 is ...@@ -8666,10 +8666,10 @@ package body Exp_Ch3 is
Parameter_Type => New_Occurrence_Of (Standard_String, Loc))); Parameter_Type => New_Occurrence_Of (Standard_String, Loc)));
end if; end if;
-- Due to certain edge cases such as arrays with null excluding -- Due to certain edge cases such as arrays with null-excluding
-- components being built with the secondary stack it becomes necessary -- components being built with the secondary stack it becomes necessary
-- to add a formal to the Init_Proc which controls whether we raise -- to add a formal to the Init_Proc which controls whether we raise
-- constraint errors on generated calls for internal object -- Constraint_Errors on generated calls for internal object
-- declarations. -- declarations.
if Needs_Conditional_Null_Excluding_Check (Typ) then if Needs_Conditional_Null_Excluding_Check (Typ) then
......
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