SBCL 2.6.1 / ASDF 3.3.5
WARNING: redefining UIOP/PACKAGE:FIND-PACKAGE* in DEFUN WARNING: redefining UIOP/PACKAGE:FIND-SYMBOL* in DEFUN WARNING: redefining UIOP/PACKAGE:SYMBOL-CALL in DEFUN WARNING: redefining UIOP/PACKAGE:INTERN* in DEFUN WARNING: redefining UIOP/PACKAGE:EXPORT* in DEFUN WARNING: redefining UIOP/PACKAGE:IMPORT* in DEFUN WARNING: redefining UIOP/PACKAGE:SHADOWING-IMPORT* in DEFUN WARNING: redefining UIOP/PACKAGE:SHADOW* in DEFUN WARNING: redefining UIOP/PACKAGE:MAKE-SYMBOL* in DEFUN WARNING: redefining UIOP/PACKAGE:UNINTERN* in DEFUN WARNING: redefining UIOP/PACKAGE:SYMBOL-SHADOWING-P in DEFUN WARNING: redefining UIOP/PACKAGE:HOME-PACKAGE-P in DEFUN WARNING: redefining UIOP/PACKAGE:SYMBOL-PACKAGE-NAME in DEFUN WARNING: redefining UIOP/PACKAGE:STANDARD-COMMON-LISP-SYMBOL-P in DEFUN WARNING: redefining UIOP/PACKAGE:REIFY-PACKAGE in DEFUN WARNING: redefining UIOP/PACKAGE:UNREIFY-PACKAGE in DEFUN WARNING: redefining UIOP/PACKAGE:REIFY-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE:UNREIFY-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE::RECORD-FISHY in DEFUN WARNING: redefining UIOP/PACKAGE::WHEN-PACKAGE-FISHINESS in DEFMACRO WARNING: redefining UIOP/PACKAGE::NOTE-PACKAGE-FISHINESS in DEFMACRO WARNING: redefining UIOP/PACKAGE::SET-DUMMY-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE::MAKE-DUMMY-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE::DUMMY-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE::GET-DUMMY-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE:NUKE-SYMBOL-IN-PACKAGE in DEFUN WARNING: redefining UIOP/PACKAGE:NUKE-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE:REHOME-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE:ENSURE-PACKAGE-UNUSED in DEFUN WARNING: redefining UIOP/PACKAGE:DELETE-PACKAGE* in DEFUN WARNING: redefining UIOP/PACKAGE:PACKAGE-NAMES in DEFUN WARNING: redefining UIOP/PACKAGE:PACKAGES-FROM-NAMES in DEFUN WARNING: redefining UIOP/PACKAGE:FRESH-PACKAGE-NAME in DEFUN WARNING: redefining UIOP/PACKAGE:RENAME-PACKAGE-AWAY in DEFUN WARNING: redefining UIOP/PACKAGE:PACKAGE-DEFINITION-FORM in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-SHADOWING-IMPORT in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-IMPORTED in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-IMPORT in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-INHERITED in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-MIX in DEFUN WARNING: redefining UIOP/PACKAGE::RECYCLE-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE::SYMBOL-RECYCLED-P in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-SYMBOL in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-EXPORTED-TO-USER in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-EXPORTED in DEFUN WARNING: redefining UIOP/PACKAGE::ENSURE-EXPORT in DEFUN WARNING: redefining UIOP/PACKAGE::INSTALL-PACKAGE-LOCAL-NICKNAMES in DEFUN WARNING: redefining UIOP/PACKAGE:ENSURE-PACKAGE in DEFUN WARNING: redefining UIOP/PACKAGE:PARSE-DEFINE-PACKAGE-FORM in DEFUN WARNING: redefining UIOP/PACKAGE:DEFINE-PACKAGE in DEFMACRO WARNING: redefining UIOP/COMMON-LISP::FROB-SUBSTRINGS in DEFUN WARNING: redefining UIOP/COMMON-LISP::COMPATFMT in DEFMACRO WARNING: redefining UIOP/UTILITY::ENSURE-FUNCTION-NOTINLINE in DEFUN WARNING: redefining UIOP/UTILITY:WITH-UPGRADABILITY in DEFMACRO WARNING: redefining UIOP/UTILITY:UIOP-DEBUG in DEFMACRO WARNING: redefining UIOP/UTILITY:LOAD-UIOP-DEBUG-UTILITY in DEFUN WARNING: redefining UIOP/UTILITY:NEST in DEFMACRO WARNING: redefining UIOP/UTILITY:IF-LET in DEFMACRO WARNING: redefining UIOP/UTILITY:PARSE-BODY in DEFUN WARNING: redefining UIOP/UTILITY:WHILE-COLLECTING in DEFMACRO WARNING: redefining UIOP/UTILITY:APPENDF in DEFMACRO WARNING: redefining UIOP/UTILITY:LENGTH=N-P in DEFUN WARNING: redefining UIOP/UTILITY:ENSURE-LIST in DEFUN WARNING: redefining UIOP/UTILITY:REMOVE-PLIST-KEY in DEFUN WARNING: redefining UIOP/UTILITY:REMOVE-PLIST-KEYS in DEFUN WARNING: redefining UIOP/UTILITY:EMPTYP in DEFUN WARNING: redefining UIOP/UTILITY:CHARACTER-TYPE-INDEX in DEFUN WARNING: redefining UIOP/UTILITY:BASE-STRING-P in DEFUN WARNING: redefining UIOP/UTILITY:STRINGS-COMMON-ELEMENT-TYPE in DEFUN WARNING: redefining UIOP/UTILITY:REDUCE/STRCAT in DEFUN WARNING: redefining UIOP/UTILITY:STRCAT in DEFUN WARNING: redefining UIOP/UTILITY:FIRST-CHAR in DEFUN WARNING: redefining UIOP/UTILITY:LAST-CHAR in DEFUN WARNING: redefining UIOP/UTILITY:SPLIT-STRING in DEFUN WARNING: redefining UIOP/UTILITY:STRING-PREFIX-P in DEFUN WARNING: redefining UIOP/UTILITY:STRING-SUFFIX-P in DEFUN WARNING: redefining UIOP/UTILITY:STRING-ENCLOSED-P in DEFUN WARNING: redefining UIOP/UTILITY:STRIPLN in DEFUN WARNING: redefining UIOP/UTILITY:STANDARD-CASE-SYMBOL-NAME in DEFUN WARNING: redefining UIOP/UTILITY:FIND-STANDARD-CASE-SYMBOL in DEFUN WARNING: redefining UIOP/UTILITY:TIMESTAMP< in DEFUN WARNING: redefining UIOP/UTILITY:TIMESTAMPS< in DEFUN WARNING: redefining UIOP/UTILITY:TIMESTAMP*< in DEFUN WARNING: redefining UIOP/UTILITY:TIMESTAMP<= in DEFUN WARNING: redefining UIOP/UTILITY:EARLIER-TIMESTAMP in DEFUN WARNING: redefining UIOP/UTILITY:TIMESTAMPS-EARLIEST in DEFUN WARNING: redefining UIOP/UTILITY:EARLIEST-TIMESTAMP in DEFUN WARNING: redefining UIOP/UTILITY:LATER-TIMESTAMP in DEFUN WARNING: redefining UIOP/UTILITY:TIMESTAMPS-LATEST in DEFUN WARNING: redefining UIOP/UTILITY:LATEST-TIMESTAMP in DEFUN WARNING: redefining UIOP/UTILITY:LATEST-TIMESTAMP-F in DEFMACRO WARNING: redefining UIOP/UTILITY:ENSURE-FUNCTION in DEFUN WARNING: redefining UIOP/UTILITY:ACCESS-AT in DEFUN WARNING: redefining UIOP/UTILITY:ACCESS-AT-COUNT in DEFUN WARNING: redefining UIOP/UTILITY:CALL-FUNCTION in DEFUN WARNING: redefining UIOP/UTILITY:CALL-FUNCTIONS in DEFUN WARNING: redefining UIOP/UTILITY:REGISTER-HOOK-FUNCTION in DEFUN WARNING: redefining UIOP/UTILITY:COERCE-CLASS in DEFUN WARNING: redefining UIOP/UTILITY:ENSURE-GETHASH in DEFUN WARNING: redefining UIOP/UTILITY:LIST-TO-HASH-SET in DEFUN WARNING: redefining UIOP/UTILITY:LEXICOGRAPHIC< in DEFUN WARNING: redefining UIOP/UTILITY:LEXICOGRAPHIC<= in DEFUN WARNING: redefining UIOP/UTILITY:STYLE-WARN in DEFUN WARNING: redefining UIOP/UTILITY:MATCH-CONDITION-P in DEFUN WARNING: redefining UIOP/UTILITY:MATCH-ANY-CONDITION-P in DEFUN WARNING: redefining UIOP/UTILITY:CALL-WITH-MUFFLED-CONDITIONS in DEFUN WARNING: redefining UIOP/UTILITY:WITH-MUFFLED-CONDITIONS in DEFMACRO WARNING: redefining UIOP/UTILITY:NOT-IMPLEMENTED-ERROR in DEFUN WARNING: redefining UIOP/UTILITY:PARAMETER-ERROR in DEFUN WARNING: redefining UIOP/UTILITY:BOOLEAN-TO-FEATURE-EXPRESSION in DEFUN WARNING: redefining UIOP/UTILITY:SYMBOL-TEST-TO-FEATURE-EXPRESSION in DEFUN WARNING: redefining UIOP/VERSION:UNPARSE-VERSION in DEFUN WARNING: redefining UIOP/VERSION:PARSE-VERSION in DEFUN WARNING: redefining UIOP/VERSION:NEXT-VERSION in DEFUN WARNING: redefining UIOP/VERSION:VERSION< in DEFUN WARNING: redefining UIOP/VERSION:VERSION<= in DEFUN WARNING: redefining UIOP/VERSION::DEPRECATED-FUNCTION-CONDITION-KIND in DEFUN WARNING: redefining PRINT-OBJECT (#<SB-PCL::CONDITION-CLASS UIOP/VERSION:DEPRECATED-FUNCTION-CONDITION> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining UIOP/VERSION::NOTIFY-DEPRECATED-FUNCTION in DEFUN WARNING: redefining UIOP/VERSION:VERSION-DEPRECATION in DEFUN WARNING: redefining UIOP/VERSION:WITH-DEPRECATION in DEFMACRO WARNING: redefining UIOP/OS:FEATUREP in DEFUN WARNING: redefining UIOP/OS:OS-MACOSX-P in DEFUN WARNING: redefining UIOP/OS:OS-UNIX-P in DEFUN WARNING: redefining UIOP/OS:OS-WINDOWS-P in DEFUN WARNING: redefining UIOP/OS:OS-GENERA-P in DEFUN WARNING: redefining UIOP/OS::OS-OLDMAC-P in DEFUN WARNING: redefining UIOP/OS::OS-HAIKU-P in DEFUN WARNING: redefining UIOP/OS::OS-MEZZANO-P in DEFUN WARNING: redefining UIOP/OS:DETECT-OS in DEFUN WARNING: redefining UIOP/OS:OS-COND in DEFMACRO WARNING: redefining UIOP/OS:GETENV in DEFUN WARNING: redefining UIOP/OS:GETENVP in DEFUN WARNING: redefining UIOP/OS::FIRST-FEATURE in DEFUN WARNING: redefining UIOP/OS:IMPLEMENTATION-TYPE in DEFUN WARNING: redefining UIOP/OS:OPERATING-SYSTEM in DEFUN WARNING: redefining UIOP/OS:ARCHITECTURE in DEFUN WARNING: redefining UIOP/OS:LISP-VERSION-STRING in DEFUN WARNING: redefining UIOP/OS:IMPLEMENTATION-IDENTIFIER in DEFUN WARNING: redefining UIOP/OS:HOSTNAME in DEFUN WARNING: redefining UIOP/OS:GETCWD in DEFUN WARNING: redefining UIOP/OS:CHDIR in DEFUN WARNING: redefining UIOP/OS:READ-NULL-TERMINATED-STRING in DEFUN WARNING: redefining UIOP/OS:READ-LITTLE-ENDIAN in DEFUN WARNING: redefining UIOP/OS:PARSE-FILE-LOCATION-INFO in DEFUN WARNING: redefining UIOP/OS:PARSE-WINDOWS-SHORTCUT in DEFUN WARNING: redefining UIOP/PATHNAME:NORMALIZE-PATHNAME-DIRECTORY-COMPONENT in DEFUN WARNING: redefining UIOP/PATHNAME:DENORMALIZE-PATHNAME-DIRECTORY-COMPONENT in DEFUN WARNING: redefining UIOP/PATHNAME:MERGE-PATHNAME-DIRECTORY-COMPONENTS in DEFUN WARNING: redefining UIOP/PATHNAME:MAKE-PATHNAME* in DEFUN WARNING: redefining UIOP/PATHNAME:MAKE-PATHNAME-COMPONENT-LOGICAL in DEFUN WARNING: redefining UIOP/PATHNAME:MAKE-PATHNAME-LOGICAL in DEFUN WARNING: redefining UIOP/PATHNAME:MERGE-PATHNAMES* in DEFUN WARNING: redefining UIOP/PATHNAME:LOGICAL-PATHNAME-P in DEFUN WARNING: redefining UIOP/PATHNAME:PHYSICAL-PATHNAME-P in DEFUN WARNING: redefining UIOP/PATHNAME:PHYSICALIZE-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:NIL-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:WITH-PATHNAME-DEFAULTS in DEFMACRO WARNING: redefining UIOP/PATHNAME:PATHNAME-EQUAL in DEFUN WARNING: redefining UIOP/PATHNAME:ABSOLUTE-PATHNAME-P in DEFUN WARNING: redefining UIOP/PATHNAME:RELATIVE-PATHNAME-P in DEFUN WARNING: redefining UIOP/PATHNAME:HIDDEN-PATHNAME-P in DEFUN WARNING: redefining UIOP/PATHNAME:FILE-PATHNAME-P in DEFUN WARNING: redefining UIOP/PATHNAME:PATHNAME-DIRECTORY-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:PATHNAME-PARENT-DIRECTORY-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:DIRECTORY-PATHNAME-P in DEFUN WARNING: redefining UIOP/PATHNAME:ENSURE-DIRECTORY-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:SPLIT-UNIX-NAMESTRING-DIRECTORY-COMPONENTS in DEFUN WARNING: redefining UIOP/PATHNAME:SPLIT-NAME-TYPE in DEFUN WARNING: redefining UIOP/PATHNAME:PARSE-UNIX-NAMESTRING in DEFUN WARNING: redefining UIOP/PATHNAME:UNIX-NAMESTRING in DEFUN WARNING: redefining UIOP/PATHNAME:SUBPATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:SUBPATHNAME* in DEFUN WARNING: redefining UIOP/PATHNAME:PATHNAME-ROOT in DEFUN WARNING: redefining UIOP/PATHNAME:PATHNAME-HOST-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:ENSURE-ABSOLUTE-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:SUBPATHP in DEFUN WARNING: redefining UIOP/PATHNAME:ENOUGH-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:CALL-WITH-ENOUGH-PATHNAME in DEFUN WARNING: redefining UIOP/PATHNAME:WITH-ENOUGH-PATHNAME in DEFMACRO WARNING: redefining UIOP/PATHNAME:WILDEN in DEFUN WARNING: redefining UIOP/PATHNAME:RELATIVIZE-DIRECTORY-COMPONENT in DEFUN WARNING: redefining UIOP/PATHNAME:RELATIVIZE-PATHNAME-DIRECTORY in DEFUN WARNING: redefining UIOP/PATHNAME:DIRECTORY-SEPARATOR-FOR-HOST in DEFUN WARNING: redefining UIOP/PATHNAME:DIRECTORIZE-PATHNAME-HOST-DEVICE in DEFUN WARNING: redefining UIOP/PATHNAME:TRANSLATE-PATHNAME* in DEFUN WARNING: redefining UIOP/FILESYSTEM:NATIVE-NAMESTRING in DEFUN WARNING: redefining UIOP/FILESYSTEM:PARSE-NATIVE-NAMESTRING in DEFUN WARNING: redefining UIOP/FILESYSTEM:TRUENAME* in DEFUN WARNING: redefining UIOP/FILESYSTEM:SAFE-FILE-WRITE-DATE in DEFUN WARNING: redefining UIOP/FILESYSTEM:PROBE-FILE* in DEFUN WARNING: redefining UIOP/FILESYSTEM:DIRECTORY-EXISTS-P in DEFUN WARNING: redefining UIOP/FILESYSTEM:FILE-EXISTS-P in DEFUN WARNING: redefining UIOP/FILESYSTEM:DIRECTORY* in DEFUN WARNING: redefining UIOP/FILESYSTEM:FILTER-LOGICAL-DIRECTORY-RESULTS in DEFUN WARNING: redefining UIOP/FILESYSTEM:DIRECTORY-FILES in DEFUN WARNING: redefining UIOP/FILESYSTEM:SUBDIRECTORIES in DEFUN WARNING: redefining UIOP/FILESYSTEM:COLLECT-SUB*DIRECTORIES in DEFUN WARNING: redefining UIOP/FILESYSTEM:TRUENAMIZE in DEFUN WARNING: redefining UIOP/FILESYSTEM:RESOLVE-SYMLINKS in DEFUN WARNING: redefining UIOP/FILESYSTEM:RESOLVE-SYMLINKS* in DEFUN WARNING: redefining UIOP/PATHNAME:ENSURE-PATHNAME in DEFUN WARNING: redefining UIOP/FILESYSTEM:GET-PATHNAME-DEFAULTS in DEFUN WARNING: redefining UIOP/FILESYSTEM:CALL-WITH-CURRENT-DIRECTORY in DEFUN WARNING: redefining UIOP/FILESYSTEM:WITH-CURRENT-DIRECTORY in DEFMACRO WARNING: redefining UIOP/FILESYSTEM:INTER-DIRECTORY-SEPARATOR in DEFUN WARNING: redefining UIOP/FILESYSTEM:SPLIT-NATIVE-PATHNAMES-STRING in DEFUN WARNING: redefining UIOP/FILESYSTEM:GETENV-PATHNAME in DEFUN WARNING: redefining UIOP/FILESYSTEM:GETENV-PATHNAMES in DEFUN WARNING: redefining UIOP/FILESYSTEM:GETENV-ABSOLUTE-DIRECTORY in DEFUN WARNING: redefining UIOP/FILESYSTEM:GETENV-ABSOLUTE-DIRECTORIES in DEFUN WARNING: redefining UIOP/FILESYSTEM:LISP-IMPLEMENTATION-DIRECTORY in DEFUN WARNING: redefining UIOP/FILESYSTEM:LISP-IMPLEMENTATION-PATHNAME-P in DEFUN WARNING: redefining UIOP/FILESYSTEM:ENSURE-ALL-DIRECTORIES-EXIST in DEFUN WARNING: redefining UIOP/FILESYSTEM:DELETE-FILE-IF-EXISTS in DEFUN WARNING: redefining UIOP/FILESYSTEM:RENAME-FILE-OVERWRITING-TARGET in DEFUN WARNING: redefining UIOP/FILESYSTEM:DELETE-EMPTY-DIRECTORY in DEFUN WARNING: redefining UIOP/FILESYSTEM:DELETE-DIRECTORY-TREE in DEFUN WARNING: redefining UIOP/STREAM:SETUP-STDIN in DEFUN WARNING: redefining UIOP/STREAM:SETUP-STDOUT in DEFUN WARNING: redefining UIOP/STREAM:SETUP-STDERR in DEFUN WARNING: redefining UIOP/STREAM:ALWAYS-DEFAULT-ENCODING in DEFUN WARNING: redefining UIOP/STREAM:DETECT-ENCODING in DEFUN WARNING: redefining UIOP/STREAM:DEFAULT-ENCODING-EXTERNAL-FORMAT in DEFUN WARNING: redefining UIOP/STREAM:ENCODING-EXTERNAL-FORMAT in DEFUN WARNING: redefining UIOP/STREAM:WITH-SAFE-IO-SYNTAX in DEFMACRO WARNING: redefining UIOP/STREAM:CALL-WITH-SAFE-IO-SYNTAX in DEFUN WARNING: redefining UIOP/STREAM:SAFE-READ-FROM-STRING in DEFUN WARNING: redefining UIOP/STREAM:CALL-WITH-OUTPUT-FILE in DEFUN WARNING: redefining UIOP/STREAM:WITH-OUTPUT-FILE in DEFMACRO WARNING: redefining UIOP/STREAM::CALL-WITH-OUTPUT in DEFUN WARNING: redefining UIOP/STREAM:OUTPUT-STRING in DEFUN WARNING: redefining UIOP/STREAM:CALL-WITH-INPUT-FILE in DEFUN WARNING: redefining UIOP/STREAM:WITH-INPUT-FILE in DEFMACRO WARNING: redefining UIOP/STREAM::CALL-WITH-INPUT in DEFUN WARNING: redefining UIOP/STREAM:WITH-INPUT in DEFMACRO WARNING: redefining UIOP/STREAM:INPUT-STRING in DEFUN WARNING: redefining UIOP/STREAM:NULL-DEVICE-PATHNAME in DEFUN WARNING: redefining UIOP/STREAM:CALL-WITH-NULL-INPUT in DEFUN WARNING: redefining UIOP/STREAM:WITH-NULL-INPUT in DEFMACRO WARNING: redefining UIOP/STREAM:CALL-WITH-NULL-OUTPUT in DEFUN WARNING: redefining UIOP/STREAM:WITH-NULL-OUTPUT in DEFMACRO WARNING: redefining UIOP/STREAM:FINISH-OUTPUTS in DEFUN WARNING: redefining UIOP/STREAM:FORMAT! in DEFUN WARNING: redefining UIOP/STREAM:SAFE-FORMAT! in DEFUN WARNING: redefining UIOP/STREAM:COPY-STREAM-TO-STREAM in DEFUN WARNING: redefining UIOP/STREAM:CONCATENATE-FILES in DEFUN WARNING: redefining UIOP/STREAM:COPY-FILE in DEFUN WARNING: redefining UIOP/STREAM:SLURP-STREAM-STRING in DEFUN WARNING: redefining UIOP/STREAM:SLURP-STREAM-LINES in DEFUN WARNING: redefining UIOP/STREAM:SLURP-STREAM-LINE in DEFUN WARNING: redefining UIOP/STREAM:SLURP-STREAM-FORMS in DEFUN WARNING: redefining UIOP/STREAM:SLURP-STREAM-FORM in DEFUN WARNING: redefining UIOP/STREAM:READ-FILE-STRING in DEFUN WARNING: redefining UIOP/STREAM:READ-FILE-LINES in DEFUN WARNING: redefining UIOP/STREAM:READ-FILE-LINE in DEFUN WARNING: redefining UIOP/STREAM:READ-FILE-FORMS in DEFUN WARNING: redefining UIOP/STREAM:READ-FILE-FORM in DEFUN WARNING: redefining UIOP/STREAM:SAFE-READ-FILE-LINE in DEFUN WARNING: redefining UIOP/STREAM:SAFE-READ-FILE-FORM in DEFUN WARNING: redefining UIOP/STREAM:EVAL-INPUT in DEFUN WARNING: redefining UIOP/STREAM:EVAL-THUNK in DEFUN WARNING: redefining UIOP/STREAM:STANDARD-EVAL-THUNK in DEFUN WARNING: redefining UIOP/STREAM:PRINTLN in DEFUN WARNING: redefining UIOP/STREAM:WRITELN in DEFUN WARNING: redefining UIOP/STREAM:DEFAULT-TEMPORARY-DIRECTORY in DEFUN WARNING: redefining UIOP/STREAM:TEMPORARY-DIRECTORY in DEFUN WARNING: redefining UIOP/STREAM:SETUP-TEMPORARY-DIRECTORY in DEFUN WARNING: redefining UIOP/STREAM:CALL-WITH-TEMPORARY-FILE in DEFUN WARNING: redefining UIOP/STREAM:WITH-TEMPORARY-FILE in DEFMACRO WARNING: redefining UIOP/STREAM::GET-TEMPORARY-FILE in DEFUN WARNING: redefining UIOP/STREAM:ADD-PATHNAME-SUFFIX in DEFUN WARNING: redefining UIOP/STREAM:TMPIZE-PATHNAME in DEFUN WARNING: redefining UIOP/STREAM:CALL-WITH-STAGING-PATHNAME in DEFUN WARNING: redefining UIOP/STREAM:WITH-STAGING-PATHNAME in DEFMACRO WARNING: redefining UIOP/STREAM:FILE-STREAM-P in DEFUN WARNING: redefining UIOP/STREAM:FILE-OR-SYNONYM-STREAM-P in DEFUN WARNING: redefining UIOP/IMAGE:QUIT in DEFUN WARNING: redefining UIOP/IMAGE:DIE in DEFUN WARNING: redefining UIOP/IMAGE:RAW-PRINT-BACKTRACE in DEFUN WARNING: redefining UIOP/IMAGE:PRINT-BACKTRACE in DEFUN WARNING: redefining UIOP/IMAGE:PRINT-CONDITION-BACKTRACE in DEFUN WARNING: redefining UIOP/IMAGE:FATAL-CONDITION-P in DEFUN WARNING: redefining UIOP/IMAGE:HANDLE-FATAL-CONDITION in DEFUN WARNING: redefining UIOP/IMAGE:CALL-WITH-FATAL-CONDITION-HANDLER in DEFUN WARNING: redefining UIOP/IMAGE:WITH-FATAL-CONDITION-HANDLER in DEFMACRO WARNING: redefining UIOP/IMAGE:SHELL-BOOLEAN-EXIT in DEFUN WARNING: redefining UIOP/IMAGE:REGISTER-IMAGE-RESTORE-HOOK in DEFUN WARNING: redefining UIOP/IMAGE:REGISTER-IMAGE-DUMP-HOOK in DEFUN WARNING: redefining UIOP/IMAGE:CALL-IMAGE-RESTORE-HOOK in DEFUN WARNING: redefining UIOP/IMAGE:CALL-IMAGE-DUMP-HOOK in DEFUN WARNING: redefining UIOP/IMAGE:RAW-COMMAND-LINE-ARGUMENTS in DEFUN WARNING: redefining UIOP/IMAGE:COMMAND-LINE-ARGUMENTS in DEFUN WARNING: redefining UIOP/IMAGE:ARGV0 in DEFUN WARNING: redefining UIOP/IMAGE:SETUP-COMMAND-LINE-ARGUMENTS in DEFUN WARNING: redefining UIOP/IMAGE:RESTORE-IMAGE in DEFUN WARNING: redefining UIOP/IMAGE:DUMP-IMAGE in DEFUN WARNING: redefining UIOP/IMAGE:CREATE-IMAGE in DEFUN WARNING: redefining UIOP/LISP-BUILD::SB-GROVEL-UNKNOWN-CONSTANT-CONDITION-P in DEFUN WARNING: redefining UIOP/LISP-BUILD:CALL-WITH-MUFFLED-COMPILER-CONDITIONS in DEFUN WARNING: redefining UIOP/LISP-BUILD:WITH-MUFFLED-COMPILER-CONDITIONS in DEFMACRO WARNING: redefining UIOP/LISP-BUILD:CALL-WITH-MUFFLED-LOADER-CONDITIONS in DEFUN WARNING: redefining UIOP/LISP-BUILD:WITH-MUFFLED-LOADER-CONDITIONS in DEFMACRO WARNING: redefining UIOP/LISP-BUILD:CHECK-LISP-COMPILE-WARNINGS in DEFUN WARNING: redefining UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS in DEFUN WARNING: redefining UIOP/LISP-BUILD:REIFY-SIMPLE-SEXP in DEFUN WARNING: redefining UIOP/LISP-BUILD:UNREIFY-SIMPLE-SEXP in DEFUN WARNING: redefining UIOP/LISP-BUILD::REIFY-UNDEFINED-WARNING in DEFUN WARNING: redefining UIOP/LISP-BUILD:REIFY-DEFERRED-WARNINGS in DEFUN WARNING: redefining UIOP/LISP-BUILD:UNREIFY-DEFERRED-WARNINGS in DEFUN WARNING: redefining UIOP/LISP-BUILD:RESET-DEFERRED-WARNINGS in DEFUN WARNING: redefining UIOP/LISP-BUILD:SAVE-DEFERRED-WARNINGS in DEFUN WARNING: redefining UIOP/LISP-BUILD:WARNINGS-FILE-TYPE in DEFUN WARNING: redefining UIOP/LISP-BUILD:ENABLE-DEFERRED-WARNINGS-CHECK in DEFUN WARNING: redefining UIOP/LISP-BUILD:DISABLE-DEFERRED-WARNINGS-CHECK in DEFUN WARNING: redefining UIOP/LISP-BUILD:WARNINGS-FILE-P in DEFUN WARNING: redefining UIOP/LISP-BUILD:CHECK-DEFERRED-WARNINGS in DEFUN WARNING: redefining UIOP/LISP-BUILD::CALL-WITH-SAVED-DEFERRED-WARNINGS in DEFUN WARNING: redefining UIOP/LISP-BUILD:WITH-SAVED-DEFERRED-WARNINGS in DEFMACRO WARNING: redefining UIOP/LISP-BUILD:CURRENT-LISP-FILE-PATHNAME in DEFUN WARNING: redefining UIOP/LISP-BUILD:LOAD-PATHNAME in DEFUN WARNING: redefining UIOP/LISP-BUILD:LISPIZE-PATHNAME in DEFUN WARNING: redefining UIOP/LISP-BUILD:COMPILE-FILE-TYPE in DEFUN WARNING: redefining UIOP/LISP-BUILD:CALL-AROUND-HOOK in DEFUN WARNING: redefining UIOP/LISP-BUILD:COMPILE-FILE-PATHNAME* in DEFUN WARNING: redefining UIOP/LISP-BUILD:COMPILE-FILE* in DEFUN WARNING: redefining UIOP/LISP-BUILD:LOAD* in DEFUN WARNING: redefining UIOP/LISP-BUILD:LOAD-FROM-STRING in DEFUN WARNING: redefining UIOP/LISP-BUILD:COMBINE-FASLS in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::REQUIRES-ESCAPING-P in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-TOKEN in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::ESCAPE-WINDOWS-TOKEN-WITHIN-DOUBLE-QUOTES in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::EASY-WINDOWS-CHARACTER-P in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-WINDOWS-TOKEN in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::ESCAPE-SH-TOKEN-WITHIN-DOUBLE-QUOTES in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:EASY-SH-CHARACTER-P in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SH-TOKEN in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SHELL-TOKEN in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-COMMAND in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-WINDOWS-COMMAND in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SH-COMMAND in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:ESCAPE-SHELL-COMMAND in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%NORMALIZE-IO-SPECIFIER in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%INTERACTIVEP in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%SIGNAL-TO-EXIT-CODE in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%CODE-TO-STATUS in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%HANDLE-IF-EXISTS in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%HANDLE-IF-DOES-NOT-EXIST in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-ERROR-OUTPUT in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-INPUT in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-OUTPUT in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-INFO-PID in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%PROCESS-STATUS in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:PROCESS-ALIVE-P in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:WAIT-PROCESS in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM::%POSIX-SEND-SIGNAL in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:TERMINATE-PROCESS in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:CLOSE-STREAMS in DEFUN WARNING: redefining UIOP/LAUNCH-PROGRAM:LAUNCH-PROGRAM in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::CALL-STREAM-PROCESSOR in DEFUN WARNING: redefining UIOP/RUN-PROGRAM:SLURP-INPUT-STREAM in DEFGENERIC WARNING: redefining SLURP-INPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:FUNCTION> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:CONS> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:STREAM> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER STRING> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :STRING> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :LINES> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :LINE> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :FORMS> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER :FORM> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:NULL> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:PATHNAME> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining SLURP-INPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining UIOP/RUN-PROGRAM:VOMIT-OUTPUT-STREAM in DEFGENERIC WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:FUNCTION> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:CONS> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:STREAM> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:STRING> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-MOP:EQL-SPECIALIZER T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:NULL> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining VOMIT-OUTPUT-STREAM (#<BUILT-IN-CLASS COMMON-LISP:PATHNAME> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining VOMIT-OUTPUT-STREAM (#<SB-PCL:SYSTEM-CLASS COMMON-LISP:T> #<SB-PCL:SYSTEM-CLASS COMMON-LISP:T>) in DEFMETHOD WARNING: redefining UIOP/RUN-PROGRAM::%CHECK-RESULT in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::%ACTIVE-IO-SPECIFIER-P in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::%RUN-PROGRAM in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::%CALL-WITH-PROGRAM-IO in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::PLACE-SETTER in DEFMACRO WARNING: redefining UIOP/RUN-PROGRAM::WITH-PROGRAM-INPUT in DEFMACRO WARNING: redefining UIOP/RUN-PROGRAM::WITH-PROGRAM-OUTPUT in DEFMACRO WARNING: redefining UIOP/RUN-PROGRAM::WITH-PROGRAM-ERROR-OUTPUT in DEFMACRO WARNING: redefining UIOP/RUN-PROGRAM::%USE-LAUNCH-PROGRAM in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::%NORMALIZE-SYSTEM-COMMAND in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::%REDIRECTED-SYSTEM-COMMAND in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::%SYSTEM in DEFUN WARNING: redefining UIOP/RUN-PROGRAM::%USE-SYSTEM in DEFUN WARNING: redefining UIOP/RUN-PROGRAM:RUN-PROGRAM in DEFUN WARNING: redefining UIOP/CONFIGURATION:CONFIGURATION-INHERITANCE-DIRECTIVE-P in DEFUN WARNING: redefining UIOP/CONFIGURATION:REPORT-INVALID-FORM in DEFUN WARNING: redefining UIOP/CONFIGURATION:VALIDATE-CONFIGURATION-FORM in DEFUN WARNING: redefining UIOP/CONFIGURATION:VALIDATE-CONFIGURATION-FILE in DEFUN WARNING: redefining UIOP/CONFIGURATION:VALIDATE-CONFIGURATION-DIRECTORY in DEFUN WARNING: redefining UIOP/CONFIGURATION:RESOLVE-RELATIVE-LOCATION in DEFUN WARNING: redefining UIOP/CONFIGURATION:RESOLVE-ABSOLUTE-LOCATION in DEFUN WARNING: redefining UIOP/CONFIGURATION:RESOLVE-LOCATION in DEFUN WARNING: redefining UIOP/CONFIGURATION:LOCATION-DESIGNATOR-P in DEFUN WARNING: redefining UIOP/CONFIGURATION:LOCATION-FUNCTION-P in DEFUN WARNING: redefining UIOP/CONFIGURATION:REGISTER-CLEAR-CONFIGURATION-HOOK in DEFUN WARNING: redefining UIOP/CONFIGURATION:CLEAR-CONFIGURATION in DEFUN WARNING: redefining UIOP/CONFIGURATION:UPGRADE-CONFIGURATION in DEFUN WARNING: redefining UIOP/CONFIGURATION:GET-FOLDER-PATH in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-HOME in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-HOME in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-DIRS in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-DIRS in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-CACHE-HOME in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-RUNTIME-DIR in DEFUN WARNING: redefining UIOP/CONFIGURATION:SYSTEM-CONFIG-PATHNAMES in DEFUN WARNING: redefining UIOP/CONFIGURATION:FILTER-PATHNAME-SET in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-PATHNAMES in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-PATHNAMES in DEFUN WARNING: redefining UIOP/CONFIGURATION:FIND-PREFERRED-FILE in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-DATA-PATHNAME in DEFUN WARNING: redefining UIOP/CONFIGURATION:XDG-CONFIG-PATHNAME in DEFUN WARNING: redefining UIOP/CONFIGURATION::COMPUTE-USER-CACHE in DEFUN WARNING: redefining UIOP/CONFIGURATION:UIOP-DIRECTORY in DEFUN WARNING: redefining UIOP/BACKWARD-DRIVER:COERCE-PATHNAME in DEFUN WARNING: redefining UIOP/CONFIGURATION:USER-CONFIGURATION-DIRECTORIES in DEFUN WARNING: redefining UIOP/CONFIGURATION:SYSTEM-CONFIGURATION-DIRECTORIES in DEFUN WARNING: redefining UIOP/CONFIGURATION:IN-FIRST-DIRECTORY in DEFUN WARNING: redefining UIOP/CONFIGURATION:IN-USER-CONFIGURATION-DIRECTORY in DEFUN WARNING: redefining UIOP/CONFIGURATION:IN-SYSTEM-CONFIGURATION-DIRECTORY in DEFUN WARNING: redefining UIOP/BACKWARD-DRIVER:VERSION-COMPATIBLE-P in DEFUN ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/hu.dwim.defclass-star/065ad41c55e830ec95bf379b2f36a3353a154641/hu.dwim.defclass-star-stable-git/test/test.lisp ; in: DEFTEST* NOP ; (HU.DWIM.DEFCLASS-STAR/TEST::DEFTEST* HU.DWIM.DEFCLASS-STAR/TEST::NOP ; NIL ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; NIL (1 2) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; NIL (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO ; :INITARG :BAR)) ; (1 2) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO :INITARG :BAR)) ; (1 2) (3 4)))) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* LABELS HU.DWIM.DEFCLASS-STAR/TEST::NOP BLOCK ; ==> ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-INITARG-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-CLASS-NAME-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-ACCESSOR-NAMES-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-SLOT-NAMES-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; NIL (1 2) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; NIL (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO ; :INITARG :BAR)) ; (1 2) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO :INITARG :BAR)) ; (1 2) (3 4)))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-ACCESSORS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *ACCESSOR-NAME-TRANSFORMER* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-INITARGS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *INITARG-NAME-TRANSFORMER* is defined but never used. ; in: DEFTEST* ACCESSORS ; (HU.DWIM.DEFCLASS-STAR/TEST::DEFTEST* HU.DWIM.DEFCLASS-STAR/TEST::ACCESSORS ; NIL ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF ; :INITARG :SLOT1)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-P :INITARG :SLOT1 :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :INITARG :SLOTP :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME-P :INITARG :SLOT-NAME :TYPE ; BOOLEAN)) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* NIL) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1))) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "FOO-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-BAR")) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "BAZ-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME))) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO-SLOT1-BAR ; :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::BAZ-SLOT1)))) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* LABELS HU.DWIM.DEFCLASS-STAR/TEST::ACCESSORS BLOCK ; ==> ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-INITARG-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-CLASS-NAME-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-ACCESSOR-NAMES-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-SLOT-NAMES-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF ; :INITARG :SLOT1)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-P :INITARG :SLOT1 :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :INITARG :SLOTP :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME-P :INITARG :SLOT-NAME :TYPE ; BOOLEAN)) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* NIL) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1))) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "FOO-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-BAR")) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "BAZ-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME))) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO-SLOT1-BAR ; :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::BAZ-SLOT1)))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* NIL) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "FOO-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-BAR")) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "BAZ-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME))) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO-SLOT1-BAR ; :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::BAZ-SLOT1))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; (HU.DWIM.DEFCLASS-STAR/TEST::DEFTEST* HU.DWIM.DEFCLASS-STAR/TEST::ACCESSORS ; NIL ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF ; :INITARG :SLOT1)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-P :INITARG :SLOT1 :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :INITARG :SLOTP :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME-P :INITARG :SLOT-NAME :TYPE ; BOOLEAN)) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* NIL) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1))) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "FOO-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-BAR")) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "BAZ-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME))) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO-SLOT1-BAR ; :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::BAZ-SLOT1)))) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* LABELS HU.DWIM.DEFCLASS-STAR/TEST::ACCESSORS BLOCK ; ==> ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-INITARG-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-CLASS-NAME-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-ACCESSOR-NAMES-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-SLOT-NAMES-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF ; :INITARG :SLOT1)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-P :INITARG :SLOT1 :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOTP :INITARG :SLOTP :TYPE BOOLEAN)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :UNBOUND :TYPE BOOLEAN) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT-NAME-P :INITARG :SLOT-NAME :TYPE ; BOOLEAN)) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* NIL) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1))) ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "FOO-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-BAR")) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "BAZ-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME))) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::FOO-SLOT1-BAR ; :INITARG ; HU.DWIM.DEFCLASS-STAR/TEST::BAZ-SLOT1)))) ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-ACCESSORS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *ACCESSOR-NAME-TRANSFORMER* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-INITARGS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *INITARG-NAME-TRANSFORMER* is defined but never used. ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* NIL) ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-ACCESSORS-P* is defined but never used. ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* NIL) ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-INITARGS-P* is defined but never used. ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "FOO-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-BAR")) ; ; caught STYLE-WARNING: ; The variable *ACCESSOR-NAME-TRANSFORMER* is defined but never used. ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER "BAZ-" ; HU.DWIM.DEFCLASS-STAR/TEST::NAME)) ; ; caught STYLE-WARNING: ; The variable *INITARG-NAME-TRANSFORMER* is defined but never used. ; in: DEFTEST* RECONFIGURATION ; (HU.DWIM.DEFCLASS-STAR/TEST::DEFTEST* HU.DWIM.DEFCLASS-STAR/TEST::RECONFIGURATION ; NIL ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1)) ; (1 2) ; (:ACCESSOR-NAME-TRANSFORMER ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-ZORK")) ; (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-ZORK :INITARG :SLOT1)) ; (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1)) ; (:ACCESSOR-NAME-PACKAGE ; (FIND-PACKAGE ; :HU.DWIM.DEFCLASS-STAR/TEST.DUMMY))) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST.DUMMY::SLOT1-OF :INITARG :SLOT1))))) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* LABELS HU.DWIM.DEFCLASS-STAR/TEST::RECONFIGURATION ; --> BLOCK ; ==> ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-INITARG-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-CLASS-NAME-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-ACCESSOR-NAMES-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-SLOT-NAMES-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1)) ; (1 2) ; (:ACCESSOR-NAME-TRANSFORMER ; (HU.DWIM.DEFCLASS-STAR:MAKE-NAME-TRANSFORMER ; HU.DWIM.DEFCLASS-STAR/TEST::NAME ; "-ZORK")) ; (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-ZORK :INITARG :SLOT1)) ; (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1)) ; (:ACCESSOR-NAME-PACKAGE ; (FIND-PACKAGE ; :HU.DWIM.DEFCLASS-STAR/TEST.DUMMY))) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST.DUMMY::SLOT1-OF :INITARG :SLOT1))))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-ACCESSORS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *ACCESSOR-NAME-TRANSFORMER* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-INITARGS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *INITARG-NAME-TRANSFORMER* is defined but never used. ; in: DEFTEST* FULL ; (HU.DWIM.DEFCLASS-STAR/TEST::DEFTEST* HU.DWIM.DEFCLASS-STAR/TEST::FULL ; NIL ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :UNBOUND :DOCUMENTATION "zork")) ; (1 2) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF :INITARG :SLOT1 ; :DOCUMENTATION "zork")) ; (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 42 ; :DOCUMENTATION "zork")) ; (1 2) (:AUTOMATIC-ACCESSORS-P NIL) ; (:AUTOMATIC-INITARGS-P NIL) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :INITFORM 42 :DOCUMENTATION ; "zork")) ; (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP=* ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 42 ; :DOCUMENTATION "zork") ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT2 ; :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT2-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT3 ; :UNBOUND :ACCESSOR NIL :EXPORT ; :ACCESSOR)) ; (:EXPORT-ACCESSOR-NAMES-P T) ; (:EXPORT-CLASS-NAME-P T) ; (:EXPORT-SLOT-NAMES-P T)) ; `(PROGN ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; (# # #)) ; (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (EXPORT '# ,#)) ; (FIND-CLASS 'HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS NIL))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP=* ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 42 ; :DOCUMENTATION "zork" :EXPORT :SLOT) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT2 ; :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT2-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT3 42 ; :EXPORT :ACCESSOR) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT4 42 ; :EXPORT NIL)) ; (:EXPORT-ACCESSOR-NAMES-P T) ; (:EXPORT-CLASS-NAME-P T) ; (:EXPORT-SLOT-NAMES-P T)) ; `(PROGN ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; (# # # #)) ; (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (EXPORT '# ,#)) ; (FIND-CLASS 'HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS NIL)))) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* LABELS HU.DWIM.DEFCLASS-STAR/TEST::FULL BLOCK ; ==> ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-INITARG-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-CLASS-NAME-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-ACCESSOR-NAMES-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-SLOT-NAMES-P* NIL)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 ; :UNBOUND :DOCUMENTATION "zork")) ; (1 2) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF :INITARG :SLOT1 ; :DOCUMENTATION "zork")) ; (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP= ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 42 ; :DOCUMENTATION "zork")) ; (1 2) (:AUTOMATIC-ACCESSORS-P NIL) ; (:AUTOMATIC-INITARGS-P NIL) (3 4)) ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :INITFORM 42 :DOCUMENTATION ; "zork")) ; (1 2) (3 4))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP=* ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 42 ; :DOCUMENTATION "zork") ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT2 ; :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT2-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT3 ; :UNBOUND :ACCESSOR NIL :EXPORT ; :ACCESSOR)) ; (:EXPORT-ACCESSOR-NAMES-P T) ; (:EXPORT-CLASS-NAME-P T) ; (:EXPORT-SLOT-NAMES-P T)) ; `(PROGN ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; (# # #)) ; (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (EXPORT '# ,#)) ; (FIND-CLASS 'HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS NIL))) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP=* ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 42 ; :DOCUMENTATION "zork" :EXPORT :SLOT) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT2 ; :UNBOUND :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT2-CUSTOM) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT3 42 ; :EXPORT :ACCESSOR) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT4 42 ; :EXPORT NIL)) ; (:EXPORT-ACCESSOR-NAMES-P T) ; (:EXPORT-CLASS-NAME-P T) ; (:EXPORT-SLOT-NAMES-P T)) ; `(PROGN ; (DEFCLASS HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; (SOME HU.DWIM.DEFCLASS-STAR/TEST::SUPER ; HU.DWIM.DEFCLASS-STAR/TEST::CLASSES) ; (# # # #)) ; (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE) (EXPORT '# ,#)) ; (FIND-CLASS 'HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS NIL)))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-ACCESSORS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *ACCESSOR-NAME-TRANSFORMER* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-INITARGS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *INITARG-NAME-TRANSFORMER* is defined but never used. ; in: DEFTEST* WARNINGS-AND-ERRORS ; (HU.DWIM.DEFCLASS-STAR/TEST::DEFTEST* HU.DWIM.DEFCLASS-STAR/TEST::WARNINGS-AND-ERRORS ; NIL ; (LET ((HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES* ; HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES*)) ; (PUSH :ASDF HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES*) ; (PUSH :UNSPECIFIED ; HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES*) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ASDF 42 :UNSPECIFIED 43) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF :INITARG :SLOT1 :ASDF 42 ; :UNSPECIFIED 43))) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-WARNS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :ASDF ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-WARNS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ASDF ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-ERRORS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND ; HU.DWIM.DEFCLASS-STAR/TEST::FOO HU.DWIM.DEFCLASS-STAR/TEST::BAR)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-ERRORS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 HU.DWIM.DEFCLASS-STAR/TEST::FOO ; HU.DWIM.DEFCLASS-STAR/TEST::BAR)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP-ERRORS ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; NIL ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1)) ; (:ACCESSOR-NAME-TRANSFORMER ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER ; HU.DWIM.DEFCLASS-STAR/TEST::MANY)))) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* LABELS ; --> HU.DWIM.DEFCLASS-STAR/TEST::WARNINGS-AND-ERRORS BLOCK ; ==> ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-INITARG-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-CLASS-NAME-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-ACCESSOR-NAMES-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-SLOT-NAMES-P* NIL)) ; (LET ((HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES* ; HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES*)) ; (PUSH :ASDF HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES*) ; (PUSH :UNSPECIFIED ; HU.DWIM.DEFCLASS-STAR:*ALLOWED-SLOT-DEFINITION-PROPERTIES*) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT= ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ASDF 42 :UNSPECIFIED 43) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ACCESSOR ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-OF :INITARG :SLOT1 :ASDF 42 ; :UNSPECIFIED 43))) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-WARNS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND :ASDF ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-WARNS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :ASDF ; HU.DWIM.DEFCLASS-STAR/TEST::SLOT1-CUSTOM)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-ERRORS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 :UNBOUND ; HU.DWIM.DEFCLASS-STAR/TEST::FOO HU.DWIM.DEFCLASS-STAR/TEST::BAR)) ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT-ERRORS ; (HU.DWIM.DEFCLASS-STAR/TEST::SLOT1 HU.DWIM.DEFCLASS-STAR/TEST::FOO ; HU.DWIM.DEFCLASS-STAR/TEST::BAR)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP-ERRORS ; (HU.DWIM.DEFCLASS-STAR:DEFCLASS* HU.DWIM.DEFCLASS-STAR/TEST::SOME-CLASS ; NIL ((HU.DWIM.DEFCLASS-STAR/TEST::SLOT1)) ; (:ACCESSOR-NAME-TRANSFORMER ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER ; HU.DWIM.DEFCLASS-STAR/TEST::MANY)))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-ACCESSORS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *ACCESSOR-NAME-TRANSFORMER* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-INITARGS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *INITARG-NAME-TRANSFORMER* is defined but never used. ; in: DEFTEST* BUG/EXPORT-SLOT-NAME-FROM-FOREIGN-PACKAGE ; (HU.DWIM.DEFCLASS-STAR/TEST::DEFTEST* HU.DWIM.DEFCLASS-STAR/TEST::BUG/EXPORT-SLOT-NAME-FROM-FOREIGN-PACKAGE ; NIL ; (LET* ((HU.DWIM.DEFCLASS-STAR/TEST::PKG1 ; (FIND-PACKAGE :HU.DWIM.DEFCLASS-STAR/TEST.PKG1)) ; (HU.DWIM.DEFCLASS-STAR/TEST::PKG2 ; (FIND-PACKAGE :HU.DWIM.DEFCLASS-STAR/TEST.PKG2)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP1 ; (LET # ; #)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP2 ; (LET # ; #))) ; (HU.DWIM.STEFIL:FINISHES ; (LET (#) ; (EVAL HU.DWIM.DEFCLASS-STAR/TEST::EXP1))) ; (HU.DWIM.STEFIL:WITH-EXPECTED-FAILURES ; (HU.DWIM.STEFIL:FINISHES ; (LET # ; #))))) ; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA ; --> FUNCTION BLOCK LET* LABELS ; --> HU.DWIM.DEFCLASS-STAR/TEST::BUG/EXPORT-SLOT-NAME-FROM-FOREIGN-PACKAGE ; --> BLOCK ; ==> ; (LET ((HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-ACCESSOR-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P* T) ; (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER* ; 'HU.DWIM.DEFCLASS-STAR:DEFAULT-INITARG-NAME-TRANSFORMER) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-CLASS-NAME-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-ACCESSOR-NAMES-P* NIL) ; (HU.DWIM.DEFCLASS-STAR::*EXPORT-SLOT-NAMES-P* NIL)) ; (LET* ((HU.DWIM.DEFCLASS-STAR/TEST::PKG1 ; (FIND-PACKAGE :HU.DWIM.DEFCLASS-STAR/TEST.PKG1)) ; (HU.DWIM.DEFCLASS-STAR/TEST::PKG2 ; (FIND-PACKAGE :HU.DWIM.DEFCLASS-STAR/TEST.PKG2)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP1 ; (LET # ; #)) ; (HU.DWIM.DEFCLASS-STAR/TEST::EXP2 ; (LET # ; #))) ; (HU.DWIM.STEFIL:FINISHES ; (LET (#) ; (EVAL HU.DWIM.DEFCLASS-STAR/TEST::EXP1))) ; (HU.DWIM.STEFIL:WITH-EXPECTED-FAILURES ; (HU.DWIM.STEFIL:FINISHES ; (LET # ; #))))) ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-ACCESSORS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*ACCESSOR-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*AUTOMATIC-INITARGS-P*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; using the lexical binding of the symbol (HU.DWIM.DEFCLASS-STAR/TEST::*INITARG-NAME-TRANSFORMER*), not the ; dynamic binding, even though the name follows ; the usual naming convention (names like *FOO*) for special variables ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-ACCESSORS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *ACCESSOR-NAME-TRANSFORMER* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *AUTOMATIC-INITARGS-P* is defined but never used. ; ; caught STYLE-WARNING: ; The variable *INITARG-NAME-TRANSFORMER* is defined but never used. WARNING: Lisp compilation had style-warnings while compiling #<HU.DWIM.CL-SOURCE-FILE "hu.dwim.defclass-star/test" "test" "test"> COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT _DTDISC-S)) or (:STRUCT _DTDISC-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT _DTLINK-S)) or (:STRUCT _DTLINK-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT _DTDATA-S)) or (:STRUCT _DTDATA-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT _DTMETHOD-S)) or (:STRUCT _DTMETHOD-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT _DT-S)) or (:STRUCT _DT-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT _DT-S)) or (:STRUCT _DT-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINTF-S)) or (:STRUCT POINTF-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT GVC-S)) or (:STRUCT GVC-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT NLIST-T)) or (:STRUCT NLIST-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT NLIST-T)) or (:STRUCT NLIST-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT NLIST-T)) or (:STRUCT NLIST-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT NLIST-T)) or (:STRUCT NLIST-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT NLIST-T)) or (:STRUCT NLIST-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGRAPHINFO-T)) or (:STRUCT AGRAPHINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGRAPHINFO-T)) or (:STRUCT AGRAPHINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGRAPHINFO-T)) or (:STRUCT AGRAPHINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGRAPHINFO-T)) or (:STRUCT AGRAPHINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGRAPHINFO-T)) or (:STRUCT AGRAPHINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGRAPH-T)) or (:STRUCT AGRAPH-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT ELIST)) or (:STRUCT ELIST) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGNODEINFO-T)) or (:STRUCT AGNODEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGNODEINFO-T)) or (:STRUCT AGNODEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGNODEINFO-T)) or (:STRUCT AGNODEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGNODEINFO-T)) or (:STRUCT AGNODEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGNODEINFO-T)) or (:STRUCT AGNODEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGNODE-T)) or (:STRUCT AGNODE-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOXF)) or (:STRUCT BOXF) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINTF-S)) or (:STRUCT POINTF-S) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PPOLY-T)) or (:STRUCT PPOLY-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGEDGEINFO-T)) or (:STRUCT AGEDGEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGEDGEINFO-T)) or (:STRUCT AGEDGEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGEDGEINFO-T)) or (:STRUCT AGEDGEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGEDGEINFO-T)) or (:STRUCT AGEDGEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGEDGEINFO-T)) or (:STRUCT AGEDGEINFO-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGEDGE-T)) or (:STRUCT AGEDGE-T) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT _IO-FILE)) or (:STRUCT _IO-FILE) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT PORT)) or (:STRUCT PORT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT POINT)) or (:STRUCT POINT) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT BOX)) or (:STRUCT BOX) instead. COMMON-LISP:WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT AGSYM-T)) or (:STRUCT AGSYM-T) instead. WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT)) or (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT) instead. WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT)) or (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT) instead. WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT)) or (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT) instead. WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT)) or (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT) instead. WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT)) or (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT) instead. WARNING: bare references to struct types are deprecated. Please use (:POINTER (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT)) or (:STRUCT HU.DWIM.GRAPHVIZ.CFFI:POINT) instead. WARNING: redefining HU.DWIM.COMMON:IN-PACKAGE in DEFMACRO WARNING: Timezone processing is not yet implemented for time pattern compiler. Pattern is: "h:mm:ss a z" WARNING: Timezone processing is not yet implemented for time pattern compiler. Pattern is: "h:mm:ss a zzzz" ; file: /home/quicklisp/quicklisp-controller/dist/build-cache/hu.dwim.web-server/5ea06cc4f0da7957222b950572c3973ebb765c95/hu.dwim.web-server-20260327-darcs/source/http/request-parsing.lisp ; in: DEF (FUNCTION O) ; (CL+SSL::ENSURE-SSL-FUNCALL HU.DWIM.WEB-SERVER::CLIENT-STREAM/SSL ; HU.DWIM.WEB-SERVER::SSL-STREAM-HANDLE ; #'CL+SSL::SSL-READ ; HU.DWIM.WEB-SERVER::SSL-STREAM-HANDLE ; HU.DWIM.WEB-SERVER::READ-BUFFER-POINTER ; HU.DWIM.WEB-SERVER::BYTES-TO-READ) ; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL ; ==> ; 1 ; ; caught WARNING: ; Derived type of CL+SSL::SUCCESS-TEST is (VALUES SB-SYS:SYSTEM-AREA-POINTER &OPTIONAL), conflicting with its asserted type (OR FUNCTION SYMBOL). ; See also: ; The SBCL Manual, Node "Handling of Types" Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD tid=724141 "main thread" RUNNING {1200030003}>: COMPILE-FILE-ERROR while compiling #<HU.DWIM.CL-SOURCE-FILE "hu.dwim.web-server" "source" "http" "request-parsing"> Backtrace for: #<SB-THREAD:THREAD tid=724141 "main thread" RUNNING {1200030003}> 0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12343CD5F3}> #<unused argument> :QUIT T) 1: (SB-DEBUG::RUN-HOOK SB-EXT:*INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12343CD5F3}>) 2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {12343CD5F3}>) 3: (ERROR UIOP/LISP-BUILD:COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<HU.DWIM.ASDF::HU.DWIM.CL-SOURCE-FILE "hu.dwim.web-server" "source" "http" "request-parsing">))) 4: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<HU.DWIM.ASDF::HU.DWIM.CL-SOURCE-FILE "hu.dwim.web-server" "source" "http" "request-parsing">))) 5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<HU.DWIM.ASDF::HU.DWIM.CL-SOURCE-FILE "hu.dwim.web-server" "source" "http" "request-parsing">) 6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION)) 7: (HU.DWIM.ASDF::CALL-WITH-MUFFLED-BORING-COMPILER-WARNINGS #<FUNCTION (LABELS CALL-NEXT-METHOD :IN "/home/quicklisp/quicklisp-controller/dist/build-cache/hu.dwim.asdf/d3e226f19d647b254d92d7a5aa76438b629c13e6/hu.dwim.asdf-stable-git/source/system.lisp") {12314AE6EB}>) 8: (HU.DWIM.ASDF::CALL-IN-ASDF-OP-ENV #<FUNCTION (LABELS CALL-NEXT-METHOD :IN "/home/quicklisp/quicklisp-controller/dist/build-cache/hu.dwim.asdf/d3e226f19d647b254d92d7a5aa76438b629c13e6/hu.dwim.asdf-stable-git/source/system.lisp") {12314AE6EB}>) 9: ((:METHOD ASDF/ACTION:PERFORM :AROUND (ASDF/LISP-ACTION:COMPILE-OP HU.DWIM.ASDF::HU.DWIM.CL-SOURCE-FILE)) #<ASDF/LISP-ACTION:COMPILE-OP > #<HU.DWIM.ASDF::HU.DWIM.CL-SOURCE-FILE "hu.dwim.web-server" "source" "http" "request-parsing">) [fast-method] 10: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<HU.DWIM.ASDF::HU.DWIM.CL-SOURCE-FILE "hu.dwim.web-server" "source" "http" "request-parsing">) [fast-method] 11: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {120531C983}>) [fast-method] 12: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT)) 13: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {120531C983}>) [fast-method] 14: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<HU.DWIM.ASDF:HU.DWIM.DOCUMENTATION-SYSTEM "hu.dwim.defclass-star/documentation"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method] 15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<HU.DWIM.ASDF:HU.DWIM.DOCUMENTATION-SYSTEM "hu.dwim.defclass-star/documentation">) 16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<HU.DWIM.ASDF:HU.DWIM.DOCUMENTATION-SYSTEM "hu.dwim.defclass-star/documentation">) [fast-method] 18: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "hu.dwim.defclass-star/documentation") 19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 20: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "hu.dwim.defclass-star/documentation") [fast-method] 21: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120526F33B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL) 22: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE)) 23: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1205246C0B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL) 24: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "hu.dwim.defclass-star/documentation") [fast-method] 25: (DEPCHECK::COMPUTE-DEPENDENCIES "hu.dwim.defclass-star" "hu.dwim.defclass-star/documentation") 26: (DEPCHECK::MAGIC "hu.dwim.defclass-star" "hu.dwim.defclass-star/documentation" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-OLPpFSSY/depcheck-win.txt") 27: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "hu.dwim.defclass-star" "hu.dwim.defclass-star/documentation" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-OLPpFSSY/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-OLPpFSSY/depcheck-fail.txt")) 28: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp")) 29: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP)) 30: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP)) 31: (SB-IMPL::%START-LISP) unhandled condition in --disable-debugger mode, quitting ; ; compilation unit aborted ; caught 1 fatal ERROR condition ; caught 1 WARNING condition ; caught 56 STYLE-WARNING conditions