00001 /* -*- Mode: C; c-basic-offset:4 ; -*- */ 00002 /* 00003 * $Id$ 00004 * 00005 * Copyright (C) 1997 University of Chicago. 00006 * See COPYRIGHT notice in top-level directory. 00007 */ 00008 00009 #include "ad_sfs.h" 00010 00011 void ADIOI_SFS_Flush(ADIO_File fd, int *error_code) 00012 { 00013 #ifndef PRINT_ERR_MSG 00014 static char myname[] = "ADIOI_SFS_FLUSH"; 00015 #endif 00016 00017 /* there is no fsync on SX-4 */ 00018 #ifdef PRINT_ERR_MSG 00019 *error_code = MPI_ERR_UNKNOWN; 00020 #else 00021 *error_code = MPIR_Err_setmsg(MPI_ERR_UNSUPPORTED_OPERATION, 1, 00022 myname, (char *) 0, (char *) 0); 00023 ADIOI_Error(fd, *error_code, myname); 00024 #endif 00025 }
1.5.5