1
2
3
4
5 declare 1 block aligned based,
6 2 node_type bit (9) unaligned,
7 2 source_id structure unaligned,
8 3 file_number bit (8),
9 3 line_number bit (14),
10 3 statement_number bit (5),
11 2 father ptr unaligned,
12 2 brother ptr unaligned,
13 2 son ptr unaligned,
14 2 declaration ptr unaligned,
15 2 end_declaration ptr unaligned,
16 2 default ptr unaligned,
17 2 end_default ptr unaligned,
18 2 context ptr unaligned,
19 2 prologue ptr unaligned,
20 2 end_prologue ptr unaligned,
21 2 main ptr unaligned,
22 2 end_main ptr unaligned,
23 2 return_values ptr unaligned,
24 2 return_count ptr unaligned,
25 2 plio_ps ptr unaligned,
26 2 plio_fa ptr unaligned,
27 2 plio_ffsb ptr unaligned,
28 2 plio_ssl ptr unaligned,
29 2 plio_fab2 ptr unaligned,
30 2 block_type bit (9) unaligned,
31 2 prefix bit (12) unaligned,
32 2 like_attribute bit (1) unaligned,
33 2 no_stack bit (1) unaligned,
34 2 get_data bit (1) unaligned,
35 2 flush_at_call bit (1) unaligned,
36 2 processed bit (1) unaligned,
37 2 text_displayed bit (1) unaligned,
38 2 number fixed bin (9) unsigned unaligned,
39 2 free_temps dimension (3) ptr,
40 2 temp_list ptr,
41 2 entry_list ptr,
42 2 o_and_s ptr,
43 2 why_nonquick aligned,
44 3 auto_adjustable_storage bit (1) unaligned,
45 3 returns_star_extents bit (1) unaligned,
46 3 stack_extended_by_args bit (1) unaligned,
47 3 invoked_by_format bit (1) unaligned,
48 3 format_statement bit (1) unaligned,
49 3 io_statements bit (1) unaligned,
50 3 assigned_to_entry_var bit (1) unaligned,
51 3 condition_statements bit (1) unaligned,
52 3 no_owner bit (1) unaligned,
53 3 recursive_call bit (1) unaligned,
54 3 options_non_quick bit (1) unaligned,
55 3 options_variable bit (1) unaligned,
56 3 never_referenced bit (1) unaligned,
57 3 pad_nonquick bit (5) unaligned,
58 2 prologue_flag bit (1) unaligned,
59 2 options_main bit (1) unaligned,
60 2 pad bit (16) unaligned,
61 2 number_of_entries fixed bin (17),
62 2 level fixed bin (17),
63 2 last_auto_loc fixed bin (17),
64 2 symbol_block fixed bin (17),
65 2 entry_info fixed bin (18),
66 2 enter structure unaligned,
67 3 start fixed bin (17),
68 3 end fixed bin (17),
69 2 leave structure unaligned,
70 3 start fixed bin (17),
71 3 end fixed bin (17),
72 2 owner ptr;
73
74 declare max_block_number fixed bin internal static options (constant) initial (511);
75
76