1 /* BEGIN INCLUDE FILE ... decode_definition_str.incl.pl1 2 3 describes the output structures used by decode_definition 4 James R. Davis 25 Mar 79 */ 5 6 dcl 1 decode_definition_common_header based aligned, 7 2 next_def ptr, /* to next def in list */ 8 2 prev_def ptr, /* to previous def in list */ 9 2 block_ptr ptr, /* to either defblock or segname */ 10 2 section char (4) aligned, /* "text", "link", "symb", "segn" */ 11 2 offset fixed bin, /* if section isnt "segn", offset of def in section */ 12 2 entrypoint fixed bin; /* if entrypoint non0 offset of entry in text section */ 13 14 dcl 1 decode_definition_str based aligned, /* for callers of decode_definition_ */ 15 2 header like decode_definition_common_header, 16 2 symbol char (32) aligned; /* for symbolic name */ 17 18 dcl 1 decode_definition_full based aligned, /* for callers of decode_definition_$full */ 19 2 header like decode_definition_common_header, 20 2 symbol char (256) aligned, /* symbolic name */ 21 2 symbol_lng fixed bin, /* actual length of the symbol */ 22 2 flags, /* same as in definition */ 23 3 new_format bit (1) unal, /* def is in new format */ 24 3 ignore bit (1) unal, /* linker should ignore this def */ 25 3 entrypt_flag bit (1) unal, /* this def is for an entrypoint */ 26 3 retain bit (1) unal, 27 3 arg_count bit (1) unal, /* there is an arg count for entry */ 28 3 desc_sw bit (1) unal, /* there are descriptors */ 29 3 unused bit (30) unal, 30 2 nargs fixed bin, /* number of args entry expects */ 31 2 desc_ptr ptr; /* to array of rel ptrs to descriptors */ 32 33 34 dcl 1 decode_definition_acc based aligned, /* for callers of decode_cref entry */ 35 2 header like decode_definition_common_header, 36 2 acc_ptr ptr; /* to ACC string of symbolic name */ 37 38 /* END INCLUDE FILE decode_definition_str.incl.pl1 */