diff options
| author | Mohamad Chaarawi <chaarawi@hdfgroup.org> | 2014-08-05 15:36:38 (GMT) |
|---|---|---|
| committer | Mohamad Chaarawi <chaarawi@hdfgroup.org> | 2014-08-05 15:36:38 (GMT) |
| commit | 7433fb9dc11ded216e3428d504c7531e387570a0 (patch) | |
| tree | baa0776bbdc5aa734cffc5a8b0d9fea6b149f4f6 /src/H5Dmpio.c | |
| parent | a72cb6e43e74c4aab0ce64017a306b6594288566 (diff) | |
| download | hdf5-7433fb9dc11ded216e3428d504c7531e387570a0.zip hdf5-7433fb9dc11ded216e3428d504c7531e387570a0.tar.gz hdf5-7433fb9dc11ded216e3428d504c7531e387570a0.tar.bz2 | |
[svn-r25514] Replace MPI deprecated routines with undeprecated ones.
Diffstat (limited to 'src/H5Dmpio.c')
| -rw-r--r-- | src/H5Dmpio.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/H5Dmpio.c b/src/H5Dmpio.c index 3e380a4..cbb3c4a 100644 --- a/src/H5Dmpio.c +++ b/src/H5Dmpio.c @@ -994,15 +994,15 @@ if(H5DEBUG(D)) } /* end for */ /* Create final MPI derived datatype for the file */ - if(MPI_SUCCESS != (mpi_code = MPI_Type_struct((int)num_chunk, chunk_mpi_file_counts, chunk_disp_array, chunk_ftype, &chunk_final_ftype))) - HMPI_GOTO_ERROR(FAIL, "MPI_Type_struct failed", mpi_code) + if(MPI_SUCCESS != (mpi_code = MPI_Type_create_struct((int)num_chunk, chunk_mpi_file_counts, chunk_disp_array, chunk_ftype, &chunk_final_ftype))) + HMPI_GOTO_ERROR(FAIL, "MPI_Type_create_struct failed", mpi_code) if(MPI_SUCCESS != (mpi_code = MPI_Type_commit(&chunk_final_ftype))) HMPI_GOTO_ERROR(FAIL, "MPI_Type_commit failed", mpi_code) chunk_final_ftype_is_derived = TRUE; /* Create final MPI derived datatype for memory */ - if(MPI_SUCCESS != (mpi_code = MPI_Type_struct((int)num_chunk, chunk_mpi_mem_counts, chunk_mem_disp_array, chunk_mtype, &chunk_final_mtype))) - HMPI_GOTO_ERROR(FAIL, "MPI_Type_struct failed", mpi_code) + if(MPI_SUCCESS != (mpi_code = MPI_Type_create_struct((int)num_chunk, chunk_mpi_mem_counts, chunk_mem_disp_array, chunk_mtype, &chunk_final_mtype))) + HMPI_GOTO_ERROR(FAIL, "MPI_Type_create_struct failed", mpi_code) if(MPI_SUCCESS != (mpi_code = MPI_Type_commit(&chunk_final_mtype))) HMPI_GOTO_ERROR(FAIL, "MPI_Type_commit failed", mpi_code) chunk_final_mtype_is_derived = TRUE; |