[multiple changes]

2012-01-23  Robert Dewar  <dewar@adacore.com>

	* s-utf_32.adb: Minor reformatting.

2012-01-23  Vincent Celier  <celier@adacore.com>

	* snames.ads-tmpl: Minor comment addition Indicate that
	Name_Library_Encapsulated_Options is only used in gprbuild.

From-SVN: r183411

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 1cca2ee384e16828fccc217e0c66b6a444ae01d4..dd8d3dcc9551533a5488df50bdfca7d90d165468 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,12 @@
+2012-01-23  Robert Dewar  <dewar@adacore.com>
+
+       * s-utf_32.adb: Minor reformatting.
+
+2012-01-23  Vincent Celier  <celier@adacore.com>
+
+       * snames.ads-tmpl: Minor comment addition Indicate that
+       Name_Library_Encapsulated_Options is only used in gprbuild.
+
 2012-01-23  Robert Dewar  <dewar@adacore.com>
 
        * sem_ch10.adb (Analyze_Subunit): Properly save/restore cunit

diff --git a/gcc/ada/s-utf_32.adb b/gcc/ada/s-utf_32.adb
index 676d0e3ccc9bea4bccd750f2d466c97a4d86e016..4bf10558a816b0e74fe01b52ebe5430f50a121bd 100755 (executable)
--- a/gcc/ada/s-utf_32.adb
+++ b/gcc/ada/s-utf_32.adb
@@ -32,7 +32,8 @@
 pragma Compiler_Unit;
 
 pragma Style_Checks (Off);
---  Allow long lines in this unit
+--  Allow long lines in this unit. Note this could be more specific, but we
+--  keep this simple form because of bootstrap constraints ???
 
 --  pragma Warnings (Off, "non-static constant in preelaborated unit");
 --  We need this to be pure, and the three constants in question are not a

diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl
index f40d0f2d24c28b455b89d03c96139c498d2b5691..6afd6c3799a6790f91f798ee792b6f4e9e27a479 100644 (file)
--- a/gcc/ada/snames.ads-tmpl
+++ b/gcc/ada/snames.ads-tmpl
@@ -145,6 +145,7 @@ package Snames is
    Name_Post                           : constant Name_Id := N + $;
    Name_Pre                            : constant Name_Id := N + $;
    Name_Static_Predicate               : constant Name_Id := N + $;
+   Name_Synchronization                : constant Name_Id := N + $;
    Name_Type_Invariant                 : constant Name_Id := N + $;
 
    --  Some special names used by the expander. Note that the lower case u's
@@ -1161,7 +1162,7 @@ package Snames is
    Name_Library_Partial_Linker             : constant Name_Id := N + $;
    Name_Library_Reference_Symbol_File      : constant Name_Id := N + $;
    Name_Library_Standalone                 : constant Name_Id := N + $;
-   Name_Library_Encapsulated_Options       : constant Name_Id := N + $;
+   Name_Library_Encapsulated_Options       : constant Name_Id := N + $; -- GB
    Name_Library_Encapsulated_Supported     : constant Name_Id := N + $; -- GB
    Name_Library_Src_Dir                    : constant Name_Id := N + $;
    Name_Library_Support                    : constant Name_Id := N + $;
@@ -1227,7 +1228,6 @@ package Snames is
    Name_Switches                           : constant Name_Id := N + $;
    Name_Symbolic_Link_Supported            : constant Name_Id := N + $;
    Name_Synchronize                        : constant Name_Id := N + $;
-   Name_Synchronization                    : constant Name_Id := N + $;
    Name_Toolchain_Description              : constant Name_Id := N + $;
    Name_Toolchain_Version                  : constant Name_Id := N + $;
    Name_Trailing_Required_Switches         : constant Name_Id := N + $;