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