Is there any way I can pass an array from one REXX program to an external
REXX function, and return an array to the calling program?  I can do it
relatively easily if the function is internal to the main program file.

Also, is there a way to either (1) force selected variables in an included
function as private without using the PROCEDURE statement, or (2) use
something like a PROCEDURE EXPOSE statement to expose an array name passed
as an arguement to the function?  An example would be something like this:

    /* REXX Main */
    array_var.0 = 0
    call test_fcn 'array_var'
    say 'Returned array value 3 is "'array_var.3'"'
    exit 0

    test_fcn:
    parse arg array_root junk
    interpret 'procedure expose' array_root'.'
    interpret array_root'.3 = "Third element of array."'
    return 0

As I read it, the PROCEDURE statement (or INTERPRET 'PROCEDURE EXPOSE'
array_root) must procede the ARG (or PARSE ARG) statement, which makes the
example test_fcn procedure fail.  I get the feeling that I'm missing
something simple here.  Any suggestions?

Many thanks...

Bob
[bswift{at}connect.ab.ca]


--- GoldED/2 2.50+