Skip to content

Commit f80b646

Browse files
committed
Fix deprecated MPI_Type_extent
- `MPI_Type_extent` --> `MPI_Type_get_extent` - Fixes #586
1 parent 7d07373 commit f80b646

File tree

2 files changed

+4
-4
lines changed

2 files changed

+4
-4
lines changed

src/mpi/mpi_caf.c

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -6989,8 +6989,8 @@ static void
69896989
redux_char_by_reference_adapter(void *invec, void *inoutvec, int *len,
69906990
MPI_Datatype *datatype)
69916991
{
6992-
MPI_Aint string_len;
6993-
MPI_Type_extent(*datatype, &string_len);
6992+
MPI_Aint lb, string_len;
6993+
MPI_Type_get_extent(*datatype, &lb, &string_len);
69946994
for (int i = 0; i < *len; i++)
69956995
{
69966996
/* The length of the result is fixed, i.e., no deferred string length is

src/openshmem/openshmem_caf.c

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -3094,8 +3094,8 @@ static void \
30943094
redux_char_by_reference_adapter (void *invec, void *inoutvec, int *len,
30953095
MPI_Datatype *datatype)
30963096
{
3097-
long int string_len;
3098-
MPI_Type_extent(*datatype, &string_len);
3097+
long int lb, string_len; // this should be MPI_Aint
3098+
MPI_Type_extent(*datatype, &lb, &string_len);
30993099
for(int i = 0; i < *len; i++)
31003100
{
31013101
/* The length of the result is fixed, i.e., no deferred string length is

0 commit comments

Comments
 (0)