1 /* BEGIN INCLUDE SEGMENT ... symbol_block.incl.pl1
 2 coded February 8, 1972 by Michael J. Spier        */
 3 
 4 /* last modified may 3, 1972  by M. Weaver */
 5 
 6 declare   1 sb aligned based(sblkp),              /* structure describing a standard symbol block */
 7           2 decl_vers fixed bin,                  /* version number of current structure format */
 8           2 identifier char(8) aligned,           /* symbolic code to define purpose of this symb block */
 9           2 gen_version_number fixed bin,         /* positive integer designating version of object generator */
10           2 gen_creation_time fixed bin(71),      /* clock reading of date/time generator was created */
11           2 obj_creation_time fixed bin(71),      /* clock reading of date/time object was generated */
12           2 generator char(8) aligned,            /* name of processor which generated segment */
13           2 gen_name_offset bit(18) unaligned,    /* offset of generator name in words rel to base of symbol block */
14           2 gen_name_length bit(18) unaligned,    /* length of printable generator version name in characters */
15           2 uid_offset bit(18) unaligned,         /* offset of creator id in words rel to base of symbol block */
16           2 uid_length bit(18) unaligned,         /* length of standard Multics id of object creator in characters */
17           2 comment_offset bit(18) unaligned,     /* offset of comment in words relative to base of symbol block */
18           2 comment_length bit(18) unaligned,     /* length of printable generator comment in characters */
19           2 tbound bit(18) unaligned,             /* specifies mod of text section base boundary */
20           2 stat_bound bit(18) unaligned,         /* specifies mod of internal static base boundary */
21           2 source_map bit(18) unaligned,         /* offset relative to base of symbol block of source map structure */
22           2 area_ptr bit(18) unaligned,           /* offset of block info in words relative to base of symbol block */
23           2 symb_base bit(18) unaligned,          /* back pointer (rel to base of symb block) to base of symb section */
24           2 block_size bit(18) unaligned,         /* size in words of entire symbol block */
25           2 next_block bit(18) unaligned,         /* if ^= "0"b, is thread (rel to base of symb section) to next symb block */
26           2 rel_text bit(18) unaligned,           /* offset rel to base of symbol block of text sect relocation info */
27           2 rel_def bit(18) unaligned,            /* offset rel to base of symb block of def section relocation info */
28           2 rel_link bit(18) unaligned,           /* offset rel to base of symb block of link sect relocation info */
29           2 rel_symb bit(18) unaligned,           /* offset rel to base of symb block of symb sect relocation info */
30           2 default_truncate bit(18) unaligned,   /* offset RTBOSB for binder to automatically trunc. symb sect. */
31           2 optional_truncate bit(18) unaligned;  /* offset RTBOSB for binder to optionally truncate symb section */
32 
33 /* END INCLUDE SEGMENT ... symbol_block.incl.pl1 */