[Ada] Minor reformatting

2018-01-11  Bob Duff  <duff@adacore.com>

gcc/ada/

	* binderr.ads, namet.ads: Minor reformatting.

From-SVN: r256510

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 77f554e7273458328a848e2ff66e4575399734c8..77666f1d65cb9f186b7d71111da55059f9eb4a09 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2018-01-11  Bob Duff  <duff@adacore.com>
+
+       * binderr.ads, namet.ads: Minor reformatting.
+
 2018-01-11  Bob Duff  <duff@adacore.com>
 
        * doc/gnat_ugn/gnat_utility_programs.rst: Improve documentation of

diff --git a/gcc/ada/binderr.ads b/gcc/ada/binderr.ads
index a6434a0c22336455f81aa56a8e306cfc6ed90149..eba14a8fcc562dc051f854fbaff822de35e5e5b7 100644 (file)
--- a/gcc/ada/binderr.ads
+++ b/gcc/ada/binderr.ads
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 S p e c                                  --
 --                                                                          --
---          Copyright (C) 1992-2016, Free Software Foundation, Inc.         --
+--          Copyright (C) 1992-2017, Free Software Foundation, Inc.         --
 --                                                                          --
 -- GNAT is free software;  you can  redistribute it  and/or modify it under --
 -- terms of the  GNU General Public License as published  by the Free Soft- --
@@ -107,7 +107,7 @@ package Binderr is
    procedure Error_Msg (Msg : String);
    --  Output specified error message to standard error or standard output
    --  as governed by the brief and verbose switches, and update error
-   --  counts appropriately
+   --  counts appropriately.
 
    procedure Error_Msg_Info (Msg : String);
    --  Output information line. Indentical in effect to Error_Msg, except

diff --git a/gcc/ada/namet.ads b/gcc/ada/namet.ads
index b55d33617441a7ab045cfc51b3a70fb0d443ab3b..3f3b9ee62de2b4b3b7e83325e74963e0f3d2275f 100644 (file)
--- a/gcc/ada/namet.ads
+++ b/gcc/ada/namet.ads
@@ -193,7 +193,7 @@ package Namet is
    --  The special Name_Id value No_Name is used in the parser to indicate
    --  a situation where no name is present (e.g. on a loop or block).
 
-   Error_Name : constant Name_Id := Names_Low_Bound +  1;
+   Error_Name : constant Name_Id := Names_Low_Bound + 1;
    --  The special Name_Id value Error_Name is used in the parser to
    --  indicate that some kind of error was encountered in scanning out
    --  the relevant name, so it does not have a representable label.