From 8bc53c168e72d9ec2ce9353298c3df6d0ab59a4f Mon Sep 17 00:00:00 2001 From: jao Date: Mon, 20 Dec 2021 22:46:09 +0000 Subject: Asynchronous, interruptable evaluations --- elisp/geiser-eval.el | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'elisp/geiser-eval.el') diff --git a/elisp/geiser-eval.el b/elisp/geiser-eval.el index 1019e55..424d8e2 100644 --- a/elisp/geiser-eval.el +++ b/elisp/geiser-eval.el @@ -156,6 +156,11 @@ module-exports, autodoc, callers, callees and generic-methods.") buffer) geiser-eval--sync-retort) +(defun geiser-eval-interrupt () + "Interrupt on-going evaluation, if any." + (interactive) + (geiser-con--interrupt (geiser-eval--connection))) + ;;; Retort parsing: -- cgit v1.2.3