aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorGary Dismukes <dismukes@adacore.com>2017-04-25 13:39:30 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2017-04-25 15:39:30 +0200
commit178c3cba2df14a093537dbd9ffbf639510bd5b55 (patch)
treefb7c934c2f23c92b7fd86a90f66e4d46048ac613 /gcc
parent0f96fd143cd249110dcdeabea7fd8972b91b86c6 (diff)
downloadgcc-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
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/ChangeLog4
-rw-r--r--gcc/ada/exp_util.adb2
-rw-r--r--gcc/ada/exp_util.ads2
-rw-r--r--gcc/ada/types.ads2
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.