diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-03 09:30:45 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-03 09:30:45 +0000 |
commit | a6320c6507e6e4491a47bc359082e9e1acc7f66d (patch) | |
tree | ed25e8fbaa6ce83df1c7e3fb92cfeaa14e0cc829 /gcc/ada/prj-conf.adb | |
parent | 85c0927022511c14eccc3b9984d7b750922dedbc (diff) | |
download | gcc-a6320c6507e6e4491a47bc359082e9e1acc7f66d.tar.gz |
2011-08-03 Emmanuel Briot <briot@adacore.com>
* prj-proc.adb, prj.ads, makeutl.adb, makeutl.ads, prj-conf.adb,
prj-tree.adb, prj-tree.ads (Environment): new type.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177247 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/prj-conf.adb')
-rw-r--r-- | gcc/ada/prj-conf.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/prj-conf.adb b/gcc/ada/prj-conf.adb index 8a0a749a9cd..de25dce40fb 100644 --- a/gcc/ada/prj-conf.adb +++ b/gcc/ada/prj-conf.adb @@ -573,6 +573,7 @@ package body Prj.Conf is (Project : Project_Id; Project_Tree : Project_Tree_Ref; Project_Node_Tree : Prj.Tree.Project_Node_Tree_Ref; + Env : Prj.Tree.Environment; Allow_Automatic_Generation : Boolean; Config_File_Name : String := ""; Autoconf_Specified : Boolean; @@ -1061,7 +1062,7 @@ package body Prj.Conf is Config_Project_Node : Project_Node_Id := Empty_Node; begin - pragma Assert (Prj.Env.Is_Initialized (Project_Node_Tree.Project_Path)); + pragma Assert (Prj.Env.Is_Initialized (Env.Project_Path)); Free (Config_File_Path); Config := No_Project; |