init.el

(require 'package)
(package-initialize)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/"))

(when (< emacs-major-version 29)
  (unless (package-installed-p 'use-package)
    (unless package-archive-contents
      (package-refresh-contents))
    (package-install 'use-package)))

(use-package paredit
  :ensure t
  ;; :hook ((emacs-lisp-mode . paredit-mode)
  ;;        (racket-mode     . paredit-mode)
  ;;        (lisp-mode       . paredit-mode)
  ;;        (scheme-mode     . paredit-mode))
  )

(use-package racket-mode
  :hook ((racket-mode . eldoc-mode)
         (racket-mode . racket-xp-mode))
  :ensure t)

(use-package sly
  :ensure t
  :config
  (let ((patterns '(("\\*sly-mrepl"
                     (display-buffer-in-side-window)
                     (side . bottom)
                     (slot . 0)
                     (window-height . 18))
                    ("\\*sly-db"
                     (display-buffer-in-side-window)
                     (side . bottom)
                     (slot . 1))
                    ("\\*sly-inspector"
                     (display-buffer-in-side-window)
                     (side . right)
                     (slot . 1)
                     (window-width . 80))
                    ("\\*sly-description"
                     (display-buffer-in-side-window)
                     (side . right)
                     (slot . 0)
                     (window-width . 80)))))
    (cl-loop for p in patterns
             do (add-to-list 'display-buffer-alist p)))
  (setopt inferior-lisp-program "/usr/bin/sbcl"))