Don't forget to release the temporary arrays used for converting
the datatypes from Fortran to C. This commit was SVN r19314.
Этот коммит содержится в:
родитель
2499112d1c
Коммит
6982e8ecbc
@ -98,5 +98,4 @@ void mpi_alltoallv_f(char *sendbuf, MPI_Fint *sendcounts, MPI_Fint *sdispls,
|
||||
OMPI_ARRAY_FINT_2_INT_CLEANUP(sdispls);
|
||||
OMPI_ARRAY_FINT_2_INT_CLEANUP(recvcounts);
|
||||
OMPI_ARRAY_FINT_2_INT_CLEANUP(rdispls);
|
||||
|
||||
}
|
||||
|
@ -106,4 +106,6 @@ void mpi_alltoallw_f(char *sendbuf, MPI_Fint *sendcounts,
|
||||
OMPI_ARRAY_FINT_2_INT_CLEANUP(sdispls);
|
||||
OMPI_ARRAY_FINT_2_INT_CLEANUP(recvcounts);
|
||||
OMPI_ARRAY_FINT_2_INT_CLEANUP(rdispls);
|
||||
free(c_sendtypes);
|
||||
free(c_recvtypes);
|
||||
}
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user