diff --git a/sbcl/.sbclrc b/sbcl/.sbclrc new file mode 100644 index 0000000..86d47f9 --- /dev/null +++ b/sbcl/.sbclrc @@ -0,0 +1,18 @@ +;; -*- mode: lisp; -*- + +;;; 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))) + +;;; Enable linedit, a readline-like module for SBCL. Install through +;;; (ql:quickload "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)))