1 /* begin include file window_status.incl.pl1 */
 2 /* Modified 28 March 1984 by Jon A. Rochlis to add terminal type change
 3    and reconnection stuff. */
 4 /* format: style3 */
 5 /* interrupts that an application can recieve from a window */
 6 
 7 declare   window_status_string
 8                               bit (36) unaligned;
 9 
10 declare   1 window_status     aligned,
11             2 screen_invalid  bit (1) unaligned,
12             2 async_change    bit (1) unaligned,
13             2 ttp_change      bit (1) unaligned,
14             2 reconnection    bit (1) unaligned,
15             2 pad             bit (32) unaligned;
16 
17 declare   (
18           W_STATUS_SCREEN_INVALID
19                               init ("1"b),
20           W_STATUS_ASYNC_EVENT
21                               init ("01"b),
22           W_STATUS_TTP_CHANGE
23                               init ("001"b),
24           W_STATUS_RECONNECTION
25                               init ("0001"b)
26           )                   bit (36) aligned internal static options (constant);
27 
28 /* end include file window_status.incl.pl1 */