{Monitor segment table.}

  VAR
    mtv$monitor_segment_table: [XREF] record
      st: ALIGNED [0 MOD 8] array [0 .. 4095] of mmt$segment_descriptor,
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc MMT$SEGMENT_DESCRIPTOR_TABLE
?? POP ??
