changeset 72: |
b1696605ca2e |
parent: |
a535b1cb81f2
|
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Wed, 24 Jul 2024 18:20:44 -0400 |
permissions: |
-rw-r--r-- |
description: |
update lisp project paths |
1 ;;; .sbclrc --- sbcl init file -*- mode: common-lisp; -*- 4 (require :sb-concurrency) 6 (require :sb-rotate-byte) 8 (setq *debug-beginner-help-p* nil 9 ;; *print-case* :downcase 13 (defvar *quicklisp-setup* (or (probe-file #P"~/.stash/quicklisp/setup.lisp") 14 (probe-file #P"/usr/local/share/lisp/quicklisp/setup.lisp"))) 17 (when *quicklisp-setup* 18 (load *quicklisp-setup*)) 19 ;; (ql:quickload :clouseau) 21 (defun include-projects-from (path) 22 "Add PATH to QL;*LOCAL-PROJECT-DIRECTORIES* and ASDF:*CENTRAL-REGISTRY*." 23 #+quicklisp (pushnew path ql:*local-project-directories*) 24 (pushnew path asdf:*central-registry*)) 26 (mapc #'include-projects-from 27 (mapcar (lambda (x) (merge-pathnames x (user-homedir-pathname))) 28 (list ".stash/lisp/" "/usr/local/share/lisp/"))) 29 ;; (require :sb-aclrepl)