Browse Source

starpu mpi: add a request type for the wait and test requests (debug purposes)

Nathalie Furmento 14 years ago
parent
commit
fe3ffcccfb
2 changed files with 6 additions and 2 deletions
  1. 4 2
      mpi/starpu_mpi.c
  2. 2 0
      mpi/starpu_mpi_private.h

+ 4 - 2
mpi/starpu_mpi.c

@@ -277,7 +277,8 @@ int starpu_mpi_wait(starpu_mpi_req *public_req, MPI_Status *status)
 	waiting_req.status = status;
 	waiting_req.other_request = req;
 	waiting_req.func = starpu_mpi_wait_func;
-	
+        waiting_req.request_type = WAIT_REQ;
+
 	submit_mpi_req(&waiting_req);
 
 	/* We wait for the MPI request to finish */
@@ -346,7 +347,8 @@ int starpu_mpi_test(starpu_mpi_req *public_req, int *flag, MPI_Status *status)
 		testing_req.other_request = req;
 		testing_req.func = starpu_mpi_test_func;
 		testing_req.completed = 0;
-		
+                testing_req.request_type = TEST_REQ;
+
 		submit_mpi_req(&testing_req);
 	
 		/* We wait for the test request to finish */

+ 2 - 0
mpi/starpu_mpi_private.h

@@ -27,6 +27,8 @@
 
 #define SEND_REQ	0
 #define RECV_REQ	1
+#define WAIT_REQ        2
+#define TEST_REQ        3
 
 LIST_TYPE(starpu_mpi_req,
 	/* description of the data at StarPU level */