dataloader

SBCL 2.0.5 / ASDF 3.3.1

dataloader

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: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::LOOP* in DEFMACRO
WARNING: redefining UIOP/COMMON-LISP::FROB-SUBSTRINGS in DEFUN
WARNING: redefining UIOP/COMMON-LISP::COMPATFMT in DEFMACRO
WARNING: redefining UIOP/UTILITY:DEFGENERIC* in DEFMACRO
WARNING: redefining UIOP/UTILITY:DEFUN* in DEFMACRO
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/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: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/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:WITH-OUTPUT in DEFMACRO
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:GET-OPTIMIZATION-SETTINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:PROCLAIM-OPTIMIZATION-SETTINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:WITH-OPTIMIZATION-SETTINGS in DEFMACRO
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: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 (#<STRUCTURE-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 (#<STRUCTURE-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: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/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/cl-ppcre/d6593d8f842bcf6af810ff93c6c02b757bd49ecf/cl-ppcre-20210319-git/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/flexi-streams/5cda15aa3a57ab0aee15cf5c149b608595f02eb8/flexi-streams-20210319-git/flexi-streams.asd" contains definition for system "flexi-streams-test". Please only define "flexi-streams" and secondary systems with a name starting with "flexi-streams/" (e.g. "flexi-streams/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/ieee-floats/fa9e496f0fcf4ba05754fc32787f728ca6e2d674/ieee-floats-20210319-git/ieee-floats.asd" contains definition for system "ieee-floats-tests". Please only define "ieee-floats" and secondary systems with a name starting with "ieee-floats/" (e.g. "ieee-floats/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/cl-interpol/947bdd72ec95e8206be01a59f3bed8c234480b19/cl-interpol-20210319-git/cl-interpol.asd" contains definition for system "cl-interpol-test". Please only define "cl-interpol" and secondary systems with a name starting with "cl-interpol/" (e.g. "cl-interpol/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/symbol-munger/a8589c60f470b8b280eacd9c983d96bc5f337341/symbol-munger-20210319-git/symbol-munger.asd" contains definition for system "symbol-munger-test". Please only define "symbol-munger" and secondary systems with a name starting with "symbol-munger/" (e.g. "symbol-munger/test") in that file.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/specialized-function/2cc4ff2d6986a481f8949ec83146bef84053a3fe/specialized-function-20210319-git/src/1common.lisp
; in: DEFUN UPGRADED-OBJECT-TYPE
;     'COMPLEX
; 
; note: deleting unreachable code

;     '(COMPLEX LONG-FLOAT)
; 
; note: deleting unreachable code

;     '(COMPLEX SINGLE-FLOAT)
; 
; note: deleting unreachable code

;     'LONG-FLOAT
; 
; note: deleting unreachable code

;     'SINGLE-FLOAT
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/trivialib.type-unify/5c418715ea5055ed60e1f9e4315c98dfbe424db0/trivialib.type-unify-20210319-git/src/package.lisp
; in: DEFUN %UNIFY-NUMEROID
;     (TRIVIA.LEVEL2:MULTIPLE-VALUE-MATCH (TRIVIALIB.TYPE-UNIFY::UNIFY-DIMENSIONS
;                                          TRIVIALIB.TYPE-UNIFY::TYPEVARS
;                                          TRIVIALIB.TYPE-UNIFY::HIGH1
;                                          TRIVIALIB.TYPE-UNIFY::HIGH2)
;       ((TRIVIALIB.TYPE-UNIFY::MAPPING2 T)
;        (TRIVIALIB.TYPE-UNIFY::MERGE-MAPPINGS-AS-AND
;         TRIVIALIB.TYPE-UNIFY::MAPPING1 TRIVIALIB.TYPE-UNIFY::MAPPING2)))
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION TRIVIA.LEVEL2:MATCH* 
; --> TRIVIA.LEVEL2:MATCH2* TRIVIA.LEVEL2:MATCH2*+ SYMBOL-MACROLET 
; --> TRIVIA.LEVEL1:MATCH1 LET BLOCK BLOCK LET RETURN-FROM LOCALLY 
; --> TRIVIA.LEVEL1:MATCH1 LET BLOCK BLOCK LET TRIVIA.LEVEL1:TRACE-WHEN WHEN IF 
; --> LOCALLY 
; ==>
;   (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
;     (LOCALLY
;      (TRIVIA.LEVEL1:MATCH1 NIL
;        ((TRIVIA.LEVEL1:GUARD1 #:IT346 T)
;         (TRIVIALIB.TYPE-UNIFY::MERGE-MAPPINGS-AS-AND
;          TRIVIALIB.TYPE-UNIFY::MAPPING1 TRIVIALIB.TYPE-UNIFY::MAPPING2))
;        ((TRIVIA.LEVEL1:GUARD1 #:IT347 T) (TRIVIA.NEXT:NEXT)))))
; 
; note: Type assertion too complex to check:
; (VALUES SEQUENCE &OPTIONAL (MEMBER T)).
; It allows a variable number of values, consider using
; (VALUES SEQUENCE (MEMBER T) &OPTIONAL).

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/trivialib.type-unify/5c418715ea5055ed60e1f9e4315c98dfbe424db0/trivialib.type-unify-20210319-git/src/package.lisp
; in: DEFUN UNIFY-DIMENSIONS
;     (TRIVIA.LEVEL2:MULTIPLE-VALUE-MATCH (TRIVIALIB.TYPE-UNIFY::UNIFY-DIMENSIONS
;                                          TRIVIALIB.TYPE-UNIFY::TYPEVARS
;                                          TRIVIALIB.TYPE-UNIFY::REST1
;                                          TRIVIALIB.TYPE-UNIFY::REST2)
;       ((TRIVIALIB.TYPE-UNIFY::MAPPING2 T)
;        (TRIVIALIB.TYPE-UNIFY::MERGE-MAPPINGS-AS-AND
;         TRIVIALIB.TYPE-UNIFY::MAPPING1 TRIVIALIB.TYPE-UNIFY::MAPPING2)))
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION TRIVIA.LEVEL2:MATCH* 
; --> TRIVIA.LEVEL2:MATCH2* TRIVIA.LEVEL2:MATCH2*+ SYMBOL-MACROLET 
; --> TRIVIA.LEVEL1:MATCH1 LET BLOCK BLOCK LET RETURN-FROM LOCALLY 
; --> TRIVIA.LEVEL1:MATCH1 LET BLOCK BLOCK LET TRIVIA.LEVEL1:TRACE-WHEN WHEN IF 
; --> LOCALLY 
; ==>
;   (RETURN-FROM TRIVIA.LEVEL1.IMPL::WHOLE
;     (LOCALLY
;      (TRIVIA.LEVEL1:MATCH1 NIL
;        ((TRIVIA.LEVEL1:GUARD1 #:IT97 T)
;         (TRIVIALIB.TYPE-UNIFY::MERGE-MAPPINGS-AS-AND
;          TRIVIALIB.TYPE-UNIFY::MAPPING1 TRIVIALIB.TYPE-UNIFY::MAPPING2))
;        ((TRIVIA.LEVEL1:GUARD1 #:IT98 T) (TRIVIA.NEXT:NEXT)))))
; 
; note: Type assertion too complex to check:
; (VALUES SEQUENCE &OPTIONAL (MEMBER T)).
; It allows a variable number of values, consider using
; (VALUES SEQUENCE (MEMBER T) &OPTIONAL).

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/gtype/37953b070441e2f639c9d98e42b96d287ccf6a20/gtype-20210319-git/src/package.lisp
; in: DEFUN VARIABLEP
;     (TRIVIA.LEVEL2:MATCH SYMBOL
;       ((SYMBOL :NAME (TRIVIA.LEVEL2:STRING* #\?)) T))
; --> TRIVIA.LEVEL2:MATCH2 TRIVIA.LEVEL2:MATCH2+ 
; ==>
;   (TRIVIA.LEVEL2:MATCH2*+ (SYMBOL)
;       (T)
;     (((SYMBOL :NAME (TRIVIA.LEVEL2:STRING* #\?))) T)
;     ((TRIVIA.LEVEL2.IMPL::_) NIL))
; 
; caught STYLE-WARNING:
;   Calling #<FUNCTION SYMBOL-NAME> failed, but not by program-error (TYPE-ERROR).
;   Trivia probed candidate function #<FUNCTION SYMBOL-NAME> by calling it with 
;   a single dummy argument 42. The call may fail due to various reasons,
;   but program-error is a strong indication of not being unary.
;    In order to disable this probing, run (SETF *ARITY-CHECK-BY-TEST-CALL* NIL) .
;   
;   Note: This style warning is shown only once.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "gtype" "src" "package">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/1constants.lisp
; in: DEFUN MOST-POSITIVE-VALUE
;     (CASE NUMCL.IMPL::*NUMCL-DEFAULT-FLOAT-FORMAT*
;       (SHORT-FLOAT MOST-POSITIVE-SHORT-FLOAT)
;       (SINGLE-FLOAT MOST-POSITIVE-SINGLE-FLOAT)
;       (DOUBLE-FLOAT MOST-POSITIVE-DOUBLE-FLOAT)
;       (LONG-FLOAT MOST-POSITIVE-LONG-FLOAT))
; --> LET COND IF IF IF PROGN 
; ==>
;   MOST-POSITIVE-DOUBLE-FLOAT
; 
; note: deleting unreachable code

; --> LET COND IF PROGN 
; ==>
;   MOST-POSITIVE-SHORT-FLOAT
; 
; note: deleting unreachable code

; --> LET COND IF IF IF PROGN 
; ==>
;   MOST-POSITIVE-DOUBLE-FLOAT
; 
; note: deleting unreachable code

; --> LET COND IF PROGN 
; ==>
;   MOST-POSITIVE-SHORT-FLOAT
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/1constants.lisp
; in: DEFUN MOST-NEGATIVE-VALUE
;     (CASE NUMCL.IMPL::*NUMCL-DEFAULT-FLOAT-FORMAT*
;       (SHORT-FLOAT MOST-NEGATIVE-SHORT-FLOAT)
;       (SINGLE-FLOAT MOST-NEGATIVE-SINGLE-FLOAT)
;       (DOUBLE-FLOAT MOST-NEGATIVE-DOUBLE-FLOAT)
;       (LONG-FLOAT MOST-NEGATIVE-LONG-FLOAT))
; --> LET COND IF IF IF PROGN 
; ==>
;   MOST-NEGATIVE-DOUBLE-FLOAT
; 
; note: deleting unreachable code

; --> LET COND IF PROGN 
; ==>
;   MOST-NEGATIVE-SHORT-FLOAT
; 
; note: deleting unreachable code

; --> LET COND IF IF IF PROGN 
; ==>
;   MOST-NEGATIVE-DOUBLE-FLOAT
; 
; note: deleting unreachable code

; --> LET COND IF PROGN 
; ==>
;   MOST-NEGATIVE-SHORT-FLOAT
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/1type.lisp
; in: DEFCONSTANT *NUMCL-DEFAULT-FLOAT-FORMAT*
;     (DEFCONSTANT NUMCL.IMPL::*NUMCL-DEFAULT-FLOAT-FORMAT*
;       'SINGLE-FLOAT
;       "The default format for numcl arrays. Bignums and ratios are coerced into this type
;   during computation.")
; --> EVAL-WHEN 
; ==>
;   (SB-C::%DEFCONSTANT 'NUMCL.IMPL::*NUMCL-DEFAULT-FLOAT-FORMAT* 'SINGLE-FLOAT
;                       (SB-C:SOURCE-LOCATION)
;                       '"The default format for numcl arrays. Bignums and ratios are coerced into this type
; during computation.")
; 
; caught STYLE-WARNING:
;   Defining (*NUMCL-DEFAULT-FLOAT-FORMAT*) as a constant, even though the name follows
;   the usual naming convention (names like *FOO*) for special variables

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/1type.lisp
; in: DEFUN FLOAT-SUBSTITUTION
;     (ERROR "this should not happen")
; ==>
;   "this should not happen"
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/1type.lisp
; in: DECLAIM (INLINE UB)
;     (DECLAIM (INLINE NUMCL.IMPL::UB))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%PROCLAIM '(INLINE NUMCL.IMPL::UB) (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.IMPL::UB to be INLINE, but 64 calls to it were previously compiled. A declaration of NOTINLINE at the call sites will eliminate this warning, as will proclaiming and defining the function before its first potential use.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/1type.lisp
; in: DECLAIM (INLINE SB)
;     (DECLAIM (INLINE NUMCL.IMPL::SB))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%PROCLAIM '(INLINE NUMCL.IMPL::SB) (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.IMPL::SB to be INLINE, but 64 calls to it were previously compiled. A declaration of NOTINLINE at the call sites will eliminate this warning, as will proclaiming and defining the function before its first potential use.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "numcl" "src" "1type">
STYLE-WARNING: Defining (*NUMCL-DEFAULT-FLOAT-FORMAT*) as a constant, even though the name follows
the usual naming convention (names like *FOO*) for special variables

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/2alias.lisp
; in: DEFUN FLATTEN
;     (THE LIST (ALEXANDRIA:FLATTEN NUMCL.IMPL::A))
; 
; note: Type assertion too complex to check:
; LIST.
; It allows an unknown number of values, consider using
; (VALUES &OPTIONAL LIST).

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/2aref.lisp
; in: DEFUN NUMCL.EXPORTED:AREF
;     (NUMCL.EXPORTED:SHAPE ARRAY)
; --> BLOCK ETYPECASE LET COND IF IF IF PROGN LIST CONS LENGTH 
; ==>
;   ARRAY
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/2aref.lisp
; in: DECLAIM (INLINE ENSURE-SINGLETON)
;     (DECLAIM (INLINE NUMCL.IMPL::ENSURE-SINGLETON))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%PROCLAIM '(INLINE NUMCL.IMPL::ENSURE-SINGLETON)
;                    (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.IMPL::ENSURE-SINGLETON 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.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/2aref.lisp
; in: DEFUN (SETF NUMCL.EXPORTED:AREF)
;     (NUMCL.EXPORTED:SHAPE ARRAY)
; --> BLOCK ETYPECASE LET COND IF IF IF PROGN LIST CONS LENGTH 
; ==>
;   ARRAY
; 
; note: deleting unreachable code

;     (NUMCL.EXPORTED:ASARRAY NUMCL.IMPL::NEWVAR :TYPE TYPE)
; 
; note: could not stack allocate: (ASARRAY NEWVAR :TYPE TYPE)
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "numcl" "src" "2aref">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/2typeinfer.lisp
; in: LISP-NAMESPACE:DEFINE-NAMESPACE INFERER
;     (LISP-NAMESPACE:DEFINE-NAMESPACE NUMCL.IMPL::INFERER (OR SYMBOL FUNCTION) NIL
;                                      "namespace for type inference")
; --> EVAL-WHEN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA NUMCL.IMPL::SYMBOL-INFERER
;         (SYMBOL &OPTIONAL
;          (LISP-NAMESPACE::DEFAULT NIL LISP-NAMESPACE::DEFAULT-SUPPLIED-P))
;       (DECLARE (SB-C::TOP-LEVEL-FORM))
;       "Automatically defined getter function. When DEFAULT is supplied, the value is set automatically."
;       (BLOCK NUMCL.IMPL::SYMBOL-INFERER
;         (MULTIPLE-VALUE-BIND (LISP-NAMESPACE::VALUE LISP-NAMESPACE::FOUND)
;             (GETHASH SYMBOL NUMCL.IMPL::*INFERER-TABLE*)
;           (IF LISP-NAMESPACE::FOUND
;               LISP-NAMESPACE::VALUE
;               (IF LISP-NAMESPACE::DEFAULT-SUPPLIED-P
;                   #
;                   #)))))
; 
; note: Type assertion too complex to check:
; (VALUES &OPTIONAL (OR SYMBOL FUNCTION) &REST T).
; It allows an unknown number of values, consider using
; (VALUES &OPTIONAL (OR SYMBOL FUNCTION)).

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/2typeinfer.lisp
; in: DEFUN ACOSH-INFERER
;     (DEFUN NUMCL.IMPL::ACOSH-INFERER (NUMCL.IMPL::X)
;       (NUMCL.IMPL::INTERPRET-TYPE `(* 2 (LOG (+ # #)))))
; --> PROGN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA 
; ==>
;   #'(SB-INT:NAMED-LAMBDA NUMCL.IMPL::ACOSH-INFERER
;         (NUMCL.IMPL::X)
;       (BLOCK NUMCL.IMPL::ACOSH-INFERER
;         (NUMCL.IMPL::INTERPRET-TYPE `(* 2 (LOG #)))))
; 
; caught STYLE-WARNING:
;   The variable X is defined but never used.
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "numcl" "src" "2typeinfer">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/3array.lisp
; in: DEFUN ASARRAY
;     (NUMCL.IMPL::%MAKE-ARRAY NUMCL.EXPORTED:SHAPE :ELEMENT-TYPE TYPE)
; --> BLOCK IF NUMCL.IMPL::LET LET * CEILING IF 
; ==>
;   NUMCL.EXPORTED:SHAPE
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/3array.lisp
; in: DEFUN INFER-TYPE-FROM-CONTENT
;     (NUMCL.IMPL::STRICT-TYPE-OF NUMCL.IMPL::X)
; --> BLOCK ETYPECASE LET COND IF IF IF IF IF IF IF IF PROGN TYPE-OF 
; ==>
;   NUMCL.IMPL::X
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/3zeros.lisp
; in:
;      DECLAIM (INLINE EMPTY EMPTY-LIKE FULL FULL-LIKE ZEROS ZEROS-LIKE ONES ONES-LIKE)
;     (DECLAIM
;      (INLINE NUMCL.EXPORTED:EMPTY NUMCL.EXPORTED:EMPTY-LIKE NUMCL.EXPORTED:FULL
;       NUMCL.EXPORTED:FULL-LIKE NUMCL.EXPORTED:ZEROS NUMCL.EXPORTED:ZEROS-LIKE
;       NUMCL.EXPORTED:ONES NUMCL.EXPORTED:ONES-LIKE))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%PROCLAIM
;    '(INLINE NUMCL.EXPORTED:EMPTY NUMCL.EXPORTED:EMPTY-LIKE NUMCL.EXPORTED:FULL
;      NUMCL.EXPORTED:FULL-LIKE NUMCL.EXPORTED:ZEROS NUMCL.EXPORTED:ZEROS-LIKE
;      NUMCL.EXPORTED:ONES NUMCL.EXPORTED:ONES-LIKE)
;    (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.EXPORTED:EMPTY 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.
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.EXPORTED:EMPTY-LIKE to be INLINE, but 2 calls to it were previously compiled. A declaration of NOTINLINE at the call sites will eliminate this warning, as will proclaiming and defining the function before its first potential use.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/3zeros.lisp
; in: DEFUN FULL-LIKE
;     (NUMCL.EXPORTED:FULL (NUMCL.EXPORTED:SHAPE ARRAY)
;      (NUMCL.IMPL::%COERCE NUMCL.IMPL::VALUE TYPE) :TYPE TYPE)
; --> IF SB-C::WITH-SOURCE-FORM TYPE TYPE-OF 
; ==>
;   NUMCL.IMPL::VALUE
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/3zeros.lisp
; in: DEFUN ZEROS-LIKE
;     (NUMCL.EXPORTED:FULL-LIKE ARRAY (NUMCL.IMPL::%COERCE 0 TYPE) :TYPE TYPE)
; --> IF SB-C::WITH-SOURCE-FORM TYPE ARRAY-ELEMENT-TYPE 
; ==>
;   ARRAY
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/3zeros.lisp
; in: DEFUN ONES-LIKE
;     (NUMCL.EXPORTED:FULL-LIKE ARRAY (NUMCL.IMPL::%COERCE 1 TYPE) :TYPE TYPE)
; --> IF SB-C::WITH-SOURCE-FORM TYPE ARRAY-ELEMENT-TYPE 
; ==>
;   ARRAY
; 
; note: deleting unreachable code
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "numcl" "src" "3zeros">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/4concatenate.lisp
; in: DEFUN UNSTACK
;     (NUMCL.EXPORTED:SHAPE ARRAY)
; --> BLOCK ETYPECASE LET COND IF IF IF PROGN LIST CONS LENGTH 
; ==>
;   ARRAY
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN BROADCAST
;     (ARRAY-DISPLACEMENT NUMCL.IMPL::X)
; --> BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

;     (ARRAY-DISPLACEMENT NUMCL.IMPL::Y)
; --> BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in:
;      DECLAIM (INLINE NUMCL.EXPORTED:SIN NUMCL.EXPORTED:COS NUMCL.EXPORTED:TAN NUMCL.EXPORTED:ASIN NUMCL.EXPORTED:ACOS NUMCL.EXPORTED:ATAN NUMCL.EXPORTED:SINH NUMCL.EXPORTED:COSH NUMCL.EXPORTED:TANH NUMCL.EXPORTED:EXP NUMCL.EXPORTED:LOG ...)
;     (DECLAIM
;      (INLINE NUMCL.EXPORTED:SIN NUMCL.EXPORTED:COS NUMCL.EXPORTED:TAN
;       NUMCL.EXPORTED:ASIN NUMCL.EXPORTED:ACOS NUMCL.EXPORTED:ATAN
;       NUMCL.EXPORTED:SINH NUMCL.EXPORTED:COSH NUMCL.EXPORTED:TANH
;       NUMCL.EXPORTED:EXP NUMCL.EXPORTED:LOG ...))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%PROCLAIM
;    '(INLINE NUMCL.EXPORTED:SIN NUMCL.EXPORTED:COS NUMCL.EXPORTED:TAN
;      NUMCL.EXPORTED:ASIN NUMCL.EXPORTED:ACOS NUMCL.EXPORTED:ATAN
;      NUMCL.EXPORTED:SINH NUMCL.EXPORTED:COSH NUMCL.EXPORTED:TANH
;      NUMCL.EXPORTED:EXP NUMCL.EXPORTED:LOG ...)
;    (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.EXPORTED:CONJUGATE to be INLINE, but 4 calls to it were previously compiled. A declaration of NOTINLINE at the call sites will eliminate this warning, as will proclaiming and defining the function before its first potential use.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in:
;      DECLAIM (INLINE NUMCL.EXPORTED:+ NUMCL.EXPORTED:- NUMCL.EXPORTED:* NUMCL.EXPORTED:/ NUMCL.EXPORTED:MAX NUMCL.EXPORTED:MIN CLIP)
;     (DECLAIM
;      (INLINE NUMCL.EXPORTED:+ NUMCL.EXPORTED:- NUMCL.EXPORTED:* NUMCL.EXPORTED:/
;       NUMCL.EXPORTED:MAX NUMCL.EXPORTED:MIN NUMCL.EXPORTED:CLIP))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%PROCLAIM
;    '(INLINE NUMCL.EXPORTED:+ NUMCL.EXPORTED:- NUMCL.EXPORTED:* NUMCL.EXPORTED:/
;      NUMCL.EXPORTED:MAX NUMCL.EXPORTED:MIN NUMCL.EXPORTED:CLIP)
;    (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.EXPORTED:+ 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.
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.EXPORTED:- 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.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:+
;     (NUMCL.EXPORTED:BROADCAST '+ NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:*
;     (NUMCL.EXPORTED:BROADCAST '* NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:MAX
;     (NUMCL.EXPORTED:BROADCAST 'MAX NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:MIN
;     (NUMCL.EXPORTED:BROADCAST 'MIN NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:EXPT
;     (NUMCL.EXPORTED:BROADCAST 'EXPT NUMCL.IMPL::BASE NUMCL.EXPORTED:POWER)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:-
;     (NUMCL.EXPORTED:BROADCAST '- NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

;     (NUMCL.EXPORTED:BROADCAST '- 0 FIRST)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:/
;     (NUMCL.EXPORTED:BROADCAST '/ NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

;     (NUMCL.EXPORTED:BROADCAST '/ 1 FIRST)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN CLIP
;     (NUMCL.EXPORTED:BROADCAST 'MIN ARRAY MAX)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

;     (NUMCL.EXPORTED:BROADCAST 'MAX MIN (NUMCL.EXPORTED:BROADCAST 'MIN ARRAY MAX))
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:MOD
;     (NUMCL.EXPORTED:BROADCAST 'MOD NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:REM
;     (NUMCL.EXPORTED:BROADCAST 'REM NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:ROUND
;     (NUMCL.EXPORTED:BROADCAST 'ROUND NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:FLOOR
;     (NUMCL.EXPORTED:BROADCAST 'FLOOR NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:CEILING
;     (NUMCL.EXPORTED:BROADCAST 'CEILING NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:TRUNCATE
;     (NUMCL.EXPORTED:BROADCAST 'TRUNCATE NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:FROUND
;     (NUMCL.EXPORTED:BROADCAST 'FROUND NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:FFLOOR
;     (NUMCL.EXPORTED:BROADCAST 'FFLOOR NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:FCEILING
;     (NUMCL.EXPORTED:BROADCAST 'FCEILING NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:FTRUNCATE
;     (NUMCL.EXPORTED:BROADCAST 'FTRUNCATE NUMBER NUMCL.IMPL::DIVISOR)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN =/2
;     (NUMCL.EXPORTED:BROADCAST 'NUMCL.IMPL::=/BIT NUMCL.IMPL::X NUMCL.IMPL::Y
;      :ATOMIC #'=)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN /=/2
;     (NUMCL.EXPORTED:BROADCAST 'NUMCL.IMPL::/=/BIT NUMCL.IMPL::X NUMCL.IMPL::Y
;      :ATOMIC #'/=)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN <=/2
;     (NUMCL.EXPORTED:BROADCAST 'NUMCL.IMPL::<=/BIT NUMCL.IMPL::X NUMCL.IMPL::Y
;      :ATOMIC #'<=)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN >=/2
;     (NUMCL.EXPORTED:BROADCAST 'NUMCL.IMPL::>=/BIT NUMCL.IMPL::X NUMCL.IMPL::Y
;      :ATOMIC #'>=)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN </2
;     (NUMCL.EXPORTED:BROADCAST 'NUMCL.IMPL::</BIT NUMCL.IMPL::X NUMCL.IMPL::Y
;      :ATOMIC #'<)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN >/2
;     (NUMCL.EXPORTED:BROADCAST 'NUMCL.IMPL::>/BIT NUMCL.IMPL::X NUMCL.IMPL::Y
;      :ATOMIC #'>)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:=
;     (NUMCL.IMPL::BOOLEAN-WRAPPER NUMCL.IMPL::X NUMCL.IMPL::Y NUMCL.IMPL::MORE
;      #'NUMCL.IMPL::=/2 #'NUMCL.EXPORTED:=)
; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:/=
;     (NUMCL.IMPL::BOOLEAN-WRAPPER NUMCL.IMPL::X NUMCL.IMPL::Y NUMCL.IMPL::MORE
;      #'NUMCL.IMPL::/=/2 #'NUMCL.EXPORTED:/=)
; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:<=
;     (NUMCL.IMPL::BOOLEAN-WRAPPER NUMCL.IMPL::X NUMCL.IMPL::Y NUMCL.IMPL::MORE
;      #'NUMCL.IMPL::<=/2 #'NUMCL.EXPORTED:<=)
; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:>=
;     (NUMCL.IMPL::BOOLEAN-WRAPPER NUMCL.IMPL::X NUMCL.IMPL::Y NUMCL.IMPL::MORE
;      #'NUMCL.IMPL::>=/2 #'NUMCL.EXPORTED:>=)
; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:<
;     (NUMCL.IMPL::BOOLEAN-WRAPPER NUMCL.IMPL::X NUMCL.IMPL::Y NUMCL.IMPL::MORE
;      #'NUMCL.IMPL::</2 #'NUMCL.EXPORTED:<)
; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:>
;     (NUMCL.IMPL::BOOLEAN-WRAPPER NUMCL.IMPL::X NUMCL.IMPL::Y NUMCL.IMPL::MORE
;      #'NUMCL.IMPL::>/2 #'NUMCL.EXPORTED:>)
; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.IMPL::LET LET FUNCALL SB-C::%FUNCALL BLOCK 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in:
;      DECLAIM (INLINE NUMCL.EXPORTED:LOGAND NUMCL.EXPORTED:LOGANDC1 NUMCL.EXPORTED:LOGANDC2 NUMCL.EXPORTED:LOGEQV NUMCL.EXPORTED:LOGIOR NUMCL.EXPORTED:LOGNAND NUMCL.EXPORTED:LOGNOR NUMCL.EXPORTED:LOGORC1 NUMCL.EXPORTED:LOGORC2 NUMCL.EXPORTED:LOGXOR NUMCL.EXPORTED:LOGNOT)
;     (DECLAIM
;      (INLINE NUMCL.EXPORTED:LOGAND NUMCL.EXPORTED:LOGANDC1
;       NUMCL.EXPORTED:LOGANDC2 NUMCL.EXPORTED:LOGEQV NUMCL.EXPORTED:LOGIOR
;       NUMCL.EXPORTED:LOGNAND NUMCL.EXPORTED:LOGNOR NUMCL.EXPORTED:LOGORC1
;       NUMCL.EXPORTED:LOGORC2 NUMCL.EXPORTED:LOGXOR NUMCL.EXPORTED:LOGNOT))
; --> EVAL-WHEN 
; ==>
;   (SB-C::%PROCLAIM
;    '(INLINE NUMCL.EXPORTED:LOGAND NUMCL.EXPORTED:LOGANDC1
;      NUMCL.EXPORTED:LOGANDC2 NUMCL.EXPORTED:LOGEQV NUMCL.EXPORTED:LOGIOR
;      NUMCL.EXPORTED:LOGNAND NUMCL.EXPORTED:LOGNOR NUMCL.EXPORTED:LOGORC1
;      NUMCL.EXPORTED:LOGORC2 NUMCL.EXPORTED:LOGXOR NUMCL.EXPORTED:LOGNOT)
;    (SB-C:SOURCE-LOCATION))
; 
; caught STYLE-WARNING:
;   Proclaiming NUMCL.EXPORTED:LOGAND to be INLINE, but 7 calls to it were previously compiled. A declaration of NOTINLINE at the call sites will eliminate this warning, as will proclaiming and defining the function before its first potential use.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGAND
;     (NUMCL.EXPORTED:BROADCAST 'LOGAND NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGANDC1
;     (NUMCL.EXPORTED:BROADCAST 'LOGANDC1 NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGANDC2
;     (NUMCL.EXPORTED:BROADCAST 'LOGANDC2 NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGEQV
;     (NUMCL.EXPORTED:BROADCAST 'LOGEQV NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGIOR
;     (NUMCL.EXPORTED:BROADCAST 'LOGIOR NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGNAND
;     (NUMCL.EXPORTED:BROADCAST 'LOGNAND NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGNOR
;     (NUMCL.EXPORTED:BROADCAST 'LOGNOR NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGORC1
;     (NUMCL.EXPORTED:BROADCAST 'LOGORC1 NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGORC2
;     (NUMCL.EXPORTED:BROADCAST 'LOGORC2 NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5numeric.lisp
; in: DEFUN NUMCL.EXPORTED:LOGXOR
;     (NUMCL.EXPORTED:BROADCAST 'LOGXOR NUMCL.IMPL::X NUMCL.IMPL::Y)
; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> LET COND IF THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "numcl" "src" "5numeric">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5reduce.lisp
; in: DEFUN MEAN
;     (NUMCL.EXPORTED:/ (NUMCL.EXPORTED:SUM ARRAY :AXES NUMCL.IMPL::AXES)
;                       (NUMCL.IMPL::ARRAY-DIMENSION* ARRAY NUMCL.IMPL::AXES))
; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5reduce.lisp
; in: DEFUN VARIANCE
;     (NUMCL.EXPORTED:/
;      (NUMCL.EXPORTED:SUM (NUMCL.EXPORTED:SQUARE ARRAY) :AXES NUMCL.IMPL::AXES)
;      (NUMCL.IMPL::ARRAY-DIMENSION* ARRAY NUMCL.IMPL::AXES))
; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5reduce.lisp
; in: DEFUN STANDARD-DEVIATION
;     (NUMCL.EXPORTED:/
;      (NUMCL.EXPORTED:SUM (NUMCL.EXPORTED:SQUARE ARRAY) :AXES NUMCL.IMPL::AXES)
;      (NUMCL.IMPL::ARRAY-DIMENSION* ARRAY NUMCL.IMPL::AXES))
; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5reduce.lisp
; in: DEFUN AVG
;     (NUMCL.EXPORTED:/ (NUMCL.EXPORTED:SUM ARRAY :AXES NUMCL.IMPL::AXES)
;                       (NUMCL.IMPL::ARRAY-DIMENSION* ARRAY NUMCL.IMPL::AXES))
; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5reduce.lisp
; in: DEFUN VAR
;     (NUMCL.EXPORTED:/
;      (NUMCL.EXPORTED:SUM (NUMCL.EXPORTED:SQUARE ARRAY) :AXES NUMCL.IMPL::AXES)
;      (NUMCL.IMPL::ARRAY-DIMENSION* ARRAY NUMCL.IMPL::AXES))
; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5reduce.lisp
; in: DEFUN STDEV
;     (NUMCL.EXPORTED:/
;      (NUMCL.EXPORTED:SUM (NUMCL.EXPORTED:SQUARE ARRAY) :AXES NUMCL.IMPL::AXES)
;      (NUMCL.IMPL::ARRAY-DIMENSION* ARRAY NUMCL.IMPL::AXES))
; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5reduce.lisp
; in: DEFUN HISTOGRAM
;     (NUMCL.EXPORTED:1+
;      (NUMCL.EXPORTED:FLOOR (NUMCL.EXPORTED:- ARRAY NUMCL.IMPL::LOW)
;                            NUMCL.IMPL::SPLIT))
; --> BLOCK NUMCL.EXPORTED:+ BLOCK REDUCE LAMBDA FUNCTION 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.EXPORTED:+ BLOCK REDUCE LAMBDA FUNCTION 
; --> NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

;     (NUMCL.EXPORTED:- ARRAY NUMCL.IMPL::LOW)
; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK IF REDUCE LAMBDA FUNCTION NUMCL.EXPORTED:BROADCAST LET COND IF THE 
; --> NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

;     (NUMCL.EXPORTED:FLOOR (NUMCL.EXPORTED:- ARRAY NUMCL.IMPL::LOW)
;                           NUMCL.IMPL::SPLIT)
; --> BLOCK NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

;     (NUMCL.EXPORTED:CLIP
;      (NUMCL.EXPORTED:1+
;       (NUMCL.EXPORTED:FLOOR (NUMCL.EXPORTED:- ARRAY NUMCL.IMPL::LOW)
;                             NUMCL.IMPL::SPLIT))
;      0 (1+ NUMCL.EXPORTED:SIZE))
; --> BLOCK NUMCL.EXPORTED:BROADCAST LET NUMCL.EXPORTED:BROADCAST LET COND IF 
; --> THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.EXPORTED:BROADCAST LET NUMCL.EXPORTED:BROADCAST LET COND IF 
; --> THE NUMCL.IMPL::LET LET NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 
; --> PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; --> BLOCK NUMCL.EXPORTED:BROADCAST LET COND IF THE NUMCL.IMPL::LET LET 
; --> NUMCL.IMPL::LET* LET* MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION 
; --> MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL 
; --> FUNCTION MULTIPLE-VALUE-PROG1 PROGN MULTIPLE-VALUE-BIND 
; --> MULTIPLE-VALUE-CALL FUNCTION MULTIPLE-VALUE-PROG1 PROGN 
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL ARRAY-DISPLACEMENT BLOCK IF 
; ==>
;   (VALUES NIL 0)
; 
; caught STYLE-WARNING:
;   Result is a (VALUES NULL (INTEGER 0 0) &OPTIONAL), 
;            not a (VALUES (SIMPLE-ARRAY * (*)) &REST T).
;   See also:
;     The SBCL Manual, Node "Handling of Types"
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "numcl" "src" "5reduce">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5where.lisp
; in: DEFUN ARGWHERE
;     (ITERATE:ITER
;       (ITERATE:FOR NUMCL.IMPL::I NUMCL.IMPL::BELOW (ARRAY-TOTAL-SIZE ARRAY))
;       (DECLARE (ITERATE:DECLARE-VARIABLES))
;       (WHEN (FUNCALL NUMCL.IMPL::FN (AREF NUMCL.IMPL::BASE NUMCL.IMPL::I))
;         (ITERATE:COLLECT
;          (NUMCL.EXPORTED:ARRAY-INDEX-FROM-ROW-MAJOR-INDEX ARRAY NUMCL.IMPL::I))))
; --> LET* BLOCK TAGBODY PROGN IF PROGN SETQ THE LIST CONS 
; --> NUMCL.EXPORTED:ARRAY-INDEX-FROM-ROW-MAJOR-INDEX BLOCK NUMCL.IMPL::LET* 
; --> LET* NUMCL.EXPORTED:ASARRAY NUMCL.EXPORTED:SHAPE BLOCK ETYPECASE LET COND 
; --> IF IF IF PROGN LIST CONS LENGTH 
; ==>
;   ARRAY
; 
; note: deleting unreachable code

;     (ARRAY-DISPLACEMENT ARRAY)
; --> BLOCK IF VALUES 
; ==>
;   SB-C::VAL
; 
; caught STYLE-WARNING:
;   The binding of ARRAY is not a (SIMPLE-ARRAY * (*)):
;    NIL
;   See also:
;     The SBCL Manual, Node "Handling of Types"

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5where.lisp
; in: DEFUN WHERE
;     (ITERATE:ITER
;       (ITERATE:FOR NUMCL.IMPL::I NUMCL.IMPL::BELOW (ARRAY-TOTAL-SIZE ARRAY))
;       (DECLARE (ITERATE:DECLARE-VARIABLES))
;       (WHEN (FUNCALL NUMCL.IMPL::FN (AREF NUMCL.IMPL::BASE NUMCL.IMPL::I))
;         (NUMCL.IMPL::%ARRAY-INDEX-FROM-ROW-MAJOR-INDEX/VECTOR ARRAY NUMCL.IMPL::I
;          NUMCL.IMPL::TMP)
;         (DOTIMES (NUMCL.IMPL::J NUMCL.IMPL::R)
;           (NUMCL.IMPL::LET* (# #)
;             (SETF #))))
;       (ITERATE:FINALLY
;        (DOTIMES (NUMCL.IMPL::J NUMCL.IMPL::R)
;          (POP (AREF NUMCL.IMPL::RESULT NUMCL.IMPL::J)))))
; --> LET* BLOCK TAGBODY PROGN IF PROGN 
; --> NUMCL.IMPL::%ARRAY-INDEX-FROM-ROW-MAJOR-INDEX/VECTOR BLOCK 
; --> NUMCL.IMPL::LET* LET* NUMCL.EXPORTED:ASARRAY NUMCL.EXPORTED:SHAPE BLOCK 
; --> ETYPECASE LET COND IF IF IF PROGN LIST CONS LENGTH 
; ==>
;   ARRAY
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/numcl/9ca501e81f31badd5733d0909bf3ef77a00da5db/numcl-20210319-git/src/5where.lisp
; in: DEFUN NONZERO
;     (NUMCL.EXPORTED:WHERE ARRAY
;      (LAMBDA (NUMCL.IMPL::X) (NOT (ZEROP NUMCL.IMPL::X))))
; --> BLOCK TRIVIA.LEVEL2:EMATCH TRIVIA.LEVEL2:MATCH2 TRIVIA.LEVEL2:MATCH2+ 
; --> TRIVIA.LEVEL2:MATCH2*+ SYMBOL-MACROLET TRIVIA.LEVEL1:MATCH1 LET BLOCK 
; --> BLOCK LET TRIVIA.LEVEL1:TRACE-WHEN WHEN IF LOCALLY LET LET RETURN-FROM 
; --> LOCALLY TRIVIA.LEVEL1:MATCH1 LET BLOCK BLOCK LET RETURN-FROM LOCALLY 
; --> NUMCL.IMPL::LOCALLY LOCALLY NUMCL.IMPL::LET LET ITERATE:ITER LET* BLOCK 
; --> TAGBODY PROGN IF PROGN 
; --> NUMCL.IMPL::%ARRAY-INDEX-FROM-ROW-MAJOR-INDEX/VECTOR BLOCK 
; --> NUMCL.IMPL::LET* LET* NUMCL.EXPORTED:ASARRAY NUMCL.EXPORTED:SHAPE BLOCK 
; --> ETYPECASE LET COND IF IF IF PROGN LIST CONS LENGTH 
; ==>
;   ARRAY
; 
; note: deleting unreachable code
WARNING: Lisp compilation had style-warnings while compiling #<CL-SOURCE-FILE "numcl" "src" "5where">

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp
; in: UIOP/PACKAGE:DEFINE-PACKAGE :DATALOADER
;     (UIOP/PACKAGE:DEFINE-PACKAGE :DATALOADER
;                                  (:USE :CL :ITERATE :TRIVIA :ALEXANDRIA)
;                                  (:LOCAL-NICKNAMES (:MIME :DATALOADER.MIME))
;                                  (:SHADOW :LOAD)
;                                  (:EXPORT #:LOAD #:SAVE #:DEFINE-LOAD-METHOD
;                                   #:DEFINE-SAVE-METHOD #:PERFORM-SAVE
;                                   #:PERFORM-LOAD)
;                                  (:DOCUMENTATION
;                                   "The main package for dataloader."))
; 
; caught ERROR:
;   (during macroexpansion of (UIOP/PACKAGE:DEFINE-PACKAGE :DATALOADER ...))
;   unrecognized define-package keyword :LOCAL-NICKNAMES
Unhandled PACKAGE-DOES-NOT-EXIST in thread #<SB-THREAD:THREAD "main thread" RUNNING {1000A10083}>: The name "DATALOADER" does not designate any package.

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1000A10083}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1045383D83}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1045383D83}>)
2: (INVOKE-DEBUGGER #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1045383D83}>)
3: (ERROR #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1045383D83}>)
4: (SB-KERNEL:WITH-SIMPLE-CONDITION-RESTARTS ERROR NIL PACKAGE-DOES-NOT-EXIST :PACKAGE "DATALOADER" :FORMAT-CONTROL "The name ~S does not designate any package." :FORMAT-ARGUMENTS ("DATALOADER"))
5: (SB-INT:%FIND-PACKAGE-OR-LOSE "DATALOADER")
6: (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")
7: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp"))
8: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")) #<NULL-LEXENV>)
9: (SB-INT:SIMPLE-EVAL-IN-LEXENV (PROGN (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) #<NULL-LEXENV>)
10: (EVAL-TLF (PROGN (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) 3 #<NULL-LEXENV>)
11: ((FLET SB-C::FROB :IN SB-C::EVAL-COMPILE-TOPLEVEL))
12: (SB-C::EVAL-COMPILE-TOPLEVEL ((SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) (#1=(SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")) (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) #1#) SB-C::ORIGINAL-SOURCE-START 0 3))
13: (SB-C::PROCESS-TOPLEVEL-FORM (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")) ((EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) SB-C::ORIGINAL-SOURCE-START 0 3) (:COMPILE-TOPLEVEL))
14: (SB-C::PROCESS-TOPLEVEL-PROGN ((SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) ((EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) SB-C::ORIGINAL-SOURCE-START 0 3) (:COMPILE-TOPLEVEL))
15: (SB-C::PROCESS-TOPLEVEL-FORM (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) (SB-C::ORIGINAL-SOURCE-START 0 3) NIL)
16: (SB-C::PROCESS-TOPLEVEL-FORM (IN-PACKAGE :DATALOADER) (SB-C::ORIGINAL-SOURCE-START 0 3) NIL)
17: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-COMPILE-FILE) (IN-PACKAGE :DATALOADER) :CURRENT-INDEX 3)
18: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-COMPILE-FILE) {5226387B}> #<SB-C::SOURCE-INFO {10452A4B03}> SB-C::INPUT-ERROR-IN-COMPILE-FILE)
19: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::SUB-COMPILE-FILE))
20: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
21: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::SUB-COMPILE-FILE) {7FD71E78E74B}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "main thread" RUNNING {1000A10083}>> T NIL)
22: ((FLET "LAMBDA0" :IN "SYS:SRC;COMPILER;MAIN.LISP"))
23: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
24: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO {10452A4B03}> NIL)
25: (COMPILE-FILE #P"/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp" :OUTPUT-FILE #P#<(SIMPLE-ARRAY CHARACTER (214)) /home/quicklisp/.cache/common-lisp/sbcl-2.0.5-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package-tm... {10453B8A8F}> :VERBOSE NIL :PRINT NIL :PROGRESS NIL :EXTERNAL-FORMAT :UTF-8 :TRACE-FILE NIL :BLOCK-COMPILE NIL :ENTRY-POINTS NIL :EMIT-CFASL NIL)
26: (UIOP/UTILITY:CALL-WITH-MUFFLED-CONDITIONS #<CLOSURE (LAMBDA NIL :IN UIOP/LISP-BUILD:COMPILE-FILE*) {10452A24FB}> NIL)
27: (UIOP/PATHNAME:CALL-WITH-ENOUGH-PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp" NIL #<CLOSURE (LAMBDA (UIOP/LISP-BUILD::INPUT-FILE) :IN UIOP/LISP-BUILD:COMPILE-FILE*) {10452A1D7B}>)
28: (UIOP/LISP-BUILD:COMPILE-FILE* #P"/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp" :OUTPUT-FILE #P#<(SIMPLE-ARRAY CHARACTER (202)) /home/quicklisp/.cache/common-lisp/sbcl-2.0.5-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.fa... {10453C3C1F}> :EXTERNAL-FORMAT :UTF-8 :WARNINGS-FILE NIL)
29: (ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "dataloader" "0package">)
30: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "dataloader" "0package">)
31: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
32: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "dataloader" "0package">) [fast-method]
33: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10054F9653}>) [fast-method]
34: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
35: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10054F9653}>) [fast-method]
36: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dataloader"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
37: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dataloader">)
38: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
39: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dataloader">) [fast-method]
40: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dataloader")
41: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
42: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dataloader") [fast-method]
43: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10054F191B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
44: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
45: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10054AC75B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
46: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dataloader") [fast-method]
47: (DEPCHECK::COMPUTE-DEPENDENCIES "dataloader" "dataloader")
48: (DEPCHECK::MAGIC "dataloader" "dataloader" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-QGPmXhfK/depcheck-win.txt")
49: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dataloader" "dataloader" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-QGPmXhfK/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-QGPmXhfK/depcheck-fail.txt"))
50: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
51: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
52: ((FLET "WITHOUT-INTERRUPTS-BODY-14" :IN SAVE-LISP-AND-DIE))
53: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

unhandled condition in --disable-debugger mode, quitting
; 
; compilation unit aborted
;   caught 2 fatal ERROR conditions
;   caught 1 ERROR condition
;   caught 123 STYLE-WARNING conditions
;   printed 40 notes

dataloader.test

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: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::LOOP* in DEFMACRO
WARNING: redefining UIOP/COMMON-LISP::FROB-SUBSTRINGS in DEFUN
WARNING: redefining UIOP/COMMON-LISP::COMPATFMT in DEFMACRO
WARNING: redefining UIOP/UTILITY:DEFGENERIC* in DEFMACRO
WARNING: redefining UIOP/UTILITY:DEFUN* in DEFMACRO
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/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: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/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:WITH-OUTPUT in DEFMACRO
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:GET-OPTIMIZATION-SETTINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:PROCLAIM-OPTIMIZATION-SETTINGS in DEFUN
WARNING: redefining UIOP/LISP-BUILD:WITH-OPTIMIZATION-SETTINGS in DEFMACRO
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: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 (#<STRUCTURE-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 (#<STRUCTURE-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: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/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/cl-ppcre/d6593d8f842bcf6af810ff93c6c02b757bd49ecf/cl-ppcre-20210319-git/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/flexi-streams/5cda15aa3a57ab0aee15cf5c149b608595f02eb8/flexi-streams-20210319-git/flexi-streams.asd" contains definition for system "flexi-streams-test". Please only define "flexi-streams" and secondary systems with a name starting with "flexi-streams/" (e.g. "flexi-streams/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/ieee-floats/fa9e496f0fcf4ba05754fc32787f728ca6e2d674/ieee-floats-20210319-git/ieee-floats.asd" contains definition for system "ieee-floats-tests". Please only define "ieee-floats" and secondary systems with a name starting with "ieee-floats/" (e.g. "ieee-floats/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/cl-interpol/947bdd72ec95e8206be01a59f3bed8c234480b19/cl-interpol-20210319-git/cl-interpol.asd" contains definition for system "cl-interpol-test". Please only define "cl-interpol" and secondary systems with a name starting with "cl-interpol/" (e.g. "cl-interpol/test") in that file.
WARNING: System definition file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/symbol-munger/a8589c60f470b8b280eacd9c983d96bc5f337341/symbol-munger-20210319-git/symbol-munger.asd" contains definition for system "symbol-munger-test". Please only define "symbol-munger" and secondary systems with a name starting with "symbol-munger/" (e.g. "symbol-munger/test") in that file.
STYLE-WARNING: Defining (*NUMCL-DEFAULT-FLOAT-FORMAT*) as a constant, even though the name follows
the usual naming convention (names like *FOO*) for special variables

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp
; in: UIOP/PACKAGE:DEFINE-PACKAGE :DATALOADER
;     (UIOP/PACKAGE:DEFINE-PACKAGE :DATALOADER
;                                  (:USE :CL :ITERATE :TRIVIA :ALEXANDRIA)
;                                  (:LOCAL-NICKNAMES (:MIME :DATALOADER.MIME))
;                                  (:SHADOW :LOAD)
;                                  (:EXPORT #:LOAD #:SAVE #:DEFINE-LOAD-METHOD
;                                   #:DEFINE-SAVE-METHOD #:PERFORM-SAVE
;                                   #:PERFORM-LOAD)
;                                  (:DOCUMENTATION
;                                   "The main package for dataloader."))
; 
; caught ERROR:
;   (during macroexpansion of (UIOP/PACKAGE:DEFINE-PACKAGE :DATALOADER ...))
;   unrecognized define-package keyword :LOCAL-NICKNAMES
Unhandled PACKAGE-DOES-NOT-EXIST in thread #<SB-THREAD:THREAD "main thread" RUNNING {1000A10083}>: The name "DATALOADER" does not designate any package.

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1000A10083}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1012754B13}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1012754B13}>)
2: (INVOKE-DEBUGGER #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1012754B13}>)
3: (ERROR #<PACKAGE-DOES-NOT-EXIST "The name ~S does not designate any package." {1012754B13}>)
4: (SB-KERNEL:WITH-SIMPLE-CONDITION-RESTARTS ERROR NIL PACKAGE-DOES-NOT-EXIST :PACKAGE "DATALOADER" :FORMAT-CONTROL "The name ~S does not designate any package." :FORMAT-ARGUMENTS ("DATALOADER"))
5: (SB-INT:%FIND-PACKAGE-OR-LOSE "DATALOADER")
6: (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")
7: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp"))
8: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")) #<NULL-LEXENV>)
9: (SB-INT:SIMPLE-EVAL-IN-LEXENV (PROGN (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) #<NULL-LEXENV>)
10: (EVAL-TLF (PROGN (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) 3 #<NULL-LEXENV>)
11: ((FLET SB-C::FROB :IN SB-C::EVAL-COMPILE-TOPLEVEL))
12: (SB-C::EVAL-COMPILE-TOPLEVEL ((SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) (#1=(SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")) (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) #1#) SB-C::ORIGINAL-SOURCE-START 0 3))
13: (SB-C::PROCESS-TOPLEVEL-FORM (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER")) ((EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) SB-C::ORIGINAL-SOURCE-START 0 3) (:COMPILE-TOPLEVEL))
14: (SB-C::PROCESS-TOPLEVEL-PROGN ((SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) ((EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) SB-C::ORIGINAL-SOURCE-START 0 3) (:COMPILE-TOPLEVEL))
15: (SB-C::PROCESS-TOPLEVEL-FORM (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (SETQ *PACKAGE* (SB-INT:FIND-UNDELETED-PACKAGE-OR-LOSE "DATALOADER"))) (SB-C::ORIGINAL-SOURCE-START 0 3) NIL)
16: (SB-C::PROCESS-TOPLEVEL-FORM (IN-PACKAGE :DATALOADER) (SB-C::ORIGINAL-SOURCE-START 0 3) NIL)
17: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-COMPILE-FILE) (IN-PACKAGE :DATALOADER) :CURRENT-INDEX 3)
18: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-C::SUB-COMPILE-FILE) {5226387B}> #<SB-C::SOURCE-INFO {1012605F13}> SB-C::INPUT-ERROR-IN-COMPILE-FILE)
19: ((FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::SUB-COMPILE-FILE))
20: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-THREAD::CALL-WITH-RECURSIVE-LOCK))
21: (SB-THREAD::CALL-WITH-RECURSIVE-LOCK #<CLOSURE (FLET SB-THREAD::WITH-RECURSIVE-LOCK-THUNK :IN SB-C::SUB-COMPILE-FILE) {7F9A66C3674B}> #<SB-THREAD:MUTEX "World Lock" owner: #<SB-THREAD:THREAD "main thread" RUNNING {1000A10083}>> T NIL)
22: ((FLET "LAMBDA0" :IN "SYS:SRC;COMPILER;MAIN.LISP"))
23: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
24: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO {1012605F13}> NIL)
25: (COMPILE-FILE #P"/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp" :OUTPUT-FILE #P#<(SIMPLE-ARRAY CHARACTER (214)) /home/quicklisp/.cache/common-lisp/sbcl-2.0.5-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package-tm... {101278A2AF}> :VERBOSE NIL :PRINT NIL :PROGRESS NIL :EXTERNAL-FORMAT :UTF-8 :TRACE-FILE NIL :BLOCK-COMPILE NIL :ENTRY-POINTS NIL :EMIT-CFASL NIL)
26: (UIOP/UTILITY:CALL-WITH-MUFFLED-CONDITIONS #<CLOSURE (LAMBDA NIL :IN UIOP/LISP-BUILD:COMPILE-FILE*) {10126038AB}> NIL)
27: (UIOP/PATHNAME:CALL-WITH-ENOUGH-PATHNAME #P"/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp" NIL #<CLOSURE (LAMBDA (UIOP/LISP-BUILD::INPUT-FILE) :IN UIOP/LISP-BUILD:COMPILE-FILE*) {101260382B}>)
28: (UIOP/LISP-BUILD:COMPILE-FILE* #P"/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.lisp" :OUTPUT-FILE #P#<(SIMPLE-ARRAY CHARACTER (202)) /home/quicklisp/.cache/common-lisp/sbcl-2.0.5-linux-x64/home/quicklisp/quicklisp-controller/dist/build-cache/dataloader/7d5cbb188e47e4acbb7e911c1c8624cc576e4733/dataloader-20210319-git/src/0package.fa... {1012794F7F}> :EXTERNAL-FORMAT :UTF-8 :WARNINGS-FILE NIL)
29: (ASDF/LISP-ACTION:PERFORM-LISP-COMPILATION #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "dataloader" "0package">)
30: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "dataloader" "0package">)
31: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
32: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "dataloader" "0package">) [fast-method]
33: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {100564BFD3}>) [fast-method]
34: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
35: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {100564BFD3}>) [fast-method]
36: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dataloader.test"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
37: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dataloader.test">)
38: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
39: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "dataloader.test">) [fast-method]
40: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "dataloader.test")
41: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
42: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dataloader.test") [fast-method]
43: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10056441EB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
44: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
45: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10055FF08B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
46: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "dataloader.test") [fast-method]
47: (DEPCHECK::COMPUTE-DEPENDENCIES "dataloader.test" "dataloader.test")
48: (DEPCHECK::MAGIC "dataloader.test" "dataloader.test" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-W6hQQXdx/depcheck-win.txt")
49: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "dataloader.test" "dataloader.test" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-W6hQQXdx/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-W6hQQXdx/depcheck-fail.txt"))
50: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
51: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
52: ((FLET "WITHOUT-INTERRUPTS-BODY-14" :IN SAVE-LISP-AND-DIE))
53: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

unhandled condition in --disable-debugger mode, quitting
; 
; compilation unit aborted
;   caught 2 fatal ERROR conditions
;   caught 1 ERROR condition