* gfortran.fortran-torture/execute/specfics.f90: Use correct typing.
From-SVN: r83751
This commit is contained in:
parent
59d4a5007e
commit
8dcd4256ba
2 changed files with 5 additions and 0 deletions
|
@ -1,3 +1,7 @@
|
|||
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>
|
||||
|
||||
* g++.old-deja/g++.mike/p7325.C: Remove.
|
||||
|
|
|
@ -52,6 +52,7 @@ end function
|
|||
end subroutine
|
||||
|
||||
subroutine test_dprod(fn)
|
||||
double precision fn
|
||||
if (abs (fn (2.0, 3.0) - 6d0) .gt. 0.00001) call abort
|
||||
end subroutine
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue