diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-04-26 10:03:51 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-04-26 10:03:51 +0000 |
| commit | ce3e25d6edfed11b4266bc498e10bb55a862c16c (patch) | |
| tree | 20024bd520d431dd71ac643a761e5474d7c9b85b /gcc/ada/sysdep.c | |
| parent | 75f7f24d5106a2573e253697999f1924c57cd5d1 (diff) | |
2012-04-26 Hristian Kirtchev <kirtchev@adacore.com>
* sem_ch5.adb (Analyze_Loop_Parameter_Specification): Do not freeze
the loop variable while preanalyzing a quantified expression.
2012-04-26 Hristian Kirtchev <kirtchev@adacore.com>
* a-calend.adb (Split, Time_Of): Rename parameter Is_Ada_05
to Use_TZ to better illustrate its function. Update all
references to the parameter.
(To_Ada_Time): Update the call to Formatting_Operations.Time_Of.
* a-calend.ads (Split, Time_Of): Rename parameter Is_Ada_05
to Use_TZ to better illustrate its function. Update the related
comment on usage.
* a-calend-vms.adb (Split, Time_Of): Rename parameter
Is_Ada_05 to Use_TZ to better illustrate its function. Update
all references to the parameter.
(To_Ada_Time): Update the call to Formatting_Operations.Time_Of.
* a-calend-vms.ads (Split, Time_Of): Rename parameter Is_Ada_05
to Use_TZ to better illustrate its function. Update the related
comment on usage.
* a-calfor.adb (Split, Time_Of): Update the call to
Formatting_Operations.Time_Of.
* sysdep.c (__gnat_localtime_tzoff): Dereference pointer
"is_historic" and rewrite the check as a comparison. Add a
comment on flag values.
2012-04-26 Robert Dewar <dewar@adacore.com>
* exp_ch2.adb, sem_ch8.adb: Minor reformatting.
2012-04-26 Vasiliy Fofanov <fofanov@adacore.com>
* a-stzunb-shared.adb, gnat_ugn.texi, a-strunb-shared.adb,
a-strunb-shared.ads, uintp.adb, a-stwiun-shared.adb,
a-stwiun-shared.ads, a-cbhama.ads, vms_data.ads, a-cobove.adb,
a-convec.adb, sem_ch13.adb, a-cbhase.ads: Fix common misuses of the
word "then" where "than" should be used in English.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@186871 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sysdep.c')
| -rw-r--r-- | gcc/ada/sysdep.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/sysdep.c b/gcc/ada/sysdep.c index 61e934f4ba6..ee31840d8d6 100644 --- a/gcc/ada/sysdep.c +++ b/gcc/ada/sysdep.c @@ -665,9 +665,11 @@ __gnat_localtime_tzoff (const time_t *timer, const int *is_historic, long *off) tzi_status = GetTimeZoneInformation (&tzi); /* Processing for RTX targets or cases where we simply want to extract the - offset of the current time zone, regardless of the date. */ + offset of the current time zone, regardless of the date. A value of "0" + for flag "is_historic" signifies that the date is NOT historic, see the + body of Ada.Calendar.UTC_Time_Offset. */ - if (rtx_active || !is_historic) { + if (rtx_active || *is_historic == 0) { *off = tzi.Bias; /* The system is operating in the range covered by the StandardDate |