1 /* BEGIN INCLUDE FILE ...  probe_break_slot.incl.pl1
 2 
 3    This is separate from probe_break_info.incl.pl1 because many programs
 4    need to get at a break_slot, but don't deserve to see the rest of that information
 5 
 6 */
 7 
 8 dcl 1 break_slot based (bsp) aligned,                       /* describes (and handles) each probe break */
 9     2 item_type fixed bin,                                  /* 0 -> break_slot type code */
10     2 breakmap_header_offset bit (18) unal,                 /* to break map header, chain is not used */
11     2 statement_item_offset bit (18) unal,
12     2 size fixed bin,                                       /* number of words in the break_slot */
13     2 sequence (0:7),                                       /* "before" or "after" instructions to "trap" the break */
14       3 offset bit (18) unaligned,                          /* address portion, some patched */
15       3 skip bit (18) unaligned,                            /* op code portion */
16     2 old_instruction bit (36) aligned,                     /* instruction that was replaced by break */
17     2 symbol_block_offset bit (18) unal,                    /*  for containing block */
18     2 location bit (18) unal,                               /* offset of instruction that was replaced by break */
19     2 type fixed bin,                                       /* 0 -> after, 1 -> before */
20     2 count fixed bin,                                      /* number of characters in command list */
21     2 command_list character (0 refer (break_slot.count));  /* command list associated with break */
22 
23 dcl bsp ptr;
24 
25 dcl (BREAK_AFTER init (0),
26      BREAK_BEFORE init (1),
27      BREAK_AT init (2)) fixed bin internal static options (constant);
28 
29 dcl  PLACE (0:2) char (8) aligned internal static options (constant) init ("after", "before", "at");
30 
31 /* END INCLUDE FILE ... probe_break_slot.incl.pl1 */