Changeset 5625
- Timestamp:
- 10/29/09 16:57:00 (4 weeks ago)
- Location:
- mpich2/trunk/src/mpi/romio
- Files:
-
- 2 modified
-
adio/common/ad_end.c (modified) (1 diff)
-
mpi-io/close.c (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
mpich2/trunk/src/mpi/romio/adio/common/ad_end.c
r4026 r5625 17 17 18 18 /* FPRINTF(stderr, "reached end\n"); */ 19 20 /* if a default errhandler was set on MPI_FILE_NULL then we need to ensure 21 * that our reference to that errhandler is released */ 22 PMPI_File_set_errhandler(MPI_FILE_NULL, MPI_ERRORS_RETURN); 19 23 20 24 /* delete the flattened datatype list */ -
mpich2/trunk/src/mpi/romio/mpi-io/close.c
r5355 r5625 73 73 } 74 74 75 /* Because ROMIO expects the MPI library to provide error handler management 76 * routines but it doesn't ever participate in MPI_File_close, we have to 77 * somehow inform the MPI library that we no longer hold a reference to any 78 * user defined error handler. We do this by setting the errhandler at this 79 * point to MPI_ERRORS_RETURN. */ 80 error_code = PMPI_File_set_errhandler(*mpi_fh, MPI_ERRORS_RETURN); 81 if (error_code != MPI_SUCCESS) goto fn_fail; 82 75 83 ADIO_Close(fh, &error_code); 76 84 MPIO_File_free(mpi_fh);
