Skip to content

Commit faf5b33

Browse files
committed
fix intent fortran bindings in MPI_Remove_error_x
Appears mistakenly used INTENT(OUT) but should be INTENT(IN). Signed-off-by: Thomas Naughton <naughtont@ornl.gov>
1 parent 7efce2e commit faf5b33

File tree

2 files changed

+4
-4
lines changed

2 files changed

+4
-4
lines changed

ompi/mpi/fortran/use-mpi-f08/mod/mpi-f08-interfaces.h.in

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2349,15 +2349,15 @@ end interface MPI_Register_datarep
23492349
interface MPI_Remove_error_class
23502350
subroutine MPI_Remove_error_class_f08(errorclass,ierror)
23512351
implicit none
2352-
INTEGER, INTENT(OUT) :: errorclass
2352+
INTEGER, INTENT(IN) :: errorclass
23532353
INTEGER, OPTIONAL, INTENT(OUT) :: ierror
23542354
end subroutine MPI_Remove_error_class_f08
23552355
end interface MPI_Remove_error_class
23562356

23572357
interface MPI_Remove_error_code
23582358
subroutine MPI_Remove_error_code_f08(errorcode,ierror)
23592359
implicit none
2360-
INTEGER, INTENT(OUT) :: errorcode
2360+
INTEGER, INTENT(IN) :: errorcode
23612361
INTEGER, OPTIONAL, INTENT(OUT) :: ierror
23622362
end subroutine MPI_Remove_error_code_f08
23632363
end interface MPI_Remove_error_code

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

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -3358,7 +3358,7 @@ end interface
33583358
interface
33593359

33603360
subroutine MPI_Remove_error_class(errorclass, ierror)
3361-
integer, intent(out) :: errorclass
3361+
integer, intent(in) :: errorclass
33623362
integer, intent(out) :: ierror
33633363
end subroutine MPI_Remove_error_class
33643364

@@ -3368,7 +3368,7 @@ end interface
33683368
interface
33693369

33703370
subroutine MPI_Remove_error_code(errorcode, ierror)
3371-
integer, intent(out) :: errorcode
3371+
integer, intent(in) :: errorcode
33723372
integer, intent(out) :: ierror
33733373
end subroutine MPI_Remove_error_code
33743374

0 commit comments

Comments
 (0)