From owner-sc22wg5+sc22wg5-dom8=www.open-std.org@open-std.org Thu Mar 15 23:12:48 2012 Return-Path: X-Original-To: sc22wg5-dom8 Delivered-To: sc22wg5-dom8@www.open-std.org Received: by www.open-std.org (Postfix, from userid 521) id DDDC49DB118; Thu, 15 Mar 2012 23:12:48 +0100 (CET) Delivered-To: sc22wg5@open-std.org Received: from exprod6og112.obsmtp.com (exprod6og112.obsmtp.com [64.18.1.29]) by www.open-std.org (Postfix) with ESMTP id 235619DB112 for ; Thu, 15 Mar 2012 23:12:44 +0100 (CET) Received: from CFWEX01.americas.cray.com ([136.162.34.11]) (using TLSv1) by exprod6ob112.postini.com ([64.18.5.12]) with SMTP ID DSNKT2JpWRqMgwH+xgK0ofRCXauPC0dZHI9m@postini.com; Thu, 15 Mar 2012 15:12:47 PDT Received: from fortran.us.cray.com (172.31.19.200) by CFWEX01.americas.cray.com (172.30.88.25) with Microsoft SMTP Server id 14.1.355.2; Thu, 15 Mar 2012 17:12:23 -0500 Message-ID: <4F626952.5050805@cray.com> Date: Thu, 15 Mar 2012 17:12:34 -0500 From: Bill Long Reply-To: Organization: Cray Inc. User-Agent: Mozilla/5.0 (Macintosh; Intel Mac OS X 10.6; rv:10.0.2) Gecko/20120216 Thunderbird/10.0.2 MIME-Version: 1.0 To: , sc22wg5 CC: "rabenseifner@hlrs.de" Subject: Re: (j3.2006) (SC22WG5.4653) [ukfortran] AW: Vote on N1904 References: <20120312152923.857DB9DB112@www.open-std.org> <20120314164259.A5DD4356A46@www.open-std.org> <20120314215009.D830F9DB112@www.open-std.org> <20120314225736.EE474356A42@www.open-std.org> <20120315010351.255249DB118@www.open-std.org> <20120315184754.BF0CA356973@www.open-std.org> In-Reply-To: <20120315184754.BF0CA356973@www.open-std.org> Content-Type: text/plain; charset="ISO-8859-1"; format=flowed Content-Transfer-Encoding: 7bit Sender: owner-sc22wg5@open-std.org Precedence: bulk On 3/15/12 1:47 PM, Van Snyder wrote: > > On Wed, 2012-03-14 at 18:03 -0700, Malcolm Cohen wrote: >> In fact, because we want to pass TYPE(*) except for >> alloc/ptr/ass-shape/ass-rank to a BIND(C) routine as a plain address >> [because it's much too much work for the user to type "C_LOC(...)"!], >> and this will necessarily exclude the type info, it appears to be the >> only restriction that will actually work at all. > > Since c_loc(...) seems to do everything that TYPE(*) is intended to do, > why do we have TYPE(*)? The only disadvantages are that the argument of > c_loc needs to be a variable with the TARGET or POINTER attribute. > Well, for starters, the willingness of people to rewrite their MPI codes to change call mpi_xxx (buffer...) to call mpi_xxx (c_loc(buffer)...) is really close to zero. And that an actual argument that is not a variable is undefinable. Cheers, Bill > > _______________________________________________ > J3 mailing list > J3@j3-fortran.org > http://j3-fortran.org/mailman/listinfo/j3 -- Bill Long longb@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