1.4 KiB
1.4 KiB
SBCL Init
Install quicklisp
This bit of code was generated by quicklisp in order to load its initialization file at startup.
;;; The following lines added by ql:add-to-init-file:
#-quicklisp
(let ((quicklisp-init (merge-pathnames ".local/share/quicklisp/setup.lisp"
(user-homedir-pathname))))
(when (probe-file quicklisp-init)
(load quicklisp-init)))
Install linedit
This Chunk of code installs Linedit, a readline-like module for the SBCL REPL. Found thanks to Irreal's post on the matter. This snippet first checks if it should even be enabled, my Emacs init file file tells SLIME to disable linedit.
(if (member "--no-linedit" sb-ext:*posix-argv* :test 'equal)
(setf sb-ext:*posix-argv*
(remove "--no-linedit" sb-ext:*posix-argv* :test 'equal))
(when (interactive-stream-p *terminal-io*)
(require :sb-aclrepl)
(require :linedit)
(funcall (intern "INSTALL-REPL" :linedit) :wrap-current t)))