1 /* BEGIN INCLUDE FILE ... symbol.incl.pl1 */
  2 
  3 dcl       1 symbol                      based aligned,
  4           2 node_type                   bit(9) unal,
  5           2 source_id                   structure unal,
  6             3 file_number               bit(8),
  7             3 line_number               bit(14),
  8             3 statement_number          bit(5),
  9           2 location                    fixed(18) unal unsigned,
 10           2 allocated                   bit(1) unal,
 11           2 dcl_type                    bit(3) unal,
 12           2 reserved                    bit(6) unal,
 13           2 pix                         unal,
 14             3 pic_fixed                 bit(1) unal,
 15             3 pic_float                 bit(1) unal,
 16             3 pic_char                  bit(1) unal,
 17             3 pic_scale                 fixed(7) unal,
 18             3 pic_size                  fixed(7) unal,
 19           2 level                       fixed(8) unal,
 20           2 boundary                    fixed(3) unal,
 21           2 size_units                  fixed(3) unal,
 22           2 scale                       fixed(7) unal,
 23           2 runtime                     bit(18) unal,
 24           2 runtime_offset              bit(18) unal,
 25           2 block_node                  ptr unal,
 26           2 token                       ptr unal,
 27           2 next                        ptr unal,
 28           2 multi_use                   ptr unal,
 29           2 cross_references            ptr unal,
 30           2 initial                     ptr unal,
 31           2 array                       ptr unal,
 32           2 descriptor                  ptr unal,
 33           2 equivalence                 ptr unal,
 34           2 reference                   ptr unal,
 35           2 general                     ptr unal,
 36           2 father                      ptr unal,
 37           2 brother                     ptr unal,
 38           2 son                         ptr unal,
 39           2 word_size                   ptr unal,
 40           2 bit_size                    ptr unal,
 41           2 dcl_size                    ptr unal,
 42           2 symtab_size                 ptr unal,
 43           2 c_word_size                 fixed(24),
 44           2 c_bit_size                  fixed(24),
 45           2 c_dcl_size                  fixed(24),
 46 
 47           2 attributes                  structure aligned,
 48             3 data_type                 structure unal,
 49               4 structure               bit(1) ,
 50               4 fixed                   bit(1),
 51               4 float                   bit(1),
 52               4 bit                     bit(1),
 53               4 char                    bit(1),
 54               4 ptr                     bit(1),
 55               4 offset                  bit(1),
 56               4 area                    bit(1),
 57               4 label                   bit(1),
 58               4 entry                   bit(1),
 59               4 file                    bit(1),
 60               4 arg_descriptor          bit(1),
 61               4 storage_block           bit(1),
 62               4 explicit_packed         bit(1), /* options(packed) */
 63               4 condition               bit(1),
 64               4 format                  bit(1),
 65               4 builtin                 bit(1),
 66               4 generic                 bit(1),
 67               4 picture                 bit(1),
 68 
 69             3 misc_attributes           structure unal,
 70               4 dimensioned             bit(1),
 71               4 initialed               bit(1),
 72               4 aligned                 bit(1),
 73               4 unaligned               bit(1),
 74               4 signed                  bit(1),
 75               4 unsigned                bit(1),
 76               4 precision               bit(1),
 77               4 varying                 bit(1),
 78               4 local                   bit(1),
 79               4 decimal                 bit(1),
 80               4 binary                  bit(1),
 81               4 real                    bit(1),
 82               4 complex                 bit(1),
 83               4 variable                bit(1),
 84               4 reducible               bit(1),
 85               4 irreducible             bit(1),
 86               4 returns                 bit(1),
 87               4 position                bit(1),
 88               4 internal                bit(1),
 89               4 external                bit(1),
 90               4 like                    bit(1),
 91               4 member                  bit(1),
 92               4 non_varying             bit(1),
 93               4 options                 bit(1),
 94               4 variable_arg_list       bit(1),             /* options(variable) */
 95               4 alloc_in_text           bit(1),             /* options(constant) */
 96 
 97             3 storage_class             structure unal,
 98               4 auto                    bit(1),
 99               4 based                   bit(1),
100               4 static                  bit(1),
101               4 controlled              bit(1),
102               4 defined                 bit(1),
103               4 parameter               bit(1),
104               4 param_desc              bit(1),
105               4 constant                bit(1),
106               4 temporary               bit(1),
107               4 return_value            bit(1),
108 
109             3 file_attributes           structure unal,
110               4 print                   bit(1),
111               4 input                   bit(1),
112               4 output                  bit(1),
113               4 update                  bit(1),
114               4 stream                  bit(1),
115               4 reserved_1              bit(1),
116               4 record                  bit(1),
117               4 sequential              bit(1),
118               4 direct                  bit(1),
119               4 interactive             bit(1),             /* env(interactive) */
120               4 reserved_2              bit(1),
121               4 reserved_3              bit(1),
122               4 stringvalue             bit(1),             /* env(stringvalue) */
123               4 keyed                   bit(1),
124               4 reserved_4              bit(1),
125               4 environment             bit(1),
126 
127             3 compiler_developed        structure unal,
128               4 aliasable               bit(1),
129               4 packed                  bit(1),
130               4 passed_as_arg           bit(1),
131               4 allocate                bit(1),
132               4 set                     bit(1),
133               4 exp_extents             bit(1),
134               4 refer_extents           bit(1),
135               4 star_extents            bit(1),
136               4 isub                    bit(1),
137               4 put_in_symtab           bit(1),
138               4 contiguous              bit(1),
139               4 put_data                bit(1),
140               4 overlayed               bit(1),
141               4 error                   bit(1),
142               4 symtab_processed        bit(1),
143               4 overlayed_by_builtin    bit(1),
144               4 defaulted               bit(1),
145               4 connected               bit(1);
146 
147 /* END INCLUDE FILE ... symbol.incl.pl1 */