[MPIWG Fortran] MPI-3 ticket 349: Fortran question

[Rolf Rabenseifner]

Jeff and Bill,

<https://svn.mpi-forum.org/trac/mpi-forum-web/ticket/349#comment:22>
was ignored.
The answer seems to be yes and the clear implication is that
we need also a routine to calculate disp := addr2-addr1 

About the Fortran Interfaces:
We should keep the old style without INTENT, because for the old-style
the implementor has the freedom to add INTENT as he/she wants
and it is still compliant with the outcome of the definition.

I do not see, why we have a function in C and a subroutine
in Fortran.
Like MPI_Wtime, in all three languages (C, new and old Fortran), 
we should do the same.

Best regards
Rolf 

----- Original Message -----
> From: "Jeff Squyres (jsquyres)" <jsquyres at cisco.com>
> To: "<longb at cray.com>" <longb at cray.com>, "MPI-WG Fortran working group" <mpiwg-fortran at lists.mpi-forum.org>
> Sent: Thursday, December 12, 2013 12:17:40 AM
> Subject: Re: [MPIWG Fortran] MPI-3 ticket 349: Fortran question
> 
> Sounds good to me.
> 
> Rolf -- is there any MPI reason we would not want to do this?
> 
> 
> On Dec 11, 2013, at 4:41 PM, Bill Long <longb at cray.com> wrote:
> 
> > 
> > 
> > On 12/11/13 11:27 AM, Jeff Squyres (jsquyres) wrote:
> >> This ticket got a formal reading today at the Forum:
> >> 
> >>     http://svn.mpi-forum.org/trac/mpi-forum-web/ticket/349
> >>     (as of this writing, there's still a BIND(C) in there, but it
> >>     will be removed shortly)
> >> 
> >> The function is basically intended to perform a mathematical
> >> operation.  As such, I think that the 2 Fortran bindings should
> >> be FUNCTIONs, not SUBROUTINEs (a la MPI_WTICK/MPI_WTIME).
> >> 
> >> Do you agree?  If so, the ticket author (Jim Dinan) is amenable to
> >> changing the Fortran bindings to the following (and I'm assuming
> >> I have the syntax below correct, but feel free to correct me if
> >> they're wrong):
> >> 
> > 
> > Certainly it makes more sense for these to be functions in Fortran.
> > Particularly if the programmer prefers supply an interface and
> > call the C form directly.  If the C and Fortran versions are both
> > functions, there is no change in the source code where the
> > function is used.
> > 
> >> -----
> >> INTEGER(KIND=MPI_ADDRESS_KIND) MPI_Aint_add(base, disp)
> >>     INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) ::  base, disp
> >> 
> >> INTEGER(KIND=MPI_ADDRESS_KIND) MPI_AINT_ADD(BASE, DISP)
> >>     INTEGER(KIND=MPI_ADDRESS_KIND) BASE, DISP
> > 
> > It is certainly an oddity that the spec has two forms like this.
> >  Any version of the Fortran standard that supports KIND= in
> > INTEGER also supports lower case names and INTENT() attributes.
> >   Maybe there could be some clean up of this in a future revision.
> > 
> > Cheers,
> > Bill
> > 
> > 
> > 
> >> -----
> >> 
> > 
> > --
> > Bill Long                                           longb at cray.com
> > Fortran Technical Support    &                 voice: 651-605-9024
> > Bioinformatics Software Development            fax:   651-605-9142
> > Cray Inc./Cray Plaza, Suite 210/380 Jackson St./St. Paul, MN 55101
> > 
> > 
> > _______________________________________________
> > mpiwg-fortran mailing list
> > mpiwg-fortran at lists.mpi-forum.org
> > http://lists.mpi-forum.org/mailman/listinfo.cgi/mpiwg-fortran
> 
> 
> --
> Jeff Squyres
> jsquyres at cisco.com
> For corporate legal information go to:
> http://www.cisco.com/web/about/doing_business/legal/cri/
> 
> _______________________________________________
> mpiwg-fortran mailing list
> mpiwg-fortran at lists.mpi-forum.org
> http://lists.mpi-forum.org/mailman/listinfo.cgi/mpiwg-fortran
> 

-- 
Dr. Rolf Rabenseifner . . . . . . . . . .. email rabenseifner at hlrs.de
High Performance Computing Center (HLRS) . phone ++49(0)711/685-65530
University of Stuttgart . . . . . . . . .. fax ++49(0)711 / 685-65832
Head of Dpmt Parallel Computing . . . www.hlrs.de/people/rabenseifner
Nobelstr. 19, D-70550 Stuttgart, Germany . . . . (Office: Room 1.307)