  TYPE
    oct$breaklist = array [1 .. *] of oct$breaklist_item,

    oct$breaklist_item = record
      module_name: pmt$program_name,
      major_name: pmt$program_name,
      minor_name: pmt$program_name,
      offset: llt$section_offset,
      kind: oct$breaklist_kind,
      section_ordinal: llt$section_ordinal,
      secondary_section_ordinal: llt$section_offset,
      length: oct$breaklist_length,
    recend,

    oct$breaklist_kind = (occ$code, occ$idr, occ$read, occ$ept, occ$ext, occ$module_header,
          occ$adr, occ$text, occ$secdef, occ$object_library_header, occ$dictionary,
          occ$command_proc, occ$program_des, occ$info_element, occ$bti, occ$rel,
          occ$component, occ$section_map, occ$function_proc, occ$message_mod, occ$panel_mod,
          occ$library_member_header, occ$mtm_header, occ$mtm_cc, occ$mtm_cn, occ$mess_temp, occ$m68000,
          occ$app_program_des, occ$app_command_proc, occ$deferred_ept, occ$deferred_common_blk,
          occ$command_des, occ$function_des, occ$app_command_des),

    oct$breaklist_length = 0 .. 7fffffff(16);

  TYPE
    oct$breaklist_index = 0 .. occ$max_breaklist_items;

*copyc pmt$program_name
*copyc llt$section_address
*copyc occ$breaklist
