Fix a few missed cases with MPROBE and friends.
This commit was SVN r26116.
Этот коммит содержится в:
родитель
91b80630aa
Коммит
359c575345
@ -64,6 +64,7 @@ int MPI_Improbe(int source, int tag, MPI_Comm comm, int *flag,
|
|||||||
);
|
);
|
||||||
*message = &ompi_message_no_proc.message;
|
*message = &ompi_message_no_proc.message;
|
||||||
}
|
}
|
||||||
|
*flag = 1;
|
||||||
return MPI_SUCCESS;
|
return MPI_SUCCESS;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -59,6 +59,7 @@ int MPI_Imrecv(void *buf, int count, MPI_Datatype type,
|
|||||||
|
|
||||||
if (&ompi_message_no_proc.message == *message) {
|
if (&ompi_message_no_proc.message == *message) {
|
||||||
*request = &ompi_request_empty;
|
*request = &ompi_request_empty;
|
||||||
|
*message = MPI_MESSAGE_NULL;
|
||||||
return MPI_SUCCESS;
|
return MPI_SUCCESS;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -59,6 +59,7 @@ int MPI_Mrecv(void *buf, int count, MPI_Datatype type,
|
|||||||
|
|
||||||
if (&ompi_message_no_proc.message == *message) {
|
if (&ompi_message_no_proc.message == *message) {
|
||||||
*status = ompi_request_empty.req_status;
|
*status = ompi_request_empty.req_status;
|
||||||
|
*message = MPI_MESSAGE_NULL;
|
||||||
return MPI_SUCCESS;
|
return MPI_SUCCESS;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user