e960f79073
Adacore provides annual releases for its major GPL-licensed products. GPRBuild is an important tool, but it's source is only exposed once per year, in May. The 2014 release of GPRBuild relies on features in Adacore's commercial product, GNAT Pro, that has not yet been migrated to FSF GNAT. I had to patch 2014 to get it to build with FSF GNAT 4.9, losing minor new functionality in the process. My first decision was to simply skip GPRBuild 2014 stay on the 2013 version, but it turns out packages are already using the new features in gprinstall, one of the tools in the GPRBuild package. Tests on adabooch, aws, asis and opentoken indicate they build fine with GPRBuild 2014.
25 lines
1.1 KiB
Ada
25 lines
1.1 KiB
Ada
Set_File_Last_Modify_Time_Stamp has been added to GNAT.OS_Lib on GNAT Pro
|
|
but that hasn't made it to gcc 4.9 yet. For the moment, just disable the
|
|
set file timestamp functionality that it serves here.
|
|
|
|
--- src/gprslave.adb.orig 2014-04-17 09:50:17.000000000 +0000
|
|
+++ src/gprslave.adb
|
|
@@ -1261,17 +1261,8 @@ procedure Gprslave is
|
|
procedure Set_Stamp
|
|
(Path_Name : String; Time_Stamp : Time_Stamp_Type)
|
|
is
|
|
- TS : constant String := String (Time_Stamp);
|
|
begin
|
|
- Set_File_Last_Modify_Time_Stamp
|
|
- (Path_Name,
|
|
- GM_Time_Of
|
|
- (Year => Year_Type'Value (TS (1 .. 4)),
|
|
- Month => Month_Type'Value (TS (5 .. 6)),
|
|
- Day => Day_Type'Value (TS (7 .. 8)),
|
|
- Hour => Hour_Type'Value (TS (9 .. 10)),
|
|
- Minute => Minute_Type'Value (TS (11 .. 12)),
|
|
- Second => Second_Type'Value (TS (13 .. 14))));
|
|
+ pragma Unreferenced (Path_Name, Time_Stamp);
|
|
end Set_Stamp;
|
|
|
|
------------------
|