[multiple changes]

2009-08-10  Vincent Celier  <celier@adacore.com>

	* prj-env.adb (Create_Config_Pragmas_File.Write_Temp_File): Do not use
	the temporary file name in the error message when the temporary file
	cannot be created.

2009-08-10  Yannick Moy  <moy@adacore.com>

	* gnat_ugn.texi: Fix typo

From-SVN: r150619

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index f4d02471f205e2c375d9f15412617d8e43663afb..18c5ab9cf305ed1e6c4ba78d36121238e96aeb6f 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,13 @@
+2009-08-10  Vincent Celier  <celier@adacore.com>
+
+       * prj-env.adb (Create_Config_Pragmas_File.Write_Temp_File): Do not use
+       the temporary file name in the error message when the temporary file
+       cannot be created.
+
+2009-08-10  Yannick Moy  <moy@adacore.com>
+
+       * gnat_ugn.texi: Fix typo
+
 2009-08-10  Robert Dewar  <dewar@adacore.com>
 
        * exp_ch7.adb: Add ??? comment for last change

diff --git a/gcc/ada/gnat_ugn.texi b/gcc/ada/gnat_ugn.texi
index 698162201637d034a58072c1abbd576b233540ae..97e5cf493016515b80d13da4f0ec312786fe0dba 100644 (file)
--- a/gcc/ada/gnat_ugn.texi
+++ b/gcc/ada/gnat_ugn.texi
@@ -21395,14 +21395,14 @@ a type  with no parent and no progenitor, and otherwise as 1 + max of the
 depths of the immediate parent and immediate progenitors.
 
 This rule does not flag private extension
-declarations. In the case of a private extension, the correspondong full
+declarations. In the case of a private extension, the corresponding full
 declaration is checked.
 
 This rule has the following (mandatory) parameter for the @option{+R} option:
 
 @table @emph
 @item N
-Integer not less then -1 specifying the maximal allowed depth of any inheritance
+Integer not less than -1 specifying the maximal allowed depth of any inheritance
 hierarchy. If the rule parameter is set to -1, the rule flags all the declarations
 of tagged and interface types.
 @end table

diff --git a/gcc/ada/prj-env.adb b/gcc/ada/prj-env.adb
index 392b356ee0d8be2ba5332d4d843e109eb72c12e3..166805210548de6a5601cfd1bc7d3ad91f802ac8 100644 (file)
--- a/gcc/ada/prj-env.adb
+++ b/gcc/ada/prj-env.adb
@@ -642,9 +642,7 @@ package body Prj.Env is
          end if;
 
          if not Status then
-            Prj.Com.Fail
-              ("could not create temporary file " &
-               Get_Name_String (File_Name));
+            Prj.Com.Fail ("unable to create temporary file");
          end if;
       end Write_Temp_File;