Changeset 1128 for XIOS/dev/branch_yushan/extern/src_ep_dev/ep_fortran.cpp

Timestamp:

05/11/17 16:12:23 (7 years ago)

Author:

yushan

Message:

log OK with threads

File:

• XIOS/dev/branch_yushan/extern/src_ep_dev/ep_fortran.cpp (modified) (2 diffs)

XIOS/dev/branch_yushan/extern/src_ep_dev/ep_fortran.cpp

@@ -31 +31 @@
       {
         fc_comm_map.insert(std::make_pair( std::make_pair( fint, omp_get_thread_num()) , comm));
-        printf("EP_Comm_c2f : MAP insert: %d, %d, %p\n", fint, omp_get_thread_num(), comm.ep_comm_ptr);
+        //printf("EP_Comm_c2f : MAP insert: %d, %d, %p\n", fint, omp_get_thread_num(), comm.ep_comm_ptr);
       }
     }
@@ -54 +54 @@
       MPI_Comm comm_ptr;
       comm_ptr = it->second;
-      printf("EP_Comm_f2c : MAP find: %d, %d, %p\n", it->first.first, it->first.second, comm_ptr.ep_comm_ptr);
+      //printf("EP_Comm_f2c : MAP find: %d, %d, %p\n", it->first.first, it->first.second, comm_ptr.ep_comm_ptr);
       return  comm_ptr;
     }