par_sco.adb, [...]: Minor reformatting.

2013-01-02  Robert Dewar  <dewar@adacore.com>

	* par_sco.adb, vms_data.ads: Minor reformatting.

From-SVN: r194795

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index fd9f0e6427af81fe093a5d3453e9192e1b4bfb13..d2c090dc4eba3fad8f0b3a5e1ec49964c149ec60 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2013-01-02  Robert Dewar  <dewar@adacore.com>
+
+       * par_sco.adb, vms_data.ads: Minor reformatting.
+
 2013-01-02  Thomas Quinot  <quinot@adacore.com>
 
        * par_sco.adb (Traverse_Declarations_Or_Statement): Function

diff --git a/gcc/ada/par_sco.adb b/gcc/ada/par_sco.adb
index d1361fdac12fbe93595e2c688b120a9954f67cac..059103f616aebd335a14447ae7738610a9b5df55 100644 (file)
--- a/gcc/ada/par_sco.adb
+++ b/gcc/ada/par_sco.adb
@@ -162,7 +162,12 @@ package body Par_SCO is
    --  last node with SCO in L.
 
    --  The following Traverse_* routines perform appropriate calls to
-   --  Traverse_Declarations_Or_Statements to traverse specific node kinds
+   --  Traverse_Declarations_Or_Statements to traverse specific node kinds.
+   --  Parameter D, when present, indicates the dominant of the first
+   --  declaration or statement within N.
+
+   --  Why is Traverse_Sync_Definition commented specificaly and
+   --   the others are not???
 
    procedure Traverse_Generic_Package_Declaration (N : Node_Id);
    procedure Traverse_Handled_Statement_Sequence

diff --git a/gcc/ada/vms_data.ads b/gcc/ada/vms_data.ads
index 96cace5bd9640c9d2dfb320dfb01692d53683801..ed6f1b5c4fc9df9f6aeefb99521112f07e600a6c 100644 (file)
--- a/gcc/ada/vms_data.ads
+++ b/gcc/ada/vms_data.ads
@@ -1429,7 +1429,7 @@ package VMS_Data is
                                              "-gnatec>";
    --        /CONFIGURATION_PRAGMAS_FILE=file
    --
-   --   Specify a configuration pragmas file that need to be taken into
+   --   Specify a configuration pragmas file that needs to be taken into
    --   account.
 
    S_GCC_Current : aliased constant S := "/CURRENT_DIRECTORY "             &