OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[multiple changes] 

2009-08-17  Thomas Quinot  <quinot@adacore.com>

	* tbuild.adb: Minor reformatting

2009-08-17  Hristian Kirtchev  <kirtchev@adacore.com>

	* sysdep.c (__gnat_localtime_tzoff): Complete previous change.

From-SVN: r150830
This commit is contained in:
Arnaud Charlet 2009-08-17 11:52:27 +02:00
parent 579fab006f
commit 1def9494ac
3 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gcc/ada/ChangeLog
View File

@ -1,3 +1,12 @@
2009-08-17 Arnaud Charlet <charlet@adacore.com>
* make.adb (Process_Multilib, Scan_Make_Arg): Refine previous change
and ignore -mieee switch to avoid spawning an extra gcc in this case.
2009-08-17 Thomas Quinot <quinot@adacore.com>
* tbuild.adb: Minor reformatting
2009-08-17 Ed Schonberg <schonberg@adacore.com> 2009-08-17 Ed Schonberg <schonberg@adacore.com>
* exp_ch3.adb (Build_Discriminant_Formals): If the discriminals already * exp_ch3.adb (Build_Discriminant_Formals): If the discriminals already

2
gcc/ada/sysdep.c
View File

@ -913,7 +913,7 @@ __gnat_localtime_tzoff (const time_t *timer, long *off)
/* Correct the offset if Daylight Saving Time is in effect */ /* Correct the offset if Daylight Saving Time is in effect */
if (tp.tm_isdst > 0) if (tp.tm_isdst > 0)
*off = *off - 3600; *off = *off + 3600;
} }
(*Unlock_Task) (); (*Unlock_Task) ();

3
gcc/ada/tbuild.adb
View File

@ -446,8 +446,7 @@ package body Tbuild is
Related_Node : Node_Id := Empty) return Node_Id Related_Node : Node_Id := Empty) return Node_Id
is is
Temp : constant Node_Id := Temp : constant Node_Id :=
Make_Defining_Identifier (Loc, Make_Defining_Identifier (Loc, Chars => New_Internal_Name (Id));
Chars => New_Internal_Name (Id));
begin begin
Set_Related_Expression (Temp, Related_Node); Set_Related_Expression (Temp, Related_Node);
return Temp; return Temp;