diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-08-04 15:16:24 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-08-04 15:16:24 +0200 |
commit | 6cf7eae6899491ba8759f8da6a86c8e27073d6f9 (patch) | |
tree | 73c1d8724a11d5b770c663c6bdccda7de328fbed /gcc/ada/g-calend.ads | |
parent | bc3c2eca1aa80b667f9e80773919755669d03e82 (diff) | |
download | gcc-6cf7eae6899491ba8759f8da6a86c8e27073d6f9.zip gcc-6cf7eae6899491ba8759f8da6a86c8e27073d6f9.tar.gz gcc-6cf7eae6899491ba8759f8da6a86c8e27073d6f9.tar.bz2 |
[multiple changes]
2014-08-04 Doug Rupp <rupp@adacore.com>
* g-calend.adb (timeval_to_duration, duration_to_timeval): Change sec
formal to long_long.
* g-calend.ads (timeval): Bump up size to accomodate sec type.
* s-taprop-linux.adb (timeval_to_duration): Change sec formal to
long_long
* s-osprim-posix.adb (timeval): Bump up size to accomodate
new sec type.
(timeval_to_duration): Change sec formal to Long_Long_Integer
* s-osinte-darwin.adb (timeval): Bump up
size to accomodate new sec type.
(timeval_to_duration): Change sec formal to long_long
* s-osinte-android.adb: Likewise.
* cal.c (__gnat_timeal_to_duration, __gnat_duration_to_timeval): Change
sec formal from long to long long.
2014-08-04 Robert Dewar <dewar@adacore.com>
* sem_res.adb (Resolve_Qualified_Expression): Make sure
Do_Range_Check flag gets set.
From-SVN: r213587
Diffstat (limited to 'gcc/ada/g-calend.ads')
-rw-r--r-- | gcc/ada/g-calend.ads | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/g-calend.ads b/gcc/ada/g-calend.ads index b1c5a40..4234061 100644 --- a/gcc/ada/g-calend.ads +++ b/gcc/ada/g-calend.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1999-2012, Free Software Foundation, Inc. -- +-- Copyright (C) 1999-2014, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -162,7 +162,7 @@ private -- This is a dummy declaration that should be the largest possible timeval -- structure of all supported targets. - type timeval is array (1 .. 2) of Interfaces.C.long; + type timeval is array (1 .. 3) of Interfaces.C.long; function Julian_Day (Year : Ada.Calendar.Year_Number; |