From ff230303f338536c87261e2259b04de1a7f6c283 Mon Sep 17 00:00:00 2001 From: Jeff Squyres Date: Fri, 1 Oct 2004 18:24:03 +0000 Subject: [PATCH] Oops! This one is almost funny. :-) This commit was SVN r2905. --- src/mpi/f77/alltoall_f.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/mpi/f77/alltoall_f.c b/src/mpi/f77/alltoall_f.c index c9596e95c8..eab3bc0068 100644 --- a/src/mpi/f77/alltoall_f.c +++ b/src/mpi/f77/alltoall_f.c @@ -57,7 +57,7 @@ void mpi_alltoall_f(char *sendbuf, MPI_Fint *sendcount, MPI_Fint *sendtype, c_sendtype = MPI_Type_f2c(*sendtype); c_recvtype = MPI_Type_f2c(*recvtype); - *ierr = OMPI_INT_2_FINT(MPI_Allgather(sendbuf, + *ierr = OMPI_INT_2_FINT(MPI_Alltoall(sendbuf, OMPI_FINT_2_INT(*sendcount), c_sendtype, recvbuf,