summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLarry Knox <lrknox@hdfgroup.org>2020-04-16 20:13:40 (GMT)
committerLarry Knox <lrknox@hdfgroup.org>2020-04-16 20:13:40 (GMT)
commit2d574a6439f11a7ecdaafb9d542595ecc21cd2bf (patch)
treebbd6715ff2ad684a2dfb371bf17a6f250cfbb222
parentaf0d9b562766030498e967e102520c6dc39a39e6 (diff)
parentae6467dee4932133a5fed4b1317c48c4376ccda9 (diff)
downloadhdf5-2d574a6439f11a7ecdaafb9d542595ecc21cd2bf.zip
hdf5-2d574a6439f11a7ecdaafb9d542595ecc21cd2bf.tar.gz
hdf5-2d574a6439f11a7ecdaafb9d542595ecc21cd2bf.tar.bz2
Merge pull request #2520 in HDFFV/hdf5 from ~LRKNOX/hdf5_lrk:hdf5_1_10 to hdf5_1_10
* commit 'ae6467dee4932133a5fed4b1317c48c4376ccda9': Parallel Fortran tests now use the MPI module instead of including mpif.h.
-rw-r--r--fortran/testpar/hyper.f903
-rw-r--r--fortran/testpar/mdset.f903
2 files changed, 4 insertions, 2 deletions
diff --git a/fortran/testpar/hyper.f90 b/fortran/testpar/hyper.f90
index 22f641d..c07636f 100644
--- a/fortran/testpar/hyper.f90
+++ b/fortran/testpar/hyper.f90
@@ -18,9 +18,10 @@
SUBROUTINE hyper(length,do_collective,do_chunk, mpi_size, mpi_rank, nerrors)
USE HDF5
+ USE MPI
USE TH5_MISC
+
IMPLICIT NONE
- INCLUDE 'mpif.h'
INTEGER, INTENT(in) :: length ! array length
LOGICAL, INTENT(in) :: do_collective ! use collective I/O
diff --git a/fortran/testpar/mdset.f90 b/fortran/testpar/mdset.f90
index 70d2939..3de61c3 100644
--- a/fortran/testpar/mdset.f90
+++ b/fortran/testpar/mdset.f90
@@ -18,9 +18,10 @@
SUBROUTINE multiple_dset_write(length, do_collective, do_chunk, mpi_size, mpi_rank, nerrors)
USE HDF5
+ USE MPI
USE TH5_MISC
+
IMPLICIT NONE
- INCLUDE 'mpif.h'
INTEGER, INTENT(in) :: length ! array length
LOGICAL, INTENT(in) :: do_collective ! use collective I/O