mirror of
https://github.com/fverdugo/XM_40017.git
synced 2025-11-24 01:14:31 +01:00
Merge pull request #72 from jvdtoorn/fix/mpi_collectives-deadlock-comm_dup
This commit is contained in:
@@ -771,9 +771,11 @@
|
||||
" rank = MPI.Comm_rank(comm)\n",
|
||||
" if rank == 2\n",
|
||||
" sndbuf = [2]\n",
|
||||
" MPI.Send(sndbuf, comm2; dest=3, tag=0)\n",
|
||||
" req1 = MPI.Isend(sndbuf, comm2; dest=3, tag=0)\n",
|
||||
" sndbuf = [1]\n",
|
||||
" MPI.Send(sndbuf, comm; dest=3, tag=0)\n",
|
||||
" req2 = MPI.Isend(sndbuf, comm; dest=3, tag=0)\n",
|
||||
" MPI.Wait(req2)\n",
|
||||
" MPI.Wait(req1)\n",
|
||||
" end\n",
|
||||
" if rank == 3\n",
|
||||
" rcvbuf = zeros(Int,1)\n",
|
||||
|
||||
Reference in New Issue
Block a user