/* -*- Mode: C; c-basic-offset:4 ; indent-tabs-mode:nil ; -*- */
/*  
 *  (C) 2001 by Argonne National Laboratory.
 *      See COPYRIGHT in top-level directory.
 */

/* These functions are provided by the MPICH code for the Fortran interface,
   and provide the interfaces needed to keep track of which MPI internal
   objects need to have Fortran or Fortran 90 characteristics */
void MPIR_Keyval_set_fortran( int );
void MPIR_Keyval_set_fortran90( int );
void MPIR_Grequest_set_lang_f77( MPI_Request greq );
#if defined(HAVE_FORTRAN_BINDING) && !defined(HAVE_FINT_IS_INT)
void MPIR_Op_set_fc( MPI_Op );
typedef void (MPIR_F77_User_function) ( void *, void *, MPI_Fint *, MPI_Fint * );
void MPIR_Errhandler_set_fc( MPI_Errhandler );
#endif

#define MPIR_ATTR_C_TO_FORTRAN(ATTR) ((ATTR)+1)