diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-01-04 09:24:06 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-01-04 09:24:06 +0000 |
| commit | 3fe69e2dbe9bb4480fe0aecfdc136d9597bbb251 (patch) | |
| tree | 7b01870ca42247e84f967c8350dc07e04f494cfd /gcc/ada/prj-conf.ads | |
| parent | 93de1beb79e19d20b0161f960db061870c86f70c (diff) | |
| download | gcc-3fe69e2dbe9bb4480fe0aecfdc136d9597bbb251.tar.gz | |
2013-01-04 Pascal Obry <obry@adacore.com>
* prj-nmsc.adb: Minor reformatting.
2013-01-04 Vincent Celier <celier@adacore.com>
* makeutl.ads (Root_Environment): New variable, moved rom
gprbuild (Load_Standard_Base): New Boolean variable, moved
from gprbuild.
* prj-conf.adb (Check_Builder_Switches): New procedure to check
for switch --RTS in package Builder. If a runtime specified
by --RTS is a relative path name, but not a base name, then
find the path on the Project Search Path.
(Do_Autoconf): Call Check_Builder_Switches.
(Locate_Runtime): New procedure, moved from gprbuild, to get the
absolute paths of runtimes when they are not specified as a base name.
* prj-conf.ads (Locate_Runtime): New procedure, moved from gprbuild.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@194893 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/prj-conf.ads')
| -rw-r--r-- | gcc/ada/prj-conf.ads | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/gcc/ada/prj-conf.ads b/gcc/ada/prj-conf.ads index bc672cf868c..f283c6ed2b3 100644 --- a/gcc/ada/prj-conf.ads +++ b/gcc/ada/prj-conf.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 2006-2011, Free Software Foundation, Inc. -- +-- Copyright (C) 2006-2012, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -189,4 +189,12 @@ package Prj.Conf is function Runtime_Name_Set_For (Language : Name_Id) return Boolean; -- Returns True only if Set_Runtime_For has been called for the Language + procedure Locate_Runtime + (Language : Name_Id; + Project_Tree : Prj.Project_Tree_Ref); + -- If RTS_Name is a base name (a name without path separator), then + -- do nothing. Otherwise, convert it to an absolute path (possibly by + -- searching it in the project path) and call Set_Runtime_For with the + -- absolute path. Fail the program if the path does not exist. + end Prj.Conf; |