[mpich-commits] [mpich] MPICH primary repository branch, master, updated. v3.1-159-g2dc3960

Service Account noreply at mpich.org
Mon Apr 21 16:52:58 CDT 2014


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/2dc3960a863977d980334ed7fbd199a87bb6d35f

commit 2dc3960a863977d980334ed7fbd199a87bb6d35f
Author: Ken Raffenetti <raffenet at mcs.anl.gov>
Date:   Thu Apr 17 09:01:40 2014 -0500

    fix incorrect usage of MPI_Abort in f90 tests
    
    Signed-off-by: Junchao Zhang <jczhang at mcs.anl.gov>

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


More information about the commits mailing list