@@ -203,11 +203,6 @@ interface MPI_Precv_init
203203subroutine MPI_Precv_init_f08 (buf ,partitions ,count ,datatype ,dest ,tag ,comm ,request ,ierror )
204204 use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request , MPI_COUNT_KIND
205205 implicit none
206- !DEC$ ATTRIBUTES NO_ARG_CHECK :: buf
207- !GCC$ ATTRIBUTES NO_ARG_CHECK :: buf
208- !$PRAGMA IGNORE_TKR buf
209- !DIR$ IGNORE_TKR buf
210- !IBM * IGNORE_TKR buf
211206 OMPI_F08_IGNORE_TKR_TYPE , INTENT (IN ) :: buf
212207 INTEGER , INTENT (IN ) :: partitions , dest , tag
213208 INTEGER (MPI_COUNT_KIND ), INTENT (IN ) :: count
@@ -222,11 +217,6 @@ interface MPI_Psend_init
222217subroutine MPI_Psend_init_f08 (buf ,partitions ,count ,datatype ,dest ,tag ,comm ,request ,ierror )
223218 use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request , MPI_COUNT_KIND
224219 implicit none
225- !DEC$ ATTRIBUTES NO_ARG_CHECK :: buf
226- !GCC$ ATTRIBUTES NO_ARG_CHECK :: buf
227- !$PRAGMA IGNORE_TKR buf
228- !DIR$ IGNORE_TKR buf
229- !IBM * IGNORE_TKR buf
230220 OMPI_F08_IGNORE_TKR_TYPE , INTENT (IN ) :: buf
231221 INTEGER , INTENT (IN ) :: partitions , dest , tag
232222 INTEGER (MPI_COUNT_KIND ), INTENT (IN ) :: count
@@ -414,7 +404,7 @@ subroutine MPI_Send_init_f08@OMPI_F08_BINDINGS_TS_SUFFIX@(buf,count,datatype,des
414404 use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request
415405 implicit none
416406 @OMPI_F08_IGNORE_TKR_PREDECL @ buf
417- @OMPI_F08_IGNORE_TKR_TYPE @ INTENT (IN ) OMPI_ASYNCHRONOUS :: buf
407+ @OMPI_F08_IGNORE_TKR_TYPE @, INTENT (IN ) OMPI_ASYNCHRONOUS :: buf
418408 INTEGER , INTENT (IN ) :: count , dest , tag
419409 TYPE (MPI_Datatype ), INTENT (IN ) :: datatype
420410 TYPE (MPI_Comm ), INTENT (IN ) :: comm
0 commit comments