Como posso verificar se um usuário pressionou um botão enquanto uma função está em execução?

Eu tenho uma função que é executada automaticamente depois que o usuário executa alguma ação. No entanto, a função leva muito tempo para ser concluída. Isso significa que o Emacs fica sem resposta por um curto período de tempo após cada entrada. Para corrigir isso, gostaria de verificar se o usuário inseriu uma nova entrada e, em caso afirmativo, cancelar a execução desta função e prosseguir com a entrada do usuário.

Existe uma variável que contém entradas de teclado na fila? Caso contrário, existe outra maneira de verificar se o usuário pressionou um botão desde que uma função começou a ser executada?

OK, vou tentar uma resposta expandida. O problema é que o Emacs Lisp é de thread único. Você pode girar mais processos, mas não dentro do interpretador Emacs Lisp. No entanto, a entrada do teclado que você precisa ler do usuário para interromper sua função precisa ser processada pelo mesmo intérprete do Emacs Lisp. Isso significa que, se o seu intérprete estiver travado na interpretação de algum código Lisp, talvez não haja uma maneira de interrompê-lo por dentro. Aqui está um lugar no manual que descreve essa situação:

No nível do código C, desistir não pode acontecer em qualquer lugar; somente nos locais especiais que verificam a bandeira de abandono. A razão para isso é que parar em outros lugares pode deixar uma inconsistência no estado interno do Emacs. Como o encerramento é adiado até um local seguro, o encerramento não pode causar um crash no Emacs.

https://www.gnu.org/software/emacs/manual/html_node/elisp/Quitting.html

Então, como o Emacs ainda tem a C-gfuncionalidade / canceling? - Existem timers e funções que executam E / S (aguardam eventos no loop de comando). Os temporizadores podem organizar seus cálculos em pedaços, para que você tenha pontos em seus cálculos em que possa olhar ao redor e, se necessário, impedir todos os cálculos adicionais. As funções de E / S podem enviar quitsinal. A macro with-keyboard-quitaguarda esse sinal e, uma vez recebido, sai normalmente. No entanto, sua função precisa saber para enviar este sinal. Isso significa que, se sua função impedir que o usuário envie entrada do teclado, você não poderá se beneficiar das interrupções do teclado.

Conclusão: tente agrupar o código da sua função while-no-input. Se isso não funcionar, tente reescrever sua função de forma que o Emacs processe os eventos do teclado.

Eu iria com input-pending-t. Dos documentos:

(entrada-pendente-p e opcionais CHECK-TIMERS)

Retorne t se a entrada do comando estiver disponível no momento sem espera. Na verdade, o valor é nulo apenas se pudermos ter certeza de que nenhuma entrada está disponível; se houver dúvida, o valor é t.

Um exemplo rápido:

(progn
  ;; I put this into a progn call so you can call it direcly from Emacs
  ;; if you are using the sx package
  (message "Try pressing a key in the next 2 seconds!")
  (sleep-for 2)
  (message (if (input-pending-p)
               "There is input waiting!"
             "No input, let’s move on!"))
  (sleep-for 2))