Skip to content

Commit facf8c5

Browse files
committed
pcollreq/mpif-h: fix MPIX_Alltoallw_init() binding
These issues were introduced in the recent commit b71af0e. This commit fixes Coverity CID 1451661 and 1451660. Though `c_info` part was an actual bug, the `c_sendtypes` part was not. Signed-off-by: KAWASHIMA Takahiro <[email protected]>
1 parent 5bd90ee commit facf8c5

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

ompi/mpiext/pcollreq/mpif-h/alltoallw_init_f.c

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -76,7 +76,7 @@ void ompix_alltoallw_init_f(char *sendbuf, MPI_Fint *sendcounts,
7676
MPI_Fint *comm, MPI_Fint *info, MPI_Fint *request, MPI_Fint *ierr)
7777
{
7878
MPI_Comm c_comm;
79-
MPI_Datatype *c_sendtypes, *c_recvtypes;
79+
MPI_Datatype *c_sendtypes = NULL, *c_recvtypes;
8080
MPI_Info c_info;
8181
MPI_Request c_request;
8282
int size, c_ierr;
@@ -86,6 +86,7 @@ void ompix_alltoallw_init_f(char *sendbuf, MPI_Fint *sendcounts,
8686
OMPI_ARRAY_NAME_DECL(rdispls);
8787

8888
c_comm = PMPI_Comm_f2c(*comm);
89+
c_info = PMPI_Info_f2c(*info);
8990
size = OMPI_COMM_IS_INTER(c_comm)?ompi_comm_remote_size(c_comm):ompi_comm_size(c_comm);
9091

9192
if (!OMPI_IS_FORTRAN_IN_PLACE(sendbuf)) {

0 commit comments

Comments
 (0)