Skip to content

R
riscv-gcc-1
Commit 2fee86e6 by Steven G. Kargl Committed by Steven G. Kargl
Options

Fix dg-do directive. 

From-SVN: r97932
parent 5f115a4b
Showing with 5 additions and 0 deletions
gcc/testsuite/ChangeLog
2005--4-09 Steven G. Kargl <kargls@comcast.net> 2005--4-09 Steven G. Kargl <kargls@comcast.net>
* gfortran.dg/nint_1.f90: Fix dg-do directive
2005--4-09 Steven G. Kargl <kargls@comcast.net>
* gfortran.dg/nint_1.f90: New test. * gfortran.dg/nint_1.f90: New test.
2005-04-09 Thomas Koenig <Thomas.Koenig@online.de> 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
......
gcc/testsuite/gfortran.dg/nint_1.f90
! { dg-do run }
program nint_1 program nint_1
if (int(anint(8388609.0)) /= 8388609) call abort if (int(anint(8388609.0)) /= 8388609) call abort
if (int(anint(0.49999997)) /= 0) call abort if (int(anint(0.49999997)) /= 0) call abort
......
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