

  TYPE
    dbt$module_address_table_item = record
      name: pmt$program_name,
      language: llt$module_generator,
      greatest_section_ordinal: llt$section_ordinal,
      application_identifier: ^llt$application_identifier,
      reinitialization_information: ^llt$identification,
      next_module: ^dbt$module_address_table_item,
      line_address_tables: ^array [0 .. * ] of ^llt$line_address_table,
      debug_symbol_tables: ^array [0 .. * ] of ^llt$debug_symbol_table,
      supplemental_debug_tables: ^array [0 .. * ] of
            ^llt$supplemental_debug_tables,
      section_item: array [0 .. * ] of dbt$section_item,
    recend,

    dbt$section_item = record
      kind: llt$section_kind,
      section_ordinal: llt$section_ordinal,
      address: ost$pva,
      length: ost$segment_length,
{!    segment_access_control: packed ost$segment_access_control,
      segment_access_control: ost$segment_access_control,
      ring: dbt$ring_attributes,
      key_lock: ost$key_lock,
      name: pmt$program_name,
    recend,

    dbt$ring_attributes = record
      r1,
      r2,
      r3: ost$ring,
    recend;

*copyc cyd$debug_symbols
*copyc llt$application_identifier
*copyc llt$debug_symbol_table
*copyc llt$line_address_table
*copyc llt$module_generator
*copyc llt$object_text_descriptor
*copyc llt$object_record_kind
*copyc llt$obsolete_line_table
*copyc llt$section_address
*copyc llt$supplemental_debug_tables
*copyc osd$virtual_address
*copyc ost$segment_access_control
*copyc pmd$ppu_characteristics
*copyc pmt$program_name
