@@ -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
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 , count , dest , tag
213208 TYPE (MPI_Datatype ), INTENT (IN ) :: datatype
@@ -221,11 +216,6 @@ interface MPI_Psend_init
221216subroutine MPI_Psend_init_f08 (buf ,partitions ,count ,datatype ,dest ,tag ,comm ,request ,ierror )
222217 use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request
223218 implicit none
224- !DEC$ ATTRIBUTES NO_ARG_CHECK :: buf
225- !GCC$ ATTRIBUTES NO_ARG_CHECK :: buf
226- !$PRAGMA IGNORE_TKR buf
227- !DIR$ IGNORE_TKR buf
228- !IBM * IGNORE_TKR buf
229219 OMPI_F08_IGNORE_TKR_TYPE , INTENT (IN ) :: buf
230220 INTEGER , INTENT (IN ) :: partitions , count , dest , tag
231221 TYPE (MPI_Datatype ), INTENT (IN ) :: datatype
@@ -412,7 +402,7 @@ subroutine MPI_Send_init_f08@OMPI_F08_BINDINGS_TS_SUFFIX@(buf,count,datatype,des
412402 use :: mpi_f08_types , only : MPI_Datatype , MPI_Comm , MPI_Request
413403 implicit none
414404 @OMPI_F08_IGNORE_TKR_PREDECL @ buf
415- @OMPI_F08_IGNORE_TKR_TYPE @ INTENT (IN ) OMPI_ASYNCHRONOUS :: buf
405+ @OMPI_F08_IGNORE_TKR_TYPE @, INTENT (IN ) OMPI_ASYNCHRONOUS :: buf
416406 INTEGER , INTENT (IN ) :: count , dest , tag
417407 TYPE (MPI_Datatype ), INTENT (IN ) :: datatype
418408 TYPE (MPI_Comm ), INTENT (IN ) :: comm
0 commit comments