Function: org-babel-scheme-get-repl

org-babel-scheme-get-repl is a byte-compiled function defined in ob-scheme.el.gz.

Signature

(org-babel-scheme-get-repl IMPL NAME &optional HOST PORT)

Documentation

Switch to a Scheme REPL, creating it if it doesn't exist.

If the variables HOST and PORT are set, connect to the running Scheme REPL.

Source Code

;; Defined in /usr/src/emacs/lisp/org/ob-scheme.el.gz
(defun org-babel-scheme-get-repl (impl name &optional host port)
  "Switch to a Scheme REPL, creating it if it doesn't exist.

If the variables HOST and PORT are set, connect to the running Scheme REPL."
  (let ((buffer (org-babel-scheme-get-session-buffer name)))
    (or buffer
	(progn
          (let ((geiser-repl-window-allow-split nil)
                (geiser-repl-use-other-window nil)
                (switch-to-buffer-obey-display-actions t)
                (display-buffer-overriding-action '(display-buffer-no-window
                                                    (allow-no-window t))))
            (if (fboundp 'geiser)
                (if (and host port)
                    (geiser-connect impl host port)
                  (geiser impl))
              ;; Obsolete since Geiser 0.26.
	      (run-geiser impl)))
	  (when name
	    (rename-buffer name t)
	    (org-babel-scheme-set-session-buffer name (current-buffer)))
	  (current-buffer)))))