Changeset 1149 for XIOS/dev/branch_yushan_merged/src/io/netCdfInterface.cpp

Timestamp:

05/31/17 10:51:06 (7 years ago)

Author:

yushan

Message:

bug fixed in mpi_comm_split. Key needs to be specifify.

File:

• XIOS/dev/branch_yushan_merged/src/io/netCdfInterface.cpp (modified) (2 diffs)

XIOS/dev/branch_yushan_merged/src/io/netCdfInterface.cpp

@@ -128 +128 @@
 int CNetCdfInterface::close(int ncId)
 {
-  int status = nc_close(ncId);
+  int status = NC_NOERR;
+  //#pragma omp critical (_netcdf)
+  #pragma omp master
+  {
+  status = nc_close(ncId);
   if (NC_NOERR != status)
   {
@@ -139 +143 @@
     throw CNetCdfException(e);
   }
-
+  }
   return status;
 }