Emacs Lisp runner to uLisp REPL

ulisp.el

(defgroup ulisp-mode nil
  "Settings for ulisp-mode Lisp source buffers."
  :prefix "ulisp-"
  :group 'ulisp)
(defcustom ulisp-port "/dev/ttyUSB0"
  "uLisp serial port"
  :type 'string
  :group 'ulisp-mode)
(defcustom ulisp-port-speed 115200
  "uLisp serial port speed bps"
  :type 'number
  :group 'ulisp-mode)
(defun ulisp-connect (port port-speed)
  (interactive
   (list
    (read-from-minibuffer "[ulisp] Port: " ulisp-port)
    (string-to-number
     (read-from-minibuffer "[ulisp] Port Speed: " (number-to-string ulisp-port-speed)))))
  (let ((serial-buffer (serial-term port port-speed)))
    (with-current-buffer (rename-buffer "*inferior-lisp*")
      (term-line-mode)
      (setq inferior-lisp-buffer serial-buffer))))