diff options
| author | Robert Dewar <dewar@adacore.com> | 2013-01-02 10:49:57 +0000 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-01-02 11:49:57 +0100 |
| commit | 9b23b7defd5004f853329253ac96b4aabd7995b1 (patch) | |
| tree | 2ce87de58cb11f13938297617c1d99f5b2730c79 | |
| parent | dd2d73a747b1e0ba00d9f1aa79be5ac8b087d6ce (diff) | |
| download | gcc-9b23b7defd5004f853329253ac96b4aabd7995b1.zip gcc-9b23b7defd5004f853329253ac96b4aabd7995b1.tar.gz gcc-9b23b7defd5004f853329253ac96b4aabd7995b1.tar.bz2 | |
par_sco.adb, [...]: Minor reformatting.
2013-01-02 Robert Dewar <dewar@adacore.com>
* par_sco.adb, vms_data.ads: Minor reformatting.
From-SVN: r194795
| -rw-r--r-- | gcc/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/ada/par_sco.adb | 7 | ||||
| -rw-r--r-- | gcc/ada/vms_data.ads | 2 |
3 files changed, 11 insertions, 2 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index fd9f0e6..d2c090d 100644 --- 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 d1361fd..059103f 100644 --- 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 96cace5..ed6f1b5 100644 --- 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 " & |