
  PROCEDURE [XREF] osp$format_segment_condition (identifier: string (2);
        segment_access_condition: mmt$segment_access_condition;
        save_area: ^ost$stack_frame_save_area;
    VAR message: ost$status;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc MMD$SEGMENT_ACCESS_CONDITION
*copyc OST$STACK_FRAME_SAVE_AREA
*copyc OST$STATUS
*copyc OSE$CONDITION_EXCEPTIONS
?? POP ??
