Changeset 1220 for XIOS/dev/branch_openmp/extern/src_ep_dev/ep_recv.cpp

Timestamp:

07/20/17 09:18:34 (7 years ago)

Author:

yushan

Message:

test_remap_omp tested on ADA except two fields

File:

• XIOS/dev/branch_openmp/extern/src_ep_dev/ep_recv.cpp (modified) (2 diffs)

XIOS/dev/branch_openmp/extern/src_ep_dev/ep_recv.cpp

@@ -88 +88 @@
     {
       EP_PendingRequests = new std::list< MPI_Request* >;
-      //printf("proc %d(%d) : EP_PendingRequests allocated, add = %p\n", dest_rank, world_rank, EP_PendingRequests);  
     }
 
@@ -95 +94 @@
 
     Request_Check();
-    //printf("proc %d(%d) : EP_PendingRequests insert one request, src = %d(%d), tag = %d(%d), size = %d; request add = %p\n", 
-    //        dest_rank, world_rank, EP_PendingRequests->back()->ep_src, request->ep_src, 
-    //        EP_PendingRequests->back()->ep_tag, request->ep_tag, 
-    //        EP_PendingRequests->size(), request);
-    
-    // check all EP_PendingRequests      
-    //for(std::list<MPI_Request* >::iterator it = EP_PendingRequests->begin(); it!=EP_PendingRequests->end(); )
-    //{
-    //if((*it)->type == 3) 
-    //{
-    //    EP_PendingRequests->erase(it);
-   //     it = EP_PendingRequests->begin();
-    //    continue;
-     // }
-        
-      //int probed = false;
-      //MPI_Message pending_message;
-      //MPI_Status pending_status;
-    
-      //MPI_Improbe((*it)->ep_src, (*it)->ep_tag, (*it)->comm, &probed, &pending_message, &pending_status);
-    
-      //if(probed) 
-      //{ 
-        //int count;
-        //MPI_Get_count(&pending_status, (*it)->ep_datatype, &count);
-        //MPI_Imrecv((*it)->buf, count, (*it)->ep_datatype, &pending_message, *it);
 
-        //EP_PendingRequests->erase(it);
-        //if(EP_PendingRequests->empty()) return 0;
-        
-        //it = EP_PendingRequests->begin();
-        //continue;
-     // }
-
-      //it++;
-   // }
-    
     return 0;
   }