Charm++: Charm Source Code Documentation

00001 /* -*- Mode: C; c-basic-offset:4 ; -*- */
00002 /*  $Id$
00003  *
00004  *  (C) 2001 by Argonne National Laboratory.
00005  *      See COPYRIGHT in top-level directory.
00006  */
00007 #define ADIOI_TEST_FILE_HANDLE(fh, myname) \
00008 {if (!(fh)) { \
00009     error_code = MPIR_Err_setmsg(MPI_ERR_FILE, MPIR_ERR_FILE_NULL, myname, (char *) 0, (char *) 0); \
00010     return ADIOI_Error(MPI_FILE_NULL, error_code, myname); } \
00011  else if ((fh)->cookie != ADIOI_FILE_COOKIE) { \
00012     error_code = MPIR_Err_setmsg(MPI_ERR_FILE, MPIR_ERR_FILE_CORRUPT, myname, (char *) 0, (char *) 0); \
00013     return ADIOI_Error(MPI_FILE_NULL, error_code, myname); } }
00014

libs/ck-libs/ampi/romio/adio/include/adioi_error.h