1 /*----------BEGIN ipc_create_arg.incl.pl1------------------------------------*/
 2 
 3 /*
 4    This include file declares the structure which is the input argument to
 5    ipc_$create_event_channel.
 6 */
 7 
 8 /****^  HISTORY COMMENTS:
 9   1) change(86-08-12,Kissel), approve(86-08-12,MCR7479),
10      audit(86-10-08,Fawcett), install(86-11-03,MR12.0-1206):
11      New include file added to support async event channels.
12                                                    END HISTORY COMMENTS */
13 
14 /* format: style3,linecom,ifthenstmt,indthenelse,^indnoniterdo,indnoniterend,initcol3,dclind5,idind32 */
15 
16 dcl  ipc_create_arg_structure_ptr    ptr;
17 dcl  ipc_create_arg_structure_v1     char (8) internal static options (constant) init ("ipcarg01");
18 
19 dcl  1 ipc_create_arg_structure      aligned based (ipc_create_arg_structure_ptr),
20        2 version                     char (8) unaligned,    /* From above. */
21        2 channel_type                fixed bin,             /* See constants below. */
22        2 call_entry                  variable entry (ptr),  /* For event call channels -- who to call. */
23        2 call_data_ptr               ptr,                   /* For event call channels -- something to tell them. */
24        2 call_priority               fixed bin (17);        /* For event call channels -- who's first? */
25 
26 /* Constants for the event channel type. */
27 
28 dcl  FAST_EVENT_CHANNEL_TYPE         fixed bin internal static options (constant) init (1);
29 dcl  WAIT_EVENT_CHANNEL_TYPE         fixed bin internal static options (constant) init (2);
30 dcl  CALL_EVENT_CHANNEL_TYPE         fixed bin internal static options (constant) init (3);
31 dcl  ASYNC_CALL_EVENT_CHANNEL_TYPE   fixed bin internal static options (constant) init (4);
32 
33 dcl  ANY_CALL_EVENT_CHANNEL_TYPE     fixed bin internal static options (constant) init (10);
34 
35 /*----------END ipc_create_arg.incl.pl1--------------------------------------*/