Function: scheme-get-old-input

scheme-get-old-input is a byte-compiled function defined in cmuscheme.el.gz.

Signature

(scheme-get-old-input)

Documentation

Snarf the sexp ending at point.

Source Code

;; Defined in /usr/src/emacs/lisp/cmuscheme.el.gz
(defun scheme-get-old-input ()
  "Snarf the sexp ending at point."
  (save-excursion
    (let ((end (point)))
      (backward-sexp)
      (buffer-substring (point) end))))