1 /* BEGIN INCLUDE FILE ... plio2_fsbr.incl.pl1 */
 2 /* format: style3,idind30 */
 3 
 4 /* This declaration is used by record I/O runtime programs */
 5 
 6 declare   1 fsbr                        aligned based (fsbp),
 7             2 switch                    aligned,
 8               3 zot                     (2) bit (1) unaligned,
 9               3 version_2               bit (1) unaligned,
10               3 open                    bit (1) unaligned,
11               3 print                   bit (1) unaligned,
12               3 input                   bit (1) unaligned,
13               3 output                  bit (1) unaligned,
14               3 update                  bit (1) unaligned,
15               3 stream                  bit (1) unaligned,
16               3 notkeyed                bit (1) unaligned,
17               3 record                  bit (1) unaligned,
18               3 sequential              bit (1) unaligned,
19               3 direct                  bit (1) unaligned,
20               3 interactive             bit (1) unaligned,
21               3 not_used_1              bit (1) unaligned,
22               3 not_used_2              bit (1) unaligned,
23               3 stringvalue             bit (1) unaligned,
24               3 keyed                   bit (1) unaligned,
25               3 namelist                bit (1) unaligned,
26               3 implementation          bit (1) unaligned,
27               3 not_used_4              bit (1) unaligned,
28               3 transmit_error          bit (1) unaligned,
29               3 buffer_in_use           bit (1) unaligned,
30               3 copy                    bit (1) unaligned,
31               3 detach                  bit (1) unaligned,
32               3 te_hold                 bit (1) unaligned,
33               3 not_used_5              bit (1) unaligned,
34               3 internal                bit (1) unaligned,
35               3 threaded                bit (1) unaligned,
36               3 fsb_in_use              bit (1) unaligned,
37               3 console                 bit (1) unaligned,
38               3 emptyline               bit (1) unaligned,
39               3 iox_close               bit (1) unaligned,
40               3 pad4                    bit (1) unaligned,
41               3 pad5                    bit (1) unaligned,
42               3 pad6                    bit (1) unaligned,
43             2 nono                      aligned,
44               3 bit_string              bit (1) unaligned,
45               3 not_used_3              bit (1) unaligned,
46               3 read                    bit (1) unaligned,
47               3 write                   bit (1) unaligned,
48               3 rewrite                 bit (1) unaligned,
49               3 delete                  bit (1) unaligned,
50               3 locate                  bit (1) unaligned,
51               3 key                     bit (1) unaligned,
52               3 keyto                   bit (1) unaligned,
53               3 keyfrom                 bit (1) unaligned,
54               3 set                     bit (1) unaligned,
55               3 into                    bit (1) unaligned,
56               3 ignore                  bit (1) unaligned,
57               3 from                    bit (1) unaligned,
58               3 nofrom                  bit (1) unaligned,
59               3 nokey                   bit (1) unaligned,
60               3 nokeyfrom               bit (1) unaligned,
61               3 nolock                  bit (1) unaligned,
62             2 recio                     aligned,
63               3 rec_exists              bit (1) unal,
64               3 rec_valid               bit (1) unal,
65               3 buffer_used             bit (1) unal,
66             2 iocb_p                    ptr unal,
67             2 inbuf_curlen              fixed bin (15),
68             2 inbuf_maxlen              fixed bin (15),
69             2 inbuf_ptr                 ptr,
70             2 inbuf_sw                  aligned,
71               3 exists                  bit (1) unal,
72               3 free                    bit (1) unal,
73               3 use                     bit (1) unal,
74             2 pad7                      bit (36) aligned,
75             2 outbuf_curlen             fixed bin (15),
76             2 outbuf_maxlen             fixed bin (15),
77             2 outbuf_ptr                ptr,
78             2 outbuf_sw                 aligned,
79               3 exists                  bit (1) unal,
80               3 free                    bit (1) unal,
81               3 use                     bit (1) unal,
82               3 keyed                   bit (1) unal,
83             2 lnzc                      fixed bin (35),     /* last nonzero code from iox_ */
84             2 filename                  char (32) aligned,  /* declared file name */
85             2 title                     char (32) unaligned,/* Multics I/O switch */
86             2 fsb_thread                ptr,
87             2 outbuf_key                char (256) varying, /* if file is keyed & output_sw.use then key is here */
88             2 key_saved                 char (256) varying, /* if file is keyed & recio.rec_valid then its key is here */
89             2 buffer                    (82) bit (36) aligned,
90             2 path_name                 char (168) unal,    /* title option */
91             2 declared_attributes       (2) bit (36) aligned;
92 
93 /* END INCLUDE FILE ... plio2_fsbr.incl.pl1 */