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