OpenMPI  0.1.1
conversion_fn_null-f90-interface.h
1 !
2 ! Copyright (c) 2006-2007 Cisco Systems, Inc. All rights reserved.
3 ! $COPYRIGHT$
4 !
5 ! Additional copyrights may follow
6 !
7 ! $HEADER$
8 !
9 
10 ! Note about these declarations: these are "external" functions in
11 ! mpif-common.h. However, if we don't declare them here, compilers will add
12 ! them to the "mpi" module namespace, and result in linker errors if MPI
13 ! F90 applications try to use them. because the implementations of
14 ! these functions are not in the MPI module namespace -- they're the F77
15 ! functions.
16 
17 interface
18 
19  subroutine mpi_conversion_fn_null(userbuf, datatype, count, filebuf, &
20  position, extra_state, ierror)
21  include 'mpif-config.h'
22  character(len=*), intent(in) :: filebuf
23  character(len=*), intent(out) :: userbuf
24  integer, intent(in) :: datatype, count, ierror
25  integer(kind=MPI_OFFSET_KIND), intent(in) :: position
26  integer(kind=MPI_ADDRESS_KIND), intent(in) :: extra_state
27  end subroutine mpi_conversion_fn_null
28 
29 end interface