I'm using OpenMPI 1.1 (today a3r9704) because 1.0.1 and 1.0.2 didn't
have enough support for the two MPI-2 commands I need for my project.
Because a tight deadline I'm not testing the trunk which is
openmpi-1.2a1r9704 at the moment.
Instead I'm making the fix to 1.1 I described below and then re-making.
Michael
On Apr 25, 2006, at 9:58 AM, Jeff Squyres (jsquyres) wrote:
I apologize for the delay (and I actually do greatly appreciate your
reminders!). I made a change on the trunk back when I replied; I'm
waiting for my resident F90 expert to give me the "correct" fix (the
bindings are actually generated out of CHASM and XSL files) so that it
can be properly applied to the v1.1 branch.
Is the trunk working properly for you? (i.e., I did a hackaround
on the
trunk to get the interface right, but I need to XSL fixes before I can
commit it to the branch)
-----Original Message-----
From: users-boun...@open-mpi.org
[mailto:users-boun...@open-mpi.org] On Behalf Of Michael Kluskens
Sent: Tuesday, April 25, 2006 9:45 AM
To: Open MPI Users
Subject: Re: [OMPI users] f90 interface error?: MPI_Comm_get_attr
This problem still exists in OpenMPI 1.1a3r9704 (Apr 24, 2006), I
reported it for 9663 (Apr 20, 2006).
Michael
On Apr 21, 2006, at 12:32 AM, Jeff Squyres (jsquyres) wrote:
You're correct on all counts.
I've corrected the .h.sh script in the trunk and will get
the correct
XSL (!) fixes in shortly (even the .h.sh script is generated from a
marked up version of mpi.h -- don't ask ;-) ). I also corrected
type_get_attr and win_get_attr.
Thanks!
-----Original Message-----
From: users-boun...@open-mpi.org
[mailto:users-boun...@open-mpi.org] On Behalf Of Michael Kluskens
Sent: Thursday, April 20, 2006 3:22 PM
To: Open MPI Users
Subject: Re: [OMPI users] f90 interface error?: MPI_Comm_get_attr
The file 'ompi/mpi/f90/mpi-f90-interfaces.h' is automatically
generated by ompi/mpi/f90/scripts/mpi-f90-interfaces.h.sh? I
couldn't get my temp fix to stick so I modified the latter.
Should be?
----------------------------------------
subroutine ${procedure}(comm, comm_keyval, attribute_val,
flag, ierr)
include 'mpif.h'
integer, intent(in) :: comm
integer, intent(in) :: comm_keyval
integer(kind=MPI_ADDRESS_KIND), intent(out) :: attribute_val
logical, intent(out) :: flag
integer, intent(out) :: ierr
end subroutine ${procedure}
EOF
}
start MPI_Comm_get_attr small
output MPI_Comm_get_attr
end MPI_Comm_get_attr
----------------------------------------
I notice that f77 is correct in: ompi/mpi/f77/prototypes_mpi.h
PN(void, mpi_comm_get_attr, MPI_COMM_GET_ATTR, (MPI_Fint *comm,
MPI_Fint *comm_keyval, MPI_Aint *attribute_val, MPI_Flogical *flag,
MPI_Fint *ierr));
On Apr 20, 2006, at 2:24 PM, Michael Kluskens wrote:
Error in:
openmpi-1.1a3r9663/ompi/mpi/f90/mpi-f90-interfaces.h
subroutine MPI_Comm_get_attr(comm, comm_keyval,
attribute_val, flag,
ierr)
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.
Michael
_______________________________________________
users mailing list
us...@open-mpi.org
http://www.open-mpi.org/mailman/listinfo.cgi/users
_______________________________________________
users mailing list
us...@open-mpi.org
http://www.open-mpi.org/mailman/listinfo.cgi/users
_______________________________________________
users mailing list
us...@open-mpi.org
http://www.open-mpi.org/mailman/listinfo.cgi/users
_______________________________________________
users mailing list
us...@open-mpi.org
http://www.open-mpi.org/mailman/listinfo.cgi/users
_______________________________________________
users mailing list
us...@open-mpi.org
http://www.open-mpi.org/mailman/listinfo.cgi/users
