Enterprise COBOL has two sorts of pointers, [vanilla COBOL] pointer, which
occupies 8 bytes but is NOT an AMODE(64) pointer, and function pointer, which
occupies only 4 bytes and is a classical C, HLASM. or PL/I pointer. Its null
value, for which you must make provision in doing aliased pointer arithmetic in
COBOL, is x'00000000'.
I strongly suggest that you use only instances of function pointer to do
pointer arithmetic in COBOL. You will sometimes but not always get away with
using the eight-byte pointer values, which contain some non-address baggage.
In general, use the same schemata you would use to pass a COBOL pointer to a C
subroutine.
John Gilmore Ashland, MA 01721-1817 USA
_________________________________________________________________
Hotmail is redefining busy with tools for the New Busy. Get more from your
inbox.
http://www.windowslive.com/campaign/thenewbusy?ocid=PID28326::T:WLMTAGL:ON:WL:en-US:WM_HMP:042010_2
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
