changelog shortlog graph tags branches files raw help

Mercurial > infra / changeset: try registering with ql local projects

changeset 160: a0d16a88c5f2
parent 159: c8e25fa271bc
child 161: c87410230a12
author: Richard Westhaver <ellis@rwest.io>
date: Sun, 28 Jan 2024 13:08:04 -0500
files: etc/sbclrc scripts/sbcl-make-bin.sh scripts/sbcl-save-core.sh
description: try registering with ql local projects
     1.1--- a/etc/sbclrc	Sun Jan 28 11:55:44 2024 -0500
     1.2+++ b/etc/sbclrc	Sun Jan 28 13:08:04 2024 -0500
     1.3@@ -17,6 +17,6 @@
     1.4 (let ((quicklisp-init #P"/usr/local/share/quicklisp/setup.lisp"))
     1.5   (when (probe-file quicklisp-init)
     1.6     (load quicklisp-init)))
     1.7-(pushnew #P"/usr/local/lisp/" ql:*local-project-directories* )
     1.8-(pushnew #P"/usr/share/lisp/" ql:*local-project-directories* )
     1.9+(pushnew #P"/usr/local/lisp/" ql:*local-project-directories*)
    1.10+(pushnew #P"/usr/share/lisp/" ql:*local-project-directories*)
    1.11 (pushnew #P"/usr/local/share/lisp/" ql:*local-project-directories*)
     2.1--- a/scripts/sbcl-make-bin.sh	Sun Jan 28 11:55:44 2024 -0500
     2.2+++ b/scripts/sbcl-make-bin.sh	Sun Jan 28 13:08:04 2024 -0500
     2.3@@ -1,7 +1,7 @@
     2.4 #!/usr/bin/env bash
     2.5 CORE_SRC=${2:-/usr/local/src/core/}
     2.6 FORM="(progn (pushnew #P\"$CORE_SRC\" asdf:*central-registry*) "
     2.7-FORM+="(ql:quickload :std) "
     2.8+FORM+="(pushnew #P\"$CORE_SRC\" ql:*local-project-directories*) (ql:quickload :std)"
     2.9 FORM+=" (ql:quickload \""
    2.10 FORM+="${1:-bin/skel}"
    2.11 FORM+="\") (asdf:make \""
     3.1--- a/scripts/sbcl-save-core.sh	Sun Jan 28 11:55:44 2024 -0500
     3.2+++ b/scripts/sbcl-save-core.sh	Sun Jan 28 13:08:04 2024 -0500
     3.3@@ -1,5 +1,5 @@
     3.4 #!/bin/sh
     3.5 # save an sbcl core image
     3.6 CORE_SRC=${2:-/usr/local/src/core/}
     3.7-FORM="(progn (pushnew #P\"$CORE_SRC\" asdf:*central-registry*) (ql:quickload :std) ${3} (save-lisp-and-die \"${1:-std.core}\"))"
     3.8+FORM="(progn (pushnew #P\"$CORE_SRC\" asdf:*central-registry*) (pushnew #P\"$CORE_SRC\" ql:*local-project-directories*) (ql:quickload :std) ${3} (save-lisp-and-die \"${1:-std.core}\"))"
     3.9 sbcl --noinform --non-interactive --eval "$FORM"