1 
 2 
 3      "BEGIN INCLUDE FILE flagbox.incl.alm
 4 
 5 
 6 " HISTORY COMMENTS:
 7 "  1) change(87-03-03,Farley), approve(87-04-15,MCR7661),
 8 "     audit(87-04-21,Fawcett), install(87-04-28,MR12.1-1028):
 9 "     Added io_reconfig flag to inhibit BCE from attempting an emergency
10 "     shutdown when the data in memory could be corrupted.
11 "                                                      END HISTORY COMMENTS
12 
13 
14 
15 
16           "Created 03/03/87  1026.3 mst Tue by convert_include_file,
17           "   Version of 01/09/85  0754.4 mst Wed.
18 
19           "Made from >udd>m>Farley>install_dir>rcf>flagbox.incl.pl1,
20           "   modified 02/26/87  1355.3 mst Thu
21 
22 "
23 "         Structure fgbx
24 "
25           equ       fgbx_size,96
26 
27 
28           equ       fgbx.toehold_used,0
29 
30           equ       fgbx.flags_word,32
31           bool      fgbx.flags,400000             " DU
32 
33           equ       fgbx.slt_segno,33             " UPPER
34 
35           equ       fgbx.rtb,35                   " LEVEL 2
36 
37           bool      fgbx.ssenb,400000             " DU
38           bool      fgbx.call_bce,200000          " DU
39           bool      fgbx.shut,100000              " DU
40           bool      fgbx.mess,040000              " DU
41           bool      fgbx.alert,020000             " DU
42           bool      fgbx.breakpoint,010000        " DU
43           bool      fgbx.manual_crash,004000      " DU
44           bool      fgbx.io_reconfig,002000       " DU
45           equ       fgbx.bce_entry_shift,1
46           bool      fgbx.bce_entry_mask,000077
47 
48           equ       fgbx.sentinel,36
49           equ       fgbx.sst_sdw,44               " DOUBLE
50           equ       fgbx.hc_dbr,46                " DOUBLE
51           equ       fgbx.message,48
52           equ       fgbx.return_to_bce_command,64
53 
54      "END INCLUDE FILE flagbox.incl.alm