diff options
Diffstat (limited to 'etc')
| -rw-r--r-- | etc/lisp-cli/init.lisp | 26 | ||||
| -rw-r--r-- | etc/sh/rc | 1 |
2 files changed, 27 insertions, 0 deletions
diff --git a/etc/lisp-cli/init.lisp b/etc/lisp-cli/init.lisp index 0f01d57..062446e 100644 --- a/etc/lisp-cli/init.lisp +++ b/etc/lisp-cli/init.lisp @@ -3,3 +3,29 @@ (user-homedir-pathname)))) (when (probe-file quicklisp-init) (load quicklisp-init))) + +(defun load-once (p) + (let ((k (intern + (concatenate 'string + (string :ql/) + (string p)) + "KEYWORD"))) + (unless (member k *features*) + (ql:quickload p) + (pushnew k *features*)) + k)) + +(mapcar #'load-once + (list + :cl-ppcre + :cffi + :trivial-dump-core + :named-readtables + :rstring)) + +(mapcar (lambda (p) + (pushnew (concatenate 'string p "/") cffi:*foreign-library-directories* + :test #'equal)) + (cl-ppcre:split ":" (uiop:getenv "LIBRARY_PATH"))) + +(load-once :cl-fswatch) @@ -87,6 +87,7 @@ export LEX=flex export LDFLAGS='-flto' export LISP='sbcl --eval' export N_PROCS GUILE_EFFECTIVE_VERSION +export LISP_CLI_IMPL=clisp add_prefix() { export GUILE_LOAD_PATH="$1/share/guile/site/$GUILE_EFFECTIVE_VERSION${GUILE_LOAD_PATH:+:}${GUILE_LOAD_PATH:-:}" |