


{ The command dictionary is in alphabetical order.

  TYPE
    llt$command_dictionary = array [1 .. * ] of llt$command_dictionary_item,

    llt$command_dictionary_item = record
      name: clt$command_name,
      class: clt$named_entry_class,
      availability: clt$named_entry_availability,
      ordinal: clt$named_entry_ordinal,
      kind: llt$command_kind,
      log_option: clt$command_log_option,
      case module_kind: llt$library_module_kind of
      = llc$command_procedure =
        command_header: REL (llt$object_library) ^llt$library_member_header,
      = llc$program_description =
        program_header: REL (llt$object_library) ^llt$library_member_header,
      = llc$command_description =
        command_description_header: REL (llt$object_library)
              ^llt$library_member_header,
      = llc$load_module =
        module_header: REL (llt$object_library) ^llt$load_module_header,
      = llc$applic_command_procedure =
        applic_command_header: REL (llt$object_library)
              ^llt$application_member_header,
      = llc$applic_program_description =
        applic_program_header: REL (llt$object_library)
              ^llt$application_member_header,
      = llc$applic_command_description =
        applic_command_description_hdr: REL (llt$object_library)
              ^llt$application_member_header,
      casend,
    recend,

    llt$command_index = 0 .. llc$max_commands_in_library;

  CONST
    llc$max_commands_in_library = 7fffffff(16);

*copyc clt$command_log_option
*copyc clt$command_name
*copyc clt$named_entry_availability
*copyc clt$named_entry_class
*copyc clt$named_entry_ordinal
*copyc llt$command_kind
*copyc llt$library_member_header
*copyc llt$library_module_kind
*copyc llt$load_module_header
