1 dcl (     callers_stack       init(16),           /* ptr to caller's stack frame */
 2           language_id_code    init(24),           /* identifies pl/1 */
 3           entry_descriptor    init(2),            /* ptr to entry descriptor in text */
 4           display_ptr         init(32),
 5           int_static_ptr      init(34),
 6           linkage_ptr         init(36),
 7           reset_next_ptr      init(0),            /* initial value of next sp */
 8           enabled_on_units    init(38),
 9           long_string_loc     init(40),           /* loc of long_string_temp */
10           invocation_count    init(42),
11           on_inhibit_mask     init(43),
12           single_temp_loc     init(44),           /* loc of single_temp */
13           double_temp_loc     init(46),           /* loc of double_temp */
14           param_array         init(64))
15                                         fixed bin(15) int static;