1
2
3
4
5
6 dcl 1 level_frame based (lfp) aligned,
7 2 next ptr unal,
8 2 prev ptr unal,
9 2 number fixed bin,
10 2 printed_number fixed bin,
11 2 printed_decimal fixed bin,
12 2 condition_frame_ptr ptr,
13 2 flags unal,
14 3 quick bit (1) unal,
15 3 error_signalled bit (1) unal,
16 3 support bit (1) unal,
17 3 run_unit_manager bit (1) unal,
18 3 pad bit (32) unal,
19 2 source_info aligned like source_info,
20 2 component_info aligned,
21 3 component_name char (32),
22 3 component_text_ptr ptr;
23
24 dcl lfp ptr;
25
26