Improve fake MPI by always setting to 0 the return code

maint-3.7.0
Salvatore Filippone 4 years ago
parent c768785541
commit 7c8a911b91

@ -117,20 +117,30 @@ double mpi_wtime()
} }
void mpi_wait() void mpi_wait(int *request, int* status, int *ierr)
{ {
*ierr = 0;
return; return;
} }
void mpi_send() void mpi_send(void* buf, int* count, int* datatype,
int *dest, int *tag, int *comm, int *ierr)
{ {
*ierr = 0;
return; return;
} }
void mpi_isend() void mpi_isend(void* buf, int* count, int* datatype,
int *dest, int *tag, int *comm, int *request,
int *ierr)
{ {
*ierr = 0;
return; return;
} }
void mpi_irecv() void mpi_irecv(void* buf, int* count, int* datatype,
int *src, int *tag, int *comm, int *request,
int *ierr)
{ {
*ierr = 0;
return; return;
} }

Loading…
Cancel
Save