Skip to content

R
riscv-gcc-1
Commit 8dcd4256 by Paul Brook Committed by Paul Brook
Options

* gfortran.fortran-torture/execute/specfics.f90: Use correct typing. 

From-SVN: r83751
parent 59d4a500
Showing with 5 additions and 0 deletions
gcc/testsuite/ChangeLog
2004-06-27 Paul Brook <paul@codesourcery.com>
* gfortran.fortran-torture/execute/specfics.f90: Use correct typing.
2004-06-27 Zack Weinberg <zack@codesourcery.com> 2004-06-27 Zack Weinberg <zack@codesourcery.com>
* g++.old-deja/g++.mike/p7325.C: Remove. * g++.old-deja/g++.mike/p7325.C: Remove.
......
gcc/testsuite/gfortran.fortran-torture/execute/specifics.f90
...@@ -52,6 +52,7 @@ end function ...@@ -52,6 +52,7 @@ end function
end subroutine end subroutine
subroutine test_dprod(fn) subroutine test_dprod(fn)
double precision fn
if (abs (fn (2.0, 3.0) - 6d0) .gt. 0.00001) call abort if (abs (fn (2.0, 3.0) - 6d0) .gt. 0.00001) call abort
end subroutine end subroutine
......
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