F77_NAMED_COMMON

Refer to a named common block

Description:

Expand to the external name of a named common block on the computer in use. This is used in declaring an external structure in C that overlays a FORTRAN named common block.

Invocation

F77_NAMED_COMMON(name)

Arguments

name
The name of the common block.

Examples:

F77_NAMED_COMMON(name)
will expand as follows:
All Unix: name_
VAX/VMS: name
extern struct {int i,j,k;} F77_NAMED_COMMON(block);
declares an external structure to use the same storage as the FORTRAN named common block.
F77_NAMED_COMMON(block).i
refers to component i of the above structure.