00001 /* -*- Mode: C; c-basic-offset:4 ; -*- */ 00002 /* 00003 * 00004 * Copyright (C) 2001 University of Chicago. 00005 * See COPYRIGHT notice in top-level directory. 00006 */ 00007 00008 #include "ad_testfs.h" 00009 #include "adioi.h" 00010 00011 void ADIOI_TESTFS_Flush(ADIO_File fd, int *error_code) 00012 { 00013 int myrank, nprocs; 00014 00015 *error_code = MPI_SUCCESS; 00016 00017 MPI_Comm_size(fd->comm, &nprocs); 00018 MPI_Comm_rank(fd->comm, &myrank); 00019 FPRINTF(stdout, "[%d/%d] ADIOI_TESTFS_Flush called on %s\n", 00020 myrank, nprocs, fd->filename); 00021 }
1.5.5