This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "MPICH primary repository". The branch, master has been updated via 2dc3960a863977d980334ed7fbd199a87bb6d35f (commit) from 3ebeb7227bfc8cea87463cc3b795b87c0ea43296 (commit) Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below. - Log ----------------------------------------------------------------- http://git.mpich.org/mpich.git/commitdiff/2dc3960a863977d980334ed7fbd199a87b... commit 2dc3960a863977d980334ed7fbd199a87bb6d35f Author: Ken Raffenetti <[email protected]> Date: Thu Apr 17 09:01:40 2014 -0500 fix incorrect usage of MPI_Abort in f90 tests Signed-off-by: Junchao Zhang <[email protected]> diff --git a/test/mpi/f90/datatype/indtype.f90 b/test/mpi/f90/datatype/indtype.f90 index c75999a..29807e7 100644 --- a/test/mpi/f90/datatype/indtype.f90 +++ b/test/mpi/f90/datatype/indtype.f90 @@ -22,7 +22,7 @@ call mpi_comm_rank( MPI_COMM_WORLD, rank, ierr ) if (size .lt. 2) then print *, "Must have at least 2 processes" - call MPI_Abort( 1, MPI_COMM_WORLD, ierr ) + call MPI_Abort( MPI_COMM_WORLD, 1, ierr ) endif errs = 0 diff --git a/test/mpi/f90/datatype/structf.f90 b/test/mpi/f90/datatype/structf.f90 index 6cf3419..a307df3 100644 --- a/test/mpi/f90/datatype/structf.f90 +++ b/test/mpi/f90/datatype/structf.f90 @@ -44,7 +44,7 @@ call mpi_comm_size(MPI_COMM_WORLD, size, ierr ) if (size .lt. 2) then print *, "Must have at least 2 processes" - call MPI_Abort( 1, MPI_COMM_WORLD, ierr ) + call MPI_Abort( MPI_COMM_WORLD, 1, ierr ) endif comm = MPI_COMM_WORLD ----------------------------------------------------------------------- Summary of changes: test/mpi/f90/datatype/indtype.f90 | 2 +- test/mpi/f90/datatype/structf.f90 | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) hooks/post-receive -- MPICH primary repository