  TYPE
    oct$move_items = array [1 .. *] of oct$move_item,

    oct$move_item = record
      old_offset: oct$offset,
      new_offset: oct$offset,
      length: oct$breaklist_length,
    recend;

*copyc oct$breaklist
*copyc occ$breaklist
*copyc oct$offset
