Skip to content

Commit b030970

Browse files
committed
delete a extra interface statement
Signed-off-by: Howard Pritchard <[email protected]>
1 parent d33d5e0 commit b030970

File tree

1 file changed

+5
-3
lines changed

1 file changed

+5
-3
lines changed

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

Lines changed: 5 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1405,13 +1405,15 @@ end subroutine MPI_Session_get_errhandler
14051405

14061406
end interface
14071407

1408-
interface MPI_Session_get_info
1408+
interface
1409+
14091410
subroutine MPI_Session_get_info(session, info, ierror)
14101411
implicit none
14111412
integer, intent(in) :: session
14121413
integer, intent(out) :: info
14131414
integer, intent(out) :: ierror
14141415
end subroutine MPI_Session_get_info
1416+
14151417
end interface
14161418

14171419
interface
@@ -1472,8 +1474,6 @@ end interface MPI_Session_finalize
14721474

14731475
interface
14741476

1475-
interface
1476-
14771477
subroutine MPI_Session_set_errhandler(session, errhandler, ierror)
14781478
integer, intent(in) :: session
14791479
integer, intent(in) :: errhandler
@@ -1482,6 +1482,8 @@ end subroutine MPI_Session_set_errhandler
14821482

14831483
end interface
14841484

1485+
interface
1486+
14851487
subroutine MPI_Start(request, ierror)
14861488
integer, intent(inout) :: request
14871489
integer, intent(out) :: ierror

0 commit comments

Comments
 (0)