1 /* begin include file program_interrupt_info.incl.pl1 BIM 1981 */
 2 /* format: style2 */
 3 
 4 /* condition_info_header.info.pl1 must be %included with this file */
 5 
 6      declare program_interrupt_info_ptr
 7                                     pointer;
 8 
 9      declare 1 program_interrupt_info
10                                     aligned based (program_interrupt_info_ptr),
11                2 header             aligned like condition_info_header,
12                2 default_handler_restarted_this_signal
13                                     bit (1) aligned;
14 
15      declare program_interrupt_info_version_1
16                                     fixed bin init (1) internal static options (constant);
17 
18      declare program_interrupt_condition_name
19                                     character (17) init ("program_interrupt") internal static options (constant);
20 
21      declare program_interrupt      condition;
22 
23 /* end include file program_interrupt_info.incl.pl1 */