
  TYPE
    oct$list_of_entry_points = array [1 .. * ] of oct$entry_points,

    oct$entry_points = record
      name: pmt$program_name,
      ring_violation: boolean,
      inboard_symbol: boolean,
      deferred: boolean,
      gated: boolean,
      attributes: llt$entry_point_attributes,
      language: llt$module_generator,
      declaration_matching_required: boolean,
      declaration_matching: llt$declaration_matching_value,
      pva: ost$pva,
      binding_section: ost$pva,
      r1: ost$ring,
      r2: ost$ring,
      r3: ost$ring,
      global_key: ost$key_lock_value,
      local_key: ost$key_lock_value,
      r_link: ^oct$entry_points,
      l_link: ^oct$entry_points,
      link: ^oct$entry_points,
    recend;

*copyc llt$declaration_matching_value
*copyc llt$entry_point_attributes
*copyc llt$module_generator
*copyc osd$virtual_address
*copyc pmt$program_name
