00001 /* -*- Mode: C; c-basic-offset:4 ; -*- */ 00002 /* 00003 * 00004 * Copyright (C) 1997 University of Chicago. 00005 * See COPYRIGHT notice in top-level directory. 00006 */ 00007 00008 #include "ad_pvfs2.h" 00009 00010 void ADIOI_PVFS2_Close(ADIO_File fd, int *error_code) 00011 { 00012 ADIOI_Free(fd->fs_ptr); 00013 fd->fs_ptr = NULL; 00014 /* PVFS2 doesn't have a 'close', but MPI-IO semantics dictate that we 00015 * ensure all data has been flushed. 00016 */ 00017 00018 /* At some point or another it was decided that ROMIO would not 00019 * explicitly flush (other than any local cache) on close, because 00020 * there is no way to *avoid* that overhead if you implement it here 00021 * and don't actually want it. 00022 */ 00023 00024 *error_code = MPI_SUCCESS; 00025 } 00026 /* 00027 * vim: ts=8 sts=4 sw=4 noexpandtab 00028 */
1.5.5