procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Tolerate half-hour timezones.

Browse source 
From-SVN: r162705
This commit is contained in:
Alan Modra 2010-07-30 16:26:17 +09:30 • committed by Alan Modra
parent 2d0540e5d1
commit 009ba7f5a3
3 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View file

@ -1,3 +1,8 @@
2010-07-30 Alan Modra <amodra@gmail.com>
* gfortran.dg/ltime_gmtime_1.f90: Tolerate half-hour timezones.
* gfortran.dg/ltime_gmtime_2.f90: Likewise.
2010-07-29 Tobias Burnus <burnus@net-b.de>
PR fortran/45087

2
gcc/testsuite/gfortran.dg/ltime_gmtime_1.f90
View file

@ -5,5 +5,5 @@
t = time()
call ltime(t,x)
call gmtime(t,y)
if (x(1) /= y(1) .or. x(2) /= y(2)) call abort
if (x(1) /= y(1) .or. mod(x(2),30) /= mod(y(2),30)) call abort
end

2
gcc/testsuite/gfortran.dg/ltime_gmtime_2.f90
View file

@ -5,5 +5,5 @@
t = time()
call ltime(t,x)
call gmtime(t,y)
if (x(1) /= y(1) .or. x(2) /= y(2)) call abort
if (x(1) /= y(1) .or. mod(x(2),30) /= mod(y(2),30)) call abort
end