

   PROCEDURE [XREF] mmp$set_access_selections_r1
     (    segment_number: ost$segment;
          validating_ring_number: ost$valid_ring;
          access_selections: mmt$access_selections;
      VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc mmt$access_selections
*copyc osd$virtual_address
*copyc ost$status
?? POP ??
