umlisp

SBCL 2.0.5.91-ada264956 / ASDF 3.3.1

umlisp

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/clsql/6cefb5c9d783acecb94b66e288faba7d1d7367e2/clsql-20200621-git/clsql-mysql.asd
; in: DEFMETHOD PERFORM (COMPILE-OP CLSQL-MYSQL-SOURCE-FILE)
;     (ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND "cd ~A; make"
;                                                (NAMESTRING
;                                                 CLSQL-MYSQL-SYSTEM::*LIBRARY-FILE-DIR*))
; 
; caught STYLE-WARNING:
;   DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND -- please update your code to use a newer API.
;   The docstring for this function says:
;   PLEASE DO NOT USE. This function is not just DEPRECATED, but also dysfunctional.
;   Please use UIOP:RUN-PROGRAM instead.
;   
; 
; compilation unit finished
;   caught 1 STYLE-WARNING condition
WARNING: UIOP/VERSION:PARSE-VERSION: "2.7.x" doesn't follow asdf version numbering convention
WARNING: Invalid :version specifier "2.7.x" for component "hyperobject" from file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/hyperobject/da930ff34d7d234a1ae6e7c7596f0f5810106a3f/hyperobject-20200621-git/hyperobject.asd", using NIL instead
WARNING: Invalid :version specifier "2.7.x" for component "hyperobject" from file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/hyperobject/da930ff34d7d234a1ae6e7c7596f0f5810106a3f/hyperobject-20200621-git/hyperobject.asd", using NIL instead
WARNING: DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND -- please update your code to use a newer API.
The docstring for this function says:
PLEASE DO NOT USE. This function is not just DEPRECATED, but also dysfunctional.
Please use UIOP:RUN-PROGRAM instead.


; file: /home/quicklisp/quicklisp-controller/dist/build-cache/clsql/6cefb5c9d783acecb94b66e288faba7d1d7367e2/clsql-20200621-git/db-mysql/mysql-sql.lisp
; in: DEFUN SET-MYSQL-OPTIONS
;     (UFFI:WITH-FOREIGN-STRING (CLSQL-MYSQL::FS CLSQL-MYSQL::VALUE)
;       (MYSQL:MYSQL-OPTIONS CLSQL-MYSQL::MYSQL-PTR CLSQL-MYSQL::OPTION-CODE
;                            CLSQL-MYSQL::FS))
; --> LET* UFFI:CONVERT-TO-FOREIGN-STRING 
; ==>
;   (UFFI::%CONVERT-TO-FOREIGN-STRING CLSQL-MYSQL::VALUE
;                                     (UFFI::LOOKUP-FOREIGN-ENCODING
;                                      (OR #:G7 UFFI:*DEFAULT-FOREIGN-ENCODING*)))
; 
; note: could not stack allocate: (UFFI:WITH-FOREIGN-STRING (FS VALUE) (MYSQL-OPTIONS MYSQL-PTR OPTION-CODE FS))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/clsql/6cefb5c9d783acecb94b66e288faba7d1d7367e2/clsql-20200621-git/db-mysql/mysql-sql.lisp
; in: DEFMETHOD DATABASE-QUERY (T MYSQL-DATABASE T T)
;     (MYSQL:MYSQL-FETCH-ROW CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (*
;                                                                             (SB-ALIEN:UNSIGNED
;                                                                              8)))>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (MYSQL:MYSQL-FETCH-LENGTHS CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             64))>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (MYSQL:MYSQL-USE-RESULT CLSQL-MYSQL::MYSQL-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            T)>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (UFFI:DEREF-ARRAY CLSQL-MYSQL::ROW '(:ARRAY (* :UNSIGNED-CHAR))
;                       (THE FIXNUM CLSQL-MYSQL::I))
; --> DEREF SB-ALIEN-INTERNALS:%ALIEN-VALUE SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             8))>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (MYSQL:MYSQL-USE-RESULT CLSQL-MYSQL::MYSQL-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            T)>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (MYSQL:MYSQL-ERROR-STRING CLSQL-MYSQL::MYSQL-PTR)
; --> BLOCK UFFI:CONVERT-FROM-CSTRING MYSQL:MYSQL-ERROR BLOCK WITH-ALIEN 
; --> SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES PROG1 LET 
; --> ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE IF 
; ==>
;   (SB-ALIEN::C-STRING-TO-STRING ALIEN
;                                 (SB-ALIEN::C-STRING-EXTERNAL-FORMAT
;                                  #<SB-ALIEN::ALIEN-C-STRING-TYPE (SB-ALIEN:C-STRING
;                                                                   :EXTERNAL-FORMAT
;                                                                   :UTF8)>)
;                                 (SB-ALIEN::ALIEN-C-STRING-TYPE-ELEMENT-TYPE
;                                  #<SB-ALIEN::ALIEN-C-STRING-TYPE (SB-ALIEN:C-STRING
;                                                                   :EXTERNAL-FORMAT
;                                                                   :UTF8)>))
; 
; note: doing SAP to pointer coercion (cost 20)

