  TYPE
    iit$xt_message_control_block = record

{ Count of messages put into file.

      count: iit$xt_message_count,

{ Message header for get on file.

      get_message_header: iit$xt_message_header,

{ Relative address of next get on file.

      get_p: REL (SEQ ( * )) ^SEQ ( * ),

{ Task to ready when message arrives.

      global_task_id: ost$global_task_id,
      global_task_id_defined: boolean,

{ Relative address of message header for put on file.

      put_message_header_p: REL (SEQ ( * )) ^iit$xt_message_header,

{ Relative address for next put on file.

      put_p: REL (SEQ ( * )) ^SEQ ( * ),
      record_position: iit$xt_record_position,
      status: iit$xt_message_control_status,
      terminate_option: iit$xt_terminate_option,
    recend;

*copyc amt$segment_pointer
*copyc iit$xt_message_control_status
*copyc iit$xt_message_count
*copyc iit$xt_message_header
*copyc iit$xt_record_position
*copyc iit$xt_terminate_option
*copyc ost$global_task_id
*copyc ost$signature_lock
