ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

Remove erroneous use of "MPI_Aint".

Просмотр исходного кода 
There is no "MPI_Aint" in the Fortran interface.  Surprisingly, the
Intel compiler didn't choke on this, but the Absoft compiler did.

This commit was SVN r29371.
Этот коммит содержится в:
Jeff Squyres 2013-10-04 15:27:29 +00:00
родитель 2bd2284b93
Коммит be191619a9
1 изменённых файлов: 1 добавлений и 1 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

2
ompi/mpi/fortran/base/mpi-f08-interfaces.F90
Просмотреть файл

@ -4453,7 +4453,7 @@ interface MPI_Neighbor_alltoallw
subroutine MPI_Neighbor_alltoallw_f08(sendbuf,sendcounts,sdispls,sendtypes,recvbuf,recvcounts, & subroutine MPI_Neighbor_alltoallw_f08(sendbuf,sendcounts,sdispls,sendtypes,recvbuf,recvcounts, &
rdispls,recvtypes,comm,ierror & rdispls,recvtypes,comm,ierror &
) OMPI_F08_INTERFACE_BIND_C("MPI_Neighbor_alltoallw_f08") ) OMPI_F08_INTERFACE_BIND_C("MPI_Neighbor_alltoallw_f08")
use :: mpi_f08_types, only : MPI_Datatype, MPI_Comm, MPI_Aint, MPI_ADDRESS_KIND use :: mpi_f08_types, only : MPI_Datatype, MPI_Comm, MPI_ADDRESS_KIND
implicit none implicit none
!DEC$ ATTRIBUTES NO_ARG_CHECK :: sendbuf, recvbuf !DEC$ ATTRIBUTES NO_ARG_CHECK :: sendbuf, recvbuf
!$PRAGMA IGNORE_TKR sendbuf, recvbuf !$PRAGMA IGNORE_TKR sendbuf, recvbuf