omglib

• source: https://github.com/hemml/OMGlib.git
• site: https://github.com/hemml/OMGlib
• last updated: 7 weeks ago

SBCL 2.5.5.114-85e41f89c / ASDF 3.3.5

• omgdaemon new failure
• omg new failure

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/types-prelude.lisp
; in: DEFUN EXISTS-STRUCTURE-P
;     (MULTIPLE-VALUE-BIND (JSCL::V JSCL::E-P)
;         (GETHASH JSCL::NAME JSCL::*STRUCTURES*)
;       JSCL::E-P)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::V JSCL::E-P &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL::E-P)
; 
; caught STYLE-WARNING:
;   The variable V is defined but never used.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/types-prelude.lisp
; in: DEFUN EXISTS-STRUCTURE-P
;     (MULTIPLE-VALUE-BIND (JSCL::V JSCL::E-P)
;         (GETHASH JSCL::NAME JSCL::*STRUCTURES*)
;       JSCL::E-P)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::V JSCL::E-P &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL::E-P)
; 
; caught STYLE-WARNING:
;   The variable V is defined but never used.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/ansiloop/ansi-loop.lisp
; in: DEFUN MAKE-LOOP-MINIMAX
;     (JSCL/LOOP::LOOP-GENTEMP 'JSCL/LOOP::LOOP-MAXMIN-FLAG-)
; 
; note: deleting unreachable code

; in: DEFUN LOOP-CHECK-DATA-TYPE
;     (MULTIPLE-VALUE-BIND (JSCL/LOOP::A JSCL/LOOP::B)
;         (SUBTYPEP JSCL/LOOP::SPECIFIED-TYPE JSCL/LOOP::REQUIRED-TYPE)
;       JSCL/LOOP::SPECIFIED-TYPE)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL/LOOP::A JSCL/LOOP::B &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL/LOOP::SPECIFIED-TYPE)
; 
; caught STYLE-WARNING:
;   The variable A is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable B is defined but never used.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/structures.lisp
; in: DEFUN DAS!REASSEMBLE-BOA-LIST
;     (JSCL::KEY-P)
; 
; caught STYLE-WARNING:
;   The variable KEY-P is assigned but never read.

;     (JSCL::OPT-P)
; 
; caught STYLE-WARNING:
;   The variable OPT-P is assigned but never read.

;     (JSCL::AUX-P)
; 
; caught STYLE-WARNING:
;   The variable AUX-P is assigned but never read.

; in: DEFUN DAS!PARSE-STRUCT-SLOT
;     (DESTRUCTURING-BIND
;         (JSCL::NAME
;          &OPTIONAL (JSCL::DEFAULT NIL JSCL::DEFAULT-P)
;          &KEY (TYPE NIL JSCL::TYPE-P) (JSCL::READ-ONLY NIL JSCL::READ-ONLY-P))
;         JSCL::SLOT
;       (TYPECASE JSCL::NAME
;         ((MEMBER :CONC-NAME :CONSTRUCTOR :COPIER :PREDICATE :INCLUDE :NAMED :TYPE
;                  :INITIAL-OFFSET)
;          (ERROR "Slot name of ~S indicates probable syntax error in DEFSTRUCT"
;                 JSCL::NAME))
;         (KEYWORD (ERROR "DEFSTRUCT slot ~S syntax error." JSCL::SLOT)))
;       (VALUES JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;               JSCL::READ-ONLY JSCL::READ-ONLY-P))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (NAME &OPTIONAL (DEFAULT NIL DEFAULT-P) &KEY (TYPE NIL TYPE-P) (READ-ONLY NIL READ-ONLY-P))

