Technical data

Fortran/Pascal Interface

• Note that Fortran requires that each INTEGER, LOGICAL, and REAL

variable occupy 32 bits of memory.

• Functions of type INTEGER, REAL, or DOUBLE PRECISION are

interchangeable between Fortran and Pascal and require no special

considerations.

• The Fortran compiler may add items not explicitly speciﬁed in the

source code to the argument list. The compiler adds the following items

under the conditions speciﬁed:

– destination address for character functions, when called

– length of character strings, when an argument is the address of a

character string

When a Pascal program calls a Fortran subprogram, the Pascal program

must explicitly specify these items in its argument list in the following order:

1. Destination address of character function.

2. Normal arguments (addresses of arguments or functions).

3. Length of character strings. The length must be speciﬁed as an absolute

value or INTEGER variable. The next two examples illustrate these

rules.

record

r:real;

i:real;

end;

complex

record

r:double;

i:double;

end;

double complex

Table 3-6 (continued) Equivalent Fortran and Pascal Data Types

Pascal Fortran