(defun fennel-repl--start-tcp (host service &optional buffer)
  (let* ((arglist nil)
         (repl-buffer (apply #'make-comint-in-buffer
                             fennel-repl--buffer-name
                             fennel-repl--buffer-name
                             (cons host service) nil arglist)))
    (setq fennel-repl--last-buffer (or buffer (current-buffer)))
    (setq fennel-repl--buffer repl-buffer)
    (setq inferior-lisp-buffer repl-buffer)
    (with-current-buffer repl-buffer
      (fennel-repl-mode)
      (erase-buffer))
    (pop-to-buffer repl-buffer)))

Generated by alexjgriffith using scpaste at Wed Nov 12 16:59:22 2025. EST. (original)