[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.

1 files changed, 4 insertions, 3 deletions

diff --git a/configure b/configure
index 5fddb6f..a4952a2 100755
--- a/configure
+++ b/configure
@@ -27959,9 +27959,10 @@ $as_echo_n "checking whether a simple MPI-IO Fortran program can be linked... "
       cat > conftest.$ac_ext <<_ACEOF
 
           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
 _ACEOF
 if ac_fn_fc_try_link "$LINENO"; then :