
  PROCEDURE [XREF] ocp$build_second_inter_ol
    (    first_intermediate_ol: ^SEQ ( * );
         new_breaklist: ^oct$breaklist;
         length_of_new_breaklist: oct$breaklist_length;
     VAR old_breaklist: ^oct$breaklist;
     VAR length_of_old_breaklist: oct$breaklist_length;
     VAR second_inter_ol: ^SEQ ( * );
     VAR scratch_segment: ^SEQ ( * );
     VAR move_items: ^oct$move_items;
     VAR number_of_move_items: oct$breaklist_index);

?? PUSH (LISTEXT := ON) ??
*copyc oct$breaklist
*copyc oct$move_items
?? POP ??
