Skip to content
Snippets Groups Projects
Commit 03882042 authored by Mark Allen's avatar Mark Allen Committed by Gilles Gouaillardet
Browse files

romio341: continuation of modernize MPICH 3.4.1 romio


The official mpich romio PRs I checked into included old-style
MPI calls, so those needed modernized same as an earlier
commit.  I do think both of the modernize PRs could be put
into mpich.

Signed-off-by: default avatarMark Allen <markalle@us.ibm.com>
parent 5c357ef1
No related branches found
No related tags found
No related merge requests found
......@@ -196,8 +196,8 @@ static int MPIOI_Type_block(int *array_of_gsizes, int dim, int ndims, int nprocs
if (mysize == 0)
*st_offset = 0;
MPI_Aint ex;
MPI_Type_extent(type_old, &ex);
MPI_Aint lb, ex;
MPI_Type_get_extent(type_old, &lb, &ex);
MPI_Datatype type_tmp;
MPI_Type_create_resized(*type_new, 0, array_of_gsizes[dim] * ex, &type_tmp);
MPI_Type_free(type_new);
......@@ -300,8 +300,8 @@ static int MPIOI_Type_cyclic(int *array_of_gsizes, int dim, int ndims, int nproc
if (local_size == 0)
*st_offset = 0;
MPI_Aint ex;
MPI_Type_extent(type_old, &ex);
MPI_Aint lb, ex;
MPI_Type_get_extent(type_old, &lb, &ex);
MPI_Type_create_resized(*type_new, 0, array_of_gsizes[dim] * ex, &type_tmp);
MPI_Type_free(type_new);
*type_new = type_tmp;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment