diff options
| -rw-r--r-- | etc/lisp-cli/init.lisp | 26 |
1 files changed, 2 insertions, 24 deletions
diff --git a/etc/lisp-cli/init.lisp b/etc/lisp-cli/init.lisp index 74cc794..df7cc23 100644 --- a/etc/lisp-cli/init.lisp +++ b/etc/lisp-cli/init.lisp @@ -4,28 +4,6 @@ (when (probe-file quicklisp-init) (load quicklisp-init))) -(defparameter systems - '(:cl-ppcre - :cl-fswatch - :cffi - :trivial-dump-core - :named-readtables - :rstring - :curth)) - -(dolist (s systems) - (asdf:load-system s)) - +(asdf:load-system :curth) (use-package :org.euandre.curth) -(set-dispatch-macro-character #\# #\f #'org.euandre.curth:|dispatch-f-reader|) - -(dolist (p (cl-ppcre:split ":" (uiop:getenv "LIBRARY_PATH"))) - (pushnew (str p "/") cffi:*foreign-library-directories* :test #'equal)) - -(defun save () - (trivial-dump-core:dump-image (uiop:getenv "LISP_IMAGE_PATH"))) - -(define-symbol-macro r - (progn - (load (uiop:getenv "LISP_CLI_RC")) - (values))) +(named-readtables:in-readtable org.euandre.curth:readtable) |