
{ Deferred common block definitions

  TYPE
    llt$deferred_common_blocks = array [1 .. * ] of
          llt$common_block_definition,

    llt$common_block_definition = record
      name: pmt$program_name,
      global_lock: ost$key_lock_value,
      loaded_ring: ost$valid_ring,
      address: llt$address,
      allocation_length: ost$segment_length,
      allocation_alignment: ost$segment_offset,
      allocation_offset: ost$segment_offset,
      access_attributes: llt$section_access_attributes,
      segment_access_control: ost$segment_access_control,
      extensible: boolean,
      unallocated_common: boolean,
      unallocated_common_open: boolean,
      unallocated_common_segment: ost$segment,
      unallocated_common_file_id: amt$file_identifier,
    recend;

*copyc amt$file_identifier
*copyc llt$address
*copyc llt$section_access_attributes
*copyc osd$virtual_address
*copyc ost$segment_access_control
*copyc pmt$program_name

