diff options
| author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-01-28 15:37:01 (GMT) |
|---|---|---|
| committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2015-01-28 15:37:01 (GMT) |
| commit | cc7cdaac59364de441582ac2f208fa7bf4ecc198 (patch) | |
| tree | d1a75a9c95cc893ea12df9e88b76042760536ade /m4 | |
| parent | 052638dbc8e010f500c83074b7237ea150ab8262 (diff) | |
| download | hdf5-cc7cdaac59364de441582ac2f208fa7bf4ecc198.zip hdf5-cc7cdaac59364de441582ac2f208fa7bf4ecc198.tar.gz hdf5-cc7cdaac59364de441582ac2f208fa7bf4ecc198.tar.bz2 | |
[svn-r26063] Fixed the wrong number of arguments being used for MPI_FILE_OPEN. Kept using include "mpif.h" since it is not going to be depriciated. But 'USE mpi' will work now that the API is correct.
Diffstat (limited to 'm4')
| -rw-r--r-- | m4/aclocal_fc.m4 | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/m4/aclocal_fc.m4 b/m4/aclocal_fc.m4 index 64c115a..b5e5cfa 100644 --- a/m4/aclocal_fc.m4 +++ b/m4/aclocal_fc.m4 @@ -268,9 +268,10 @@ dnl Try link a simple MPI program. AC_MSG_CHECKING([whether a simple MPI-IO Fortran program can be linked]) AC_LINK_IFELSE([ PROGRAM main - include "mpif.h" - INTEGER :: ierr - CALL mpi_file_open( ierr ) + include 'mpif.h' + INTEGER :: comm, amode, info, fh, ierror + CHARACTER(LEN=1) :: filename + CALL MPI_File_open( comm, filename, amode, info, fh, ierror) END], [AC_MSG_RESULT([yes])], [AC_MSG_RESULT([no]) |