SBCL 2.6.1 / ASDF 3.3.5
STYLE-WARNING: The new FTYPE proclamation for FSET::WB-BAG-TREE-TOTAL-COUNT(FUNCTION (FSET::WB-BAG-TREE) INTEGER)does not match the derived return type(FUNCTION ((OR LIST FSET::WB-BAG-TREE-NODE)) (VALUES NUMBER &OPTIONAL)) WARNING: redefining DEFTYPE type to be a class: FSET2:SET WARNING: redefining DEFTYPE type to be a class: FSET2:MAP WARNING: redefining DEFTYPE type to be a class: FSET2:WB-MAP WARNING: redefining DEFTYPE type to be a class: FSET2:CH-MAP WARNING: redefining DEFTYPE type to be a class: FSET2:SEQ WARNING: redefining DEFTYPE type to be a class: FSET2:WB-SEQ WARNING: redefining DEFTYPE type to be a class: FSET2:REPLAY-MAP WARNING: redefining DEFTYPE type to be a class: FSET2:WB-REPLAY-MAP WARNING: redefining DEFTYPE type to be a class: FSET2:CH-REPLAY-MAP ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/verlet/754df3357edf7ece2b9999c313584db7e50840e1/verlet-20260307-git/utility/algebra.lisp ; in: DEFUN PROJECT ; (CHAIN:=> VERLET::V ; (RTG-MATH.VECTOR3:- VERLET::% VERLET::P) ; (RTG-MATH.VECTOR3:- VERLET::% ; (RTG-MATH.VECTOR3:*S VERLET::N ; (RTG-MATH.VECTOR3:DOT VERLET::% ; VERLET::N))) ; (RTG-MATH.VECTOR3:+ VERLET::% VERLET::P)) ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> VERLET::V)) ; (PROGN ; (MACROLET ((CHAIN::BAIL # ; `#) ; (CHAIN::FINISH # ; `#)) ; (METABANG.BIND:BIND (#) ; (METABANG.BIND:BIND # ; #))))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> (RTG-MATH.VECTOR3:- VERLET::% VERLET::P))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; (METABANG.BIND:BIND (#) ; CHAIN:<>)))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND LET* PROGN ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> ; (RTG-MATH.VECTOR3:- VERLET::% (RTG-MATH.VECTOR3:*S VERLET::N #)))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; CHAIN:<>))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; in: DEFUN ORTHOGONALIZE ; (CHAIN:=> VERLET::V ; (RTG-MATH.VECTOR3:- VERLET::% VERLET::P) ; (RTG-MATH.VECTOR3:*S VERLET::N (RTG-MATH.VECTOR3:DOT VERLET::% VERLET::N)) ; (RTG-MATH.VECTOR3:+ VERLET::% VERLET::P)) ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> VERLET::V)) ; (PROGN ; (MACROLET ((CHAIN::BAIL # ; `#) ; (CHAIN::FINISH # ; `#)) ; (METABANG.BIND:BIND (#) ; (METABANG.BIND:BIND # ; #))))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> (RTG-MATH.VECTOR3:- VERLET::% VERLET::P))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; (METABANG.BIND:BIND (#) ; CHAIN:<>)))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND LET* PROGN ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> ; (RTG-MATH.VECTOR3:*S VERLET::N ; (RTG-MATH.VECTOR3:DOT VERLET::% VERLET::N)))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; CHAIN:<>))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; in: DEFUN MIRROR ; (CHAIN:=> VERLET::V ; (RTG-MATH.VECTOR3:- VERLET::% VERLET::P) ; (RTG-MATH.VECTOR3:*S VERLET::N (RTG-MATH.VECTOR3:DOT VERLET::% VERLET::N)) ; (RTG-MATH.VECTOR3:- VERLET::V (RTG-MATH.VECTOR3:*S VERLET::% 2.0))) ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> VERLET::V)) ; (PROGN ; (MACROLET ((CHAIN::BAIL # ; `#) ; (CHAIN::FINISH # ; `#)) ; (METABANG.BIND:BIND (#) ; (METABANG.BIND:BIND # ; #))))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> (RTG-MATH.VECTOR3:- VERLET::% VERLET::P))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; (METABANG.BIND:BIND (#) ; CHAIN:<>)))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND LET* PROGN ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> ; (RTG-MATH.VECTOR3:*S VERLET::N ; (RTG-MATH.VECTOR3:DOT VERLET::% VERLET::N)))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; CHAIN:<>))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; in: DEFUN TOWARDS ; (CHAIN:=> VERLET::V ; (RTG-MATH.VECTOR3:- VERLET::TARGET VERLET::%) ; (RTG-MATH.VECTOR3:*S (RTG-MATH.VECTOR3:NORMALIZE VERLET::%) LENGTH) ; (RTG-MATH.VECTOR3:+ VERLET::V VERLET::%)) ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> VERLET::V)) ; (PROGN ; (MACROLET ((CHAIN::BAIL # ; `#) ; (CHAIN::FINISH # ; `#)) ; (METABANG.BIND:BIND (#) ; (METABANG.BIND:BIND # ; #))))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> (RTG-MATH.VECTOR3:- VERLET::TARGET VERLET::%))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; (METABANG.BIND:BIND (#) ; CHAIN:<>)))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. ; --> METABANG.BIND:BIND LET* PROGN MACROLET METABANG.BIND:BIND LET* PROGN ; --> METABANG.BIND:BIND ; ==> ; (LET* ((CHAIN:<> ; (RTG-MATH.VECTOR3:*S (RTG-MATH.VECTOR3:NORMALIZE VERLET::%) LENGTH))) ; (PROGN ; (METABANG.BIND:BIND ((CHAIN:<> #)) ; CHAIN:<>))) ; ; caught STYLE-WARNING: ; The variable <> is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "verlet" "utility" "algebra"> Unhandled UNBOUND-VARIABLE in thread #<SB-THREAD:THREAD tid=3584451 "main thread" RUNNING {1200030003}>: The variable FORCE is unbound. Backtrace for: #<SB-THREAD:THREAD tid=3584451 "main thread" RUNNING {1200030003}> 0: ("top level form") [toplevel] 1: (SB-FASL::LOAD-FASL-GROUP #S(SB-FASL::FASL-INPUT :STREAM #<SB-SYS:FD-STREAM for "file /home/quicklisp/.cache/common-lisp/sbcl-2.6.1-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/verlet/754df3357edf7ece2b9999c313584db7e50840e1/verlet-20260307-git/source/force.fasl" {120EAB5A23}> :TABLE #(166 #1="/home/quicklisp/quicklisp-controller/dist/build-cache/verlet/754df3357edf7ece2b9999c313584db7e50840e1/verlet-20260307-git/source/force.lisp" "VERLET" *PACKAGE* #2=#<PACKAGE "VERLET"> @FORCE DEFORCE #<PACKAGE "MGL-PAX"> MACRO (DEFORCE MACRO) FORCE LOCATIVE ...) :STACK #(0 #<FUNCTION #3="top level form" {120DD7C0FB}> %DEFORCE DEFORCE #S(SB-C:DEFINITION-SOURCE-LOCATION :NAMESTRING #1# :INDICES 196609) #<FUNCTION (MACRO-FUNCTION DEFORCE) {B800F6CC7B}> #S(SB-C::COMPILED-DEBUG-INFO :NAME #3# :SOURCE #4=#S(SB-C::DEBUG-SOURCE :NAMESTRING #1# :CREATED 3967879268 :START-POSITIONS NIL :PLIST NIL) :PACKAGE #2# :FUN-MAP #(12 103 0 37 0 7 71 39 3 69 52 3 ...) :CONTEXTS #(-5854 -3934 -3065) :REST #3#) 0 NIL 15728768 SB-C::%DEFMACRO 12320896 ...) :NAME-BUFFER #("