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: 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