1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 dcl cmtv$cmtv fixed bin external;
25
26 dcl cmtvp ptr;
27
28
29 dcl 1 cmtv aligned based (cmtvp),
30 2 no_channel_types fixed bin,
31 2 pad fixed bin,
32 2 chan_type_index (0:16) fixed bin,
33 2 entries (no_entry_types, 0 refer (cmtv.no_channel_types)) bit (72);
34
35
36 dcl (INIT_CHANNEL init (1),
37 TERMINATE_CHANNEL init (2),
38 INIT_MULTIPLEXER init (3),
39 TERMINATE_MULTIPLEXER init (4),
40 START init (5),
41 STOP init (6),
42 SHUTDOWN init (7),
43 PRIV_CONTROL init (8),
44 HPRIV_CONTROL init (9),
45 READ init (10),
46 WRITE init (11),
47 CONTROL init (12),
48 SET_MODES init (13),
49 CHECK_MODES init (14),
50 GET_MODES init (15),
51 INTERRUPT init (16),
52 no_entry_types init (16)) fixed bin int static options (constant);
53
54
55
56 dcl init_channel_ev entry (fixed bin, ptr, ptr, fixed bin (35)) variable;
57
58
59 dcl terminate_channel_ev entry (ptr, fixed bin (35)) variable;
60
61
62 dcl init_multiplexer_ev entry (fixed bin, ptr, ptr, fixed bin (35)) variable;
63
64
65 dcl terminate_multiplexer_ev entry (ptr, fixed bin (35)) variable;
66
67
68 dcl start_ev entry (ptr, fixed bin (35)) variable;
69
70
71 dcl stop_ev entry (ptr, fixed bin (35)) variable;
72
73
74 dcl shutdown_ev entry (ptr, fixed bin (35)) variable;
75
76
77 dcl priv_control_ev entry (ptr, char (*), ptr, fixed bin (35)) variable;
78
79
80 dcl hpriv_control_ev entry (ptr, char (*), ptr, fixed bin (35)) variable;
81
82
83 dcl read_ev entry (ptr, fixed bin, ptr, bit (1) aligned, fixed bin (35)) variable;
84
85
86 dcl write_ev entry (ptr, fixed bin, ptr, fixed bin (35)) variable;
87
88
89 dcl control_ev entry (ptr, fixed bin, char (*), ptr, fixed bin (35)) variable;
90
91
92 dcl set_modes_ev entry (ptr, fixed bin, ptr, fixed bin (35)) variable;
93
94
95 dcl check_modes_ev entry (ptr, fixed bin, ptr, fixed bin (35)) variable;
96
97
98 dcl get_modes_ev entry (ptr, fixed bin, char (*), fixed bin (35)) variable;
99
100
101 dcl interrupt_ev entry (ptr, fixed bin, bit (72) aligned) variable;
102
103
104