changeset 42: |
b9e2f76128bb |
parent: |
6eef2d50b7fd
|
child: |
d70be963bfb1 |
author: |
Richard Westhaver <ellis@rwest.io> |
date: |
Sat, 15 Jun 2024 19:53:29 -0400 |
permissions: |
-rw-r--r-- |
description: |
sbcl update |
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"/usr/local/share/lisp/quicklisp/setup.lisp") 14 (probe-file (merge-pathnames "quicklisp/setup.lisp" (user-homedir-pathname))))) 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 (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 "comp/core/lisp/" 32 ;; (require :sb-aclrepl)