Como já respondido nos comentários, o Emacs se torna muito lento em sua reexibição de longas filas é um problema bem conhecido . Consertá-lo seria muito bom, mas precisa de muita reflexão para ser realizado corretamente. Tenho uma ideia de como isso pode ser realizado com base na seção 6.3 deste documento
(basicamente, armazene informações da linha visual no buffer atual e atualize-a na inserção de espaço em branco, propriedades de exibição, alterações de janela etc.) e use essas informações em o código de reexibição para evitar a varredura o tempo todo), mas não estou familiarizado o suficiente com os C internos para removê-lo.
Existem soluções alternativas. Os mais óbvios seriam ajustar os parâmetros relacionados à exibição (como ativar o truncamento de linha visual na instância gráfica do Emacs, usar um Emacs não gráfico para fazer isso automaticamente, desativar os recursos do Bidi etc.) e pré-processar o conteúdo do arquivo que você ' re-lendo. Um menos óbvio é o pós-processamento automático dos arquivos, seja truncando suas linhas ou adicionando propriedades de texto que tornam as linhas mais curtas do que realmente são. Para transformar isso em uma resposta mais interessante, apresentarei um truque bastante feio da opção anterior que funcionará apenas nos comintmodos derivados:
(defun my-comint-shorten-long-lines (text)
(let* ((regexp "^\\(.\\{80\\}\\).*?$")
(shortened-text (replace-regexp-in-string regexp "\\1" text)))
(if (string= shortened-text text)
text
(propertize shortened-text 'help-echo text))))
(add-hook 'comint-preoutput-filter-functions 'my-comint-shorten-long-lines)
Isso define my-comint-shorten-long-linesuma função que utiliza uma sequência possivelmente composta de muitas linhas e usa o poder das expressões regulares para substituir qualquer linha com um comprimento de 80 caracteres ou mais por uma versão reduzida que exibe o texto original ao passar o mouse sobre ela. Quando usado como gancho,
comint-preoutput-filter-functionsele filtra toda a comintsaída antes de ser exibida.
No entanto, esta versão do hack tem uma fraqueza bastante séria. Nos modos em que a fonte básica está em andamento (como, por exemplo M-x ielm), ela cortará alegremente as linhas que fazem parte de uma cadeia de caracteres e, dessa forma, tipificará tudo até a próxima citação como string! Não é isso que queremos e pode ser corrigido com um pouco mais de domínio sobre expressões regulares (mas presumivelmente entrará em um REPL para uma linguagem como Python). Enquanto estamos nisso, vamos destacar a saída reduzida também:
(defun my-comint-shorten-long-lines (text)
(let* ((regexp "^\\(.\\{80\\}\\).*?\\(\"?\\)$")
(shortened-text (replace-regexp-in-string regexp "\\1\\2" text)))
(if (string= shortened-text text)
text
(propertize shortened-text 'font-lock-face 'shadow 'help-echo text))))
(add-hook 'comint-preoutput-filter-functions 'my-comint-shorten-long-lines)
Isso é um pouco melhor, mas ainda feio. Pairar sobre a saída de algo como find /in M-x shellnão é atraente (idealmente, queremos exibir apenas a linha não abreviada, nem todas as saídas), a detecção de strings é rudimentar na melhor das hipóteses e o truncamento pode ser indicado melhor com elipses em vez de especificar tudo. Além disso, não é garantido que o texto recebido não seja transformado em lotes. Tudo isso grita por executar a etapa de processamento em um buffer temporário, mas será deixado para o leitor como exercício (ou o autor como possível postagem no blog).