This shows you the differences between two versions of the page.
Both sides previous revision Previous revision | |||
sharing_20private_20variables [2018/04/17 18:43] tbest3112 Added syntax highlighting |
sharing_20private_20variables [2020/08/09 10:34] (current) richardrussell Modified array example |
||
---|---|---|---|
Line 73: | Line 73: | ||
PRIVATE array() | PRIVATE array() | ||
DIM array(100) | DIM array(100) | ||
- | !^a() = !^array() | + | PROCsetarrayptr(a(), FNgetarrayptr(array())) |
ENDPROC | ENDPROC | ||
+ | | ||
+ | DEF FNgetarrayptr(RETURN a%%) = a%% | ||
+ | DEF PROCsetarrayptr(RETURN a%%, p%%) : a%% = p%% : ENDPROC | ||
</code> | </code> |