*** empty log message ***
[bpt/emacs.git] / lisp / xscheme.el
index 8a281cd..d2a2cce 100644 (file)
@@ -1,4 +1,5 @@
-;; Run Scheme under Emacs
+;;; xscheme.el --- run Scheme under Emacs
+
 ;; Copyright (C) 1986, 1987, 1989, 1990 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -69,6 +70,7 @@ Is processed with `substitute-command-keys' first.")
 (xscheme-evaluation-commands scheme-mode-map)
 (xscheme-interrupt-commands scheme-mode-map)
 \f
+;;;###autoload
 (defun run-scheme (command-line)
   "Run an inferior Scheme process.
 Output goes to the buffer `*scheme*'.
@@ -868,3 +870,5 @@ the remaining input.")
                   (let ((state (parse-partial-sexp start (nth 2 state))))
                     (if (nth 2 state) 'many 'one)))))
        (set-syntax-table old-syntax-table)))))
+
+;;; xscheme.el ends here