diff options
| author | Gary Dismukes <dismukes@adacore.com> | 2017-04-25 13:39:30 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2017-04-25 15:39:30 +0200 |
| commit | 178c3cba2df14a093537dbd9ffbf639510bd5b55 (patch) | |
| tree | fb7c934c2f23c92b7fd86a90f66e4d46048ac613 | |
| parent | 0f96fd143cd249110dcdeabea7fd8972b91b86c6 (diff) | |
| download | gcc-178c3cba2df14a093537dbd9ffbf639510bd5b55.zip gcc-178c3cba2df14a093537dbd9ffbf639510bd5b55.tar.gz gcc-178c3cba2df14a093537dbd9ffbf639510bd5b55.tar.bz2 | |
exp_util.adb, [...]: Minor reformatting.
2017-04-25 Gary Dismukes <dismukes@adacore.com>
* exp_util.adb, exp_util.ads, types.ads: Minor reformatting.
From-SVN: r247235
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/exp_util.adb | 2 | ||||
| -rw-r--r-- | gcc/ada/exp_util.ads | 2 | ||||
| -rw-r--r-- | gcc/ada/types.ads | 2 |
4 files changed, 7 insertions, 3 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 64d9ded..61b0f92 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2017-04-25 Gary Dismukes <dismukes@adacore.com> + + * exp_util.adb, exp_util.ads, types.ads: Minor reformatting. + 2017-04-25 Bob Duff <duff@adacore.com> * err_vars.ads, fmap.adb, fmap.ads, comperr.adb, fname-sf.adb, diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb index 414e9d7..a775600 100644 --- a/gcc/ada/exp_util.adb +++ b/gcc/ada/exp_util.adb @@ -5198,7 +5198,7 @@ package body Exp_Util is U_Typ : constant Entity_Id := Unique_Entity (Typ); function Search_Primitive_Calls (N : Node_Id) return Traverse_Result; - -- Search for non-dispatching calls to primitive functions of type Typ + -- Search for nondispatching calls to primitive functions of type Typ ---------------------------- -- Search_Primitive_Calls -- diff --git a/gcc/ada/exp_util.ads b/gcc/ada/exp_util.ads index 532cca7..4dc921a 100644 --- a/gcc/ada/exp_util.ads +++ b/gcc/ada/exp_util.ads @@ -559,7 +559,7 @@ package Exp_Util is function Expression_Contains_Primitives_Calls_Of (Expr : Node_Id; Typ : Entity_Id) return Boolean; - -- Return True if the expression Expr contains a non-dispatching call to a + -- Return True if the expression Expr contains a nondispatching call to a -- function which is a primitive of the tagged type Typ. function Finalize_Address (Typ : Entity_Id) return Entity_Id; diff --git a/gcc/ada/types.ads b/gcc/ada/types.ads index 6180541..1ae0f9b 100644 --- a/gcc/ada/types.ads +++ b/gcc/ada/types.ads @@ -220,7 +220,7 @@ package Types is -- Do not call this elsewhere. function "=" (X, Y : Source_Buffer_Ptr) return Boolean is abstract; - -- Make "=" abstract, to make sure noone calls it. Note that this makes + -- Make "=" abstract, to make sure no one calls it. Note that this makes -- "/=" abstract as well. Calls to "=" on Source_Buffer_Ptr are always -- wrong, because two different arrays allocated at two different addresses -- can have the same virtual origin. |