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.