aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/prj-pp.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-04-29 11:22:32 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-29 11:22:32 +0200
commit66713d62863188a9c2f64388043c1dc0213d6f98 (patch)
treebeaafba67917b53f8d130ea623f45ab511d739a3 /gcc/ada/prj-pp.ads
parent059caa3e91991b39866b6fa22bc69836ae9a9013 (diff)
downloadgcc-66713d62863188a9c2f64388043c1dc0213d6f98.zip
gcc-66713d62863188a9c2f64388043c1dc0213d6f98.tar.gz
gcc-66713d62863188a9c2f64388043c1dc0213d6f98.tar.bz2
[multiple changes]
2009-04-29 Bob Duff <duff@adacore.com> * exp_ch7.adb (Build_Final_List): For an access type that designates a Taft Amendment type, if the access type needs finalization, make sure the implicit with clause for List_Controller occurs on the package spec. * rtsfind.adb (Text_IO_Kludge): Fine tune the creation of implicit with's created for the pseudo-children of Text_IO and friends. In particular, avoid cycles, such as Ada.Wide_Text_IO.Integer_IO and Ada.Text_IO.Integer_IO both with-ing each other. * sem.adb (Walk_Library_Items): Suppress assertion failure in certain oddball cases when pragma Extend_System is used. * sem_ch12.adb (Get_Associated_Node): Prevent direct 'with' cycles in the case where a package spec instantiates a generic whose body with's this package, so Walk_Library_Items won't complain about cyclic with's. 2009-04-29 Emmanuel Briot <briot@adacore.com> * gnatcmd.adb, prj-proc.adb, make.adb, mlib-prj.adb, prj.adb, prj.ads, prj-pp.adb, prj-pp.ads, makeutl.adb, clean.adb, prj-nmsc.adb, mlib-tgt.adb, mlib-tgt.ads, prj-util.adb, prj-env.adb, prj-env.ads (Project_Id): now a real pointer to Project_Data, instead of an index into the Projects_Table. This simplifies the API significantly, avoiding extra lookups in this table and the need to pass the Project_Tree_Ref parameter in several cases From-SVN: r146931
Diffstat (limited to 'gcc/ada/prj-pp.ads')
-rw-r--r--gcc/ada/prj-pp.ads3
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/prj-pp.ads b/gcc/ada/prj-pp.ads
index 7d599f4..ac6c03d 100644
--- a/gcc/ada/prj-pp.ads
+++ b/gcc/ada/prj-pp.ads
@@ -53,8 +53,7 @@ package Prj.PP is
W_Eol : Write_Eol_Ap := null;
W_Str : Write_Str_Ap := null;
Backward_Compatibility : Boolean;
- Id : Prj.Project_Id := Prj.No_Project;
- Id_Tree : Prj.Project_Tree_Ref := null);
+ Id : Prj.Project_Id := Prj.No_Project);
-- Output a project file, using either the default output routines, or the
-- ones specified by W_Char, W_Eol and W_Str.
--