next up previous 252
Next: F77_POINTER_TYPE - Define the type POINTER
Up: Full Description of F77 Macros
Previous: F77_LOGICAL_TYPE - Define the type LOGICAL


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.



next up previous 252
Next: F77_POINTER_TYPE - Define the type POINTER
Up: Full Description of F77 Macros
Previous: F77_LOGICAL_TYPE - Define the type LOGICAL

CNF and F77 Mixed Language Programming -- FORTRAN and C
Starlink User Note 209
P.M. Allan
A.J. Chipperfield
R.F. Warren-Smith
19 January 2000
E-mail:ussc@star.rl.ac.uk