
  TYPE
    dst$list_block_kind = (dsc$save_list_block, dsc$device_management,
      dsc$processor_attributes, dsc$memory_management, dsc$system_messages_buffer);
