Browse Source

mpi reduction: re-initialise local data after sending its value for a reduction

Nathalie Furmento 12 years ago
parent
commit
e03cd3d9f9
1 changed files with 4 additions and 0 deletions
  1. 4 0
      mpi/src/starpu_mpi_insert_task.c

+ 4 - 0
mpi/src/starpu_mpi_insert_task.c

@@ -748,6 +748,9 @@ void starpu_mpi_redux_data(MPI_Comm comm, starpu_data_handle_t data_handle)
 		{
 			if (i != rank)
 			{
+#ifdef STARPU_DEVEL
+#warning liberer new_handle
+#endif
 				starpu_data_handle_t new_handle;
 
 				starpu_data_register_same(&new_handle, data_handle);
@@ -766,5 +769,6 @@ void starpu_mpi_redux_data(MPI_Comm comm, starpu_data_handle_t data_handle)
 	{
 		_STARPU_MPI_DEBUG("Sending redux handle to %d ...\n", rank);
 		starpu_mpi_isend_detached(data_handle, rank, tag, comm, NULL, NULL);
+		starpu_insert_task(data_handle->init_cl, STARPU_W, data_handle, 0);
 	}
 }