From: Dan Nagle <dnagle@erols.com>
Subject: Re: Passing Unconstrained Arrays from FORTRAN to an Ada95 subunit
Date: Sun, 21 Jul 2002 16:32:33 -0400
Date: 2002-07-21T20:33:18+00:00 [thread overview]
Message-ID: <oc6mjukedfqnknmudt238nlcl1l3tfgiv6@4ax.com> (raw)
In-Reply-To: sDC_8.81853$Wt3.54908@rwcrnsc53
Hello,
That depends on how the array is declared in the Fortran.
integer, dimension(n) :: a ! pass starting address
integer, dimension(*) :: a ! pass starting address, no length
integer, dimension(:) :: a ! pass descriptor
For the (:) case, check the Fortran compiler's documentation
for the descriptor definition. Most compilers supply this
data, a few :-( consider this to be a proprietary secret.
A few experiments should indicate how it works anyway.
--
Cheers!
Dan Nagle
Purple Sage Computing Solutions, Inc.
<snip>
>Does modern Fortran pass the length implicitly? Apparently your Ada
>compiler doesn't think so.
next prev parent reply other threads:[~2002-07-21 20:32 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2002-07-20 0:57 Passing Unconstrained Arrays from FORTRAN to an Ada95 subunit Karen Carron
2002-07-20 2:34 ` tmoran
2002-07-21 13:44 ` Karen Carron
2002-07-21 18:00 ` tmoran
2002-07-21 20:32 ` Dan Nagle [this message]
2002-07-22 1:17 ` Karen Carron
2002-07-22 1:48 ` Robert Dewar
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox