
  PROCEDURE [XREF] ocp$close_predefined_segments (sd:
    ^oct$output_segment_descriptor);
