

{ Relocation record. }

  TYPE
    llt$relocation = array [1 .. * ] of llt$relocation_item,

    llt$relocation_item = record
      section_ordinal: llt$section_ordinal,
      offset: llt$section_offset,
      relocating_section: llt$section_ordinal,
      container: llt$relocation_container,
      address: llt$address_type,
    recend;

*copyc llt$section_address
*copyc LLT$RELOCATION_CONTAINER
*copyc LLT$ADDRESS_TYPE
