Function: scheme-trace-procedure
scheme-trace-procedure is an interactive and byte-compiled function
defined in cmuscheme.el.gz.
Signature
(scheme-trace-procedure PROC &optional UNTRACE)
Documentation
Trace procedure PROC in the inferior Scheme process.
With a prefix argument switch off tracing of procedure PROC.
Probably introduced at or before Emacs version 22.1.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/cmuscheme.el.gz
(defun scheme-trace-procedure (proc &optional untrace)
"Trace procedure PROC in the inferior Scheme process.
With a prefix argument switch off tracing of procedure PROC."
(interactive
(list (let ((current (symbol-at-point))
(action (if current-prefix-arg "Untrace" "Trace")))
(read-string (format-prompt "%s procedure" current action)
nil nil (and current (symbol-name current))))
current-prefix-arg))
(when (= (length proc) 0)
(error "Invalid procedure name"))
(comint-send-string (scheme-proc)
(format
(if untrace scheme-untrace-command scheme-trace-command)
proc))
(comint-send-string (scheme-proc) "\n"))