
  TYPE
    oct$text_insertion_list = record
      offset: llt$section_offset,
      bit_offset: 0 .. 7,
      length: 1 .. osc$max_segment_length,
      starting_bit_offset: integer,
      ending_bit_offset: integer,
      overlapped: boolean,
      link: ^oct$text_insertion_list,

      case kind: llt$object_record_kind of
      = llc$text =
        text: ^llt$text,

      = llc$replication =
        replication: ^llt$replication,

      = llc$bit_string_insertion =
        bit_string_insertion: ^llt$bit_string_insertion,

      casend,
    recend;

*copyc llt$bit_string_insertion
*copyc llt$object_record_kind
*copyc llt$replication
*copyc llt$section_address
*copyc llt$text
*copyc osd$virtual_address