;     (MYSQL:MYSQL-FETCH-ROW CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (*
;                                                                             (SB-ALIEN:UNSIGNED
;                                                                              8)))>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (MYSQL:MYSQL-FETCH-LENGTHS CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             64))>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (UFFI:DEREF-ARRAY CLSQL-MYSQL::ROW '(:ARRAY (* :UNSIGNED-CHAR))
;                       (THE FIXNUM CLSQL-MYSQL::I))
; --> DEREF SB-ALIEN-INTERNALS:%ALIEN-VALUE SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             8))>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (CLSQL-UFFI:CONVERT-RAW-FIELD
;      (UFFI:DEREF-ARRAY CLSQL-MYSQL::ROW '(:ARRAY (* :UNSIGNED-CHAR))
;                        (THE FIXNUM CLSQL-MYSQL::I))
;      (NTH CLSQL-MYSQL::I CLSQL-MYSQL::RESULT-TYPES) :LENGTH
;      (UFFI:DEREF-ARRAY CLSQL-MYSQL::LENGTHS '(:ARRAY :UNSIGNED-LONG)
;                        (THE FIXNUM CLSQL-MYSQL::I))
;      :ENCODING (CLSQL-SYS:ENCODING CLSQL-SYS:DATABASE))
; 
; note: doing unsigned word to integer coercion (cost 20)
; 
; caught ERROR:
;   READ error during COMPILE-FILE: The symbol "SLOT-DEFINITION-NAME" is not external in the SB-PCL package. Line: 94, Column: 32, File-Position: 3190 Stream: #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/kmrcl/4fa994e358e4b454880961a4e0156e29e32f63ba/kmrcl-20200621-git/mop.lisp" {10025076D3}>
Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING {1000A30083}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "kmrcl" "mop">

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1000A30083}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10026580E3}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10026580E3}>)
2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10026580E3}>)
3: (ERROR UIOP/LISP-BUILD:COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">)))
4: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">)))
5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">)
6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">) [fast-method]
8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10052B5513}>) [fast-method]
9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {10052B5513}>) [fast-method]
11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "umlisp"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "umlisp">)
13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "umlisp">) [fast-method]
15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "umlisp")
16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "umlisp") [fast-method]
18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {10052AE7AB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {100526959B}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "umlisp") [fast-method]
22: (DEPCHECK::COMPUTE-DEPENDENCIES "umlisp" "umlisp")
23: (DEPCHECK::MAGIC "umlisp" "umlisp" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-Q7dLoVi9/depcheck-win.txt")
24: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "umlisp" "umlisp" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-Q7dLoVi9/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-Q7dLoVi9/depcheck-fail.txt"))
25: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
26: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
27: ((FLET "WITHOUT-INTERRUPTS-BODY-14" :IN SAVE-LISP-AND-DIE))
28: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

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

umlisp-tests

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/clsql/6cefb5c9d783acecb94b66e288faba7d1d7367e2/clsql-20200621-git/clsql-mysql.asd
; in: DEFMETHOD PERFORM (COMPILE-OP CLSQL-MYSQL-SOURCE-FILE)
;     (ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND "cd ~A; make"
;                                                (NAMESTRING
;                                                 CLSQL-MYSQL-SYSTEM::*LIBRARY-FILE-DIR*))
; 
; caught STYLE-WARNING:
;   DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND -- please update your code to use a newer API.
;   The docstring for this function says:
;   PLEASE DO NOT USE. This function is not just DEPRECATED, but also dysfunctional.
;   Please use UIOP:RUN-PROGRAM instead.
;   
; 
; compilation unit finished
;   caught 1 STYLE-WARNING condition
WARNING: UIOP/VERSION:PARSE-VERSION: "2.7.x" doesn't follow asdf version numbering convention
WARNING: Invalid :version specifier "2.7.x" for component "hyperobject" from file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/hyperobject/da930ff34d7d234a1ae6e7c7596f0f5810106a3f/hyperobject-20200621-git/hyperobject.asd", using NIL instead
WARNING: Invalid :version specifier "2.7.x" for component "hyperobject" from file #P"/home/quicklisp/quicklisp-controller/dist/build-cache/hyperobject/da930ff34d7d234a1ae6e7c7596f0f5810106a3f/hyperobject-20200621-git/hyperobject.asd", using NIL instead

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/clsql/6cefb5c9d783acecb94b66e288faba7d1d7367e2/clsql-20200621-git/uffi/clsql-uffi.lisp
; in: DEFUN CANONICALIZE-TYPE-LIST
;     (LENGTH CLSQL-UFFI::TYPES)
; 
; note: unable to optimize due to type uncertainty: The first argument is a SEQUENCE, not a VECTOR.

;     (LENGTH CLSQL-UFFI::AUTO-LIST)
; 
; note: unable to optimize due to type uncertainty: The first argument is a SEQUENCE, not a VECTOR.
WARNING: DEPRECATED-FUNCTION-STYLE-WARNING: Using deprecated function ASDF/BACKWARD-INTERFACE:RUN-SHELL-COMMAND -- please update your code to use a newer API.
The docstring for this function says:
PLEASE DO NOT USE. This function is not just DEPRECATED, but also dysfunctional.
Please use UIOP:RUN-PROGRAM instead.


; file: /home/quicklisp/quicklisp-controller/dist/build-cache/clsql/6cefb5c9d783acecb94b66e288faba7d1d7367e2/clsql-20200621-git/db-mysql/mysql-sql.lisp
; in: DEFUN SET-MYSQL-OPTIONS
;     (UFFI:WITH-FOREIGN-STRING (CLSQL-MYSQL::FS CLSQL-MYSQL::VALUE)
;       (MYSQL:MYSQL-OPTIONS CLSQL-MYSQL::MYSQL-PTR CLSQL-MYSQL::OPTION-CODE
;                            CLSQL-MYSQL::FS))
; --> LET* UFFI:CONVERT-TO-FOREIGN-STRING 
; ==>
;   (UFFI::%CONVERT-TO-FOREIGN-STRING CLSQL-MYSQL::VALUE
;                                     (UFFI::LOOKUP-FOREIGN-ENCODING
;                                      (OR #:G7 UFFI:*DEFAULT-FOREIGN-ENCODING*)))
; 
; note: could not stack allocate: (UFFI:WITH-FOREIGN-STRING (FS VALUE) (MYSQL-OPTIONS MYSQL-PTR OPTION-CODE FS))

; file: /home/quicklisp/quicklisp-controller/dist/build-cache/clsql/6cefb5c9d783acecb94b66e288faba7d1d7367e2/clsql-20200621-git/db-mysql/mysql-sql.lisp
; in: DEFMETHOD DATABASE-QUERY (T MYSQL-DATABASE T T)
;     (MYSQL:MYSQL-FETCH-ROW CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (*
;                                                                             (SB-ALIEN:UNSIGNED
;                                                                              8)))>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (MYSQL:MYSQL-FETCH-LENGTHS CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             64))>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (MYSQL:MYSQL-USE-RESULT CLSQL-MYSQL::MYSQL-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            T)>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (UFFI:DEREF-ARRAY CLSQL-MYSQL::ROW '(:ARRAY (* :UNSIGNED-CHAR))
;                       (THE FIXNUM CLSQL-MYSQL::I))
; --> DEREF SB-ALIEN-INTERNALS:%ALIEN-VALUE SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             8))>)
; 
; note: unable to optimize away %SAP-ALIEN because: forced to do runtime allocation of alien-value structure

