Experimental Physics and
Industrial Control System

Jeff Hill <[email protected]> · Wed, 24 Apr 1996 16:02:27 -0600

This is a multi-part message in MIME format.

--------------7566F4CF42877E5C33590565
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

Mark M. Ito wrote:
> 
> I am trying to do the unthinkable: call channel access from a FORTRAN
> program (thought I'd capitalize that just to iritate this
> audience). Having attended college in the 70's, I am a bit behind
> these object-oriented times. Is there a set of sockets out there to
> allow this?

If you are willing to use the DEC FORTRAN extensions then it should
be possible to call the CA client lib "C" API directly from FORTRAN.
I understand that the DEC extensions are somewhat of a defacto
standard and that they have been available from SUN since the 
early 90s. This will require a clear understanding of the 
argument passing mechanisms employed by C and FORTRAN. This
approach has been used successfully by members of AOT-6 here at LANL
for channel access clients running on a VAX.

C functions that require strings will cause some grief (C expects
nill terminated strings most FORTRAN implementations store strings 
in a data descriptor). One posssible solution: write a small C 
routine that takes a FORTRAN string and returns a nill terminated 
C string back to the FORTRAN caller. This nill terminated string 
could then be passed to the CA client API.

Jeff

--------------7566F4CF42877E5C33590565
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Content-Disposition: inline; filename="signature"

______________________________________________________________________
Jeffrey O. Hill                 Internet        [email protected]
LANL MS H820                    Voice           505 665 1831
Los Alamos, NM 87545 USA        FAX             505 665 5107

--------------7566F4CF42877E5C33590565--

Experimental Physics and Industrial Control System

Experimental Physics and
Industrial Control System