Open MPI logo

Open MPI User's Mailing List Archives

  |   Home   |   Support   |   FAQ   |   all Open MPI User's mailing list

From: Michael Kluskens (mkluskens_at_[hidden])
Date: 2006-04-20 14:24:53

Error in:


subroutine MPI_Comm_get_attr(comm, comm_keyval, attribute_val, flag,
   include 'mpif.h'
   integer, intent(in) :: comm
   integer, intent(in) :: comm_keyval
   integer(kind=MPI_ADDRESS_KIND), intent(out) :: attribute_val
   integer, intent(out) :: flag
   integer, intent(out) :: ierr
end subroutine MPI_Comm_get_attr

flag should be a logical. Only in C is it an integer.

Compare with page 294 of MPI--The Complete Reference, Volume 1 and
page 176 of Using MPI, 2nd ed.

In my test case I'm using:

   call MPI_Comm_get_attr(MPI_COMM_WORLD, MPI_UNIVERSE_SIZE, &
               universe_size, flag, ierr)

   integer :: ierr
   integer (kind=MPI_ADDRESS_KIND) :: universe_size
   logical :: flag

This compiled and worked as of version 9427.