Browse Source

Fix spurious MPI call outside MPI thread

Samuel Thibault 9 years ago
parent
commit
b2b17bb82f
1 changed files with 1 additions and 1 deletions
  1. 1 1
      mpi/src/starpu_mpi_cache.c

+ 1 - 1
mpi/src/starpu_mpi_cache.c

@@ -272,7 +272,7 @@ void starpu_mpi_cache_flush(MPI_Comm comm, starpu_data_handle_t data_handle)
 
 	_starpu_mpi_cache_flush(comm, data_handle);
 
-	MPI_Comm_rank(comm, &my_rank);
+	starpu_mpi_comm_rank(comm, &my_rank);
 	mpi_rank = starpu_mpi_data_get_rank(data_handle);
 	if (mpi_rank != my_rank && mpi_rank != -1)
 		starpu_data_invalidate_submit(data_handle);