;     (MULTIPLE-VALUE-BIND
;         (JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;          JSCL::READ-ONLY JSCL::RO-P)
;         (TYPECASE JSCL::SLOT
;           (SYMBOL (TYPECASE JSCL::SLOT (# #)) JSCL::SLOT)
;           (CONS
;            (DESTRUCTURING-BIND
;                (JSCL::NAME &OPTIONAL # &KEY # #)
;                JSCL::SLOT
;              (TYPECASE JSCL::NAME # #)
;              (VALUES JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;                      JSCL::READ-ONLY JSCL::READ-ONLY-P)))
;           (T (ERROR " ~S is not a legal slot description." JSCL::SLOT)))
;       (JSCL::%MAKE-DSD-SLOT :NAME JSCL::NAME :ACCESSOR JSCL::NAME :INITFORM
;        JSCL::DEFAULT :TYPE TYPE :READ-ONLY JSCL::READ-ONLY))
; ==>
;   #'(LAMBDA
;         (
;          &OPTIONAL JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;          JSCL::READ-ONLY JSCL::RO-P
;          &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (JSCL::%MAKE-DSD-SLOT :NAME JSCL::NAME :ACCESSOR JSCL::NAME :INITFORM
;        JSCL::DEFAULT :TYPE TYPE :READ-ONLY JSCL::READ-ONLY))
; 
; caught STYLE-WARNING:
;   The variable DEFAULT-P is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable TYPE-P is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable RO-P is defined but never used.

; in: DEFUN DAS!COMPARE-ASINS
;     (CASE JSCL::SEEN
;       (1
;        (VALUES "type" (JSCL::DSD-SLOT-TYPE JSCL::AS)
;                (JSCL::DSD-SLOT-TYPE JSCL::IN)))
;       (3
;        (VALUES "read-only" (JSCL::DSD-SLOT-READ-ONLY JSCL::AS)
;                (JSCL::DSD-SLOT-READ-ONLY JSCL::IN)))
;       (OTHERWISE "Panic" JSCL::AS JSCL::IN))
; --> IF IF EQL 
; ==>
;   JSCL::SEEN
; 
; note: deleting unreachable code

; --> IF IF THE PROGN 
; ==>
;   JSCL::IN
; 
; note: deleting unreachable code

;     (VALUES "read-only" (JSCL::DSD-SLOT-READ-ONLY JSCL::AS)
;             (JSCL::DSD-SLOT-READ-ONLY JSCL::IN))
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/compiler/compiler.lisp
; in: DEFINE-COMPILATION THE
;     (JSCL::DEFINE-COMPILATION THE
;         (JSCL::VALUE-TYPE JSCL::FORM)
;       (JSCL::CONVERT JSCL::FORM JSCL::*MULTIPLE-VALUE-P*))
; --> LET* LET* LAMBDA 
; ==>
;   #'(LAMBDA (JSCL::VALUE-TYPE JSCL::FORM)
;       (BLOCK THE (JSCL::CONVERT JSCL::FORM JSCL::*MULTIPLE-VALUE-P*)))
; 
; caught STYLE-WARNING:
;   The variable VALUE-TYPE is defined but never used.
; in: LAMBDA (#:G1008)
;     (MULTIPLE-VALUE-BIND (JSCL::FORMS JSCL::DECLS JSCL::DOCSTRING)
;         (JSCL::PARSE-BODY JSCL::BODY)
;       (JSCL::BACKQUOTE
;        (BLOCK NIL
;          (LET (JSCL::UNQUOTE JSCL::INITS)
;            (JSCL::UNQUOTE-SPLICING JSCL::DECLS)
;            (TAGBODY #)))))
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::FORMS JSCL::DECLS JSCL::DOCSTRING &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (JSCL::BACKQUOTE
;        (BLOCK NIL
;          (LET (JSCL::UNQUOTE JSCL::INITS)
;            (JSCL::UNQUOTE-SPLICING JSCL::DECLS)
;            (TAGBODY #)))))
; 
; caught STYLE-WARNING:
;   The variable DOCSTRING is defined but never used.
; in: LAMBDA (#:G2574)
;     (DESTRUCTURING-BIND
;         (&WHOLE JSCL::ARGS FIRST SECOND &REST JSCL::OTHERS)
;         #:G2574
;       (DECLARE (IGNORE JSCL::OTHERS))
;       (IF (CONSP SECOND)
;           (JSCL::BACKQUOTE
;            (JSCL::LONG-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))
;           (JSCL::BACKQUOTE
;            (JSCL::SHORT-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G2574 2 2
;                                      '(FIRST SECOND &REST JSCL::OTHERS)))
;          (JSCL::ARGS #:G0)
;          (FIRST (POP #:G0))
;          (SECOND (POP #:G0))
;          (JSCL::OTHERS #:G0))
;     (DECLARE (IGNORE JSCL::OTHERS))
;     (IF (CONSP SECOND)
;         (JSCL::BACKQUOTE
;          (JSCL::LONG-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))
;         (JSCL::BACKQUOTE
;          (JSCL::SHORT-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))))
; 
; caught STYLE-WARNING:
;   The variable FIRST is defined but never used.
; in: LAMBDA (#:G2321)
;     (DESTRUCTURING-BIND
;         (JSCL::TEST &OPTIONAL IGNORE JSCL::DATUM &REST JSCL::ARGS)
;         #:G2321
;       (LET ((JSCL::VALUE (GENSYM "ASSERT-VALUE")))
;         (JSCL::BACKQUOTE
;          (LET (#)
;            (WHEN # #)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G2321 1 3
;                                      '(JSCL::TEST &OPTIONAL IGNORE JSCL::DATUM
;                                        &REST JSCL::ARGS)))
;          (JSCL::TEST (POP #:G0))
;          (IGNORE
;           (IF #:G0
;               (POP #:G0)))
;          (JSCL::DATUM
;           (IF #:G0
;               (POP #:G0)))
;          (JSCL::ARGS #:G0))
;     (LET ((JSCL::VALUE (GENSYM "ASSERT-VALUE")))
;       (JSCL::BACKQUOTE
;        (LET (#)
;          (WHEN # #)))))
; 
; caught STYLE-WARNING:
;   The variable IGNORE is defined but never used.
WARNING: redefining JSCL::GET-STRUCTURE-DSD in DEFUN
; in:
;      PROGN (DEFUN EXISTS-STRUCTURE-P (NAME) (MULTIPLE-VALUE-BIND (V E-P) (GETHASH NAME *STRUCTURES*) E-P))
;     (MULTIPLE-VALUE-BIND (JSCL::V JSCL::E-P)
;         (GETHASH JSCL::NAME JSCL::*STRUCTURES*)
;       JSCL::E-P)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::V JSCL::E-P &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL::E-P)
; 
; caught STYLE-WARNING:
;   The variable V is defined but never used.
WARNING: redefining JSCL::EXISTS-STRUCTURE-P in DEFUN
WARNING: redefining JSCL::MEMQ in DEFUN
WARNING: redefining JSCL::%LMAPCAR in DEFUN
WARNING: redefining JSCL::%STRUCT-GENERATOR in DEFUN
; in: LAMBDA (#:G20778)
;     (DESTRUCTURING-BIND
;         (&WHOLE JSCL::WHOLE JSCL::NAME JSCL::ARGS &BODY JSCL::BODY)
;         #:G20778
;       (DESTRUCTURING-BIND
;           (JSCL::NAME JSCL::LAMBDA-LIST &BODY JSCL::BODY)
;           JSCL::WHOLE
;         (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;             (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;           (LET* (#)
;             (JSCL::BACKQUOTE #)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G20778 2 2
;                                      '(JSCL::NAME JSCL::ARGS &BODY
;                                        JSCL::BODY)))
;          (JSCL::WHOLE #:G0)
;          (JSCL::NAME (POP #:G0))
;          (JSCL::ARGS (POP #:G0))
;          (JSCL::BODY #:G0))
;     (DESTRUCTURING-BIND
;         (JSCL::NAME JSCL::LAMBDA-LIST &BODY JSCL::BODY)
;         JSCL::WHOLE
;       (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;           (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;         (LET* (#)
;           (JSCL::BACKQUOTE #)))))
; 
; caught STYLE-WARNING:
;   The variable NAME is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable ARGS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable BODY is defined but never used.

;     (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;         (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;       (LET* ((JSCL::COMPOUND (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) (JSCL::%DEFTYPE '# :COMPOUND #)))))
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::BODY JSCL::DECLS JSCL::DOCSTRING &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (LET* ((JSCL::COMPOUND (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE)
;            (JSCL::%DEFTYPE '# :COMPOUND #)))))
; 
; caught STYLE-WARNING:
;   The variable DECLS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable DOCSTRING is defined but never used.
; in: LAMBDA (#:G21412)
;     (DESTRUCTURING-BIND
;         (&WHOLE JSCL::WHOLE JSCL::NAME JSCL::LAMBDA-LIST &BODY JSCL::BODY)
;         #:G21412
;       (DESTRUCTURING-BIND
;           (JSCL::NAME (&REST JSCL::ARGS) &BODY JSCL::BODY)
;           JSCL::WHOLE
;         (IF (NULL JSCL::ARGS)
;             (SETQ JSCL::ARGS '#))
;         (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;             (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;           (LET* (# #)
;             (JSCL::BACKQUOTE #)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G21412 2 2
;                                      '(JSCL::NAME JSCL::LAMBDA-LIST &BODY
;                                        JSCL::BODY)))
;          (JSCL::WHOLE #:G0)
;          (JSCL::NAME (POP #:G0))
;          (JSCL::LAMBDA-LIST (POP #:G0))
;          (JSCL::BODY #:G0))
;     (DESTRUCTURING-BIND
;         (JSCL::NAME (&REST JSCL::ARGS) &BODY JSCL::BODY)
;         JSCL::WHOLE
;       (IF (NULL JSCL::ARGS)
;           (SETQ JSCL::ARGS '#))
;       (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;           (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;         (LET* (# #)
;           (JSCL::BACKQUOTE #)))))
; 
; caught STYLE-WARNING:
;   The variable NAME is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable LAMBDA-LIST is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable BODY is defined but never used.

;     (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;         (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;       (LET* ((JSCL::EXPR (GENSYM #)) (JSCL::EXPANDER (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (PROGN (JSCL::%DEFTYPE '# :EXPANDER #) '(JSCL::UNQUOTE JSCL::NAME)))))
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::BODY JSCL::DECLS JSCL::DOCSTRING &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (LET* ((JSCL::EXPR (GENSYM #)) (JSCL::EXPANDER (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (PROGN (JSCL::%DEFTYPE '# :EXPANDER #) '(JSCL::UNQUOTE JSCL::NAME)))))
; 
; caught STYLE-WARNING:
;   The variable DECLS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable DOCSTRING is defined but never used.
; in: LAMBDA (#:G1615)
;     (MAPCAR (LAMBDA (JSCL::X) (GENSYM)) JSCL::VARS)
; 
; caught STYLE-WARNING:
;   The variable JSCL::X is defined but never used.
; in: LAMBDA (#:G1833)
;     (JSCL::%CHECK-TYPE-ERROR JSCL::PLACE JSCL::PLACE JSCL::TYPESPEC STRING)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%CHECK-TYPE-ERROR

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::%CLASS-CPL JSCL::CLASS-OBJECT)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%CLASS-CPL

;     (JSCL::%SUBCLASS (JSCL::%CLASS-CPL JSCL::CLASS-OBJECT) JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%SUBCLASS

;     (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%TYPE-EXPAND


; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/ansiloop/ansi-loop.lisp
; in: DEFMACRO JSCL/LOOP::LOOP-BODY
;     (JSCL/LOOP::ENV JSCL::*ENVIRONMENT*)
; 
; caught WARNING:
;   undefined variable: JSCL::*ENVIRONMENT*

; in: DEFMACRO JSCL/LOOP::LOOP-REALLY-DESETQ
;     (JSCL/LOOP::ENV JSCL::*ENVIRONMENT*)
; 
; caught WARNING:
;   undefined variable: JSCL::*ENVIRONMENT*

; in: DEFMACRO JSCL/LOOP::LOOP-COLLECT-RPLACD
;     (JSCL/LOOP::ENV JSCL::*ENVIRONMENT*)
; 
; caught WARNING:
;   undefined variable: JSCL::*ENVIRONMENT*

; 
; caught WARNING:
;   2 more uses of undefined variable JSCL::*ENVIRONMENT*

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::GET-COMPOUND-FOR

;     (JSCL::GET-PREDICATE-FOR JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::GET-PREDICATE-FOR

; in:
;      :DEFAULT-INITARGS (LIST (QUOTE :DIRECT-DEFAULT-INITARGS) (JSCL::BACKQUOTE (LIST (JSCL::UNQUOTE-SPLICING (JSCL::MAPAPPEND # #)))))
;     (JSCL::MAPPLIST
;      #'(LAMBDA (JSCL::KEY JSCL::VALUE)
;          (JSCL::BACKQUOTE
;           ('(JSCL::UNQUOTE JSCL::KEY) (JSCL::UNQUOTE JSCL::VALUE))))
;      (CDR JSCL::OPTION))
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::MAPPLIST

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::MOP-OBJECT-P


; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/defstruct.lisp
; in: DEFUN JSCL::STRUCTURE-P
;     (JSCL::OBJECT-TYPE-CODE JSCL::OBJ)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::OBJECT-TYPE-CODE

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::STD-INSTANCE-CLASS JSCL::OBJECT)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::STD-INSTANCE-CLASS

;     (JSCL::STD-INSTANCE-P JSCL::OBJECT)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::STD-INSTANCE-P
; 
; compilation unit finished
;   Undefined functions:
;     JSCL::%CHECK-TYPE-ERROR JSCL::%CLASS-CPL JSCL::%SUBCLASS JSCL::%TYPE-EXPAND JSCL::GET-COMPOUND-FOR JSCL::GET-PREDICATE-FOR JSCL::MAPPLIST JSCL::MOP-OBJECT-P JSCL::OBJECT-TYPE-CODE JSCL::STD-INSTANCE-CLASS JSCL::STD-INSTANCE-P
;   Undefined variable:
;     JSCL::*ENVIRONMENT*
;   caught 4 WARNING conditions
;   caught 38 STYLE-WARNING conditions
;   printed 4 notes
Unhandled ASDF/FIND-COMPONENT:MISSING-DEPENDENCY in thread #<SB-THREAD:THREAD tid=3955036 "main thread" RUNNING {1200F08003}>: Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006">

Backtrace for: #<SB-THREAD:THREAD tid=3955036 "main thread" RUNNING {1200F08003}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006"> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006">)
2: (INVOKE-DEBUGGER Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006">)
3: (ERROR ASDF/FIND-COMPONENT:MISSING-DEPENDENCY :REQUIRED-BY #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> :REQUIRES :ITERATE)
4: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> :ITERATE NIL)
5: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C6B21BB}>)
6: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
7: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
8: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> T)
9: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C6B209B}>)
10: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
11: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
12: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> T)
13: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C6B1F7B}>)
14: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
15: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
16: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> T)
17: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C6B1E5B}>)
18: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
19: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
20: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> T)
21: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C67EEEB}>)
22: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
23: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
24: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> T)
25: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C67EDCB}>)
26: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
27: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
28: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> T)
29: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C60E39B}>)
30: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
31: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
32: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> T)
33: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C60E27B}>)
34: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
35: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
36: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> T)
37: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C60E15B}>)
38: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
39: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
40: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> T)
41: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C60E03B}>)
42: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
43: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
44: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> T)
45: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C56E19B}>)
46: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
47: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
48: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> T)
49: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C56E07B}>)
50: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
51: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
52: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> T)
53: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C56DF5B}>)
54: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
55: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
56: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> T)
57: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C56DE3B}>)
58: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
59: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
60: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> T)
61: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "omg"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122ACD1B6B}>)
62: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
63: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
64: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "omg"> T)
65: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122ACD1A4B}>)
66: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
67: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
68: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> T)
69: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122ACD192B}>)
70: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
71: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
72: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> T)
73: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omg"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122ACD180B}>)
74: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
75: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
76: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omg"> T)
77: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "omgdaemon"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120459204B}>)
78: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
79: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
80: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "omgdaemon"> T)
81: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/COMPONENT:STATIC-FILE "omgdaemon" "README.md"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204591EFB}>)
82: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
83: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
84: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/COMPONENT:STATIC-FILE "omgdaemon" "README.md"> T)
85: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/COMPONENT:STATIC-FILE "omgdaemon" "README.md"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {120458DE6B}>)
86: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
87: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
88: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/COMPONENT:STATIC-FILE "omgdaemon" "README.md"> T)
89: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omgdaemon"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {1204589DEB}>)
90: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
91: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
92: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {1204572DC3}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omgdaemon"> T)
93: ((LAMBDA NIL :IN ASDF/PLAN:MAKE-PLAN))
94: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omgdaemon"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
95: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omgdaemon">)
96: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
97: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omgdaemon">) [fast-method]
98: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "omgdaemon")
99: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
100: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "omgdaemon") [fast-method]
101: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120456F9CB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
102: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
103: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {120452E94B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
104: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "omgdaemon") [fast-method]
105: (DEPCHECK::COMPUTE-DEPENDENCIES "omgdaemon" "omgdaemon")
106: (DEPCHECK::MAGIC "omgdaemon" "omgdaemon" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-jjvQwAzF/depcheck-win.txt")
107: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "omgdaemon" "omgdaemon" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-jjvQwAzF/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-jjvQwAzF/depcheck-fail.txt"))
108: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
109: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP))
110: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP))
111: (SB-IMPL::%START-LISP)

unhandled condition in --disable-debugger mode, quitting

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/types-prelude.lisp
; in: DEFUN EXISTS-STRUCTURE-P
;     (MULTIPLE-VALUE-BIND (JSCL::V JSCL::E-P)
;         (GETHASH JSCL::NAME JSCL::*STRUCTURES*)
;       JSCL::E-P)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::V JSCL::E-P &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL::E-P)
; 
; caught STYLE-WARNING:
;   The variable V is defined but never used.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/types-prelude.lisp
; in: DEFUN EXISTS-STRUCTURE-P
;     (MULTIPLE-VALUE-BIND (JSCL::V JSCL::E-P)
;         (GETHASH JSCL::NAME JSCL::*STRUCTURES*)
;       JSCL::E-P)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::V JSCL::E-P &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL::E-P)
; 
; caught STYLE-WARNING:
;   The variable V is defined but never used.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/ansiloop/ansi-loop.lisp
; in: DEFUN MAKE-LOOP-MINIMAX
;     (JSCL/LOOP::LOOP-GENTEMP 'JSCL/LOOP::LOOP-MAXMIN-FLAG-)
; 
; note: deleting unreachable code

; in: DEFUN LOOP-CHECK-DATA-TYPE
;     (MULTIPLE-VALUE-BIND (JSCL/LOOP::A JSCL/LOOP::B)
;         (SUBTYPEP JSCL/LOOP::SPECIFIED-TYPE JSCL/LOOP::REQUIRED-TYPE)
;       JSCL/LOOP::SPECIFIED-TYPE)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL/LOOP::A JSCL/LOOP::B &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL/LOOP::SPECIFIED-TYPE)
; 
; caught STYLE-WARNING:
;   The variable A is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable B is defined but never used.

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/structures.lisp
; in: DEFUN DAS!REASSEMBLE-BOA-LIST
;     (JSCL::KEY-P)
; 
; caught STYLE-WARNING:
;   The variable KEY-P is assigned but never read.

;     (JSCL::OPT-P)
; 
; caught STYLE-WARNING:
;   The variable OPT-P is assigned but never read.

;     (JSCL::AUX-P)
; 
; caught STYLE-WARNING:
;   The variable AUX-P is assigned but never read.

; in: DEFUN DAS!PARSE-STRUCT-SLOT
;     (DESTRUCTURING-BIND
;         (JSCL::NAME
;          &OPTIONAL (JSCL::DEFAULT NIL JSCL::DEFAULT-P)
;          &KEY (TYPE NIL JSCL::TYPE-P) (JSCL::READ-ONLY NIL JSCL::READ-ONLY-P))
;         JSCL::SLOT
;       (TYPECASE JSCL::NAME
;         ((MEMBER :CONC-NAME :CONSTRUCTOR :COPIER :PREDICATE :INCLUDE :NAMED :TYPE
;                  :INITIAL-OFFSET)
;          (ERROR "Slot name of ~S indicates probable syntax error in DEFSTRUCT"
;                 JSCL::NAME))
;         (KEYWORD (ERROR "DEFSTRUCT slot ~S syntax error." JSCL::SLOT)))
;       (VALUES JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;               JSCL::READ-ONLY JSCL::READ-ONLY-P))
; 
; caught STYLE-WARNING:
;   &OPTIONAL and &KEY found in the same lambda list: (NAME &OPTIONAL (DEFAULT NIL DEFAULT-P) &KEY (TYPE NIL TYPE-P) (READ-ONLY NIL READ-ONLY-P))

;     (MULTIPLE-VALUE-BIND
;         (JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;          JSCL::READ-ONLY JSCL::RO-P)
;         (TYPECASE JSCL::SLOT
;           (SYMBOL (TYPECASE JSCL::SLOT (# #)) JSCL::SLOT)
;           (CONS
;            (DESTRUCTURING-BIND
;                (JSCL::NAME &OPTIONAL # &KEY # #)
;                JSCL::SLOT
;              (TYPECASE JSCL::NAME # #)
;              (VALUES JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;                      JSCL::READ-ONLY JSCL::READ-ONLY-P)))
;           (T (ERROR " ~S is not a legal slot description." JSCL::SLOT)))
;       (JSCL::%MAKE-DSD-SLOT :NAME JSCL::NAME :ACCESSOR JSCL::NAME :INITFORM
;        JSCL::DEFAULT :TYPE TYPE :READ-ONLY JSCL::READ-ONLY))
; ==>
;   #'(LAMBDA
;         (
;          &OPTIONAL JSCL::NAME JSCL::DEFAULT JSCL::DEFAULT-P TYPE JSCL::TYPE-P
;          JSCL::READ-ONLY JSCL::RO-P
;          &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (JSCL::%MAKE-DSD-SLOT :NAME JSCL::NAME :ACCESSOR JSCL::NAME :INITFORM
;        JSCL::DEFAULT :TYPE TYPE :READ-ONLY JSCL::READ-ONLY))
; 
; caught STYLE-WARNING:
;   The variable DEFAULT-P is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable TYPE-P is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable RO-P is defined but never used.

; in: DEFUN DAS!COMPARE-ASINS
;     (CASE JSCL::SEEN
;       (1
;        (VALUES "type" (JSCL::DSD-SLOT-TYPE JSCL::AS)
;                (JSCL::DSD-SLOT-TYPE JSCL::IN)))
;       (3
;        (VALUES "read-only" (JSCL::DSD-SLOT-READ-ONLY JSCL::AS)
;                (JSCL::DSD-SLOT-READ-ONLY JSCL::IN)))
;       (OTHERWISE "Panic" JSCL::AS JSCL::IN))
; --> IF IF EQL 
; ==>
;   JSCL::SEEN
; 
; note: deleting unreachable code

; --> IF IF THE PROGN 
; ==>
;   JSCL::IN
; 
; note: deleting unreachable code

;     (VALUES "read-only" (JSCL::DSD-SLOT-READ-ONLY JSCL::AS)
;             (JSCL::DSD-SLOT-READ-ONLY JSCL::IN))
; 
; note: deleting unreachable code

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/compiler/compiler.lisp
; in: DEFINE-COMPILATION THE
;     (JSCL::DEFINE-COMPILATION THE
;         (JSCL::VALUE-TYPE JSCL::FORM)
;       (JSCL::CONVERT JSCL::FORM JSCL::*MULTIPLE-VALUE-P*))
; --> LET* LET* LAMBDA 
; ==>
;   #'(LAMBDA (JSCL::VALUE-TYPE JSCL::FORM)
;       (BLOCK THE (JSCL::CONVERT JSCL::FORM JSCL::*MULTIPLE-VALUE-P*)))
; 
; caught STYLE-WARNING:
;   The variable VALUE-TYPE is defined but never used.
; in: LAMBDA (#:G1008)
;     (MULTIPLE-VALUE-BIND (JSCL::FORMS JSCL::DECLS JSCL::DOCSTRING)
;         (JSCL::PARSE-BODY JSCL::BODY)
;       (JSCL::BACKQUOTE
;        (BLOCK NIL
;          (LET (JSCL::UNQUOTE JSCL::INITS)
;            (JSCL::UNQUOTE-SPLICING JSCL::DECLS)
;            (TAGBODY #)))))
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::FORMS JSCL::DECLS JSCL::DOCSTRING &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (JSCL::BACKQUOTE
;        (BLOCK NIL
;          (LET (JSCL::UNQUOTE JSCL::INITS)
;            (JSCL::UNQUOTE-SPLICING JSCL::DECLS)
;            (TAGBODY #)))))
; 
; caught STYLE-WARNING:
;   The variable DOCSTRING is defined but never used.
; in: LAMBDA (#:G2574)
;     (DESTRUCTURING-BIND
;         (&WHOLE JSCL::ARGS FIRST SECOND &REST JSCL::OTHERS)
;         #:G2574
;       (DECLARE (IGNORE JSCL::OTHERS))
;       (IF (CONSP SECOND)
;           (JSCL::BACKQUOTE
;            (JSCL::LONG-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))
;           (JSCL::BACKQUOTE
;            (JSCL::SHORT-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G2574 2 2
;                                      '(FIRST SECOND &REST JSCL::OTHERS)))
;          (JSCL::ARGS #:G0)
;          (FIRST (POP #:G0))
;          (SECOND (POP #:G0))
;          (JSCL::OTHERS #:G0))
;     (DECLARE (IGNORE JSCL::OTHERS))
;     (IF (CONSP SECOND)
;         (JSCL::BACKQUOTE
;          (JSCL::LONG-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))
;         (JSCL::BACKQUOTE
;          (JSCL::SHORT-DEFSETF (JSCL::UNQUOTE-SPLICING JSCL::ARGS)))))
; 
; caught STYLE-WARNING:
;   The variable FIRST is defined but never used.
; in: LAMBDA (#:G2321)
;     (DESTRUCTURING-BIND
;         (JSCL::TEST &OPTIONAL IGNORE JSCL::DATUM &REST JSCL::ARGS)
;         #:G2321
;       (LET ((JSCL::VALUE (GENSYM "ASSERT-VALUE")))
;         (JSCL::BACKQUOTE
;          (LET (#)
;            (WHEN # #)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G2321 1 3
;                                      '(JSCL::TEST &OPTIONAL IGNORE JSCL::DATUM
;                                        &REST JSCL::ARGS)))
;          (JSCL::TEST (POP #:G0))
;          (IGNORE
;           (IF #:G0
;               (POP #:G0)))
;          (JSCL::DATUM
;           (IF #:G0
;               (POP #:G0)))
;          (JSCL::ARGS #:G0))
;     (LET ((JSCL::VALUE (GENSYM "ASSERT-VALUE")))
;       (JSCL::BACKQUOTE
;        (LET (#)
;          (WHEN # #)))))
; 
; caught STYLE-WARNING:
;   The variable IGNORE is defined but never used.
WARNING: redefining JSCL::GET-STRUCTURE-DSD in DEFUN
; in:
;      PROGN (DEFUN EXISTS-STRUCTURE-P (NAME) (MULTIPLE-VALUE-BIND (V E-P) (GETHASH NAME *STRUCTURES*) E-P))
;     (MULTIPLE-VALUE-BIND (JSCL::V JSCL::E-P)
;         (GETHASH JSCL::NAME JSCL::*STRUCTURES*)
;       JSCL::E-P)
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::V JSCL::E-P &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       JSCL::E-P)
; 
; caught STYLE-WARNING:
;   The variable V is defined but never used.
WARNING: redefining JSCL::EXISTS-STRUCTURE-P in DEFUN
WARNING: redefining JSCL::MEMQ in DEFUN
WARNING: redefining JSCL::%LMAPCAR in DEFUN
WARNING: redefining JSCL::%STRUCT-GENERATOR in DEFUN
; in: LAMBDA (#:G20778)
;     (DESTRUCTURING-BIND
;         (&WHOLE JSCL::WHOLE JSCL::NAME JSCL::ARGS &BODY JSCL::BODY)
;         #:G20778
;       (DESTRUCTURING-BIND
;           (JSCL::NAME JSCL::LAMBDA-LIST &BODY JSCL::BODY)
;           JSCL::WHOLE
;         (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;             (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;           (LET* (#)
;             (JSCL::BACKQUOTE #)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G20778 2 2
;                                      '(JSCL::NAME JSCL::ARGS &BODY
;                                        JSCL::BODY)))
;          (JSCL::WHOLE #:G0)
;          (JSCL::NAME (POP #:G0))
;          (JSCL::ARGS (POP #:G0))
;          (JSCL::BODY #:G0))
;     (DESTRUCTURING-BIND
;         (JSCL::NAME JSCL::LAMBDA-LIST &BODY JSCL::BODY)
;         JSCL::WHOLE
;       (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;           (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;         (LET* (#)
;           (JSCL::BACKQUOTE #)))))
; 
; caught STYLE-WARNING:
;   The variable NAME is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable ARGS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable BODY is defined but never used.

;     (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;         (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;       (LET* ((JSCL::COMPOUND (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE) (JSCL::%DEFTYPE '# :COMPOUND #)))))
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::BODY JSCL::DECLS JSCL::DOCSTRING &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (LET* ((JSCL::COMPOUND (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE)
;            (JSCL::%DEFTYPE '# :COMPOUND #)))))
; 
; caught STYLE-WARNING:
;   The variable DECLS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable DOCSTRING is defined but never used.
; in: LAMBDA (#:G21412)
;     (DESTRUCTURING-BIND
;         (&WHOLE JSCL::WHOLE JSCL::NAME JSCL::LAMBDA-LIST &BODY JSCL::BODY)
;         #:G21412
;       (DESTRUCTURING-BIND
;           (JSCL::NAME (&REST JSCL::ARGS) &BODY JSCL::BODY)
;           JSCL::WHOLE
;         (IF (NULL JSCL::ARGS)
;             (SETQ JSCL::ARGS '#))
;         (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;             (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;           (LET* (# #)
;             (JSCL::BACKQUOTE #)))))
; ==>
;   (LET* ((#:G0
;           (SB-C::CHECK-DS-LIST/&REST #:G21412 2 2
;                                      '(JSCL::NAME JSCL::LAMBDA-LIST &BODY
;                                        JSCL::BODY)))
;          (JSCL::WHOLE #:G0)
;          (JSCL::NAME (POP #:G0))
;          (JSCL::LAMBDA-LIST (POP #:G0))
;          (JSCL::BODY #:G0))
;     (DESTRUCTURING-BIND
;         (JSCL::NAME (&REST JSCL::ARGS) &BODY JSCL::BODY)
;         JSCL::WHOLE
;       (IF (NULL JSCL::ARGS)
;           (SETQ JSCL::ARGS '#))
;       (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;           (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;         (LET* (# #)
;           (JSCL::BACKQUOTE #)))))
; 
; caught STYLE-WARNING:
;   The variable NAME is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable LAMBDA-LIST is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable BODY is defined but never used.

;     (MULTIPLE-VALUE-BIND (JSCL::BODY JSCL::DECLS JSCL::DOCSTRING)
;         (JSCL::PARSE-BODY JSCL::BODY :DECLARATIONS T :DOCSTRING T)
;       (LET* ((JSCL::EXPR (GENSYM #)) (JSCL::EXPANDER (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (PROGN (JSCL::%DEFTYPE '# :EXPANDER #) '(JSCL::UNQUOTE JSCL::NAME)))))
; ==>
;   #'(LAMBDA (&OPTIONAL JSCL::BODY JSCL::DECLS JSCL::DOCSTRING &REST #:IGNORE)
;       (DECLARE (IGNORE #:IGNORE))
;       (LET* ((JSCL::EXPR (GENSYM #)) (JSCL::EXPANDER (JSCL::BACKQUOTE #'#)))
;         (JSCL::BACKQUOTE
;          (PROGN (JSCL::%DEFTYPE '# :EXPANDER #) '(JSCL::UNQUOTE JSCL::NAME)))))
; 
; caught STYLE-WARNING:
;   The variable DECLS is defined but never used.
; 
; caught STYLE-WARNING:
;   The variable DOCSTRING is defined but never used.
; in: LAMBDA (#:G1615)
;     (MAPCAR (LAMBDA (JSCL::X) (GENSYM)) JSCL::VARS)
; 
; caught STYLE-WARNING:
;   The variable JSCL::X is defined but never used.
; in: LAMBDA (#:G1833)
;     (JSCL::%CHECK-TYPE-ERROR JSCL::PLACE JSCL::PLACE JSCL::TYPESPEC STRING)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%CHECK-TYPE-ERROR

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::%CLASS-CPL JSCL::CLASS-OBJECT)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%CLASS-CPL

;     (JSCL::%SUBCLASS (JSCL::%CLASS-CPL JSCL::CLASS-OBJECT) JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%SUBCLASS

;     (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::%TYPE-EXPAND


; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/ansiloop/ansi-loop.lisp
; in: DEFMACRO JSCL/LOOP::LOOP-BODY
;     (JSCL/LOOP::ENV JSCL::*ENVIRONMENT*)
; 
; caught WARNING:
;   undefined variable: JSCL::*ENVIRONMENT*

; in: DEFMACRO JSCL/LOOP::LOOP-REALLY-DESETQ
;     (JSCL/LOOP::ENV JSCL::*ENVIRONMENT*)
; 
; caught WARNING:
;   undefined variable: JSCL::*ENVIRONMENT*

; in: DEFMACRO JSCL/LOOP::LOOP-COLLECT-RPLACD
;     (JSCL/LOOP::ENV JSCL::*ENVIRONMENT*)
; 
; caught WARNING:
;   undefined variable: JSCL::*ENVIRONMENT*

; 
; caught WARNING:
;   2 more uses of undefined variable JSCL::*ENVIRONMENT*

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::GET-COMPOUND-FOR

;     (JSCL::GET-PREDICATE-FOR JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::GET-PREDICATE-FOR

; in:
;      :DEFAULT-INITARGS (LIST (QUOTE :DIRECT-DEFAULT-INITARGS) (JSCL::BACKQUOTE (LIST (JSCL::UNQUOTE-SPLICING (JSCL::MAPAPPEND # #)))))
;     (JSCL::MAPPLIST
;      #'(LAMBDA (JSCL::KEY JSCL::VALUE)
;          (JSCL::BACKQUOTE
;           ('(JSCL::UNQUOTE JSCL::KEY) (JSCL::UNQUOTE JSCL::VALUE))))
;      (CDR JSCL::OPTION))
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::MAPPLIST

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::MOP-OBJECT-P


; file: /home/quicklisp/quicklisp-controller/dist/build-cache/omglib/80d7228c7f8f12ac9da2bcdba3343500e8b4ce5a/omglib-20250704-git/jscl/src/defstruct.lisp
; in: DEFUN JSCL::STRUCTURE-P
;     (JSCL::OBJECT-TYPE-CODE JSCL::OBJ)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::OBJECT-TYPE-CODE

; in:
;      PROGN (DEFUN JSCL::!TYPEP (JSCL::OBJECT JSCL::TYPE-SPECIFIER) (IF (OR (EQL JSCL::TYPE-SPECIFIER (QUOTE T)) (EQL JSCL::TYPE-SPECIFIER (QUOTE NIL))) (RETURN-FROM JSCL::!TYPEP JSCL::TYPE-SPECIFIER)) (IF (JSCL::MOP-OBJECT-P JSCL::TYPE-SPECIFIER) (RETURN-FROM JSCL::!TYPEP (JSCL::!TYPEP JSCL::OBJECT (CLASS-NAME JSCL::TYPE-SPECIFIER)))) (IF (SYMBOLP JSCL::TYPE-SPECIFIER) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)) (IF (GETHASH JSCL::TYPE-SPECIFIER JSCL::*CLASS-TABLE*) (LET # #)))) (LET ((JSCL::TEST (JSCL::GET-COMPOUND-FOR JSCL::TYPE-SPECIFIER))) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP (FUNCALL JSCL::TEST JSCL::OBJECT JSCL::TYPE-SPECIFIER)))) (IF (AND (CONSP JSCL::TYPE-SPECIFIER) (NULL (REST JSCL::TYPE-SPECIFIER))) (LET ((JSCL::TEST #)) (IF JSCL::TEST (RETURN-FROM JSCL::!TYPEP #)))) (MULTIPLE-VALUE-BIND (JSCL::EXPANSION JSCL::EXPANDED-P) (JSCL::%TYPE-EXPAND JSCL::TYPE-SPECIFIER) (IF JSCL::EXPANDED-P (JSCL::!TYPEP JSCL::OBJECT JSCL::EXPANSION) (ERROR "Unknown type-specifier ~a." JSCL::TYPE-SPECIFIER))))
;     (JSCL::STD-INSTANCE-CLASS JSCL::OBJECT)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::STD-INSTANCE-CLASS

;     (JSCL::STD-INSTANCE-P JSCL::OBJECT)
; 
; caught STYLE-WARNING:
;   undefined function: JSCL::STD-INSTANCE-P
; 
; compilation unit finished
;   Undefined functions:
;     JSCL::%CHECK-TYPE-ERROR JSCL::%CLASS-CPL JSCL::%SUBCLASS JSCL::%TYPE-EXPAND JSCL::GET-COMPOUND-FOR JSCL::GET-PREDICATE-FOR JSCL::MAPPLIST JSCL::MOP-OBJECT-P JSCL::OBJECT-TYPE-CODE JSCL::STD-INSTANCE-CLASS JSCL::STD-INSTANCE-P
;   Undefined variable:
;     JSCL::*ENVIRONMENT*
;   caught 4 WARNING conditions
;   caught 38 STYLE-WARNING conditions
;   printed 4 notes
Unhandled ASDF/FIND-COMPONENT:MISSING-DEPENDENCY in thread #<SB-THREAD:THREAD tid=3955032 "main thread" RUNNING {1200F08003}>: Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006">

Backtrace for: #<SB-THREAD:THREAD tid=3955032 "main thread" RUNNING {1200F08003}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006"> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006">)
2: (INVOKE-DEBUGGER Component :ITERATE not found, required by #<SYSTEM "trivia.balland2006">)
3: (ERROR ASDF/FIND-COMPONENT:MISSING-DEPENDENCY :REQUIRED-BY #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> :REQUIRES :ITERATE)
4: (ASDF/FIND-COMPONENT:RESOLVE-DEPENDENCY-NAME #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> :ITERATE NIL)
5: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C71BD3B}>)
6: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
7: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
8: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> T)
9: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C71BC1B}>)
10: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
11: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
12: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> T)
13: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C71BAFB}>)
14: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
15: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
16: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "trivia.balland2006" "package"> T)
17: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C71B9DB}>)
18: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
19: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
20: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia.balland2006"> T)
21: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C6F0B3B}>)
22: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
23: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
24: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> T)
25: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C6F0A1B}>)
26: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
27: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
28: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "trivia"> T)
29: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C67FF3B}>)
30: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
31: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
32: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> T)
33: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C67FE1B}>)
34: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
35: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
36: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> T)
37: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C67FCFB}>)
38: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
39: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
40: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "serapeum" "package"> T)
41: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C67FBDB}>)
42: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
43: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
44: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "serapeum"> T)
45: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C5CFF6B}>)
46: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
47: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
48: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> T)
49: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C5CFE4B}>)
50: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
51: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
52: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> T)
53: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C5CFD2B}>)
54: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
55: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
56: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "media-types" "package"> T)
57: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122C5CFC0B}>)
58: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
59: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
60: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "media-types"> T)
61: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "omg"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122AD2742B}>)
62: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
63: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
64: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/SYSTEM:SYSTEM "omg"> T)
65: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122AD272DB}>)
66: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
67: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
68: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:PREPARE-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> T)
69: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122AD232BB}>)
70: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
71: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
72: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/COMPONENT:STATIC-FILE "omg" "README.md"> T)
73: (ASDF/PLAN:MAP-DIRECT-DEPENDENCIES #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omg"> #<FUNCTION (LAMBDA (ASDF/PLAN::O ASDF/PLAN::C) :IN ASDF/PLAN:TRAVERSE-ACTION) {122AD171BB}>)
74: ((LAMBDA NIL :IN ASDF/PLAN:TRAVERSE-ACTION))
75: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
76: (ASDF/PLAN:TRAVERSE-ACTION #<ASDF/PLAN:SEQUENTIAL-PLAN {122AD0C533}> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omg"> T)
77: ((LAMBDA NIL :IN ASDF/PLAN:MAKE-PLAN))
78: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omg"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
79: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omg">)
80: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
81: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "omg">) [fast-method]
82: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "omg")
83: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
84: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "omg") [fast-method]
85: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {122AD12C4B}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
86: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
87: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<FUNCTION (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {122ACD1C8B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
88: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "omg") [fast-method]
89: (DEPCHECK::COMPUTE-DEPENDENCIES "omg" "omg")
90: (DEPCHECK::MAGIC "omg" "omg" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-EkwdZUKB/depcheck-win.txt")
91: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "omg" "omg" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-EkwdZUKB/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-EkwdZUKB/depcheck-fail.txt"))
92: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
93: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP))
94: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP))
95: (SB-IMPL::%START-LISP)

unhandled condition in --disable-debugger mode, quitting