From 056eb39b122b56b8f802c24b79dadd3ed0aa2f5e Mon Sep 17 00:00:00 2001 From: KAWASHIMA Takahiro Date: Tue, 26 Dec 2017 11:41:37 +0900 Subject: [PATCH] fortran: Correct type of `info_used` It is incorrectly typed as `MPI_Comm` in only `pmpi` in 24f7bd327e3. Signed-off-by: KAWASHIMA Takahiro --- ompi/mpi/fortran/use-mpi-f08/mod/pmpi-f08-interfaces.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ompi/mpi/fortran/use-mpi-f08/mod/pmpi-f08-interfaces.F90 b/ompi/mpi/fortran/use-mpi-f08/mod/pmpi-f08-interfaces.F90 index 47e564b8e4..dfca6b9c12 100644 --- a/ompi/mpi/fortran/use-mpi-f08/mod/pmpi-f08-interfaces.F90 +++ b/ompi/mpi/fortran/use-mpi-f08/mod/pmpi-f08-interfaces.F90 @@ -1759,7 +1759,7 @@ subroutine PMPI_Comm_get_info_f08(comm,info_used,ierror) use :: mpi_f08_types, only : MPI_Comm, MPI_Info implicit none TYPE(MPI_Comm), INTENT(IN) :: comm - TYPE(MPI_Comm), INTENT(OUT) :: info_used + TYPE(MPI_Info), INTENT(OUT) :: info_used INTEGER, OPTIONAL, INTENT(OUT) :: ierror end subroutine PMPI_Comm_get_info_f08 end interface PMPI_Comm_get_info