Skip to content
This repository was archived by the owner on Sep 30, 2022. It is now read-only.

Commit e477a18

Browse files
committed
fortran: Add missing MPI_DUP_FN subroutine
Though the `MPI_DUP_FN` subroutine is depricated, it is not yet removed as of MPI-3.1. (cherry picked from commit open-mpi/ompi@10c11ff)
1 parent 97f5501 commit e477a18

File tree

1 file changed

+9
-0
lines changed

1 file changed

+9
-0
lines changed

ompi/mpi/fortran/base/attr-fn-int-callback-interfaces.h

Lines changed: 9 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -21,6 +21,15 @@ interface
2121

2222
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
2323

24+
subroutine MPI_DUP_FN( comm, comm_keyval, extra_state, &
25+
attribute_val_in, attribute_val_out, &
26+
flag, ierr )
27+
implicit none
28+
integer :: comm, comm_keyval, extra_state
29+
integer :: attribute_val_in, attribute_val_out, ierr
30+
logical :: flag
31+
end subroutine MPI_DUP_FN
32+
2433
subroutine MPI_NULL_COPY_FN( comm, comm_keyval, extra_state, &
2534
attribute_val_in, attribute_val_out, &
2635
flag, ierr )

0 commit comments

Comments
 (0)