SBCL 2.5.5.114-85e41f89c / ASDF 3.3.5
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: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-compat". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-test". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-examples". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: redefining MAGICL::SVD-LISP in DEFUN WARNING: redefining MAGICL:SCALE! in DEFUN WARNING: redefining MAGICL:.+ in DEFUN WARNING: redefining MAGICL:.- in DEFUN WARNING: redefining MAGICL:.* in DEFUN WARNING: redefining MAGICL:./ in DEFUN WARNING: redefining MAGICL:MULT in DEFUN WARNING: redefining MAGICL:EIG in DEFUN WARNING: redefining MAGICL:HERMITIAN-EIG in DEFUN WARNING: redefining MAGICL:LU in DEFUN WARNING: redefining MAGICL:LU-SOLVE in DEFUN WARNING: redefining MAGICL:INV in DEFUN WARNING: redefining MAGICL:CSD-BLOCKS in DEFUN WARNING: redefining MAGICL:SVD in DEFUN WARNING: redefining MAGICL:SCHUR in DEFUN WARNING: redefining MAGICL:QZ in DEFUN WARNING: redefining MAGICL:QL in DEFUN WARNING: redefining MAGICL:QR in DEFUN WARNING: redefining MAGICL:RQ in DEFUN WARNING: redefining MAGICL:LQ in DEFUN ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/ast.lisp ; in: DEFSTRUCT DELAYED-EXPRESSION ; (DEFSTRUCT ; (CL-QUIL.FRONTEND:DELAYED-EXPRESSION ; (:CONSTRUCTOR CL-QUIL.FRONTEND::%DELAYED-EXPRESSION)) ; #<(SIMPLE-ARRAY CHARACTER ; (335)) A representation of an arithmetic expression with fillable "slots". ; ; PARAMS is a list of values to fill the slots with. These can be formal variables, but eventually must be a list of CONSTANTs. ; ; LAMB... {121873ADBF}> ; (CL-QUIL.FRONTEND::PARAMS NIL) ; (CL-QUIL.FRONTEND::LAMBDA-PARAMS NIL :READ-ONLY T) ; (CL-QUIL.FRONTEND::EXPRESSION NIL :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:DELAYED-EXPRESSION {121867F6F3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL.FRONTEND:DELAYED-EXPRESSION-EXPRESSION could not be inlined because the structure definition for CL-QUIL.FRONTEND:DELAYED-EXPRESSION 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 PAULI-TERM ; (DEFSTRUCT (CL-QUIL.FRONTEND:PAULI-TERM) ; #<(SIMPLE-ARRAY CHARACTER ; (642)) Records a word of Pauli operators, together with an ordered list of qubit formals on which they act, as well as a scalar prefix. This is part of the internal representation of a EXP-PAULI-SUM-GATE-DE... {121942800F}> ; CL-QUIL.FRONTEND::PAULI-WORD ; CL-QUIL.FRONTEND::PREFACTOR ; CL-QUIL.FRONTEND::ARGUMENTS) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:PAULI-TERM {12193874A3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL.FRONTEND:PAULI-TERM-PAULI-WORD, CL-QUIL.FRONTEND:PAULI-TERM-PREFACTOR and CL-QUIL.FRONTEND:PAULI-TERM-ARGUMENTS could not be inlined because the structure definition for CL-QUIL.FRONTEND:PAULI-TERM 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. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/ast.lisp ; in: DEFUN EXPAND-CLASSICAL-INSTRUCTION-DEFINITIONS ; (LOOP :FOR CL-QUIL.FRONTEND::TYPE-TUPLE :IN CL-QUIL.FRONTEND::TYPES ; :FOR CL-QUIL.FRONTEND::TYPED-NAME := (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE) ; :DO (ASSERT ; (AND ; (= CL-QUIL.FRONTEND::NUM-ARGS ; (LENGTH CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (EVERY #'CL-QUIL.FRONTEND::VALID-TYPE-SYMBOL-P ; CL-QUIL.FRONTEND::TYPE-TUPLE))) ; :COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD ; ==> ; (LET* ((#:HEAD11 (SB-KERNEL:UNALIGNED-DX-CONS NIL)) ; (#:TAIL12 #:HEAD11) ; (CL-QUIL.FRONTEND::TYPED-NAMES NIL)) ; (DECLARE (DYNAMIC-EXTENT #:HEAD11) ; (SB-C::NO-DEBUG #:HEAD11 #:TAIL12) ; (LIST CL-QUIL.FRONTEND::TYPED-NAMES)) ; (SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD (#S(SB-LOOP::LOOP-COLLECTOR ; :NAME NIL ; :CLASS LIST ; :HISTORY (APPEND) ; :TEMPVARS (#:HEAD13 #:TAIL14) ; :SPECIFIED-TYPE NIL ; :DTYPE LIST ; :DATA NIL) ; #:HEAD13 #:TAIL14) ; (TAGBODY ; SB-LOOP::NEXT-LOOP ; (WHEN (ENDP #:L10) (GO SB-LOOP::END-LOOP)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPE-TUPLE (CAR #:L10)) ; (SB-LOOP::LOOP-DESETQ #:L10 (CDR #:L10)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPED-NAME ; (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (ASSERT (AND # #)) ; (SB-LOOP::LOOP-COLLECT-RPLACD ; (#:HEAD11 #:TAIL12 CL-QUIL.FRONTEND::TYPED-NAMES) ; (LIST CL-QUIL.FRONTEND::TYPED-NAME)) ; (SB-LOOP::LOOP-COLLECT-RPLACD (#:HEAD13 #:TAIL14) (LIST `# `# `# `#)) ; (GO SB-LOOP::NEXT-LOOP) ; SB-LOOP::END-LOOP ; (RETURN-FROM NIL (SB-LOOP::LOOP-COLLECT-ANSWER #:HEAD13))))) ; ; caught STYLE-WARNING: ; The variable TYPED-NAMES is assigned but never read. ; in: DEFUN EXPAND-CLASSICAL-INSTRUCTION-DEFINITIONS ; (LOOP :FOR CL-QUIL.FRONTEND::TYPE-TUPLE :IN CL-QUIL.FRONTEND::TYPES ; :FOR CL-QUIL.FRONTEND::TYPED-NAME := (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE) ; :DO (ASSERT ; (AND ; (= CL-QUIL.FRONTEND::NUM-ARGS ; (LENGTH CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (EVERY #'CL-QUIL.FRONTEND::VALID-TYPE-SYMBOL-P ; CL-QUIL.FRONTEND::TYPE-TUPLE))) ; :COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD ; ==> ; (LET* ((#:HEAD79 (SB-KERNEL:UNALIGNED-DX-CONS NIL)) ; (#:TAIL80 #:HEAD79) ; (CL-QUIL.FRONTEND::TYPED-NAMES NIL)) ; (DECLARE (DYNAMIC-EXTENT #:HEAD79) ; (SB-C::NO-DEBUG #:HEAD79 #:TAIL80) ; (LIST CL-QUIL.FRONTEND::TYPED-NAMES)) ; (SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD (#S(SB-LOOP::LOOP-COLLECTOR ; :NAME NIL ; :CLASS LIST ; :HISTORY (APPEND) ; :TEMPVARS (#:HEAD81 #:TAIL82) ; :SPECIFIED-TYPE NIL ; :DTYPE LIST ; :DATA NIL) ; #:HEAD81 #:TAIL82) ; (TAGBODY ; SB-LOOP::NEXT-LOOP ; (WHEN (ENDP #:L78) (GO SB-LOOP::END-LOOP)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPE-TUPLE (CAR #:L78)) ; (SB-LOOP::LOOP-DESETQ #:L78 (CDR #:L78)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPED-NAME ; (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (ASSERT (AND # #)) ; (SB-LOOP::LOOP-COLLECT-RPLACD ; (#:HEAD79 #:TAIL80 CL-QUIL.FRONTEND::TYPED-NAMES) ; (LIST CL-QUIL.FRONTEND::TYPED-NAME)) ; (SB-LOOP::LOOP-COLLECT-RPLACD (#:HEAD81 #:TAIL82) (LIST `# `# `# `#)) ; (GO SB-LOOP::NEXT-LOOP) ; SB-LOOP::END-LOOP ; (RETURN-FROM NIL (SB-LOOP::LOOP-COLLECT-ANSWER #:HEAD81))))) ; ; caught STYLE-WARNING: ; The variable TYPED-NAMES is assigned but never read. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil/frontend" "ast"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/parser.lisp ; in: DEFSTRUCT TOKEN ; (DEFSTRUCT ; (CL-QUIL.FRONTEND:TOKEN ; (:CONSTRUCTOR CL-QUIL.FRONTEND:TOK ; (TYPE &OPTIONAL CL-QUIL.FRONTEND::PAYLOAD ; (CL-QUIL.FRONTEND::LINE CL-QUIL.FRONTEND::*LINE-NUMBER*) ; (PATHNAME CL-QUIL.FRONTEND::*CURRENT-FILE*)))) ; "A lexical token." ; (CL-QUIL.FRONTEND::LINE NIL :TYPE (OR NULL (INTEGER 1)) :READ-ONLY T) ; (PATHNAME NIL :TYPE (OR NULL STRING PATHNAME) :READ-ONLY T) ; (TYPE NIL :TYPE SYMBOL :READ-ONLY T) ; (CL-QUIL.FRONTEND::PAYLOAD NIL :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:TOKEN {122A8DCBD3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL.FRONTEND:TOKEN-TYPE and CL-QUIL.FRONTEND:TOKEN-PAYLOAD could not be inlined because the structure definition for CL-QUIL.FRONTEND:TOKEN 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-quil/frontend" "parser"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/clifford/stabilizer.lisp ; in: ; DECLAIM (INLINE TABLEAU-QUBITS TABLEAU-X (SETF TABLEAU-X) TABLEAU-Z (SETF TABLEAU-Z) TABLEAU-R (SETF TABLEAU-R) TABLEAU-SCRATCH (SETF TABLEAU-SCRATCH)) ; (DECLAIM ; (INLINE CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TABLEAU-X ; (SETF CL-QUIL.CLIFFORD::TABLEAU-X) CL-QUIL.CLIFFORD::TABLEAU-Z ; (SETF CL-QUIL.CLIFFORD::TABLEAU-Z) CL-QUIL.CLIFFORD::TABLEAU-R ; (SETF CL-QUIL.CLIFFORD::TABLEAU-R) CL-QUIL.CLIFFORD::TABLEAU-SCRATCH ; (SETF CL-QUIL.CLIFFORD::TABLEAU-SCRATCH))) ; ==> ; (SB-C::%PROCLAIM ; '(INLINE CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TABLEAU-X ; (SETF CL-QUIL.CLIFFORD::TABLEAU-X) CL-QUIL.CLIFFORD::TABLEAU-Z ; (SETF CL-QUIL.CLIFFORD::TABLEAU-Z) CL-QUIL.CLIFFORD::TABLEAU-R ; (SETF CL-QUIL.CLIFFORD::TABLEAU-R) CL-QUIL.CLIFFORD::TABLEAU-SCRATCH ; (SETF CL-QUIL.CLIFFORD::TABLEAU-SCRATCH)) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Proclaiming CL-QUIL.CLIFFORD::TABLEAU-QUBITS to be INLINE, but 1 call to it was previously compiled. A declaration of NOTINLINE at the call site will eliminate this warning, as will proclaiming and defining the function before its first potential use. ; in: DEFUN TABLEAU-MEASURE ; (DEFUN CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (CL-QUIL.CLIFFORD::TAB CL-QUIL.CLIFFORD::Q) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0)) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU CL-QUIL.CLIFFORD::TAB) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX CL-QUIL.CLIFFORD::Q)) ; (LET* ((CL-QUIL.CLIFFORD::N ; (CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TAB)) ; (CL-QUIL.CLIFFORD::P ; (LOOP :FOR CL-QUIL.CLIFFORD::P :BELOW CL-QUIL.CLIFFORD::N ; :WHEN # ; :DO # ; :FINALLY #))) ; (DECLARE ; (TYPE (OR CL-QUIL.CLIFFORD::TABLEAU-INDEX NULL) CL-QUIL.CLIFFORD::P) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX CL-QUIL.CLIFFORD::N)) ; (COND ; (CL-QUIL.CLIFFORD::P ; (CL-QUIL.CLIFFORD::TABLEAU-COPY-ROW CL-QUIL.CLIFFORD::TAB ; CL-QUIL.CLIFFORD::P #) ; (CL-QUIL.CLIFFORD::TABLEAU-SET-ROW-TO-PAULI CL-QUIL.CLIFFORD::TAB # #) ; (SETF #) (DOTIMES # #) (VALUES # NIL)) ; (T (CL-QUIL.CLIFFORD::TABLEAU-CLEAR-SCRATCH CL-QUIL.CLIFFORD::TAB) ; (LET # ; # ; # ; #))))) ; ==> ; (SB-IMPL::%DEFUN 'CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (SB-INT:NAMED-LAMBDA CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (CL-QUIL.CLIFFORD::TAB CL-QUIL.CLIFFORD::Q) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) ; (COMPILATION-SPEED 0)) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU CL-QUIL.CLIFFORD::TAB) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX ; CL-QUIL.CLIFFORD::Q)) ; (BLOCK CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (LET* (# #) ; (DECLARE # ; #) ; (COND # #))))) ; ; caught STYLE-WARNING: ; Call to CL-QUIL.CLIFFORD::TABLEAU-COPY-ROW could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil/frontend" "clifford" "stabilizer"> WARNING: redefining CL-QUIL.FRONTEND::PRINT-PARSED-PROGRAM-GENERIC in DEFGENERIC ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/linear-algebra.lisp ; in: DEFUN-INLINABLE PSUM ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; (QVM:PSUM-DOTIMES (QVM::I (LENGTH QVM::STATE)) ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/wavefunction.lisp ; in: DEFUN PROBABILITY ; (DEFUN QVM:PROBABILITY (QVM::AMPLITUDE) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (LET ((QVM::RE (REALPART QVM::AMPLITUDE)) ; (QVM::IM (IMAGPART QVM::AMPLITUDE))) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM)))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM:PROBABILITY ; (QVM::AMPLITUDE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (BLOCK QVM:PROBABILITY ; (LET ((QVM::RE #) (QVM::IM #)) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM))))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-GROUND-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INJECT-BIT QVM::I QVM::QUBIT))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-EXCITED-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INDEX-TO-ADDRESS QVM::I QVM::QUBIT 1))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE APPLY-MATRIX-OPERATOR ; (APPLY QVM::KERNEL QVM::MATRIX QVM::WAVEFUNCTION (COERCE QVM::QUBITS 'LIST)) ; ; note: unable to optimize away possible call to FDEFINITION at runtime because: KERNEL is not known to be a function ; in: DEFUN-INLINABLE %SERIAL-NORM ; (QVM:DEFUN-INLINABLE QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK QVM::%SERIAL-NORM ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE NORM ; (QVM:DEFUN-INLINABLE QVM::NORM ; (QVM::WAVEFUNCTION) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT ; (THE (QVM:FLONUM 0) (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION))) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION))) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (BLOCK QVM::NORM ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT (THE # #)) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION)))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION) ; --> BLOCK QVM:PSUM-DOTIMES LET IF FLET ; ==> ; (#:WORKER-FUNCTION8 (#:START4 #:END5) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START4) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END5)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM3 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM3 to "<return value>" ; in: DEFUN NORMALIZE-WAVEFUNCTION ; (QVM:FLONUM LENGTH) ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; (QVM:PDOTIMES (QVM::I (LENGTH QVM::WAVEFUNCTION) QVM::WAVEFUNCTION) ; (SETF (AREF QVM::WAVEFUNCTION QVM::I) ; (* QVM::INV-NORM (AREF QVM::WAVEFUNCTION QVM::I)))) ; --> IF LPARALLEL.COGNATE:PDOTIMES LET PROGN LPARALLEL.COGNATE::%PDOTIMES ; --> LAMBDA ; ==> ; #'(LAMBDA (QVM::I) ; (TAGBODY (SETF (AREF QVM::WAVEFUNCTION QVM::I) (* QVM::INV-NORM #)))) ; ; note: doing float to pointer coercion (cost 13), for: ; the second argument of CLOSURE-INIT ; (QVM::NORM QVM::WAVEFUNCTION) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM16 to "<return value>" ; in: DEFUN WF ; (QVM:CFLONUM ELT) ; --> BLOCK COERCE ; ==> ; 1 ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; in: DEFUN GAUSSIAN-RANDOM-COMPLEX ; (DEFUN QVM::GAUSSIAN-RANDOM-COMPLEX () ; "Return a complex number with Gaussian-random real and imaginary parts." ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::GAUSSIAN-RANDOM-COMPLEX ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Return a complex number with Gaussian-random real and imaginary parts." ; (BLOCK QVM::GAUSSIAN-RANDOM-COMPLEX ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM)))) ; ; note: doing complex float to pointer coercion (cost 13) to "<return value>" ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/compile-gate.lisp ; in: DEFUN GENERATE-INNER-MATRIX-MULTIPLY-CODE ; (LOOP :FOR QVM::J :BELOW QVM::N ; :FOR QVM::C := (NTH QVM::J QVM::COLUMN) ; :FOR QVM::MIJ := ...) ; --> LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ ; ==> ; (SETQ QVM::MIJ (AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13) to MIJ ; `(* ,QVM::C ,(AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13), for: ; the third argument of LIST ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/measurement.lisp ; in: DEFMETHOD FORCE-MEASUREMENT (T T PURE-STATE T) ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: unable to optimize due to type uncertainty: The result is a (VALUES (OR (COMPLEX DOUBLE-FLOAT) (DOUBLE-FLOAT 0.0d0 1.0d0)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (/ (SQRT QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13), for: ; the first result of inline float arithmetic ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13) ; in: DEFGENERIC GET-EXCITED-STATE-PROBABILITY ; (AREF QVM::RHO QVM::I QVM::I) ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; (REALPART (AREF QVM::RHO QVM::I QVM::I)) ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (QVM:PSUM-DOTIMES (QVM::K (EXPT 2 (1- (QVM::NUM-QUBITS QVM::STATE)))) ; (LET ((QVM::I (QVM::INDEX-TO-ADDRESS QVM::K QVM::QUBIT 1))) ; (REALPART (AREF QVM::RHO QVM::I QVM::I)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM20 ; ; note: doing float to pointer coercion (cost 13) from #:SUM20 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION-IN-PARALLEL-TRULY ; (QVM:PSUM-DOTIMES (QVM::I ; (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM (- QVM::MID MIN))) ; (LET ((QVM::I (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM #))) ; (QVM:PROBABILITY (AREF QVM:WF QVM::I)))) ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION12 (#:START8 #:END9) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START8) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END9)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM7 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM7 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-MULTIPLE-TIMES ; (MT19937:RANDOM 1.0d0) ; --> BLOCK LET* - SCALE-FLOAT FLOAT ; ==> ; (+ (EXPT 2 52) MT19937::RANDOM-MANTISSA-BITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline float coercion (cost 5) because: ; The first argument is a (INTEGER 4611686018427387904), not a (SIGNED-BYTE 64). ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION ; (AREF QVM::PS QVM::I) ; ; note: unable to optimize due to type uncertainty: The first argument is a (VECTOR DOUBLE-FLOAT), not a SIMPLE-ARRAY. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/matrix-operations.lisp ; in: DEFUN ORTHONORMALIZE-MATRIX! ; (SQRT CL-QUIL::N^2) ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a SINGLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a DOUBLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX DOUBLE-FLOAT) &OPTIONAL). ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (LOOP :FOR CL-QUIL::I :BELOW CL-QUIL::NROWS ; :SUM (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; --> LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:SUM17 ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; (/ (MAGICL:TREF CL-QUIL::M CL-QUIL::ROW CL-QUIL::COL) CL-QUIL::NORM) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; etc. ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (DECF (MAGICL:TREF CL-QUIL::V CL-QUIL::ROW CL-QUIL::K) ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J))) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/define-compiler.lisp ; in: DEFUN FIND-SHORTEST-COMPILER-PATH ; (DEFUN CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET CL-QUIL::OCCURRENCE-TABLE ; &OPTIONAL CL-QUIL::QUBIT-COUNT) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {120E30343F}> ; (LET ((CL-QUIL.FRONTEND:QUEUE ; (MAKE-INSTANCE 'CL-HEAP:PRIORITY-QUEUE :SORT-FUN #))) ; (FLET ((CL-QUIL::COLLECT-BINDINGS # ; #)) ; (LOOP :WITH CL-QUIL::VISITED-NODES := NIL ; :FOR (CL-QUIL::TASK . CL-QUIL::HISTORY) := (LIST ; CL-QUIL::OCCURRENCE-TABLE) :THEN (CL-HEAP:DEQUEUE ; CL-QUIL.FRONTEND:QUEUE) ; :UNLESS ...)))) ; ==> ; (SB-IMPL::%DEFUN 'CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (SB-INT:NAMED-LAMBDA CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET ; CL-QUIL::OCCURRENCE-TABLE &OPTIONAL ; CL-QUIL::QUBIT-COUNT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {120E30343F}> ; (BLOCK CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (LET (#) ; (FLET # ; #))))) ; ; caught STYLE-WARNING: ; Call to CL-HEAP:DEQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to CL-HEAP:ENQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "define-compiler"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compiler-hook.lisp ; in: DEFUN COMPILER-HOOK ; (DEFUN CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION ; &KEY (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {122A795BEF}> ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COPY-INSTANCE ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (WHEN ; (AND (NOT (EQL ':NAIVE CL-QUIL::REWIRING-TYPE)) ; (> ; (CL-QUIL.FRONTEND:QUBITS-NEEDED CL-QUIL.FRONTEND:PARSED-PROGRAM) ; (LENGTH #)) ; (NOT ; (CL-QUIL.FRONTEND:PARSED-PROGRAM-HAS-PRESERVE-BLOCKS-P ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COMPRESS-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Applying transform ~A." ; CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:TRANSFORM CL-QUIL::XFORM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ...) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION &KEY ; (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {122A795BEF}> ; (BLOCK CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (WHEN (AND (NOT #) (> # #) (NOT #)) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE ; "COMPILER-HOOK: Applying transform ~A." CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; (MULTIPLE-VALUE-BIND ; (CL-QUIL::INITIAL-REWIRING CL-QUIL::L2P-COMPONENTS) ; (CL-QUIL::PROG-INITIAL-REWIRING CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION :TYPE CL-QUIL::REWIRING-TYPE) ; (LET* (# # # #) ; (CL-QUIL::CHECK-PRESERVED-BLOCKS-SKIP-DEAD-QUBITS CL-QUIL::CFG ; CL-QUIL::CHIP-SPECIFICATION) ; (LET # ; #) ; (WHEN CL-QUIL::PROTOQUIL #) ; (LABELS # ; # ; # ; #))))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ; caught STYLE-WARNING: ; The variable *ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "compiler-hook"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/chip/chip-specification.lisp ; in: DEFSTRUCT CHIP-SPECIFICATION ; (DEFSTRUCT CL-QUIL::CHIP-SPECIFICATION ; #<(SIMPLE-ARRAY CHARACTER ; (957)) Houses information about hardware components on a QPU. ; ; OBJECTS is an array. In its nth position, there is a vector of order n hardware objects on the chip. ; ; GENERIC-COMPILERS is a vector of functions... {122B21AEBF}> ; (CL-QUIL::OBJECTS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR))) ; :TYPE VECTOR) ; (CL-QUIL::GENERIC-COMPILERS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE VECTOR) ; (CL-QUIL::GENERIC-REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE ; VECTOR) ; (CL-QUIL::LOOKUP-CACHE NIL :TYPE (OR NULL HASH-TABLE))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::CHIP-SPECIFICATION {122B1D4FD3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::CHIP-SPECIFICATION-GENERIC-COMPILERS could not be inlined because the structure definition for CL-QUIL::CHIP-SPECIFICATION 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 GATE-RECORD ; (DEFSTRUCT (CL-QUIL::GATE-RECORD (:COPIER NIL)) ; "Houses information about a hardware instantiation of a gate. ; ; FIDELITY stores the measured gate fidelity. ; ; DURATION stores the measured gate duration (in nanoseconds)." ; (CL-QUIL::FIDELITY CL-QUIL::+NEAR-PERFECT-FIDELITY+ :TYPE (OR NULL REAL)) ; (CL-QUIL::DURATION 1/100 :TYPE (OR NULL REAL))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::GATE-RECORD {122B9343F3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::GATE-RECORD-FIDELITY and CL-QUIL::GATE-RECORD-DURATION could not be inlined because the structure definition for CL-QUIL::GATE-RECORD 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 HARDWARE-OBJECT ; (DEFSTRUCT CL-QUIL::HARDWARE-OBJECT ; #<(SIMPLE-ARRAY CHARACTER ; (1556)) Houses information about a particular hardware object on a QPU. ; ; ORDER is a non-negative integer that counts the number of qubit subsidiaries of this hardware object. Equals (1- (length (vnth 0 (hardw... {122BBA000F}> ; (CL-QUIL::ORDER 0 :TYPE UNSIGNED-BYTE :READ-ONLY T) ; (CL-QUIL::GATE-INFORMATION (MAKE-HASH-TABLE :TEST #'EQUALP)) ; (CL-QUIL::COMPILATION-METHODS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::PERMUTATION-GATES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::CXNS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)))) ; (CL-QUIL::MISC-DATA (MAKE-HASH-TABLE :TEST #'EQUAL) :TYPE HASH-TABLE)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::HARDWARE-OBJECT {122BB3EF23}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::HARDWARE-OBJECT-COMPILATION-METHODS and CL-QUIL::HARDWARE-OBJECT-CXNS could not be inlined because the structure definition for CL-QUIL::HARDWARE-OBJECT 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-quil" "chip" "chip-specification"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/compressor.lisp ; in: DEFSTRUCT PEEPHOLE-REWRITER-NODE ; (DEFSTRUCT CL-QUIL::PEEPHOLE-REWRITER-NODE ; "A node housing an instruction and attendant metadata used during peephole rewriting. Essentially a doubly-linked list." ; (CL-QUIL::INSTR NIL :TYPE CL-QUIL.FRONTEND:APPLICATION) ; (CL-QUIL::PREV NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::NEXT NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::CONTEXT NIL)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::PEEPHOLE-REWRITER-NODE {1239977513}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::PEEPHOLE-REWRITER-NODE-INSTR and CL-QUIL::PEEPHOLE-REWRITER-NODE-NEXT could not be inlined because the structure definition for CL-QUIL::PEEPHOLE-REWRITER-NODE 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-quil" "compressor" "compressor"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/wavefunctions.lisp ; in: DEFSTRUCT ANTISOCIAL-QVM ; (DEFSTRUCT CL-QUIL::ANTISOCIAL-QVM ; #<(SIMPLE-ARRAY CHARACTER ; (658)) ANTISOCIAL-QVM instances represent partially-tracked low-correlation wavefunctions. ; ; WFS is a vector. The jth entry points to the wavefunction component in which the jth external qubit lies. ; ; INTERNAL... {123B1CC6AF}> ; (CL-QUIL::WFS #()) ; (CL-QUIL::INTERNAL-INDICES #())) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::ANTISOCIAL-QVM {123B1AB553}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::ANTISOCIAL-QVM-WFS could not be inlined because the structure definition for CL-QUIL::ANTISOCIAL-QVM 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-quil" "compressor" "wavefunctions"> WARNING: redefining TRIVIAL-BENCHMARK:RUNNING in DEFGENERIC WARNING: redefining TRIVIAL-BENCHMARK:METRICS in DEFGENERIC WARNING: redefining TRIVIAL-BENCHMARK:STARTING-VALUE in DEFGENERIC ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/utilities.lisp ; in: DEFUN WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::RE) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::IM) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::RE) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::IM) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; in: DEFUN WRITE-DOUBLE-FLOAT-AS-BINARY ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::X) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/handle-request.lisp ; in: DEFUN HANDLE-POST-REQUEST ; (QVM-APP::WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY QVM-APP::Z ; QVM-APP::REPLY-STREAM) ; --> BLOCK LET LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (QVM-APP::WRITE-DOUBLE-FLOAT-AS-BINARY QVM-APP::X QVM-APP::REPLY-STREAM) ; --> BLOCK LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (QVM-APP::WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY QVM-APP::Z ; QVM-APP::REPLY-STREAM) ; --> BLOCK LET LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; ; note: doing float to pointer coercion (cost 13) ; ; caught ERROR: ; READ error during COMPILE-FILE: Symbol "*USE-DEDICATED-OUTPUT-STREAM*" not found in the SWANK package. Line: 9, Column: 43, File-Position: 166 Stream: #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/entry-point.lisp" {1212090ED3}> Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=3530381 "main thread" RUNNING {123FDA0093}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "qvm-app" "entry-point"> Backtrace for: #<SB-THREAD:THREAD tid=3530381 "main thread" RUNNING {123FDA0093}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12120A2023}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12120A2023}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12120A2023}>) 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 "qvm-app" "entry-point">))) 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 "qvm-app" "entry-point">))) 5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "qvm-app" "entry-point">) 6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "qvm-app" "entry-point">) [fast-method] 8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {120454E1C3}>) [fast-method] 9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {120454E1C3}>) [fast-method] 11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "quilc"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "quilc">) 13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "quilc">) [fast-method] 15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "quilc") 16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "quilc") [fast-method] 18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120456515B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {12045240CB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "quilc") [fast-method] 22: (DEPCHECK::COMPUTE-DEPENDENCIES "quilc" "quilc") 23: (DEPCHECK::MAGIC "quilc" "quilc" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-LYr39yun/depcheck-win.txt") 24: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "quilc" "quilc" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-LYr39yun/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-LYr39yun/depcheck-fail.txt")) 25: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 26: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 27: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 28: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition ; caught 16 STYLE-WARNING conditions ; printed 62 notes
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: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-compat". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-test". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-examples". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/fiasco/25c6341ba51ec6b1c07a4ed18827f480f8e3fa89/fiasco-20250717-git/fiasco.asd" contains definition for system "fiasco-self-tests". Please only define "fiasco" and secondary systems with a name starting with "fiasco/" (e.g. "fiasco/test") in that file. WARNING: redefining MAGICL::SVD-LISP in DEFUN WARNING: redefining MAGICL:SCALE! in DEFUN WARNING: redefining MAGICL:.+ in DEFUN WARNING: redefining MAGICL:.- in DEFUN WARNING: redefining MAGICL:.* in DEFUN WARNING: redefining MAGICL:./ in DEFUN WARNING: redefining MAGICL:MULT in DEFUN WARNING: redefining MAGICL:EIG in DEFUN WARNING: redefining MAGICL:HERMITIAN-EIG in DEFUN WARNING: redefining MAGICL:LU in DEFUN WARNING: redefining MAGICL:LU-SOLVE in DEFUN WARNING: redefining MAGICL:INV in DEFUN WARNING: redefining MAGICL:CSD-BLOCKS in DEFUN WARNING: redefining MAGICL:SVD in DEFUN WARNING: redefining MAGICL:SCHUR in DEFUN WARNING: redefining MAGICL:QZ in DEFUN WARNING: redefining MAGICL:QL in DEFUN WARNING: redefining MAGICL:QR in DEFUN WARNING: redefining MAGICL:RQ in DEFUN WARNING: redefining MAGICL:LQ in DEFUN ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/ast.lisp ; in: DEFSTRUCT DELAYED-EXPRESSION ; (DEFSTRUCT ; (CL-QUIL.FRONTEND:DELAYED-EXPRESSION ; (:CONSTRUCTOR CL-QUIL.FRONTEND::%DELAYED-EXPRESSION)) ; #<(SIMPLE-ARRAY CHARACTER ; (335)) A representation of an arithmetic expression with fillable "slots". ; ; PARAMS is a list of values to fill the slots with. These can be formal variables, but eventually must be a list of CONSTANTs. ; ; LAMB... {1218802FCF}> ; (CL-QUIL.FRONTEND::PARAMS NIL) ; (CL-QUIL.FRONTEND::LAMBDA-PARAMS NIL :READ-ONLY T) ; (CL-QUIL.FRONTEND::EXPRESSION NIL :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:DELAYED-EXPRESSION {12187A4FC3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL.FRONTEND:DELAYED-EXPRESSION-EXPRESSION could not be inlined because the structure definition for CL-QUIL.FRONTEND:DELAYED-EXPRESSION 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 PAULI-TERM ; (DEFSTRUCT (CL-QUIL.FRONTEND:PAULI-TERM) ; #<(SIMPLE-ARRAY CHARACTER ; (642)) Records a word of Pauli operators, together with an ordered list of qubit formals on which they act, as well as a scalar prefix. This is part of the internal representation of a EXP-PAULI-SUM-GATE-DE... {12194F734F}> ; CL-QUIL.FRONTEND::PAULI-WORD ; CL-QUIL.FRONTEND::PREFACTOR ; CL-QUIL.FRONTEND::ARGUMENTS) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:PAULI-TERM {12194574A3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL.FRONTEND:PAULI-TERM-PAULI-WORD, CL-QUIL.FRONTEND:PAULI-TERM-PREFACTOR and CL-QUIL.FRONTEND:PAULI-TERM-ARGUMENTS could not be inlined because the structure definition for CL-QUIL.FRONTEND:PAULI-TERM 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. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/ast.lisp ; in: DEFUN EXPAND-CLASSICAL-INSTRUCTION-DEFINITIONS ; (LOOP :FOR CL-QUIL.FRONTEND::TYPE-TUPLE :IN CL-QUIL.FRONTEND::TYPES ; :FOR CL-QUIL.FRONTEND::TYPED-NAME := (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE) ; :DO (ASSERT ; (AND ; (= CL-QUIL.FRONTEND::NUM-ARGS ; (LENGTH CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (EVERY #'CL-QUIL.FRONTEND::VALID-TYPE-SYMBOL-P ; CL-QUIL.FRONTEND::TYPE-TUPLE))) ; :COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD ; ==> ; (LET* ((#:HEAD11 (SB-KERNEL:UNALIGNED-DX-CONS NIL)) ; (#:TAIL12 #:HEAD11) ; (CL-QUIL.FRONTEND::TYPED-NAMES NIL)) ; (DECLARE (DYNAMIC-EXTENT #:HEAD11) ; (SB-C::NO-DEBUG #:HEAD11 #:TAIL12) ; (LIST CL-QUIL.FRONTEND::TYPED-NAMES)) ; (SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD (#S(SB-LOOP::LOOP-COLLECTOR ; :NAME NIL ; :CLASS LIST ; :HISTORY (APPEND) ; :TEMPVARS (#:HEAD13 #:TAIL14) ; :SPECIFIED-TYPE NIL ; :DTYPE LIST ; :DATA NIL) ; #:HEAD13 #:TAIL14) ; (TAGBODY ; SB-LOOP::NEXT-LOOP ; (WHEN (ENDP #:L10) (GO SB-LOOP::END-LOOP)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPE-TUPLE (CAR #:L10)) ; (SB-LOOP::LOOP-DESETQ #:L10 (CDR #:L10)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPED-NAME ; (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (ASSERT (AND # #)) ; (SB-LOOP::LOOP-COLLECT-RPLACD ; (#:HEAD11 #:TAIL12 CL-QUIL.FRONTEND::TYPED-NAMES) ; (LIST CL-QUIL.FRONTEND::TYPED-NAME)) ; (SB-LOOP::LOOP-COLLECT-RPLACD (#:HEAD13 #:TAIL14) (LIST `# `# `# `#)) ; (GO SB-LOOP::NEXT-LOOP) ; SB-LOOP::END-LOOP ; (RETURN-FROM NIL (SB-LOOP::LOOP-COLLECT-ANSWER #:HEAD13))))) ; ; caught STYLE-WARNING: ; The variable TYPED-NAMES is assigned but never read. ; in: DEFUN EXPAND-CLASSICAL-INSTRUCTION-DEFINITIONS ; (LOOP :FOR CL-QUIL.FRONTEND::TYPE-TUPLE :IN CL-QUIL.FRONTEND::TYPES ; :FOR CL-QUIL.FRONTEND::TYPED-NAME := (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE) ; :DO (ASSERT ; (AND ; (= CL-QUIL.FRONTEND::NUM-ARGS ; (LENGTH CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (EVERY #'CL-QUIL.FRONTEND::VALID-TYPE-SYMBOL-P ; CL-QUIL.FRONTEND::TYPE-TUPLE))) ; :COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD ; ==> ; (LET* ((#:HEAD79 (SB-KERNEL:UNALIGNED-DX-CONS NIL)) ; (#:TAIL80 #:HEAD79) ; (CL-QUIL.FRONTEND::TYPED-NAMES NIL)) ; (DECLARE (DYNAMIC-EXTENT #:HEAD79) ; (SB-C::NO-DEBUG #:HEAD79 #:TAIL80) ; (LIST CL-QUIL.FRONTEND::TYPED-NAMES)) ; (SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD (#S(SB-LOOP::LOOP-COLLECTOR ; :NAME NIL ; :CLASS LIST ; :HISTORY (APPEND) ; :TEMPVARS (#:HEAD81 #:TAIL82) ; :SPECIFIED-TYPE NIL ; :DTYPE LIST ; :DATA NIL) ; #:HEAD81 #:TAIL82) ; (TAGBODY ; SB-LOOP::NEXT-LOOP ; (WHEN (ENDP #:L78) (GO SB-LOOP::END-LOOP)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPE-TUPLE (CAR #:L78)) ; (SB-LOOP::LOOP-DESETQ #:L78 (CDR #:L78)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPED-NAME ; (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (ASSERT (AND # #)) ; (SB-LOOP::LOOP-COLLECT-RPLACD ; (#:HEAD79 #:TAIL80 CL-QUIL.FRONTEND::TYPED-NAMES) ; (LIST CL-QUIL.FRONTEND::TYPED-NAME)) ; (SB-LOOP::LOOP-COLLECT-RPLACD (#:HEAD81 #:TAIL82) (LIST `# `# `# `#)) ; (GO SB-LOOP::NEXT-LOOP) ; SB-LOOP::END-LOOP ; (RETURN-FROM NIL (SB-LOOP::LOOP-COLLECT-ANSWER #:HEAD81))))) ; ; caught STYLE-WARNING: ; The variable TYPED-NAMES is assigned but never read. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil/frontend" "ast"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/parser.lisp ; in: DEFSTRUCT TOKEN ; (DEFSTRUCT ; (CL-QUIL.FRONTEND:TOKEN ; (:CONSTRUCTOR CL-QUIL.FRONTEND:TOK ; (TYPE &OPTIONAL CL-QUIL.FRONTEND::PAYLOAD ; (CL-QUIL.FRONTEND::LINE CL-QUIL.FRONTEND::*LINE-NUMBER*) ; (PATHNAME CL-QUIL.FRONTEND::*CURRENT-FILE*)))) ; "A lexical token." ; (CL-QUIL.FRONTEND::LINE NIL :TYPE (OR NULL (INTEGER 1)) :READ-ONLY T) ; (PATHNAME NIL :TYPE (OR NULL STRING PATHNAME) :READ-ONLY T) ; (TYPE NIL :TYPE SYMBOL :READ-ONLY T) ; (CL-QUIL.FRONTEND::PAYLOAD NIL :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:TOKEN {122A9C4BD3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL.FRONTEND:TOKEN-TYPE and CL-QUIL.FRONTEND:TOKEN-PAYLOAD could not be inlined because the structure definition for CL-QUIL.FRONTEND:TOKEN 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-quil/frontend" "parser"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/clifford/stabilizer.lisp ; in: ; DECLAIM (INLINE TABLEAU-QUBITS TABLEAU-X (SETF TABLEAU-X) TABLEAU-Z (SETF TABLEAU-Z) TABLEAU-R (SETF TABLEAU-R) TABLEAU-SCRATCH (SETF TABLEAU-SCRATCH)) ; (DECLAIM ; (INLINE CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TABLEAU-X ; (SETF CL-QUIL.CLIFFORD::TABLEAU-X) CL-QUIL.CLIFFORD::TABLEAU-Z ; (SETF CL-QUIL.CLIFFORD::TABLEAU-Z) CL-QUIL.CLIFFORD::TABLEAU-R ; (SETF CL-QUIL.CLIFFORD::TABLEAU-R) CL-QUIL.CLIFFORD::TABLEAU-SCRATCH ; (SETF CL-QUIL.CLIFFORD::TABLEAU-SCRATCH))) ; ==> ; (SB-C::%PROCLAIM ; '(INLINE CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TABLEAU-X ; (SETF CL-QUIL.CLIFFORD::TABLEAU-X) CL-QUIL.CLIFFORD::TABLEAU-Z ; (SETF CL-QUIL.CLIFFORD::TABLEAU-Z) CL-QUIL.CLIFFORD::TABLEAU-R ; (SETF CL-QUIL.CLIFFORD::TABLEAU-R) CL-QUIL.CLIFFORD::TABLEAU-SCRATCH ; (SETF CL-QUIL.CLIFFORD::TABLEAU-SCRATCH)) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Proclaiming CL-QUIL.CLIFFORD::TABLEAU-QUBITS to be INLINE, but 1 call to it was previously compiled. A declaration of NOTINLINE at the call site will eliminate this warning, as will proclaiming and defining the function before its first potential use. ; in: DEFUN TABLEAU-MEASURE ; (DEFUN CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (CL-QUIL.CLIFFORD::TAB CL-QUIL.CLIFFORD::Q) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0)) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU CL-QUIL.CLIFFORD::TAB) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX CL-QUIL.CLIFFORD::Q)) ; (LET* ((CL-QUIL.CLIFFORD::N ; (CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TAB)) ; (CL-QUIL.CLIFFORD::P ; (LOOP :FOR CL-QUIL.CLIFFORD::P :BELOW CL-QUIL.CLIFFORD::N ; :WHEN # ; :DO # ; :FINALLY #))) ; (DECLARE ; (TYPE (OR CL-QUIL.CLIFFORD::TABLEAU-INDEX NULL) CL-QUIL.CLIFFORD::P) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX CL-QUIL.CLIFFORD::N)) ; (COND ; (CL-QUIL.CLIFFORD::P ; (CL-QUIL.CLIFFORD::TABLEAU-COPY-ROW CL-QUIL.CLIFFORD::TAB ; CL-QUIL.CLIFFORD::P #) ; (CL-QUIL.CLIFFORD::TABLEAU-SET-ROW-TO-PAULI CL-QUIL.CLIFFORD::TAB # #) ; (SETF #) (DOTIMES # #) (VALUES # NIL)) ; (T (CL-QUIL.CLIFFORD::TABLEAU-CLEAR-SCRATCH CL-QUIL.CLIFFORD::TAB) ; (LET # ; # ; # ; #))))) ; ==> ; (SB-IMPL::%DEFUN 'CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (SB-INT:NAMED-LAMBDA CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (CL-QUIL.CLIFFORD::TAB CL-QUIL.CLIFFORD::Q) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) ; (COMPILATION-SPEED 0)) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU CL-QUIL.CLIFFORD::TAB) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX ; CL-QUIL.CLIFFORD::Q)) ; (BLOCK CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (LET* (# #) ; (DECLARE # ; #) ; (COND # #))))) ; ; caught STYLE-WARNING: ; Call to CL-QUIL.CLIFFORD::TABLEAU-COPY-ROW could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil/frontend" "clifford" "stabilizer"> WARNING: redefining CL-QUIL.FRONTEND::PRINT-PARSED-PROGRAM-GENERIC in DEFGENERIC ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/linear-algebra.lisp ; in: DEFUN-INLINABLE PSUM ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; (QVM:PSUM-DOTIMES (QVM::I (LENGTH QVM::STATE)) ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/wavefunction.lisp ; in: DEFUN PROBABILITY ; (DEFUN QVM:PROBABILITY (QVM::AMPLITUDE) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (LET ((QVM::RE (REALPART QVM::AMPLITUDE)) ; (QVM::IM (IMAGPART QVM::AMPLITUDE))) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM)))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM:PROBABILITY ; (QVM::AMPLITUDE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (BLOCK QVM:PROBABILITY ; (LET ((QVM::RE #) (QVM::IM #)) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM))))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-GROUND-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INJECT-BIT QVM::I QVM::QUBIT))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-EXCITED-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INDEX-TO-ADDRESS QVM::I QVM::QUBIT 1))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE APPLY-MATRIX-OPERATOR ; (APPLY QVM::KERNEL QVM::MATRIX QVM::WAVEFUNCTION (COERCE QVM::QUBITS 'LIST)) ; ; note: unable to optimize away possible call to FDEFINITION at runtime because: KERNEL is not known to be a function ; in: DEFUN-INLINABLE %SERIAL-NORM ; (QVM:DEFUN-INLINABLE QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK QVM::%SERIAL-NORM ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE NORM ; (QVM:DEFUN-INLINABLE QVM::NORM ; (QVM::WAVEFUNCTION) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT ; (THE (QVM:FLONUM 0) (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION))) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION))) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (BLOCK QVM::NORM ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT (THE # #)) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION)))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION) ; --> BLOCK QVM:PSUM-DOTIMES LET IF FLET ; ==> ; (#:WORKER-FUNCTION8 (#:START4 #:END5) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START4) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END5)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM3 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM3 to "<return value>" ; in: DEFUN NORMALIZE-WAVEFUNCTION ; (QVM:FLONUM LENGTH) ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; (QVM:PDOTIMES (QVM::I (LENGTH QVM::WAVEFUNCTION) QVM::WAVEFUNCTION) ; (SETF (AREF QVM::WAVEFUNCTION QVM::I) ; (* QVM::INV-NORM (AREF QVM::WAVEFUNCTION QVM::I)))) ; --> IF LPARALLEL.COGNATE:PDOTIMES LET PROGN LPARALLEL.COGNATE::%PDOTIMES ; --> LAMBDA ; ==> ; #'(LAMBDA (QVM::I) ; (TAGBODY (SETF (AREF QVM::WAVEFUNCTION QVM::I) (* QVM::INV-NORM #)))) ; ; note: doing float to pointer coercion (cost 13), for: ; the second argument of CLOSURE-INIT ; (QVM::NORM QVM::WAVEFUNCTION) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM16 to "<return value>" ; in: DEFUN WF ; (QVM:CFLONUM ELT) ; --> BLOCK COERCE ; ==> ; 1 ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; in: DEFUN GAUSSIAN-RANDOM-COMPLEX ; (DEFUN QVM::GAUSSIAN-RANDOM-COMPLEX () ; "Return a complex number with Gaussian-random real and imaginary parts." ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::GAUSSIAN-RANDOM-COMPLEX ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Return a complex number with Gaussian-random real and imaginary parts." ; (BLOCK QVM::GAUSSIAN-RANDOM-COMPLEX ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM)))) ; ; note: doing complex float to pointer coercion (cost 13) to "<return value>" ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/compile-gate.lisp ; in: DEFUN GENERATE-INNER-MATRIX-MULTIPLY-CODE ; (LOOP :FOR QVM::J :BELOW QVM::N ; :FOR QVM::C := (NTH QVM::J QVM::COLUMN) ; :FOR QVM::MIJ := ...) ; --> LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ ; ==> ; (SETQ QVM::MIJ (AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13) to MIJ ; `(* ,QVM::C ,(AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13), for: ; the third argument of LIST ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/measurement.lisp ; in: DEFMETHOD FORCE-MEASUREMENT (T T PURE-STATE T) ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: unable to optimize due to type uncertainty: The result is a (VALUES (OR (COMPLEX DOUBLE-FLOAT) (DOUBLE-FLOAT 0.0d0 1.0d0)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (/ (SQRT QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13), for: ; the first result of inline float arithmetic ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13) ; in: DEFGENERIC GET-EXCITED-STATE-PROBABILITY ; (AREF QVM::RHO QVM::I QVM::I) ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; (REALPART (AREF QVM::RHO QVM::I QVM::I)) ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (QVM:PSUM-DOTIMES (QVM::K (EXPT 2 (1- (QVM::NUM-QUBITS QVM::STATE)))) ; (LET ((QVM::I (QVM::INDEX-TO-ADDRESS QVM::K QVM::QUBIT 1))) ; (REALPART (AREF QVM::RHO QVM::I QVM::I)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM20 ; ; note: doing float to pointer coercion (cost 13) from #:SUM20 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION-IN-PARALLEL-TRULY ; (QVM:PSUM-DOTIMES (QVM::I ; (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM (- QVM::MID MIN))) ; (LET ((QVM::I (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM #))) ; (QVM:PROBABILITY (AREF QVM:WF QVM::I)))) ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION12 (#:START8 #:END9) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START8) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END9)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM7 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM7 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-MULTIPLE-TIMES ; (MT19937:RANDOM 1.0d0) ; --> BLOCK LET* - SCALE-FLOAT FLOAT ; ==> ; (+ (EXPT 2 52) MT19937::RANDOM-MANTISSA-BITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline float coercion (cost 5) because: ; The first argument is a (INTEGER 4611686018427387904), not a (SIGNED-BYTE 64). ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION ; (AREF QVM::PS QVM::I) ; ; note: unable to optimize due to type uncertainty: The first argument is a (VECTOR DOUBLE-FLOAT), not a SIMPLE-ARRAY. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/matrix-operations.lisp ; in: DEFUN ORTHONORMALIZE-MATRIX! ; (SQRT CL-QUIL::N^2) ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a SINGLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a DOUBLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX DOUBLE-FLOAT) &OPTIONAL). ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (LOOP :FOR CL-QUIL::I :BELOW CL-QUIL::NROWS ; :SUM (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; --> LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:SUM17 ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; (/ (MAGICL:TREF CL-QUIL::M CL-QUIL::ROW CL-QUIL::COL) CL-QUIL::NORM) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; etc. ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (DECF (MAGICL:TREF CL-QUIL::V CL-QUIL::ROW CL-QUIL::K) ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J))) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/define-compiler.lisp ; in: DEFUN FIND-SHORTEST-COMPILER-PATH ; (DEFUN CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET CL-QUIL::OCCURRENCE-TABLE ; &OPTIONAL CL-QUIL::QUBIT-COUNT) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {120E4B343F}> ; (LET ((CL-QUIL.FRONTEND:QUEUE ; (MAKE-INSTANCE 'CL-HEAP:PRIORITY-QUEUE :SORT-FUN #))) ; (FLET ((CL-QUIL::COLLECT-BINDINGS # ; #)) ; (LOOP :WITH CL-QUIL::VISITED-NODES := NIL ; :FOR (CL-QUIL::TASK . CL-QUIL::HISTORY) := (LIST ; CL-QUIL::OCCURRENCE-TABLE) :THEN (CL-HEAP:DEQUEUE ; CL-QUIL.FRONTEND:QUEUE) ; :UNLESS ...)))) ; ==> ; (SB-IMPL::%DEFUN 'CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (SB-INT:NAMED-LAMBDA CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET ; CL-QUIL::OCCURRENCE-TABLE &OPTIONAL ; CL-QUIL::QUBIT-COUNT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {120E4B343F}> ; (BLOCK CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (LET (#) ; (FLET # ; #))))) ; ; caught STYLE-WARNING: ; Call to CL-HEAP:DEQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to CL-HEAP:ENQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "define-compiler"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compiler-hook.lisp ; in: DEFUN COMPILER-HOOK ; (DEFUN CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION ; &KEY (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {122A945BEF}> ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COPY-INSTANCE ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (WHEN ; (AND (NOT (EQL ':NAIVE CL-QUIL::REWIRING-TYPE)) ; (> ; (CL-QUIL.FRONTEND:QUBITS-NEEDED CL-QUIL.FRONTEND:PARSED-PROGRAM) ; (LENGTH #)) ; (NOT ; (CL-QUIL.FRONTEND:PARSED-PROGRAM-HAS-PRESERVE-BLOCKS-P ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COMPRESS-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Applying transform ~A." ; CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:TRANSFORM CL-QUIL::XFORM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ...) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION &KEY ; (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {122A945BEF}> ; (BLOCK CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (WHEN (AND (NOT #) (> # #) (NOT #)) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE ; "COMPILER-HOOK: Applying transform ~A." CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; (MULTIPLE-VALUE-BIND ; (CL-QUIL::INITIAL-REWIRING CL-QUIL::L2P-COMPONENTS) ; (CL-QUIL::PROG-INITIAL-REWIRING CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION :TYPE CL-QUIL::REWIRING-TYPE) ; (LET* (# # # #) ; (CL-QUIL::CHECK-PRESERVED-BLOCKS-SKIP-DEAD-QUBITS CL-QUIL::CFG ; CL-QUIL::CHIP-SPECIFICATION) ; (LET # ; #) ; (WHEN CL-QUIL::PROTOQUIL #) ; (LABELS # ; # ; # ; #))))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ; caught STYLE-WARNING: ; The variable *ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "compiler-hook"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/chip/chip-specification.lisp ; in: DEFSTRUCT CHIP-SPECIFICATION ; (DEFSTRUCT CL-QUIL::CHIP-SPECIFICATION ; #<(SIMPLE-ARRAY CHARACTER ; (957)) Houses information about hardware components on a QPU. ; ; OBJECTS is an array. In its nth position, there is a vector of order n hardware objects on the chip. ; ; GENERIC-COMPILERS is a vector of functions... {122B3CAEBF}> ; (CL-QUIL::OBJECTS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR))) ; :TYPE VECTOR) ; (CL-QUIL::GENERIC-COMPILERS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE VECTOR) ; (CL-QUIL::GENERIC-REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE ; VECTOR) ; (CL-QUIL::LOOKUP-CACHE NIL :TYPE (OR NULL HASH-TABLE))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::CHIP-SPECIFICATION {122B38C2F3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::CHIP-SPECIFICATION-GENERIC-COMPILERS could not be inlined because the structure definition for CL-QUIL::CHIP-SPECIFICATION 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 GATE-RECORD ; (DEFSTRUCT (CL-QUIL::GATE-RECORD (:COPIER NIL)) ; "Houses information about a hardware instantiation of a gate. ; ; FIDELITY stores the measured gate fidelity. ; ; DURATION stores the measured gate duration (in nanoseconds)." ; (CL-QUIL::FIDELITY CL-QUIL::+NEAR-PERFECT-FIDELITY+ :TYPE (OR NULL REAL)) ; (CL-QUIL::DURATION 1/100 :TYPE (OR NULL REAL))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::GATE-RECORD {122BAD43C3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::GATE-RECORD-FIDELITY and CL-QUIL::GATE-RECORD-DURATION could not be inlined because the structure definition for CL-QUIL::GATE-RECORD 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 HARDWARE-OBJECT ; (DEFSTRUCT CL-QUIL::HARDWARE-OBJECT ; #<(SIMPLE-ARRAY CHARACTER ; (1556)) Houses information about a particular hardware object on a QPU. ; ; ORDER is a non-negative integer that counts the number of qubit subsidiaries of this hardware object. Equals (1- (length (vnth 0 (hardw... {122BD4E0CF}> ; (CL-QUIL::ORDER 0 :TYPE UNSIGNED-BYTE :READ-ONLY T) ; (CL-QUIL::GATE-INFORMATION (MAKE-HASH-TABLE :TEST #'EQUALP)) ; (CL-QUIL::COMPILATION-METHODS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::PERMUTATION-GATES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::CXNS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)))) ; (CL-QUIL::MISC-DATA (MAKE-HASH-TABLE :TEST #'EQUAL) :TYPE HASH-TABLE)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::HARDWARE-OBJECT {122BCEEDF3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::HARDWARE-OBJECT-COMPILATION-METHODS and CL-QUIL::HARDWARE-OBJECT-CXNS could not be inlined because the structure definition for CL-QUIL::HARDWARE-OBJECT 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-quil" "chip" "chip-specification"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/compressor.lisp ; in: DEFSTRUCT PEEPHOLE-REWRITER-NODE ; (DEFSTRUCT CL-QUIL::PEEPHOLE-REWRITER-NODE ; "A node housing an instruction and attendant metadata used during peephole rewriting. Essentially a doubly-linked list." ; (CL-QUIL::INSTR NIL :TYPE CL-QUIL.FRONTEND:APPLICATION) ; (CL-QUIL::PREV NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::NEXT NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::CONTEXT NIL)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::PEEPHOLE-REWRITER-NODE {1239B17543}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::PEEPHOLE-REWRITER-NODE-INSTR and CL-QUIL::PEEPHOLE-REWRITER-NODE-NEXT could not be inlined because the structure definition for CL-QUIL::PEEPHOLE-REWRITER-NODE 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-quil" "compressor" "compressor"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/wavefunctions.lisp ; in: DEFSTRUCT ANTISOCIAL-QVM ; (DEFSTRUCT CL-QUIL::ANTISOCIAL-QVM ; #<(SIMPLE-ARRAY CHARACTER ; (658)) ANTISOCIAL-QVM instances represent partially-tracked low-correlation wavefunctions. ; ; WFS is a vector. The jth entry points to the wavefunction component in which the jth external qubit lies. ; ; INTERNAL... {123B35D67F}> ; (CL-QUIL::WFS #()) ; (CL-QUIL::INTERNAL-INDICES #())) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::ANTISOCIAL-QVM {123B343403}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::ANTISOCIAL-QVM-WFS could not be inlined because the structure definition for CL-QUIL::ANTISOCIAL-QVM 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-quil" "compressor" "wavefunctions"> WARNING: redefining TRIVIAL-BENCHMARK:RUNNING in DEFGENERIC WARNING: redefining TRIVIAL-BENCHMARK:METRICS in DEFGENERIC WARNING: redefining TRIVIAL-BENCHMARK:STARTING-VALUE in DEFGENERIC ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/utilities.lisp ; in: DEFUN WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::RE) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::IM) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::RE) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::IM) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; in: DEFUN WRITE-DOUBLE-FLOAT-AS-BINARY ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::X) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/handle-request.lisp ; in: DEFUN HANDLE-POST-REQUEST ; (QVM-APP::WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY QVM-APP::Z ; QVM-APP::REPLY-STREAM) ; --> BLOCK LET LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (QVM-APP::WRITE-DOUBLE-FLOAT-AS-BINARY QVM-APP::X QVM-APP::REPLY-STREAM) ; --> BLOCK LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (QVM-APP::WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY QVM-APP::Z ; QVM-APP::REPLY-STREAM) ; --> BLOCK LET LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; ; note: doing float to pointer coercion (cost 13) ; ; caught ERROR: ; READ error during COMPILE-FILE: Symbol "*USE-DEDICATED-OUTPUT-STREAM*" not found in the SWANK package. Line: 9, Column: 43, File-Position: 166 Stream: #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/entry-point.lisp" {1212180003}> Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=3530361 "main thread" RUNNING {123FDB0093}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "qvm-app" "entry-point"> Backtrace for: #<SB-THREAD:THREAD tid=3530361 "main thread" RUNNING {123FDB0093}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12121991B3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12121991B3}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12121991B3}>) 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 "qvm-app" "entry-point">))) 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 "qvm-app" "entry-point">))) 5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "qvm-app" "entry-point">) 6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "qvm-app" "entry-point">) [fast-method] 8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A57C3}>) [fast-method] 9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A57C3}>) [fast-method] 11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "quilc-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "quilc-tests">) 13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "quilc-tests">) [fast-method] 15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "quilc-tests") 16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "quilc-tests") [fast-method] 18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {12045AF4CB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120456E44B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "quilc-tests") [fast-method] 22: (DEPCHECK::COMPUTE-DEPENDENCIES "quilc-tests" "quilc-tests") 23: (DEPCHECK::MAGIC "quilc-tests" "quilc-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-0T00anA0/depcheck-win.txt") 24: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "quilc-tests" "quilc-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-0T00anA0/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-0T00anA0/depcheck-fail.txt")) 25: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 26: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 27: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 28: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition ; caught 16 STYLE-WARNING conditions ; printed 62 notes
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: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-compat". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-test". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-examples". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. Unhandled ASDF/FIND-COMPONENT:MISSING-DEPENDENCY in thread #<SB-THREAD:THREAD tid=3530357 "main thread" RUNNING {1200F08003}>: Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc"> Backtrace for: #<SB-THREAD:THREAD tid=3530357 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc"> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc">) 2: (INVOKE-DEBUGGER Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc">) 3: (ERROR ASDF/FIND-COMPONENT:MISSING-DEPENDENCY :REQUIRED-BY #<ASDF/SYSTEM:SYSTEM "libquilc"> :REQUIRES #:SBCL-LIBRARIAN) 4: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<ASDF/SYSTEM:SYSTEM "libquilc"> #:SBCL-LIBRARIAN NIL) 5: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204576DAB}>) 6: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 7: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 8: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204554BB3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> T) 9: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204576C5B}>) 10: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 11: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 12: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204554BB3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> T) 13: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204572C3B}>) 14: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 15: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 16: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204554BB3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> T) 17: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204566B3B}>) 18: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 19: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 20: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204554BB3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> T) 21: ((LAMBDA NIL :IN ASDF/PLAN:MAKE-PLAN)) 22: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 23: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc">) 24: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 25: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc">) [fast-method] 26: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "libquilc") 27: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 28: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "libquilc") [fast-method] 29: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1204563BCB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 30: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 31: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1204522BCB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 32: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "libquilc") [fast-method] 33: (DEPCHECK::COMPUTE-DEPENDENCIES "libquilc" "libquilc") 34: (DEPCHECK::MAGIC "libquilc" "libquilc" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-ZUyFL1Bd/depcheck-win.txt") 35: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "libquilc" "libquilc" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-ZUyFL1Bd/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-ZUyFL1Bd/depcheck-fail.txt")) 36: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 37: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 38: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 39: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting
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: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-compat". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-test". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/pzmq/9a9a01e9695cdd71ca64e2cf3e56bfb5162f563c/pzmq-20250717-git/pzmq.asd" contains definition for system "pzmq-examples". Please only define "pzmq" and secondary systems with a name starting with "pzmq/" (e.g. "pzmq/test") in that file. Unhandled ASDF/FIND-COMPONENT:MISSING-DEPENDENCY in thread #<SB-THREAD:THREAD tid=3530353 "main thread" RUNNING {1200F08003}>: Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc"> Backtrace for: #<SB-THREAD:THREAD tid=3530353 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc"> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc">) 2: (INVOKE-DEBUGGER Component #:SBCL-LIBRARIAN not found, required by #<SYSTEM "libquilc">) 3: (ERROR ASDF/FIND-COMPONENT:MISSING-DEPENDENCY :REQUIRED-BY #<ASDF/SYSTEM:SYSTEM "libquilc"> :REQUIRES #:SBCL-LIBRARIAN) 4: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<ASDF/SYSTEM:SYSTEM "libquilc"> #:SBCL-LIBRARIAN NIL) 5: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120D7B79FB}>) 6: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 7: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 8: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> T) 9: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120D7B78DB}>) 10: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 11: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 12: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> T) 13: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120D7B77BB}>) 14: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 15: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 16: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc" "package"> T) 17: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120D7B769B}>) 18: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 19: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 20: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc"> T) 21: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "libquilc-tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12045C9FCB}>) 22: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 23: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 24: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "libquilc-tests"> T) 25: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc-tests" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12045C9E7B}>) 26: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 27: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 28: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc-tests" "package"> T) 29: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc-tests" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12045BDDFB}>) 30: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 31: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 32: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "libquilc-tests" "package"> T) 33: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc-tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12045B9D7B}>) 34: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 35: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 36: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {12045A5783}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc-tests"> T) 37: ((LAMBDA NIL :IN ASDF/PLAN:MAKE-PLAN)) 38: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 39: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc-tests">) 40: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 41: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "libquilc-tests">) [fast-method] 42: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "libquilc-tests") 43: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 44: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "libquilc-tests") [fast-method] 45: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {12045AF88B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 46: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 47: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120456E7CB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 48: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "libquilc-tests") [fast-method] 49: (DEPCHECK::COMPUTE-DEPENDENCIES "libquilc-tests" "libquilc-tests") 50: (DEPCHECK::MAGIC "libquilc-tests" "libquilc-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-nFNu6b4T/depcheck-win.txt") 51: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "libquilc-tests" "libquilc-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-nFNu6b4T/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-nFNu6b4T/depcheck-fail.txt")) 52: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 53: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 54: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 55: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/fiasco/25c6341ba51ec6b1c07a4ed18827f480f8e3fa89/fiasco-20250717-git/fiasco.asd" contains definition for system "fiasco-self-tests". Please only define "fiasco" and secondary systems with a name starting with "fiasco/" (e.g. "fiasco/test") in that file. WARNING: redefining CL-QUIL.MATCH::GATE-MATCHED-P in DEFGENERIC WARNING: redefining CL-QUIL.MATCH::GATES-COMMUTE-P in DEFGENERIC WARNING: redefining CL-QUIL.MATCH::EQUAL-GATE-OPERATION-P in DEFGENERIC WARNING: redefining CL-QUIL.MATCH::GATE-ACT-CONSEQUENTIALY-ON-QUBIT-P in DEFGENERIC Unhandled SB-INT:SIMPLE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=3530157 "main thread" RUNNING {1200F08003}>: Failed to find the TRUENAME of /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp: No such file or directory Backtrace for: #<SB-THREAD:THREAD tid=3530157 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<SB-INT:SIMPLE-FILE-ERROR "Failed to find the ~A of ~A" {120931F823}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<SB-INT:SIMPLE-FILE-ERROR "Failed to find the ~A of ~A" {120931F823}>) 2: (INVOKE-DEBUGGER #<SB-INT:SIMPLE-FILE-ERROR "Failed to find the ~A of ~A" {120931F823}>) 3: (ERROR SB-INT:SIMPLE-FILE-ERROR :PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp" :MESSAGE "No such file or directory" :FORMAT-CONTROL "Failed to find the ~A of ~A" :FORMAT-ARGUMENTS (:TRUENAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp")) 4: (SB-IMPL::FILE-PERROR #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp" 2 "Failed to find the ~A of ~A" :TRUENAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp") 5: (SB-IMPL::QUERY-FILE-SYSTEM #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp" :TRUENAME T) 6: (TRUENAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp") 7: (SB-C::VERIFY-SOURCE-FILE #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp") 8: (COMPILE-FILE #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp" :OUTPUT-FILE #P#<(SIMPLE-ARRAY CHARACTER (223)) /home/quicklisp/.cache/common-lisp/sbcl-2.5.5.114-85e41f89c-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match... {1209352A4F}> :VERBOSE NIL :PRINT NIL :EXTERNAL-FORMAT :UTF-8 :PROGRESS NIL :TRACE-FILE NIL :BLOCK-COMPILE NIL :ENTRY-POINTS NIL :EMIT-CFASL NIL) 9: (UIOP/UTILITY:CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN UIOP/LISP-BUILD:COMPILE-FILE*) {120931EE5B}> NIL) 10: (UIOP/PATHNAME:CALL-WITH-ENOUGH-PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp" NIL #<FUNCTION (LAMBDA (UIOP/LISP-BUILD::INPUT-FILE) :IN UIOP/LISP-BUILD:COMPILE-FILE*) {120931E92B}>) 11: (UIOP/LISP-BUILD:COMPILE-FILE* #P"/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match-tests.lisp" :OUTPUT-FILE #P#<(SIMPLE-ARRAY CHARACTER (211)) /home/quicklisp/.cache/common-lisp/sbcl-2.5.5.114-85e41f89c-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/match... {12093627EF}> :EXTERNAL-FORMAT :UTF-8 :WARNINGS-FILE NIL) 12: (ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "cl-quil/match-tests" "match-tests">) 13: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "cl-quil/match-tests" "match-tests">) 14: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 15: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "cl-quil/match-tests" "match-tests">) [fast-method] 16: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1204894EE3}>) [fast-method] 17: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 18: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1204894EE3}>) [fast-method] 19: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil/match-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 20: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil/match-tests">) 21: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 22: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil/match-tests">) [fast-method] 23: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "cl-quil/match-tests") 24: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 25: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "cl-quil/match-tests") [fast-method] 26: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {12048B0BAB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 27: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 28: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1204867B4B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 29: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "cl-quil/match-tests") [fast-method] 30: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil" "cl-quil/match-tests") 31: (DEPCHECK::MAGIC "cl-quil" "cl-quil/match-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-JSHEmRY7/depcheck-win.txt") 32: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil" "cl-quil/match-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-JSHEmRY7/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-JSHEmRY7/depcheck-fail.txt")) 33: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 34: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 35: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 36: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 1 fatal ERROR condition
; file: /home/quicklisp/quicklisp-controller/dist/build-cache/misc-extensions/12eccf4ed5de6ec2edd863b97523e80a367d9d61/misc-extensions-20250717-git/src/new-let.lisp ; in: DEFUN BCOND-CLAUSE ; (MISC-EXTENSIONS.NEW-LET:LET ((MISC-EXTENSIONS.NEW-LET::DECLS NIL) ; (MISC-EXTENSIONS.NEW-LET::BODY ; (CDDAR MISC-EXTENSIONS.NEW-LET::CLAUSE))) ; (DO () ; ((NOT (AND # #))) ; (PUSH (POP MISC-EXTENSIONS.NEW-LET::BODY) MISC-EXTENSIONS.NEW-LET::DECLS)) ; (SETQ MISC-EXTENSIONS.NEW-LET::DECLS ; (NREVERSE MISC-EXTENSIONS.NEW-LET::DECLS)) ; (MISC-EXTENSIONS.NEW-LET::BCOND-BUILD-CLAUSE ; (CAAR MISC-EXTENSIONS.NEW-LET::CLAUSE) ; (CADAR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::DECLS ; `(PROGN . ,MISC-EXTENSIONS.NEW-LET::BODY) ; (CDR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::BLOCK-NM)) ; ; caught ERROR: ; during macroexpansion of (LET (# #) (DO NIL # ...) ...). Use *BREAK-ON-SIGNALS* to intercept. ; The function MISC-EXTENSIONS.NEW-LET::ANALYZE-DECLS is undefined.It is defined earlier in the file but is not available at compile-time. While evaluating the form starting at line 23, column 0 of #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd": Unhandled LOAD-SYSTEM-DEFINITION-ERROR in thread #<SB-THREAD:THREAD tid=3530270 "main thread" RUNNING {1200F08003}>: Error while trying to load definition for system coalton from pathname /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "misc-extensions" "src" "new-let"> Backtrace for: #<SB-THREAD:THREAD tid=3530270 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<LOAD-SYSTEM-DEFINITION-ERROR {1207D23CB3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<LOAD-SYSTEM-DEFINITION-ERROR {1207D23CB3}>) 2: (INVOKE-DEBUGGER #<LOAD-SYSTEM-DEFINITION-ERROR {1207D23CB3}>) 3: (ERROR LOAD-SYSTEM-DEFINITION-ERROR :NAME "coalton" :PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :CONDITION #<COMPILE-FILE-ERROR {1207D23993}>) 4: ((LAMBDA (CONDITION) :IN PERFORM) #<COMPILE-FILE-ERROR {1207D23993}>) 5: (SB-KERNEL::%SIGNAL #<COMPILE-FILE-ERROR {1207D23993}>) 6: (ERROR COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 7: (CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 8: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) 9: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 10: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) [fast-method] 11: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {1204951753}>) [fast-method] 12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 13: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {1204951753}>) [fast-method] 14: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "coalton-asdf"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 15: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "coalton-asdf">) 16: ((LAMBDA NIL :IN OPERATE)) 17: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "coalton-asdf">) [fast-method] 18: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP #<SYSTEM "coalton-asdf">) 19: ((LAMBDA NIL :IN OPERATE)) 20: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP #<SYSTEM "coalton-asdf">) [fast-method] 21: (LOAD-SYSTEM #<SYSTEM "coalton-asdf">) 22: (LOAD-SYSTEMS* (#<SYSTEM "coalton-asdf">)) 23: ((LAMBDA NIL :IN ASDF/PARSE-DEFSYSTEM:REGISTER-SYSTEM-DEFINITION)) 24: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) #<NULL-LEXENV>) 25: (SB-EXT:EVAL-TLF (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1 NIL) 26: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1) 27: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) :CURRENT-INDEX 1) 28: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {7FAB73BE595B}> #<SB-C::SOURCE-INFO {12048CC483}> SB-C::INPUT-ERROR-IN-LOAD) 29: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12048D7123}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading") 30: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12048D7123}> NIL) 31: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {7FAB73BE5D1B}> #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12048D7123}> NIL #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12048D7123}>) 32: (LOAD #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :UTF-8) 33: (CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN LOAD*) {12048D594B}> ("Overwriting already existing readtable ~S." #(#:FINALIZERS-OFF-WARNING :ASDF-FINALIZERS))) 34: ((FLET "THUNK" :IN PERFORM)) 35: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<FUNCTION (FLET "THUNK" :IN PERFORM) {7FAB73BE5F8B}>) 36: ((:METHOD PERFORM (DEFINE-OP SYSTEM)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 37: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 38: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 39: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 40: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {12048CAA13}>) [fast-method] 41: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 42: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {12048CAA13}>) [fast-method] 43: ((:METHOD OPERATE (OPERATION COMPONENT)) #<DEFINE-OP > #<SYSTEM "coalton"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 44: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 45: ((LAMBDA NIL :IN OPERATE)) 46: ((:METHOD OPERATE :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 47: ((LAMBDA NIL :IN LOAD-ASD)) 48: ((LAMBDA NIL :IN FIND-SYSTEM)) 49: (ASDF/SESSION:CONSULT-ASDF-CACHE (FIND-SYSTEM "coalton") #<FUNCTION (LAMBDA NIL :IN FIND-SYSTEM) {12048BE03B}>) 50: ((:METHOD FIND-COMPONENT (STRING T)) "coalton" NIL :REGISTERED NIL) [fast-method] 51: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<SYSTEM "cl-quil/foust"> "coalton" NIL) 52: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<SYSTEM "cl-quil/foust"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048BDFEB}>) 53: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 54: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 55: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<PREPARE-OP > #<SYSTEM "cl-quil/foust"> T) 56: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/foust" "sign"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048BDE9B}>) 57: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 58: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 59: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/foust" "sign"> T) 60: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/foust" "sign"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048B9E7B}>) 61: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 62: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 63: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/foust" "sign"> T) 64: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<SYSTEM "cl-quil/foust"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048B5D7B}>) 65: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 66: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 67: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<LOAD-OP > #<SYSTEM "cl-quil/foust"> T) 68: ((LAMBDA NIL :IN MAKE-PLAN)) 69: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "cl-quil/foust"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 70: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "cl-quil/foust">) 71: ((LAMBDA NIL :IN OPERATE)) 72: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "cl-quil/foust">) [fast-method] 73: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP "cl-quil/foust") 74: ((LAMBDA NIL :IN OPERATE)) 75: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil/foust") [fast-method] 76: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {12048B0AEB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 77: ((LAMBDA NIL :IN OPERATE)) 78: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {1204867A8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 79: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil/foust") [fast-method] 80: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil" "cl-quil/foust") 81: (DEPCHECK::MAGIC "cl-quil" "cl-quil/foust" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-xgKNZYeu/depcheck-win.txt") 82: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil" "cl-quil/foust" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-xgKNZYeu/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-xgKNZYeu/depcheck-fail.txt")) 83: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 84: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 85: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 86: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. 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/misc-extensions/12eccf4ed5de6ec2edd863b97523e80a367d9d61/misc-extensions-20250717-git/src/new-let.lisp ; in: DEFUN BCOND-CLAUSE ; (MISC-EXTENSIONS.NEW-LET:LET ((MISC-EXTENSIONS.NEW-LET::DECLS NIL) ; (MISC-EXTENSIONS.NEW-LET::BODY ; (CDDAR MISC-EXTENSIONS.NEW-LET::CLAUSE))) ; (DO () ; ((NOT (AND # #))) ; (PUSH (POP MISC-EXTENSIONS.NEW-LET::BODY) MISC-EXTENSIONS.NEW-LET::DECLS)) ; (SETQ MISC-EXTENSIONS.NEW-LET::DECLS ; (NREVERSE MISC-EXTENSIONS.NEW-LET::DECLS)) ; (MISC-EXTENSIONS.NEW-LET::BCOND-BUILD-CLAUSE ; (CAAR MISC-EXTENSIONS.NEW-LET::CLAUSE) ; (CADAR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::DECLS ; `(PROGN . ,MISC-EXTENSIONS.NEW-LET::BODY) ; (CDR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::BLOCK-NM)) ; ; caught ERROR: ; during macroexpansion of (LET (# #) (DO NIL # ...) ...). Use *BREAK-ON-SIGNALS* to intercept. ; The function MISC-EXTENSIONS.NEW-LET::ANALYZE-DECLS is undefined.It is defined earlier in the file but is not available at compile-time. While evaluating the form starting at line 23, column 0 of #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd": Unhandled LOAD-SYSTEM-DEFINITION-ERROR in thread #<SB-THREAD:THREAD tid=3530266 "main thread" RUNNING {1200F08003}>: Error while trying to load definition for system coalton from pathname /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "misc-extensions" "src" "new-let"> Backtrace for: #<SB-THREAD:THREAD tid=3530266 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<LOAD-SYSTEM-DEFINITION-ERROR {120E7EBCB3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<LOAD-SYSTEM-DEFINITION-ERROR {120E7EBCB3}>) 2: (INVOKE-DEBUGGER #<LOAD-SYSTEM-DEFINITION-ERROR {120E7EBCB3}>) 3: (ERROR LOAD-SYSTEM-DEFINITION-ERROR :NAME "coalton" :PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :CONDITION #<COMPILE-FILE-ERROR {120E7EB993}>) 4: ((LAMBDA (CONDITION) :IN PERFORM) #<COMPILE-FILE-ERROR {120E7EB993}>) 5: (SB-KERNEL::%SIGNAL #<COMPILE-FILE-ERROR {120E7EB993}>) 6: (ERROR COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 7: (CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 8: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) 9: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 10: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) [fast-method] 11: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120BB10423}>) [fast-method] 12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 13: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120BB10423}>) [fast-method] 14: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "coalton-asdf"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 15: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "coalton-asdf">) 16: ((LAMBDA NIL :IN OPERATE)) 17: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "coalton-asdf">) [fast-method] 18: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP #<SYSTEM "coalton-asdf">) 19: ((LAMBDA NIL :IN OPERATE)) 20: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP #<SYSTEM "coalton-asdf">) [fast-method] 21: (LOAD-SYSTEM #<SYSTEM "coalton-asdf">) 22: (LOAD-SYSTEMS* (#<SYSTEM "coalton-asdf">)) 23: ((LAMBDA NIL :IN ASDF/PARSE-DEFSYSTEM:REGISTER-SYSTEM-DEFINITION)) 24: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) #<NULL-LEXENV>) 25: (SB-EXT:EVAL-TLF (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1 NIL) 26: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1) 27: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) :CURRENT-INDEX 1) 28: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {7F53B3A0595B}> #<SB-C::SOURCE-INFO {120BAD2073}> SB-C::INPUT-ERROR-IN-LOAD) 29: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAF0D83}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading") 30: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAF0D83}> NIL) 31: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {7F53B3A05D1B}> #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAF0D83}> NIL #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAF0D83}>) 32: (LOAD #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :UTF-8) 33: (CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN LOAD*) {120BAEF58B}> ("Overwriting already existing readtable ~S." #(#:FINALIZERS-OFF-WARNING :ASDF-FINALIZERS))) 34: ((FLET "THUNK" :IN PERFORM)) 35: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<FUNCTION (FLET "THUNK" :IN PERFORM) {7F53B3A05F8B}>) 36: ((:METHOD PERFORM (DEFINE-OP SYSTEM)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 37: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 38: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 39: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 40: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120BAD1D83}>) [fast-method] 41: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 42: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120BAD1D83}>) [fast-method] 43: ((:METHOD OPERATE (OPERATION COMPONENT)) #<DEFINE-OP > #<SYSTEM "coalton"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 44: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 45: ((LAMBDA NIL :IN OPERATE)) 46: ((:METHOD OPERATE :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 47: ((LAMBDA NIL :IN LOAD-ASD)) 48: ((LAMBDA NIL :IN FIND-SYSTEM)) 49: (ASDF/SESSION:CONSULT-ASDF-CACHE (FIND-SYSTEM "coalton") #<FUNCTION (LAMBDA NIL :IN FIND-SYSTEM) {120BAEC9AB}>) 50: ((:METHOD FIND-COMPONENT (STRING T)) "coalton" NIL :REGISTERED NIL) [fast-method] 51: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<SYSTEM "cl-quil/discrete"> #:COALTON NIL) 52: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<SYSTEM "cl-quil/discrete"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048BDFEB}>) 53: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 54: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 55: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<PREPARE-OP > #<SYSTEM "cl-quil/discrete"> T) 56: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048BDE9B}>) 57: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 58: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 59: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> T) 60: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048B9E7B}>) 61: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 62: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 63: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> T) 64: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<SYSTEM "cl-quil/discrete"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048B5D7B}>) 65: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 66: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 67: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<LOAD-OP > #<SYSTEM "cl-quil/discrete"> T) 68: ((LAMBDA NIL :IN MAKE-PLAN)) 69: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "cl-quil/discrete"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 70: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "cl-quil/discrete">) 71: ((LAMBDA NIL :IN OPERATE)) 72: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "cl-quil/discrete">) [fast-method] 73: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP "cl-quil/discrete") 74: ((LAMBDA NIL :IN OPERATE)) 75: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil/discrete") [fast-method] 76: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {12048B0AEB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 77: ((LAMBDA NIL :IN OPERATE)) 78: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {1204867A8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 79: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil/discrete") [fast-method] 80: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil" "cl-quil/discrete") 81: (DEPCHECK::MAGIC "cl-quil" "cl-quil/discrete" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-gLRqe51t/depcheck-win.txt") 82: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil" "cl-quil/discrete" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-gLRqe51t/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-gLRqe51t/depcheck-fail.txt")) 83: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 84: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 85: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 86: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. 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/misc-extensions/12eccf4ed5de6ec2edd863b97523e80a367d9d61/misc-extensions-20250717-git/src/new-let.lisp ; in: DEFUN BCOND-CLAUSE ; (MISC-EXTENSIONS.NEW-LET:LET ((MISC-EXTENSIONS.NEW-LET::DECLS NIL) ; (MISC-EXTENSIONS.NEW-LET::BODY ; (CDDAR MISC-EXTENSIONS.NEW-LET::CLAUSE))) ; (DO () ; ((NOT (AND # #))) ; (PUSH (POP MISC-EXTENSIONS.NEW-LET::BODY) MISC-EXTENSIONS.NEW-LET::DECLS)) ; (SETQ MISC-EXTENSIONS.NEW-LET::DECLS ; (NREVERSE MISC-EXTENSIONS.NEW-LET::DECLS)) ; (MISC-EXTENSIONS.NEW-LET::BCOND-BUILD-CLAUSE ; (CAAR MISC-EXTENSIONS.NEW-LET::CLAUSE) ; (CADAR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::DECLS ; `(PROGN . ,MISC-EXTENSIONS.NEW-LET::BODY) ; (CDR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::BLOCK-NM)) ; ; caught ERROR: ; during macroexpansion of (LET (# #) (DO NIL # ...) ...). Use *BREAK-ON-SIGNALS* to intercept. ; The function MISC-EXTENSIONS.NEW-LET::ANALYZE-DECLS is undefined.It is defined earlier in the file but is not available at compile-time. While evaluating the form starting at line 23, column 0 of #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd": Unhandled LOAD-SYSTEM-DEFINITION-ERROR in thread #<SB-THREAD:THREAD tid=3530274 "main thread" RUNNING {1200F08003}>: Error while trying to load definition for system coalton from pathname /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "misc-extensions" "src" "new-let"> Backtrace for: #<SB-THREAD:THREAD tid=3530274 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<LOAD-SYSTEM-DEFINITION-ERROR {120E7EBCB3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<LOAD-SYSTEM-DEFINITION-ERROR {120E7EBCB3}>) 2: (INVOKE-DEBUGGER #<LOAD-SYSTEM-DEFINITION-ERROR {120E7EBCB3}>) 3: (ERROR LOAD-SYSTEM-DEFINITION-ERROR :NAME "coalton" :PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :CONDITION #<COMPILE-FILE-ERROR {120E7EB993}>) 4: ((LAMBDA (CONDITION) :IN PERFORM) #<COMPILE-FILE-ERROR {120E7EB993}>) 5: (SB-KERNEL::%SIGNAL #<COMPILE-FILE-ERROR {120E7EB993}>) 6: (ERROR COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 7: (CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 8: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) 9: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 10: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) [fast-method] 11: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120BAD7C43}>) [fast-method] 12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 13: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120BAD7C43}>) [fast-method] 14: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "coalton-asdf"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 15: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "coalton-asdf">) 16: ((LAMBDA NIL :IN OPERATE)) 17: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "coalton-asdf">) [fast-method] 18: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP #<SYSTEM "coalton-asdf">) 19: ((LAMBDA NIL :IN OPERATE)) 20: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP #<SYSTEM "coalton-asdf">) [fast-method] 21: (LOAD-SYSTEM #<SYSTEM "coalton-asdf">) 22: (LOAD-SYSTEMS* (#<SYSTEM "coalton-asdf">)) 23: ((LAMBDA NIL :IN ASDF/PARSE-DEFSYSTEM:REGISTER-SYSTEM-DEFINITION)) 24: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) #<NULL-LEXENV>) 25: (SB-EXT:EVAL-TLF (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1 NIL) 26: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1) 27: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) :CURRENT-INDEX 1) 28: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {7F63F2C0D95B}> #<SB-C::SOURCE-INFO {120BAD1723}> SB-C::INPUT-ERROR-IN-LOAD) 29: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAEB863}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading") 30: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAEB863}> NIL) 31: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {7F63F2C0DD1B}> #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAEB863}> NIL #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BAEB863}>) 32: (LOAD #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :UTF-8) 33: (CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN LOAD*) {120BAEA08B}> ("Overwriting already existing readtable ~S." #(#:FINALIZERS-OFF-WARNING :ASDF-FINALIZERS))) 34: ((FLET "THUNK" :IN PERFORM)) 35: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<FUNCTION (FLET "THUNK" :IN PERFORM) {7F63F2C0DF8B}>) 36: ((:METHOD PERFORM (DEFINE-OP SYSTEM)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 37: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 38: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 39: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 40: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120BAD1433}>) [fast-method] 41: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 42: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120BAD1433}>) [fast-method] 43: ((:METHOD OPERATE (OPERATION COMPONENT)) #<DEFINE-OP > #<SYSTEM "coalton"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 44: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 45: ((LAMBDA NIL :IN OPERATE)) 46: ((:METHOD OPERATE :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 47: ((LAMBDA NIL :IN LOAD-ASD)) 48: ((LAMBDA NIL :IN FIND-SYSTEM)) 49: (ASDF/SESSION:CONSULT-ASDF-CACHE (FIND-SYSTEM "coalton") #<FUNCTION (LAMBDA NIL :IN FIND-SYSTEM) {120BADF41B}>) 50: ((:METHOD FIND-COMPONENT (STRING T)) "coalton" NIL :REGISTERED NIL) [fast-method] 51: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<SYSTEM "cl-quil/coalton"> "coalton" NIL) 52: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<SYSTEM "cl-quil/coalton"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048BDFEB}>) 53: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 54: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 55: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<PREPARE-OP > #<SYSTEM "cl-quil/coalton"> T) 56: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/coalton" "coalton-quil"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048BDE9B}>) 57: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 58: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 59: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/coalton" "coalton-quil"> T) 60: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/coalton" "coalton-quil"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048B9E7B}>) 61: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 62: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 63: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/coalton" "coalton-quil"> T) 64: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<SYSTEM "cl-quil/coalton"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12048B5D7B}>) 65: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 66: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 67: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {1204894F63}> #<LOAD-OP > #<SYSTEM "cl-quil/coalton"> T) 68: ((LAMBDA NIL :IN MAKE-PLAN)) 69: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "cl-quil/coalton"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 70: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "cl-quil/coalton">) 71: ((LAMBDA NIL :IN OPERATE)) 72: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "cl-quil/coalton">) [fast-method] 73: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP "cl-quil/coalton") 74: ((LAMBDA NIL :IN OPERATE)) 75: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil/coalton") [fast-method] 76: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {12048B0AEB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 77: ((LAMBDA NIL :IN OPERATE)) 78: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {1204867A8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 79: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil/coalton") [fast-method] 80: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil" "cl-quil/coalton") 81: (DEPCHECK::MAGIC "cl-quil" "cl-quil/coalton" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-AlZuMCiH/depcheck-win.txt") 82: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil" "cl-quil/coalton" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-AlZuMCiH/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-AlZuMCiH/depcheck-fail.txt")) 83: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 84: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 85: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 86: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. 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: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/fiasco/25c6341ba51ec6b1c07a4ed18827f480f8e3fa89/fiasco-20250717-git/fiasco.asd" contains definition for system "fiasco-self-tests". Please only define "fiasco" and secondary systems with a name starting with "fiasco/" (e.g. "fiasco/test") in that file. WARNING: redefining MAGICL::SVD-LISP in DEFUN WARNING: redefining MAGICL:SCALE! in DEFUN WARNING: redefining MAGICL:.+ in DEFUN WARNING: redefining MAGICL:.- in DEFUN WARNING: redefining MAGICL:.* in DEFUN WARNING: redefining MAGICL:./ in DEFUN WARNING: redefining MAGICL:MULT in DEFUN WARNING: redefining MAGICL:EIG in DEFUN WARNING: redefining MAGICL:HERMITIAN-EIG in DEFUN WARNING: redefining MAGICL:LU in DEFUN WARNING: redefining MAGICL:LU-SOLVE in DEFUN WARNING: redefining MAGICL:INV in DEFUN WARNING: redefining MAGICL:CSD-BLOCKS in DEFUN WARNING: redefining MAGICL:SVD in DEFUN WARNING: redefining MAGICL:SCHUR in DEFUN WARNING: redefining MAGICL:QZ in DEFUN WARNING: redefining MAGICL:QL in DEFUN WARNING: redefining MAGICL:QR in DEFUN WARNING: redefining MAGICL:RQ in DEFUN WARNING: redefining MAGICL:LQ in DEFUN WARNING: redefining CL-QUIL.FRONTEND::PRINT-PARSED-PROGRAM-GENERIC in DEFGENERIC ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/linear-algebra.lisp ; in: DEFUN-INLINABLE PSUM ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; (QVM:PSUM-DOTIMES (QVM::I (LENGTH QVM::STATE)) ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/wavefunction.lisp ; in: DEFUN PROBABILITY ; (DEFUN QVM:PROBABILITY (QVM::AMPLITUDE) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (LET ((QVM::RE (REALPART QVM::AMPLITUDE)) ; (QVM::IM (IMAGPART QVM::AMPLITUDE))) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM)))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM:PROBABILITY ; (QVM::AMPLITUDE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (BLOCK QVM:PROBABILITY ; (LET ((QVM::RE #) (QVM::IM #)) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM))))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-GROUND-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INJECT-BIT QVM::I QVM::QUBIT))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-EXCITED-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INDEX-TO-ADDRESS QVM::I QVM::QUBIT 1))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE APPLY-MATRIX-OPERATOR ; (APPLY QVM::KERNEL QVM::MATRIX QVM::WAVEFUNCTION (COERCE QVM::QUBITS 'LIST)) ; ; note: unable to optimize away possible call to FDEFINITION at runtime because: KERNEL is not known to be a function ; in: DEFUN-INLINABLE %SERIAL-NORM ; (QVM:DEFUN-INLINABLE QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK QVM::%SERIAL-NORM ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE NORM ; (QVM:DEFUN-INLINABLE QVM::NORM ; (QVM::WAVEFUNCTION) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT ; (THE (QVM:FLONUM 0) (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION))) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION))) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (BLOCK QVM::NORM ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT (THE # #)) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION)))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION) ; --> BLOCK QVM:PSUM-DOTIMES LET IF FLET ; ==> ; (#:WORKER-FUNCTION8 (#:START4 #:END5) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START4) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END5)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM3 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM3 to "<return value>" ; in: DEFUN NORMALIZE-WAVEFUNCTION ; (QVM:FLONUM LENGTH) ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; (QVM:PDOTIMES (QVM::I (LENGTH QVM::WAVEFUNCTION) QVM::WAVEFUNCTION) ; (SETF (AREF QVM::WAVEFUNCTION QVM::I) ; (* QVM::INV-NORM (AREF QVM::WAVEFUNCTION QVM::I)))) ; --> IF LPARALLEL.COGNATE:PDOTIMES LET PROGN LPARALLEL.COGNATE::%PDOTIMES ; --> LAMBDA ; ==> ; #'(LAMBDA (QVM::I) ; (TAGBODY (SETF (AREF QVM::WAVEFUNCTION QVM::I) (* QVM::INV-NORM #)))) ; ; note: doing float to pointer coercion (cost 13), for: ; the second argument of CLOSURE-INIT ; (QVM::NORM QVM::WAVEFUNCTION) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM16 to "<return value>" ; in: DEFUN WF ; (QVM:CFLONUM ELT) ; --> BLOCK COERCE ; ==> ; 1 ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; in: DEFUN GAUSSIAN-RANDOM-COMPLEX ; (DEFUN QVM::GAUSSIAN-RANDOM-COMPLEX () ; "Return a complex number with Gaussian-random real and imaginary parts." ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::GAUSSIAN-RANDOM-COMPLEX ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Return a complex number with Gaussian-random real and imaginary parts." ; (BLOCK QVM::GAUSSIAN-RANDOM-COMPLEX ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM)))) ; ; note: doing complex float to pointer coercion (cost 13) to "<return value>" ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/compile-gate.lisp ; in: DEFUN GENERATE-INNER-MATRIX-MULTIPLY-CODE ; (LOOP :FOR QVM::J :BELOW QVM::N ; :FOR QVM::C := (NTH QVM::J QVM::COLUMN) ; :FOR QVM::MIJ := ...) ; --> LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ ; ==> ; (SETQ QVM::MIJ (AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13) to MIJ ; `(* ,QVM::C ,(AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13), for: ; the third argument of LIST ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/measurement.lisp ; in: DEFMETHOD FORCE-MEASUREMENT (T T PURE-STATE T) ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: unable to optimize due to type uncertainty: The result is a (VALUES (OR (COMPLEX DOUBLE-FLOAT) (DOUBLE-FLOAT 0.0d0 1.0d0)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (/ (SQRT QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13), for: ; the first result of inline float arithmetic ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13) ; in: DEFGENERIC GET-EXCITED-STATE-PROBABILITY ; (AREF QVM::RHO QVM::I QVM::I) ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; (REALPART (AREF QVM::RHO QVM::I QVM::I)) ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (QVM:PSUM-DOTIMES (QVM::K (EXPT 2 (1- (QVM::NUM-QUBITS QVM::STATE)))) ; (LET ((QVM::I (QVM::INDEX-TO-ADDRESS QVM::K QVM::QUBIT 1))) ; (REALPART (AREF QVM::RHO QVM::I QVM::I)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM20 ; ; note: doing float to pointer coercion (cost 13) from #:SUM20 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION-IN-PARALLEL-TRULY ; (QVM:PSUM-DOTIMES (QVM::I ; (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM (- QVM::MID MIN))) ; (LET ((QVM::I (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM #))) ; (QVM:PROBABILITY (AREF QVM:WF QVM::I)))) ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION12 (#:START8 #:END9) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START8) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END9)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM7 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM7 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-MULTIPLE-TIMES ; (MT19937:RANDOM 1.0d0) ; --> BLOCK LET* - SCALE-FLOAT FLOAT ; ==> ; (+ (EXPT 2 52) MT19937::RANDOM-MANTISSA-BITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline float coercion (cost 5) because: ; The first argument is a (INTEGER 4611686018427387904), not a (SIGNED-BYTE 64). ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION ; (AREF QVM::PS QVM::I) ; ; note: unable to optimize due to type uncertainty: The first argument is a (VECTOR DOUBLE-FLOAT), not a SIMPLE-ARRAY. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/matrix-operations.lisp ; in: DEFUN ORTHONORMALIZE-MATRIX! ; (SQRT CL-QUIL::N^2) ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a SINGLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a DOUBLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX DOUBLE-FLOAT) &OPTIONAL). ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (LOOP :FOR CL-QUIL::I :BELOW CL-QUIL::NROWS ; :SUM (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; --> LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:SUM17 ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; (/ (MAGICL:TREF CL-QUIL::M CL-QUIL::ROW CL-QUIL::COL) CL-QUIL::NORM) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; etc. ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (DECF (MAGICL:TREF CL-QUIL::V CL-QUIL::ROW CL-QUIL::K) ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J))) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/define-compiler.lisp ; in: DEFUN FIND-SHORTEST-COMPILER-PATH ; (DEFUN CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET CL-QUIL::OCCURRENCE-TABLE ; &OPTIONAL CL-QUIL::QUBIT-COUNT) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {121170B43F}> ; (LET ((CL-QUIL.FRONTEND:QUEUE ; (MAKE-INSTANCE 'CL-HEAP:PRIORITY-QUEUE :SORT-FUN #))) ; (FLET ((CL-QUIL::COLLECT-BINDINGS # ; #)) ; (LOOP :WITH CL-QUIL::VISITED-NODES := NIL ; :FOR (CL-QUIL::TASK . CL-QUIL::HISTORY) := (LIST ; CL-QUIL::OCCURRENCE-TABLE) :THEN (CL-HEAP:DEQUEUE ; CL-QUIL.FRONTEND:QUEUE) ; :UNLESS ...)))) ; ==> ; (SB-IMPL::%DEFUN 'CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (SB-INT:NAMED-LAMBDA CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET ; CL-QUIL::OCCURRENCE-TABLE &OPTIONAL ; CL-QUIL::QUBIT-COUNT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {121170B43F}> ; (BLOCK CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (LET (#) ; (FLET # ; #))))) ; ; caught STYLE-WARNING: ; Call to CL-HEAP:DEQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to CL-HEAP:ENQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "define-compiler"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compiler-hook.lisp ; in: DEFUN COMPILER-HOOK ; (DEFUN CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION ; &KEY (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {122DB4541F}> ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COPY-INSTANCE ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (WHEN ; (AND (NOT (EQL ':NAIVE CL-QUIL::REWIRING-TYPE)) ; (> ; (CL-QUIL.FRONTEND:QUBITS-NEEDED CL-QUIL.FRONTEND:PARSED-PROGRAM) ; (LENGTH #)) ; (NOT ; (CL-QUIL.FRONTEND:PARSED-PROGRAM-HAS-PRESERVE-BLOCKS-P ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COMPRESS-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Applying transform ~A." ; CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:TRANSFORM CL-QUIL::XFORM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ...) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION &KEY ; (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {122DB4541F}> ; (BLOCK CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (WHEN (AND (NOT #) (> # #) (NOT #)) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE ; "COMPILER-HOOK: Applying transform ~A." CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; (MULTIPLE-VALUE-BIND ; (CL-QUIL::INITIAL-REWIRING CL-QUIL::L2P-COMPONENTS) ; (CL-QUIL::PROG-INITIAL-REWIRING CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION :TYPE CL-QUIL::REWIRING-TYPE) ; (LET* (# # # #) ; (CL-QUIL::CHECK-PRESERVED-BLOCKS-SKIP-DEAD-QUBITS CL-QUIL::CFG ; CL-QUIL::CHIP-SPECIFICATION) ; (LET # ; #) ; (WHEN CL-QUIL::PROTOQUIL #) ; (LABELS # ; # ; # ; #))))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ; caught STYLE-WARNING: ; The variable *ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "compiler-hook"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/chip/chip-specification.lisp ; in: DEFSTRUCT CHIP-SPECIFICATION ; (DEFSTRUCT CL-QUIL::CHIP-SPECIFICATION ; #<(SIMPLE-ARRAY CHARACTER ; (957)) Houses information about hardware components on a QPU. ; ; OBJECTS is an array. In its nth position, there is a vector of order n hardware objects on the chip. ; ; GENERIC-COMPILERS is a vector of functions... {122E5DAF1F}> ; (CL-QUIL::OBJECTS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR))) ; :TYPE VECTOR) ; (CL-QUIL::GENERIC-COMPILERS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE VECTOR) ; (CL-QUIL::GENERIC-REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE ; VECTOR) ; (CL-QUIL::LOOKUP-CACHE NIL :TYPE (OR NULL HASH-TABLE))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::CHIP-SPECIFICATION {122E5D1033}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::CHIP-SPECIFICATION-GENERIC-COMPILERS could not be inlined because the structure definition for CL-QUIL::CHIP-SPECIFICATION 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 GATE-RECORD ; (DEFSTRUCT (CL-QUIL::GATE-RECORD (:COPIER NIL)) ; "Houses information about a hardware instantiation of a gate. ; ; FIDELITY stores the measured gate fidelity. ; ; DURATION stores the measured gate duration (in nanoseconds)." ; (CL-QUIL::FIDELITY CL-QUIL::+NEAR-PERFECT-FIDELITY+ :TYPE (OR NULL REAL)) ; (CL-QUIL::DURATION 1/100 :TYPE (OR NULL REAL))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::GATE-RECORD {122ECEA153}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::GATE-RECORD-FIDELITY and CL-QUIL::GATE-RECORD-DURATION could not be inlined because the structure definition for CL-QUIL::GATE-RECORD 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 HARDWARE-OBJECT ; (DEFSTRUCT CL-QUIL::HARDWARE-OBJECT ; #<(SIMPLE-ARRAY CHARACTER ; (1556)) Houses information about a particular hardware object on a QPU. ; ; ORDER is a non-negative integer that counts the number of qubit subsidiaries of this hardware object. Equals (1- (length (vnth 0 (hardw... {122EF5E11F}> ; (CL-QUIL::ORDER 0 :TYPE UNSIGNED-BYTE :READ-ONLY T) ; (CL-QUIL::GATE-INFORMATION (MAKE-HASH-TABLE :TEST #'EQUALP)) ; (CL-QUIL::COMPILATION-METHODS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::PERMUTATION-GATES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::CXNS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)))) ; (CL-QUIL::MISC-DATA (MAKE-HASH-TABLE :TEST #'EQUAL) :TYPE HASH-TABLE)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::HARDWARE-OBJECT {122EF0D953}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::HARDWARE-OBJECT-COMPILATION-METHODS and CL-QUIL::HARDWARE-OBJECT-CXNS could not be inlined because the structure definition for CL-QUIL::HARDWARE-OBJECT 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-quil" "chip" "chip-specification"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/compressor.lisp ; in: DEFSTRUCT PEEPHOLE-REWRITER-NODE ; (DEFSTRUCT CL-QUIL::PEEPHOLE-REWRITER-NODE ; "A node housing an instruction and attendant metadata used during peephole rewriting. Essentially a doubly-linked list." ; (CL-QUIL::INSTR NIL :TYPE CL-QUIL.FRONTEND:APPLICATION) ; (CL-QUIL::PREV NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::NEXT NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::CONTEXT NIL)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::PEEPHOLE-REWRITER-NODE {123CD35443}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::PEEPHOLE-REWRITER-NODE-INSTR and CL-QUIL::PEEPHOLE-REWRITER-NODE-NEXT could not be inlined because the structure definition for CL-QUIL::PEEPHOLE-REWRITER-NODE 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-quil" "compressor" "compressor"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/wavefunctions.lisp ; in: DEFSTRUCT ANTISOCIAL-QVM ; (DEFSTRUCT CL-QUIL::ANTISOCIAL-QVM ; #<(SIMPLE-ARRAY CHARACTER ; (658)) ANTISOCIAL-QVM instances represent partially-tracked low-correlation wavefunctions. ; ; WFS is a vector. The jth entry points to the wavefunction component in which the jth external qubit lies. ; ; INTERNAL... {123E504EFF}> ; (CL-QUIL::WFS #()) ; (CL-QUIL::INTERNAL-INDICES #())) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::ANTISOCIAL-QVM {123E4FAAF3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::ANTISOCIAL-QVM-WFS could not be inlined because the structure definition for CL-QUIL::ANTISOCIAL-QVM 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-quil" "compressor" "wavefunctions"> ; ; caught ERROR: ; READ error during COMPILE-FILE: Package QUIL does not exist. Line: 12, Column: 35, File-Position: 567 Stream: #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/tests/chip-library/suite.lisp" {120B4A3CC3}> Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=3530298 "main thread" RUNNING {123FCE8093}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "cl-quil/chip-library-tests" "suite"> Backtrace for: #<SB-THREAD:THREAD tid=3530298 "main thread" RUNNING {123FCE8093}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {120B4B5623}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {120B4B5623}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {120B4B5623}>) 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 "cl-quil/chip-library-tests" "suite">))) 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 "cl-quil/chip-library-tests" "suite">))) 5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "cl-quil/chip-library-tests" "suite">) 6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "cl-quil/chip-library-tests" "suite">) [fast-method] 8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1204894F63}>) [fast-method] 9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1204894F63}>) [fast-method] 11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil/chip-library-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil/chip-library-tests">) 13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil/chip-library-tests">) [fast-method] 15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "cl-quil/chip-library-tests") 16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "cl-quil/chip-library-tests") [fast-method] 18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {12048B0AEB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1204867A8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "cl-quil/chip-library-tests") [fast-method] 22: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil" "cl-quil/chip-library-tests") 23: (DEPCHECK::MAGIC "cl-quil" "cl-quil/chip-library-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-rDOOfJ9k/depcheck-win.txt") 24: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil" "cl-quil/chip-library-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-rDOOfJ9k/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-rDOOfJ9k/depcheck-fail.txt")) 25: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 26: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 27: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 28: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition ; caught 9 STYLE-WARNING conditions ; printed 52 notes
; file: /home/quicklisp/quicklisp-controller/dist/build-cache/misc-extensions/12eccf4ed5de6ec2edd863b97523e80a367d9d61/misc-extensions-20250717-git/src/new-let.lisp ; in: DEFUN BCOND-CLAUSE ; (MISC-EXTENSIONS.NEW-LET:LET ((MISC-EXTENSIONS.NEW-LET::DECLS NIL) ; (MISC-EXTENSIONS.NEW-LET::BODY ; (CDDAR MISC-EXTENSIONS.NEW-LET::CLAUSE))) ; (DO () ; ((NOT (AND # #))) ; (PUSH (POP MISC-EXTENSIONS.NEW-LET::BODY) MISC-EXTENSIONS.NEW-LET::DECLS)) ; (SETQ MISC-EXTENSIONS.NEW-LET::DECLS ; (NREVERSE MISC-EXTENSIONS.NEW-LET::DECLS)) ; (MISC-EXTENSIONS.NEW-LET::BCOND-BUILD-CLAUSE ; (CAAR MISC-EXTENSIONS.NEW-LET::CLAUSE) ; (CADAR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::DECLS ; `(PROGN . ,MISC-EXTENSIONS.NEW-LET::BODY) ; (CDR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::BLOCK-NM)) ; ; caught ERROR: ; during macroexpansion of (LET (# #) (DO NIL # ...) ...). Use *BREAK-ON-SIGNALS* to intercept. ; The function MISC-EXTENSIONS.NEW-LET::ANALYZE-DECLS is undefined.It is defined earlier in the file but is not available at compile-time. While evaluating the form starting at line 23, column 0 of #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd": Unhandled LOAD-SYSTEM-DEFINITION-ERROR in thread #<SB-THREAD:THREAD tid=3530136 "main thread" RUNNING {1200F08003}>: Error while trying to load definition for system coalton from pathname /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "misc-extensions" "src" "new-let"> Backtrace for: #<SB-THREAD:THREAD tid=3530136 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<LOAD-SYSTEM-DEFINITION-ERROR {1207B93CB3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<LOAD-SYSTEM-DEFINITION-ERROR {1207B93CB3}>) 2: (INVOKE-DEBUGGER #<LOAD-SYSTEM-DEFINITION-ERROR {1207B93CB3}>) 3: (ERROR LOAD-SYSTEM-DEFINITION-ERROR :NAME "coalton" :PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :CONDITION #<COMPILE-FILE-ERROR {1207B93993}>) 4: ((LAMBDA (CONDITION) :IN PERFORM) #<COMPILE-FILE-ERROR {1207B93993}>) 5: (SB-KERNEL::%SIGNAL #<COMPILE-FILE-ERROR {1207B93993}>) 6: (ERROR COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 7: (CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 8: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) 9: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 10: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) [fast-method] 11: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {12046BC9E3}>) [fast-method] 12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 13: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {12046BC9E3}>) [fast-method] 14: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "coalton-asdf"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 15: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "coalton-asdf">) 16: ((LAMBDA NIL :IN OPERATE)) 17: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "coalton-asdf">) [fast-method] 18: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP #<SYSTEM "coalton-asdf">) 19: ((LAMBDA NIL :IN OPERATE)) 20: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP #<SYSTEM "coalton-asdf">) [fast-method] 21: (LOAD-SYSTEM #<SYSTEM "coalton-asdf">) 22: (LOAD-SYSTEMS* (#<SYSTEM "coalton-asdf">)) 23: ((LAMBDA NIL :IN ASDF/PARSE-DEFSYSTEM:REGISTER-SYSTEM-DEFINITION)) 24: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) #<NULL-LEXENV>) 25: (SB-EXT:EVAL-TLF (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1 NIL) 26: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1) 27: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) :CURRENT-INDEX 1) 28: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {7F9299DAD86B}> #<SB-C::SOURCE-INFO {120464F593}> SB-C::INPUT-ERROR-IN-LOAD) 29: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12046710C3}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading") 30: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12046710C3}> NIL) 31: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {7F9299DADC2B}> #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12046710C3}> NIL #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {12046710C3}>) 32: (LOAD #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :UTF-8) 33: (CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN LOAD*) {12046678BB}> ("Overwriting already existing readtable ~S." #(#:FINALIZERS-OFF-WARNING :ASDF-FINALIZERS))) 34: ((FLET "THUNK" :IN PERFORM)) 35: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<FUNCTION (FLET "THUNK" :IN PERFORM) {7F9299DADE9B}>) 36: ((:METHOD PERFORM (DEFINE-OP SYSTEM)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 37: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 38: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 39: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 40: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120464DBA3}>) [fast-method] 41: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 42: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120464DBA3}>) [fast-method] 43: ((:METHOD OPERATE (OPERATION COMPONENT)) #<DEFINE-OP > #<SYSTEM "coalton"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 44: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 45: ((LAMBDA NIL :IN OPERATE)) 46: ((:METHOD OPERATE :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 47: ((LAMBDA NIL :IN LOAD-ASD)) 48: ((LAMBDA NIL :IN FIND-SYSTEM)) 49: (ASDF/SESSION:CONSULT-ASDF-CACHE (FIND-SYSTEM "coalton") #<FUNCTION (LAMBDA NIL :IN FIND-SYSTEM) {120466005B}>) 50: ((LAMBDA NIL :IN FIND-SYSTEM)) 51: (ASDF/SESSION:CONSULT-ASDF-CACHE (FIND-SYSTEM "coalton/testing") #<FUNCTION (LAMBDA NIL :IN FIND-SYSTEM) {1204657FDB}>) 52: ((:METHOD FIND-COMPONENT (STRING T)) "coalton/testing" NIL :REGISTERED NIL) [fast-method] 53: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<SYSTEM "cl-quil-tests/foust-tests"> "coalton/testing" NIL) 54: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<SYSTEM "cl-quil-tests/foust-tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204657F8B}>) 55: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 56: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 57: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<PREPARE-OP > #<SYSTEM "cl-quil-tests/foust-tests"> T) 58: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil-tests/foust-tests" "tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204657E3B}>) 59: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 60: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 61: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil-tests/foust-tests" "tests"> T) 62: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil-tests/foust-tests" "tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204653E1B}>) 63: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 64: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 65: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil-tests/foust-tests" "tests"> T) 66: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<SYSTEM "cl-quil-tests/foust-tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204637D2B}>) 67: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 68: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 69: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<LOAD-OP > #<SYSTEM "cl-quil-tests/foust-tests"> T) 70: ((LAMBDA NIL :IN MAKE-PLAN)) 71: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "cl-quil-tests/foust-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 72: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "cl-quil-tests/foust-tests">) 73: ((LAMBDA NIL :IN OPERATE)) 74: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "cl-quil-tests/foust-tests">) [fast-method] 75: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP "cl-quil-tests/foust-tests") 76: ((LAMBDA NIL :IN OPERATE)) 77: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil-tests/foust-tests") [fast-method] 78: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {1204633C8B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 79: ((LAMBDA NIL :IN OPERATE)) 80: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {12045F2C8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 81: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil-tests/foust-tests") [fast-method] 82: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil-tests" "cl-quil-tests/foust-tests") 83: (DEPCHECK::MAGIC "cl-quil-tests" "cl-quil-tests/foust-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-RKW4DOJ3/depcheck-win.txt") 84: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil-tests" "cl-quil-tests/foust-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-RKW4DOJ3/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-RKW4DOJ3/depcheck-fail.txt")) 85: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 86: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 87: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 88: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. 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/misc-extensions/12eccf4ed5de6ec2edd863b97523e80a367d9d61/misc-extensions-20250717-git/src/new-let.lisp ; in: DEFUN BCOND-CLAUSE ; (MISC-EXTENSIONS.NEW-LET:LET ((MISC-EXTENSIONS.NEW-LET::DECLS NIL) ; (MISC-EXTENSIONS.NEW-LET::BODY ; (CDDAR MISC-EXTENSIONS.NEW-LET::CLAUSE))) ; (DO () ; ((NOT (AND # #))) ; (PUSH (POP MISC-EXTENSIONS.NEW-LET::BODY) MISC-EXTENSIONS.NEW-LET::DECLS)) ; (SETQ MISC-EXTENSIONS.NEW-LET::DECLS ; (NREVERSE MISC-EXTENSIONS.NEW-LET::DECLS)) ; (MISC-EXTENSIONS.NEW-LET::BCOND-BUILD-CLAUSE ; (CAAR MISC-EXTENSIONS.NEW-LET::CLAUSE) ; (CADAR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::DECLS ; `(PROGN . ,MISC-EXTENSIONS.NEW-LET::BODY) ; (CDR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::BLOCK-NM)) ; ; caught ERROR: ; during macroexpansion of (LET (# #) (DO NIL # ...) ...). Use *BREAK-ON-SIGNALS* to intercept. ; The function MISC-EXTENSIONS.NEW-LET::ANALYZE-DECLS is undefined.It is defined earlier in the file but is not available at compile-time. While evaluating the form starting at line 23, column 0 of #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd": Unhandled LOAD-SYSTEM-DEFINITION-ERROR in thread #<SB-THREAD:THREAD tid=3530132 "main thread" RUNNING {1200F08003}>: Error while trying to load definition for system coalton from pathname /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "misc-extensions" "src" "new-let"> Backtrace for: #<SB-THREAD:THREAD tid=3530132 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<LOAD-SYSTEM-DEFINITION-ERROR {120E903CB3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<LOAD-SYSTEM-DEFINITION-ERROR {120E903CB3}>) 2: (INVOKE-DEBUGGER #<LOAD-SYSTEM-DEFINITION-ERROR {120E903CB3}>) 3: (ERROR LOAD-SYSTEM-DEFINITION-ERROR :NAME "coalton" :PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :CONDITION #<COMPILE-FILE-ERROR {120E903993}>) 4: ((LAMBDA (CONDITION) :IN PERFORM) #<COMPILE-FILE-ERROR {120E903993}>) 5: (SB-KERNEL::%SIGNAL #<COMPILE-FILE-ERROR {120E903993}>) 6: (ERROR COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 7: (CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 8: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) 9: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 10: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) [fast-method] 11: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120BC3D1C3}>) [fast-method] 12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 13: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120BC3D1C3}>) [fast-method] 14: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "coalton-asdf"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 15: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "coalton-asdf">) 16: ((LAMBDA NIL :IN OPERATE)) 17: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "coalton-asdf">) [fast-method] 18: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP #<SYSTEM "coalton-asdf">) 19: ((LAMBDA NIL :IN OPERATE)) 20: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP #<SYSTEM "coalton-asdf">) [fast-method] 21: (LOAD-SYSTEM #<SYSTEM "coalton-asdf">) 22: (LOAD-SYSTEMS* (#<SYSTEM "coalton-asdf">)) 23: ((LAMBDA NIL :IN ASDF/PARSE-DEFSYSTEM:REGISTER-SYSTEM-DEFINITION)) 24: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) #<NULL-LEXENV>) 25: (SB-EXT:EVAL-TLF (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1 NIL) 26: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1) 27: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) :CURRENT-INDEX 1) 28: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {7FE1687D521B}> #<SB-C::SOURCE-INFO {120BBF27D3}> SB-C::INPUT-ERROR-IN-LOAD) 29: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BC16D03}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading") 30: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BC16D03}> NIL) 31: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {7FE1687D55DB}> #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BC16D03}> NIL #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120BC16D03}>) 32: (LOAD #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :UTF-8) 33: (CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN LOAD*) {120BC1552B}> ("Overwriting already existing readtable ~S." #(#:FINALIZERS-OFF-WARNING :ASDF-FINALIZERS))) 34: ((FLET "THUNK" :IN PERFORM)) 35: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<FUNCTION (FLET "THUNK" :IN PERFORM) {7FE1687D584B}>) 36: ((:METHOD PERFORM (DEFINE-OP SYSTEM)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 37: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 38: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 39: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 40: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120BBF24E3}>) [fast-method] 41: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 42: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120BBF24E3}>) [fast-method] 43: ((:METHOD OPERATE (OPERATION COMPONENT)) #<DEFINE-OP > #<SYSTEM "coalton"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 44: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 45: ((LAMBDA NIL :IN OPERATE)) 46: ((:METHOD OPERATE :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 47: ((LAMBDA NIL :IN LOAD-ASD)) 48: ((LAMBDA NIL :IN FIND-SYSTEM)) 49: (ASDF/SESSION:CONSULT-ASDF-CACHE (FIND-SYSTEM "coalton") #<FUNCTION (LAMBDA NIL :IN FIND-SYSTEM) {120BC1294B}>) 50: ((:METHOD FIND-COMPONENT (STRING T)) "coalton" NIL :REGISTERED NIL) [fast-method] 51: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<SYSTEM "cl-quil/discrete"> #:COALTON NIL) 52: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<SYSTEM "cl-quil/discrete"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12049B812B}>) 53: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 54: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 55: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<PREPARE-OP > #<SYSTEM "cl-quil/discrete"> T) 56: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12049B800B}>) 57: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 58: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 59: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> T) 60: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12049AFEEB}>) 61: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 62: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 63: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil/discrete" "package"> T) 64: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<SYSTEM "cl-quil/discrete"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12049AFDCB}>) 65: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 66: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 67: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<LOAD-OP > #<SYSTEM "cl-quil/discrete"> T) 68: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<SYSTEM "cl-quil-tests/discrete-tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204657F8B}>) 69: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 70: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 71: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<PREPARE-OP > #<SYSTEM "cl-quil-tests/discrete-tests"> T) 72: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil-tests/discrete-tests" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204657E3B}>) 73: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 74: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 75: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil-tests/discrete-tests" "package"> T) 76: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil-tests/discrete-tests" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204653E1B}>) 77: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 78: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 79: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil-tests/discrete-tests" "package"> T) 80: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<SYSTEM "cl-quil-tests/discrete-tests"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204637D2B}>) 81: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 82: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 83: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {12046480B3}> #<LOAD-OP > #<SYSTEM "cl-quil-tests/discrete-tests"> T) 84: ((LAMBDA NIL :IN MAKE-PLAN)) 85: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "cl-quil-tests/discrete-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 86: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "cl-quil-tests/discrete-tests">) 87: ((LAMBDA NIL :IN OPERATE)) 88: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "cl-quil-tests/discrete-tests">) [fast-method] 89: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP "cl-quil-tests/discrete-tests") 90: ((LAMBDA NIL :IN OPERATE)) 91: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil-tests/discrete-tests") [fast-method] 92: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {1204633C8B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 93: ((LAMBDA NIL :IN OPERATE)) 94: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {12045F2C8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 95: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil-tests/discrete-tests") [fast-method] 96: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil-tests" "cl-quil-tests/discrete-tests") 97: (DEPCHECK::MAGIC "cl-quil-tests" "cl-quil-tests/discrete-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-zojPLPjm/depcheck-win.txt") 98: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil-tests" "cl-quil-tests/discrete-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-zojPLPjm/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-zojPLPjm/depcheck-fail.txt")) 99: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 100: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 101: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 102: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition
; file: /home/quicklisp/quicklisp-controller/dist/build-cache/misc-extensions/12eccf4ed5de6ec2edd863b97523e80a367d9d61/misc-extensions-20250717-git/src/new-let.lisp ; in: DEFUN BCOND-CLAUSE ; (MISC-EXTENSIONS.NEW-LET:LET ((MISC-EXTENSIONS.NEW-LET::DECLS NIL) ; (MISC-EXTENSIONS.NEW-LET::BODY ; (CDDAR MISC-EXTENSIONS.NEW-LET::CLAUSE))) ; (DO () ; ((NOT (AND # #))) ; (PUSH (POP MISC-EXTENSIONS.NEW-LET::BODY) MISC-EXTENSIONS.NEW-LET::DECLS)) ; (SETQ MISC-EXTENSIONS.NEW-LET::DECLS ; (NREVERSE MISC-EXTENSIONS.NEW-LET::DECLS)) ; (MISC-EXTENSIONS.NEW-LET::BCOND-BUILD-CLAUSE ; (CAAR MISC-EXTENSIONS.NEW-LET::CLAUSE) ; (CADAR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::DECLS ; `(PROGN . ,MISC-EXTENSIONS.NEW-LET::BODY) ; (CDR MISC-EXTENSIONS.NEW-LET::CLAUSE) MISC-EXTENSIONS.NEW-LET::BLOCK-NM)) ; ; caught ERROR: ; during macroexpansion of (LET (# #) (DO NIL # ...) ...). Use *BREAK-ON-SIGNALS* to intercept. ; The function MISC-EXTENSIONS.NEW-LET::ANALYZE-DECLS is undefined.It is defined earlier in the file but is not available at compile-time. While evaluating the form starting at line 23, column 0 of #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd": Unhandled LOAD-SYSTEM-DEFINITION-ERROR in thread #<SB-THREAD:THREAD tid=3530108 "main thread" RUNNING {1200F08003}>: Error while trying to load definition for system coalton from pathname /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "misc-extensions" "src" "new-let"> Backtrace for: #<SB-THREAD:THREAD tid=3530108 "main thread" RUNNING {1200F08003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<LOAD-SYSTEM-DEFINITION-ERROR {1207A93CB3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<LOAD-SYSTEM-DEFINITION-ERROR {1207A93CB3}>) 2: (INVOKE-DEBUGGER #<LOAD-SYSTEM-DEFINITION-ERROR {1207A93CB3}>) 3: (ERROR LOAD-SYSTEM-DEFINITION-ERROR :NAME "coalton" :PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :CONDITION #<COMPILE-FILE-ERROR {1207A93993}>) 4: ((LAMBDA (CONDITION) :IN PERFORM) #<COMPILE-FILE-ERROR {1207A93993}>) 5: (SB-KERNEL::%SIGNAL #<COMPILE-FILE-ERROR {1207A93993}>) 6: (ERROR COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 7: (CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<COMPILE-OP > . #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">))) 8: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) 9: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 10: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<COMPILE-OP > #<CL-SOURCE-FILE "misc-extensions" "src" "new-let">) [fast-method] 11: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {120469EF53}>) [fast-method] 12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 13: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {120469EF53}>) [fast-method] 14: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "coalton-asdf"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 15: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "coalton-asdf">) 16: ((LAMBDA NIL :IN OPERATE)) 17: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "coalton-asdf">) [fast-method] 18: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP #<SYSTEM "coalton-asdf">) 19: ((LAMBDA NIL :IN OPERATE)) 20: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP #<SYSTEM "coalton-asdf">) [fast-method] 21: (LOAD-SYSTEM #<SYSTEM "coalton-asdf">) 22: (LOAD-SYSTEMS* (#<SYSTEM "coalton-asdf">)) 23: ((LAMBDA NIL :IN ASDF/PARSE-DEFSYSTEM:REGISTER-SYSTEM-DEFINITION)) 24: (SB-INT:SIMPLE-EVAL-IN-LEXENV (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) #<NULL-LEXENV>) 25: (SB-EXT:EVAL-TLF (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1 NIL) 26: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) 1) 27: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (DEFSYSTEM #:COALTON/LIBRARY :DESCRIPTION "The Coalton standard library." :AUTHOR "Coalton contributors (https://github.com/coalton-lang/coalton)" :LICENSE "MIT" :VERSION (:READ-FILE-FORM "VERSION.txt") :AROUND-COMPILE (LAMBDA (COMPILE) (LET ((SB-EXT:*DERIVE-FUNCTION-TYPES* T) (SB-EXT:*BLOCK-COMPILE-DEFAULT* :SPECIFIED) (*FEATURES* #)) (FUNCALL COMPILE))) ...) :CURRENT-INDEX 1) 28: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {7FE5F88E595B}> #<SB-C::SOURCE-INFO {1204672633}> SB-C::INPUT-ERROR-IN-LOAD) 29: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120467CD43}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading") 30: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120467CD43}> NIL) 31: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {7FE5F88E5D1B}> #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120467CD43}> NIL #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" {120467CD43}>) 32: (LOAD #P"/home/quicklisp/quicklisp-controller/dist/build-cache/coalton/770c86a0d44cd0d1a1690432064cfa4112462a5f/coalton-20250717-git/coalton.asd" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :UTF-8) 33: (CALL-WITH-MUFFLED-CONDITIONS #<FUNCTION (LAMBDA NIL :IN LOAD*) {120467B56B}> ("Overwriting already existing readtable ~S." #(#:FINALIZERS-OFF-WARNING :ASDF-FINALIZERS))) 34: ((FLET "THUNK" :IN PERFORM)) 35: (SB-IMPL::%WITH-STANDARD-IO-SYNTAX #<FUNCTION (FLET "THUNK" :IN PERFORM) {7FE5F88E5F8B}>) 36: ((:METHOD PERFORM (DEFINE-OP SYSTEM)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 37: ((SB-PCL::EMF PERFORM) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 38: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 39: ((:METHOD PERFORM-WITH-RESTARTS :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 40: ((:METHOD PERFORM-PLAN (T)) #<SEQUENTIAL-PLAN {1204671DE3}>) [fast-method] 41: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 42: ((:METHOD PERFORM-PLAN :AROUND (T)) #<SEQUENTIAL-PLAN {1204671DE3}>) [fast-method] 43: ((:METHOD OPERATE (OPERATION COMPONENT)) #<DEFINE-OP > #<SYSTEM "coalton"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 44: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<DEFINE-OP > #<SYSTEM "coalton">) 45: ((LAMBDA NIL :IN OPERATE)) 46: ((:METHOD OPERATE :AROUND (T T)) #<DEFINE-OP > #<SYSTEM "coalton">) [fast-method] 47: ((LAMBDA NIL :IN LOAD-ASD)) 48: ((LAMBDA NIL :IN FIND-SYSTEM)) 49: (ASDF/SESSION:CONSULT-ASDF-CACHE (FIND-SYSTEM "coalton") #<FUNCTION (LAMBDA NIL :IN FIND-SYSTEM) {120466C28B}>) 50: ((:METHOD FIND-COMPONENT (STRING T)) "coalton" NIL :REGISTERED NIL) [fast-method] 51: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<SYSTEM "cl-quil-benchmarking/foust"> "coalton" NIL) 52: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<SYSTEM "cl-quil-benchmarking/foust"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120466C23B}>) 53: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 54: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 55: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {120463C2B3}> #<PREPARE-OP > #<SYSTEM "cl-quil-benchmarking/foust"> T) 56: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil-benchmarking/foust" "foust-benchmarking"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120466C0EB}>) 57: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 58: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 59: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {120463C2B3}> #<PREPARE-OP > #<CL-SOURCE-FILE "cl-quil-benchmarking/foust" "foust-benchmarking"> T) 60: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil-benchmarking/foust" "foust-benchmarking"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {12046680CB}>) 61: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 62: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 63: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {120463C2B3}> #<LOAD-OP > #<CL-SOURCE-FILE "cl-quil-benchmarking/foust" "foust-benchmarking"> T) 64: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<LOAD-OP > #<SYSTEM "cl-quil-benchmarking/foust"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120465402B}>) 65: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION)) 66: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 67: (ASDF/PLAN:TRAVERSE-ACTION #<SEQUENTIAL-PLAN {120463C2B3}> #<LOAD-OP > #<SYSTEM "cl-quil-benchmarking/foust"> T) 68: ((LAMBDA NIL :IN MAKE-PLAN)) 69: ((:METHOD OPERATE (OPERATION COMPONENT)) #<LOAD-OP > #<SYSTEM "cl-quil-benchmarking/foust"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 70: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> #<LOAD-OP > #<SYSTEM "cl-quil-benchmarking/foust">) 71: ((LAMBDA NIL :IN OPERATE)) 72: ((:METHOD OPERATE :AROUND (T T)) #<LOAD-OP > #<SYSTEM "cl-quil-benchmarking/foust">) [fast-method] 73: ((SB-PCL::EMF OPERATE) #<unused argument> #<unused argument> LOAD-OP "cl-quil-benchmarking/foust") 74: ((LAMBDA NIL :IN OPERATE)) 75: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil-benchmarking/foust") [fast-method] 76: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {1204647D8B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 77: ((LAMBDA NIL :IN OPERATE)) 78: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN OPERATE) {120460ECCB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 79: ((:METHOD OPERATE :AROUND (T T)) LOAD-OP "cl-quil-benchmarking/foust") [fast-method] 80: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil-benchmarking" "cl-quil-benchmarking/foust") 81: (DEPCHECK::MAGIC "cl-quil-benchmarking" "cl-quil-benchmarking/foust" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-Uuyrdq0E/depcheck-win.txt") 82: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil-benchmarking" "cl-quil-benchmarking/foust" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-Uuyrdq0E/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-Uuyrdq0E/depcheck-fail.txt")) 83: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 84: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 85: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 86: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/parse-float/8031b1b03c4861658df12660cf2465e195af4bce/parse-float-20250717-git/parse-float.asd" contains definition for system "parse-float-tests". Please only define "parse-float" and secondary systems with a name starting with "parse-float/" (e.g. "parse-float/test") in that file. 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 MAGICL::SVD-LISP in DEFUN WARNING: redefining MAGICL:SCALE! in DEFUN WARNING: redefining MAGICL:.+ in DEFUN WARNING: redefining MAGICL:.- in DEFUN WARNING: redefining MAGICL:.* in DEFUN WARNING: redefining MAGICL:./ in DEFUN WARNING: redefining MAGICL:MULT in DEFUN WARNING: redefining MAGICL:EIG in DEFUN WARNING: redefining MAGICL:HERMITIAN-EIG in DEFUN WARNING: redefining MAGICL:LU in DEFUN WARNING: redefining MAGICL:LU-SOLVE in DEFUN WARNING: redefining MAGICL:INV in DEFUN WARNING: redefining MAGICL:CSD-BLOCKS in DEFUN WARNING: redefining MAGICL:SVD in DEFUN WARNING: redefining MAGICL:SCHUR in DEFUN WARNING: redefining MAGICL:QZ in DEFUN WARNING: redefining MAGICL:QL in DEFUN WARNING: redefining MAGICL:QR in DEFUN WARNING: redefining MAGICL:RQ in DEFUN WARNING: redefining MAGICL:LQ in DEFUN ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/ast.lisp ; in: DEFSTRUCT DELAYED-EXPRESSION ; (DEFSTRUCT ; (CL-QUIL.FRONTEND:DELAYED-EXPRESSION ; (:CONSTRUCTOR CL-QUIL.FRONTEND::%DELAYED-EXPRESSION)) ; #<(SIMPLE-ARRAY CHARACTER ; (335)) A representation of an arithmetic expression with fillable "slots". ; ; PARAMS is a list of values to fill the slots with. These can be formal variables, but eventually must be a list of CONSTANTs. ; ; LAMB... {121787A3DF}> ; (CL-QUIL.FRONTEND::PARAMS NIL) ; (CL-QUIL.FRONTEND::LAMBDA-PARAMS NIL :READ-ONLY T) ; (CL-QUIL.FRONTEND::EXPRESSION NIL :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:DELAYED-EXPRESSION {121781CE33}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL.FRONTEND:DELAYED-EXPRESSION-EXPRESSION could not be inlined because the structure definition for CL-QUIL.FRONTEND:DELAYED-EXPRESSION 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 PAULI-TERM ; (DEFSTRUCT (CL-QUIL.FRONTEND:PAULI-TERM) ; #<(SIMPLE-ARRAY CHARACTER ; (642)) Records a word of Pauli operators, together with an ordered list of qubit formals on which they act, as well as a scalar prefix. This is part of the internal representation of a EXP-PAULI-SUM-GATE-DE... {121856234F}> ; CL-QUIL.FRONTEND::PAULI-WORD ; CL-QUIL.FRONTEND::PREFACTOR ; CL-QUIL.FRONTEND::ARGUMENTS) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:PAULI-TERM {12184BF443}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL.FRONTEND:PAULI-TERM-PAULI-WORD, CL-QUIL.FRONTEND:PAULI-TERM-PREFACTOR and CL-QUIL.FRONTEND:PAULI-TERM-ARGUMENTS could not be inlined because the structure definition for CL-QUIL.FRONTEND:PAULI-TERM 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. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/ast.lisp ; in: DEFUN EXPAND-CLASSICAL-INSTRUCTION-DEFINITIONS ; (LOOP :FOR CL-QUIL.FRONTEND::TYPE-TUPLE :IN CL-QUIL.FRONTEND::TYPES ; :FOR CL-QUIL.FRONTEND::TYPED-NAME := (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE) ; :DO (ASSERT ; (AND ; (= CL-QUIL.FRONTEND::NUM-ARGS ; (LENGTH CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (EVERY #'CL-QUIL.FRONTEND::VALID-TYPE-SYMBOL-P ; CL-QUIL.FRONTEND::TYPE-TUPLE))) ; :COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD ; ==> ; (LET* ((#:HEAD11 (SB-KERNEL:UNALIGNED-DX-CONS NIL)) ; (#:TAIL12 #:HEAD11) ; (CL-QUIL.FRONTEND::TYPED-NAMES NIL)) ; (DECLARE (DYNAMIC-EXTENT #:HEAD11) ; (SB-C::NO-DEBUG #:HEAD11 #:TAIL12) ; (LIST CL-QUIL.FRONTEND::TYPED-NAMES)) ; (SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD (#S(SB-LOOP::LOOP-COLLECTOR ; :NAME NIL ; :CLASS LIST ; :HISTORY (APPEND) ; :TEMPVARS (#:HEAD13 #:TAIL14) ; :SPECIFIED-TYPE NIL ; :DTYPE LIST ; :DATA NIL) ; #:HEAD13 #:TAIL14) ; (TAGBODY ; SB-LOOP::NEXT-LOOP ; (WHEN (ENDP #:L10) (GO SB-LOOP::END-LOOP)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPE-TUPLE (CAR #:L10)) ; (SB-LOOP::LOOP-DESETQ #:L10 (CDR #:L10)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPED-NAME ; (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (ASSERT (AND # #)) ; (SB-LOOP::LOOP-COLLECT-RPLACD ; (#:HEAD11 #:TAIL12 CL-QUIL.FRONTEND::TYPED-NAMES) ; (LIST CL-QUIL.FRONTEND::TYPED-NAME)) ; (SB-LOOP::LOOP-COLLECT-RPLACD (#:HEAD13 #:TAIL14) (LIST `# `# `# `#)) ; (GO SB-LOOP::NEXT-LOOP) ; SB-LOOP::END-LOOP ; (RETURN-FROM NIL (SB-LOOP::LOOP-COLLECT-ANSWER #:HEAD13))))) ; ; caught STYLE-WARNING: ; The variable TYPED-NAMES is assigned but never read. ; in: DEFUN EXPAND-CLASSICAL-INSTRUCTION-DEFINITIONS ; (LOOP :FOR CL-QUIL.FRONTEND::TYPE-TUPLE :IN CL-QUIL.FRONTEND::TYPES ; :FOR CL-QUIL.FRONTEND::TYPED-NAME := (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE) ; :DO (ASSERT ; (AND ; (= CL-QUIL.FRONTEND::NUM-ARGS ; (LENGTH CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (EVERY #'CL-QUIL.FRONTEND::VALID-TYPE-SYMBOL-P ; CL-QUIL.FRONTEND::TYPE-TUPLE))) ; :COLLECT ...) ; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD ; ==> ; (LET* ((#:HEAD79 (SB-KERNEL:UNALIGNED-DX-CONS NIL)) ; (#:TAIL80 #:HEAD79) ; (CL-QUIL.FRONTEND::TYPED-NAMES NIL)) ; (DECLARE (DYNAMIC-EXTENT #:HEAD79) ; (SB-C::NO-DEBUG #:HEAD79 #:TAIL80) ; (LIST CL-QUIL.FRONTEND::TYPED-NAMES)) ; (SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD (#S(SB-LOOP::LOOP-COLLECTOR ; :NAME NIL ; :CLASS LIST ; :HISTORY (APPEND) ; :TEMPVARS (#:HEAD81 #:TAIL82) ; :SPECIFIED-TYPE NIL ; :DTYPE LIST ; :DATA NIL) ; #:HEAD81 #:TAIL82) ; (TAGBODY ; SB-LOOP::NEXT-LOOP ; (WHEN (ENDP #:L78) (GO SB-LOOP::END-LOOP)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPE-TUPLE (CAR #:L78)) ; (SB-LOOP::LOOP-DESETQ #:L78 (CDR #:L78)) ; (SB-LOOP::LOOP-DESETQ CL-QUIL.FRONTEND::TYPED-NAME ; (CL-QUIL.FRONTEND::MAKE-TYPED-NAME ; CL-QUIL.FRONTEND::NAME ; CL-QUIL.FRONTEND::TYPE-TUPLE)) ; (ASSERT (AND # #)) ; (SB-LOOP::LOOP-COLLECT-RPLACD ; (#:HEAD79 #:TAIL80 CL-QUIL.FRONTEND::TYPED-NAMES) ; (LIST CL-QUIL.FRONTEND::TYPED-NAME)) ; (SB-LOOP::LOOP-COLLECT-RPLACD (#:HEAD81 #:TAIL82) (LIST `# `# `# `#)) ; (GO SB-LOOP::NEXT-LOOP) ; SB-LOOP::END-LOOP ; (RETURN-FROM NIL (SB-LOOP::LOOP-COLLECT-ANSWER #:HEAD81))))) ; ; caught STYLE-WARNING: ; The variable TYPED-NAMES is assigned but never read. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil/frontend" "ast"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/parser.lisp ; in: DEFSTRUCT TOKEN ; (DEFSTRUCT ; (CL-QUIL.FRONTEND:TOKEN ; (:CONSTRUCTOR CL-QUIL.FRONTEND:TOK ; (TYPE &OPTIONAL CL-QUIL.FRONTEND::PAYLOAD ; (CL-QUIL.FRONTEND::LINE CL-QUIL.FRONTEND::*LINE-NUMBER*) ; (PATHNAME CL-QUIL.FRONTEND::*CURRENT-FILE*)))) ; "A lexical token." ; (CL-QUIL.FRONTEND::LINE NIL :TYPE (OR NULL (INTEGER 1)) :READ-ONLY T) ; (PATHNAME NIL :TYPE (OR NULL STRING PATHNAME) :READ-ONLY T) ; (TYPE NIL :TYPE SYMBOL :READ-ONLY T) ; (CL-QUIL.FRONTEND::PAYLOAD NIL :READ-ONLY T)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL.FRONTEND:TOKEN {1229A2CBD3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL.FRONTEND:TOKEN-TYPE and CL-QUIL.FRONTEND:TOKEN-PAYLOAD could not be inlined because the structure definition for CL-QUIL.FRONTEND:TOKEN 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-quil/frontend" "parser"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/clifford/stabilizer.lisp ; in: ; DECLAIM (INLINE TABLEAU-QUBITS TABLEAU-X (SETF TABLEAU-X) TABLEAU-Z (SETF TABLEAU-Z) TABLEAU-R (SETF TABLEAU-R) TABLEAU-SCRATCH (SETF TABLEAU-SCRATCH)) ; (DECLAIM ; (INLINE CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TABLEAU-X ; (SETF CL-QUIL.CLIFFORD::TABLEAU-X) CL-QUIL.CLIFFORD::TABLEAU-Z ; (SETF CL-QUIL.CLIFFORD::TABLEAU-Z) CL-QUIL.CLIFFORD::TABLEAU-R ; (SETF CL-QUIL.CLIFFORD::TABLEAU-R) CL-QUIL.CLIFFORD::TABLEAU-SCRATCH ; (SETF CL-QUIL.CLIFFORD::TABLEAU-SCRATCH))) ; ==> ; (SB-C::%PROCLAIM ; '(INLINE CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TABLEAU-X ; (SETF CL-QUIL.CLIFFORD::TABLEAU-X) CL-QUIL.CLIFFORD::TABLEAU-Z ; (SETF CL-QUIL.CLIFFORD::TABLEAU-Z) CL-QUIL.CLIFFORD::TABLEAU-R ; (SETF CL-QUIL.CLIFFORD::TABLEAU-R) CL-QUIL.CLIFFORD::TABLEAU-SCRATCH ; (SETF CL-QUIL.CLIFFORD::TABLEAU-SCRATCH)) ; (SB-C:SOURCE-LOCATION)) ; ; caught STYLE-WARNING: ; Proclaiming CL-QUIL.CLIFFORD::TABLEAU-QUBITS to be INLINE, but 1 call to it was previously compiled. A declaration of NOTINLINE at the call site will eliminate this warning, as will proclaiming and defining the function before its first potential use. ; in: DEFUN TABLEAU-MEASURE ; (DEFUN CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (CL-QUIL.CLIFFORD::TAB CL-QUIL.CLIFFORD::Q) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0)) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU CL-QUIL.CLIFFORD::TAB) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX CL-QUIL.CLIFFORD::Q)) ; (LET* ((CL-QUIL.CLIFFORD::N ; (CL-QUIL.CLIFFORD::TABLEAU-QUBITS CL-QUIL.CLIFFORD::TAB)) ; (CL-QUIL.CLIFFORD::P ; (LOOP :FOR CL-QUIL.CLIFFORD::P :BELOW CL-QUIL.CLIFFORD::N ; :WHEN # ; :DO # ; :FINALLY #))) ; (DECLARE ; (TYPE (OR CL-QUIL.CLIFFORD::TABLEAU-INDEX NULL) CL-QUIL.CLIFFORD::P) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX CL-QUIL.CLIFFORD::N)) ; (COND ; (CL-QUIL.CLIFFORD::P ; (CL-QUIL.CLIFFORD::TABLEAU-COPY-ROW CL-QUIL.CLIFFORD::TAB ; CL-QUIL.CLIFFORD::P #) ; (CL-QUIL.CLIFFORD::TABLEAU-SET-ROW-TO-PAULI CL-QUIL.CLIFFORD::TAB # #) ; (SETF #) (DOTIMES # #) (VALUES # NIL)) ; (T (CL-QUIL.CLIFFORD::TABLEAU-CLEAR-SCRATCH CL-QUIL.CLIFFORD::TAB) ; (LET # ; # ; # ; #))))) ; ==> ; (SB-IMPL::%DEFUN 'CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (SB-INT:NAMED-LAMBDA CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (CL-QUIL.CLIFFORD::TAB CL-QUIL.CLIFFORD::Q) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) ; (COMPILATION-SPEED 0)) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU CL-QUIL.CLIFFORD::TAB) ; (TYPE CL-QUIL.CLIFFORD::TABLEAU-INDEX ; CL-QUIL.CLIFFORD::Q)) ; (BLOCK CL-QUIL.CLIFFORD::TABLEAU-MEASURE ; (LET* (# #) ; (DECLARE # ; #) ; (COND # #))))) ; ; caught STYLE-WARNING: ; Call to CL-QUIL.CLIFFORD::TABLEAU-COPY-ROW could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil/frontend" "clifford" "stabilizer"> WARNING: redefining CL-QUIL.FRONTEND::PRINT-PARSED-PROGRAM-GENERIC in DEFGENERIC ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/linear-algebra.lisp ; in: DEFUN-INLINABLE PSUM ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; (QVM:PSUM-DOTIMES (QVM::I (LENGTH QVM::STATE)) ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; (FUNCALL QVM::F (AREF QVM::STATE QVM::I)) ; ; note: doing complex float to pointer coercion (cost 13) ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/wavefunction.lisp ; in: DEFUN PROBABILITY ; (DEFUN QVM:PROBABILITY (QVM::AMPLITUDE) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (LET ((QVM::RE (REALPART QVM::AMPLITUDE)) ; (QVM::IM (IMAGPART QVM::AMPLITUDE))) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM)))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM:PROBABILITY ; (QVM::AMPLITUDE) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Convert an amplitude into a probability." ; (DECLARE (TYPE QVM:CFLONUM QVM::AMPLITUDE)) ; (BLOCK QVM:PROBABILITY ; (LET ((QVM::RE #) (QVM::IM #)) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (+ (* QVM::RE QVM::RE) (* QVM::IM QVM::IM))))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-GROUND-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INJECT-BIT QVM::I QVM::QUBIT))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE WAVEFUNCTION-EXCITED-STATE-PROBABILITY ; (QVM:PSUM-DOTIMES (QVM::I (QVM::HALF (LENGTH QVM::WAVEFUNCTION))) ; (LET ((QVM::ADDRESS (QVM::INDEX-TO-ADDRESS QVM::I QVM::QUBIT 1))) ; (DECLARE (TYPE QVM:AMPLITUDE-ADDRESS QVM::ADDRESS)) ; (QVM:PROBABILITY (AREF QVM::WAVEFUNCTION QVM::ADDRESS)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM0 ; ; note: doing float to pointer coercion (cost 13) from #:SUM0 to "<return value>" ; --> IF FLET LET* LOOP BLOCK LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY ; --> RETURN-FROM ; ==> ; #:SUM13 ; ; note: doing float to pointer coercion (cost 13) from #:SUM13 to "<return value>" ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION6 (#:START2 #:END3) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START2) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END3)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM1 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM1 to "<return value>" ; in: DEFUN-INLINABLE APPLY-MATRIX-OPERATOR ; (APPLY QVM::KERNEL QVM::MATRIX QVM::WAVEFUNCTION (COERCE QVM::QUBITS 'LIST)) ; ; note: unable to optimize away possible call to FDEFINITION at runtime because: KERNEL is not known to be a function ; in: DEFUN-INLINABLE %SERIAL-NORM ; (QVM:DEFUN-INLINABLE QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...)) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::%SERIAL-NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; (BLOCK QVM::%SERIAL-NORM ; (LOOP :WITH QVM::S :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :BELOW (LENGTH QVM::WAVEFUNCTION) ; :DO ...))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; in: DEFUN-INLINABLE NORM ; (QVM:DEFUN-INLINABLE QVM::NORM ; (QVM::WAVEFUNCTION) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT ; (THE (QVM:FLONUM 0) (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION))) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION))) ; --> DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::NORM ; (QVM::WAVEFUNCTION) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Compute the length/L2 norm of the wavefunction WAVEFUNCTION." ; (DECLARE (INLINE QVM:PROBABILITY QVM::PSUM)) ; (BLOCK QVM::NORM ; (IF (<= QVM:*QUBITS-REQUIRED-FOR-PARALLELIZATION* ; (QVM::WAVEFUNCTION-QUBITS QVM::WAVEFUNCTION)) ; (SQRT (THE # #)) ; (QVM::%SERIAL-NORM QVM::WAVEFUNCTION)))) ; ; note: doing float to pointer coercion (cost 13) to "<return value>" ; (QVM::PSUM #'QVM:PROBABILITY QVM::WAVEFUNCTION) ; --> BLOCK QVM:PSUM-DOTIMES LET IF FLET ; ==> ; (#:WORKER-FUNCTION8 (#:START4 #:END5) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START4) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END5)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM3 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM3 to "<return value>" ; in: DEFUN NORMALIZE-WAVEFUNCTION ; (QVM:FLONUM LENGTH) ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; (QVM:PDOTIMES (QVM::I (LENGTH QVM::WAVEFUNCTION) QVM::WAVEFUNCTION) ; (SETF (AREF QVM::WAVEFUNCTION QVM::I) ; (* QVM::INV-NORM (AREF QVM::WAVEFUNCTION QVM::I)))) ; --> IF LPARALLEL.COGNATE:PDOTIMES LET PROGN LPARALLEL.COGNATE::%PDOTIMES ; --> LAMBDA ; ==> ; #'(LAMBDA (QVM::I) ; (TAGBODY (SETF (AREF QVM::WAVEFUNCTION QVM::I) (* QVM::INV-NORM #)))) ; ; note: doing float to pointer coercion (cost 13), for: ; the second argument of CLOSURE-INIT ; (QVM::NORM QVM::WAVEFUNCTION) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM16 to "<return value>" ; in: DEFUN WF ; (QVM:CFLONUM ELT) ; --> BLOCK COERCE ; ==> ; 1 ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a REAL, not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a REAL, not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; ; note: forced to do full call ; unable to do complex float imagpart (cost 3) because: ; The first argument is a (OR (COMPLEX SINGLE-FLOAT) (COMPLEX RATIONAL)), not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES (OR RATIONAL SINGLE-FLOAT) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; ; note: forced to do full call ; unable to do inline float coercion (cost 2) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a SINGLE-FLOAT. ; unable to do inline float coercion (cost 5) because: ; The first argument is a (OR RATIONAL SINGLE-FLOAT), not a (SIGNED-BYTE 64). ; in: DEFUN GAUSSIAN-RANDOM-COMPLEX ; (DEFUN QVM::GAUSSIAN-RANDOM-COMPLEX () ; "Return a complex number with Gaussian-random real and imaginary parts." ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM))) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA QVM::GAUSSIAN-RANDOM-COMPLEX ; NIL ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; "Return a complex number with Gaussian-random real and imaginary parts." ; (BLOCK QVM::GAUSSIAN-RANDOM-COMPLEX ; (MULTIPLE-VALUE-BIND (QVM::RE QVM::IM) ; (ALEXANDRIA:GAUSSIAN-RANDOM) ; (DECLARE (TYPE QVM:FLONUM QVM::RE QVM::IM)) ; (COMPLEX QVM::RE QVM::IM)))) ; ; note: doing complex float to pointer coercion (cost 13) to "<return value>" ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/compile-gate.lisp ; in: DEFUN GENERATE-INNER-MATRIX-MULTIPLY-CODE ; (LOOP :FOR QVM::J :BELOW QVM::N ; :FOR QVM::C := (NTH QVM::J QVM::COLUMN) ; :FOR QVM::MIJ := ...) ; --> LET LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY ; --> SB-LOOP::LOOP-DESETQ ; ==> ; (SETQ QVM::MIJ (AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13) to MIJ ; `(* ,QVM::C ,(AREF QVM::MATRIX QVM::I QVM::J)) ; ; note: doing complex float to pointer coercion (cost 13), for: ; the third argument of LIST ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/src/measurement.lisp ; in: DEFMETHOD FORCE-MEASUREMENT (T T PURE-STATE T) ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: unable to optimize due to type uncertainty: The result is a (VALUES (OR (COMPLEX DOUBLE-FLOAT) (DOUBLE-FLOAT 0.0d0 1.0d0)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (/ (SQRT QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13), for: ; the first result of inline float arithmetic ; (SQRT (- (QVM:FLONUM 1) QVM::EXCITED-PROBABILITY)) ; ; note: doing float to pointer coercion (cost 13) ; in: DEFGENERIC GET-EXCITED-STATE-PROBABILITY ; (AREF QVM::RHO QVM::I QVM::I) ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to optimize because: The array dimensions are unknown; must call ARRAY-DIMENSION at runtime. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; ; note: unable to avoid runtime dispatch on array element type because: Upgraded element type of array is not known at compile time. ; (REALPART (AREF QVM::RHO QVM::I QVM::I)) ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; ; note: forced to do full call ; unable to do complex float realpart (cost 3) because: ; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT). ; (QVM:PSUM-DOTIMES (QVM::K (EXPT 2 (1- (QVM::NUM-QUBITS QVM::STATE)))) ; (LET ((QVM::I (QVM::INDEX-TO-ADDRESS QVM::K QVM::QUBIT 1))) ; (REALPART (AREF QVM::RHO QVM::I QVM::I)))) ; --> IF LOCALLY LOOP BLOCK LET LET TAGBODY RETURN RETURN-FROM ; ==> ; #:SUM20 ; ; note: doing float to pointer coercion (cost 13) from #:SUM20 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION-IN-PARALLEL-TRULY ; (QVM:PSUM-DOTIMES (QVM::I ; (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM (- QVM::MID MIN))) ; (LET ((QVM::I (THE ALEXANDRIA:NON-NEGATIVE-FIXNUM #))) ; (QVM:PROBABILITY (AREF QVM:WF QVM::I)))) ; --> IF FLET ; ==> ; (#:WORKER-FUNCTION12 (#:START8 #:END9) ; (DECLARE (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:START8) ; (TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM #:END9)) ; (LOCALLY ; (DECLARE ; (OPTIMIZE SPEED (SAFETY 0) (DEBUG 0) (SPACE 0) (COMPILATION-SPEED 0))) ; (LOOP :WITH #:PARTIAL-SUM7 :OF-TYPE QVM:FLONUM := (QVM:FLONUM 0) ; :FOR QVM::I :OF-TYPE ALEXANDRIA:NON-NEGATIVE-FIXNUM :FROM ...))) ; ; note: doing float to pointer coercion (cost 13) from #:PARTIAL-SUM7 to "<return value>" ; in: DEFUN SAMPLE-WAVEFUNCTION-MULTIPLE-TIMES ; (MT19937:RANDOM 1.0d0) ; --> BLOCK LET* - SCALE-FLOAT FLOAT ; ==> ; (+ (EXPT 2 52) MT19937::RANDOM-MANTISSA-BITS) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 1) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a UNSIGNED-BYTE, not a FIXNUM. ; The result is a (VALUES (INTEGER 4503599627370496) &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; etc. ; ==> ; 1 ; ; note: forced to do full call ; unable to do inline float coercion (cost 5) because: ; The first argument is a (INTEGER 4611686018427387904), not a (SIGNED-BYTE 64). ; in: DEFUN SAMPLE-WAVEFUNCTION-AS-DISTRIBUTION ; (AREF QVM::PS QVM::I) ; ; note: unable to optimize due to type uncertainty: The first argument is a (VECTOR DOUBLE-FLOAT), not a SIMPLE-ARRAY. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/matrix-operations.lisp ; in: DEFUN ORTHONORMALIZE-MATRIX! ; (SQRT CL-QUIL::N^2) ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a SINGLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; ; note: unable to optimize due to type uncertainty: The first argument is a NUMBER, not a DOUBLE-FLOAT.The result is a (VALUES (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES FLOAT &REST T). ; (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; unable to do inline float arithmetic (cost 1) because: ; The first argument is a T, not a (COMPLEX DOUBLE-FLOAT). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (COMPLEX DOUBLE-FLOAT) &OPTIONAL). ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (LOOP :FOR CL-QUIL::I :BELOW CL-QUIL::NROWS ; :SUM (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; --> LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE ; ==> ; (+ #:SUM17 ; (* (CONJUGATE (MAGICL:TREF CL-QUIL::A CL-QUIL::I CL-QUIL::P)) ; (MAGICL:TREF CL-QUIL::B CL-QUIL::I CL-QUIL::Q))) ; ; note: forced to do GENERIC-+ (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a NUMBER, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; (/ (MAGICL:TREF CL-QUIL::M CL-QUIL::ROW CL-QUIL::COL) CL-QUIL::NORM) ; ; note: forced to do full call ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; unable to do inline float arithmetic (cost 12) because: ; The first argument is a T, not a (COMPLEX SINGLE-FLOAT). ; The second argument is a (OR (FLOAT 0.0) (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)), not a SINGLE-FLOAT. ; The result is a (VALUES (OR FLOAT (COMPLEX SINGLE-FLOAT) (COMPLEX DOUBLE-FLOAT)) &OPTIONAL), not a (VALUES (COMPLEX SINGLE-FLOAT) &OPTIONAL). ; etc. ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J)) ; ; note: forced to do GENERIC-* (cost 30) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a NUMBER, not a FIXNUM. ; The second argument is a T, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because: ; The first argument is a NUMBER, not a (UNSIGNED-BYTE 64). ; The second argument is a T, not a (UNSIGNED-BYTE 64). ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (DECF (MAGICL:TREF CL-QUIL::V CL-QUIL::ROW CL-QUIL::K) ; (* CL-QUIL::S (MAGICL:TREF CL-QUIL::Q CL-QUIL::ROW CL-QUIL::J))) ; --> SB-IMPL::XSUBTRACT BLOCK ; ==> ; (- SB-IMPL::B SB-IMPL::A) ; ; note: forced to do GENERIC-- (cost 10) ; unable to do inline fixnum arithmetic (cost 2) because: ; The first argument is a T, not a FIXNUM. ; The second argument is a NUMBER, not a FIXNUM. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline float arithmetic (cost 2) because: ; The first argument is a T, not a SINGLE-FLOAT. ; The second argument is a NUMBER, not a SINGLE-FLOAT. ; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT &OPTIONAL). ; etc. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/define-compiler.lisp ; in: DEFUN FIND-SHORTEST-COMPILER-PATH ; (DEFUN CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET CL-QUIL::OCCURRENCE-TABLE ; &OPTIONAL CL-QUIL::QUBIT-COUNT) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {120D75343F}> ; (LET ((CL-QUIL.FRONTEND:QUEUE ; (MAKE-INSTANCE 'CL-HEAP:PRIORITY-QUEUE :SORT-FUN #))) ; (FLET ((CL-QUIL::COLLECT-BINDINGS # ; #)) ; (LOOP :WITH CL-QUIL::VISITED-NODES := NIL ; :FOR (CL-QUIL::TASK . CL-QUIL::HISTORY) := (LIST ; CL-QUIL::OCCURRENCE-TABLE) :THEN (CL-HEAP:DEQUEUE ; CL-QUIL.FRONTEND:QUEUE) ; :UNLESS ...)))) ; ==> ; (SB-IMPL::%DEFUN 'CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (SB-INT:NAMED-LAMBDA CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (CL-QUIL::COMPILERS CL-QUIL::TARGET-GATESET ; CL-QUIL::OCCURRENCE-TABLE &OPTIONAL ; CL-QUIL::QUBIT-COUNT) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (730)) Produces a path of compilers, drawn from COMPILERS, which convert all of the entries of OCCURRENCE-TABLE into "native gates" according to TARGET-GATESET. Returns an alternating chain of occurrence ta... {120D75343F}> ; (BLOCK CL-QUIL::FIND-SHORTEST-COMPILER-PATH ; (LET (#) ; (FLET # ; #))))) ; ; caught STYLE-WARNING: ; Call to CL-HEAP:DEQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. ; ; caught STYLE-WARNING: ; Call to CL-HEAP:ENQUEUE could not be inlined because its source code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be in effect to save function definitions for inlining. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "define-compiler"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compiler-hook.lisp ; in: DEFUN COMPILER-HOOK ; (DEFUN CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION ; &KEY (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {1229BC59FF}> ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COPY-INSTANCE ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (WHEN ; (AND (NOT (EQL ':NAIVE CL-QUIL::REWIRING-TYPE)) ; (> ; (CL-QUIL.FRONTEND:QUBITS-NEEDED CL-QUIL.FRONTEND:PARSED-PROGRAM) ; (LENGTH #)) ; (NOT ; (CL-QUIL.FRONTEND:PARSED-PROGRAM-HAS-PRESERVE-BLOCKS-P ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:COMPRESS-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Applying transform ~A." ; CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM ; (CL-QUIL.FRONTEND:TRANSFORM CL-QUIL::XFORM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ...) ; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; ==> ; #'(SB-INT:NAMED-LAMBDA CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION &KEY ; (CL-QUIL::PROTOQUIL NIL) ; (CL-QUIL::REWIRING-TYPE ; (CL-QUIL::PROG-INITIAL-REWIRING-HEURISTIC ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (CL-QUIL::TRANSFORMS CL-QUIL::*STANDARD-PRE-COMPILATION-TRANSFORMS*) ; (CL-QUIL::DESTRUCTIVE NIL) ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM ; CL-QUIL.FRONTEND:PARSED-PROGRAM))) ; (DECLARE (SB-C::TOP-LEVEL-FORM)) ; #<(SIMPLE-ARRAY CHARACTER ; (1034)) Runs a full compiler pass on a parsed-program object. ; ; Arguments: ; ; - PARSED-PROGRAM: The parsed program to compile ; ; - CHIP-SPECIFICATION: The chip specification describing the target chip ; ; Keyword... {1229BC59FF}> ; (BLOCK CL-QUIL:COMPILER-HOOK ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: entrance.") ; (UNLESS CL-QUIL::DESTRUCTIVE (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (WHEN (AND (NOT #) (> # #) (NOT #)) ; (CL-QUIL.FRONTEND:FORMAT-NOISE "COMPILER-HOOK: Compressing qubits.") ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (DOLIST (CL-QUIL::XFORM CL-QUIL::TRANSFORMS) ; (CL-QUIL.FRONTEND:FORMAT-NOISE ; "COMPILER-HOOK: Applying transform ~A." CL-QUIL::XFORM) ; (SETF CL-QUIL.FRONTEND:PARSED-PROGRAM #)) ; (CL-QUIL::WARM-CHIP-SPEC-LOOKUP-CACHE CL-QUIL::CHIP-SPECIFICATION) ; (LOOP :FOR CL-QUIL::MDESC :IN (CL-QUIL.FRONTEND:PARSED-PROGRAM-MEMORY-DEFINITIONS ; CL-QUIL.FRONTEND:PARSED-PROGRAM) ; :WHEN (CL-QUIL.FRONTEND:MEMORY-DESCRIPTOR-SHARING-PARENT ; CL-QUIL::MDESC) ; :DO (ERROR ; "Programs with aliased memory are currently unsupported.")) ; (WHEN (EQL ':NAIVE CL-QUIL::REWIRING-TYPE) ; (CL-QUIL::CHECK-PROGRAM-SKIPS-DEAD-QUBITS ; CL-QUIL.FRONTEND:PARSED-PROGRAM CL-QUIL::CHIP-SPECIFICATION)) ; (WHEN CL-QUIL::PROTOQUIL ; (CL-QUIL:CHECK-PROTOQUIL-PROGRAM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; (MULTIPLE-VALUE-BIND ; (CL-QUIL::INITIAL-REWIRING CL-QUIL::L2P-COMPONENTS) ; (CL-QUIL::PROG-INITIAL-REWIRING CL-QUIL.FRONTEND:PARSED-PROGRAM ; CL-QUIL::CHIP-SPECIFICATION :TYPE CL-QUIL::REWIRING-TYPE) ; (LET* (# # # #) ; (CL-QUIL::CHECK-PRESERVED-BLOCKS-SKIP-DEAD-QUBITS CL-QUIL::CFG ; CL-QUIL::CHIP-SPECIFICATION) ; (LET # ; #) ; (WHEN CL-QUIL::PROTOQUIL #) ; (LABELS # ; # ; # ; #))))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; (CL-QUIL::*ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* ; (CL-QUIL::PROG-REWIRING-SEARCH-ALGORITHM CL-QUIL.FRONTEND:PARSED-PROGRAM)) ; ; caught STYLE-WARNING: ; The variable *ADDRESSER-REWIRING-SWAP-SEARCH-TYPE* is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "cl-quil" "compiler-hook"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/chip/chip-specification.lisp ; in: DEFSTRUCT CHIP-SPECIFICATION ; (DEFSTRUCT CL-QUIL::CHIP-SPECIFICATION ; #<(SIMPLE-ARRAY CHARACTER ; (957)) Houses information about hardware components on a QPU. ; ; OBJECTS is an array. In its nth position, there is a vector of order n hardware objects on the chip. ; ; GENERIC-COMPILERS is a vector of functions... {122A642EBF}> ; (CL-QUIL::OBJECTS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR))) ; :TYPE VECTOR) ; (CL-QUIL::GENERIC-COMPILERS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE VECTOR) ; (CL-QUIL::GENERIC-REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) :TYPE ; VECTOR) ; (CL-QUIL::LOOKUP-CACHE NIL :TYPE (OR NULL HASH-TABLE))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::CHIP-SPECIFICATION {122A604FE3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::CHIP-SPECIFICATION-GENERIC-COMPILERS could not be inlined because the structure definition for CL-QUIL::CHIP-SPECIFICATION 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 GATE-RECORD ; (DEFSTRUCT (CL-QUIL::GATE-RECORD (:COPIER NIL)) ; "Houses information about a hardware instantiation of a gate. ; ; FIDELITY stores the measured gate fidelity. ; ; DURATION stores the measured gate duration (in nanoseconds)." ; (CL-QUIL::FIDELITY CL-QUIL::+NEAR-PERFECT-FIDELITY+ :TYPE (OR NULL REAL)) ; (CL-QUIL::DURATION 1/100 :TYPE (OR NULL REAL))) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::GATE-RECORD {122AD54453}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::GATE-RECORD-FIDELITY and CL-QUIL::GATE-RECORD-DURATION could not be inlined because the structure definition for CL-QUIL::GATE-RECORD 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 HARDWARE-OBJECT ; (DEFSTRUCT CL-QUIL::HARDWARE-OBJECT ; #<(SIMPLE-ARRAY CHARACTER ; (1556)) Houses information about a particular hardware object on a QPU. ; ; ORDER is a non-negative integer that counts the number of qubit subsidiaries of this hardware object. Equals (1- (length (vnth 0 (hardw... {122AFC63AF}> ; (CL-QUIL::ORDER 0 :TYPE UNSIGNED-BYTE :READ-ONLY T) ; (CL-QUIL::GATE-INFORMATION (MAKE-HASH-TABLE :TEST #'EQUALP)) ; (CL-QUIL::COMPILATION-METHODS (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::PERMUTATION-GATES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::REWRITING-RULES (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)) ; (CL-QUIL::CXNS ; (MAKE-ARRAY 2 :INITIAL-CONTENTS ; (LIST (CL-QUIL::MAKE-ADJUSTABLE-VECTOR) ; (CL-QUIL::MAKE-ADJUSTABLE-VECTOR)))) ; (CL-QUIL::MISC-DATA (MAKE-HASH-TABLE :TEST #'EQUAL) :TYPE HASH-TABLE)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::HARDWARE-OBJECT {122AF6EDC3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::HARDWARE-OBJECT-COMPILATION-METHODS and CL-QUIL::HARDWARE-OBJECT-CXNS could not be inlined because the structure definition for CL-QUIL::HARDWARE-OBJECT 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-quil" "chip" "chip-specification"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/compressor.lisp ; in: DEFSTRUCT PEEPHOLE-REWRITER-NODE ; (DEFSTRUCT CL-QUIL::PEEPHOLE-REWRITER-NODE ; "A node housing an instruction and attendant metadata used during peephole rewriting. Essentially a doubly-linked list." ; (CL-QUIL::INSTR NIL :TYPE CL-QUIL.FRONTEND:APPLICATION) ; (CL-QUIL::PREV NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::NEXT NIL :TYPE (OR NULL CL-QUIL::PEEPHOLE-REWRITER-NODE)) ; (CL-QUIL::CONTEXT NIL)) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::PEEPHOLE-REWRITER-NODE {1238D6EFD3}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled calls to CL-QUIL::PEEPHOLE-REWRITER-NODE-INSTR and CL-QUIL::PEEPHOLE-REWRITER-NODE-NEXT could not be inlined because the structure definition for CL-QUIL::PEEPHOLE-REWRITER-NODE 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-quil" "compressor" "compressor"> ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/quilc/38b5b8116689b2cca5755a90f74e8888870a2621/quilc-20250717-git/src/compressor/wavefunctions.lisp ; in: DEFSTRUCT ANTISOCIAL-QVM ; (DEFSTRUCT CL-QUIL::ANTISOCIAL-QVM ; #<(SIMPLE-ARRAY CHARACTER ; (658)) ANTISOCIAL-QVM instances represent partially-tracked low-correlation wavefunctions. ; ; WFS is a vector. The jth entry points to the wavefunction component in which the jth external qubit lies. ; ; INTERNAL... {123A57C74F}> ; (CL-QUIL::WFS #()) ; (CL-QUIL::INTERNAL-INDICES #())) ; --> EVAL-WHEN ; ==> ; (SB-KERNEL::%COMPILER-DEFSTRUCT ; '#<SB-KERNEL:DEFSTRUCT-DESCRIPTION CL-QUIL::ANTISOCIAL-QVM {123A581B53}> ; '#(#<SB-KERNEL:LAYOUT for T {50000003}> ; #<SB-KERNEL:LAYOUT (ID=1) for STRUCTURE-OBJECT {50000073}>)) ; ; caught STYLE-WARNING: ; Previously compiled call to CL-QUIL::ANTISOCIAL-QVM-WFS could not be inlined because the structure definition for CL-QUIL::ANTISOCIAL-QVM 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-quil" "compressor" "wavefunctions"> WARNING: redefining TRIVIAL-BENCHMARK:RUNNING in DEFGENERIC WARNING: redefining TRIVIAL-BENCHMARK:METRICS in DEFGENERIC WARNING: redefining TRIVIAL-BENCHMARK:STARTING-VALUE in DEFGENERIC ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/utilities.lisp ; in: DEFUN WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::RE) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::IM) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::RE) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::IM) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; in: DEFUN WRITE-DOUBLE-FLOAT-AS-BINARY ; (IEEE-FLOATS:ENCODE-FLOAT64 QVM-APP::X) ; --> BLOCK MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND THE ; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/handle-request.lisp ; in: DEFUN HANDLE-POST-REQUEST ; (QVM-APP::WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY QVM-APP::Z ; QVM-APP::REPLY-STREAM) ; --> BLOCK LET LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (QVM-APP::WRITE-DOUBLE-FLOAT-AS-BINARY QVM-APP::X QVM-APP::REPLY-STREAM) ; --> BLOCK LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> FUNCTION LET IF VALUES ; ==> ; (ASH (ROUND (* 4503599627370496 IEEE-FLOATS::SIGNIFICAND)) ; IEEE-FLOATS::EXPONENT) ; ; note: forced to do full call ; unable to do inline ASH (cost 3) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a FIXNUM. ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 64). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL). ; unable to do inline ASH (cost 4) because: ; The first argument is a (OR (INTEGER * 4611686018427387392) (INTEGER 4611686018427387904)), not a (UNSIGNED-BYTE 64). ; The second argument is a (INTEGER -1074 0), not a (UNSIGNED-BYTE 62). ; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES (UNSIGNED-BYTE 64) &OPTIONAL). ; etc. ; (QVM-APP::WRITE-COMPLEX-DOUBLE-FLOAT-AS-BINARY QVM-APP::Z ; QVM-APP::REPLY-STREAM) ; --> BLOCK LET LET IEEE-FLOATS:ENCODE-FLOAT64 BLOCK MULTIPLE-VALUE-BIND ; --> MULTIPLE-VALUE-CALL COND THE MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ; --> DECODE-FLOAT ; ==> ; 1 ; ; note: doing float to pointer coercion (cost 13) ; ; note: doing float to pointer coercion (cost 13) ; ; caught ERROR: ; READ error during COMPILE-FILE: Symbol "*USE-DEDICATED-OUTPUT-STREAM*" not found in the SWANK package. Line: 9, Column: 43, File-Position: 166 Stream: #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/qvm/57393a0b6556d11686b77967e67659782119e370/qvm-20250717-git/app/src/entry-point.lisp" {1214010383}> Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=3530112 "main thread" RUNNING {123FD70093}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "qvm-app" "entry-point"> Backtrace for: #<SB-THREAD:THREAD tid=3530112 "main thread" RUNNING {123FD70093}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12140215A3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12140215A3}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12140215A3}>) 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 "qvm-app" "entry-point">))) 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 "qvm-app" "entry-point">))) 5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "qvm-app" "entry-point">) 6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "qvm-app" "entry-point">) [fast-method] 8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {120463C043}>) [fast-method] 9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {120463C043}>) [fast-method] 11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil-benchmarking"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil-benchmarking">) 13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "cl-quil-benchmarking">) [fast-method] 15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "cl-quil-benchmarking") 16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "cl-quil-benchmarking") [fast-method] 18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120464E36B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120460D30B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "cl-quil-benchmarking") [fast-method] 22: (DEPCHECK::COMPUTE-DEPENDENCIES "cl-quil-benchmarking" "cl-quil-benchmarking") 23: (DEPCHECK::MAGIC "cl-quil-benchmarking" "cl-quil-benchmarking" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-1Ias91dA/depcheck-win.txt") 24: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "cl-quil-benchmarking" "cl-quil-benchmarking" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-1Ias91dA/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-1Ias91dA/depcheck-fail.txt")) 25: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 26: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 27: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 28: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 2 fatal ERROR conditions ; caught 1 ERROR condition ; caught 16 STYLE-WARNING conditions ; printed 62 notes