Skip to content

Commit 7443d22

Browse files
committed
fix more fortran binding typos
Signed-off-by: Thomas Naughton <[email protected]>
1 parent 40506b4 commit 7443d22

File tree

3 files changed

+3
-3
lines changed

3 files changed

+3
-3
lines changed

ompi/mpi/fortran/use-mpi-f08/remove_error_class_f08.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -13,7 +13,7 @@
1313
subroutine MPI_Remove_error_class_f08(errorclass,ierror)
1414
use :: ompi_mpifh_bindings, only : ompi_remove_error_class_f
1515
implicit none
16-
INTEGER, INTENT(IN) :: errorclass
16+
INTEGER, INTENT(INOUT) :: errorclass
1717
INTEGER, OPTIONAL, INTENT(OUT) :: ierror
1818
integer :: c_ierror
1919

ompi/mpi/fortran/use-mpi-f08/remove_error_code_f08.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -13,7 +13,7 @@
1313
subroutine MPI_Remove_error_code_f08(errorcode,ierror)
1414
use :: ompi_mpifh_bindings, only : ompi_remove_error_code_f
1515
implicit none
16-
INTEGER, INTENT(IN) :: errorcode
16+
INTEGER, INTENT(INOUT) :: errorcode
1717
INTEGER, OPTIONAL, INTENT(OUT) :: ierror
1818
integer :: c_ierror
1919

ompi/mpi/fortran/use-mpi-f08/remove_error_string_f08.F90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -10,7 +10,7 @@
1010

1111
#include "mpi-f08-rename.h"
1212

13-
subroutine MPI_Error_error_string_f08(errorcode,ierror)
13+
subroutine MPI_Remove_error_string_f08(errorcode,ierror)
1414
use :: ompi_mpifh_bindings, only : ompi_remove_error_string_f
1515
use, intrinsic :: ISO_C_BINDING, only : C_INT
1616
implicit none

0 commit comments

Comments
 (0)