소스 검색

mpi/src/starpu_mpi_insert_task.c: unregister temporary data used to receive local contribution when no longer needed

Nathalie Furmento 13 년 전
부모
커밋
3ed7456956
1개의 변경된 파일4개의 추가작업 그리고 6개의 파일을 삭제
  1. 4 6
      mpi/src/starpu_mpi_insert_task.c

+ 4 - 6
mpi/src/starpu_mpi_insert_task.c

@@ -748,9 +748,6 @@ 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);
@@ -759,9 +756,10 @@ void starpu_mpi_redux_data(MPI_Comm comm, starpu_data_handle_t data_handle)
 
 				starpu_mpi_irecv_detached(new_handle, i, tag, comm, NULL, NULL);
 				starpu_insert_task(data_handle->redux_cl,
-						STARPU_RW, data_handle,
-						STARPU_R, new_handle,
-						0);
+						   STARPU_RW, data_handle,
+						   STARPU_R, new_handle,
+						   0);
+				starpu_data_unregister_submit(new_handle);
 			}
 		}
 	}