From 9b23b7defd5004f853329253ac96b4aabd7995b1 Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Wed, 2 Jan 2013 10:49:57 +0000 Subject: [PATCH] par_sco.adb, [...]: Minor reformatting. 2013-01-02 Robert Dewar * par_sco.adb, vms_data.ads: Minor reformatting. From-SVN: r194795 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/par_sco.adb | 7 ++++++- gcc/ada/vms_data.ads | 2 +- 3 files changed, 11 insertions(+), 2 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index fd9f0e6427a..d2c090dc4eb 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2013-01-02 Robert Dewar + + * par_sco.adb, vms_data.ads: Minor reformatting. + 2013-01-02 Thomas Quinot * par_sco.adb (Traverse_Declarations_Or_Statement): Function diff --git a/gcc/ada/par_sco.adb b/gcc/ada/par_sco.adb index d1361fdac12..059103f616a 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 96cace5bd96..ed6f1b5c4fc 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 " & -- 2.30.2