8

The FORTRAN main program, ChrCAmain.f

character s*16

data s / "this is a string" / call ChrCA( s, %VAL(0), %VAL(15) ) write( *, "(A)" ) s

stop end

The commands to compile and execute ChrCA.p and

CharCAmain.f

hostname% pc -c ChrCA.p

hostname% f77 ChrCA.o ChrCAmain.f -lpfc -lpc ChrCAmain.f:

MAIN: hostname% a.out This is a string

Records and Structures

In most cases, a Pascal record describes the same objects as its FORTRAN structure equivalent, provided that the components have compatible types and are declared in the same order. The compatibility of the types depends mostly on size and alignment.

For more information, see “Compatibility of Types for FORTRAN and Pascal” on page 164.

The FORTRAN–Pascal Interface

175