From 5ac6a4387cb238ae992df612be5e5081441cdf69 Mon Sep 17 00:00:00 2001 From: Jeff Squyres Date: Wed, 30 Jul 2008 20:29:23 +0000 Subject: [PATCH] Fix MPI_CART_GET to take an array of logicals for the periods argument (not integers) This commit was SVN r19099. --- ompi/mpi/f90/scripts/mpi-f90-interfaces.h.sh | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ompi/mpi/f90/scripts/mpi-f90-interfaces.h.sh b/ompi/mpi/f90/scripts/mpi-f90-interfaces.h.sh index 32ca931cd0..dae266e4be 100755 --- a/ompi/mpi/f90/scripts/mpi-f90-interfaces.h.sh +++ b/ompi/mpi/f90/scripts/mpi-f90-interfaces.h.sh @@ -1120,7 +1120,7 @@ subroutine ${procedure}(comm, maxdims, dims, periods, coords& integer, intent(in) :: comm integer, intent(in) :: maxdims integer, dimension(*), intent(out) :: dims - integer, dimension(*), intent(out) :: periods + logical, dimension(*), intent(out) :: periods integer, dimension(*), intent(out) :: coords integer, intent(out) :: ierr end subroutine ${procedure}