
{The following defines the request block for issuing lock/unlock segment
{requests to memory manager.

{Init_new_io is set to true in job mode and cleared in monitor before
{a reissue of the monitor request if wait is true.  This is to prevent
{mmp$mm_write_modified_pages from initiating new writes.

  TYPE
    mmt$rb_lock_unlock_segment = RECORD
      reqcode: ALIGNED [0 MOD 8] syt$monitor_request_code,
      status: syt$monitor_status,
      pva: ^cell,
      wait: ost$wait,
      init_new_io: boolean,                   {Used only for write_modified_pages processing.}
      CASE request: (mmc$lus_lock_segment, mmc$lus_unlock_segment) OF
      = mmc$lus_lock_segment =
        access: mmt$lus_lock_type,
        catalog_segment: boolean,
      = mmc$lus_unlock_segment =
        page_disposition: mmt$lus_page_disposition,
      CASEND,
    RECEND;

*copyc MMT$LUS_DECLARATIONS
*copyc OST$WAIT
*copyc SYC$MONITOR_REQUEST_CODES
*copyc SYT$MONITOR_REQUEST_CODE
