mirror of
https://github.com/Unidata/netcdf-c.git
synced 2025-02-17 16:50:18 +08:00
change to use Wei-kings' solution
This commit is contained in:
parent
ea9d685a7b
commit
d9b60fef03
@ -221,12 +221,13 @@ main(int argc, char **argv)
|
||||
MPE_Log_event(e_close, 0, "end close file");
|
||||
#endif /* USE_MPE */
|
||||
|
||||
MPI_Barrier(MPI_COMM_WORLD);
|
||||
if (mpi_rank == 0)
|
||||
remove(file_name);
|
||||
|
||||
/* Shut down MPI. */
|
||||
MPI_Finalize();
|
||||
|
||||
/* Delete this large file. */
|
||||
remove(file_name);
|
||||
|
||||
#ifdef DEBUG
|
||||
if (!mpi_rank)
|
||||
{
|
||||
|
Loading…
Reference in New Issue
Block a user