sinput.ads, [...]: Minor editing.
authorArnaud Charlet <charlet@adacore.com>
Wed, 27 Apr 2016 13:15:25 +0000 (13:15 +0000)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 27 Apr 2016 13:15:25 +0000 (15:15 +0200)
2016-04-27  Arnaud Charlet  <charlet@adacore.com>

* sinput.ads, a-cfdlli.adb, a-crbtgo.adb, a-chtgop.adb, a-cbhama.adb,
a-rbtgbo.adb, a-crdlli.adb, a-chtgbo.adb: Minor editing.

From-SVN: r235502

gcc/ada/ChangeLog
gcc/ada/a-cbhama.adb
gcc/ada/a-cfdlli.adb
gcc/ada/a-chtgbo.adb
gcc/ada/a-chtgop.adb
gcc/ada/a-crbtgo.adb
gcc/ada/a-crdlli.adb
gcc/ada/a-rbtgbo.adb
gcc/ada/sinput.ads

index 1e3b0450d7e96f2761d898acd5b9b4dd64163294..cdc9cb8d5bfbe603ccc4e9027dfbf076b7dd4e5a 100644 (file)
@@ -1,3 +1,8 @@
+2016-04-27  Arnaud Charlet  <charlet@adacore.com>
+
+       * sinput.ads, a-cfdlli.adb, a-crbtgo.adb, a-chtgop.adb, a-cbhama.adb,
+       a-rbtgbo.adb, a-crdlli.adb, a-chtgbo.adb: Minor editing.
+
 2016-04-27  Bob Duff  <duff@adacore.com>
 
        * a-chtgop.adb (Adjust): Zero the tampering counts on assignment,
index 86c57e737ad0787a22cf22599d95521215c163e0..02c190198e667f463cd8686652ecfb47b8944d49 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2004-2015, Free Software Foundation, Inc.         --
+--          Copyright (C) 2004-2016, 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- --
@@ -35,9 +35,9 @@ pragma Elaborate_All (Ada.Containers.Hash_Tables.Generic_Bounded_Keys);
 
 with Ada.Containers.Helpers; use Ada.Containers.Helpers;
 
-with Ada.Containers.Prime_Numbers;  use Ada.Containers.Prime_Numbers;
+with Ada.Containers.Prime_Numbers; use Ada.Containers.Prime_Numbers;
 
-with System;  use type System.Address;
+with System; use type System.Address;
 
 package body Ada.Containers.Bounded_Hashed_Maps is
 
index 6fed4cce00d00920fcf4a443ff9e8c0d61da00c9..a7322a1fff1c839136df5ad0a96fb56e520d882e 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2010-2015, Free Software Foundation, Inc.         --
+--          Copyright (C) 2010-2016, 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- --
@@ -25,7 +25,7 @@
 -- <http://www.gnu.org/licenses/>.                                          --
 ------------------------------------------------------------------------------
 
-with System;  use type System.Address;
+with System; use type System.Address;
 
 package body Ada.Containers.Formal_Doubly_Linked_Lists with
   SPARK_Mode => Off
index f4f7c1c237ed44aef3f61c00ba907b2a5b5a4fbe..034b5924894a11dc0ae600a2b857ff099381859f 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2004-2015, Free Software Foundation, Inc.         --
+--          Copyright (C) 2004-2016, 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- --
@@ -27,7 +27,7 @@
 -- This unit was originally developed by Matthew J Heaney.                  --
 ------------------------------------------------------------------------------
 
-with System;  use type System.Address;
+with System; use type System.Address;
 
 package body Ada.Containers.Hash_Tables.Generic_Bounded_Operations is
 
index bdf1c5b60ce4263c67482029a63f3dab04352183..53b564f976241cd9c070b26ab95a752a72b85e8d 100644 (file)
@@ -30,7 +30,7 @@
 with Ada.Containers.Prime_Numbers;
 with Ada.Unchecked_Deallocation;
 
-with System;  use type System.Address;
+with System; use type System.Address;
 
 package body Ada.Containers.Hash_Tables.Generic_Operations is
 
index 03079618792cf437e8bb2d4fb9d49e6a6614bca4..1843b78bf11b443a2a17e18ce4730da6e194f582 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2004-2015, Free Software Foundation, Inc.         --
+--          Copyright (C) 2004-2016, 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- --
@@ -34,7 +34,7 @@
 --     Publisher: The MIT Press (June 18, 1990)
 --     ISBN: 0262031418
 
-with System;  use type System.Address;
+with System; use type System.Address;
 
 package body Ada.Containers.Red_Black_Trees.Generic_Operations is
 
index 0c6f5dccbb7aba845fd7a716676601c7b805bc7d..f228ef0de4be292c4ce0a009c3ed2792e83d9c2d 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2004-2014, Free Software Foundation, Inc.         --
+--          Copyright (C) 2004-2016, 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- --
@@ -27,7 +27,7 @@
 -- This unit was originally developed by Matthew J Heaney.                  --
 ------------------------------------------------------------------------------
 
-with System;  use type System.Address;
+with System; use type System.Address;
 
 package body Ada.Containers.Restricted_Doubly_Linked_Lists is
 
index acf2ccb01c05db03e1edc4543cc6013109196238..8306399eb8a58c616a57555db181e1477bf67e94 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---          Copyright (C) 2004-2015, Free Software Foundation, Inc.         --
+--          Copyright (C) 2004-2016, 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- --
@@ -35,7 +35,7 @@
 --     Publisher: The MIT Press (June 18, 1990)
 --     ISBN: 0262031418
 
-with System;  use type System.Address;
+with System; use type System.Address;
 
 package body Ada.Containers.Red_Black_Trees.Generic_Bounded_Operations is
 
index 18bc1b1efdb110864987350155cdbe09a50f5076..24f1a68cf31337416080ad67dfa56646fc6c70c6 100644 (file)
@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 S p e c                                  --
 --                                                                          --
---          Copyright (C) 1992-2015, Free Software Foundation, Inc.         --
+--          Copyright (C) 1992-2016, 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- --
@@ -157,7 +157,7 @@ package Sinput is
    --  separate main units.
 
    --  The entries in the table are accessed using a Source_File_Index that
-   --  ranges from 1 to Last_Source_File. Each entry has the following fields
+   --  ranges from 1 to Last_Source_File. Each entry has the following fields.
 
    --  Note: fields marked read-only are set by Sinput or one of its child
    --  packages when a source file table entry is created, and cannot be
@@ -387,7 +387,7 @@ package Sinput is
 
    --  As described in Sem_Ch12, a generic instantiation involves making a
    --  copy of the tree of the generic template. The source locations in
-   --  this tree directly reference the source of the template. However it
+   --  this tree directly reference the source of the template. However, it
    --  is also possible to find the location of the instantiation.
 
    --  This is achieved as follows. When an instantiation occurs, a new entry