aboutsummaryrefslogtreecommitdiffstats
path: root/sbcl/sbclrc
diff options
context:
space:
mode:
authorGravatar Tom Willemse2026-09-03 00:15:56 -0700
committerGravatar Tom Willemse2026-09-12 01:00:38 -0700
commit6ce874ca52336f2e1ddfda1c8075b4f81fe373a8 (patch)
treed471bfdf92b43212b7fe0a5759802871a11e7fa7 /sbcl/sbclrc
parenta957bc134cc0afb023e08152aea6653e0d22c8ab (diff)
downloadnew-dotfiles-6ce874ca52336f2e1ddfda1c8075b4f81fe373a8.tar.gz
new-dotfiles-6ce874ca52336f2e1ddfda1c8075b4f81fe373a8.zip
sbcl: Rename .sbclrc -> sbclrc
Guix doesn't allow files starting with a . to be used by ‘local-file’.
Diffstat (limited to 'sbcl/sbclrc')
-rw-r--r--sbcl/sbclrc18
1 files changed, 18 insertions, 0 deletions
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)))