Function: xscheme-send-interrupt
xscheme-send-interrupt is an interactive and byte-compiled function
defined in xscheme.el.gz.
Signature
(xscheme-send-interrupt CHAR MARK-P)
Documentation
Send a ^A type interrupt to the Scheme process.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/progmodes/xscheme.el.gz
;;; This doesn't really work right -- Scheme just gobbles the first
;;; character in the input. There is no way for us to guarantee that
;;; the argument to this procedure is the first char unless we put
;;; some kind of marker in the input stream.
(defun xscheme-send-interrupt (char mark-p)
"Send a ^A type interrupt to the Scheme process."
(interactive "cInterrupt character to send: ")
(quit-process xscheme-process-name)
(sleep-for 0.1)
(xscheme-send-char char)
(if (and mark-p xscheme-control-g-synchronization-p)
(xscheme-send-char 0)))