fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-07 07:04:57 +00:00
Code Issues Packages Projects Releases Wiki Activity

Improve fake MPI by always setting to 0 the return code

Browse Source
This commit is contained in:
Salvatore Filippone
2021-04-15 08:58:44 -04:00
parent c768785541
commit 7c8a911b91
1 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
base/modules/fakempi.c
+14 -4
View File
@@ -117,20 +117,30 @@ double mpi_wtime()
}
void mpi_wait()
void mpi_wait(int *request, int* status, int *ierr)
{
*ierr = 0;
return;
}
void mpi_send()
void mpi_send(void* buf, int* count, int* datatype,
int *dest, int *tag, int *comm, int *ierr)
{
*ierr = 0;
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;
}
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;
}