1 /* BEGIN INCLUDE SEGMENT ... symbol_block_header.incl.pl1  */
 2 
 3           /* Declaration of obsolete symbol block temporarily
 4              generated by the binder                        */
 5 
 6 declare   1 symblk_head aligned based(sblkp),
 7 
 8           2 block_id char(8) aligned,             /* identifier of this symbol block */
 9           2 dcl_version fixed bin,                /* version number of this structure = 1 */
10           2 comp_version_number fixed bin,        /* generator's version number */
11           2 comp_creation_time fixed bin(71),     /* compiler creation time (compatible with old symb table) */
12           2 object_creation_time fixed bin(71),   /* clock reading (compatible with old symb table) */
13           2 comp_id char(8) aligned,              /* identifier of object generator */
14           2 comp_version_name,
15             3 name_ptr bit(18) unaligned,         /* pointer to string */
16             3 name_lng bit(18) unaligned,         /* length of string */
17           2 userid,
18             3 id_ptr bit(18) unaligned,           /* pointer to userid string */
19             3 id_lng bit(18) unaligned,           /* lng of userid string */
20           2 comment,
21             3 com_ptr bit(18) unaligned,          /* pointer to comment string */
22             3 com_lng bit(18) unaligned,          /* length of comment string */
23           2 source_map_ptr bit(18) unaligned,     /* pointer to array of sourcefile specifiers */
24           2 source_map_size bit(18) unaligned,    /* dimension of source map */
25           2 block_ptr bit(18) unaligned,          /* pointer to beginning of symbol block */
26           2 section_base bit(18) unaligned,       /* backpointer to symbol section base */
27           2 block_size bit(18) unaligned,         /* size of symbol block (incl header) */
28           2 next_block bit(18) unaligned,         /* thread to next symbol block */
29           2 rel_text bit(18) unaligned,           /* pointer to text relocation bits */
30           2 rel_link bit(18) unaligned,           /* pointer to linkage relocation bits */
31           2 rel_symbol bit(18) unaligned,         /* pointer to symbol relocation bits */
32           2 mini_truncate bit(18) unaligned,      /* minimum truncate value */
33           2 maxi_truncate bit(18) unaligned;      /* maximum truncate value */
34 
35 /* END INCLUDE SEGMENT ... symbol_block_header.incl.pl1 */