amr/passepartout
1
0
Fork 0
Code Issues 15 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

fix(setup): Squash all multi-line SBCL commands into single lines
Some checks failed
Deploy-Agent-V15-Stdin / JOB-V15-STDIN (push) Failing after 23s
Details

Browse Source
This commit is contained in:
Amr Gharbeia
2026-04-17 18:53:48 -04:00
parent 53591e8909
commit 7969a15815
2 changed files with 9 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
literate/setup.org
View File

@@ -39,8 +39,8 @@ setup_system() {
echo -e "${YELLOW}--- Installing System Dependencies ---${NC}" echo -e "${YELLOW}--- Installing System Dependencies ---${NC}"
if command_exists apt-get; then if command_exists apt-get; then
sudo apt-get update && sudo apt-get install -y sbcl emacs-nox rlwrap netcat-openbsd curl git socat libssl-dev libncurses5-dev libffi-dev zlib1g-dev libsqlite3-dev sudo apt-get update && sudo apt-get install -y sbcl emacs-nox rlwrap netcat-openbsd curl git socat libssl-dev libncurses5-dev libffi-dev zlib1g-dev libsqlite3-dev
fi fi
if [ ! -d "$HOME/quicklisp" ]; then if [ ! -d "$HOME/quicklisp" ]; then
curl -O https://beta.quicklisp.org/quicklisp.lisp curl -O https://beta.quicklisp.org/quicklisp.lisp
sbcl --non-interactive --load quicklisp.lisp --eval "(quicklisp-quickstart:install)" --eval "(ql-util:without-prompting (ql:add-to-init-file))" sbcl --non-interactive --load quicklisp.lisp --eval "(quicklisp-quickstart:install)" --eval "(ql-util:without-prompting (ql:add-to-init-file))"
rm quicklisp.lisp rm quicklisp.lisp
@@ -122,8 +122,7 @@ setup_system() {
echo -e "${YELLOW}--- Compiling and Loading OpenCortex (this may take a minute) ---${NC}" echo -e "${YELLOW}--- Compiling and Loading OpenCortex (this may take a minute) ---${NC}"
sbcl --non-interactive \ sbcl --non-interactive --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \ --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \
--eval "(ql:quickload '(:opencortex :croatoan))" --eval "(ql:quickload '(:opencortex :croatoan))"
@@ -176,8 +175,7 @@ if [[ "$1" == "--boot" ]]; then
fi fi
done < "$SCRIPT_DIR/.env" done < "$SCRIPT_DIR/.env"
fi fi
exec sbcl --non-interactive \ exec sbcl --non-interactive --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(setf *debugger-hook* (lambda (c h) (declare (ignore h)) (format *error-output* \"FATAL LISP ERROR: ~a~%\" c) (uiop:print-backtrace :stream *error-output*) (uiop:quit 1)))" \ --eval "(setf *debugger-hook* (lambda (c h) (declare (ignore h)) (format *error-output* \"FATAL LISP ERROR: ~a~%\" c) (uiop:print-backtrace :stream *error-output*) (uiop:quit 1)))" \
--eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \ --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \
--eval "(format t \"--- Quickloading OpenCortex ---~%\")" \ --eval "(format t \"--- Quickloading OpenCortex ---~%\")" \
@@ -201,8 +199,7 @@ if [[ "$1" == "tui" ]]; then
# Launch TUI # Launch TUI
echo -e "${BLUE}Launching Croatoan TUI...${NC}" echo -e "${BLUE}Launching Croatoan TUI...${NC}"
exec sbcl --non-interactive \ exec sbcl --non-interactive --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \ --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \
--eval "(ql:quickload :opencortex/tui)" \ --eval "(ql:quickload :opencortex/tui)" \
--eval "(opencortex.tui:main)" --eval "(opencortex.tui:main)"

10
opencortex.sh
View File

@@ -42,8 +42,8 @@ setup_system() {
echo -e "${YELLOW}--- Installing System Dependencies ---${NC}" echo -e "${YELLOW}--- Installing System Dependencies ---${NC}"
if command_exists apt-get; then if command_exists apt-get; then
sudo apt-get update && sudo apt-get install -y sbcl emacs-nox rlwrap netcat-openbsd curl git socat libssl-dev libncurses5-dev libffi-dev zlib1g-dev libsqlite3-dev sudo apt-get update && sudo apt-get install -y sbcl emacs-nox rlwrap netcat-openbsd curl git socat libssl-dev libncurses5-dev libffi-dev zlib1g-dev libsqlite3-dev
fi fi
if [ ! -d "$HOME/quicklisp" ]; then if [ ! -d "$HOME/quicklisp" ]; then
curl -O https://beta.quicklisp.org/quicklisp.lisp curl -O https://beta.quicklisp.org/quicklisp.lisp
sbcl --non-interactive --load quicklisp.lisp --eval "(quicklisp-quickstart:install)" --eval "(ql-util:without-prompting (ql:add-to-init-file))" sbcl --non-interactive --load quicklisp.lisp --eval "(quicklisp-quickstart:install)" --eval "(ql-util:without-prompting (ql:add-to-init-file))"
rm quicklisp.lisp rm quicklisp.lisp
@@ -125,8 +125,7 @@ setup_system() {
echo -e "${YELLOW}--- Compiling and Loading OpenCortex (this may take a minute) ---${NC}" echo -e "${YELLOW}--- Compiling and Loading OpenCortex (this may take a minute) ---${NC}"
sbcl --non-interactive \ sbcl --non-interactive --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \ --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \
--eval "(ql:quickload '(:opencortex :croatoan))" --eval "(ql:quickload '(:opencortex :croatoan))"
@@ -206,8 +205,7 @@ if [[ "$1" == "tui" ]]; then
# Force absolute paths for core system directories # Force absolute paths for core system directories
export SKILLS_DIR="${SCRIPT_DIR}/skills" export SKILLS_DIR="${SCRIPT_DIR}/skills"
[ -z "$MEMEX_DIR" ] && export MEMEX_DIR="$HOME/memex" [ -z "$MEMEX_DIR" ] && export MEMEX_DIR="$HOME/memex"
exec sbcl \ exec sbcl --eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(load (merge-pathnames \"quicklisp/setup.lisp\" (user-homedir-pathname)))" \
--eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \ --eval "(push (truename \"$SCRIPT_DIR/\") asdf:*central-registry*)" \
--eval "(ql:quickload :opencortex/tui)" \ --eval "(ql:quickload :opencortex/tui)" \
--eval "(opencortex.tui:main)" --eval "(opencortex.tui:main)"