1 /* BEGIN INCLUDE FILE gtss_SYstarstar_.incl.pl1 */
 2 /*
 3   Created:  (Wardd Multics)  06/13/78 1612.8 mst Tue
 4 */
 5 
 6 /**       gtss_build_ data structure to accumulate
 7           terminal input to be output to the SY**
 8           file.
 9  **/
10 dcl       1 gtss_SYstarstar_$FILE       aligned static ext
11 ,           3 select_sequence
12 ,             4 OP1                     /* Seek operation. */
13 ,               5 Device_Command        bit(06)unal
14 ,               5 zeroes_1              bit(12)unal
15 ,               5 IOC_Command           bit(05)unal
16 ,               5 zeroes_2              bit(01)unal
17 ,               5 Control               bit(06)unal
18 ,               5 Count                 bit(06)unal
19 
20 ,             4 ID1
21 ,               5 fcb_loc               bit(18)unal
22 ,               5 DCW_list_loc          bit(18)unal
23 
24 ,             4 OP2                     /* Write opteration. */
25 ,               5 Device_Command        bit(06)unal
26 ,               5 zeroes_1              bit(12)unal
27 ,               5 IOC_Command           bit(05)unal
28 ,               5 zeroes_2              bit(01)unal
29 ,               5 Control               bit(06)unal
30 ,               5 Count                 bit(06)unal
31 
32 ,             4 ID2
33 ,               5 fcb_loc               bit(18)unal
34 ,               5 DCW_list_loc          bit(18)unal
35 
36 ,             4 RETURN_WORD
37 ,               5 Status_loc            bit(18)unal
38 ,               5 Courtesy_Call_loc     bit(18)unal
39 
40 ,           3 Seek_Word
41 ,             4 Seek_loc                bit(18)unal
42 ,             4 Seek_count              fixed bin(17)unal
43 ,           3 Seek_Address              fixed bin(35)
44 ,           3 STATUS                    bit(72)
45 
46 ,           3 DCW
47 ,             4 memory_loc              bit(18)unal
48 ,             4 zeroes_3                bit(03)unal
49 ,             4 action_code             bit(03)unal
50 ,             4 word_count              bit(12)unal
51 
52 ,           3 Current_Rec               fixed bin(35)
53 
54 ,           3 RECORD                    (10)
55 ,             4 record_control_word
56 ,               5 number_words          fixed bin(17)unal
57 ,               5 relative_block_count  fixed bin(17)unal
58 ,             4 tty_data                (63)bit(36)aligned
59 
60 ,           3 SYss                      char(8)
61 ;
62 /*   END INCLUDE FILE gtss_SYstarstar_.incl.pl1 */