1 /* 2 * Copyright (c) 2018 DataDirect Networks. All rights reserved. 3 * $COPYRIGHT$ 4 * 5 * Additional copyrights may follow 6 * 7 * $HEADER$ 8 */ 9 10 #include "ime_native.h" 11 12 #include "ompi_config.h" 13 #include "fs_ime.h" 14 15 #include "mpi.h" 16 #include "ompi/constants.h" 17 #include "ompi/mca/fs/fs.h" 18 19 int mca_fs_ime_file_sync (ompio_file_t *fh) 20 { 21 int ret; 22 23 /* reset errno */ 24 errno = 0; 25 26 ret = ime_native_fsync(fh->fd); 27 if (ret != 0) { 28 return mca_fs_ime_get_mpi_err(errno); 29 } 30 31 return OMPI_SUCCESS; 32 }