I have a simple MPI Program:
Main-function:
=================
MPI_Comm inter_comm;
MPI_Init(&argc, &argv);
...
MPI_Comm_spawn(APP, MPI_ARGV_NULL, 1, MPI_INFO_NULL, 0, MPI_COMM_SELF,
&inter_comm, &err);
MPI_Send(..., 0, 1, inter_comm);
...
MPI_Finalize();
The APP:
==================
MPI_Comm parent;
MPI_Status status;
MPI_Init(&argc, &argv);
...
MPI_Comm_get_parent(&parent);
MPI_Recv(..., MPI_ANY_SOURCE, MPI_ANY_TAG, parent, &status);
...
MPI_Finalize();
The size (MPI_Comm_size/MPI_Comm_remote_size) is one --> OK
The Problem is that I get the folloging error message and i don't
unterstand why:
MPI_Recv: process in local group is dead (rank 0, MPI_COMM_PARENT)
Rank (0, MPI_COMM_WORLD): Call stack within LAM:
Rank (0, MPI_COMM_WORLD): - MPI_Recv()
Rank (0, MPI_COMM_WORLD): - main()
Where and why is there a dead process ??
|
