SBCL 2.4.9 / ASDF 3.3.5
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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 WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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=3150185 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150185 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100BF7CB93}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100BF7CB93}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100BF7CB93}>) 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 {1004DCBED3}>) [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 {1004DCBED3}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/static-vectors"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 13: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/static-vectors">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/static-vectors">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays/static-vectors") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/static-vectors") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1004D5ED4B}> :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) {1004D2BD4B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/static-vectors") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays" "dense-arrays/static-vectors") 24: (DEPCHECK::MAGIC "dense-arrays" "dense-arrays/static-vectors" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-9SFuMePf/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays" "dense-arrays/static-vectors" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-9SFuMePf/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-9SFuMePf/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 6 STYLE-WARNING conditions ; printed 4 notes
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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 WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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=3150181 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150181 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100C380413}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100C380413}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100C380413}>) 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 {1004DCBED3}>) [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 {1004DCBED3}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/py4cl2"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 13: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/py4cl2">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/py4cl2">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays/py4cl2") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/py4cl2") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1004D5ED4B}> :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) {1004D2BD4B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/py4cl2") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays" "dense-arrays/py4cl2") 24: (DEPCHECK::MAGIC "dense-arrays" "dense-arrays/py4cl2" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-JuT7QquZ/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays" "dense-arrays/py4cl2" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-JuT7QquZ/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-JuT7QquZ/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 6 STYLE-WARNING conditions ; printed 4 notes
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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 WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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=3150177 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150177 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100C5AE4B3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100C5AE4B3}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100C5AE4B3}>) 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 {1004DCC923}>) [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 {1004DCC923}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/py4cl2-cffi"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 13: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/py4cl2-cffi">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/py4cl2-cffi">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays/py4cl2-cffi") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/py4cl2-cffi") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1004D5ED4B}> :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) {1004D2BD4B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/py4cl2-cffi") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays" "dense-arrays/py4cl2-cffi") 24: (DEPCHECK::MAGIC "dense-arrays" "dense-arrays/py4cl2-cffi" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-7hxAn6HZ/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays" "dense-arrays/py4cl2-cffi" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-7hxAn6HZ/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-7hxAn6HZ/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 6 STYLE-WARNING conditions ; printed 4 notes
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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 WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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=3150189 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150189 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10108FE253}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10108FE253}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10108FE253}>) 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 {1004DCC923}>) [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 {1004DCC923}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/magicl"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 13: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/magicl">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/magicl">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays/magicl") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/magicl") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1004D5ED4B}> :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) {1004D2BD4B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/magicl") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays" "dense-arrays/magicl") 24: (DEPCHECK::MAGIC "dense-arrays" "dense-arrays/magicl" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-i6DXWfhI/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays" "dense-arrays/magicl" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-i6DXWfhI/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-i6DXWfhI/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 6 STYLE-WARNING conditions ; printed 4 notes
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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 ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cffi/3390f043b1452388a0695f04f2ddb540220ae8d2/cffi-20241021-git/toolchain/c-toolchain.lisp ; in: DEFUN DEFAULT-TOOLCHAIN-PARAMETERS ; '("-m32") ; ; note: deleting unreachable code ; (OR (UIOP/OS:GETENVP "CC") "cc" "gcc") ; --> IF LET IF ; ==> ; "gcc" ; ; note: deleting unreachable code Unable to load any of the alternatives: ("libcuda.so" "libcuda64.so") ; ; compilation unit finished ; printed 2 notes WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/external-program/a1a2ca025487673a444c5040c4c814eac4a70a30/external-program-20241021-git/external-program.asd" contains definition for system "external-program-test". Please only define "external-program" and secondary systems with a name starting with "external-program/" (e.g. "external-program/test") in that file. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cl-pattern/cab8b56cdf63e359614d33840ef2faa539b351f3/cl-pattern-20241021-git/src/compile.lisp ; in: DEFUN COMPILE-MATCH-VARIABLE ; (STRING-EQUAL CL-PATTERN::VAR "_") ; ; note: unable to optimize due to type uncertainty: The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY CHARACTER (*)). ; in: DEFUN COMPILE-MATCH-EMPTY ; (LENGTH CL-PATTERN::THEN) ; ; note: unable to optimize due to type uncertainty: The first argument is a SEQUENCE, not a VECTOR. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cl-cuda/e73574a8fd2d4e821d6831deb8c3881a228648f8/cl-cuda-20241021-git/src/driver-api/cffi-grovel.lisp ; in: DEFINE-GROVEL-SYNTAX CONSTANT-FROM-ENUM ; (CFFI-GROVEL::DEFINE-GROVEL-SYNTAX CFFI-GROVEL::CONSTANT-FROM-ENUM ; ((CFFI-GROVEL::LISP-NAME &REST CFFI-GROVEL::C-NAMES) &KEY (TYPE 'INTEGER) ; DOCUMENTATION CFFI-GROVEL::OPTIONAL) ; (WHEN (KEYWORDP CFFI-GROVEL::LISP-NAME) ; (SETF CFFI-GROVEL::LISP-NAME ; (ALEXANDRIA:FORMAT-SYMBOL "~A" CFFI-GROVEL::LISP-NAME))) ; (CFFI-GROVEL::C-SECTION-HEADER CFFI-GROVEL::OUT "constant" ; CFFI-GROVEL::LISP-NAME) ; (DOLIST (CFFI-GROVEL::C-NAME CFFI-GROVEL::C-NAMES) ; (CFFI-GROVEL::C-EXPORT CFFI-GROVEL::OUT CFFI-GROVEL::LISP-NAME) ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT "(cl:defconstant ") ; (CFFI-GROVEL::C-PRINT-SYMBOL CFFI-GROVEL::OUT CFFI-GROVEL::LISP-NAME T) ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT " ") ; (ECASE TYPE ; (INTEGER ; (FORMAT CFFI-GROVEL::OUT "~& if(_64_BIT_VALUE_FITS_SIGNED_P(~A))~%" ; CFFI-GROVEL::C-NAME) ; (FORMAT CFFI-GROVEL::OUT ; " fprintf(output, \"%lli\", (int64_t) ~A);" ; CFFI-GROVEL::C-NAME) ; (FORMAT CFFI-GROVEL::OUT "~& else~%") ; (FORMAT CFFI-GROVEL::OUT ; " fprintf(output, \"%llu\", (uint64_t) ~A);" ; CFFI-GROVEL::C-NAME)) ; (DOUBLE-FLOAT ; (FORMAT CFFI-GROVEL::OUT ; "~& fprintf(output, \"%s\", print_double_for_lisp((double)~A));~%" ; CFFI-GROVEL::C-NAME))) ; (WHEN DOCUMENTATION ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT " ~S" DOCUMENTATION)) ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT ")~%"))) ; --> PROGN EVAL-WHEN SB-PCL::%DEFMETHOD-EXPANDER SB-PCL::LOAD-DEFMETHOD ; --> SB-PCL::LOAD-DEFMETHOD LIST* LET* SB-INT:NAMED-LAMBDA FUNCTION ; --> SYMBOL-MACROLET SB-PCL::FAST-LEXICAL-METHOD-FUNCTIONS ; --> SB-PCL::BIND-FAST-LEXICAL-METHOD-FUNCTIONS FLET SB-PCL::BIND-ARGS LET* ; --> LOCALLY SYMBOL-MACROLET BLOCK DESTRUCTURING-BIND SB-INT:BINDING* ; ==> ; (LET* ((#:G15 ; (SB-C::CHECK-DS-LIST/&KEY #:ARGS1 1 1 ; '(# &KEY # DOCUMENTATION ; CFFI-GROVEL::OPTIONAL) ; #(:TYPE :DOCUMENTATION :OPTIONAL))) ; (#:G16 ; (SB-C::CHECK-DS-LIST/&REST (POP #:G15) 1 1 ; '(CFFI-GROVEL::LISP-NAME &REST ; CFFI-GROVEL::C-NAMES))) ; (CFFI-GROVEL::LISP-NAME (POP #:G16)) ; (CFFI-GROVEL::C-NAMES #:G16) ; (TYPE (GETF #:G15 ':TYPE 'INTEGER)) ; (DOCUMENTATION (GETF #:G15 ':DOCUMENTATION)) ; (CFFI-GROVEL::OPTIONAL (GETF #:G15 ':OPTIONAL))) ; (WHEN (KEYWORDP CFFI-GROVEL::LISP-NAME) ; (SETF CFFI-GROVEL::LISP-NAME ; (ALEXANDRIA:FORMAT-SYMBOL "~A" CFFI-GROVEL::LISP-NAME))) ; (CFFI-GROVEL::C-SECTION-HEADER CFFI-GROVEL::OUT "constant" ; CFFI-GROVEL::LISP-NAME) ; (DOLIST (CFFI-GROVEL::C-NAME CFFI-GROVEL::C-NAMES) ; (CFFI-GROVEL::C-EXPORT CFFI-GROVEL::OUT CFFI-GROVEL::LISP-NAME) ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT "(cl:defconstant ") ; (CFFI-GROVEL::C-PRINT-SYMBOL CFFI-GROVEL::OUT CFFI-GROVEL::LISP-NAME T) ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT " ") ; (ECASE TYPE ; (INTEGER ; (FORMAT CFFI-GROVEL::OUT "~& if(_64_BIT_VALUE_FITS_SIGNED_P(~A))~%" ; CFFI-GROVEL::C-NAME) ; (FORMAT CFFI-GROVEL::OUT ; " fprintf(output, \"%lli\", (int64_t) ~A);" ; CFFI-GROVEL::C-NAME) ; (FORMAT CFFI-GROVEL::OUT "~& else~%") ; (FORMAT CFFI-GROVEL::OUT ; " fprintf(output, \"%llu\", (uint64_t) ~A);" ; CFFI-GROVEL::C-NAME)) ; (DOUBLE-FLOAT ; (FORMAT CFFI-GROVEL::OUT ; "~& fprintf(output, \"%s\", print_double_for_lisp((double)~A));~%" ; CFFI-GROVEL::C-NAME))) ; (WHEN DOCUMENTATION ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT " ~S" DOCUMENTATION)) ; (CFFI-GROVEL::C-FORMAT CFFI-GROVEL::OUT ")~%"))) ; ; caught STYLE-WARNING: ; The variable OPTIONAL is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-cuda" "src" "driver-api" "cffi-grovel"> WARNING: redefining CFFI-GROVEL::DEFINE-CONSTANTS-FROM-ENUM in DEFUN ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cl-cuda/e73574a8fd2d4e821d6831deb8c3881a228648f8/cl-cuda-20241021-git/src/driver-api/library.lisp ; in: HANDLER-CASE (CFFI:USE-FOREIGN-LIBRARY LIBCUDA) ; (CFFI:LOAD-FOREIGN-LIBRARY-ERROR (CL-CUDA.DRIVER-API::E) ; (SETF CL-CUDA.DRIVER-API:*SDK-NOT-FOUND* T) ; (ASSERT (NOT (MEMBER :CUDA-SDK *FEATURES*)))) ; ; caught STYLE-WARNING: ; The variable E is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-cuda" "src" "driver-api" "library"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cl-cuda/e73574a8fd2d4e821d6831deb8c3881a228648f8/cl-cuda-20241021-git/src/driver-api/function.lisp ; in: DEFCUFUN (CU-INIT "cuInit") ; (CL-CUDA.DRIVER-API::DEFCUFUN (CL-CUDA.DRIVER-API:CU-INIT "cuInit") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::FLAGS :UNSIGNED-INT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-INIT ; (CL-CUDA.DRIVER-API::FLAGS) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-INIT ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable FLAGS is defined but never used. ; in: DEFCUFUN (CU-DEVICE-GET "cuDeviceGet") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-DEVICE-GET "cuDeviceGet") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::DEVICE (:POINTER CL-CUDA.DRIVER-API:CU-DEVICE)) ; (CL-CUDA.DRIVER-API::ORDINAL :INT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-DEVICE-GET ; (CL-CUDA.DRIVER-API::DEVICE CL-CUDA.DRIVER-API::ORDINAL) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-DEVICE-GET ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DEVICE is defined but never used. ; ; caught STYLE-WARNING: ; The variable ORDINAL is defined but never used. ; in: DEFCUFUN (CU-DEVICE-GET-COUNT "cuDeviceGetCount") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-DEVICE-GET-COUNT "cuDeviceGetCount") ; CL-CUDA.DRIVER-API:CU-RESULT (COUNT (:POINTER :INT))) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-DEVICE-GET-COUNT ; (COUNT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-DEVICE-GET-COUNT ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable COUNT is defined but never used. ; in: DEFCUFUN (CU-DEVICE-COMPUTE-CAPABILITY "cuDeviceComputeCapability") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-DEVICE-COMPUTE-CAPABILITY ; "cuDeviceComputeCapability") ; CL-CUDA.DRIVER-API:CU-RESULT (CL-CUDA.DRIVER-API::MAJOR (:POINTER :INT)) ; (CL-CUDA.DRIVER-API::MINOR (:POINTER :INT)) ; (CL-CUDA.DRIVER-API::DEV CL-CUDA.DRIVER-API:CU-DEVICE)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-DEVICE-COMPUTE-CAPABILITY ; (CL-CUDA.DRIVER-API::MAJOR CL-CUDA.DRIVER-API::MINOR ; CL-CUDA.DRIVER-API::DEV) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-DEVICE-COMPUTE-CAPABILITY ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable MAJOR is defined but never used. ; ; caught STYLE-WARNING: ; The variable MINOR is defined but never used. ; ; caught STYLE-WARNING: ; The variable DEV is defined but never used. ; in: DEFCUFUN (CU-DEVICE-GET-NAME "cuDeviceGetName") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-DEVICE-GET-NAME "cuDeviceGetName") ; CL-CUDA.DRIVER-API:CU-RESULT (CL-CUDA.DRIVER-API::NAME :STRING) ; (CL-CUDA.DRIVER-API::LEN :INT) ; (CL-CUDA.DRIVER-API::DEV CL-CUDA.DRIVER-API:CU-DEVICE)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-DEVICE-GET-NAME ; (CL-CUDA.DRIVER-API::NAME CL-CUDA.DRIVER-API::LEN ; CL-CUDA.DRIVER-API::DEV) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-DEVICE-GET-NAME ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable NAME is defined but never used. ; ; caught STYLE-WARNING: ; The variable LEN is defined but never used. ; ; caught STYLE-WARNING: ; The variable DEV is defined but never used. ; in: DEFCUFUN (CU-CTX-CREATE "cuCtxCreate_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-CTX-CREATE "cuCtxCreate_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::PCTX (:POINTER CL-CUDA.DRIVER-API:CU-CONTEXT)) ; (CL-CUDA.DRIVER-API::FLAGS :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::DEV CL-CUDA.DRIVER-API:CU-DEVICE)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-CTX-CREATE ; (CL-CUDA.DRIVER-API::PCTX CL-CUDA.DRIVER-API::FLAGS ; CL-CUDA.DRIVER-API::DEV) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-CTX-CREATE ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable PCTX is defined but never used. ; ; caught STYLE-WARNING: ; The variable FLAGS is defined but never used. ; ; caught STYLE-WARNING: ; The variable DEV is defined but never used. ; in: DEFCUFUN (CU-CTX-DESTROY "cuCtxDestroy_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-CTX-DESTROY "cuCtxDestroy_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::CTX CL-CUDA.DRIVER-API:CU-CONTEXT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-CTX-DESTROY ; (CL-CUDA.DRIVER-API::CTX) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-CTX-DESTROY ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable CTX is defined but never used. ; in: DEFCUFUN (CU-DEVICE-TOTAL-MEM "cuDeviceTotalMem") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-DEVICE-TOTAL-MEM "cuDeviceTotalMem") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::BYTES (:POINTER CL-CUDA.DRIVER-API:SIZE-T)) ; (CL-CUDA.DRIVER-API::DEV :INT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-DEVICE-TOTAL-MEM ; (CL-CUDA.DRIVER-API::BYTES CL-CUDA.DRIVER-API::DEV) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-DEVICE-TOTAL-MEM ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable BYTES is defined but never used. ; ; caught STYLE-WARNING: ; The variable DEV is defined but never used. ; in: DEFCUFUN (CU-MEM-ALLOC "cuMemAlloc_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MEM-ALLOC "cuMemAlloc_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::DPTR (:POINTER CL-CUDA.DRIVER-API:CU-DEVICE-PTR)) ; (CL-CUDA.DRIVER-API::BYTESIZE CL-CUDA.DRIVER-API:SIZE-T)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEM-ALLOC ; (CL-CUDA.DRIVER-API::DPTR CL-CUDA.DRIVER-API::BYTESIZE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEM-ALLOC ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DPTR is defined but never used. ; ; caught STYLE-WARNING: ; The variable BYTESIZE is defined but never used. ; in: DEFCUFUN (CU-MEM-FREE "cuMemFree_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN (CL-CUDA.DRIVER-API:CU-MEM-FREE "cuMemFree_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::DPTR ; CL-CUDA.DRIVER-API:CU-DEVICE-PTR)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEM-FREE ; (CL-CUDA.DRIVER-API::DPTR) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEM-FREE ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DPTR is defined but never used. ; in: DEFCUFUN (CU-MEM-HOST-REGISTER "cuMemHostRegister") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MEM-HOST-REGISTER "cuMemHostRegister") ; CL-CUDA.DRIVER-API:CU-RESULT (CL-CUDA.DRIVER-API::P :POINTER) ; (BYTE-SIZE CL-CUDA.DRIVER-API:SIZE-T) ; (CL-CUDA.DRIVER-API::FLAGS :UNSIGNED-INT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEM-HOST-REGISTER ; (CL-CUDA.DRIVER-API::P BYTE-SIZE CL-CUDA.DRIVER-API::FLAGS) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEM-HOST-REGISTER ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable P is defined but never used. ; ; caught STYLE-WARNING: ; The variable BYTE-SIZE is defined but never used. ; ; caught STYLE-WARNING: ; The variable FLAGS is defined but never used. ; in: DEFCUFUN (CU-MEM-HOST-UNREGISTER "cuMemHostUnregister") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MEM-HOST-UNREGISTER "cuMemHostUnregister") ; CL-CUDA.DRIVER-API:CU-RESULT (CL-CUDA.DRIVER-API::P :POINTER)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEM-HOST-UNREGISTER ; (CL-CUDA.DRIVER-API::P) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEM-HOST-UNREGISTER ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable P is defined but never used. ; in: DEFCUFUN (CU-MEMCPY-HOST-TO-DEVICE "cuMemcpyHtoD_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MEMCPY-HOST-TO-DEVICE "cuMemcpyHtoD_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::DST-DEVICE CL-CUDA.DRIVER-API:CU-DEVICE-PTR) ; (CL-CUDA.DRIVER-API::SRC-HOST :POINTER) ; (CL-CUDA.DRIVER-API::BYTE-COUNT CL-CUDA.DRIVER-API:SIZE-T)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEMCPY-HOST-TO-DEVICE ; (CL-CUDA.DRIVER-API::DST-DEVICE CL-CUDA.DRIVER-API::SRC-HOST ; CL-CUDA.DRIVER-API::BYTE-COUNT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEMCPY-HOST-TO-DEVICE ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DST-DEVICE is defined but never used. ; ; caught STYLE-WARNING: ; The variable SRC-HOST is defined but never used. ; ; caught STYLE-WARNING: ; The variable BYTE-COUNT is defined but never used. ; in: DEFCUFUN (CU-MEMCPY-HOST-TO-DEVICE-ASYNC "cuMemcpyHtoDAsync_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MEMCPY-HOST-TO-DEVICE-ASYNC "cuMemcpyHtoDAsync_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::DST-DEVICE CL-CUDA.DRIVER-API:CU-DEVICE-PTR) ; (CL-CUDA.DRIVER-API::SRC-HOST :POINTER) ; (CL-CUDA.DRIVER-API::BYTE-COUNT CL-CUDA.DRIVER-API:SIZE-T) ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEMCPY-HOST-TO-DEVICE-ASYNC ; (CL-CUDA.DRIVER-API::DST-DEVICE CL-CUDA.DRIVER-API::SRC-HOST ; CL-CUDA.DRIVER-API::BYTE-COUNT CL-CUDA.DRIVER-API::HSTREAM) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEMCPY-HOST-TO-DEVICE-ASYNC ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DST-DEVICE is defined but never used. ; ; caught STYLE-WARNING: ; The variable SRC-HOST is defined but never used. ; ; caught STYLE-WARNING: ; The variable BYTE-COUNT is defined but never used. ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; in: DEFCUFUN (CU-MEMCPY-DEVICE-TO-HOST "cuMemcpyDtoH_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MEMCPY-DEVICE-TO-HOST "cuMemcpyDtoH_v2") ; CL-CUDA.DRIVER-API:CU-RESULT (CL-CUDA.DRIVER-API::DST-HOST :POINTER) ; (CL-CUDA.DRIVER-API::SRC-DEVICE CL-CUDA.DRIVER-API:CU-DEVICE-PTR) ; (CL-CUDA.DRIVER-API::BYTE-COUNT CL-CUDA.DRIVER-API:SIZE-T)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEMCPY-DEVICE-TO-HOST ; (CL-CUDA.DRIVER-API::DST-HOST CL-CUDA.DRIVER-API::SRC-DEVICE ; CL-CUDA.DRIVER-API::BYTE-COUNT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEMCPY-DEVICE-TO-HOST ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DST-HOST is defined but never used. ; ; caught STYLE-WARNING: ; The variable SRC-DEVICE is defined but never used. ; ; caught STYLE-WARNING: ; The variable BYTE-COUNT is defined but never used. ; in: DEFCUFUN (CU-MEMCPY-DEVICE-TO-HOST-ASYNC "cuMemcpyDtoHAsync_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MEMCPY-DEVICE-TO-HOST-ASYNC "cuMemcpyDtoHAsync_v2") ; CL-CUDA.DRIVER-API:CU-RESULT (CL-CUDA.DRIVER-API::DST-HOST :POINTER) ; (CL-CUDA.DRIVER-API::SRC-DEVICE CL-CUDA.DRIVER-API:CU-DEVICE-PTR) ; (CL-CUDA.DRIVER-API::BYTE-COUNT CL-CUDA.DRIVER-API:SIZE-T) ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MEMCPY-DEVICE-TO-HOST-ASYNC ; (CL-CUDA.DRIVER-API::DST-HOST CL-CUDA.DRIVER-API::SRC-DEVICE ; CL-CUDA.DRIVER-API::BYTE-COUNT CL-CUDA.DRIVER-API::HSTREAM) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MEMCPY-DEVICE-TO-HOST-ASYNC ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DST-HOST is defined but never used. ; ; caught STYLE-WARNING: ; The variable SRC-DEVICE is defined but never used. ; ; caught STYLE-WARNING: ; The variable BYTE-COUNT is defined but never used. ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; in: DEFCUFUN (CU-MODULE-LOAD "cuModuleLoad" :DISABLE-FP-TRAPS T) ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MODULE-LOAD "cuModuleLoad" :DISABLE-FP-TRAPS T) ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::MODULE (:POINTER CL-CUDA.DRIVER-API:CU-MODULE)) ; (CL-CUDA.DRIVER-API::FNAME :STRING)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MODULE-LOAD ; (CL-CUDA.DRIVER-API::MODULE CL-CUDA.DRIVER-API::FNAME) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MODULE-LOAD ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable MODULE is defined but never used. ; ; caught STYLE-WARNING: ; The variable FNAME is defined but never used. ; in: DEFCUFUN (CU-MODULE-UNLOAD "cuModuleUnload") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MODULE-UNLOAD "cuModuleUnload") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::MODULE CL-CUDA.DRIVER-API:CU-MODULE)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MODULE-UNLOAD ; (CL-CUDA.DRIVER-API::MODULE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MODULE-UNLOAD ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable MODULE is defined but never used. ; in: DEFCUFUN (CU-MODULE-GET-FUNCTION "cuModuleGetFunction") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MODULE-GET-FUNCTION "cuModuleGetFunction") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::HFUNC (:POINTER CL-CUDA.DRIVER-API:CU-FUNCTION)) ; (CL-CUDA.DRIVER-API::HMOD CL-CUDA.DRIVER-API:CU-MODULE) ; (CL-CUDA.DRIVER-API::NAME :STRING)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MODULE-GET-FUNCTION ; (CL-CUDA.DRIVER-API::HFUNC CL-CUDA.DRIVER-API::HMOD ; CL-CUDA.DRIVER-API::NAME) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MODULE-GET-FUNCTION ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable HFUNC is defined but never used. ; ; caught STYLE-WARNING: ; The variable HMOD is defined but never used. ; ; caught STYLE-WARNING: ; The variable NAME is defined but never used. ; in: DEFCUFUN (CU-MODULE-GET-GLOBAL "cuModuleGetGlobal_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-MODULE-GET-GLOBAL "cuModuleGetGlobal_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::DPTR (:POINTER CL-CUDA.DRIVER-API:CU-DEVICE-PTR)) ; (CL-CUDA.DRIVER-API::BYTES (:POINTER CL-CUDA.DRIVER-API:SIZE-T)) ; (CL-CUDA.DRIVER-API::HMOD CL-CUDA.DRIVER-API:CU-MODULE) ; (CL-CUDA.DRIVER-API::NAME :STRING)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-MODULE-GET-GLOBAL ; (CL-CUDA.DRIVER-API::DPTR CL-CUDA.DRIVER-API::BYTES ; CL-CUDA.DRIVER-API::HMOD CL-CUDA.DRIVER-API::NAME) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-MODULE-GET-GLOBAL ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable DPTR is defined but never used. ; ; caught STYLE-WARNING: ; The variable BYTES is defined but never used. ; ; caught STYLE-WARNING: ; The variable HMOD is defined but never used. ; ; caught STYLE-WARNING: ; The variable NAME is defined but never used. ; in: DEFCUFUN (CU-LAUNCH-KERNEL "cuLaunchKernel") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-LAUNCH-KERNEL "cuLaunchKernel") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::F CL-CUDA.DRIVER-API:CU-FUNCTION) ; (CL-CUDA.DRIVER-API::GRID-DIM-X :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::GRID-DIM-Y :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::GRID-DIM-Z :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::BLOCK-DIM-X :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::BLOCK-DIM-Y :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::BLOCK-DIM-Z :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::SHARED-MEM-BYTES :UNSIGNED-INT) ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM) ...) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-LAUNCH-KERNEL ; (CL-CUDA.DRIVER-API::F CL-CUDA.DRIVER-API::GRID-DIM-X ; CL-CUDA.DRIVER-API::GRID-DIM-Y CL-CUDA.DRIVER-API::GRID-DIM-Z ; CL-CUDA.DRIVER-API::BLOCK-DIM-X CL-CUDA.DRIVER-API::BLOCK-DIM-Y ; CL-CUDA.DRIVER-API::BLOCK-DIM-Z CL-CUDA.DRIVER-API::SHARED-MEM-BYTES ; CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API::KERNEL-PARAMS ; CL-CUDA.DRIVER-API::EXTRA) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-LAUNCH-KERNEL ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable F is defined but never used. ; ; caught STYLE-WARNING: ; The variable GRID-DIM-X is defined but never used. ; ; caught STYLE-WARNING: ; The variable GRID-DIM-Y is defined but never used. ; ; caught STYLE-WARNING: ; The variable GRID-DIM-Z is defined but never used. ; ; caught STYLE-WARNING: ; The variable BLOCK-DIM-X is defined but never used. ; ; caught STYLE-WARNING: ; The variable BLOCK-DIM-Y is defined but never used. ; ; caught STYLE-WARNING: ; The variable BLOCK-DIM-Z is defined but never used. ; ; caught STYLE-WARNING: ; The variable SHARED-MEM-BYTES is defined but never used. ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; ; caught STYLE-WARNING: ; The variable KERNEL-PARAMS is defined but never used. ; ; caught STYLE-WARNING: ; The variable EXTRA is defined but never used. ; in: DEFCUFUN (CU-EVENT-CREATE "cuEventCreate") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-EVENT-CREATE "cuEventCreate") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::PHEVENT (:POINTER CL-CUDA.DRIVER-API:CU-EVENT)) ; (CL-CUDA.DRIVER-API::FLAGS :UNSIGNED-INT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-EVENT-CREATE ; (CL-CUDA.DRIVER-API::PHEVENT CL-CUDA.DRIVER-API::FLAGS) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-EVENT-CREATE ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable PHEVENT is defined but never used. ; ; caught STYLE-WARNING: ; The variable FLAGS is defined but never used. ; in: DEFCUFUN (CU-EVENT-DESTROY "cuEventDestroy_v2") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-EVENT-DESTROY "cuEventDestroy_v2") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::H-EVENT CL-CUDA.DRIVER-API:CU-EVENT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-EVENT-DESTROY ; (CL-CUDA.DRIVER-API::H-EVENT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-EVENT-DESTROY ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable H-EVENT is defined but never used. ; in: DEFCUFUN (CU-EVENT-ELAPSED-TIME "cuEventElapsedTime") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-EVENT-ELAPSED-TIME "cuEventElapsedTime") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::PMILLISECONDS (:POINTER :FLOAT)) ; (CL-CUDA.DRIVER-API::HSTART CL-CUDA.DRIVER-API:CU-EVENT) ; (CL-CUDA.DRIVER-API::HEND CL-CUDA.DRIVER-API:CU-EVENT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-EVENT-ELAPSED-TIME ; (CL-CUDA.DRIVER-API::PMILLISECONDS CL-CUDA.DRIVER-API::HSTART ; CL-CUDA.DRIVER-API::HEND) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-EVENT-ELAPSED-TIME ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable PMILLISECONDS is defined but never used. ; ; caught STYLE-WARNING: ; The variable HSTART is defined but never used. ; ; caught STYLE-WARNING: ; The variable HEND is defined but never used. ; in: DEFCUFUN (CU-EVENT-RECORD "cuEventRecord") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-EVENT-RECORD "cuEventRecord") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::HEVENT CL-CUDA.DRIVER-API:CU-EVENT) ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-EVENT-RECORD ; (CL-CUDA.DRIVER-API::HEVENT CL-CUDA.DRIVER-API::HSTREAM) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-EVENT-RECORD ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable HEVENT is defined but never used. ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; in: DEFCUFUN (CU-EVENT-SYNCHRONIZE "cuEventSynchronize") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-EVENT-SYNCHRONIZE "cuEventSynchronize") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::HEVENT CL-CUDA.DRIVER-API:CU-EVENT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-EVENT-SYNCHRONIZE ; (CL-CUDA.DRIVER-API::HEVENT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-EVENT-SYNCHRONIZE ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable HEVENT is defined but never used. ; in: DEFCUFUN (CU-STREAM-CREATE "cuStreamCreate") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-STREAM-CREATE "cuStreamCreate") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::PHSTREAM (:POINTER CL-CUDA.DRIVER-API:CU-STREAM)) ; (CL-CUDA.DRIVER-API::FLAGS :UNSIGNED-INT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-STREAM-CREATE ; (CL-CUDA.DRIVER-API::PHSTREAM CL-CUDA.DRIVER-API::FLAGS) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-STREAM-CREATE ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable PHSTREAM is defined but never used. ; ; caught STYLE-WARNING: ; The variable FLAGS is defined but never used. ; in: DEFCUFUN (CU-STREAM-DESTROY "cuStreamDestroy") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-STREAM-DESTROY "cuStreamDestroy") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-STREAM-DESTROY ; (CL-CUDA.DRIVER-API::HSTREAM) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-STREAM-DESTROY ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; in: DEFCUFUN (CU-STREAM-QUERY "cuStreamQuery") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-STREAM-QUERY "cuStreamQuery") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-STREAM-QUERY ; (CL-CUDA.DRIVER-API::HSTREAM) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-STREAM-QUERY ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; in: DEFCUFUN (CU-STREAM-SYNCHRONIZE "cuStreamSynchronize") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-STREAM-SYNCHRONIZE "cuStreamSynchronize") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-STREAM-SYNCHRONIZE ; (CL-CUDA.DRIVER-API::HSTREAM) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-STREAM-SYNCHRONIZE ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; in: DEFCUFUN (CU-STREAM-WAIT-EVENT "cuStreamWaitEvent") ; (CL-CUDA.DRIVER-API::DEFCUFUN ; (CL-CUDA.DRIVER-API:CU-STREAM-WAIT-EVENT "cuStreamWaitEvent") ; CL-CUDA.DRIVER-API:CU-RESULT ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API:CU-STREAM) ; (CL-CUDA.DRIVER-API::HEVENT CL-CUDA.DRIVER-API:CU-EVENT) ; (CL-CUDA.DRIVER-API::FLAGS :UNSIGNED-INT)) ; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-CUDA.DRIVER-API:CU-STREAM-WAIT-EVENT ; (CL-CUDA.DRIVER-API::HSTREAM CL-CUDA.DRIVER-API::HEVENT ; CL-CUDA.DRIVER-API::FLAGS) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK CL-CUDA.DRIVER-API:CU-STREAM-WAIT-EVENT ; (ERROR 'CL-CUDA.DRIVER-API::SDK-NOT-FOUND-ERROR))) ; ; caught STYLE-WARNING: ; The variable HSTREAM is defined but never used. ; ; caught STYLE-WARNING: ; The variable HEVENT is defined but never used. ; ; caught STYLE-WARNING: ; The variable FLAGS is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-cuda" "src" "driver-api" "function"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cl-cuda/e73574a8fd2d4e821d6831deb8c3881a228648f8/cl-cuda-20241021-git/src/lang/environment.lisp ; in: DEFSTRUCT VARIABLE ; (DEFSTRUCT ; (CL-CUDA.LANG.ENVIRONMENT::VARIABLE ; (:CONSTRUCTOR CL-CUDA.LANG.ENVIRONMENT::%MAKE-VARIABLE)) ; (CL-CUDA.LANG.ENVIRONMENT::NAME :NAME :READ-ONLY T) ; (TYPE :TYPE :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.ENVIRONMENT::VARIABLE {102E156BB3}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.ENVIRONMENT::VARIABLE-P, CL-CUDA.LANG.ENVIRONMENT::VARIABLE-NAME and CL-CUDA.LANG.ENVIRONMENT::VARIABLE-TYPE could not be inlined because the structure definition for CL-CUDA.LANG.ENVIRONMENT::VARIABLE was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT SYMBOL-MACRO ; (DEFSTRUCT ; (CL-CUDA.LANG.ENVIRONMENT::SYMBOL-MACRO ; (:CONSTRUCTOR CL-CUDA.LANG.ENVIRONMENT::%MAKE-SYMBOL-MACRO)) ; (CL-CUDA.LANG.ENVIRONMENT::NAME :NAME :READ-ONLY T) ; (CL-CUDA.LANG.ENVIRONMENT::EXPANSION :EXPANSION :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.ENVIRONMENT::SYMBOL-MACRO {102E349823}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.ENVIRONMENT::SYMBOL-MACRO-P, CL-CUDA.LANG.ENVIRONMENT::SYMBOL-MACRO-NAME and CL-CUDA.LANG.ENVIRONMENT::SYMBOL-MACRO-EXPANSION could not be inlined because the structure definition for CL-CUDA.LANG.ENVIRONMENT::SYMBOL-MACRO was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT GLOBAL ; (DEFSTRUCT ; (CL-CUDA.LANG.ENVIRONMENT::GLOBAL ; (:CONSTRUCTOR CL-CUDA.LANG.ENVIRONMENT::%MAKE-GLOBAL)) ; (CL-CUDA.LANG.ENVIRONMENT::NAME :NAME :READ-ONLY T) ; (TYPE :TYPE :READ-ONLY T) ; (CL-CUDA.LANG.ENVIRONMENT::INITIALIZER :INITIALIZER :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.ENVIRONMENT::GLOBAL {102E43DB53}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.ENVIRONMENT::GLOBAL-P, CL-CUDA.LANG.ENVIRONMENT::GLOBAL-NAME, CL-CUDA.LANG.ENVIRONMENT::GLOBAL-TYPE and CL-CUDA.LANG.ENVIRONMENT::GLOBAL-INITIALIZER could not be inlined because the structure definition for CL-CUDA.LANG.ENVIRONMENT::GLOBAL was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT %FUNCTION ; (DEFSTRUCT ; (CL-CUDA.LANG.ENVIRONMENT::%FUNCTION ; (:CONSTRUCTOR CL-CUDA.LANG.ENVIRONMENT::%MAKE-FUNCTION) ; (:CONC-NAME CL-CUDA.LANG.ENVIRONMENT::FUNCTION-) ; (:PREDICATE CL-CUDA.LANG.ENVIRONMENT::FUNCTION-P)) ; (CL-CUDA.LANG.ENVIRONMENT::NAME :NAME :READ-ONLY T) ; (CL-CUDA.LANG.ENVIRONMENT::RETURN-TYPE :RETURN-TYPE :READ-ONLY T) ; (CL-CUDA.LANG.ENVIRONMENT::ARGUMENT-TYPES :ARGUMENT-TYPES :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.ENVIRONMENT::%FUNCTION {102E6A5923}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.ENVIRONMENT::FUNCTION-P, CL-CUDA.LANG.ENVIRONMENT::FUNCTION-NAME, CL-CUDA.LANG.ENVIRONMENT::FUNCTION-RETURN-TYPE and CL-CUDA.LANG.ENVIRONMENT::FUNCTION-ARGUMENT-TYPES could not be inlined because the structure definition for CL-CUDA.LANG.ENVIRONMENT::%FUNCTION was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT MACRO ; (DEFSTRUCT ; (CL-CUDA.LANG.ENVIRONMENT::MACRO ; (:CONSTRUCTOR CL-CUDA.LANG.ENVIRONMENT::%MAKE-MACRO)) ; (CL-CUDA.LANG.ENVIRONMENT::NAME :NAME :READ-ONLY T) ; (CL-CUDA.LANG.ENVIRONMENT::ARGUMENTS :ARGUMENTS :READ-ONLY T) ; (CL-CUDA.LANG.ENVIRONMENT::BODY :BODY :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.ENVIRONMENT::MACRO {102E8A9F73}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.ENVIRONMENT::MACRO-P and CL-CUDA.LANG.ENVIRONMENT::MACRO-NAME could not be inlined because the structure definition for CL-CUDA.LANG.ENVIRONMENT::MACRO was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-cuda" "src" "lang" "environment"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/cl-cuda/e73574a8fd2d4e821d6831deb8c3881a228648f8/cl-cuda-20241021-git/src/lang/kernel.lisp ; in: DEFSTRUCT %FUNCTION ; (DEFSTRUCT ; (CL-CUDA.LANG.KERNEL::%FUNCTION ; (:CONSTRUCTOR CL-CUDA.LANG.KERNEL::%MAKE-FUNCTION) ; (:CONC-NAME CL-CUDA.LANG.KERNEL::FUNCTION-) ; (:PREDICATE CL-CUDA.LANG.KERNEL::FUNCTION-P)) ; (CL-CUDA.LANG.KERNEL::NAME :NAME :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::RETURN-TYPE :RETURN-TYPE :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::ARGUMENTS :ARGUMENTS :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::BODY :BODY :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.KERNEL::%FUNCTION {102F543A13}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.KERNEL::FUNCTION-P, CL-CUDA.LANG.KERNEL::FUNCTION-NAME, CL-CUDA.LANG.KERNEL::FUNCTION-RETURN-TYPE, CL-CUDA.LANG.KERNEL::FUNCTION-ARGUMENTS and CL-CUDA.LANG.KERNEL::FUNCTION-BODY could not be inlined because the structure definition for CL-CUDA.LANG.KERNEL::%FUNCTION was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT MACRO ; (DEFSTRUCT ; (CL-CUDA.LANG.KERNEL::MACRO ; (:CONSTRUCTOR CL-CUDA.LANG.KERNEL::%MAKE-MACRO)) ; (CL-CUDA.LANG.KERNEL::NAME :NAME :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::ARGUMENTS :ARGUMENTS :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::BODY :BODY :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.KERNEL::MACRO {102F85ADD3}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.KERNEL::MACRO-P, CL-CUDA.LANG.KERNEL::MACRO-NAME, CL-CUDA.LANG.KERNEL::MACRO-ARGUMENTS and CL-CUDA.LANG.KERNEL::MACRO-BODY could not be inlined because the structure definition for CL-CUDA.LANG.KERNEL::MACRO was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT SYMBOL-MACRO ; (DEFSTRUCT ; (CL-CUDA.LANG.KERNEL::SYMBOL-MACRO ; (:CONSTRUCTOR CL-CUDA.LANG.KERNEL::%MAKE-SYMBOL-MACRO)) ; (CL-CUDA.LANG.KERNEL::NAME :NAME :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::EXPANSION :EXPANSION :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.KERNEL::SYMBOL-MACRO {102FA1D213}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.KERNEL::SYMBOL-MACRO-P, CL-CUDA.LANG.KERNEL::SYMBOL-MACRO-NAME and CL-CUDA.LANG.KERNEL::SYMBOL-MACRO-EXPANSION could not be inlined because the structure definition for CL-CUDA.LANG.KERNEL::SYMBOL-MACRO was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. ; in: DEFSTRUCT GLOBAL ; (DEFSTRUCT ; (CL-CUDA.LANG.KERNEL::GLOBAL ; (:CONSTRUCTOR CL-CUDA.LANG.KERNEL::%MAKE-GLOBAL)) ; (CL-CUDA.LANG.KERNEL::NAME :NAME :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::QUALIFIERS :QUALIFIERS :READ-ONLY T) ; (CL-CUDA.LANG.KERNEL::INITIALIZER :INITIALIZER :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-CUDA.LANG.KERNEL::GLOBAL {102FC2E2A3}> ; '#(#<SB-KERNEL:LAYOUT for T {50901003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50901073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-CUDA.LANG.KERNEL::GLOBAL-P, CL-CUDA.LANG.KERNEL::GLOBAL-NAME, CL-CUDA.LANG.KERNEL::GLOBAL-QUALIFIERS and CL-CUDA.LANG.KERNEL::GLOBAL-INITIALIZER could not be inlined because the structure definition for CL-CUDA.LANG.KERNEL::GLOBAL was not yet seen. To avoid this warning, DEFSTRUCT should precede references to the affected functions, or they must be declared locally notinline at each call site. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-cuda" "src" "lang" "kernel"> 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 WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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=3150153 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150153 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {1039733FF3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {1039733FF3}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {1039733FF3}>) 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 {1004DCBED3}>) [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 {1004DCBED3}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/cl-cuda"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 13: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/cl-cuda">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ALTERNATE-ASDF-SYSTEM-CONNECTIONS:SYSTEM-CONNECTION "dense-arrays/cl-cuda">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays/cl-cuda") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/cl-cuda") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1004D5ED4B}> :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) {1004D2BD4B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays/cl-cuda") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays" "dense-arrays/cl-cuda") 24: (DEPCHECK::MAGIC "dense-arrays" "dense-arrays/cl-cuda" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-r6HqLo7c/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays" "dense-arrays/cl-cuda" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-r6HqLo7c/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-r6HqLo7c/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 92 STYLE-WARNING conditions ; printed 6 notes
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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 WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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=3150193 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150193 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100BABCB93}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100BABCB93}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {100BABCB93}>) 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 {1004DC1413}>) [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 {1004DC1413}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dense-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 "dense-arrays">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dense-arrays">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1004D5D00B}> :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) {1004D29F8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays" "dense-arrays") 24: (DEPCHECK::MAGIC "dense-arrays" "dense-arrays" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-LWqR6uaZ/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays" "dense-arrays" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-LWqR6uaZ/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-LWqR6uaZ/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 6 STYLE-WARNING conditions ; printed 4 notes
WARNING: redefining OPERATE :AFTER (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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 WARNING: redefining EMACS-INSPECT (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD 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=3150149 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150149 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10121239F3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10121239F3}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10121239F3}>) 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 {100458FAC3}>) [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 {100458FAC3}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dense-arrays-plus"> :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 "dense-arrays-plus">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dense-arrays-plus">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays-plus") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays-plus") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10045A6AEB}> :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) {1004571D4B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays-plus") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays-plus" "dense-arrays-plus") 24: (DEPCHECK::MAGIC "dense-arrays-plus" "dense-arrays-plus" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-W6mP2Z4q/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays-plus" "dense-arrays-plus" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-W6mP2Z4q/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-W6mP2Z4q/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 6 STYLE-WARNING conditions ; printed 4 notes
; 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"> 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=3150145 "main thread" RUNNING {1000EE8003}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "peltadot/cl" "special-forms"> Backtrace for: #<SB-THREAD:THREAD tid=3150145 "main thread" RUNNING {1000EE8003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {1039B93CF3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {1039B93CF3}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {1039B93CF3}>) 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 {1004587713}>) [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 {1004587713}>) [fast-method] 12: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dense-arrays-plus-lite"> :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 "dense-arrays-plus-lite">) 14: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 15: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dense-arrays-plus-lite">) [fast-method] 16: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dense-arrays-plus-lite") 17: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 18: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays-plus-lite") [fast-method] 19: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {100459532B}> :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) {10045605CB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dense-arrays-plus-lite") [fast-method] 23: (DEPCHECK::COMPUTE-DEPENDENCIES "dense-arrays-plus-lite" "dense-arrays-plus-lite") 24: (DEPCHECK::MAGIC "dense-arrays-plus-lite" "dense-arrays-plus-lite" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-xS0rhQiN/depcheck-win.txt") 25: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dense-arrays-plus-lite" "dense-arrays-plus-lite" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-xS0rhQiN/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-xS0rhQiN/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 9 STYLE-WARNING conditions ; printed 12 notes