From a2894e13b5df5e93f842393886f6f5cbfd3d49dd Mon Sep 17 00:00:00 2001 From: Albert Cheng Date: Sun, 8 Mar 1998 01:25:58 -0500 Subject: [svn-r312] MPI_File_open now uses the comm and info as specificied in the access_template, instead of COMM_WORLD and INFO_NULL as before. --- src/H5Fmpio.c | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/src/H5Fmpio.c b/src/H5Fmpio.c index c36500e..4f60c2c 100644 --- a/src/H5Fmpio.c +++ b/src/H5Fmpio.c @@ -27,8 +27,6 @@ * same file. * * H5F_mpio_open - * - should take MPI communicator and MPI info as parameters - * (currently uses MPI_COMM_WORLD and MPI_INFO_NULL) * - "unique" key treated same as in H5F_mpio_access * * H5F_mpio_read @@ -258,7 +256,7 @@ H5F_mpio_open(const char *name, const H5F_access_t *access_parms, uintn flags, if (flags&H5F_ACC_CREAT) mpi_amode |= MPI_MODE_CREATE; if (flags&H5F_ACC_EXCL) mpi_amode |= MPI_MODE_EXCL; - mpierr = MPI_File_open(MPI_COMM_WORLD, (char*)name, mpi_amode, MPI_INFO_NULL, &fh); + mpierr = MPI_File_open(access_parms->u.mpio.comm, (char*)name, mpi_amode, access_parms->u.mpio.info, &fh); if (mpierr != MPI_SUCCESS) { MPI_Error_string( mpierr, mpierrmsg, &msglen ); HRETURN_ERROR(H5E_IO, H5E_CANTOPENFILE, NULL, mpierrmsg ); -- cgit v0.12