@@ -127,7 +127,7 @@ end subroutine MPI_Irsend_f08
127
127
end interface MPI_Irsend
128
128
129
129
interface 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 , &
131
131
recvcount ,recvtype ,source ,recvtag ,comm ,request ,ierror )
132
132
use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request
133
133
implicit none
@@ -139,11 +139,11 @@ subroutine MPI_Isendrecv_f08(sendbuf,sendcount,sendtype,dest,sendtag,recvbuf, &
139
139
TYPE (MPI_Comm ), INTENT (IN ) :: comm
140
140
TYPE (MPI_Request ), INTENT (OUT ) :: request
141
141
INTEGER , OPTIONAL , INTENT (OUT ) :: ierror
142
- end subroutine MPI_Isendrecv_f08
142
+ end subroutine MPI_Isendrecv_f08 @ OMPI_F08_BINDINGS_TS_SUFFIX @
143
143
end interface MPI_Isendrecv
144
144
145
145
interface 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 , &
147
147
comm ,request ,ierror )
148
148
use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request
149
149
implicit none
@@ -154,7 +154,7 @@ subroutine MPI_Isendrecv_replace_f08(buf,count,datatype,dest,sendtag,source,recv
154
154
TYPE (MPI_Comm ), INTENT (IN ) :: comm
155
155
TYPE (MPI_Request ), INTENT (OUT ) :: request
156
156
INTEGER , OPTIONAL , INTENT (OUT ) :: ierror
157
- end subroutine MPI_Isendrecv_replace_f08
157
+ end subroutine MPI_Isendrecv_replace_f08 @ OMPI_F08_BINDINGS_TS_SUFFIX @
158
158
end interface MPI_Isendrecv_replace
159
159
160
160
interface MPI_Issend
0 commit comments