1 02/17/2017  pointer_info_
 2 
 3 
 4 Functions to interpret pointer values.
 5 
 6 
 7 Entry points in pointer_info_:
 8    (List is generated by the help command)
 9 
10 
11 :Entry:  pointer_info_:  02/17/2017  pointer_info_
12 
13 
14 Function:
15 This function returns information about a pointer value.
16 
17 
18 Syntax:
19 dcl pointer_info_ entry (ptr, fixed bin(35)) returns(char(76) var);
20 data = pointer_info_(pointer_value, code);
21 
22 
23 Arguments:
24 pointer_value
25    is an aligned pointer value to be investigated.(Input)
26 code
27    is a standard status code.(Output)  If nonzero, then an empty
28    string is returned as the data.
29 
30 
31 :Entry:  location:  02/17/2017  pointer_info_$location
32 
33 
34 Function:
35 This function returns information about pointer storage (a pair of
36 words) at a specified location.  It checks for a pointer modifier
37 at the end of the first word.
38 
39 
40 Syntax:
41 dcl pointer_info_$location entry (ptr, fixed bin(35))
42        returns(char(76) var);
43 data = pointer_info_$location(pointer_loc, code);
44 
45 
46 Arguments:
47 pointer_loc
48    is an aligned pointer to the storage location containing the
49    pointer to be investigated.  This storage must begin on an even
50    word boundary.  The pair of words at that location are
51    investigated as a possible pointer value, having either an ITS
52    (octal 43) or Fault Tag 2 (octal 46) modifier at the end of the
53    first word in the pair.
54 code
55    is a standard status code.(Output)  If nonzero, then an empty
56    string is returned as the data.