<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div>For some reason Jeff deleted me from this email list :-)   (or perhaps I removed myself one day when the mood moved me)  so I haven't seen this thread until today.</div><div><br></div><div>Basically I agree with Tobias that there is a problem (from a standards perspective) and with Nick that MPI-3 made the right choice with default logical (following past standards as to not break existing code).  I also agree with Nick that an implementation of the MPI-3 standard can finesse the issue a bit.</div><div><br></div><div>I don't know what Bill will think of this but I think the problem should be resolved in the Fortran standard in the end so that</div><div><br></div><div>      LOGICAL(C_INT)</div><div><br></div><div>is a legal type.  This would allow mapping Fortran logical variables to C integers which is the type most C programmers use for logical variables anyway.</div><div><br></div><div>Does anyone know what size a default logical is in existing compilers?  I assume it is the same size as a default integer.</div><br><div apple-content-edited="true">
<span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: -webkit-auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; font-size: medium; "><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: -webkit-auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; font-size: medium; "><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div>Craig Rasmussen</div><div>CAS Scientific Programmer</div><div><a href="mailto:rasmus@cas.uoregon.edu">rasmus@cas.uoregon.edu</a></div><div><br></div></div></span><br class="Apple-interchange-newline"></span><br class="Apple-interchange-newline">
</div>
<br><div><div>On Feb 26, 2013, at 2:05 PM, Rolf Rabenseifner wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div>Is TS 29113 changing something in this case?<br>I.e., does TS 29113 allow LOGICAL dummy arguments in BIND(C) subroutines?<br><br>Rolf<br><br>----- Original Message -----<br><blockquote type="cite">From: "Jeff Squyres (jsquyres)" <<a href="mailto:jsquyres@cisco.com">jsquyres@cisco.com</a>><br></blockquote><blockquote type="cite">To: "<<a href="mailto:longb@cray.com">longb@cray.com</a>>" <<a href="mailto:longb@cray.com">longb@cray.com</a>>, "MPI-3 Fortran working group" <<a href="mailto:mpi3-fortran@lists.mpi-forum.org">mpi3-fortran@lists.mpi-forum.org</a>><br></blockquote><blockquote type="cite">Sent: Tuesday, February 26, 2013 7:04:09 PM<br></blockquote><blockquote type="cite">Subject: Re: [MPI3 Fortran] [Mpi-comments] MPI 3.0: Fortran 2008 interface - issue with the LOGICAL kind<br></blockquote><blockquote type="cite">On Feb 26, 2013, at 11:27 AM, Bill Long <<a href="mailto:longb@cray.com">longb@cray.com</a>> wrote:<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><blockquote type="cite">In particular, the C function is not using _Bool. It would seem to<br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite">be more consistent for the Fortran interface to specify the argument<br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite">as<br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite"><br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite">INTEGER :: FLAG<br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite"><br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite">or, better<br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite"><br></blockquote></blockquote><blockquote type="cite"><blockquote type="cite">INTEGER(c_int) :: FLAG.<br></blockquote></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">FWIW, the MPI Fortran interfaces have always used LOGICAL for boolean<br></blockquote><blockquote type="cite">values, not INTEGER. It would be weird to change them now.<br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">--<br></blockquote><blockquote type="cite">Jeff Squyres<br></blockquote><blockquote type="cite"><a href="mailto:jsquyres@cisco.com">jsquyres@cisco.com</a><br></blockquote><blockquote type="cite">For corporate legal information go to:<br></blockquote><blockquote type="cite"><a href="http://www.cisco.com/web/about/doing_business/legal/cri/">http://www.cisco.com/web/about/doing_business/legal/cri/</a><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite"><br></blockquote><blockquote type="cite">_______________________________________________<br></blockquote><blockquote type="cite">mpi3-fortran mailing list<br></blockquote><blockquote type="cite"><a href="mailto:mpi3-fortran@lists.mpi-forum.org">mpi3-fortran@lists.mpi-forum.org</a><br></blockquote><blockquote type="cite"><a href="http://lists.mpi-forum.org/mailman/listinfo.cgi/mpi3-fortran">http://lists.mpi-forum.org/mailman/listinfo.cgi/mpi3-fortran</a><br></blockquote><br>-- <br>Dr. Rolf Rabenseifner . . . . . . . . . .. email <a href="mailto:rabenseifner@hlrs.de">rabenseifner@hlrs.de</a><br>High Performance Computing Center (HLRS) . phone ++49(0)711/685-65530<br>University of Stuttgart . . . . . . . . .. fax ++49(0)711 / 685-65832<br>Head of Dpmt Parallel Computing . . . <a href="http://www.hlrs.de/people/rabenseifner">www.hlrs.de/people/rabenseifner</a><br>Nobelstr. 19, D-70550 Stuttgart, Germany . . . . (Office: Room 1.307)<br>_______________________________________________<br>mpi3-fortran mailing list<br><a href="mailto:mpi3-fortran@lists.mpi-forum.org">mpi3-fortran@lists.mpi-forum.org</a><br>http://lists.mpi-forum.org/mailman/listinfo.cgi/mpi3-fortran<br></div></blockquote></div><br></body></html>