;     (MYSQL:MYSQL-USE-RESULT CLSQL-MYSQL::MYSQL-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            T)>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (MYSQL:MYSQL-ERROR-STRING CLSQL-MYSQL::MYSQL-PTR)
; --> BLOCK UFFI:CONVERT-FROM-CSTRING MYSQL:MYSQL-ERROR BLOCK WITH-ALIEN 
; --> SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES PROG1 LET 
; --> ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE IF 
; ==>
;   (SB-ALIEN::C-STRING-TO-STRING ALIEN
;                                 (SB-ALIEN::C-STRING-EXTERNAL-FORMAT
;                                  #<SB-ALIEN::ALIEN-C-STRING-TYPE (SB-ALIEN:C-STRING
;                                                                   :EXTERNAL-FORMAT
;                                                                   :UTF8)>)
;                                 (SB-ALIEN::ALIEN-C-STRING-TYPE-ELEMENT-TYPE
;                                  #<SB-ALIEN::ALIEN-C-STRING-TYPE (SB-ALIEN:C-STRING
;                                                                   :EXTERNAL-FORMAT
;                                                                   :UTF8)>))
; 
; note: doing SAP to pointer coercion (cost 20)

;     (MYSQL:MYSQL-FETCH-ROW CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (*
;                                                                             (SB-ALIEN:UNSIGNED
;                                                                              8)))>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (MYSQL:MYSQL-FETCH-LENGTHS CLSQL-MYSQL::RES-PTR)
; --> BLOCK WITH-ALIEN SYMBOL-MACROLET SYMBOL-MACROLET SYMBOL-MACROLET VALUES 
; --> PROG1 LET ALIEN-FUNCALL SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             64))>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (UFFI:DEREF-ARRAY CLSQL-MYSQL::ROW '(:ARRAY (* :UNSIGNED-CHAR))
;                       (THE FIXNUM CLSQL-MYSQL::I))
; --> DEREF SB-ALIEN-INTERNALS:%ALIEN-VALUE SB-ALIEN-INTERNALS:NATURALIZE 
; ==>
;   (SB-ALIEN-INTERNALS:%SAP-ALIEN ALIEN
;                                  '#<SB-ALIEN-INTERNALS:ALIEN-POINTER-TYPE (*
;                                                                            (SB-ALIEN:UNSIGNED
;                                                                             8))>)
; 
; note: doing SAP to pointer coercion (cost 20)

