CHARACTER_ARRAY_ARG

Pass a CHARACTER array argument to a FORTRAN routine

Description:

Pass a CHARACTER array argument to a FORTRAN routine. The argument should be the address of a CHARACTER array.

Invocation

CHARACTER_ARRAY_ARG(p_arg)

Arguments

p_arg
A pointer to the actual array being passed.

Examples:

CHARACTER_ARRAY_ARG(charg)
will expand as follows:
All Unix: (char *)charg
VAX/VMS: charg_arg

Notes:

The cast in the expansion for Unix ensures that multi-dimensional arrays (arrays of arrays), for example as declared by DECLARE_type_ARRAY, may be passed.