e981e46446
only declare MPI_* bindings and use macros to deduce the PMPI_* bindings Signed-off-by: Gilles Gouaillardet <gilles@rist.or.jp>
28 строки
925 B
Fortran
28 строки
925 B
Fortran
! -*- fortran -*-
|
|
!
|
|
! Copyright (c) 2020 Research Organization for Information Science
|
|
! and Technology (RIST). All rights reserved.
|
|
! $COPYRIGHT$
|
|
!
|
|
! Additional copyrights may follow
|
|
!
|
|
! $HEADER$
|
|
|
|
#define MPI_Address PMPI_Address
|
|
#define MPI_Attr_delete PMPI_Attr_delete
|
|
#define MPI_Attr_get PMPI_Attr_get
|
|
#define MPI_Attr_put PMPI_Attr_put
|
|
#define MPI_Errhandler_create PMPI_Errhandler_create
|
|
#define MPI_Errhandler_get PMPI_Errhandler_get
|
|
#define MPI_Errhandler_set PMPI_Errhandler_set
|
|
#define MPI_Keyval_create PMPI_Keyval_create
|
|
#define MPI_Keyval_free PMPI_Keyval_free
|
|
#define MPI_Type_extent PMPI_Type_extent
|
|
#define MPI_Type_hindexed PMPI_Type_hindexed
|
|
#define MPI_Type_hvector PMPI_Type_hvector
|
|
#define MPI_Type_lb PMPI_Type_lb
|
|
#define MPI_Type_struct PMPI_Type_struct
|
|
#define MPI_Type_ub PMPI_Type_ub
|
|
|
|
#include "ompi/mpi/fortran/use-mpi-ignore-tkr/mpi-ignore-tkr-removed-interfaces.h"
|