;     (CLSQL-UFFI:CONVERT-RAW-FIELD
;      (UFFI:DEREF-ARRAY CLSQL-MYSQL::ROW '(:ARRAY (* :UNSIGNED-CHAR))
;                        (THE FIXNUM CLSQL-MYSQL::I))
;      (NTH CLSQL-MYSQL::I CLSQL-MYSQL::RESULT-TYPES) :LENGTH
;      (UFFI:DEREF-ARRAY CLSQL-MYSQL::LENGTHS '(:ARRAY :UNSIGNED-LONG)
;                        (THE FIXNUM CLSQL-MYSQL::I))
;      :ENCODING (CLSQL-SYS:ENCODING CLSQL-SYS:DATABASE))
; 
; note: doing unsigned word to integer coercion (cost 20)
; 
; caught ERROR:
;   READ error during COMPILE-FILE: The symbol "SLOT-DEFINITION-NAME" is not external in the SB-PCL package. Line: 94, Column: 32, File-Position: 3190 Stream: #<SB-INT:FORM-TRACKING-STREAM for "file /home/quicklisp/quicklisp-controller/dist/build-cache/kmrcl/4fa994e358e4b454880961a4e0156e29e32f63ba/kmrcl-20200621-git/mop.lisp" {10031A76D3}>
Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING {1000A30083}>: COMPILE-FILE-ERROR while compiling #<CL-SOURCE-FILE "kmrcl" "mop">

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1000A30083}>
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10032FFD03}> #<unused argument> :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10032FFD03}>)
2: (INVOKE-DEBUGGER #<UIOP/LISP-BUILD:COMPILE-FILE-ERROR {10032FFD03}>)
3: (ERROR UIOP/LISP-BUILD:COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">)))
4: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((#<ASDF/LISP-ACTION:COMPILE-OP > . #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">)))
5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">)
6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) #<ASDF/LISP-ACTION:COMPILE-OP > #<ASDF/LISP-ACTION:CL-SOURCE-FILE "kmrcl" "mop">) [fast-method]
8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1005373773}>) [fast-method]
9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #<ASDF/PLAN:SEQUENTIAL-PLAN {1005373773}>) [fast-method]
11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "umlisp-tests"> :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "umlisp-tests">)
13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) #<ASDF/LISP-ACTION:LOAD-OP > #<ASDF/SYSTEM:SYSTEM "umlisp-tests">) [fast-method]
15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) #<unused argument> #<unused argument> ASDF/LISP-ACTION:LOAD-OP "umlisp-tests")
16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "umlisp-tests") [fast-method]
18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {100536C1BB}> :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION #<CLOSURE (LAMBDA NIL :IN ASDF/OPERATE:OPERATE) {1005326FAB}> :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP "umlisp-tests") [fast-method]
22: (DEPCHECK::COMPUTE-DEPENDENCIES "umlisp-tests" "umlisp-tests")
23: (DEPCHECK::MAGIC "umlisp-tests" "umlisp-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-2KfC4f0Y/depcheck-win.txt")
24: (DEPCHECK::MAIN ("depcheck" "/home/quicklisp/quicklisp-controller/dist/system-file-index" "umlisp-tests" "umlisp-tests" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-2KfC4f0Y/depcheck-win.txt" "/home/quicklisp/quicklisp-controller/tmp/anonymous/anonymous-2KfC4f0Y/depcheck-fail.txt"))
25: ((LAMBDA NIL :IN "/home/quicklisp/quicklisp/local-projects/quicklisp-controller/dumper-2SKVI5f7.lisp"))
26: ((FLET SB-UNIX::BODY :IN SAVE-LISP-AND-DIE))
27: ((FLET "WITHOUT-INTERRUPTS-BODY-14" :IN SAVE-LISP-AND-DIE))
28: ((LABELS SB-IMPL::RESTART-LISP :IN SAVE-LISP-AND-DIE))

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