1 /* Begin include file as_user_message_info.incl.pl1 BIM 1985-01-11 */
 2 /* format: style4 */
 3 
 4 /**** This structure is passed in by a user process to read out
 5       an A.S. user message. */
 6 
 7 declare  as_user_message_info_ptr pointer;
 8 declare  1 as_user_message_info aligned based (as_user_message_info_ptr),
 9            2 version char (8) aligned,
10            2 flags aligned,
11              3 read_message_id bit (1) unaligned,           /* message_id specified -- read that one */
12              3 read_after_message_id bit (1) unaligned,     /* message_id specified -- read the next one for the handle after that */
13              3 no_handle_given bit (1) unaligned,           /* application debugging: look at all messages for us, regardless of handle */
14              3 ring_given bit (1) unaligned,                /* application debugging: look at outer ring messages */
15              3 dont_delete bit (1) unaligned,               /* application debugging, look at message but don't delete them */
16              3 pad bit (31) unaligned,
17            2 message_info aligned,                          /* Output arguments */
18              3 message_ptr pointer,
19              3 message_length fixed bin (18),               /* words */
20              3 pad bit (36) aligned,
21              3 message_id bit (72) aligned,
22              3 message_access_class bit (72) aligned,
23              3 message_handle bit (72) aligned,
24              3 message_ring fixed bin (3),
25            2 sender_info aligned,
26              3 group_id char (32) unaligned,
27              3 process_id bit (36) aligned,
28            2 destination_info aligned,
29              3 group_id char (32) unal,
30              3 process_id bit (36) aligned,
31              3 ring fixed bin (3) aligned;
32 
33 declare  AS_USER_MESSAGE_INFO_VERSION_1 char (8) aligned init ("asum0001") int static options (constant);
34 
35 /* End include file as_user_message_info.incl.pl1 */