Changeset 1527 for XIOS/dev/branch_openmp/extern/ep_dev/ep_test.cpp
- Timestamp:
- 06/08/18 15:59:53 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS/dev/branch_openmp/extern/ep_dev/ep_test.cpp
r1522 r1527 25 25 { 26 26 printf("MPI_Test : Error in request type\n"); 27 28 27 exit(1); 29 28 } … … 39 38 40 39 ::MPI_Status mpi_status; 41 42 43 40 ::MPI_Test(to_mpi_request_ptr(*request), flag, &mpi_status); 44 41 … … 51 48 status->ep_datatype = (*request)->ep_datatype; 52 49 53 (*request)->state = 2;50 //(*request)->state = 2; 54 51 55 52 memcheck("delete "<< (*request)->mpi_request << " : in ep_lib::MPI_Test, delete (*request)->mpi_request"); … … 61 58 62 59 return Request_Check(); 63 64 60 } 65 61 … … 101 97 array_of_statuses[i].ep_datatype = array_of_requests[i]->ep_datatype; 102 98 103 array_of_requests[i]->state = 2;99 //array_of_requests[i]->state = 2; 104 100 105 101 memcheck("delete "<< array_of_requests[i]->mpi_request <<" : in ep_lib::MPI_Testall, array_of_requests["<<i<<"]->mpi_request"); … … 109 105 110 106 } 111 112 107 } 113 108 114 109 return Request_Check(); 115 116 110 } 117 111
Note: See TracChangeset
for help on using the changeset viewer.