Browse Source

mpi/examples/comm: free communicator

Nathalie Furmento 10 years ago
parent
commit
af3b3a07d4
2 changed files with 2 additions and 0 deletions
  1. 1 0
      mpi/examples/comm/comm.c
  2. 1 0
      mpi/examples/comm/mix_comm.c

+ 1 - 0
mpi/examples/comm/comm.c

@@ -134,6 +134,7 @@ int main(int argc, char **argv)
 
 
 	starpu_mpi_shutdown();
 	starpu_mpi_shutdown();
 	starpu_shutdown();
 	starpu_shutdown();
+	MPI_Comm_free(&newcomm);
         MPI_Finalize();
         MPI_Finalize();
 	return 0;
 	return 0;
 }
 }

+ 1 - 0
mpi/examples/comm/mix_comm.c

@@ -170,6 +170,7 @@ int main(int argc, char **argv)
 
 
 	starpu_mpi_shutdown();
 	starpu_mpi_shutdown();
 	starpu_shutdown();
 	starpu_shutdown();
+	MPI_Comm_free(&newcomm);
         MPI_Finalize();
         MPI_Finalize();
 	return 0;
 	return 0;
 }
 }