Commit 477eca00 by Arnaud Charlet

[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
parent 68716ad5
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> 2009-08-10 Robert Dewar <dewar@adacore.com>
* exp_ch7.adb: Add ??? comment for last change * exp_ch7.adb: Add ??? comment for last change
......
...@@ -21395,14 +21395,14 @@ a type with no parent and no progenitor, and otherwise as 1 + max of the ...@@ -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. depths of the immediate parent and immediate progenitors.
This rule does not flag private extension 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. declaration is checked.
This rule has the following (mandatory) parameter for the @option{+R} option: This rule has the following (mandatory) parameter for the @option{+R} option:
@table @emph @table @emph
@item N @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 hierarchy. If the rule parameter is set to -1, the rule flags all the declarations
of tagged and interface types. of tagged and interface types.
@end table @end table
...@@ -642,9 +642,7 @@ package body Prj.Env is ...@@ -642,9 +642,7 @@ package body Prj.Env is
end if; end if;
if not Status then if not Status then
Prj.Com.Fail Prj.Com.Fail ("unable to create temporary file");
("could not create temporary file " &
Get_Name_String (File_Name));
end if; end if;
end Write_Temp_File; end Write_Temp_File;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment