Skip to content

Commit 169f3f9

Browse files
committed
add mpi_comm_idup_with info to additional
fortran modules Signed-off-by: Howard Pritchard <howardp@lanl.gov>
1 parent f3aead7 commit 169f3f9

File tree

3 files changed

+23
-0
lines changed

3 files changed

+23
-0
lines changed

ompi/mpi/fortran/use-mpi-ignore-tkr/mpi-ignore-tkr-interfaces.h.in

Lines changed: 11 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -871,6 +871,17 @@ end subroutine MPI_Comm_idup
871871

872872
end interface
873873

874+
interface
875+
876+
subroutine MPI_Comm_idup_with_info(comm, info, newcomm, request, ierror)
877+
integer, intent(in) :: comm
878+
integer, intent(in) :: info
879+
integer, intent(out) :: newcomm
880+
integer, intent(out) :: request
881+
integer, intent(out) :: ierror
882+
end subroutine MPI_Comm_idup_with_info
883+
884+
end interface
874885

875886
interface
876887

ompi/mpi/fortran/use-mpi-tkr/mpi-f90-interfaces.h

Lines changed: 11 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -363,6 +363,17 @@ end subroutine MPI_Comm_idup
363363

364364
end interface
365365

366+
interface
367+
368+
subroutine MPI_Comm_idup_with_info(comm, info, newcomm, request, ierror)
369+
integer, intent(in) :: comm
370+
integer, intent(in) :: info
371+
integer, intent(out) :: newcomm
372+
integer, intent(out) :: request
373+
integer, intent(out) :: ierror
374+
end subroutine MPI_Comm_idup_with_info
375+
376+
end interface
366377

367378
interface
368379

ompi/mpi/fortran/use-mpi-tkr/pmpi-f90-interfaces.h

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -37,6 +37,7 @@
3737
#define MPI_Comm_dup PMPI_Comm_dup
3838
#define MPI_Comm_dup_with_info PMPI_Comm_dup_with_info
3939
#define MPI_Comm_idup PMPI_Comm_idup
40+
#define MPI_Comm_idup_with_info PMPI_Comm_idup_with_info
4041
#define MPI_Comm_free PMPI_Comm_free
4142
#define MPI_Comm_free_keyval PMPI_Comm_free_keyval
4243
#define MPI_Comm_get_info PMPI_Comm_get_info

0 commit comments

Comments
 (0)