Function: scheme-load-file

scheme-load-file is an interactive and byte-compiled function defined in cmuscheme.el.gz.

Signature

(scheme-load-file FILE-NAME)

Documentation

Load a Scheme file FILE-NAME into the inferior Scheme process.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/cmuscheme.el.gz
(defun scheme-load-file (file-name)
  "Load a Scheme file FILE-NAME into the inferior Scheme process."
  (interactive (comint-get-source "Load Scheme file" scheme-prev-l/c-dir/file
				  scheme-source-modes t)) ; t because `load'
                                                          ; needs an exact name
  (comint-check-source file-name) ; Check to see if buffer needs saved.
  (setq scheme-prev-l/c-dir/file (cons (file-name-directory    file-name)
				       (file-name-nondirectory file-name)))
  (comint-send-string (scheme-proc) (concat "(load \""
					    file-name
					    "\")\n")))