From: charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Mon, 17 Aug 2009 09:52:27 +0000 (+0000)
Subject: 2009-08-17  Thomas Quinot  <quinot@adacore.com>
X-Git-Url: http://git.sourceforge.jp/view?p=pf3gnuchains%2Fgcc-fork.git;a=commitdiff_plain;h=7183c9a219d9afd9fb960dc4a722020374e5dfaf

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.



git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@150830 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index a8cc86b4770..963d30719d3 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -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>
 
 	* exp_ch3.adb (Build_Discriminant_Formals): If the discriminals already
diff --git a/gcc/ada/sysdep.c b/gcc/ada/sysdep.c
index 6019fd9cf91..608246e2530 100644
--- a/gcc/ada/sysdep.c
+++ b/gcc/ada/sysdep.c
@@ -913,7 +913,7 @@ __gnat_localtime_tzoff (const time_t *timer, long *off)
     /* Correct the offset if Daylight Saving Time is in effect */
 
     if (tp.tm_isdst > 0)
-      *off = *off - 3600;
+      *off = *off + 3600;
   }
 
   (*Unlock_Task) ();
diff --git a/gcc/ada/tbuild.adb b/gcc/ada/tbuild.adb
index 7273fde6703..52f6fbf17a1 100644
--- a/gcc/ada/tbuild.adb
+++ b/gcc/ada/tbuild.adb
@@ -446,8 +446,7 @@ package body Tbuild is
       Related_Node : Node_Id := Empty) return Node_Id
    is
       Temp : constant Node_Id :=
-               Make_Defining_Identifier (Loc,
-                 Chars => New_Internal_Name (Id));
+               Make_Defining_Identifier (Loc, Chars => New_Internal_Name (Id));
    begin
       Set_Related_Expression (Temp, Related_Node);
       return Temp;