[mpich-commits] [mpich] MPICH primary repository branch, master, updated. v3.2b3-126-gdf133f8
Service Account
noreply at mpich.org
Tue Jun 23 15:47:27 CDT 2015
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 df133f8eaf82f448e8d5fb53d0a8ec77d8484c85 (commit)
from a4aa067596105b9b21d80c672eb00820e4c84cb5 (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/df133f8eaf82f448e8d5fb53d0a8ec77d8484c85
commit df133f8eaf82f448e8d5fb53d0a8ec77d8484c85
Author: Junchao Zhang <jczhang at mcs.anl.gov>
Date: Mon Jun 15 14:50:27 2015 -0500
Fix typos in an F08 test
No reviewer
diff --git a/test/mpi/f08/attr/attrmpi1f08.f90 b/test/mpi/f08/attr/attrmpi1f08.f90
index 242ee1b..fe5e2e9 100644
--- a/test/mpi/f08/attr/attrmpi1f08.f90
+++ b/test/mpi/f08/attr/attrmpi1f08.f90
@@ -5,7 +5,8 @@
! See COPYRIGHT in top-level directory.
!
program main
- use mpi
+ use mpi_f08
+ implicit none
integer value, wsize, wrank, extra, mykey
integer rvalue, svalue
TYPE(MPI_Comm) ncomm
@@ -19,7 +20,7 @@
!
! Simple attribute put and get
!
- call mpi_keyval_create( MPI_NULL_COPY_FN, MPI_NULL_DELETE_FN, &
+ call mpi_keyval_create( MPI_COMM_NULL_COPY_FN, MPI_COMM_NULL_DELETE_FN, &
& mykey, extra,ierr )
call mpi_attr_get( MPI_COMM_WORLD, mykey, value, flag, ierr )
if (flag) then
-----------------------------------------------------------------------
Summary of changes:
test/mpi/f08/attr/attrmpi1f08.f90 | 5 +++--
1 files changed, 3 insertions(+), 2 deletions(-)
hooks/post-receive
--
MPICH primary repository
More information about the commits
mailing list