mirror/netcdf-c
2
0
Fork 0
mirror of https://github.com/Unidata/netcdf-c.git synced 2025-01-30 16:10:44 +08:00
Code Issues Packages Projects Releases Wiki Activity

temporary fix for parallel build problems

Browse Source
This commit is contained in:
Ed Hartnett 2018-05-08 14:43:04 -06:00
parent 51353ddc5e
commit 5072e634a4
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
libsrc4/nc4file.c
View File

@ -918,6 +918,8 @@ nc4_create_file(const char *path, int cmode, size_t initialsz, void* parameters,
#ifdef USE_PARALLEL4 #ifdef USE_PARALLEL4
NC_MPI_INFO* mpiinfo = NULL; NC_MPI_INFO* mpiinfo = NULL;
MPI_Comm comm;
MPI_Info info;
int comm_duped = 0; /* Whether the MPI Communicator was duplicated */ int comm_duped = 0; /* Whether the MPI Communicator was duplicated */
int info_duped = 0; /* Whether the MPI Info object was duplicated */ int info_duped = 0; /* Whether the MPI Info object was duplicated */
#endif /* !USE_PARALLEL4 */ #endif /* !USE_PARALLEL4 */
@ -940,8 +942,9 @@ nc4_create_file(const char *path, int cmode, size_t initialsz, void* parameters,
if (nc4_info->mem.inmemory && parameters) if (nc4_info->mem.inmemory && parameters)
nc4_info->mem.memio = *(NC_memio*)parameters; nc4_info->mem.memio = *(NC_memio*)parameters;
#ifdef USE_PARALLEL4 #ifdef USE_PARALLEL4
else if(parameters) { else if (parameters)
mpinfo = (NC_MPI_INFO *)parameters; {
mpiinfo = (NC_MPI_INFO *)parameters;
comm = mpiinfo->comm; comm = mpiinfo->comm;
info = mpiinfo->info; info = mpiinfo->info;
} }