Changeset 1461 for XIOS/dev/branch_openmp

Timestamp:

03/22/18 11:34:44 (6 years ago)

Author:

yushan

Message:

small modif

Location:

XIOS/dev/branch_openmp

Files:

• extern/src_ep_dev/ep_reduce.cpp (modified) (1 diff)
• src/server.cpp (modified) (1 diff)

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

@@ -246 +246 @@
       }
 
-      if(op == MPI_SUM)
+      if(op == MPI_LOR)
       {
         if(datatype != MPI_INT)

XIOS/dev/branch_openmp/src/server.cpp

@@ -710 +710 @@
          MPI_Intercomm_merge(contextInterComm,1,&inter);
          MPI_Barrier(inter);
-         MPI_Comm_free(&inter);
          context->initServer(intraComm,contextInterComm);
          contextInterComms.push_back(contextInterComm);
 
+         MPI_Comm_free(&inter);
        }
        // Secondary server: create communication channel with a primary server