abstract-arrays

SBCL 2.4.9 / ASDF 3.3.5

abstract-arrays

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/asdf-system-connections/c49a358d1e61207c282e985905eae1810205fc2b/asdf-system-connections-20241021-git/dev/asdf-system-connections.lisp
; in: DEFUN REGISTERED-SYSTEM
;     (ASDF/BACKWARD-INTERFACE:SYSTEM-REGISTERED-P ASDF/INTERFACE::SYSTEM-NAME)
; 
; caught STYLE-WARNING:
;   DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:SYSTEM-REGISTERED-P -- please update your code to use a newer API.
;   The docstring for this function says:
;   DEPRECATED. Return a generalized boolean that is true if a system of given NAME was registered already.
;   NAME is a system designator, to be normalized by COERCE-NAME.
;   The value returned if true is a pair of a timestamp and a system object.
;   
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "asdf-system-connections" "dev" "asdf-system-connections">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/alternate-asdf-system-connections/108ea9802dcd5b20a17207c8ac7b7d7d531d1e61/alternate-asdf-system-connections-20241021-git/src/asdf-system-connections.lisp
; in: DEFMACRO DEFINE-SYSTEM-CONNECTION
;     (ALTERNATE-ASDF-SYSTEM-CONNECTIONS::REQ (GENSYM "REQ"))
; 
; caught STYLE-WARNING:
;   The variable REQ is defined but never used.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/alternate-asdf-system-connections/108ea9802dcd5b20a17207c8ac7b7d7d531d1e61/alternate-asdf-system-connections-20241021-git/src/asdf-system-connections.lisp
; in: DEFMACRO DEFINE-SYSTEM-CONNECTION
;     (ALTERNATE-ASDF-SYSTEM-CONNECTIONS::REQ (GENSYM "REQ"))
; 
; caught STYLE-WARNING:
;   The variable REQ is defined but never used.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "alternate-asdf-system-connections" "src" "asdf-system-connections">
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
; 
; compilation unit finished
;   caught 3 STYLE-WARNING conditions

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/optima/aec56f162a6b34024d0b419ed9dfb35ef9e75be6/optima-20241021-git/src/runtime.lisp
; in: DEFUN %EQUAL
;     (STRING= OPTIMA::A OPTIMA::B)
; 
; note: unable to optimize due to type uncertainty: The first argument is a STRING, not a SIMPLE-BASE-STRING.The second argument is a STRING, not a SIMPLE-BASE-STRING.
; 
; note: unable to optimize due to type uncertainty: The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).The second argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).

; in: DEFUN %SVREF
;     (LENGTH SIMPLE-VECTOR)
; 
; note: unable to optimize due to type uncertainty: The first argument is a SEQUENCE, not a VECTOR.

;     (< OPTIMA::INDEX (LENGTH SIMPLE-VECTOR))
; 
; note: unable to open-code FLOAT to RATIONAL comparison due to type uncertainty: The first argument is a REAL, not a SINGLE-FLOAT.
; 
; note: unable to open-code FLOAT to RATIONAL comparison due to type uncertainty: The first argument is a REAL, not a DOUBLE-FLOAT.
; 
; note: forced to do GENERIC-< (cost 10)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a REAL, not a FIXNUM.

; in: DEFUN %ASSOC
;     (FUNCALL OPTIMA::TEST OPTIMA::ITEM (CAR CONS))
; 
; note: unable to optimize away possible call to FDEFINITION at runtime because: callable expression is not known to be a function

