we 33 ompi/include/mpif-sentinels.h ! that we already have overloaded F90 bindings for all available we 39 ompi/include/mpif-sentinels.h ! exepected in the F90 binding for MPI_COMM_SPAWN means that we we 48 ompi/include/mpif-sentinels.h ! matter -- we'll never overrun it because we never assign values we 11 ompi/mpi/fortran/base/conversion-fn-null-int-interface.h ! mpif-common.h. However, if we don't declare them here, compilers will add we 32 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! subroutines-with-LOGICAL-params, we have to be creative on how to we 43 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! Fortran interface so that the compiler can verify that we're passing we 47 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! MPI_Alltoallw), we declare that the corresponding ompi_*_f() we 48 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! subroutine takes a *scalar*, and then we pass sendtypes(0)%MPI_VAL. we 65 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! we're telling the Fortran compiler what the C interface is, and we 66 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! we're lying. But just a little bit. No one gets hurt. we 70 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! we shouldn't feel bad about using it. Shrug. we 73 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! parameters, then we have to do even more tricks than we described we 80 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! memory map) to INTEGER, DIMENSION(MPI_STATUS_SIZE). So we just have we 84 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! So in this case, we actually don't "use mpi" at all -- we just add we 85 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! an "interface" block for the PMPI_* subroutine that we want to call. we 86 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! And we lie in that interface block, saying that the status argument we 89 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! the same type that we already have. we 104 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! To fix the compiler warning, instead of including "header.h", we we 118 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! Again, we're making the Fortran compiler happy, but we're lying we 119 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! because we know the back-end memory representation of the two types we 195 ompi/mpi/fortran/use-mpi-f08/bindings/mpi-f-interfaces-bind.h ! Note that we have an F08-specific C implementation function for we 12 ompi/mpi/fortran/use-mpi-tkr/mpi-f90-cptr-interfaces.h ! gfortran on RHEL 5 does not support this module/type). So we use a we 34 ompi/mpi/fortran/use-mpi-tkr/mpi-f90-cptr-interfaces.h ! Only include the 2nd interface if we have ISO_C_BINDING / TYPE(C_PTR) we 63 ompi/mpi/fortran/use-mpi-tkr/mpi-f90-cptr-interfaces.h ! Only include the 2nd interface if we have ISO_C_BINDING / TYPE(C_PTR) we 91 ompi/mpi/fortran/use-mpi-tkr/mpi-f90-cptr-interfaces.h ! Only include the 2nd interface if we have ISO_C_BINDING / TYPE(C_PTR) we 14 ompi/mpi/fortran/use-mpi-tkr/pmpi-f90-cptr-interfaces.h ! gfortran on RHEL 5 does not support this module/type). So we use a we 36 ompi/mpi/fortran/use-mpi-tkr/pmpi-f90-cptr-interfaces.h ! Only include the 2nd interface if we have ISO_C_BINDING / TYPE(C_PTR) we 65 ompi/mpi/fortran/use-mpi-tkr/pmpi-f90-cptr-interfaces.h ! Only include the 2nd interface if we have ISO_C_BINDING / TYPE(C_PTR) we 93 ompi/mpi/fortran/use-mpi-tkr/pmpi-f90-cptr-interfaces.h ! Only include the 2nd interface if we have ISO_C_BINDING / TYPE(C_PTR)