diff options
author | Quincey Koziol <koziol@hdfgroup.org> | 2013-09-06 20:27:13 (GMT) |
---|---|---|
committer | Quincey Koziol <koziol@hdfgroup.org> | 2013-09-06 20:27:13 (GMT) |
commit | f825256c876fdd8e2f92002f71ef96e43a24b2a1 (patch) | |
tree | 11767c391eb5813cc09d146519abdf97593d09cb /fortran/test/tH5F.f90 | |
parent | 79c8e26fa7d8bb3e3ab59e5a69ea37cc385748c0 (diff) | |
download | hdf5-f825256c876fdd8e2f92002f71ef96e43a24b2a1.zip hdf5-f825256c876fdd8e2f92002f71ef96e43a24b2a1.tar.gz hdf5-f825256c876fdd8e2f92002f71ef96e43a24b2a1.tar.bz2 |
[svn-r24113] Description:
Reduce warnings w/gfortran in FORTRAN build by declaring interface for
utility test routines.
Tested on:
Mac OSX/64 10.8.4 (amazon) w/gcc/g++/gfortran 4.8
Diffstat (limited to 'fortran/test/tH5F.f90')
-rw-r--r-- | fortran/test/tH5F.f90 | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/fortran/test/tH5F.f90 b/fortran/test/tH5F.f90 index d8f683c..75c8cd7 100644 --- a/fortran/test/tH5F.f90 +++ b/fortran/test/tH5F.f90 @@ -33,6 +33,8 @@ ! in the first file. SUBROUTINE mountingtest(cleanup, total_error) USE HDF5 ! This module contains all necessary modules + USE H5FORT_TESTS ! This module contains all test routines + IMPLICIT NONE LOGICAL, INTENT(IN) :: cleanup INTEGER, INTENT(OUT) :: total_error @@ -289,6 +291,7 @@ SUBROUTINE reopentest(cleanup, total_error) USE HDF5 ! This module contains all necessary modules + USE H5FORT_TESTS ! This module contains all test routines IMPLICIT NONE LOGICAL, INTENT(IN) :: cleanup INTEGER, INTENT(OUT) :: total_error @@ -474,7 +477,8 @@ ! created using the got property lists SUBROUTINE plisttest(cleanup, total_error) - USE HDF5 ! This module contains all necessary modules + USE HDF5 ! This module contains all necessary modules + USE H5FORT_TESTS ! This module contains all test routines IMPLICIT NONE LOGICAL, INTENT(IN) :: cleanup INTEGER, INTENT(OUT) :: total_error @@ -574,6 +578,7 @@ SUBROUTINE file_close(cleanup, total_error) USE HDF5 ! This module contains all necessary modules + USE H5FORT_TESTS ! This module contains all test routines IMPLICIT NONE LOGICAL, INTENT(IN) :: cleanup INTEGER, INTENT(OUT) :: total_error @@ -702,6 +707,7 @@ SUBROUTINE file_space(filename, cleanup, total_error) USE HDF5 ! This module contains all necessary modules + USE H5FORT_TESTS ! This module contains all test routines IMPLICIT NONE CHARACTER(*), INTENT(IN) :: filename LOGICAL, INTENT(IN) :: cleanup |