; in: DEFUN %GET-PROPERTY
;     (EQL OPTIMA::ITEM (CAR OPTIMA::PLIST))
; 
; note: forced to do IF-EQL (cost 15)
;       unable to do inline fixnum comparison (cost 4) because:
;       The first argument is a T, not a FIXNUM.
;       The second argument is a T, not a FIXNUM.
;       unable to do inline float comparison (cost 4) because:
;       The first argument is a T, not a SINGLE-FLOAT.
;       The second argument is a T, not a SINGLE-FLOAT.
;       etc.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/collectors/f0acbf5225d2f0b2a009edb7947dc8ecb5638d68/collectors-20241021-git/collectors.lisp
; in: DEFMETHOD SHOULD-AGGREGATE? (LIST-AGGREGATOR T)
;     (MEMBER COLLECTORS::V (COLLECTORS-SIGNALS:VALUE COLLECTORS::O) :TEST
;             #'COLLECTORS::NEW-ONLY-TEST :KEY
;             (OR (COLLECTORS::NEW-ONLY-KEY COLLECTORS::O) #'IDENTITY))
; 
; caught STYLE-WARNING:
;   The function NEW-ONLY-TEST is called by MEMBER with two arguments, but wants exactly one.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "collectors" "collectors">
WARNING: CL-ENVIRONMENTS-CL also exports the following symbols:
  (LONG-FLOAT-NEGATIVE-EPSILON QUOTE DEFINE-SETF-EXPANDER SORT DELETE-DUPLICATES SETF WITH-OUTPUT-TO-STRING COERCE AREF WITH-CONDITION-RESTARTS COND NRECONC MAKE-INSTANCE DECLARATION EVAL-WHEN BIT BUTLAST OPEN-STREAM-P BOOLE STABLE-SORT MACHINE-TYPE SYMBOL-PLIST LOOP POP GET-SETF-EXPANSION DESTRUCTURING-BIND NUMBERP DEFPACKAGE CDDR ARRAY-ROW-MAJOR-INDEX LDB COPY-STRUCTURE FUNCTION-KEYWORDS CHAR-GREATERP CLOSE INTERNAL-TIME-UNITS-PER-SECOND CDAR PATHNAME CONCATENATED-STREAM-STREAMS PRIN1 PHASE INVOKE-RESTART-INTERACTIVELY PARSE-ERROR FIFTH COMPLEXP FDEFINITION DIGIT-CHAR /= TYPEP DO* ARRAY-DISPLACEMENT MIN FMAKUNBOUND LONG-FLOAT-EPSILON TREE-EQUAL LEAST-NEGATIVE-NORMALIZED-LONG-FLOAT NBUTLAST READ-CHAR-NO-HANG *DEBUG-IO* PPRINT-EXIT-IF-LIST-EXHAUSTED SET-DISPATCH-MACRO-CHARACTER SPECIAL-OPERATOR-P WITH-OPEN-STREAM FLOATING-POINT-UNDERFLOW INVOKE-RESTART REMOVE UNBOUND-VARIABLE NSUBST-IF CDDAAR REMOVE-IF MAKE-SYNONYM-STREAM GETF COMPLEX REVERSE REMOVE-DUPLICATES FIND PRINT-NOT-READABLE-OBJECT END-OF-FILE CAR SINGLE-FLOAT-EPSILON LET FROUND CODE-CHAR HANDLER-CASE ED BOOLE-ORC2 STRING>= RESTART-CASE FLOATING-POINT-OVERFLOW ARRAY-RANK WRITE-STRING MULTIPLE-VALUE-SETQ UNREAD-CHAR CONCATENATE *MACROEXPAND-HOOK* LOGIOR STRING-STREAM GO &KEY EQUAL KEYWORDP MAKE-CONCATENATED-STREAM CLEAR-INPUT BLOCK NSUBLIS LOGANDC2 FLOAT-DIGITS ASINH FLOAT-SIGN REINITIALIZE-INSTANCE *BREAK-ON-SIGNALS* STRING PRINT-NOT-READABLE MOST-NEGATIVE-LONG-FLOAT ENOUGH-NAMESTRING HASH-TABLE-COUNT *** STRING-NOT-GREATERP STRING-RIGHT-TRIM *COMPILE-FILE-TRUENAME* CASE REMOVE-METHOD ROUND MAPLIST MACROLET DRIBBLE COMPILE-FILE-PATHNAME EVERY *PRINT-RADIX* CADDAR UNTRACE LEAST-POSITIVE-LONG-FLOAT SIMPLE-ERROR FUNCALL NULL BIT-NOT COMPUTE-RESTARTS &ENVIRONMENT THROW REALPART *PRINT-BASE* CHANGE-CLASS CIS CLASS-NAME PACKAGE-NAME *DEBUGGER-HOOK* HANDLER-BIND BIT-VECTOR CONSTANTP READTABLEP STANDARD-CHAR-P *ERROR-OUTPUT* MEMBER NCONC COMPILE-FILE TYPE-ERROR-DATUM BIT-AND FILE-STREAM DEFMETHOD SIXTH ECHO-STREAM-OUTPUT-STREAM STRING-EQUAL CONSTANTLY ACONS MOST-POSITIVE-SINGLE-FLOAT ARRAY-DIMENSION DIGIT-CHAR-P ALPHA-CHAR-P STYLE-WARNING READTABLE MAKE-PATHNAME *READ-DEFAULT-FLOAT-FORMAT* *PRINT-GENSYM* STRING> FUNCTION-LAMBDA-EXPRESSION MOST-NEGATIVE-DOUBLE-FLOAT STANDARD-GENERIC-FUNCTION RETURN-FROM NSTRING-DOWNCASE BIT-EQV PUSH ASSOC SIMPLE-CONDITION-FORMAT-ARGUMENTS SIMPLE-STRING MAKE-RANDOM-STATE LOGNOR CELL-ERROR ELT LOGORC1 FILE-POSITION TRANSLATE-PATHNAME FIND-CLASS ARRAY-RANK-LIMIT ROTATEF INTEGER-LENGTH CDDDDR FRESH-LINE BASE-CHAR ASSOC-IF FLOATING-POINT-INVALID-OPERATION DEPOSIT-FIELD REVAPPEND VECTOR-PUSH-EXTEND SUBSTITUTE-IF PUSHNEW SIMPLE-BIT-VECTOR SET RASSOC SYMBOL-VALUE WRITE-SEQUENCE VECTOR STRING-DOWNCASE FOURTH NUMBER PROG1 READ-PRESERVING-WHITESPACE *PRINT-LENGTH* NUMERATOR UPDATE-INSTANCE-FOR-DIFFERENT-CLASS FCEILING FILE-STRING-LENGTH DEFGENERIC CAADDR *READ-BASE* SOME WITH-INPUT-FROM-STRING PARSE-INTEGER BOOLE-EQV CHAR-UPCASE CCASE ASIN READ *STANDARD-OUTPUT* TYPE-ERROR-EXPECTED-TYPE ADJUST-ARRAY SYNONYM-STREAM RESTART-NAME LOGNAND TANH LCM PATHNAME-DEVICE CONTINUE PAIRLIS // INTEGERP NTHCDR *PRINT-PPRINT-DISPATCH* SET-EXCLUSIVE-OR *READ-EVAL* DO-SYMBOLS PRINT PROVIDE SET-DIFFERENCE CHARACTERP BIT-XOR STRUCTURE-CLASS COMPILE GET-INTERNAL-RUN-TIME INITIALIZE-INSTANCE DEFINE-COMPILER-MACRO ISQRT STREAM-EXTERNAL-FORMAT COPY-READTABLE DEFCLASS < INLINE APPEND TAILP SLOT-VALUE STRING-CAPITALIZE LEAST-NEGATIVE-LONG-FLOAT WITH-ACCESSORS PROCLAIM DEFCONSTANT SHIFTF DISASSEMBLE LISP-IMPLEMENTATION-TYPE LONG-FLOAT UPPER-CASE-P VALUES-LIST CDR ETYPECASE OPEN STORAGE-CONDITION FLOAT-PRECISION COMPILED-FUNCTION MACHINE-VERSION *PRINT-LINES* BIT-ORC1 SIGNAL DECODE-UNIVERSAL-TIME CHAR-CODE-LIMIT IGNORE CDADR MACRO-FUNCTION EXPORT RANDOM MISMATCH NOTINLINE SHADOW CONS CADAAR SUBLIS CHAR-INT DIRECTORY-NAMESTRING ACOS DEFINE-CONDITION TRACE LEAST-POSITIVE-NORMALIZED-SINGLE-FLOAT LIST SCHAR EQL MAKE-HASH-TABLE SEARCH ECASE SLOT-EXISTS-P GENSYM MOST-NEGATIVE-SINGLE-FLOAT FUNCTIONP ERROR FLOATING-POINT-INEXACT HOST-NAMESTRING BOOLE-CLR &OPTIONAL PATHNAMEP PATHNAME-TYPE PRIN1-TO-STRING LEAST-NEGATIVE-DOUBLE-FLOAT SEQUENCE *PACKAGE* PPRINT-LOGICAL-BLOCK RETURN BOOLE-C1 = DOCUMENTATION BOOLE-ORC1 PROGN IN-PACKAGE DECLAIM EVAL LOAD-TIME-VALUE DELETE-PACKAGE CHAR> STORE-VALUE GENTEMP FIRST DECODE-FLOAT BOOLE-2 FILE-LENGTH MEMBER-IF-NOT BUILT-IN-CLASS NSUBSTITUTE-IF PATHNAME-DIRECTORY DOTIMES THIRD SYMBOL-FUNCTION NSET-EXCLUSIVE-OR LOGANDC1 LET* NSUBSTITUTE-IF-NOT BROADCAST-STREAM FLOAT-RADIX CONJUGATE FLET CERROR FINISH-OUTPUT ALLOCATE-INSTANCE GET-OUTPUT-STREAM-STRING READ-BYTE *READ-SUPPRESS* MOST-NEGATIVE-FIXNUM MEMBER-IF DIVISION-BY-ZERO MULTIPLE-VALUES-LIMIT MAPCAR LEAST-NEGATIVE-SHORT-FLOAT SAFETY MAKE-ECHO-STREAM PATHNAME-HOST BOOLE-XOR CALL-METHOD SUBST-IF KEYWORD DEBUG BIT-ANDC1 NINTERSECTION WRITE-CHAR STRING-TRIM RPLACA IDENTITY WRITE SETQ CHAR/= TENTH *LOAD-TRUENAME* BYTE-POSITION ENCODE-UNIVERSAL-TIME *COMPILE-FILE-PATHNAME* SYMBOL BOOLE-SET VECTORP MAPHASH VECTOR-POP MACHINE-INSTANCE COPY-TREE MACROEXPAND-1 DPB CDDDAR METHOD MAKE-BROADCAST-STREAM CATCH ROW-MAJOR-AREF COUNT-IF-NOT FTYPE SYMBOL-PACKAGE SHORT-SITE-NAME BOTH-CASE-P NAMESTRING CHAR-NOT-EQUAL NOT CAAAAR DIRECTORY NSTRING-UPCASE SIMPLE-WARNING SIMPLE-BIT-VECTOR-P RATIONAL CALL-ARGUMENTS-LIMIT OR RASSOC-IF-NOT SHADOWING-IMPORT SIGNUM SINH MERGE-PATHNAMES FILE-NAMESTRING STRING-NOT-EQUAL GET-DISPATCH-MACRO-CHARACTER CHARACTER LEAST-POSITIVE-SINGLE-FLOAT ADD-METHOD STRING-LEFT-TRIM CADR INSPECT / SPECIAL DOUBLE-FLOAT-EPSILON INCF ARRAY-DIMENSIONS COUNT LEAST-POSITIVE-SHORT-FLOAT LEAST-POSITIVE-NORMALIZED-DOUBLE-FLOAT GETHASH EXPT SUBSETP FUNCTION CADDR MAKE-PACKAGE INTERN LEAST-NEGATIVE-NORMALIZED-SINGLE-FLOAT ADJOIN PROGV BOOLE-AND *COMPILE-VERBOSE* + TRUNCATE STRING-NOT-LESSP REMF MAX NO-APPLICABLE-METHOD CDADAR * EVENP READ-FROM-STRING SLEEP ATAN LEAST-NEGATIVE-SINGLE-FLOAT > BOOLEAN DECF SIMPLE-CONDITION MAPCAN WHEN LISP-IMPLEMENTATION-VERSION CLASS CHAR-NOT-LESSP PROBE-FILE T ASH INTERACTIVE-STREAM-P APPLY MAKE-STRING SIMPLE-BASE-STRING SIMPLE-CONDITION-FORMAT-CONTROL CEILING IMPORT POSITION-IF NINTH MOST-POSITIVE-FIXNUM APROPOS-LIST SHORT-FLOAT-EPSILON COMPUTE-APPLICABLE-METHODS BOOLE-NOR GCD READ-LINE STRINGP BOOLE-ANDC2 RESTART CDDAR SLOT-BOUNDP &BODY MUFFLE-WARNING CADADR READTABLE-CASE LDIFF HASH-TABLE-TEST BIT-ORC2 LAMBDA MULTIPLE-VALUE-CALL CAAAR 1- DELETE-IF *QUERY-IO* UNDEFINED-FUNCTION STRUCTURE PROG* FIND-ALL-SYMBOLS SIN ATOM YES-OR-NO-P TWO-WAY-STREAM-OUTPUT-STREAM PARSE-NAMESTRING *READTABLE* <= LOGTEST CHAR-LESSP DEFPARAMETER UNBOUND-SLOT /// CDAAAR DOUBLE-FLOAT-NEGATIVE-EPSILON STANDARD-CHAR LOCALLY MOST-POSITIVE-LONG-FLOAT LOGICAL-PATHNAME STANDARD IF OTHERWISE TWO-WAY-STREAM PPRINT-INDENT STREAM-ELEMENT-TYPE MASK-FIELD FILE-AUTHOR COPY-PPRINT-DISPATCH CADDDR SET-PPRINT-DISPATCH COPY-ALIST ARITHMETIC-ERROR-OPERANDS FTRUNCATE DO-EXTERNAL-SYMBOLS READ-DELIMITED-LIST PPRINT-NEWLINE FIND-PACKAGE BIT-IOR MAP-INTO MINUSP DELETE SIMPLE-VECTOR STREAMP CTYPECASE CHAR= DO-ALL-SYMBOLS SIGNED-BYTE RATIO COUNT-IF FIND-RESTART POSITION ARRAYP DOUBLE-FLOAT LOGXOR LOAD-LOGICAL-PATHNAME-TRANSLATIONS SOFTWARE-VERSION CHAR-NAME OPTIMIZE SLOT-MAKUNBOUND LAST LAMBDA-LIST-KEYWORDS ASSERT CLRHASH REMOVE-IF-NOT PACKAGE-SHADOWING-SYMBOLS SEVENTH BOOLE-1 MAKE-ARRAY MAKE-METHOD NSUBST-IF-NOT CHAR<= CLEAR-OUTPUT PEEK-CHAR PRINT-OBJECT COPY-SYMBOL COMPILER-MACRO-FUNCTION SYMBOL-NAME WITH-SLOTS CHAR-CODE CONSP ENSURE-GENERIC-FUNCTION WITH-PACKAGE-ITERATOR DEFMACRO VARIABLE FLOAT SCALE-FLOAT LIST* EIGHTH SHORT-FLOAT TYPE-OF NSET-DIFFERENCE CAADAR MAKE-CONDITION READ-CHAR CHAR>= ECHO-STREAM-INPUT-STREAM EXTENDED-CHAR CONDITION ABS MAKE-STRING-OUTPUT-STREAM FIND-METHOD BYTE DEFINE-MODIFY-MACRO STRING-LESSP Y-OR-N-P LENGTH GET-UNIVERSAL-TIME PRINT-UNREADABLE-OBJECT PLUSP ARRAY-ELEMENT-TYPE UNUSE-PACKAGE PPRINT-TAB GET-DECODED-TIME RENAME-PACKAGE ARITHMETIC-ERROR-OPERATION TERPRI ROOM ENDP STANDARD-CLASS LISTP ASSOC-IF-NOT FFLOOR CLASS-OF ALPHANUMERICP +++ STRING< LDB-TEST &ALLOW-OTHER-KEYS BIT-NOR MAPL DOLIST MERGE RPLACD IGNORE-ERRORS PACKAGE-NICKNAMES AND DEFTYPE MACROEXPAND CHECK-TYPE LOGNOT PPRINT USER-HOMEDIR-PATHNAME FILE-WRITE-DATE ENSURE-DIRECTORIES-EXIST BREAK DEFUN WILD-PATHNAME-P MULTIPLE-VALUE-LIST SATISFIES FORCE-OUTPUT UPGRADED-ARRAY-ELEMENT-TYPE REMPROP UNEXPORT REMHASH GET-PROPERTIES ACOSH LONG-SITE-NAME WITH-STANDARD-IO-SYNTAX DEFSETF SECOND BOOLE-IOR RENAME-FILE LOGBITP DEFINE-METHOD-COMBINATION INTERSECTION BIT-NAND SIMPLE-TYPE-ERROR SET-SYNTAX-FROM-CHAR TIME MAKE-SEQUENCE TAN CHAR-EQUAL FILL SUBTYPEP *PRINT-PRETTY* WRITE-TO-STRING NUNION INVOKE-DEBUGGER IMAGPART PPRINT-TABULAR WRITE-BYTE *PRINT-RIGHT-MARGIN* ++ *PRINT-LEVEL* RANDOM-STATE-P DENOMINATOR HASH-TABLE-REHASH-SIZE CELL-ERROR-NAME FILL-POINTER REAL LOGICAL-PATHNAME-TRANSLATIONS CONTROL-ERROR MOST-NEGATIVE-SHORT-FLOAT DEFVAR NSTRING-CAPITALIZE CHAR-NOT-GREATERP PATHNAME-NAME SXHASH SIMPLE-VECTOR-P FIND-IF-NOT FIND-SYMBOL GENERIC-FUNCTION BIT-ANDC2 CONCATENATED-STREAM BOOLE-ANDC1 SOFTWARE-TYPE *PRINT-ESCAPE* WARN TRANSLATE-LOGICAL-PATHNAME GRAPHIC-CHAR-P *LOAD-VERBOSE* GET LOG *TERMINAL-IO* RATIONALP *LOAD-PATHNAME* EQUALP SINGLE-FLOAT-NEGATIVE-EPSILON *PRINT-READABLY* COMPILED-FUNCTION-P CHAR MAKE-STRING-INPUT-STREAM METHOD-QUALIFIERS &AUX WARNING FLOATP MAPCON LOOP-FINISH ATANH STEP DO STRING/= TRUENAME INPUT-STREAM-P MAKE-INSTANCES-OBSOLETE SPEED FILE-ERROR-PATHNAME POSITION-IF-NOT MOST-POSITIVE-DOUBLE-FLOAT MAKE-SYMBOL BOUNDP *PRINT-MISER-WIDTH* PPRINT-POP LOGCOUNT *PRINT-ARRAY* PRINC-TO-STRING PPRINT-LINEAR NSUBSTITUTE USE-VALUE MAKE-LIST FIND-IF COPY-SEQ SET-MACRO-CHARACTER REDUCE CDADDR SUBSEQ CDAAR PACKAGE NTH RANDOM-STATE SIMPLE-STRING-P SQRT SYNONYM-STREAM-SYMBOL THE PACKAGE-USE-LIST *LOAD-PRINT* REQUIRE METHOD-COMBINATION CADAR NAME-CHAR RESTART-BIND WITH-HASH-TABLE-ITERATOR IGNORABLE DESCRIBE-OBJECT LIST-LENGTH STRING-GREATERP NREVERSE BOOLE-NAND CHAR-DOWNCASE COMPLEMENT PATHNAME-VERSION PROG *PRINT-CIRCLE* ARRAY-TOTAL-SIZE-LIMIT METHOD-COMBINATION-ERROR PSETQ UNBOUND-SLOT-INSTANCE LEAST-POSITIVE-DOUBLE-FLOAT PSETF REPLACE PACKAGE-ERROR NOTEVERY CHAR< ADJUSTABLE-ARRAY-P WITH-SIMPLE-RESTART MAKE-TWO-WAY-STREAM SLOT-MISSING STREAM PROGRAM-ERROR COMPILATION-SPEED *TRACE-OUTPUT* STRING-UPCASE *FEATURES* EXP STRUCTURE-OBJECT PACKAGEP REM CAAR BROADCAST-STREAM-STREAMS MAKUNBOUND TWO-WAY-STREAM-INPUT-STREAM ECHO-STREAM READ-SEQUENCE MAPC PPRINT-FILL &REST MOST-POSITIVE-SHORT-FLOAT SLOT-UNBOUND FORMATTER UNWIND-PROTECT WITH-OPEN-FILE COS LEAST-NEGATIVE-NORMALIZED-DOUBLE-FLOAT UNSIGNED-BYTE COSH LABELS ARRAY LOGAND NSUBST BIGNUM SYMBOLP *RANDOM-STATE* VECTOR-PUSH STANDARD-OBJECT >= SHORT-FLOAT-NEGATIVE-EPSILON ODDP DEFSTRUCT DECLARE STANDARD-METHOD LIST-ALL-PACKAGES TYPE VALUES DESCRIBE TYPECASE ** SINGLE-FLOAT DELETE-FILE STRING<= STREAM-ERROR BASE-STRING LOWER-CASE-P LISTEN FIXNUM COPY-LIST ARITHMETIC-ERROR SUBSTITUTE-IF-NOT TYPE-ERROR CALL-NEXT-METHOD LEAST-POSITIVE-NORMALIZED-SHORT-FLOAT *COMPILE-PRINT* HASH-TABLE-SIZE MAKE-LOAD-FORM INTEGER-DECODE-FLOAT ARRAY-DIMENSION-LIMIT ARRAY-IN-BOUNDS-P MULTIPLE-VALUE-PROG1 READER-ERROR HASH-TABLE-P MAKE-LOAD-FORM-SAVING-SLOTS DYNAMIC-EXTENT FBOUNDP *DEFAULT-PATHNAME-DEFAULTS* STRING= CDDDR PATHNAME-MATCH-P GET-MACRO-CHARACTER LEAST-NEGATIVE-NORMALIZED-SHORT-FLOAT *GENSYM-COUNTER* RASSOC-IF MULTIPLE-VALUE-BIND 1+ INVALID-METHOD-ERROR ZEROP *MODULES* PI SUBSTITUTE GET-INTERNAL-REAL-TIME FILE-ERROR *STANDARD-INPUT* LAMBDA-PARAMETERS-LIMIT BIT-VECTOR-P - SUBST NTH-VALUE USE-PACKAGE MOD INTEGER UNLESS SPACE UNINTERN FLOOR ARRAY-TOTAL-SIZE CAAADR OUTPUT-STREAM-P APROPOS NOTANY UPDATE-INSTANCE-FOR-REDEFINED-CLASS DEFINE-SYMBOL-MACRO UPGRADED-COMPLEX-PART-TYPE MAP BOOLE-C2 LOGORC2 NO-NEXT-METHOD EQ &WHOLE SVREF LEAST-POSITIVE-NORMALIZED-LONG-FLOAT PRINC HASH-TABLE-REHASH-THRESHOLD LOGEQV SIMPLE-ARRAY FORMAT SHARED-INITIALIZE LOAD CAADR PPRINT-DISPATCH BYTE-SIZE SUBST-IF-NOT WITH-COMPILATION-UNIT NEXT-METHOD-P ABORT MAKE-DISPATCH-MACRO-CHARACTER REALP STREAM-ERROR-STREAM RATIONALIZE PACKAGE-USED-BY-LIST WRITE-LINE PROG2 PACKAGE-ERROR-PACKAGE DELETE-IF-NOT SBIT CDDADR *PRINT-CASE* UNION CDAADR TAGBODY ARRAY-HAS-FILL-POINTER-P SERIOUS-CONDITION HASH-TABLE REST SYMBOL-MACROLET NIL COMPILER-MACRO)
See also:
  The ANSI Standard, Macro DEFPACKAGE
  The SBCL Manual, Variable *ON-PACKAGE-VARIANCE*
WARNING: redefining UIOP/PACKAGE:FIND-PACKAGE* in DEFUN
WARNING: redefining UIOP/PACKAGE:FIND-SYMBOL* in DEFUN
WARNING: redefining UIOP/PACKAGE:SYMBOL-CALL in DEFUN
WARNING: redefining UIOP/PACKAGE:INTERN* in DEFUN
WARNING: redefining UIOP/PACKAGE:EXPORT* in DEFUN
WARNING: redefining UIOP/PACKAGE:IMPORT* in DEFUN
WARNING: redefining UIOP/PACKAGE:SHADOWING-IMPORT* in DEFUN
WARNING: redefining UIOP/PACKAGE:SHADOW* in DEFUN
WARNING: redefining UIOP/PACKAGE:MAKE-SYMBOL* in DEFUN
WARNING: redefining UIOP/PACKAGE:UNINTERN* in DEFUN
WARNING: redefining UIOP/PACKAGE:SYMBOL-SHADOWING-P in DEFUN
WARNING: redefining UIOP/PACKAGE:HOME-PACKAGE-P in DEFUN
WARNING: redefining UIOP/PACKAGE:SYMBOL-PACKAGE-NAME in DEFUN
WARNING: redefining UIOP/PACKAGE:STANDARD-COMMON-LISP-SYMBOL-P in DEFUN
WARNING: redefining UIOP/PACKAGE:REIFY-PACKAGE in DEFUN
WARNING: redefining UIOP/PACKAGE:UNREIFY-PACKAGE in DEFUN
WARNING: redefining UIOP/PACKAGE:REIFY-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE:UNREIFY-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE::RECORD-FISHY in DEFUN
WARNING: redefining UIOP/PACKAGE::WHEN-PACKAGE-FISHINESS in DEFMACRO
WARNING: redefining UIOP/PACKAGE::NOTE-PACKAGE-FISHINESS in DEFMACRO
WARNING: redefining UIOP/PACKAGE::SET-DUMMY-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE::MAKE-DUMMY-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE::DUMMY-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE::GET-DUMMY-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE:NUKE-SYMBOL-IN-PACKAGE in DEFUN
WARNING: redefining UIOP/PACKAGE:NUKE-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE:REHOME-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE:ENSURE-PACKAGE-UNUSED in DEFUN
WARNING: redefining UIOP/PACKAGE:DELETE-PACKAGE* in DEFUN
WARNING: redefining UIOP/PACKAGE:PACKAGE-NAMES in DEFUN
WARNING: redefining UIOP/PACKAGE:PACKAGES-FROM-NAMES in DEFUN
WARNING: redefining UIOP/PACKAGE:FRESH-PACKAGE-NAME in DEFUN
WARNING: redefining UIOP/PACKAGE:RENAME-PACKAGE-AWAY in DEFUN
WARNING: redefining UIOP/PACKAGE:PACKAGE-DEFINITION-FORM in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-SHADOWING-IMPORT in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-IMPORTED in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-IMPORT in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-INHERITED in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-MIX in DEFUN
WARNING: redefining UIOP/PACKAGE::RECYCLE-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE::SYMBOL-RECYCLED-P in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-SYMBOL in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-EXPORTED-TO-USER in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-EXPORTED in DEFUN
WARNING: redefining UIOP/PACKAGE::ENSURE-EXPORT in DEFUN
WARNING: redefining UIOP/PACKAGE::INSTALL-PACKAGE-LOCAL-NICKNAMES in DEFUN
WARNING: redefining UIOP/PACKAGE:ENSURE-PACKAGE in DEFUN
WARNING: redefining UIOP/PACKAGE:PARSE-DEFINE-PACKAGE-FORM in DEFUN
WARNING: redefining UIOP/PACKAGE:DEFINE-PACKAGE in DEFMACRO
WARNING: redefining UIOP/COMMON-LISP::FROB-SUBSTRINGS in DEFUN
WARNING: redefining UIOP/COMMON-LISP::COMPATFMT in DEFMACRO
WARNING: redefining UIOP/UTILITY::ENSURE-FUNCTION-NOTINLINE in DEFUN
WARNING: redefining UIOP/UTILITY:WITH-UPGRADABILITY in DEFMACRO
WARNING: redefining UIOP/UTILITY:UIOP-DEBUG in DEFMACRO
WARNING: redefining UIOP/UTILITY:LOAD-UIOP-DEBUG-UTILITY in DEFUN
WARNING: redefining UIOP/UTILITY:NEST in DEFMACRO
WARNING: redefining UIOP/UTILITY:IF-LET in DEFMACRO
WARNING: redefining UIOP/UTILITY:PARSE-BODY in DEFUN
WARNING: redefining UIOP/UTILITY:WHILE-COLLECTING in DEFMACRO
WARNING: redefining UIOP/UTILITY:APPENDF in DEFMACRO
WARNING: redefining UIOP/UTILITY:LENGTH=N-P in DEFUN
WARNING: redefining UIOP/UTILITY:ENSURE-LIST in DEFUN
WARNING: redefining UIOP/UTILITY:REMOVE-PLIST-KEY in DEFUN
WARNING: redefining UIOP/UTILITY:REMOVE-PLIST-KEYS in DEFUN
WARNING: redefining UIOP/UTILITY:EMPTYP in DEFUN
WARNING: redefining UIOP/UTILITY:CHARACTER-TYPE-INDEX in DEFUN
WARNING: redefining UIOP/UTILITY:BASE-STRING-P in DEFUN
WARNING: redefining UIOP/UTILITY:STRINGS-COMMON-ELEMENT-TYPE in DEFUN
WARNING: redefining UIOP/UTILITY:REDUCE/STRCAT in DEFUN
WARNING: redefining UIOP/UTILITY:STRCAT in DEFUN
WARNING: redefining UIOP/UTILITY:FIRST-CHAR in DEFUN
WARNING: redefining UIOP/UTILITY:LAST-CHAR in DEFUN
WARNING: redefining UIOP/UTILITY:SPLIT-STRING in DEFUN
WARNING: redefining UIOP/UTILITY:STRING-PREFIX-P in DEFUN
WARNING: redefining UIOP/UTILITY:STRING-SUFFIX-P in DEFUN
WARNING: redefining UIOP/UTILITY:STRING-ENCLOSED-P in DEFUN
WARNING: redefining UIOP/UTILITY:STRIPLN in DEFUN
WARNING: redefining UIOP/UTILITY:STANDARD-CASE-SYMBOL-NAME in DEFUN
WARNING: redefining UIOP/UTILITY:FIND-STANDARD-CASE-SYMBOL in DEFUN
WARNING: redefining UIOP/UTILITY:TIMESTAMP< in DEFUN
WARNING: redefining UIOP/UTILITY:TIMESTAMPS< in DEFUN
WARNING: redefining UIOP/UTILITY:TIMESTAMP*< in DEFUN
WARNING: redefining UIOP/UTILITY:TIMESTAMP<= in DEFUN
WARNING: redefining UIOP/UTILITY:EARLIER-TIMESTAMP in DEFUN
WARNING: redefining UIOP/UTILITY:TIMESTAMPS-EARLIEST in DEFUN
WARNING: redefining UIOP/UTILITY:EARLIEST-TIMESTAMP in DEFUN
WARNING: redefining UIOP/UTILITY:LATER-TIMESTAMP in DEFUN
WARNING: redefining UIOP/UTILITY:TIMESTAMPS-LATEST in DEFUN
WARNING: redefining UIOP/UTILITY:LATEST-TIMESTAMP in DEFUN
WARNING: redefining UIOP/UTILITY:LATEST-TIMESTAMP-F in DEFMACRO
WARNING: redefining UIOP/UTILITY:ENSURE-FUNCTION in DEFUN
WARNING: redefining UIOP/UTILITY:ACCESS-AT in DEFUN
WARNING: redefining UIOP/UTILITY:ACCESS-AT-COUNT in DEFUN
WARNING: redefining UIOP/UTILITY:CALL-FUNCTION in DEFUN
WARNING: redefining UIOP/UTILITY:CALL-FUNCTIONS in DEFUN
WARNING: redefining UIOP/UTILITY:REGISTER-HOOK-FUNCTION in DEFUN
WARNING: redefining UIOP/UTILITY:COERCE-CLASS in DEFUN
WARNING: redefining UIOP/UTILITY:ENSURE-GETHASH in DEFUN
WARNING: redefining UIOP/UTILITY:LIST-TO-HASH-SET in DEFUN
WARNING: redefining UIOP/UTILITY:LEXICOGRAPHIC< in DEFUN
WARNING: redefining UIOP/UTILITY:LEXICOGRAPHIC<= in DEFUN
WARNING: redefining UIOP/UTILITY:STYLE-WARN in DEFUN
WARNING: redefining UIOP/UTILITY:MATCH-CONDITION-P in DEFUN
WARNING: redefining UIOP/UTILITY:MATCH-ANY-CONDITION-P in DEFUN
WARNING: redefining UIOP/UTILITY:CALL-WITH-MUFFLED-CONDITIONS in DEFUN
WARNING: redefining UIOP/UTILITY:WITH-MUFFLED-CONDITIONS in DEFMACRO
WARNING: redefining UIOP/UTILITY:NOT-IMPLEMENTED-ERROR in DEFUN
WARNING: redefining UIOP/UTILITY:PARAMETER-ERROR in DEFUN
WARNING: redefining UIOP/UTILITY:BOOLEAN-TO-FEATURE-EXPRESSION in DEFUN
WARNING: redefining UIOP/UTILITY:SYMBOL-TEST-TO-FEATURE-EXPRESSION in DEFUN
WARNING: redefining UIOP/VERSION:UNPARSE-VERSION in DEFUN
WARNING: redefining UIOP/VERSION:PARSE-VERSION in DEFUN
WARNING: redefining UIOP/VERSION:NEXT-VERSION in DEFUN
WARNING: redefining UIOP/VERSION:VERSION< in DEFUN
WARNING: redefining UIOP/VERSION:VERSION<= in DEFUN
WARNING: redefining UIOP/VERSION::DEPRECATED-FUNCTION-CONDITION-KIND in DEFUN
WARNING: redefining PRINT-OBJECT (#<SB-PCL::CONDITION-CLASS UIOP/VERSION:DEPRECATED-FUNCTION-CONDITION> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining UIOP/VERSION::NOTIFY-DEPRECATED-FUNCTION in DEFUN
WARNING: redefining UIOP/VERSION:VERSION-DEPRECATION in DEFUN
WARNING: redefining UIOP/VERSION:WITH-DEPRECATION in DEFMACRO
WARNING: redefining UIOP/OS:FEATUREP in DEFUN
WARNING: redefining UIOP/OS:OS-MACOSX-P in DEFUN
WARNING: redefining UIOP/OS:OS-UNIX-P in DEFUN
WARNING: redefining UIOP/OS:OS-WINDOWS-P in DEFUN
WARNING: redefining UIOP/OS:OS-GENERA-P in DEFUN
WARNING: redefining UIOP/OS::OS-OLDMAC-P in DEFUN
WARNING: redefining UIOP/OS::OS-HAIKU-P in DEFUN
WARNING: redefining UIOP/OS::OS-MEZZANO-P in DEFUN
WARNING: redefining UIOP/OS:DETECT-OS in DEFUN
WARNING: redefining UIOP/OS:OS-COND in DEFMACRO
WARNING: redefining UIOP/OS:GETENV in DEFUN
WARNING: redefining UIOP/OS:GETENVP in DEFUN
WARNING: redefining UIOP/OS::FIRST-FEATURE in DEFUN
WARNING: redefining UIOP/OS:IMPLEMENTATION-TYPE in DEFUN
WARNING: redefining UIOP/OS:OPERATING-SYSTEM in DEFUN
WARNING: redefining UIOP/OS:ARCHITECTURE in DEFUN
WARNING: redefining UIOP/OS:LISP-VERSION-STRING in DEFUN
WARNING: redefining UIOP/OS:IMPLEMENTATION-IDENTIFIER in DEFUN
WARNING: redefining UIOP/OS:HOSTNAME in DEFUN
WARNING: redefining UIOP/OS:GETCWD in DEFUN
WARNING: redefining UIOP/OS:CHDIR in DEFUN
WARNING: redefining UIOP/OS:READ-NULL-TERMINATED-STRING in DEFUN
WARNING: redefining UIOP/OS:READ-LITTLE-ENDIAN in DEFUN
WARNING: redefining UIOP/OS:PARSE-FILE-LOCATION-INFO in DEFUN
WARNING: redefining UIOP/OS:PARSE-WINDOWS-SHORTCUT in DEFUN
WARNING: redefining UIOP/PATHNAME:NORMALIZE-PATHNAME-DIRECTORY-COMPONENT in DEFUN
WARNING: redefining UIOP/PATHNAME:DENORMALIZE-PATHNAME-DIRECTORY-COMPONENT in DEFUN
WARNING: redefining UIOP/PATHNAME:MERGE-PATHNAME-DIRECTORY-COMPONENTS in DEFUN
WARNING: redefining UIOP/PATHNAME:MAKE-PATHNAME* in DEFUN
WARNING: redefining UIOP/PATHNAME:MAKE-PATHNAME-COMPONENT-LOGICAL in DEFUN
WARNING: redefining UIOP/PATHNAME:MAKE-PATHNAME-LOGICAL in DEFUN
WARNING: redefining UIOP/PATHNAME:MERGE-PATHNAMES* in DEFUN
WARNING: redefining UIOP/PATHNAME:LOGICAL-PATHNAME-P in DEFUN
WARNING: redefining UIOP/PATHNAME:PHYSICAL-PATHNAME-P in DEFUN
WARNING: redefining UIOP/PATHNAME:PHYSICALIZE-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:NIL-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:WITH-PATHNAME-DEFAULTS in DEFMACRO
WARNING: redefining UIOP/PATHNAME:PATHNAME-EQUAL in DEFUN
WARNING: redefining UIOP/PATHNAME:ABSOLUTE-PATHNAME-P in DEFUN
WARNING: redefining UIOP/PATHNAME:RELATIVE-PATHNAME-P in DEFUN
WARNING: redefining UIOP/PATHNAME:HIDDEN-PATHNAME-P in DEFUN
WARNING: redefining UIOP/PATHNAME:FILE-PATHNAME-P in DEFUN
WARNING: redefining UIOP/PATHNAME:PATHNAME-DIRECTORY-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:PATHNAME-PARENT-DIRECTORY-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:DIRECTORY-PATHNAME-P in DEFUN
WARNING: redefining UIOP/PATHNAME:ENSURE-DIRECTORY-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:SPLIT-UNIX-NAMESTRING-DIRECTORY-COMPONENTS in DEFUN
WARNING: redefining UIOP/PATHNAME:SPLIT-NAME-TYPE in DEFUN
WARNING: redefining UIOP/PATHNAME:PARSE-UNIX-NAMESTRING in DEFUN
WARNING: redefining UIOP/PATHNAME:UNIX-NAMESTRING in DEFUN
WARNING: redefining UIOP/PATHNAME:SUBPATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:SUBPATHNAME* in DEFUN
WARNING: redefining UIOP/PATHNAME:PATHNAME-ROOT in DEFUN
WARNING: redefining UIOP/PATHNAME:PATHNAME-HOST-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:ENSURE-ABSOLUTE-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:SUBPATHP in DEFUN
WARNING: redefining UIOP/PATHNAME:ENOUGH-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:CALL-WITH-ENOUGH-PATHNAME in DEFUN
WARNING: redefining UIOP/PATHNAME:WITH-ENOUGH-PATHNAME in DEFMACRO
WARNING: redefining UIOP/PATHNAME:WILDEN in DEFUN
WARNING: redefining UIOP/PATHNAME:RELATIVIZE-DIRECTORY-COMPONENT in DEFUN
WARNING: redefining UIOP/PATHNAME:RELATIVIZE-PATHNAME-DIRECTORY in DEFUN
WARNING: redefining UIOP/PATHNAME:DIRECTORY-SEPARATOR-FOR-HOST in DEFUN
WARNING: redefining UIOP/PATHNAME:DIRECTORIZE-PATHNAME-HOST-DEVICE in DEFUN
WARNING: redefining UIOP/PATHNAME:TRANSLATE-PATHNAME* in DEFUN
WARNING: redefining UIOP/FILESYSTEM:NATIVE-NAMESTRING in DEFUN
WARNING: redefining UIOP/FILESYSTEM:PARSE-NATIVE-NAMESTRING in DEFUN
WARNING: redefining UIOP/FILESYSTEM:TRUENAME* in DEFUN
WARNING: redefining UIOP/FILESYSTEM:SAFE-FILE-WRITE-DATE in DEFUN
WARNING: redefining UIOP/FILESYSTEM:PROBE-FILE* in DEFUN
WARNING: redefining UIOP/FILESYSTEM:DIRECTORY-EXISTS-P in DEFUN
WARNING: redefining UIOP/FILESYSTEM:FILE-EXISTS-P in DEFUN
WARNING: redefining UIOP/FILESYSTEM:DIRECTORY* in DEFUN
WARNING: redefining UIOP/FILESYSTEM:FILTER-LOGICAL-DIRECTORY-RESULTS in DEFUN
WARNING: redefining UIOP/FILESYSTEM:DIRECTORY-FILES in DEFUN
WARNING: redefining UIOP/FILESYSTEM:SUBDIRECTORIES in DEFUN
WARNING: redefining UIOP/FILESYSTEM:COLLECT-SUB*DIRECTORIES in DEFUN
WARNING: redefining UIOP/FILESYSTEM:TRUENAMIZE in DEFUN
WARNING: redefining UIOP/FILESYSTEM:RESOLVE-SYMLINKS in DEFUN
WARNING: redefining UIOP/FILESYSTEM:RESOLVE-SYMLINKS* in DEFUN
WARNING: redefining UIOP/PATHNAME:ENSURE-PATHNAME in DEFUN
WARNING: redefining UIOP/FILESYSTEM:GET-PATHNAME-DEFAULTS in DEFUN
WARNING: redefining UIOP/FILESYSTEM:CALL-WITH-CURRENT-DIRECTORY in DEFUN
WARNING: redefining UIOP/FILESYSTEM:WITH-CURRENT-DIRECTORY in DEFMACRO
WARNING: redefining UIOP/FILESYSTEM:INTER-DIRECTORY-SEPARATOR in DEFUN
WARNING: redefining UIOP/FILESYSTEM:SPLIT-NATIVE-PATHNAMES-STRING in DEFUN
WARNING: redefining UIOP/FILESYSTEM:GETENV-PATHNAME in DEFUN
WARNING: redefining UIOP/FILESYSTEM:GETENV-PATHNAMES in DEFUN
WARNING: redefining UIOP/FILESYSTEM:GETENV-ABSOLUTE-DIRECTORY in DEFUN
WARNING: redefining UIOP/FILESYSTEM:GETENV-ABSOLUTE-DIRECTORIES in DEFUN
WARNING: redefining UIOP/FILESYSTEM:LISP-IMPLEMENTATION-DIRECTORY in DEFUN
WARNING: redefining UIOP/FILESYSTEM:LISP-IMPLEMENTATION-PATHNAME-P in DEFUN
WARNING: redefining UIOP/FILESYSTEM:ENSURE-ALL-DIRECTORIES-EXIST in DEFUN
WARNING: redefining UIOP/FILESYSTEM:DELETE-FILE-IF-EXISTS in DEFUN
WARNING: redefining UIOP/FILESYSTEM:RENAME-FILE-OVERWRITING-TARGET in DEFUN
WARNING: redefining UIOP/FILESYSTEM:DELETE-EMPTY-DIRECTORY in DEFUN
WARNING: redefining UIOP/FILESYSTEM:DELETE-DIRECTORY-TREE in DEFUN
WARNING: redefining UIOP/STREAM:SETUP-STDIN in DEFUN
WARNING: redefining UIOP/STREAM:SETUP-STDOUT in DEFUN
WARNING: redefining UIOP/STREAM:SETUP-STDERR in DEFUN
WARNING: redefining UIOP/STREAM:ALWAYS-DEFAULT-ENCODING in DEFUN
WARNING: redefining UIOP/STREAM:DETECT-ENCODING in DEFUN
WARNING: redefining UIOP/STREAM:DEFAULT-ENCODING-EXTERNAL-FORMAT in DEFUN
WARNING: redefining UIOP/STREAM:ENCODING-EXTERNAL-FORMAT in DEFUN
WARNING: redefining UIOP/STREAM:WITH-SAFE-IO-SYNTAX in DEFMACRO
WARNING: redefining UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX in DEFUN
WARNING: redefining UIOP/STREAM:SAFE-READ-FROM-STRING in DEFUN
WARNING: redefining UIOP/STREAM:CALL-WITH-OUTPUT-FILE in DEFUN
WARNING: redefining UIOP/STREAM:WITH-OUTPUT-FILE in DEFMACRO
WARNING: redefining UIOP/STREAM::CALL-WITH-OUTPUT in DEFUN
WARNING: redefining UIOP/STREAM:OUTPUT-STRING in DEFUN
WARNING: redefining UIOP/STREAM:CALL-WITH-INPUT-FILE in DEFUN
WARNING: redefining UIOP/STREAM:WITH-INPUT-FILE in DEFMACRO
WARNING: redefining UIOP/STREAM::CALL-WITH-INPUT in DEFUN
WARNING: redefining UIOP/STREAM:WITH-INPUT in DEFMACRO
WARNING: redefining UIOP/STREAM:INPUT-STRING in DEFUN
WARNING: redefining UIOP/STREAM:NULL-DEVICE-PATHNAME in DEFUN
WARNING: redefining UIOP/STREAM:CALL-WITH-NULL-INPUT in DEFUN
WARNING: redefining UIOP/STREAM:WITH-NULL-INPUT in DEFMACRO
WARNING: redefining UIOP/STREAM:CALL-WITH-NULL-OUTPUT in DEFUN
WARNING: redefining UIOP/STREAM:WITH-NULL-OUTPUT in DEFMACRO
WARNING: redefining UIOP/STREAM:FINISH-OUTPUTS in DEFUN
WARNING: redefining UIOP/STREAM:FORMAT! in DEFUN
WARNING: redefining UIOP/STREAM:SAFE-FORMAT! in DEFUN
WARNING: redefining UIOP/STREAM:COPY-STREAM-TO-STREAM in DEFUN
WARNING: redefining UIOP/STREAM:CONCATENATE-FILES in DEFUN
WARNING: redefining UIOP/STREAM:COPY-FILE in DEFUN
WARNING: redefining UIOP/STREAM:SLURP-STREAM-STRING in DEFUN
WARNING: redefining UIOP/STREAM:SLURP-STREAM-LINES in DEFUN
WARNING: redefining UIOP/STREAM:SLURP-STREAM-LINE in DEFUN
WARNING: redefining UIOP/STREAM:SLURP-STREAM-FORMS in DEFUN
WARNING: redefining UIOP/STREAM:SLURP-STREAM-FORM in DEFUN
WARNING: redefining UIOP/STREAM:READ-FILE-STRING in DEFUN
WARNING: redefining UIOP/STREAM:READ-FILE-LINES in DEFUN
WARNING: redefining UIOP/STREAM:READ-FILE-LINE in DEFUN
WARNING: redefining UIOP/STREAM:READ-FILE-FORMS in DEFUN
WARNING: redefining UIOP/STREAM:READ-FILE-FORM in DEFUN
WARNING: redefining UIOP/STREAM:SAFE-READ-FILE-LINE in DEFUN
WARNING: redefining UIOP/STREAM:SAFE-READ-FILE-FORM in DEFUN
WARNING: redefining UIOP/STREAM:EVAL-INPUT in DEFUN
WARNING: redefining UIOP/STREAM:EVAL-THUNK in DEFUN
WARNING: redefining UIOP/STREAM:STANDARD-EVAL-THUNK in DEFUN
WARNING: redefining UIOP/STREAM:PRINTLN in DEFUN
WARNING: redefining UIOP/STREAM:WRITELN in DEFUN
WARNING: redefining UIOP/STREAM:DEFAULT-TEMPORARY-DIRECTORY in DEFUN
WARNING: redefining UIOP/STREAM:TEMPORARY-DIRECTORY in DEFUN
WARNING: redefining UIOP/STREAM:SETUP-TEMPORARY-DIRECTORY in DEFUN
WARNING: redefining UIOP/STREAM:CALL-WITH-TEMPORARY-FILE in DEFUN
WARNING: redefining UIOP/STREAM:WITH-TEMPORARY-FILE in DEFMACRO
WARNING: redefining UIOP/STREAM::GET-TEMPORARY-FILE in DEFUN
WARNING: redefining UIOP/STREAM:ADD-PATHNAME-SUFFIX in DEFUN
WARNING: redefining UIOP/STREAM:TMPIZE-PATHNAME in DEFUN
WARNING: redefining UIOP/STREAM:CALL-WITH-STAGING-PATHNAME in DEFUN
WARNING: redefining UIOP/STREAM:WITH-STAGING-PATHNAME in DEFMACRO
WARNING: redefining UIOP/STREAM:FILE-STREAM-P in DEFUN
WARNING: redefining UIOP/STREAM:FILE-OR-SYNONYM-STREAM-P in DEFUN
WARNING: redefining UIOP/IMAGE:QUIT in DEFUN
WARNING: redefining UIOP/IMAGE:DIE in DEFUN
WARNING: redefining UIOP/IMAGE:RAW-PRINT-BACKTRACE in DEFUN
WARNING: redefining UIOP/IMAGE:PRINT-BACKTRACE in DEFUN
WARNING: redefining UIOP/IMAGE:PRINT-CONDITION-BACKTRACE in DEFUN
WARNING: redefining UIOP/IMAGE:FATAL-CONDITION-P in DEFUN
WARNING: redefining UIOP/IMAGE:HANDLE-FATAL-CONDITION in DEFUN
WARNING: redefining UIOP/IMAGE:CALL-WITH-FATAL-CONDITION-HANDLER in DEFUN
WARNING: redefining UIOP/IMAGE:WITH-FATAL-CONDITION-HANDLER in DEFMACRO
WARNING: redefining UIOP/IMAGE:SHELL-BOOLEAN-EXIT in DEFUN
WARNING: redefining UIOP/IMAGE:REGISTER-IMAGE-RESTORE-HOOK in DEFUN
WARNING: redefining UIOP/IMAGE:REGISTER-IMAGE-DUMP-HOOK in DEFUN
WARNING: redefining UIOP/IMAGE:CALL-IMAGE-RESTORE-HOOK in DEFUN
WARNING: redefining UIOP/IMAGE:CALL-IMAGE-DUMP-HOOK in DEFUN
WARNING: redefining UIOP/IMAGE:RAW-COMMAND-LINE-ARGUMENTS in DEFUN
WARNING: redefining UIOP/IMAGE:COMMAND-LINE-ARGUMENTS in DEFUN
WARNING: redefining UIOP/IMAGE:ARGV0 in DEFUN
WARNING: redefining UIOP/IMAGE:SETUP-COMMAND-LINE-ARGUMENTS in DEFUN
WARNING: redefining UIOP/IMAGE:RESTORE-IMAGE in DEFUN
WARNING: redefining UIOP/IMAGE:DUMP-IMAGE in DEFUN
WARNING: redefining UIOP/IMAGE:CREATE-IMAGE in DEFUN
WARNING: redefining UIOP/LISP-BUILD::SB-GROVEL-UNKNOWN-CONSTANT-CONDITION-P in DEFUN
WARNING: redefining UIOP/LISP-BUILD:CALL-WITH-MUFFLED-COMPILER-CONDITIONS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:WITH-MUFFLED-COMPILER-CONDITIONS in DEFMACRO
WARNING: redefining UIOP/LISP-BUILD:CALL-WITH-MUFFLED-LOADER-CONDITIONS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:WITH-MUFFLED-LOADER-CONDITIONS in DEFMACRO
WARNING: redefining UIOP/LISP-BUILD:CHECK-LISP-COMPILE-WARNINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:REIFY-SIMPLE-SEXP in DEFUN
WARNING: redefining UIOP/LISP-BUILD:UNREIFY-SIMPLE-SEXP in DEFUN
WARNING: redefining UIOP/LISP-BUILD::REIFY-UNDEFINED-WARNING in DEFUN
WARNING: redefining UIOP/LISP-BUILD:REIFY-DEFERRED-WARNINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:UNREIFY-DEFERRED-WARNINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:RESET-DEFERRED-WARNINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:SAVE-DEFERRED-WARNINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:WARNINGS-FILE-TYPE in DEFUN
WARNING: redefining UIOP/LISP-BUILD:ENABLE-DEFERRED-WARNINGS-CHECK in DEFUN
WARNING: redefining UIOP/LISP-BUILD:DISABLE-DEFERRED-WARNINGS-CHECK in DEFUN
WARNING: redefining UIOP/LISP-BUILD:WARNINGS-FILE-P in DEFUN
WARNING: redefining UIOP/LISP-BUILD:CHECK-DEFERRED-WARNINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD::CALL-WITH-SAVED-DEFERRED-WARNINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:WITH-SAVED-DEFERRED-WARNINGS in DEFMACRO
WARNING: redefining UIOP/LISP-BUILD:CURRENT-LISP-FILE-PATHNAME in DEFUN
WARNING: redefining UIOP/LISP-BUILD:LOAD-PATHNAME in DEFUN
WARNING: redefining UIOP/LISP-BUILD:LISPIZE-PATHNAME in DEFUN
WARNING: redefining UIOP/LISP-BUILD:COMPILE-FILE-TYPE in DEFUN
WARNING: redefining UIOP/LISP-BUILD:CALL-AROUND-HOOK in DEFUN
WARNING: redefining UIOP/LISP-BUILD:COMPILE-FILE-PATHNAME* in DEFUN
WARNING: redefining UIOP/LISP-BUILD:COMPILE-FILE* in DEFUN
WARNING: redefining UIOP/LISP-BUILD:LOAD* in DEFUN
WARNING: redefining UIOP/LISP-BUILD:LOAD-FROM-STRING in DEFUN
WARNING: redefining UIOP/LISP-BUILD:COMBINE-FASLS in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::REQUIRES-ESCAPING-P in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-TOKEN in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::ESCAPE-WINDOWS-TOKEN-WITHIN-DOUBLE-QUOTES in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::EASY-WINDOWS-CHARACTER-P in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-WINDOWS-TOKEN in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::ESCAPE-SH-TOKEN-WITHIN-DOUBLE-QUOTES in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:EASY-SH-CHARACTER-P in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SH-TOKEN in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SHELL-TOKEN in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-COMMAND in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-WINDOWS-COMMAND in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SH-COMMAND in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SHELL-COMMAND in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%NORMALIZE-IO-SPECIFIER in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%INTERACTIVEP in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%SIGNAL-TO-EXIT-CODE in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%CODE-TO-STATUS in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%HANDLE-IF-EXISTS in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%HANDLE-IF-DOES-NOT-EXIST in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-ERROR-OUTPUT in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-INPUT in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-OUTPUT in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-PID in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%PROCESS-STATUS in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-ALIVE-P in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:WAIT-PROCESS in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM::%POSIX-SEND-SIGNAL in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:TERMINATE-PROCESS in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:CLOSE-STREAMS in DEFUN
WARNING: redefining UIOP/LAUNCH-PROGRAM:LAUNCH-PROGRAM in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::CALL-STREAM-PROCESSOR in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM:SLURP-INPUT-STREAM in DEFGENERIC
WARNING: redefining SLURP-INPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:FUNCTION> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:CONS> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:STREAM> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER STRING> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :STRING> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :LINES> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :LINE> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :FORMS> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :FORM> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:NULL> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:PATHNAME> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SLURP-INPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining UIOP/RUN-PROGRAM:VOMIT-OUTPUT-STREAM in DEFGENERIC
WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:FUNCTION> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:CONS> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:STREAM> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:STRING> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:NULL> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:PATHNAME> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining UIOP/RUN-PROGRAM::%CHECK-RESULT in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::%ACTIVE-IO-SPECIFIER-P in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::%RUN-PROGRAM in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::%CALL-WITH-PROGRAM-IO in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::PLACE-SETTER in DEFMACRO
WARNING: redefining UIOP/RUN-PROGRAM::WITH-PROGRAM-INPUT in DEFMACRO
WARNING: redefining UIOP/RUN-PROGRAM::WITH-PROGRAM-OUTPUT in DEFMACRO
WARNING: redefining UIOP/RUN-PROGRAM::WITH-PROGRAM-ERROR-OUTPUT in DEFMACRO
WARNING: redefining UIOP/RUN-PROGRAM::%USE-LAUNCH-PROGRAM in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::%NORMALIZE-SYSTEM-COMMAND in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::%REDIRECTED-SYSTEM-COMMAND in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::%SYSTEM in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM::%USE-SYSTEM in DEFUN
WARNING: redefining UIOP/RUN-PROGRAM:RUN-PROGRAM in DEFUN
WARNING: redefining UIOP/CONFIGURATION:CONFIGURATION-INHERITANCE-DIRECTIVE-P in DEFUN
WARNING: redefining UIOP/CONFIGURATION:REPORT-INVALID-FORM in DEFUN
WARNING: redefining UIOP/CONFIGURATION:VALIDATE-CONFIGURATION-FORM in DEFUN
WARNING: redefining UIOP/CONFIGURATION:VALIDATE-CONFIGURATION-FILE in DEFUN
WARNING: redefining UIOP/CONFIGURATION:VALIDATE-CONFIGURATION-DIRECTORY in DEFUN
WARNING: redefining UIOP/CONFIGURATION:RESOLVE-RELATIVE-LOCATION in DEFUN
WARNING: redefining UIOP/CONFIGURATION:RESOLVE-ABSOLUTE-LOCATION in DEFUN
WARNING: redefining UIOP/CONFIGURATION:RESOLVE-LOCATION in DEFUN
WARNING: redefining UIOP/CONFIGURATION:LOCATION-DESIGNATOR-P in DEFUN
WARNING: redefining UIOP/CONFIGURATION:LOCATION-FUNCTION-P in DEFUN
WARNING: redefining UIOP/CONFIGURATION:REGISTER-CLEAR-CONFIGURATION-HOOK in DEFUN
WARNING: redefining UIOP/CONFIGURATION:CLEAR-CONFIGURATION in DEFUN
WARNING: redefining UIOP/CONFIGURATION:UPGRADE-CONFIGURATION in DEFUN
WARNING: redefining UIOP/CONFIGURATION:GET-FOLDER-PATH in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-HOME in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-HOME in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-DIRS in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-DIRS in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-CACHE-HOME in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-RUNTIME-DIR in DEFUN
WARNING: redefining UIOP/CONFIGURATION:SYSTEM-CONFIG-PATHNAMES in DEFUN
WARNING: redefining UIOP/CONFIGURATION:FILTER-PATHNAME-SET in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-PATHNAMES in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-PATHNAMES in DEFUN
WARNING: redefining UIOP/CONFIGURATION:FIND-PREFERRED-FILE in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-PATHNAME in DEFUN
WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-PATHNAME in DEFUN
WARNING: redefining UIOP/CONFIGURATION::COMPUTE-USER-CACHE in DEFUN
WARNING: redefining UIOP/CONFIGURATION:UIOP-DIRECTORY in DEFUN
WARNING: redefining UIOP/BACKWARD-DRIVER:COERCE-PATHNAME in DEFUN
WARNING: redefining UIOP/CONFIGURATION:USER-CONFIGURATION-DIRECTORIES in DEFUN
WARNING: redefining UIOP/CONFIGURATION:SYSTEM-CONFIGURATION-DIRECTORIES in DEFUN
WARNING: redefining UIOP/CONFIGURATION:IN-FIRST-DIRECTORY in DEFUN
WARNING: redefining UIOP/CONFIGURATION:IN-USER-CONFIGURATION-DIRECTORY in DEFUN
WARNING: redefining UIOP/CONFIGURATION:IN-SYSTEM-CONFIGURATION-DIRECTORY in DEFUN
WARNING: redefining UIOP/BACKWARD-DRIVER:VERSION-COMPATIBLE-P in DEFUN
WARNING: redefining SPECIAL-FORM-TYPE (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD
WARNING: redefining SPECIAL-FORM-TYPE (#<SB-MOP:EQL-SPECIALIZER FUNCTION> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/peltadot/00f92b8936f9d4b3493e3887d98da3ed0d3999fd/peltadot-20241021-git/src/form-types-and-optim.lisp
; in: DEFINE-COMPILER-MACRO TYPEP
;     (DEFINE-COMPILER-MACRO PELTADOT/TYPES-CORE:TYPEP
;         (&WHOLE PELTADOT/TYPES-CORE/IMPL::FORM
;          PELTADOT/TYPES-CORE/IMPL::OBJECT-FORM
;          PELTADOT/TYPES-CORE/IMPL::TYPE-FORM &OPTIONAL
;          PELTADOT/TYPES-CORE/IMPL::ENV-FORM &ENVIRONMENT PELTADOT/UTILS:ENV)
;       (LET ((OPTIMIZE (AND # #)))
;         (COMPILER-MACRO-NOTES:WITH-NOTES (PELTADOT/TYPES-CORE/IMPL::FORM
;                                           PELTADOT/UTILS:ENV :UNWIND-ON-SIGNAL T
;                                           :OPTIMIZATION-NOTE-CONDITION OPTIMIZE)
;           (LABELS (# # #)
;             (LET* #
;               #)))))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%DEFINE-COMPILER-MACRO 'PELTADOT/TYPES-CORE:TYPEP
;                                 (SB-INT:NAMED-LAMBDA (COMPILER-MACRO
;                                                       PELTADOT/TYPES-CORE:TYPEP)
;                                     (#:EXPR PELTADOT/UTILS:ENV &AUX
;                                      (PELTADOT/TYPES-CORE/IMPL::FORM #:EXPR))
;                                   (DECLARE
;                                    (SB-C::LAMBDA-LIST
;                                     (PELTADOT/TYPES-CORE/IMPL::OBJECT-FORM
;                                      PELTADOT/TYPES-CORE/IMPL::TYPE-FORM
;                                      &OPTIONAL
;                                      PELTADOT/TYPES-CORE/IMPL::ENV-FORM)))
;                                   (SB-INT:NAMED-DS-BIND (:MACRO
;                                                          PELTADOT/TYPES-CORE:TYPEP
;                                                          . DEFINE-COMPILER-MACRO)
;                                       (PELTADOT/TYPES-CORE/IMPL::OBJECT-FORM
;                                        PELTADOT/TYPES-CORE/IMPL::TYPE-FORM
;                                        &OPTIONAL
;                                        PELTADOT/TYPES-CORE/IMPL::ENV-FORM)
;                                       (SB-C::COMPILER-MACRO-ARGS #:EXPR)
;                                     (DECLARE
;                                      (SB-C::CONSTANT-VALUE
;                                       PELTADOT/TYPES-CORE/IMPL::OBJECT-FORM
;                                       PELTADOT/TYPES-CORE/IMPL::TYPE-FORM
;                                       PELTADOT/TYPES-CORE/IMPL::ENV-FORM)
;                                      (SB-C::NO-COMPILER-MACRO
;                                       PELTADOT/TYPES-CORE:TYPEP))
;                                     (BLOCK PELTADOT/TYPES-CORE:TYPEP
;                                       (LET #
;                                         #)))))
; 
; caught STYLE-WARNING:
;   2 calls to PELTADOT/TYPES-CORE:TYPEP were compiled before a compiler-macro was defined for it. A declaration of NOTINLINE at the call sites will eliminate this warning, as will defining the compiler-macro before its first potential use.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "peltadot/form-types-and-optim" "form-types-and-optim">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/slime/8ec756e6928010f574db971b686df341c99a1e50/slime-v2.30/swank/sbcl.lisp
; in: DEFVAR *SHEBANG-READTABLE*
;     (LAMBDA (STREAM CHAR) (VALUES))
; 
; caught STYLE-WARNING:
;   The variable STREAM is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable CHAR is defined but never used.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "swank" "backend" "sbcl">
WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/peltadot/00f92b8936f9d4b3493e3887d98da3ed0d3999fd/peltadot-20241021-git/src/cl-types/compound-only-type-specifiers.lisp
; in: DEFINE-TYPE ()
;     (PELTADOT/TYPES-CORE:DEFINE-TYPE NIL
;         NIL
;       `(OR))
; --> EVAL-WHEN 
; ==>
;   (PELTADOT/TYPES-CORE/IMPL:NAMESPACE-VALUE-AND-DOC-SET 'NIL 'NIL
;                                                         "NIL names a DERIVED-EXTYPE
; ")
; 
; caught STYLE-WARNING:
;   Ignoring doc-type EXTYPE for NIL.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "peltadot/cl-types" "compound-only-type-specifiers">
STYLE-WARNING: Ignoring doc-type EXTYPE for NIL.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/peltadot/00f92b8936f9d4b3493e3887d98da3ed0d3999fd/peltadot-20241021-git/src/cl/special-forms.lisp
; in: DEFUN TYPE-DECL-FROM-BINDINGS
;     (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;       (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                          PELTADOT/UTILS:ENV 0 T T))
; --> LET 
; ==>
;   (LET ((SB-C::*IN-COMPILATION-UNIT* NIL) (*COMPILE-VERBOSE* NIL))
;     (PROGN
;      (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                         PELTADOT/UTILS:ENV 0 T T)))
; 
; caught ERROR:
;   Lock on package SB-C violated when lexically binding global symbol-macro *IN-COMPILATION-UNIT* in LET while in package PELTADOT/CL/IMPL.
;   See also:
;     The SBCL Manual, Node "Package Locks"

;     (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;       (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                          PELTADOT/CL/IMPL::FORM-TYPE-ENV 0 T T))
; --> LET 
; ==>
;   (LET ((SB-C::*IN-COMPILATION-UNIT* NIL) (*COMPILE-VERBOSE* NIL))
;     (PROGN
;      (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                         PELTADOT/CL/IMPL::FORM-TYPE-ENV 0 T T)))
; 
; caught ERROR:
;   Lock on package SB-C violated when lexically binding global symbol-macro *IN-COMPILATION-UNIT* in LET while in package PELTADOT/CL/IMPL.
;   See also:
;     The SBCL Manual, Node "Package Locks"

;     (LOOP :FOR PELTADOT/CL/IMPL::BINDING :IN PELTADOT/CL/IMPL::BINDINGS
;           :NCONCING (MULTIPLE-VALUE-BIND
;                         (PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM)
;                         (IF (SYMBOLP PELTADOT/CL/IMPL::BINDING)
;                             (VALUES PELTADOT/CL/IMPL::BINDING NIL)
;                             (VALUES-LIST PELTADOT/CL/IMPL::BINDING))
;                       (UNLESS
;                           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                                (PACKAGE-LOCKED-P #))
;                         (LET (#)
;                           (COND # #)))))
; --> LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY 
; --> SB-LOOP::LOOP-COLLECT-RPLACD WHEN IF SETF SB-KERNEL:%RPLACD 
; --> MULTIPLE-VALUE-CALL 
; ==>
;   #'(LAMBDA
;         (&OPTIONAL PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T `#)))))
; 
; caught STYLE-WARNING:
;   The variable FORM is defined but never used.

;     (LOOP :WITH PELTADOT/CL/IMPL::AUGMENTED-ENV := NIL
;           :WITH PELTADOT/CL/IMPL::FORM-TYPE-ENV := PELTADOT/UTILS:ENV
;           :FOR PELTADOT/CL/IMPL::BINDING :IN ...)
; --> LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY 
; --> SB-LOOP::LOOP-COLLECT-RPLACD WHEN IF SETF SB-KERNEL:%RPLACD 
; --> MULTIPLE-VALUE-CALL 
; ==>
;   #'(LAMBDA
;         (&OPTIONAL PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T #)))))
; 
; caught STYLE-WARNING:
;   The variable FORM is defined but never used.

;     (LET ((PELTADOT/UTILS:FORM-TYPE
;            (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;              (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                                 PELTADOT/UTILS:ENV 0 T T))))
;       (COND ((EQ T PELTADOT/UTILS:FORM-TYPE) NIL)
;             (T
;              `((PELTADOT/TYPES-CORE:EXTYPE ,PELTADOT/UTILS:FORM-TYPE
;                 ,PELTADOT/CL/IMPL::VAR)
;                (TYPE ,# ,PELTADOT/CL/IMPL::VAR)))))
; 
; note: deleting unreachable code

;     (LET ((PELTADOT/UTILS:FORM-TYPE
;            (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;              (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                                 PELTADOT/CL/IMPL::FORM-TYPE-ENV 0
;                                                 T T))))
;       (COND ((EQ T PELTADOT/UTILS:FORM-TYPE) NIL)
;             (T
;              (LET (#)
;                (SETQ #)
;                (SETQ #)
;                PELTADOT/CL/IMPL::DECL))))
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/peltadot/00f92b8936f9d4b3493e3887d98da3ed0d3999fd/peltadot-20241021-git/src/cl/special-forms.lisp
; in: DEFMACRO EXCL:LET
;     (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;       (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                          PELTADOT/UTILS:ENV 0 T T))
; --> LET 
; ==>
;   (LET ((SB-C::*IN-COMPILATION-UNIT* NIL) (*COMPILE-VERBOSE* NIL))
;     (PROGN
;      (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                         PELTADOT/UTILS:ENV 0 T T)))
; 
; caught ERROR:
;   Lock on package SB-C violated when lexically binding global symbol-macro *IN-COMPILATION-UNIT* in LET while in package PELTADOT/CL/IMPL.
;   See also:
;     The SBCL Manual, Node "Package Locks"

;     (LOOP :FOR PELTADOT/CL/IMPL::BINDING :IN PELTADOT/CL/IMPL::BINDINGS
;           :NCONCING (MULTIPLE-VALUE-BIND
;                         (PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM)
;                         (IF (SYMBOLP PELTADOT/CL/IMPL::BINDING)
;                             (VALUES PELTADOT/CL/IMPL::BINDING NIL)
;                             (VALUES-LIST PELTADOT/CL/IMPL::BINDING))
;                       (UNLESS
;                           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                                (PACKAGE-LOCKED-P #))
;                         (LET (#)
;                           (COND # #)))))
; --> LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY 
; --> SB-LOOP::LOOP-COLLECT-RPLACD WHEN IF SETF SB-KERNEL:%RPLACD 
; --> MULTIPLE-VALUE-CALL 
; ==>
;   #'(LAMBDA
;         (&OPTIONAL PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T `#)))))
; 
; caught STYLE-WARNING:
;   The variable FORM is defined but never used.

; in: DEFMACRO EXCL:LET
;     (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;       (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                          PELTADOT/UTILS:ENV 0 T T))
; --> LET 
; ==>
;   (LET ((SB-C::*IN-COMPILATION-UNIT* NIL) (*COMPILE-VERBOSE* NIL))
;     (PROGN
;      (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                         PELTADOT/UTILS:ENV 0 T T)))
; 
; caught ERROR:
;   Lock on package SB-C violated when lexically binding global symbol-macro *IN-COMPILATION-UNIT* in LET while in package PELTADOT/CL/IMPL.
;   See also:
;     The SBCL Manual, Node "Package Locks"

;     (LOOP :FOR PELTADOT/CL/IMPL::BINDING :IN PELTADOT/CL/IMPL::BINDINGS
;           :NCONCING (MULTIPLE-VALUE-BIND
;                         (PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM)
;                         (IF (SYMBOLP PELTADOT/CL/IMPL::BINDING)
;                             (VALUES PELTADOT/CL/IMPL::BINDING NIL)
;                             (VALUES-LIST PELTADOT/CL/IMPL::BINDING))
;                       (UNLESS
;                           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                                (PACKAGE-LOCKED-P #))
;                         (LET (#)
;                           (COND # #)))))
; --> LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY 
; --> SB-LOOP::LOOP-COLLECT-RPLACD WHEN IF SETF SB-KERNEL:%RPLACD 
; --> MULTIPLE-VALUE-CALL 
; ==>
;   #'(LAMBDA
;         (&OPTIONAL PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T `#)))))
; 
; caught STYLE-WARNING:
;   The variable FORM is defined but never used.

;     (LET ((PELTADOT/UTILS:FORM-TYPE
;            (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;              (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                                 PELTADOT/UTILS:ENV 0 T T))))
;       (COND ((EQ T PELTADOT/UTILS:FORM-TYPE) NIL)
;             (T
;              `((PELTADOT/TYPES-CORE:EXTYPE ,PELTADOT/UTILS:FORM-TYPE
;                 ,PELTADOT/CL/IMPL::VAR)
;                (TYPE ,# ,PELTADOT/CL/IMPL::VAR)))))
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/peltadot/00f92b8936f9d4b3493e3887d98da3ed0d3999fd/peltadot-20241021-git/src/cl/special-forms.lisp
; in: DEFMACRO EXCL:LET*
;     (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;       (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                          PELTADOT/CL/IMPL::FORM-TYPE-ENV 0 T T))
; --> LET 
; ==>
;   (LET ((SB-C::*IN-COMPILATION-UNIT* NIL) (*COMPILE-VERBOSE* NIL))
;     (PROGN
;      (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                         PELTADOT/CL/IMPL::FORM-TYPE-ENV 0 T T)))
; 
; caught ERROR:
;   Lock on package SB-C violated when lexically binding global symbol-macro *IN-COMPILATION-UNIT* in LET while in package PELTADOT/CL/IMPL.
;   See also:
;     The SBCL Manual, Node "Package Locks"

;     (MULTIPLE-VALUE-BIND (PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM)
;         (IF (SYMBOLP PELTADOT/CL/IMPL::BINDING)
;             (VALUES PELTADOT/CL/IMPL::BINDING NIL)
;             (VALUES-LIST PELTADOT/CL/IMPL::BINDING))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T # #)))))
; ==>
;   #'(LAMBDA
;         (&OPTIONAL PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T # #)))))
; 
; caught STYLE-WARNING:
;   The variable FORM is defined but never used.

; in: DEFMACRO EXCL:LET*
;     (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;       (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                          PELTADOT/CL/IMPL::FORM-TYPE-ENV 0 T T))
; --> LET 
; ==>
;   (LET ((SB-C::*IN-COMPILATION-UNIT* NIL) (*COMPILE-VERBOSE* NIL))
;     (PROGN
;      (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                         PELTADOT/CL/IMPL::FORM-TYPE-ENV 0 T T)))
; 
; caught ERROR:
;   Lock on package SB-C violated when lexically binding global symbol-macro *IN-COMPILATION-UNIT* in LET while in package PELTADOT/CL/IMPL.
;   See also:
;     The SBCL Manual, Node "Package Locks"

;     (MULTIPLE-VALUE-BIND (PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM)
;         (IF (SYMBOLP PELTADOT/CL/IMPL::BINDING)
;             (VALUES PELTADOT/CL/IMPL::BINDING NIL)
;             (VALUES-LIST PELTADOT/CL/IMPL::BINDING))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T # #)))))
; ==>
;   #'(LAMBDA
;         (&OPTIONAL PELTADOT/CL/IMPL::VAR PELTADOT/CL/IMPL::FORM &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (UNLESS
;           (AND (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)
;                (PACKAGE-LOCKED-P (SYMBOL-PACKAGE PELTADOT/CL/IMPL::VAR)))
;         (LET ((PELTADOT/UTILS:FORM-TYPE #))
;           (COND (# NIL) (T # #)))))
; 
; caught STYLE-WARNING:
;   The variable FORM is defined but never used.

;     (LET ((PELTADOT/UTILS:FORM-TYPE
;            (PELTADOT/CL/IMPL::WITH-MUFFLED-COMPILATION-WARNINGS
;              (PELTADOT/FORM-TYPES:NTH-FORM-TYPE PELTADOT/CL/IMPL::FORM
;                                                 PELTADOT/CL/IMPL::FORM-TYPE-ENV 0
;                                                 T T))))
;       (COND ((EQ T PELTADOT/UTILS:FORM-TYPE) NIL)
;             (T (SETQ PELTADOT/CL/IMPL::AUGMENTED-ENV #)
;              (SETQ PELTADOT/CL/IMPL::FORM-TYPE-ENV #))))
; 
; note: deleting unreachable code
Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=3140056 "main thread" RUNNING {103FA30093}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms">

Backtrace for: #<SB-THREAD:THREAD tid=3140056 "main thread" RUNNING {103FA30093}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {101B312523}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {101B312523}>)
2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {101B312523}>)
3: (ERROR UIOP/LISP-BUILD:COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "peltadot/cl" "special-forms">)))
4: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "peltadot/cl" "special-forms">)))
5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "peltadot/cl" "special-forms">)
6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
7: ((:METHOD ASDF/ACTION:PERFORM :AROUND (ASDF/LISP-ACTION:COMPILE-OP ASDF/LISP-ACTION:CL-SOURCE-FILE)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "peltadot/cl" "special-forms">) [fast-method]
8: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "peltadot/cl" "special-forms">) [fast-method]
9: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10045426E3}>) [fast-method]
10: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
11: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10045426E3}>) [fast-method]
12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "abstract-arrays"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
13: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "abstract-arrays">)
14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "abstract-arrays">) [fast-method]
16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "abstract-arrays")
17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "abstract-arrays") [fast-method]
19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {100453946B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
20: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
21: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10044FC60B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "abstract-arrays") [fast-method]
23: (DEPCHECK::COMPUTE-DEPENDENCIES "abstract-arrays" "abstract-arrays")
24: (DEPCHECK::MAGIC "abstract-arrays" "abstract-arrays" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-x7ibfAU1/depcheck-win.txt")
25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "abstract-arrays" "abstract-arrays" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-x7ibfAU1/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-x7ibfAU1/depcheck-fail.txt"))
26: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
27: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP))
28: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP))
29: (SB-IMPL::%START-LISP)

unhandled condition in --disable-debugger mode, quitting
; 
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   caught 6 ERROR conditions
;   caught 11 STYLE-WARNING conditions
;   printed 12 notes