
  PROCEDURE [XREF] bap$format_segment_condition
    (    identifier: string (2);
         segment_access_condition: mmt$segment_access_condition;
         save_area: ^ost$stack_frame_save_area;
         error_pva: ost$pva;
     VAR condition_status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc mmd$segment_access_condition
*copyc osd$virtual_address
*copyc ost$stack_frame_save_area
*copyc ost$status
?? POP ??
