type_FUNCTION_ARG
- Pass a FUNCTION argument to a FORTRAN routine
Description:
Pass a FORTRAN-callable FUNCTION of the appropriate type to a FORTRAN
routine.
The argument should be the address of the function being passed.
(type is one of CHARACTER, INTEGER, REAL, DOUBLE, LOGICAL, BYTE,
WORD, UBYTE, UWORD or POINTER.)
Invocation:
type_FUNCTION_ARG(p_arg)
Arguments:
p_arg
A pointer to the FUNCTION being passed.
Examples:
type_FUNCTION_ARG(arg)
will expand as follows:
All systems:
F77_EXTERNAL_NAME(arg)
where F77_EXTERNAL_NAME expands appropriately for the
platform.
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