prj-ext.adb (Initialize_Project_Path): New procedure that initialize the default...
authorVincent Celier <celier@adacore.com>
Fri, 6 Apr 2007 09:25:16 +0000 (11:25 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 6 Apr 2007 09:25:16 +0000 (11:25 +0200)
commit2f41ec1a8fe5eab706ed223ab468de003d1995f0
tree47b104101e9f0a4d83635f8e134fc642ba236db6
parent874a0341c8306d74db689405040a4bc4f550085a
prj-ext.adb (Initialize_Project_Path): New procedure that initialize the default project path...

2007-04-06  Vincent Celier  <celier@adacore.com>

* prj-ext.adb (Initialize_Project_Path): New procedure that initialize
the default project path, initially done during elaboration of the
package.
If the prefix returned by Sdefault is null, get the prefix from a call
to Executable_Prefix_Path.
(Project_Path): Call Initialize_Project_Path if Current_Project_Path is
null.

* prj-nmsc.adb (Get_Path_Names_And_Record_Sources): Use the non
canonical directory name to open the directory from which files are
retrieved.
(Record_Other_Sources): Idem.
(Locate_Directory): Add the possibility to create automatically missing
directories when Setup_Projects is True.
Call Locate_Directory so that the directory will be created when
Setup_Projects is True, for object dir, library dir, library ALI dir,
library source copy dir and exec dir.

* prj-pp.adb (Max_Line_Length): Set to 255 for compatibility with older
versions of GNAT.

From-SVN: r123589
gcc/ada/prj-ext.adb
gcc/ada/prj-nmsc.adb
gcc/ada/prj-pp.adb