Charm++: Charm Source Code Documentation

00001 /* -*- Mode: C; c-basic-offset:4 ; -*- */
00002 /* 
00003  *
00004  *   Copyright (C) 2004 University of Chicago. 
00005  *   See COPYRIGHT notice in top-level directory.
00006  */
00007 
00008 #include "adio.h"
00009 #include "mpiu_greq.h"
00010 
00011 /* In cases where nonblocking operation will carry out blocking version,
00012  * instantiate and complete a generalized request  */
00013 
00014 void MPIO_Completed_request_create(MPI_File *fh, MPI_Offset bytes,
00015         int *error_code, MPI_Request *request)
00016 {
00017     MPI_Status *status;
00018     status = (MPI_Status *)ADIOI_Malloc(sizeof(MPI_Status));
00019 
00020     status->MPI_ERROR = *error_code;
00021 #ifdef HAVE_STATUS_SET_BYTES
00022     MPIR_Status_set_bytes(status, MPI_BYTE, bytes);
00023 #endif
00024     /* --BEGIN ERROR HANDLING-- */
00025     if (*error_code != MPI_SUCCESS)
00026         *error_code = MPIO_Err_return_file(*fh, *error_code);
00027     /* --END ERROR HANDLING-- */
00028     MPI_Grequest_start(MPIU_Greq_query_fn, MPIU_Greq_free_fn, 
00029             MPIU_Greq_cancel_fn, status, request);
00030     MPI_Grequest_complete(*request);
00031 }
libs/ck-libs/ampi/romio/adio/common/greq_fns.c
