@@ -127,7 +127,7 @@ end subroutine MPI_Irsend_f08
127127end interface MPI_Irsend
128128
129129interface MPI_Isendrecv
130- subroutine MPI_Isendrecv_f08 (sendbuf ,sendcount ,sendtype ,dest ,sendtag ,recvbuf , &
130+ subroutine MPI_Isendrecv_f08 @ OMPI_F08_BINDINGS_TS_SUFFIX @ (sendbuf ,sendcount ,sendtype ,dest ,sendtag ,recvbuf , &
131131 recvcount ,recvtype ,source ,recvtag ,comm ,request ,ierror )
132132 use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request
133133 implicit none
@@ -139,11 +139,11 @@ subroutine MPI_Isendrecv_f08(sendbuf,sendcount,sendtype,dest,sendtag,recvbuf, &
139139 TYPE (MPI_Comm ), INTENT (IN ) :: comm
140140 TYPE (MPI_Request ), INTENT (OUT ) :: request
141141 INTEGER , OPTIONAL , INTENT (OUT ) :: ierror
142- end subroutine MPI_Isendrecv_f08
142+ end subroutine MPI_Isendrecv_f08 @ OMPI_F08_BINDINGS_TS_SUFFIX @
143143end interface MPI_Isendrecv
144144
145145interface MPI_Isendrecv_replace
146- subroutine MPI_Isendrecv_replace_f08 (buf ,count ,datatype ,dest ,sendtag ,source ,recvtag , &
146+ subroutine MPI_Isendrecv_replace_f08 @ OMPI_F08_BINDINGS_TS_SUFFIX @ (buf ,count ,datatype ,dest ,sendtag ,source ,recvtag , &
147147 comm ,request ,ierror )
148148 use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request
149149 implicit none
@@ -154,7 +154,7 @@ subroutine MPI_Isendrecv_replace_f08(buf,count,datatype,dest,sendtag,source,recv
154154 TYPE (MPI_Comm ), INTENT (IN ) :: comm
155155 TYPE (MPI_Request ), INTENT (OUT ) :: request
156156 INTEGER , OPTIONAL , INTENT (OUT ) :: ierror
157- end subroutine MPI_Isendrecv_replace_f08
157+ end subroutine MPI_Isendrecv_replace_f08 @ OMPI_F08_BINDINGS_TS_SUFFIX @
158158end interface MPI_Isendrecv_replace
159159
160160interface MPI_Issend
0 commit comments