Skip to content

R
riscv-gcc-1
Commit 009ba7f5 by Alan Modra Committed by Alan Modra
Options

Tolerate half-hour timezones. 

From-SVN: r162705
parent 2d0540e5
Showing with 7 additions and 2 deletions
gcc/testsuite/ChangeLog
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> 2010-07-29 Tobias Burnus <burnus@net-b.de>
PR fortran/45087 PR fortran/45087
......
gcc/testsuite/gfortran.dg/ltime_gmtime_1.f90
...@@ -5,5 +5,5 @@ ...@@ -5,5 +5,5 @@
t = time() t = time()
call ltime(t,x) call ltime(t,x)
call gmtime(t,y) 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 end
gcc/testsuite/gfortran.dg/ltime_gmtime_2.f90
...@@ -5,5 +5,5 @@ ...@@ -5,5 +5,5 @@
t = time() t = time()
call ltime(t,x) call ltime(t,x)
call gmtime(t,y) 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 end
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment