$ make all
sbcl --dynamic-space-size 3072 --no-userinit --non-interactive --eval '(require "asdf")' --eval '(when (string= "true" "true") (setf asdf:*default-source-registries* (list (quote asdf/source-registry:environment-source-registry))) (asdf:clear-configuration) (asdf:load-asd "/home/erel/Documents/nyxt//libraries/nasdf/nasdf.asd") (asdf:load-asd "/home/erel/Documents/nyxt//nyxt.asd") (asdf:load-system :nyxt/submodules))' --eval '(asdf:load-asd "/home/erel/Documents/nyxt//libraries/nasdf/nasdf.asd")' --eval '(asdf:load-asd "/home/erel/Documents/nyxt//nyxt.asd")' --eval '(when (and (find-package :cffi) (uiop:getenv "GUIX_ENVIRONMENT")) (pushnew (pathname (format nil "~a/lib/" (uiop:getenv "GUIX_ENVIRONMENT"))) (symbol-value (read-from-string "cffi:*foreign-library-directories*" )) :test (quote equal)))' --eval '(asdf:load-system :nyxt/gi-gtk-application)' \
--eval '(asdf:make :nyxt/gi-gtk-application)' \
--eval '(uiop:quit)' || (printf "\n%s\n%s\n" "Compilation failed, see the above stacktrace." && exit 1)
This is SBCL 2.4.2, an implementation of ANSI Common Lisp.
More information about SBCL is available at .
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
; running ("git" "-C" "/home/erel/Documents/nyxt/" "submodule" "update"
"--init" "--force" "--jobs" "4")
fatal: not a git repository (or any of the parent directories): .git
; CL_SOURCE_REGISTRY: "/home/erel/Documents/nyxt/_build//:/home/erel/Documents/nyxt/:"
WARNING: System definition file #P"/home/erel/Documents/nyxt/_build/trivial-garbage/trivial-garbage.asd" contains definition for system "trivial-garbage-tests". Please only define "trivial-garbage" and secondary systems with a name starting with "trivial-garbage/" (e.g. "trivial-garbage/test") in that file.
WARNING: System definition file #P"/home/erel/Documents/nyxt/_build/calispel/calispel.asd" contains definition for system "calispel-test". Please only define "calispel" and secondary systems with a name starting with "calispel/" (e.g. "calispel/test") in that file.
WARNING: System definition file #P"/home/erel/Documents/nyxt/_build/flexi-streams/flexi-streams.asd" contains definition for system "flexi-streams-test". Please only define "flexi-streams" and secondary systems with a name starting with "flexi-streams/" (e.g. "flexi-streams/test") in that file.
WARNING: System definition file #P"/home/erel/Documents/nyxt/_build/cl-ppcre/cl-ppcre-unicode.asd" contains definition for system "cl-ppcre-unicode-test". Please only define "cl-ppcre-unicode" and secondary systems with a name starting with "cl-ppcre-unicode/" (e.g. "cl-ppcre-unicode/test") in that file.
WARNING: System definition file #P"/home/erel/Documents/nyxt/_build/s-xml/s-xml.asd" contains definition for system "s-xml.test". Please only define "s-xml" and secondary systems with a name starting with "s-xml/" (e.g. "s-xml/test") in that file.
WARNING: System definition file #P"/home/erel/Documents/nyxt/_build/s-xml/s-xml.asd" contains definition for system "s-xml.examples". Please only define "s-xml" and secondary systems with a name starting with "s-xml/" (e.g. "s-xml/test") in that file.
WARNING: System definition file #P"/home/erel/Documents/nyxt/_build/montezuma/montezuma.asd" contains definition for system "montezuma-tests". Please only define "montezuma" and secondary systems with a name starting with "montezuma/" (e.g. "montezuma/test") in that file.
WARNING: The CL-Containers system would enjoy having asdf-system-connections around. See
http://www.cliki.net/asdf-system-connections for details and download
instructions.
(sbcl:22052): Gtk-WARNING **: 17:53:10.403: Theme parsing error: gtk.css:6616:68: Invalid name of pseudo-class
; compiling file "/home/erel/Documents/nyxt/_build/usocket/package.lisp" (written 04 MAR 2024 04:56:24 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/usocket/package-tmpGHU3ALSV.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/usocket/usocket.lisp" (written 04 MAR 2024 04:56:24 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/usocket/usocket-tmpAAURSO1.fasl
; compilation finished in 0:00:00.130
; compiling file "/home/erel/Documents/nyxt/_build/usocket/condition.lisp" (written 04 MAR 2024 04:56:24 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/usocket/condition-tmp5GEXGEG5.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/usocket/backend/sbcl.lisp" (written 04 MAR 2024 04:56:24 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/usocket/backend/sbcl-tmpAR3FSGEY.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/erel/Documents/nyxt/_build/usocket/option.lisp" (written 04 MAR 2024 04:56:24 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/usocket/option-tmpJAIDFZTC.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/package.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/package-tmp8V3J6PE9.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/reload.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/reload-tmp9V47YWQF.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ffi.lisp" (written 04 MAR 2024 04:55:03 AM):
; file: /home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ffi.lisp
; in: DEFMACRO DEFCFUN-LATE-BOUND
; (LENGTH CL+SSL::NAME-AND-OPTIONS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLeay" CL+SSL::SSL-EAY)
; :LONG)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-EAY
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-EAY
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLeay" (:LONG) :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("OpenSSL_version_num" CL+SSL::OPENSSL-VERSION-NUM)
; :LONG)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::OPENSSL-VERSION-NUM
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::OPENSSL-VERSION-NUM
; (CFFI-SYS:%FOREIGN-FUNCALL "OpenSSL_version_num" (:LONG) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFUN ENCODE-OPENSSL-VERSION-IMPL
; (POSITION CL+SSL::PATCH CL+SSL::+OPENSSL-VERSION-PATCH-CHARACTERS+)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (POSITION CL+SSL::STATUS CL+SSL::+OPENSSL-VERSION-STATUS-STRINGS+ :TEST
; #'STRING=)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (LOGIOR (ASH CL+SSL::MAJOR 28) (ASH CL+SSL::MINOR 20) (ASH CL+SSL::FIX 12)
; (ASH CL+SSL::PATCH-INT 4) CL+SSL::STATUS-INT)
;
; note: forced to do full call
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a (OR NULL INTEGER), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 3) because:
; The second argument is a (OR NULL INTEGER), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN ENCODE-OPENSSL-VERSION
; (>= CL+SSL::MAJOR 3)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; in: DEFUN OPENSSL-IS-AT-LEAST
; (>= (CL+SSL::COMPAT-OPENSSL-VERSION)
; (CL+SSL::ENCODE-OPENSSL-VERSION CL+SSL::MAJOR CL+SSL::MINOR
; CL+SSL::PATCH-OR-FIX))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; in: DEFUN OPENSSL-IS-NOT-EVEN
; (< (CL+SSL::COMPAT-OPENSSL-VERSION)
; (CL+SSL::ENCODE-OPENSSL-VERSION CL+SSL::MAJOR CL+SSL::MINOR
; CL+SSL::PATCH-OR-FIX))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a (NOT NULL), not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; etc.
; in: DEFUN LIBRESSLP
; (= 536870912 (CL+SSL::COMPAT-OPENSSL-VERSION))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFINE-SSL-FUNCTION ("SSL_get_version" SSL-GET-VERSION)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_get_version" CL+SSL::SSL-GET-VERSION)
; :STRING
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_version" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv23_client_method" CL+SSL::SSL-V23-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V23-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_client_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv23_server_method" CL+SSL::SSL-V23-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V23-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_server_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv23_method" CL+SSL::SSL-V23-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V23-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V23-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv23_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv3_client_method" CL+SSL::SSL-V3-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V3-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_client_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv3_server_method" CL+SSL::SSL-V3-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V3-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_server_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSLv3_method" CL+SSL::SSL-V3-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-V3-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-V3-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "SSLv3_method" (:POINTER) :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION ("TLSv1_client_method" SSL-TLSV1-CLIENT-METHOD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("TLSv1_client_method" CL+SSL::SSL-TLSV1-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_client_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION ("TLSv1_server_method" SSL-TLSV1-SERVER-METHOD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("TLSv1_server_method" CL+SSL::SSL-TLSV1-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_server_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION ("TLSv1_method" SSL-TLSV1-METHOD)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("TLSv1_method" CL+SSL::SSL-TLSV1-METHOD)
; CL+SSL::SSL-METHOD)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_method" (:POINTER) :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.0.2")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_1_client_method" CL+SSL::SSL-TLSV1-1-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-1-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_client_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_1_server_method" CL+SSL::SSL-TLSV1-1-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-1-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_server_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_1_method" CL+SSL::SSL-TLSV1-1-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-1-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-1-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_1_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_2_client_method" CL+SSL::SSL-TLSV1-2-CLIENT-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-CLIENT-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-2-CLIENT-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_client_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_2_server_method" CL+SSL::SSL-TLSV1-2-SERVER-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-SERVER-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-2-SERVER-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_server_method" (:POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.0.2")
; ("TLSv1_2_method" CL+SSL::SSL-TLSV1-2-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-TLSV1-2-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-TLSV1-2-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLSv1_2_method" (:POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "1.1.0")
; ("TLS_method" CL+SSL::TLS-METHOD)
; CL+SSL::SSL-METHOD)
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::TLS-METHOD
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::TLS-METHOD
; (CFFI-SYS:%FOREIGN-FUNCALL "TLS_method" (:POINTER) :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBSSL)))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION ("SSL_CTX_new" SSL-CTX-NEW)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_new" CL+SSL::SSL-CTX-NEW)
; CL+SSL::SSL-CTX
; (METHOD CL+SSL::SSL-METHOD))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-NEW
; (METHOD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-NEW
; (LET ((#:G1 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_new" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION ("SSL_new" SSL-NEW)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_new" CL+SSL::SSL-NEW)
; CL+SSL::SSL-POINTER
; (CL+SSL::CTX CL+SSL::SSL-CTX))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-NEW
; (CL+SSL::CTX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-NEW
; (LET ((#:G1 CL+SSL::CTX))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_new" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("BIO_ctrl" BIO-SET-FD)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_ctrl" CL+SSL::BIO-SET-FD)
; :LONG
; (CL+SSL::BIO :POINTER)
; (CL+SSL::CMD :INT)
; (CL+SSL::LARG :LONG)
; (CL+SSL::PARG :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-SET-FD
; (CL+SSL::BIO CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-SET-FD
; (LET ((#:G1 CL+SSL::BIO))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("BIO_new_socket" BIO-NEW-SOCKET)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_new_socket" CL+SSL::BIO-NEW-SOCKET)
; :POINTER
; (CL+SSL::FD :INT)
; (CL+SSL::CLOSE-FLAG :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-NEW-SOCKET
; (CL+SSL::FD CL+SSL::CLOSE-FLAG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-NEW-SOCKET
; (LET ((#:G1 CL+SSL::FD))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new_socket" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("BIO_new" BIO-NEW)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_new" CL+SSL::BIO-NEW)
; :POINTER
; (METHOD :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-NEW
; (METHOD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-NEW
; (LET ((#:G1 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_new" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("BIO_free" BIO-FREE)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("BIO_free" CL+SSL::BIO-FREE)
; :POINTER
; (METHOD :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-FREE
; (METHOD)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-FREE
; (LET ((#:G1 METHOD))
; (CFFI-SYS:%FOREIGN-FUNCALL "BIO_free" (:POINTER #:G1 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("BIO_meth_new" CL+SSL::BIO-METH-NEW)
; :POINTER
; (TYPE :INT)
; (CL+SSL::NAME :STRING))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::BIO-METH-NEW
; (TYPE CL+SSL::NAME)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::BIO-METH-NEW
; (LET ((#:G0 TYPE))
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::NAME #)
; (UNWIND-PROTECT # #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("ERR_get_error" ERR-GET-ERROR)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ERR_get_error" CL+SSL::ERR-GET-ERROR)
; :UNSIGNED-LONG)
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::ERR-GET-ERROR
; NIL
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ERR-GET-ERROR
; (CFFI-SYS:%FOREIGN-FUNCALL "ERR_get_error" (:UNSIGNED-LONG) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))
;
; note: doing unsigned word to integer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("ERR_error_string" ERR-ERROR-STRING)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ERR_error_string" CL+SSL::ERR-ERROR-STRING)
; :STRING
; (CL+SSL::E :UNSIGNED-LONG)
; (CL+SSL::BUF :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK LET
; --> LET
; ==>
; (CFFI:TRANSLATE-FROM-FOREIGN
; (CFFI-SYS:%FOREIGN-FUNCALL "ERR_error_string"
; (:UNSIGNED-LONG #:G1 :POINTER #:G2 :POINTER)
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)
; #)
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFINE-SSL-FUNCTION ("SSL_CTX_ctrl" SSL-CTX-CTRL)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_CTX_ctrl" CL+SSL::SSL-CTX-CTRL)
; :LONG
; (CL+SSL::CTX CL+SSL::SSL-CTX)
; (CL+SSL::CMD :INT)
; (CL+SSL::LARG :UNSIGNED-LONG)
; (CL+SSL::PARG :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-CTRL
; (CL+SSL::CTX CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-CTRL
; (LET ((#:G1 CL+SSL::CTX))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION ("SSL_ctrl" SSL-CTRL)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_ctrl" CL+SSL::SSL-CTRL)
; :LONG
; (CL+SSL::SSL :POINTER)
; (CL+SSL::CMD :INT)
; (CL+SSL::LARG :LONG)
; (CL+SSL::PARG :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTRL
; (CL+SSL::SSL CL+SSL::CMD CL+SSL::LARG CL+SSL::PARG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTRL
; (LET ((#:G1 CL+SSL::SSL))
; (LET (#)
; (LET #
; #)))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFUN SSL-CTX-SET-OPTIONS
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-OPTIONS+ CL+SSL::OPTIONS
; (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFUN SSL-CTX-SET-MIN-PROTO-VERSION
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-SET-MIN-PROTO-VERSION+
; CL+SSL::VERSION (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFUN SSL-CTX-SET-MAX-PROTO-VERSION
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL-CTRL-SET-MAX-PROTO-VERSION+
; CL+SSL::VERSION (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; in:
; DEFINE-SSL-FUNCTION ("SSL_load_client_CA_file" SSL-LOAD-CLIENT-CA-FILE)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_load_client_CA_file" CL+SSL::SSL-LOAD-CLIENT-CA-FILE)
; CL+SSL::SSL-POINTER
; (CL+SSL::FILE :STRING))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-LOAD-CLIENT-CA-FILE
; (CL+SSL::FILE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-LOAD-CLIENT-CA-FILE
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::FILE
; #)
; (UNWIND-PROTECT (PROGN #)
; (CFFI:FREE-TRANSLATED-OBJECT #:G1 # #:PARAM2)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION ("SSL_get_verify_result" SSL-GET-VERIFY-RESULT)
; (CL+SSL::DEFINE-SSL-FUNCTION
; ("SSL_get_verify_result" CL+SSL::SSL-GET-VERIFY-RESULT)
; :LONG
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-VERIFY-RESULT
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET-VERIFY-RESULT
; (LET ((#:G1 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_verify_result"
; (:POINTER #:G1 :LONG) :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBSSL))))
;
; note: doing signed word to integer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "3.0.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "3.0.0")
; ("SSL_get_peer_certificate" CL+SSL::SSL-GET-PEER-CERTIFICATE)
; :POINTER
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET-PEER-CERTIFICATE
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET-PEER-CERTIFICATE
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get_peer_certificate"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION-EX (:SINCE "3.0.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:SINCE "3.0.0")
; ("SSL_get1_peer_certificate" CL+SSL::SSL-GET1-PEER-CERTIFICATE)
; :POINTER
; (CL+SSL::SSL CL+SSL::SSL-POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-GET1-PEER-CERTIFICATE
; (CL+SSL::SSL)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-GET1-PEER-CERTIFICATE
; (LET ((#:G0 CL+SSL::SSL))
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_get1_peer_certificate"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY CL+SSL/CONFIG::LIBSSL))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFUN COMPAT-SSL-GET1-PEER-CERTIFICATE
; (FUNCALL
; (IF (CL+SSL::OPENSSL-IS-AT-LEAST 3 0 0)
; 'CL+SSL::SSL-GET1-PEER-CERTIFICATE
; 'CL+SSL::SSL-GET-PEER-CERTIFICATE)
; CL+SSL::HANDLE)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; in: DEFINE-CRYPTO-FUNCTION ("X509_NAME_oneline" X509-NAME-ONELINE)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_NAME_oneline" CL+SSL::X509-NAME-ONELINE)
; :POINTER
; (CL+SSL::X509-NAME :POINTER)
; (CL+SSL::BUF :POINTER)
; (CL+SSL::SIZE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-ONELINE
; (CL+SSL::X509-NAME CL+SSL::BUF CL+SSL::SIZE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-NAME-ONELINE
; (LET ((#:G1 CL+SSL::X509-NAME))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("X509_NAME_get_entry" X509-NAME-GET-ENTRY)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_NAME_get_entry" CL+SSL::X509-NAME-GET-ENTRY)
; :POINTER
; (CL+SSL::NAME :POINTER)
; (LOG :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-GET-ENTRY
; (CL+SSL::NAME LOG)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-NAME-GET-ENTRY
; (LET ((#:G1 CL+SSL::NAME))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_get_entry" # :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_NAME_ENTRY_get_data" X509-NAME-ENTRY-GET-DATA)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_NAME_ENTRY_get_data" CL+SSL::X509-NAME-ENTRY-GET-DATA)
; :POINTER
; (CL+SSL::NAME-ENTRY :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-NAME-ENTRY-GET-DATA
; (CL+SSL::NAME-ENTRY)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-NAME-ENTRY-GET-DATA
; (LET ((#:G1 CL+SSL::NAME-ENTRY))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_NAME_ENTRY_get_data"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_get_issuer_name" X509-GET-ISSUER-NAME)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_get_issuer_name" CL+SSL::X509-GET-ISSUER-NAME)
; :POINTER
; (CL+SSL::X509 :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-ISSUER-NAME
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET-ISSUER-NAME
; (LET ((#:G1 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_issuer_name"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in:
; DEFINE-CRYPTO-FUNCTION ("X509_get_subject_name" X509-GET-SUBJECT-NAME)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_get_subject_name" CL+SSL::X509-GET-SUBJECT-NAME)
; :POINTER
; (CL+SSL::X509 :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-SUBJECT-NAME
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET-SUBJECT-NAME
; (LET ((#:G1 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get_subject_name"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("X509_get0_notBefore" CL+SSL::X509-GET0-NOT-BEFORE)
; :POINTER
; (CL+SSL::X509 :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET0-NOT-BEFORE
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET0-NOT-BEFORE
; (LET ((#:G0 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get0_notBefore"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("X509_get0_notAfter" CL+SSL::X509-GET0-NOT-AFTER)
; :POINTER
; (CL+SSL::X509 :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET0-NOT-AFTER
; (CL+SSL::X509)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET0-NOT-AFTER
; (LET ((#:G0 CL+SSL::X509))
; (CFFI-SYS:%FOREIGN-FUNCALL "X509_get0_notAfter"
; (:POINTER #:G0 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("X509_get_ext_d2i" X509-GET-EXT-D2I)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("X509_get_ext_d2i" CL+SSL::X509-GET-EXT-D2I)
; :POINTER
; (CL+SSL::CERT :POINTER)
; (CL+SSL::NID :INT)
; (CL+SSL::CRIT :POINTER)
; (CL+SSL::IDX :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::X509-GET-EXT-D2I
; (CL+SSL::CERT CL+SSL::NID CL+SSL::CRIT CL+SSL::IDX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::X509-GET-EXT-D2I
; (LET ((#:G1 CL+SSL::CERT))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("d2i_X509" D2I-X509)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("d2i_X509" CL+SSL::D2I-X509)
; :POINTER
; (CL+SSL::*PX :POINTER)
; (CL+SSL::IN :POINTER)
; (CL+SSL::LEN :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::D2I-X509
; (CL+SSL::*PX CL+SSL::IN CL+SSL::LEN)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::D2I-X509
; (LET ((#:G1 CL+SSL::*PX))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("PEM_read_bio_X509" PEM-READ-X509)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("PEM_read_bio_X509" CL+SSL::PEM-READ-X509)
; :POINTER
; (CL+SSL::BIO :POINTER)
; (CL+SSL::X509 :INT)
; (CL+SSL::CALLBACK :INT)
; (CL+SSL::PASSPHRASE :INT))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::PEM-READ-X509
; (CL+SSL::BIO CL+SSL::X509 CL+SSL::CALLBACK CL+SSL::PASSPHRASE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::PEM-READ-X509
; (LET ((#:G1 CL+SSL::BIO))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in:
; DEFINE-CRYPTO-FUNCTION ("EVP_get_digestbyname" EVP-GET-DIGEST-BY-NAME)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("EVP_get_digestbyname" CL+SSL::EVP-GET-DIGEST-BY-NAME)
; :POINTER
; (CL+SSL::NAME :STRING))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::EVP-GET-DIGEST-BY-NAME
; (CL+SSL::NAME)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::EVP-GET-DIGEST-BY-NAME
; (MULTIPLE-VALUE-BIND (#:G1 #:PARAM2)
; (CFFI:TRANSLATE-TO-FOREIGN CL+SSL::NAME
; #)
; (UNWIND-PROTECT (PROGN #)
; (CFFI:FREE-TRANSLATED-OBJECT #:G1 # #:PARAM2)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("sk_value" CL+SSL::SK-VALUE)
; :POINTER
; (CL+SSL::STACK :POINTER)
; (CL+SSL::INDEX :INT))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-VALUE
; (CL+SSL::STACK CL+SSL::INDEX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SK-VALUE
; (LET ((#:G0 CL+SSL::STACK))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "sk_value" # :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION-EX (:SINCE "1.1.0")
; (CL+SSL::DEFINE-CRYPTO-FUNCTION-EX
; (:SINCE "1.1.0")
; ("OPENSSL_sk_value" CL+SSL::OPENSSL-SK-VALUE)
; :POINTER
; (CL+SSL::STACK :POINTER)
; (CL+SSL::INDEX :INT))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::OPENSSL-SK-VALUE
; (CL+SSL::STACK CL+SSL::INDEX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::OPENSSL-SK-VALUE
; (LET ((#:G0 CL+SSL::STACK))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "OPENSSL_sk_value" # :CONVENTION :CDECL
; :LIBRARY CL+SSL/CONFIG::LIBCRYPTO)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFUN SK-GENERAL-NAME-VALUE
; (DEFUN CL+SSL::SK-GENERAL-NAME-VALUE (CL+SSL::NAMES CL+SSL::INDEX)
; (IF (AND (NOT (CL+SSL::LIBRESSLP)) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-VALUE CL+SSL::NAMES CL+SSL::INDEX)
; (CL+SSL::SK-VALUE CL+SSL::NAMES CL+SSL::INDEX)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-GENERAL-NAME-VALUE
; (CL+SSL::NAMES CL+SSL::INDEX)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SK-GENERAL-NAME-VALUE
; (IF (AND (NOT #) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-VALUE CL+SSL::NAMES CL+SSL::INDEX)
; (CL+SSL::SK-VALUE CL+SSL::NAMES CL+SSL::INDEX))))
;
; note: Type assertion too complex to check:
; (VALUES SB-SYS:SYSTEM-AREA-POINTER &REST T).
; It allows an unknown number of values, consider using
; (VALUES SB-SYS:SYSTEM-AREA-POINTER &OPTIONAL).
; in: DEFUN SK-GENERAL-NAME-NUM
; (DEFUN CL+SSL::SK-GENERAL-NAME-NUM (CL+SSL::NAMES)
; (IF (AND (NOT (CL+SSL::LIBRESSLP)) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-NUM CL+SSL::NAMES)
; (CL+SSL::SK-NUM CL+SSL::NAMES)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SK-GENERAL-NAME-NUM
; (CL+SSL::NAMES)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SK-GENERAL-NAME-NUM
; (IF (AND (NOT #) (CL+SSL::OPENSSL-IS-AT-LEAST 1 1))
; (CL+SSL::OPENSSL-SK-NUM CL+SSL::NAMES)
; (CL+SSL::SK-NUM CL+SSL::NAMES))))
;
; note: Type assertion too complex to check:
; (VALUES FIXNUM &REST T).
; It allows an unknown number of values, consider using
; (VALUES FIXNUM &OPTIONAL).
; in: DEFINE-CRYPTO-FUNCTION ("ASN1_STRING_data" ASN1-STRING-DATA)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("ASN1_STRING_data" CL+SSL::ASN1-STRING-DATA)
; :POINTER
; (CL+SSL::ASN1-STRING :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::ASN1-STRING-DATA
; (CL+SSL::ASN1-STRING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::ASN1-STRING-DATA
; (LET ((#:G1 CL+SSL::ASN1-STRING))
; (CFFI-SYS:%FOREIGN-FUNCALL "ASN1_STRING_data"
; (:POINTER #:G1 :POINTER) :CONVENTION
; :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBCRYPTO))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-CRYPTO-FUNCTION ("RSA_generate_key" RSA-GENERATE-KEY)
; (CL+SSL::DEFINE-CRYPTO-FUNCTION
; ("RSA_generate_key" CL+SSL::RSA-GENERATE-KEY)
; :POINTER
; (CL+SSL::NUM :INT)
; (CL+SSL::E :UNSIGNED-LONG)
; (CL+SSL::CALLBACK :POINTER)
; (CL+SSL::OPT :POINTER))
; --> PROGN CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::RSA-GENERATE-KEY
; (CL+SSL::NUM CL+SSL::E CL+SSL::CALLBACK CL+SSL::OPT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::RSA-GENERATE-KEY
; (LET ((#:G1 CL+SSL::NUM))
; (LET (#)
; (LET #
; #)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFINE-SSL-FUNCTION-EX (:VANISHED "1.1.0")
; (CL+SSL::DEFINE-SSL-FUNCTION-EX
; (:VANISHED "1.1.0")
; ("SSL_CTX_set_tmp_rsa_callback" CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK)
; :POINTER
; (CL+SSL::CTX :POINTER)
; (CL+SSL::CALLBACK :POINTER))
; --> CL+SSL::DEFCFUN-VERSIONED CFFI:DEFCFUN PROGN DEFUN PROGN SB-IMPL::%DEFUN
; --> SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK
; (CL+SSL::CTX CL+SSL::CALLBACK)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK CL+SSL::SSL-CTX-SET-TMP-RSA-CALLBACK
; (LET ((#:G0 CL+SSL::CTX))
; (LET (#)
; (CFFI-SYS:%FOREIGN-FUNCALL "SSL_CTX_set_tmp_rsa_callback" #
; :CONVENTION :CDECL :LIBRARY
; CL+SSL/CONFIG::LIBSSL)))))
;
; note: doing SAP to pointer coercion (cost 20) to ""
; in: DEFUN SSL-CTX-SET-SESSION-CACHE-MODE
; (CL+SSL::SSL-CTX-CTRL CL+SSL::CTX CL+SSL::+SSL_CTRL_SET_SESS_CACHE_MODE+
; CL+SSL::MODE (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ffi-tmp9BN22RMA.fasl
; compilation finished in 0:00:00.390
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/bio.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/bio-tmp1CXFJSK9.fasl
; compilation finished in 0:00:00.146
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/conditions.lisp" (written 04 MAR 2024 04:55:03 AM):
; file: /home/erel/Documents/nyxt/_build/cl-plus-ssl/src/conditions.lisp
; in: DEFUN FORMAT-SSL-ERROR-QUEUE
; 'CL+SSL::SSL-ERROR
;
; note: can't open-code test of unknown type SSL-ERROR
; (ETYPECASE CL+SSL::QUEUE-DESIGNATOR
; (CL+SSL::SSL-ERROR (CL+SSL::SSL-ERROR-QUEUE CL+SSL::QUEUE-DESIGNATOR))
; (LIST CL+SSL::QUEUE-DESIGNATOR))
; --> COND IF
; ==>
; (TYPEP #:G2 'CL+SSL::SSL-ERROR)
;
; note: can't open-code test of unknown type SSL-ERROR
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/conditions-tmpX4BRKI0R.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ssl-funcall.lisp" (written 04 MAR 2024 04:55:03 AM):
; file: /home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ssl-funcall.lisp
; in: DEFUN SECONDS-UNTIL-DEADLINE
; (/ (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
; INTERNAL-TIME-UNITS-PER-SECOND)
;
; note: unable to
; convert x/2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
; (- CL+SSL::DEADLINE (GET-INTERNAL-REAL-TIME))
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN ENSURE-SSL-FUNCALL
; (APPLY CL+SSL::FUNC CL+SSL::HANDLE CL+SSL::OTHER-ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FUNC is not known to be a function
; (FUNCALL CL+SSL::SUCCESS-TEST CL+SSL::RET)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; SUCCESS-TEST is not known to be a function
; in: DEFUN NONBLOCKING-SSL-FUNCALL
; (APPLY CL+SSL::FUNC CL+SSL::HANDLE CL+SSL::OTHER-ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FUNC is not known to be a function
; (FUNCALL CL+SSL::SUCCESS-TEST CL+SSL::RET)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; SUCCESS-TEST is not known to be a function
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ssl-funcall-tmpQ371UGST.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/init.lisp" (written 04 MAR 2024 04:55:03 AM):
; file: /home/erel/Documents/nyxt/_build/cl-plus-ssl/src/init.lisp
; in: CFFI:DEFCALLBACK TMP-RSA-CALLBACK
; (= CL+SSL::KEY-LENGTH 512)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (= CL+SSL::KEY-LENGTH 1024)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (CL+SSL::RSA-GENERATE-KEY LENGTH CL+SSL::+RSA_F4+ (CFFI-SYS:NULL-POINTER)
; (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; in: CFFI:DEFCALLBACK PEM-PASSWORD-CALLBACK
; (COERCE CL+SSL::*PEM-PASSWORD* 'BASE-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
; * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST (AND (NOT BASE-STRING) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
; CHARACTER
; (*)).
; in: DEFUN INIT-PRNG
; (LENGTH CL+SSL::SEED-BYTE-SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (ELT CL+SSL::SEED-BYTE-SEQUENCE CL+SSL::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (CL+SSL::RAND-SEED CL+SSL::PTR LENGTH)
;
; note: doing SAP to pointer coercion (cost 20)
; in: CFFI:DEFCALLBACK LOCKING-CALLBACK
; (ELT CL+SSL::*LOCKS* CL+SSL::N)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; in: CFFI:DEFCALLBACK THREADID-CALLBACK
; (INCF CL+SSL::*THREAD-COUNTER*)
; --> THE
; ==>
; (+ 1 CL+SSL::*THREAD-COUNTER*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; in: DEFUN INITIALIZE
; (LOOP CL+SSL::REPEAT (CL+SSL::CRYPTO-NUM-LOCKS)
; CL+SSL::COLLECT (BORDEAUX-THREADS:MAKE-LOCK))
; --> LET CEILING
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (FUNCALL (OR METHOD (CL+SSL::DEFAULT-SSL-METHOD)))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (LOOP CL+SSL::REPEAT (CL+SSL::CRYPTO-NUM-LOCKS)
; CL+SSL::COLLECT (BORDEAUX-THREADS:MAKE-LOCK))
; --> LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY IF <=
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 8)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY IF DECF SETQ THE
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/init-tmp2OWI3Q7U.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ffi-buffer-all.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ffi-buffer-all-tmp9KKTJMYV.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ffi-buffer.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/ffi-buffer-tmpJU0JWO19.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/streams.lisp" (written 04 MAR 2024 04:55:03 AM):
; file: /home/erel/Documents/nyxt/_build/cl-plus-ssl/src/streams.lisp
; in: DEFMETHOD PRINT-OBJECT (SSL-STREAM T)
; (FORMAT STREAM "for ~A" (CL+SSL::SSL-STREAM-SOCKET CL+SSL::OBJECT))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING BOOLEAN STREAM), not a STREAM.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING BOOLEAN STREAM), not a (MEMBER T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING BOOLEAN STREAM), not a NULL.
; in: DEFMETHOD CLOSE (SSL-STREAM)
; (COMPLEMENT #'MINUSP)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (FUNCALL (CL+SSL::SSL-CLOSE-CALLBACK STREAM))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (COMPLEMENT #'MINUSP)
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; in: DEFMETHOD STREAM-LISTEN (SSL-STREAM)
; (> CL+SSL::N 0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL+SSL::BUFFER-ELT CL+SSL::BUF 0)
; --> BLOCK ELT
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CL+SSL::NONBLOCKING-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ
; CL+SSL::HANDLE CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; (> CL+SSL::N 0)
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; (CL+SSL::NONBLOCKING-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ
; CL+SSL::HANDLE CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFMETHOD STREAM-READ-BYTE (SSL-STREAM)
; (CL+SSL::BUFFER-ELT CL+SSL::BUF 0)
; --> BLOCK ELT
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR 1)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFMETHOD STREAM-READ-SEQUENCE (SSL-STREAM T T T)
; (PLUSP LENGTH)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL * 17592186044415)
; (SINGLE-FLOAT * 1.7592186e13)
; (DOUBLE-FLOAT *
; 1.7592186044415d13)), not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (RATIONAL * 17592186044415)
; (SINGLE-FLOAT * 1.7592186e13)
; (DOUBLE-FLOAT *
; 1.7592186044415d13)), not a DOUBLE-FLOAT.
; (< CL+SSL::START CL+SSL::END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (SETF (ELT CL+SSL::SEQ CL+SSL::START) (CL+SSL::SSL-STREAM-PEEKED-BYTE STREAM))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL+SSL::S/B-REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START :END1
; (+ CL+SSL::START CL+SSL::READ-BYTES))
; --> BLOCK
; ==>
; (REPLACE CL+SSL::SEQ CL+SSL::BUF :START1 CL+SSL::START1 :END1 CL+SSL::END1
; :START2 CL+SSL::START2 :END2 CL+SSL::END2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY * (*))
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The second argument is a (OR SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*))
; (SIMPLE-ARRAY SINGLE-FLOAT (*))
; (SIMPLE-ARRAY DOUBLE-FLOAT (*))
; SIMPLE-BIT-VECTOR
; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY FIXNUM (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*))
; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT)
; (*))), not a (SIMPLE-ARRAY CHARACTER (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The second argument is a (OR SIMPLE-BASE-STRING (SIMPLE-ARRAY CHARACTER (*))
; (SIMPLE-ARRAY SINGLE-FLOAT (*))
; (SIMPLE-ARRAY DOUBLE-FLOAT (*))
; SIMPLE-BIT-VECTOR
; (SIMPLE-ARRAY (UNSIGNED-BYTE 2) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 4) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 7) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 15) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 31) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 62) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 63) (*))
; (SIMPLE-ARRAY (UNSIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 8) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 16) (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 32) (*))
; (SIMPLE-ARRAY FIXNUM (*))
; (SIMPLE-ARRAY (SIGNED-BYTE 64) (*))
; (SIMPLE-ARRAY (COMPLEX SINGLE-FLOAT) (*))
; (SIMPLE-ARRAY (COMPLEX DOUBLE-FLOAT)
; (*))), not a SIMPLE-BASE-STRING.
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY CHARACTER
; (*))
; &REST T).
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR LENGTH)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (< CL+SSL::START CL+SSL::END)
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a T, not a DOUBLE-FLOAT.
; etc.
; (- CL+SSL::END CL+SSL::START)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (MIN (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a REAL, not a FIXNUM.
; (PLUSP LENGTH)
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a (OR (RATIONAL * 17592186044415)
; (SINGLE-FLOAT * 1.7592186e13)
; (DOUBLE-FLOAT * 1.7592186044415d13)), not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (OR (RATIONAL * 17592186044415)
; (SINGLE-FLOAT * 1.7592186e13)
; (DOUBLE-FLOAT * 1.7592186044415d13)), not a FIXNUM.
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR LENGTH)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; (+ CL+SSL::START CL+SSL::READ-BYTES)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The second argument is a (REAL (0)), not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a (REAL (0)), not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (INCF CL+SSL::START CL+SSL::READ-BYTES)
; --> THE
; ==>
; (+ CL+SSL::READ-BYTES CL+SSL::START)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (RATIONAL (0)), not a FIXNUM.
; The result is a (VALUES (RATIONAL (0)) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a (RATIONAL (0)), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (RATIONAL (0)) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-READ CL+SSL::HANDLE
; CL+SSL::PTR LENGTH)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFMETHOD STREAM-WRITE-BYTE (SSL-STREAM T)
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; ==>
; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM7))
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (SETF (CL+SSL::BUFFER-ELT CL+SSL::BUF
; (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; CL+SSL::B)
; --> BLOCK SETF
; ==>
; (SB-KERNEL:%SETELT CL+SSL::BUF CL+SSL::INDEX CL+SSL::VAL)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; --> BLOCK
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; ==>
; (+ 1 (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM7))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; in: DEFMETHOD STREAM-WRITE-SEQUENCE (SSL-STREAM T T T)
; (>
; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START1
; (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM) :START2
; CL+SSL::START :END2 CL+SSL::END)
; ==>
; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1
; :START2 CL+SSL::START2 :END2 CL+SSL::END2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY * (*))
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY CHARACTER
; (*))
; &REST T).
; (CL+SSL::B/S-REPLACE CL+SSL::BUF CL+SSL::SEQ :START2 CL+SSL::START)
; --> BLOCK
; ==>
; (REPLACE CL+SSL::BUF CL+SSL::SEQ :START1 CL+SSL::START1 :END1 CL+SSL::END1
; :START2 CL+SSL::START2 :END2 CL+SSL::END2)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY * (*))
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The second argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES SIMPLE-BASE-STRING
; &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY CHARACTER (*)).
; The second argument is a SEQUENCE, not a SIMPLE-BASE-STRING.
; The result is a (VALUES SEQUENCE &OPTIONAL), not a (VALUES
; (SIMPLE-ARRAY CHARACTER
; (*))
; &REST T).
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF)
; --> BLOCK
; ==>
; (LENGTH CL+SSL::BUF)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (- CL+SSL::END CL+SSL::START)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (>
; (+ (- CL+SSL::END CL+SSL::START) (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM))
; (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a NUMBER, not a FIXNUM.
; (- CL+SSL::END CL+SSL::START)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (> (- CL+SSL::END CL+SSL::START) (CL+SSL::BUFFER-LENGTH CL+SSL::BUF))
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a NUMBER, not a FIXNUM.
; (INCF (CL+SSL::SSL-STREAM-OUTPUT-POINTER STREAM)
; (- CL+SSL::END CL+SSL::START))
; ==>
; (+ (- CL+SSL::END CL+SSL::START)
; (CL+SSL::SSL-STREAM-OUTPUT-POINTER #:STREAM32))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a (INTEGER -17592186044415 17592186044415), not a (UNSIGNED-BYTE
; 64).
; The second argument is a T, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFMETHOD STREAM-FORCE-OUTPUT (SSL-STREAM)
; (PLUSP CL+SSL::FILL-PTR)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-WRITE CL+SSL::HANDLE
; CL+SSL::PTR CL+SSL::FILL-PTR)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (PLUSP CL+SSL::FILL-PTR)
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; (CL+SSL::ENSURE-SSL-FUNCALL STREAM #'PLUSP #'CL+SSL::SSL-WRITE CL+SSL::HANDLE
; CL+SSL::PTR CL+SSL::FILL-PTR)
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET WHEN IF FUNCALL
; ==>
; 1
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a T, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; etc.
; --> BLOCK LOOP BLOCK TAGBODY PROGN LET LET APPLY
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFUN X509-CERTIFICATE-NAMES
; (CFFI-SYS:WITH-FOREIGN-POINTER (CL+SSL::BUF 1024)
; (LET ((CL+SSL::ISSUER-NAME
; (CL+SSL::X509-GET-ISSUER-NAME CL+SSL::X509-CERTIFICATE))
; (CL+SSL::SUBJECT-NAME
; (CL+SSL::X509-GET-SUBJECT-NAME CL+SSL::X509-CERTIFICATE)))
; (VALUES
; (UNLESS (CFFI-SYS:NULL-POINTER-P CL+SSL::ISSUER-NAME)
; (CL+SSL::X509-NAME-ONELINE CL+SSL::ISSUER-NAME CL+SSL::BUF 1024)
; (CFFI:FOREIGN-STRING-TO-LISP CL+SSL::BUF))
; (UNLESS (CFFI-SYS:NULL-POINTER-P CL+SSL::SUBJECT-NAME)
; (CL+SSL::X509-NAME-ONELINE CL+SSL::SUBJECT-NAME CL+SSL::BUF 1024)
; (CFFI:FOREIGN-STRING-TO-LISP CL+SSL::BUF)))))
; --> SYMBOL-MACROLET SYMBOL-MACROLET LET LET
; --> SB-ALIEN-INTERNALS:MAKE-LOCAL-ALIEN
; ==>
; 1
;
; note: doing SAP to pointer coercion (cost 20), for:
; the first result of ALLOC-ALIEN-STACK-SPACE
; in: DEFUN SSL-LOAD-GLOBAL-VERIFY-LOCATIONS
; (CL+SSL::SSL-CTX-LOAD-VERIFY-LOCATIONS CL+SSL::*SSL-GLOBAL-CONTEXT*
; CL+SSL::CAFILE (CFFI-SYS:NULL-POINTER))
;
; note: doing SAP to pointer coercion (cost 20)
; in: DEFUN MAKE-SSL-CLIENT-STREAM
; (ZEROP (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; (1- CL+SSL::LEN)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; in: DEFUN MAKE-SSL-SERVER-STREAM
; (ZEROP (CL+SSL::SSL-SET-CIPHER-LIST CL+SSL::HANDLE CL+SSL::CIPHER-LIST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
;
; note: unable to open code because: The operands might not be the same type.
; in: DEFUN GET-SELECTED-ALPN-PROTOCOL
; (CL+SSL::SSL-GET0-ALPN-SELECTED
; (CL+SSL::SSL-STREAM-HANDLE CL+SSL::SSL-STREAM) CL+SSL::PTR CL+SSL::LEN)
;
; note: doing SAP to pointer coercion (cost 20)
;
; note: doing SAP to pointer coercion (cost 20)
; (CFFI:FOREIGN-STRING-TO-LISP (CFFI:MEM-REF CL+SSL::PTR :POINTER) :COUNT
; (CFFI:MEM-REF CL+SSL::LEN :INT))
;
; note: doing SAP to pointer coercion (cost 20)
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/streams-tmpZX2WN8N4.fasl
; compilation finished in 0:00:00.213
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/x509.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/x509-tmpOU81XRV0.fasl
; compilation finished in 0:00:00.053
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/random.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/random-tmpY2ML9CFA.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/context.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/context-tmpX2JYJDQE.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/verify-hostname.lisp" (written 04 MAR 2024 04:55:03 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-plus-ssl/src/verify-hostname-tmpOPCILR65.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/drakma/packages.lisp" (written 04 MAR 2024 04:55:18 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/packages-tmpRV9F8A9A.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/drakma/specials.lisp" (written 04 MAR 2024 04:55:18 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/specials-tmpK2ZAJT4I.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/drakma/conditions.lisp" (written 04 MAR 2024 04:55:18 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/conditions-tmpUX5S4ADN.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/drakma/util.lisp" (written 04 MAR 2024 04:55:18 AM):
; file: /home/erel/Documents/nyxt/_build/drakma/util.lisp
; in: DEFUN USER-AGENT-STRING
; (OR (LISP-IMPLEMENTATION-TYPE) "Common Lisp")
; --> IF
; ==>
; "Common Lisp"
;
; note: deleting unreachable code
; (OR (LISP-IMPLEMENTATION-VERSION) "")
; --> IF
; ==>
; ""
;
; note: deleting unreachable code
; in: DEFUN INTERPRET-AS-TIME-ZONE
; (CL-PPCRE:REGISTER-GROUPS-BIND (DRAKMA::SIGN DRAKMA::HOURS DRAKMA::MINUTES)
; ("(?:GMT|)\\s*([+-]?)(\\d\\d):?(\\d\\d)" STRING)
; (*
; (IF (EQUAL DRAKMA::SIGN "-")
; 1
; -1)
; (+ (PARSE-INTEGER DRAKMA::HOURS) (/ (PARSE-INTEGER DRAKMA::MINUTES) 60))))
; --> MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION WHEN IF LET* LET IF
; ==>
; NIL
;
; caught STYLE-WARNING:
; This is not a STRING:
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
;
; caught STYLE-WARNING:
; This is not a STRING:
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/util-tmp10401X32.fasl
; compilation finished in 0:00:00.063
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/drakma/read.lisp" (written 04 MAR 2024 04:55:18 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/read-tmpZ7CBRM0G.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/drakma/cookies.lisp" (written 04 MAR 2024 04:55:18 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/cookies-tmp9OZEQ0G2.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/erel/Documents/nyxt/_build/drakma/encoding.lisp" (written 04 MAR 2024 04:55:18 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/encoding-tmpB2JTL1W9.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/drakma/request.lisp" (written 04 MAR 2024 04:55:18 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/drakma/request-tmpP3BI68WQ.fasl
; compilation finished in 0:00:00.160
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/package.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/package-tmpQDARA81Z.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/split-sequence.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/split-sequence-tmpYEMMM7SE.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/with-unique-names.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/with-unique-names-tmp73HU0RPK.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/once-only.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/once-only-tmpIO5N7K88.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/extremum.lisp" (written 04 MAR 2024 04:55:07 AM):
; file: /home/erel/Documents/nyxt/_build/cl-utilities/extremum.lisp
; in: DEFUN COMPARATOR
; (FUNCALL CL-UTILITIES::TEST (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::A)
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::B))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST is not known to be a function
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::A)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::B)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; in: DEFUN EXTREMUM
; (DEFUN CL-UTILITIES:EXTREMUM
; (SEQUENCE CL-UTILITIES::PREDICATE
; &KEY (CL-UTILITIES::KEY #'IDENTITY) (CL-UTILITIES::START 0)
; CL-UTILITIES::END)
; #<(SIMPLE-ARRAY CHARACTER
; (225)) Returns the element of SEQUENCE that would appear first if the
; sequence were ordered according to SORT using PREDICATE and KEY using
; an unstable sorting algorithm. See http://www.cliki.net/EXTREMUM fo... {100B4DC3CF}>
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START
; CL-UTILITIES::END)
; (REDUCE
; (CL-UTILITIES::COMPARATOR CL-UTILITIES::PREDICATE CL-UTILITIES::KEY)
; SEQUENCE :START CL-UTILITIES::START :END CL-UTILITIES::END)))
; ==>
; (SB-IMPL::%DEFUN 'CL-UTILITIES:EXTREMUM
; (SB-INT:NAMED-LAMBDA CL-UTILITIES:EXTREMUM
; (SEQUENCE CL-UTILITIES::PREDICATE &KEY
; (CL-UTILITIES::KEY #'IDENTITY) (CL-UTILITIES::START 0)
; CL-UTILITIES::END)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; #<(SIMPLE-ARRAY CHARACTER
; (225)) Returns the element of SEQUENCE that would appear first if the
; sequence were ordered according to SORT using PREDICATE and KEY using
; an unstable sorting algorithm. See http://www.cliki.net/EXTREMUM fo... {100B4DC3CF}>
; (BLOCK CL-UTILITIES:EXTREMUM
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE
; CL-UTILITIES::START
; CL-UTILITIES::END)
; (REDUCE # SEQUENCE :START CL-UTILITIES::START :END
; CL-UTILITIES::END)))))
;
; caught STYLE-WARNING:
; Call to CL-UTILITIES::ZERO-LENGTH-P could not be inlined because its source
; code was not saved. A global INLINE or SB-EXT:MAYBE-INLINE proclamation must be
; in effect to save function definitions for inlining.
; in: DEFUN EXTREMUM-FASTKEY
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::X)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; (FUNCALL CL-UTILITIES::PREDICATE CL-UTILITIES::X-KEY
; CL-UTILITIES::SMALLEST-KEY)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; PREDICATE is not known to be a function
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START
; CL-UTILITIES::END)
; (LET* ((CL-UTILITIES::SMALLEST (ELT SEQUENCE 0))
; (CL-UTILITIES::SMALLEST-KEY
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST))
; (CL-UTILITIES::CURRENT-INDEX 0)
; (CL-UTILITIES::REAL-END (OR CL-UTILITIES::END #)))
; (DECLARE
; (TYPE (INTEGER 0) CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START)
; (FIXNUM CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START))
; (MAP NIL
; #'(LAMBDA (CL-UTILITIES::X)
; (WHEN # #)
; (INCF CL-UTILITIES::CURRENT-INDEX))
; SEQUENCE)
; CL-UTILITIES::SMALLEST))
; --> IF OR LET IF >= IF >= OR LET IF
; ==>
; (LENGTH #:SEQUENCE1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> IF OR LET IF >= IF
; ==>
; (>= #:START2 (OR #:END3 (LENGTH #:SEQUENCE1)))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (ELT SEQUENCE 0)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; KEY is not known to be a function
; (CL-UTILITIES::WITH-CHECK-LENGTH (SEQUENCE CL-UTILITIES::START
; CL-UTILITIES::END)
; (LET* ((CL-UTILITIES::SMALLEST (ELT SEQUENCE 0))
; (CL-UTILITIES::SMALLEST-KEY
; (FUNCALL CL-UTILITIES::KEY CL-UTILITIES::SMALLEST))
; (CL-UTILITIES::CURRENT-INDEX 0)
; (CL-UTILITIES::REAL-END (OR CL-UTILITIES::END #)))
; (DECLARE
; (TYPE (INTEGER 0) CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START)
; (FIXNUM CL-UTILITIES::CURRENT-INDEX CL-UTILITIES::REAL-END
; CL-UTILITIES::START))
; (MAP NIL
; #'(LAMBDA (CL-UTILITIES::X)
; (WHEN # #)
; (INCF CL-UTILITIES::CURRENT-INDEX))
; SEQUENCE)
; CL-UTILITIES::SMALLEST))
; --> IF OR LET IF >= IF
; ==>
; (>= #:START2 (OR #:END3 (LENGTH #:SEQUENCE1)))
;
; note: forced to do full call
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a DOUBLE-FLOAT.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/extremum-tmpCM21U60Z.fasl
; compilation finished in 0:00:00.116
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/read-delimited.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/read-delimited-tmp9DT7SEFG.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/expt-mod.lisp" (written 04 MAR 2024 04:55:07 AM):
; file: /home/erel/Documents/nyxt/_build/cl-utilities/expt-mod.lisp
; in: DEFUN EXPT-MOD
; (EXPT CL-UTILITIES::N CL-UTILITIES::EXPONENT)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a INTEGER.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES SINGLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a INTEGER.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES DOUBLE-FLOAT &REST T).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a (OR RATIONAL (COMPLEX RATIONAL)).
; The second argument is a NUMBER, not a INTEGER.
; (MOD (EXPT CL-UTILITIES::N CL-UTILITIES::EXPONENT) CL-UTILITIES::MODULUS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a (OR SINGLE-FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a (OR FLOAT INTEGER).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; The second argument is a REAL, not a INTEGER.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/expt-mod-tmp8065ESJT.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/compose.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/compose-tmp7S8Z6FGF.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/collecting.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/collecting-tmpSIT3QPKP.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/rotate-byte.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/rotate-byte-tmpE0PA0714.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/cl-utilities/copy-array.lisp" (written 04 MAR 2024 04:55:07 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-utilities/copy-array-tmpJRWHHVG0.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/port.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/port-tmp4WZVROCX.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/uri.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/uri-tmpA0I3UKX8.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/error.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/error-tmp267Y2N80.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/util.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/util-tmpOUPE5FSJ.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/encode.lisp" (written 04 MAR 2024 04:55:59 AM):
; file: /home/erel/Documents/nyxt/_build/quri/src/encode.lisp
; in: DEFUN URL-ENCODE
; (SETF (AREF QURI.ENCODE::RES QURI.ENCODE::I) #\+)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (SETF (AREF QURI.ENCODE::RES QURI.ENCODE::I) (CODE-CHAR BYTE))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (SETF (AREF QURI.ENCODE::RES QURI.ENCODE::I) #\%)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/encode-tmpIGHCU6ZA.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/decode.lisp" (written 04 MAR 2024 04:55:59 AM):
; file: /home/erel/Documents/nyxt/_build/quri/src/decode.lisp
; in: DEFUN URL-DECODE
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::PARSING
; (COND ((CHAR= CHAR #\%) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR #\+) (QURI.DECODE::WRITE-TO-BUFFER 32)
; (QURI.UTIL:REDO))
; (T (QURI.DECODE::WRITE-TO-BUFFER #) (QURI.UTIL:REDO))))
; (QURI.DECODE::PARSING-ENCODED-PART
; (SETQ QURI.DECODE::PARSING-ENCODED-PART CHAR) (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-ENCODED-PART-SECOND
; (HANDLER-BIND ((QURI.ERROR:URL-DECODING-ERROR #))
; (QURI.DECODE::WRITE-TO-BUFFER (+ # #)))
; (SETQ QURI.DECODE::PARSING-ENCODED-PART NIL)
; (QURI.UTIL:GOTO QURI.DECODE::PARSING))
; (:EOF
; (WHEN QURI.DECODE::PARSING-ENCODED-PART
; (ERROR 'QURI.ERROR:URL-DECODING-ERROR))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:GONEXT)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; (- QURI.DECODE::END QURI.DECODE::START)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::PARSING
; (COND ((CHAR= CHAR #\%) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR #\+) (QURI.DECODE::WRITE-TO-BUFFER 32)
; (QURI.UTIL:REDO))
; (T (QURI.DECODE::WRITE-TO-BUFFER #) (QURI.UTIL:REDO))))
; (QURI.DECODE::PARSING-ENCODED-PART
; (SETQ QURI.DECODE::PARSING-ENCODED-PART CHAR) (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-ENCODED-PART-SECOND
; (HANDLER-BIND ((QURI.ERROR:URL-DECODING-ERROR #))
; (QURI.DECODE::WRITE-TO-BUFFER (+ # #)))
; (SETQ QURI.DECODE::PARSING-ENCODED-PART NIL)
; (QURI.UTIL:GOTO QURI.DECODE::PARSING))
; (:EOF
; (WHEN QURI.DECODE::PARSING-ENCODED-PART
; (ERROR 'QURI.ERROR:URL-DECODING-ERROR))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF =
; ==>
; 1
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; (QURI.UTIL:REDO)
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; (QURI.UTIL:GONEXT)
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; --> LOCALLY INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; --> LOCALLY WHEN IF =
; ==>
; 1
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; (INCF QURI.DECODE::I)
; --> THE
; ==>
; (+ 1 QURI.DECODE::I)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING)
; --> INCF SETQ THE
; ==>
; (+ 1 QURI.DECODE::P)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; --> WHEN IF =
; ==>
; 1
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; in: DEFUN URL-DECODE-PARAMS
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::START (SETQ QURI.DECODE::START-MARK QURI.DECODE::P)
; (IF QURI.DECODE::LENIENT
; (COND (# # #) (# #))
; (WHEN (OR # #) (ERROR 'QURI.ERROR:URI-MALFORMED-URLENCODED-STRING)))
; (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-FIELD
; (COND ((CHAR= CHAR #\=) (SETQ #) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (QURI.DECODE::PARSING-VALUE
; (COND ((CHAR= CHAR #\=) (UNLESS QURI.DECODE::LENIENT #))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (:EOF
; (COND (QURI.DECODE::=-MARK (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P))
; (QURI.DECODE::START-MARK
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY LOCALLY SETQ THE IF
; --> AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:GOTO QURI.DECODE::PARSING-VALUE)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:GONEXT)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:GOTO QURI.DECODE::START)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:GOTO QURI.DECODE::START)
; --> SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:REDO)
; --> LOCALLY SETQ THE IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; --> LOCALLY SETQ THE IF AREF
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (OR STRING
; (SIMPLE-ARRAY (UNSIGNED-BYTE 8)
; (*))), not a SIMPLE-ARRAY.
; (QURI.UTIL:WITH-ARRAY-PARSING (CHAR QURI.DECODE::P QURI.DECODE::DATA
; QURI.DECODE::START QURI.DECODE::END
; (AND (NOT (STRINGP QURI.DECODE::DATA))
; #'CODE-CHAR))
; (QURI.DECODE::START (SETQ QURI.DECODE::START-MARK QURI.DECODE::P)
; (IF QURI.DECODE::LENIENT
; (COND (# # #) (# #))
; (WHEN (OR # #) (ERROR 'QURI.ERROR:URI-MALFORMED-URLENCODED-STRING)))
; (QURI.UTIL:GONEXT))
; (QURI.DECODE::PARSING-FIELD
; (COND ((CHAR= CHAR #\=) (SETQ #) (QURI.UTIL:GONEXT))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (QURI.DECODE::PARSING-VALUE
; (COND ((CHAR= CHAR #\=) (UNLESS QURI.DECODE::LENIENT #))
; ((CHAR= CHAR QURI.DECODE::DELIMITER)
; (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P)
; (QURI.UTIL:GOTO QURI.DECODE::START)))
; (QURI.UTIL:REDO))
; (:EOF
; (COND (QURI.DECODE::=-MARK (QURI.DECODE::COLLECT-PAIR QURI.DECODE::P))
; (QURI.DECODE::START-MARK
; (QURI.DECODE::COLLECT-FIELD QURI.DECODE::P)))))
; --> QURI.UTIL::%WITH-ARRAY-PARSING LET MACROLET TAGBODY WHEN IF =
; ==>
; 1
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/decode-tmpBO0TUGLK.fasl
; compilation finished in 0:00:00.063
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/uri/ftp.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/uri/ftp-tmpIIXPIQNW.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/uri/http.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/uri/http-tmpOHM494YR.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/uri/ldap.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/uri/ldap-tmpOVFB07XF.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/uri/file.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/uri/file-tmpG6VFGMYP.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/etld.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/etld-tmp4QIPRMOF.fasl
; compilation finished in 0:00:03.720
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/domain.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/domain-tmpGW0QV22K.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/parser.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/parser-tmp2K9J0HSR.fasl
; compilation finished in 0:00:00.333
; compiling file "/home/erel/Documents/nyxt/_build/quri/src/quri.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/quri/src/quri-tmpP44I4E0Y.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/erel/Documents/nyxt/_build/cl-gopher/cl-gopher-package.lisp" (written 04 MAR 2024 04:55:00 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-gopher/cl-gopher-package-tmp63LQ7EX6.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/cl-gopher/cl-gopher.lisp" (written 04 MAR 2024 04:55:00 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-gopher/cl-gopher-tmp86F1A8FB.fasl
; compilation finished in 0:00:00.173
; compiling file "/home/erel/Documents/nyxt/_build/cl-gopher/client.lisp" (written 04 MAR 2024 04:55:00 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-gopher/client-tmpH7D4HL98.fasl
; compilation finished in 0:00:00.033
;;; Computing Hangul syllable names
; compiling file "/home/erel/Documents/nyxt/_build/moptilities/dev/moptilities.lisp" (written 04 MAR 2024 04:55:43 AM):
; file: /home/erel/Documents/nyxt/_build/moptilities/dev/moptilities.lisp
; in: DEFUN CARE-WHEN-FINALIZED
; (FINALIZE METABANG.MOPTILITIES::OBJECT 'METABANG.MOPTILITIES:WHEN-FINALIZED)
;
; caught STYLE-WARNING:
; The function WHEN-FINALIZED is called by SB-EXT:FINALIZE with zero arguments, but wants exactly one.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/moptilities/dev/moptilities-tmpCDM7YXYI.fasl
; compilation finished in 0:00:00.113
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/usocket/server.lisp" (written 04 MAR 2024 04:56:24 AM):
; file: /home/erel/Documents/nyxt/_build/usocket/server.lisp
; in: DEFUN SOCKET-SERVER
; (DEFUN USOCKET:SOCKET-SERVER
; (USOCKET::HOST USOCKET::PORT FUNCTION
; &OPTIONAL USOCKET::ARGUMENTS
; &KEY USOCKET::IN-NEW-THREAD (USOCKET::PROTOCOL :STREAM)
; (USOCKET::TIMEOUT 1)
; (USOCKET::MAX-BUFFER-SIZE USOCKET:+MAX-DATAGRAM-PACKET-SIZE+)
; USOCKET::ELEMENT-TYPE (USOCKET::REUSE-ADDRESS T) ...)
; (LET* ((USOCKET::REAL-HOST (OR USOCKET::HOST USOCKET:*WILDCARD-HOST*))
; (USOCKET:SOCKET (ECASE USOCKET::PROTOCOL # #)))
; (LABELS ((USOCKET::REAL-CALL #
; #))
; (IF USOCKET::IN-NEW-THREAD
; (VALUES # USOCKET:SOCKET)
; (PROGN # #)))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA USOCKET:SOCKET-SERVER
; (USOCKET::HOST USOCKET::PORT FUNCTION &OPTIONAL USOCKET::ARGUMENTS &KEY
; USOCKET::IN-NEW-THREAD (USOCKET::PROTOCOL :STREAM)
; (USOCKET::TIMEOUT 1)
; (USOCKET::MAX-BUFFER-SIZE USOCKET:+MAX-DATAGRAM-PACKET-SIZE+)
; USOCKET::ELEMENT-TYPE (USOCKET::REUSE-ADDRESS T) ...)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK USOCKET:SOCKET-SERVER
; (LET* ((USOCKET::REAL-HOST #) (USOCKET:SOCKET #))
; (LABELS (#)
; (IF USOCKET::IN-NEW-THREAD
; #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (HOST PORT FUNCTION &OPTIONAL
; ARGUMENTS &KEY IN-NEW-THREAD
; (PROTOCOL STREAM)
; (TIMEOUT 1)
; (MAX-BUFFER-SIZE
; +MAX-DATAGRAM-PACKET-SIZE+)
; ELEMENT-TYPE
; (REUSE-ADDRESS T)
; MULTI-THREADING NAME)
; in: DEFUN UDP-EVENT-LOOP
; (DEFUN USOCKET::UDP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION
; &OPTIONAL USOCKET::ARGUMENTS
; &KEY USOCKET::TIMEOUT USOCKET::MAX-BUFFER-SIZE)
; (LET ((USOCKET::BUFFER
; (MAKE-ARRAY USOCKET::MAX-BUFFER-SIZE :ELEMENT-TYPE '#
; :INITIAL-ELEMENT 0))
; (USOCKET::SOCKETS (LIST USOCKET:SOCKET)))
; (UNWIND-PROTECT (LOOP DO (MULTIPLE-VALUE-BIND # # # #))
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA USOCKET::UDP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION &OPTIONAL USOCKET::ARGUMENTS &KEY
; USOCKET::TIMEOUT USOCKET::MAX-BUFFER-SIZE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK USOCKET::UDP-EVENT-LOOP
; (LET ((USOCKET::BUFFER #) (USOCKET::SOCKETS #))
; (UNWIND-PROTECT (LOOP DO #)
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (SOCKET FUNCTION &OPTIONAL
; ARGUMENTS &KEY
; TIMEOUT
; MAX-BUFFER-SIZE)
; in: DEFUN TCP-EVENT-LOOP
; (DEFUN USOCKET::TCP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION
; &OPTIONAL USOCKET::ARGUMENTS
; &KEY USOCKET::ELEMENT-TYPE USOCKET::MULTI-THREADING)
; (LET ((USOCKET::REAL-FUNCTION #'(LAMBDA # #)))
; (UNWIND-PROTECT (LOOP DO (BLOCK CONTINUE #))
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA USOCKET::TCP-EVENT-LOOP
; (USOCKET:SOCKET FUNCTION &OPTIONAL USOCKET::ARGUMENTS &KEY
; USOCKET::ELEMENT-TYPE USOCKET::MULTI-THREADING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; (BLOCK USOCKET::TCP-EVENT-LOOP
; (LET ((USOCKET::REAL-FUNCTION #'#))
; (UNWIND-PROTECT (LOOP DO #)
; (USOCKET:SOCKET-CLOSE USOCKET:SOCKET)
; (VALUES)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (SOCKET FUNCTION &OPTIONAL
; ARGUMENTS &KEY
; ELEMENT-TYPE
; MULTI-THREADING)
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/usocket/server-tmpLM57P5P.fasl
; compilation finished in 0:00:00.023
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/s-sysdeps/src/package.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/s-sysdeps/src/package-tmpZE69DN33.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/s-sysdeps/src/sysdeps.lisp" (written 04 MAR 2024 04:55:59 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/s-sysdeps/src/sysdeps-tmpG8099TO3.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/package.lisp" (written 04 MAR 2024 04:55:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/package-tmpTASQCYAW.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/serialization/serialization.lisp" (written 04 MAR 2024 04:55:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/serialization/serialization-tmp35U57IV6.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/serialization/xml.lisp" (written 04 MAR 2024 04:55:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/serialization/xml-tmpTZOONXRW.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/serialization/sexp.lisp" (written 04 MAR 2024 04:55:04 AM):
; file: /home/erel/Documents/nyxt/_build/cl-prevalence/src/serialization/sexp.lisp
; in: DEFGENERIC SERIALIZE-SEXP-INTERNAL
; (CLOSER-MOP:DEFGENERIC S-SERIALIZATION::SERIALIZE-SEXP-INTERNAL
; (S-SERIALIZATION::OBJECT STREAM S-SERIALIZATION::SERIALIZATION-STATE)
; (:DOCUMENTATION
; "Write a serialized version of object to stream using s-expressions"))
; ==>
; (EVAL-WHEN (:COMPILE-TOPLEVEL)
; (DEFGENERIC S-SERIALIZATION::SERIALIZE-SEXP-INTERNAL
; (S-SERIALIZATION::OBJECT STREAM S-SERIALIZATION::SERIALIZATION-STATE)
; (:DOCUMENTATION
; "Write a serialized version of object to stream using s-expressions")))
;
; caught STYLE-WARNING:
; redefining S-SERIALIZATION::SERIALIZE-SEXP-INTERNAL in DEFGENERIC
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/serialization/sexp-tmpWN0UKDSV.fasl
; compilation finished in 0:00:00.050
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/prevalence.lisp" (written 04 MAR 2024 04:55:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/prevalence-tmpBF3HHBTQ.fasl
; compilation finished in 0:00:00.069
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/managed-prevalence.lisp" (written 04 MAR 2024 04:55:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/managed-prevalence-tmpGYUNPZCY.fasl
; compilation finished in 0:00:00.110
WARNING: redefining CL-PREVALENCE:GET-ID in DEFGENERIC
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/master-slave.lisp" (written 04 MAR 2024 04:55:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/master-slave-tmpD68Q8WCA.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/cl-prevalence/src/blob.lisp" (written 04 MAR 2024 04:55:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-prevalence/src/blob-tmp7MK9KM9C.fasl
; compilation finished in 0:00:00.020
WARNING: redefining CL-PREVALENCE:GET-NAME in DEFGENERIC
WARNING: redefining (COMMON-LISP:SETF CL-PREVALENCE:GET-NAME) in DEFGENERIC
WARNING: redefining CL-PREVALENCE:GET-SIZE in DEFGENERIC
WARNING: redefining CL-PREVALENCE:GET-MIME-TYPE in DEFGENERIC
WARNING: redefining (COMMON-LISP:SETF CL-PREVALENCE:GET-MIME-TYPE) in DEFGENERIC
WARNING: redefining CL-PREVALENCE:GET-KEYWORDS in DEFGENERIC
WARNING: redefining (COMMON-LISP:SETF CL-PREVALENCE:GET-KEYWORDS) in DEFGENERIC
WARNING: redefining DISSECT:STACK in DEFUN
WARNING: redefining DISSECT:RESTARTS in DEFUN
WARNING: redefining DISSECT::STACK-CAPPER in DEFUN
WARNING: redefining DISSECT::STACK-TRUNCATOR in DEFUN
WARNING: redefining DISSECT:WITH-TRUNCATED-STACK in DEFMACRO
; compiling file "/home/erel/Documents/nyxt/_build/proc-parse/src/proc-parse.lisp" (written 04 MAR 2024 04:55:58 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/proc-parse/src/proc-parse-tmpJJ71X849.fasl
; compilation finished in 0:00:00.156
; compiling file "/home/erel/Documents/nyxt/_build/xsubseq/src/xsubseq.lisp" (written 04 MAR 2024 04:56:24 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/xsubseq/src/xsubseq-tmp1VUK6SR2.fasl
; compilation finished in 0:00:00.110
; compiling file "/home/erel/Documents/nyxt/_build/smart-buffer/src/smart-buffer.lisp" (written 04 MAR 2024 04:56:04 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/smart-buffer/src/smart-buffer-tmpR2FIHSUG.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/fast-http/src/http.lisp" (written 04 MAR 2024 04:55:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/fast-http/src/http-tmp8PYELRKX.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/fast-http/src/error.lisp" (written 04 MAR 2024 04:55:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/fast-http/src/error-tmpEHTOKYT0.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/fast-http/src/byte-vector.lisp" (written 04 MAR 2024 04:55:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/fast-http/src/byte-vector-tmpS6U1VHI9.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/fast-http/src/util.lisp" (written 04 MAR 2024 04:55:23 AM):
; file: /home/erel/Documents/nyxt/_build/fast-http/src/util.lisp
; in: DEFUN NUMBER-STRING-P
; (RETURN-FROM FAST-HTTP.UTIL:NUMBER-STRING-P NIL)
;
; note: deleting unreachable code
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/fast-http/src/util-tmpVTFK6ZJW.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/erel/Documents/nyxt/_build/fast-http/src/parser.lisp" (written 04 MAR 2024 04:55:23 AM):
; file: /home/erel/Documents/nyxt/_build/fast-http/src/parser.lisp
; in: DEFUN-SPEEDY PARSE-HEADER-VALUE
; (PROC-PARSE:WITH-OCTETS-PARSING (FAST-HTTP.PARSER::DATA :START
; FAST-HTTP.PARSER::START :END
; FAST-HTTP.PARSER::END)
; (PROC-PARSE:SKIP* (NOT #\Return))
; (PROC-PARSE:ADVANCE)
; (PROC-PARSE:SKIP #\Newline)
; (WHEN FAST-HTTP.PARSER::FIELD-START
; (FAST-HTTP.PARSER::CALLBACK-DATA :HEADER-FIELD FAST-HTTP.HTTP:HTTP
; FAST-HTTP.PARSER:CALLBACKS
; FAST-HTTP.PARSER::DATA
; FAST-HTTP.PARSER::FIELD-START
; FAST-HTTP.PARSER::FIELD-END))
; (FAST-HTTP.PARSER::CALLBACK-DATA :HEADER-VALUE FAST-HTTP.HTTP:HTTP
; FAST-HTTP.PARSER:CALLBACKS
; FAST-HTTP.PARSER::DATA
; FAST-HTTP.PARSER::START
; (- (PROC-PARSE:POS) 2))
; (PROC-PARSE:POS))
; --> LET OR LET IF
; ==>
; (LENGTH #:DATA5)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN-SPEEDY PARSE-HEADER-VALUE-CONTENT-LENGTH
; (* 10 FAST-HTTP.PARSER::CONTENT-LENGTH)
;
; note: forced to do GENERIC-* (cost 30)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 10) (INTEGER * -10) (INTEGER 0 0))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 10) (INTEGER * -10) (INTEGER 0 0))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; (+ (* 10 FAST-HTTP.PARSER::CONTENT-LENGTH)
; (FAST-HTTP.BYTE-VECTOR:DIGIT-BYTE-CHAR-TO-INTEGER (PROC-PARSE:CURRENT)))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 10) (INTEGER * -10) (INTEGER 0 0)), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a (OR (INTEGER 10) (INTEGER * -10) (INTEGER 0 0)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN-SPEEDY PARSE-HEADER-LINE
; (<= FAST-HTTP.PARSER::END FAST-HTTP.PARSER::START)
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; in: DEFUN-SPEEDY READ-BODY-DATA
; (- FAST-HTTP.PARSER::END FAST-HTTP.PARSER::START)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (<= (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP)
; FAST-HTTP.PARSER::READABLE-COUNT)
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; (+ FAST-HTTP.PARSER::START
; (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (DECF (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP)
; FAST-HTTP.PARSER::READABLE-COUNT)
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The second argument is a INTEGER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN-SPEEDY PARSE-CHUNKED-BODY
; (= FAST-HTTP.PARSER::START FAST-HTTP.PARSER::END)
;
; note: forced to do %EQL/INTEGER2 (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a INTEGER, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; (* 16 (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP))
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 16) (INTEGER * -16) (INTEGER 0 0))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline ASH (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 16) (INTEGER * -16) (INTEGER 0 0))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; (+ (* 16 (FAST-HTTP.HTTP:HTTP-CONTENT-LENGTH FAST-HTTP.HTTP:HTTP))
; FAST-HTTP.PARSER::UNHEX-VAL)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 16) (INTEGER * -16) (INTEGER 0 0)), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a (OR (INTEGER 16) (INTEGER * -16) (INTEGER 0 0)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/fast-http/src/parser-tmp75WVSJEW.fasl
; compilation finished in 0:00:13.786
; compiling file "/home/erel/Documents/nyxt/_build/fast-http/src/multipart-parser.lisp" (written 04 MAR 2024 04:55:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/fast-http/src/multipart-parser-tmpBU5UM3S4.fasl
; compilation finished in 0:00:00.133
; compiling file "/home/erel/Documents/nyxt/_build/fast-http/src/fast-http.lisp" (written 04 MAR 2024 04:55:23 AM):
; file: /home/erel/Documents/nyxt/_build/fast-http/src/fast-http.lisp
; in: DEFUN-CAREFUL MAKE-PARSER
; (STRING= FAST-HTTP::PARSING-HEADER-FIELD "set-cookie")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR NULL (SIMPLE-ARRAY CHARACTER (*))), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR NULL
; (SIMPLE-ARRAY CHARACTER
; (*))), not a (SIMPLE-ARRAY CHARACTER (*)).
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/fast-http/src/fast-http-tmpOBHVA3CD.fasl
; compilation finished in 0:00:00.116
; compiling file "/home/erel/Documents/nyxt/_build/cl-cookie/src/cl-cookie.lisp" (written 04 MAR 2024 04:54:55 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-cookie/src/cl-cookie-tmpJ6ELVFLF.fasl
; compilation finished in 0:00:13.403
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/encoding.lisp" (written 04 MAR 2024 04:55:14 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/encoding-tmpULDB0RG.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/connection-cache.lisp" (written 04 MAR 2024 04:55:14 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/connection-cache-tmpUTZ0UUTE.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/decoding-stream.lisp" (written 04 MAR 2024 04:55:14 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/decoding-stream-tmpOOSRA8PZ.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/keep-alive-stream.lisp" (written 04 MAR 2024 04:55:14 AM):
; file: /home/erel/Documents/nyxt/_build/dexador/src/keep-alive-stream.lisp
; in: DEFMETHOD STREAM-READ-SEQUENCE (KEEP-ALIVE-STREAM T T T)
; (MIN (- DEXADOR.KEEP-ALIVE-STREAM::END DEXADOR.KEEP-ALIVE-STREAM::START)
; (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; The second argument is a REAL, not a RATIONAL.
; (<= (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM) 0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (- DEXADOR.KEEP-ALIVE-STREAM::END DEXADOR.KEEP-ALIVE-STREAM::START)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (MIN (- DEXADOR.KEEP-ALIVE-STREAM::END DEXADOR.KEEP-ALIVE-STREAM::START)
; (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM))
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a SINGLE-FLOAT.
; unable to do inline float comparison (cost 3) because:
; The first argument is a T, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a DOUBLE-FLOAT.
; etc.
; (+ DEXADOR.KEEP-ALIVE-STREAM::START DEXADOR.KEEP-ALIVE-STREAM::TO-READ)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a NUMBER, not a FIXNUM.
; The second argument is a REAL, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline float arithmetic (cost 2) because:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a REAL, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (DECF (DEXADOR.KEEP-ALIVE-STREAM::KEEP-ALIVE-STREAM-END STREAM)
; (- DEXADOR.KEEP-ALIVE-STREAM::N DEXADOR.KEEP-ALIVE-STREAM::START))
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a T, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a T, not a (UNSIGNED-BYTE 64).
; The second argument is a (INTEGER -17592186044415 17592186044415), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/keep-alive-stream-tmpDMIL0RVK.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/util.lisp" (written 04 MAR 2024 04:55:14 AM):
; file: /home/erel/Documents/nyxt/_build/dexador/src/util.lisp
; in: DEFUN-SPEEDY %ASCII-STRING-TO-OCTETS
; (LENGTH STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (AREF STRING DEXADOR.UTIL::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-STRING.
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a VECTOR, not a SIMPLE-ARRAY.
; in: DEFPARAMETER *DEFAULT-USER-AGENT*
; (OR (LISP-IMPLEMENTATION-TYPE) "Common Lisp")
; --> IF
; ==>
; "Common Lisp"
;
; note: deleting unreachable code
; (OR (LISP-IMPLEMENTATION-VERSION) "")
; --> IF
; ==>
; ""
;
; note: deleting unreachable code
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/util-tmp8MR9IMIO.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/body.lisp" (written 04 MAR 2024 04:55:14 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/body-tmpJQDKAVAY.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/error.lisp" (written 04 MAR 2024 04:55:14 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/error-tmp3I8CEEQY.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/backend/usocket.lisp" (written 04 MAR 2024 04:55:14 AM):
; file: /home/erel/Documents/nyxt/_build/dexador/src/backend/usocket.lisp
; in: DEFUN-SPEEDY MULTIPART-CONTENT-LENGTH
; (+ 2 DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH 2
; (LENGTH
; (THE SIMPLE-STRING
; (DEXADOR.BACKEND.USOCKET::CONTENT-DISPOSITION
; DEXADOR.BACKEND.USOCKET::KEY DEXADOR.BACKEND.USOCKET::VAL)))
; (IF (PATHNAMEP DEXADOR.BACKEND.USOCKET::VAL)
; (+ 14 (LENGTH (THE SIMPLE-STRING #)) 2)
; 0)
; 2
; (TYPECASE DEXADOR.BACKEND.USOCKET::VAL
; (PATHNAME
; (WITH-OPEN-FILE
; (DEXADOR.BACKEND.USOCKET::IN DEXADOR.BACKEND.USOCKET::VAL)
; (FILE-LENGTH DEXADOR.BACKEND.USOCKET::IN)))
; (STRING (LENGTH (THE DEXADOR.UTIL:OCTETS #)))
; (SYMBOL (LENGTH (THE DEXADOR.UTIL:OCTETS #)))
; (OTHERWISE (LENGTH (PRINC-TO-STRING DEXADOR.BACKEND.USOCKET::VAL))))
; 2)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The second argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 8) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The second argument is a UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 8) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (LOOP DEXADOR.BACKEND.USOCKET::FOR (DEXADOR.BACKEND.USOCKET::KEY
; . DEXADOR.BACKEND.USOCKET::VAL) DEXADOR.BACKEND.USOCKET::IN DEXADOR.BACKEND.USOCKET::CONTENT
; DEXADOR.BACKEND.USOCKET::SUM (+ 2
; DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH
; 2
; (LENGTH
; (THE SIMPLE-STRING
; (DEXADOR.BACKEND.USOCKET::CONTENT-DISPOSITION
; DEXADOR.BACKEND.USOCKET::KEY
; DEXADOR.BACKEND.USOCKET::VAL)))
; (IF (PATHNAMEP
; DEXADOR.BACKEND.USOCKET::VAL)
; (+ 14 (LENGTH #) 2)
; 0)
; 2
; (TYPECASE DEXADOR.BACKEND.USOCKET::VAL
; (PATHNAME (WITH-OPEN-FILE # #))
; (STRING (LENGTH #))
; (SYMBOL (LENGTH #))
; (OTHERWISE (LENGTH #)))
; 2))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a FIXNUM.
; The second argument is a (INTEGER 8), not a FIXNUM.
; The result is a (VALUES (INTEGER 8) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a (UNSIGNED-BYTE
; 64).
; The second argument is a (INTEGER 8), not a (UNSIGNED-BYTE 64).
; The result is a (VALUES (INTEGER 8) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+
; (LOOP DEXADOR.BACKEND.USOCKET::FOR (DEXADOR.BACKEND.USOCKET::KEY
; . DEXADOR.BACKEND.USOCKET::VAL) DEXADOR.BACKEND.USOCKET::IN DEXADOR.BACKEND.USOCKET::CONTENT
; DEXADOR.BACKEND.USOCKET::SUM (+ 2
; DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH
; 2 (LENGTH (THE SIMPLE-STRING #))
; (IF (PATHNAMEP
; DEXADOR.BACKEND.USOCKET::VAL)
; (+ 14 # 2)
; 0)
; 2
; (TYPECASE DEXADOR.BACKEND.USOCKET::VAL
; (PATHNAME #)
; (STRING #)
; (SYMBOL #)
; (OTHERWISE #))
; 2))
; 2 DEXADOR.BACKEND.USOCKET::BOUNDARY-LENGTH 2 2)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 14) (INTEGER 6 6)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 0 0) (INTEGER 8)), not a FIXNUM.
; The result is a (VALUES (OR (INTEGER 14) (INTEGER 6 6)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR (INTEGER 14) (INTEGER 6 6)), not a FIXNUM.
; The result is a (VALUES (INTEGER 6) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline (unsigned-byte 64) arithmetic (cost 4) because:
; The first argument is a (OR (INTEGER 14) (INTEGER 6 6)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES (INTEGER 6) &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; in: DEFUN-CAREFUL REQUEST
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "socks5")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.0)
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code RATIONAL to FLOAT comparison
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; (FIND :CONTENT-TYPE DEXADOR.BACKEND.USOCKET::HEADERS :KEY #'CAR :TEST
; #'STRING-EQUAL)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (STRING= DEXADOR.BACKEND.USOCKET::CONTENT-TYPE "multipart/form-data")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= DEXADOR.BACKEND.USOCKET::CONTENT-TYPE
; "application/x-www-form-urlencoded")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.0)
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code RATIONAL to FLOAT comparison
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.1)
;
; note: unable to open code because: The operands might not be the same type.
;
; note: unable to
; open-code RATIONAL to FLOAT comparison
; due to type uncertainty:
; The first argument is a REAL, not a RATIONAL.
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "http")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= (QURI.URI:URI-SCHEME DEXADOR.BACKEND.USOCKET::LOCATION-URI)
; (QURI.URI:URI-SCHEME DEXADOR.BACKEND.USOCKET::URI))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= (QURI.URI:URI-HOST DEXADOR.BACKEND.USOCKET::LOCATION-URI)
; (QURI.URI:URI-HOST DEXADOR.BACKEND.USOCKET::URI))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
; The second argument is a (OR STRING SYMBOL CHARACTER), not a STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
; The second argument is a (OR STRING SYMBOL
; CHARACTER), not a SIMPLE-BASE-STRING.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; The second argument is a (OR STRING SYMBOL CHARACTER), not a (SIMPLE-ARRAY
; CHARACTER (*)).
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "http")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
; (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "https")
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a STRING, not a (SIMPLE-ARRAY CHARACTER (*)).
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.0)
;
; note: forced to do GENERIC-= (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: forced to do GENERIC-= (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; (= (THE REAL DEXADOR.BACKEND.USOCKET::VERSION) 1.1)
;
; note: forced to do GENERIC-= (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a REAL, not a SINGLE-FLOAT.
; (DOTIMES (DEXADOR.BACKEND.USOCKET::I DEXADOR.BACKEND.USOCKET::CONTENT-LENGTH)
; (LOOP DEXADOR.BACKEND.USOCKET::UNTIL (READ-BYTE
; DEXADOR.BACKEND.USOCKET::BODY NIL
; NIL)))
; --> BLOCK LET TAGBODY UNLESS IF >=
; ==>
; 1
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a INTEGER, not a FIXNUM.
; --> BLOCK LET TAGBODY PSETQ PROGN SETQ THE 1+
; ==>
; 1
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; (EQL (QURI.URI:URI-PORT DEXADOR.BACKEND.USOCKET::LOCATION-URI)
; (QURI.URI:URI-PORT DEXADOR.BACKEND.USOCKET::URI))
;
; note: forced to do IF-EQL (cost 15)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline float comparison (cost 4) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; etc.
; (EQL
; (DEXADOR.BACKEND.USOCKET::USOCKET-WRAPPED-STREAM-STREAM
; DEXADOR.BACKEND.USOCKET::ORIGINAL-USER-SUPPLIED-STREAM)
; STREAM)
;
; note: forced to do IF-EQL (cost 15)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline float comparison (cost 4) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; etc.
; (EQL DEXADOR.BACKEND.USOCKET::ORIGINAL-USER-SUPPLIED-STREAM STREAM)
;
; note: forced to do IF-EQL (cost 15)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (AND (NOT USOCKET-WRAPPED-STREAM) (NOT NULL)), not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline float comparison (cost 4) because:
; The first argument is a (AND (NOT USOCKET-WRAPPED-STREAM) (NOT NULL)), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; etc.
; (DEXADOR.BACKEND.USOCKET::MAKE-NEW-CONNECTION (DEXADOR.BACKEND.USOCKET::URI)
; (RESTART-CASE (LET* ((DEXADOR.BACKEND.USOCKET::CON-URI #)
; (DEXADOR.BACKEND.USOCKET::CONNECTION #)
; (STREAM #)
; (DEXADOR.BACKEND.USOCKET::SCHEME #))
; (DECLARE (TYPE STRING DEXADOR.BACKEND.USOCKET::SCHEME))
; (WHEN DEXADOR.BACKEND.USOCKET::READ-TIMEOUT (SETF #))
; (WHEN
; (DEXADOR.BACKEND.USOCKET::SOCKS5-PROXY-P
; DEXADOR.BACKEND.USOCKET::PROXY-URI)
; (DEXADOR.BACKEND.USOCKET::ENSURE-SOCKS5-CONNECTED STREAM
; STREAM DEXADOR.BACKEND.USOCKET::URI METHOD))
; (IF (STRING= DEXADOR.BACKEND.USOCKET::SCHEME "https")
; (DEXADOR.BACKEND.USOCKET::MAKE-SSL-STREAM #
; DEXADOR.BACKEND.USOCKET::CA-PATH
; DEXADOR.BACKEND.USOCKET::SSL-KEY-FILE
; DEXADOR.BACKEND.USOCKET::SSL-CERT-FILE
; DEXADOR.BACKEND.USOCKET::SSL-KEY-PASSWORD #
; DEXADOR.BACKEND.USOCKET::INSECURE)
; STREAM))
; (DEXADOR.BACKEND.USOCKET:RETRY-REQUEST NIL :REPORT
; "Retry the same request."
; (RETURN-FROM DEXADOR.BACKEND.USOCKET:REQUEST
; (APPLY #'DEXADOR.BACKEND.USOCKET:REQUEST DEXADOR.BACKEND.USOCKET::URI
; :USE-CONNECTION-POOL NIL DEXADOR.BACKEND.USOCKET::ARGS)))))
;
; note: Return type not fixed values, so can't use known return convention:
; *
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/backend/usocket-tmpA3RHFLWZ.fasl
; compilation finished in 0:00:00.263
; compiling file "/home/erel/Documents/nyxt/_build/dexador/src/dexador.lisp" (written 04 MAR 2024 04:55:14 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/dexador/src/dexador-tmpYZIB7VXO.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/erel/Documents/nyxt/_build/nclasses/source/package.lisp" (written 04 MAR 2024 04:55:45 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nclasses/source/package-tmpR8PK79V8.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/nclasses/source/duplicates.lisp" (written 04 MAR 2024 04:55:45 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nclasses/source/duplicates-tmpN1ZVB1HZ.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/nclasses/source/defclass-star.lisp" (written 04 MAR 2024 04:55:45 AM):
; file: /home/erel/Documents/nyxt/_build/nclasses/source/defclass-star.lisp
; in: DEFUN SLOT-NAME-PACKAGE
; (CASE NCLASSES::*ACCESSOR-NAME-PACKAGE*
; (:SLOT-NAME (SYMBOL-PACKAGE NCLASSES::NAME))
; (:DEFAULT *PACKAGE*)
; (T *PACKAGE*))
; --> COND IF IF THE
; ==>
; *PACKAGE*
;
; note: deleting unreachable code
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nclasses/source/defclass-star-tmpZGRRPISB.fasl
; compilation finished in 0:00:00.093
; compiling file "/home/erel/Documents/nyxt/_build/history-tree/package.lisp" (written 04 MAR 2024 04:55:28 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/history-tree/package-tmpFNKDE5XP.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/history-tree/history-tree.lisp" (written 04 MAR 2024 04:55:28 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/history-tree/history-tree-tmpRJTU435C.fasl
; compilation finished in 0:00:00.183
WARNING: No definition for LFP-SPAWN-SETUID
WARNING: No definition for LFP-SPAWN-SETGID
WARNING:
redefining CONSUME-ITEM (#
#) in DEFMETHOD
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/util/package.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/util/package-tmpI9WG87JK.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/util/config.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/util/config-tmpYDE6I9E6.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/util/misc.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/util/misc-tmp319UV2V8.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/util/defmacro.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/util/defmacro-tmpLYQINFYS.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/util/defun.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/util/defun-tmpGA31XWNO.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/util/defslots.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/util/defslots-tmp5HT23M6C.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/util/defpair.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/util/defpair-tmpA60KLDKY.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/thread-util.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/thread-util-tmpD801X3GJ.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/raw-queue.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/raw-queue-tmpGOW1GC70.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cons-queue.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/lparallel/src/cons-queue.lisp
; in: DEFUN %TRY-POP-CONS-QUEUE/NO-LOCK/TIMEOUT
; (PLUSP LPARALLEL.THREAD-UTIL::TIME-REMAINING)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; in: DEFUN TRY-POP-CONS-QUEUE
; (PLUSP LPARALLEL.CONS-QUEUE::TIMEOUT)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; in: DEFUN TRY-POP-CONS-QUEUE/NO-LOCK
; (PLUSP LPARALLEL.CONS-QUEUE::TIMEOUT)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cons-queue-tmpPQ1X28TL.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/vector-queue.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/lparallel/src/vector-queue.lisp
; in: DEFUN %TRY-POP-VECTOR-QUEUE/NO-LOCK/TIMEOUT
; (PLUSP LPARALLEL.THREAD-UTIL::TIME-REMAINING)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; in: DEFUN TRY-POP-VECTOR-QUEUE
; (PLUSP LPARALLEL.VECTOR-QUEUE::TIMEOUT)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; in: DEFUN TRY-POP-VECTOR-QUEUE/NO-LOCK
; (PLUSP LPARALLEL.VECTOR-QUEUE::TIMEOUT)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a REAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a REAL, not a FIXNUM.
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/vector-queue-tmpE92ECU7O.fasl
; compilation finished in 0:00:00.060
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/queue.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/queue-tmp8S0II570.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/counter.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/counter-tmpJE88A12F.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/spin-queue/package.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/spin-queue/package-tmpA5FNLPLT.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/spin-queue/cas-spin-queue.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/spin-queue/cas-spin-queue-tmpHKCV9TP8.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/package.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/package-tmpZ18MA7XE.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/specials.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/specials-tmp6LQJ9T0C.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/handling.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/handling-tmpTX7OA81T.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/classes.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/classes-tmpWOTC3PB7.fasl
; compilation finished in 0:00:00.096
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/stealing-scheduler.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/lparallel/src/kernel/stealing-scheduler.lisp
; in: DEFUN/TYPE MAYBE-WAKE-A-WORKER
; (INCF LPARALLEL.KERNEL::NOTIFY-COUNT)
; ==>
; (+ 1
; (SB-KERNEL:THE* ((INTEGER 0) :DERIVE-TYPE-ONLY T)
; (SB-KERNEL:%INSTANCE-REF
; (THE LPARALLEL.KERNEL::SCHEDULER #:OBJ) 4)))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; in: DEFUN/TYPE NEXT-TASK
; (DECF LPARALLEL.KERNEL::NOTIFY-COUNT)
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/stealing-scheduler-tmpHQE95SAC.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/kill.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/kill-tmpO87FP9NR.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/core.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/core-tmpP6A3E92I.fasl
; compilation finished in 0:00:00.079
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel/timeout.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel/timeout-tmpUSHT8RIL.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/kernel-util.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/lparallel/src/kernel-util.lisp
; in: DEFUN RECEIVE-RESULTS
; (LPARALLEL.UTIL:REPEAT COUNT
; (LPARALLEL.KERNEL-UTIL::STEAL-UNTIL-RECEIVE-RESULT LPARALLEL.KERNEL:CHANNEL
; LPARALLEL.KERNEL-UTIL::WORKER LPARALLEL.KERNEL-UTIL::FN))
; --> BLOCK LET CEILING
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT
; LPARALLEL.KERNEL:CHANNEL COUNT)
; (LOCALLY
; (DECLARE (TYPE FUNCTION LPARALLEL.KERNEL-UTIL::FN))
; (FUNCALL LPARALLEL.KERNEL-UTIL::FN LPARALLEL.KERNEL-UTIL::RESULT)))
; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET CEILING
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT
; LPARALLEL.KERNEL:CHANNEL COUNT)
; (DECLARE (IGNORE LPARALLEL.KERNEL-UTIL::RESULT)))
; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET CEILING
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
;
; note: unable to
; fold division by 1
; due to type uncertainty:
; The first argument is a REAL, not a INTEGER.
; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT
; LPARALLEL.KERNEL:CHANNEL COUNT)
; (LOCALLY
; (DECLARE (TYPE FUNCTION LPARALLEL.KERNEL-UTIL::FN))
; (FUNCALL LPARALLEL.KERNEL-UTIL::FN LPARALLEL.KERNEL-UTIL::RESULT)))
; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF <=
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 8)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF DECF SETQ THE
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; (LPARALLEL.KERNEL:DO-FAST-RECEIVES (LPARALLEL.KERNEL-UTIL::RESULT
; LPARALLEL.KERNEL:CHANNEL COUNT)
; (DECLARE (IGNORE LPARALLEL.KERNEL-UTIL::RESULT)))
; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF <=
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 8)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> LPARALLEL.UTIL:REPEAT LOOP BLOCK LET TAGBODY IF DECF SETQ THE
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; (LPARALLEL.UTIL:REPEAT COUNT
; (LPARALLEL.KERNEL-UTIL::STEAL-UNTIL-RECEIVE-RESULT LPARALLEL.KERNEL:CHANNEL
; LPARALLEL.KERNEL-UTIL::WORKER LPARALLEL.KERNEL-UTIL::FN))
; --> BLOCK LET TAGBODY IF <=
; ==>
; 1
;
; note: forced to do >-INTEGER-FIXNUM (cost 8)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a INTEGER, not a FIXNUM.
; --> BLOCK LET TAGBODY IF DECF SETQ THE SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER 1), not a FIXNUM.
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/kernel-util-tmp7YCPD44Y.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/promise.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/promise-tmpQXR7SNXD.fasl
; compilation finished in 0:00:00.096
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/ptree.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/lparallel/src/ptree.lisp
; in: DEFUN/TYPE COMPUTE-PTREE
; (DECF LPARALLEL.PTREE::PENDING)
; --> SB-IMPL::XSUBTRACT BLOCK
; ==>
; (- SB-IMPL::B SB-IMPL::A)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; (INCF LPARALLEL.PTREE::PENDING)
; ==>
; (+ 1
; (SB-KERNEL:THE* (INTEGER :DERIVE-TYPE-ONLY T)
; (SB-KERNEL:%INSTANCE-REF (THE LPARALLEL.PTREE:PTREE #:OBJ)
; 2)))
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a INTEGER, not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/ptree-tmp6FLI1OC3.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/slet.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/slet-tmpWBK8JTS9.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/defpun.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/defpun-tmpUVEUD2ZN.fasl
; compilation finished in 0:00:00.113
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/package.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/package-tmpOWNJOEU.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/util.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/lparallel/src/cognate/util.lisp
; in: DEFUN ITEM-PREDICATE
; (EQL LPARALLEL.COGNATE::ITEM LPARALLEL.COGNATE::X)
;
; note: forced to do IF-EQL (cost 15)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a T, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; unable to do inline float comparison (cost 4) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/util-tmpVT5BMTA5.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/option.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/option-tmpN3CFVWZF.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/subdivide.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/subdivide-tmpNK27C0R1.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pandor.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pandor-tmp3BPE71HR.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/plet.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/plet-tmp758YUXMV.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pmap.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/lparallel/src/cognate/pmap.lisp
; in: DEFUN MAP-ITERATE
; (DEFUN LPARALLEL.COGNATE::MAP-ITERATE
; (MAP LPARALLEL.COGNATE::SIZE LPARALLEL.COGNATE::FN
; LPARALLEL.COGNATE::SEQS)
; "A variation of (map nil ...)/mapc/mapl with size constrained.
; Without a result to delineate sublist boundaries, we must enforce them
; manually."
; (CHECK-TYPE LPARALLEL.COGNATE::SIZE (INTEGER 0))
; (LET ((LPARALLEL.COGNATE::FN
; (ALEXANDRIA:ENSURE-FUNCTION LPARALLEL.COGNATE::FN))
; (LPARALLEL.UTIL:INDEX 0))
; (APPLY MAP
; (LAMBDA (&REST LPARALLEL.COGNATE::ARGS)
; (DECLARE #)
; (DECLARE #)
; (WHEN # #)
; (APPLY LPARALLEL.COGNATE::FN LPARALLEL.COGNATE::ARGS)
; (INCF LPARALLEL.UTIL:INDEX))
; LPARALLEL.COGNATE::SEQS)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; ==>
; (BLOCK LPARALLEL.COGNATE::MAP-ITERATE
; (CHECK-TYPE LPARALLEL.COGNATE::SIZE (INTEGER 0))
; (LET ((LPARALLEL.COGNATE::FN
; (ALEXANDRIA:ENSURE-FUNCTION LPARALLEL.COGNATE::FN))
; (LPARALLEL.UTIL:INDEX 0))
; (APPLY MAP
; (LAMBDA (&REST LPARALLEL.COGNATE::ARGS)
; (DECLARE #)
; (DECLARE #)
; (WHEN # #)
; (APPLY LPARALLEL.COGNATE::FN LPARALLEL.COGNATE::ARGS)
; (INCF LPARALLEL.UTIL:INDEX))
; LPARALLEL.COGNATE::SEQS)))
;
; note: Allocating a value-cell at runtime for checking possibly out of extent exit via
; (RETURN-FROM MAP-ITERATE NIL). Use GO/RETURN-FROM with SAFETY 0, or declare the
; exit function DYNAMIC-EXTENT to avoid.
; (EQL LPARALLEL.UTIL:INDEX LPARALLEL.COGNATE::SIZE)
;
; note: forced to do %EQL/INTEGER (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The second argument is a T, not a FIXNUM.
; (INCF LPARALLEL.UTIL:INDEX)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a UNSIGNED-BYTE, not a FIXNUM.
; The result is a (VALUES (INTEGER 1) &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pmap-tmpGMQXK1HK.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pmap-open-coded.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pmap-open-coded-tmp49Q238TW.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pdotimes.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pdotimes-tmpMXPMJ5KG.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pquantifier.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pquantifier-tmpB69313KI.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/preduce.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/preduce-tmp9ZT99EEA.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/premove.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/premove-tmpW045U8V2.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pfind.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pfind-tmp6XOIRI3N.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pcount.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/pcount-tmp9ZHTLHSG.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/cognate/psort.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/cognate/psort-tmpRW73Q691.fasl
; compilation finished in 0:00:00.070
; compiling file "/home/erel/Documents/nyxt/_build/lparallel/src/package.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/lparallel/src/package-tmp4TM0ME1F.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/impl-package.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/impl-package-tmpU2IL9N4.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/defs.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/defs-tmpOPW41KDL.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/naming.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/naming-tmpIPVWLON2.fasl
; compilation finished in 0:00:00.063
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/naming-sbcl.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/naming-sbcl-tmpO0LCOIDS.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/hierarchy-base.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/hierarchy-base-tmpP264WQ6O.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/hierarchy.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/hierarchy-tmpESC43OCR.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/logger.lisp" (written 04 MAR 2024 04:55:41 AM):
; file: /home/erel/Documents/nyxt/_build/log4cl/src/logger.lisp
; in: DEFUN ADD-APPENDER-INTERNAL
; (DEFUN LOG4CL-IMPL::ADD-APPENDER-INTERNAL
; (LOG4CL-IMPL::LOGGER LOG4CL-IMPL:APPENDER
; &OPTIONAL (LOG4CL-IMPL::ADJUST-P T))
; (DECLARE (TYPE LOG4CL-IMPL::LOGGER LOG4CL-IMPL::LOGGER)
; (TYPE LOG4CL-IMPL:APPENDER LOG4CL-IMPL:APPENDER))
; (LET* ((LOG4CL-IMPL::STATE
; (LOG4CL-IMPL::CURRENT-STATE LOG4CL-IMPL::LOGGER)))
; (UNLESS
; (MEMBER LOG4CL-IMPL:APPENDER
; (LOG4CL-IMPL::LOGGER-STATE-APPENDERS LOG4CL-IMPL::STATE))
; (PUSH LOG4CL-IMPL:APPENDER
; (LOG4CL-IMPL::LOGGER-STATE-APPENDERS LOG4CL-IMPL::STATE))
; (WHEN LOG4CL-IMPL::ADJUST-P
; (LOG4CL-IMPL::ADJUST-LOGGER LOG4CL-IMPL::LOGGER))
; (LOG4CL-IMPL:APPENDER-ADDED LOG4CL-IMPL::LOGGER LOG4CL-IMPL:APPENDER)))
; (VALUES))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION COND IF
; --> SB-C::%FUNCALL MULTIPLE-VALUE-BIND LET PROGN UNLESS IF
; ==>
; (TYPEP #:G19 'LOG4CL-IMPL:APPENDER)
;
; note: can't open-code test of unknown type APPENDER
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION COND IF THE
; --> SB-C::%FUNCALL MULTIPLE-VALUE-BIND LET PROGN UNLESS IF
; ==>
; (TYPEP #:G25 'LOG4CL-IMPL:APPENDER)
;
; note: can't open-code test of unknown type APPENDER
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/logger-tmpWCAM54ZJ.fasl
; compilation finished in 0:00:00.219
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/logging-macros.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/logging-macros-tmpVTMW561L.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/self-logger.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/self-logger-tmpUNNGT9CF.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/appender/layout.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/appender/layout-tmp4L3W83SU.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/appender/simple-layout.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/appender/simple-layout-tmpGE7QNNEE.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/appender/pattern-layout.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/appender/pattern-layout-tmp9B0UZGT4.fasl
; compilation finished in 0:00:00.166
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/appender/appender-base.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/appender/appender-base-tmpAJ5U325P.fasl
; compilation finished in 0:00:00.010
WARNING: redefining LOG4CL-IMPL:APPENDER-ADDED in DEFGENERIC
WARNING: redefining LOG4CL-IMPL:APPENDER-REMOVED in DEFGENERIC
WARNING: redefining LOG4CL-IMPL::PROPERTY-ALIST in DEFGENERIC
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/appender/appender.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/appender/appender-tmpAOF1CYAS.fasl
; compilation finished in 0:00:00.276
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/configurator.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/configurator-tmpIXCQTSHA.fasl
; compilation finished in 0:00:00.363
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/property-parser.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/property-parser-tmp5E6VIEMS.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/property-configurator.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/property-configurator-tmpI0PODGVV.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/watcher.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/watcher-tmp1Z95I17K.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/erel/Documents/nyxt/_build/log4cl/src/package.lisp" (written 04 MAR 2024 04:55:41 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/log4cl/src/package-tmpCFVK1AC1.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/erel/Documents/nyxt/_build/cl-fad/packages.lisp" (written 04 MAR 2024 04:54:57 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-fad/packages-tmpHHRR8E8N.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/cl-fad/fad.lisp" (written 04 MAR 2024 04:54:57 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-fad/fad-tmpWWJ02E3I.fasl
; compilation finished in 0:00:00.056
; compiling file "/home/erel/Documents/nyxt/_build/cl-fad/path.lisp" (written 04 MAR 2024 04:54:57 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-fad/path-tmpONTOHUJ2.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/cl-fad/temporary-files.lisp" (written 04 MAR 2024 04:54:57 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/cl-fad/temporary-files-tmpQT9APWMH.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/package.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/package-tmp6LYQXY0L.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/while.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/while-tmpNKVDR0J1.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/porter-stemmer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/porter-stemmer-tmp6F83SDCV.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/streams.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/streams-tmpEJNPPMJY.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/pipes.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/pipes-tmp31RWPSX2.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/mop.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/mop-tmp1HKLMSTH.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/priority-queue.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/priority-queue-tmpEWG5XJ53.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/strings.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/strings-tmpXHL60MUV.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/tables.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/tables-tmpB7NPDQCW.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/bit-vector.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/bit-vector-tmpGZ70QILE.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/files.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/files-tmpKYD38Q95.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/comparable.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/comparable-tmpV4YQ0HKA.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/parser.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/parser-tmpJXWE1HN2.fasl
; compilation finished in 0:00:00.116
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/util/utilities.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/util/utilities-tmpMNC5LX5B.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/store/api.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/store/api-tmp4RNSVVC1.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/store/directory.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/store/directory-tmpN626KU7B.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/store/index-io.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/store/index-io-tmpOO0K1B0C.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/store/buffered-index-io.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/store/buffered-index-io-tmpVFL7JAFK.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/store/ram-store.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/store/ram-store-tmpU45RTF.fasl
; compilation finished in 0:00:00.059
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/store/fs-store.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/store/fs-store-tmpZTS6G7ND.fasl
; compilation finished in 0:00:00.043
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/document/field.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/document/field-tmp5TNBATEG.fasl
; compilation finished in 0:00:00.050
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/document/document.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/document/document-tmpJL6JXW7Z.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/analysis/token.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/analysis/token-tmp5PQ00DH7.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/analysis/token-stream.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/analysis/token-stream-tmp5R1KP4O2.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/analysis/token-filters.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/analysis/token-filters-tmpXQDKKJYI.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/analysis/tokenizers.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/analysis/tokenizers-tmpGJ3P31TF.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/analysis/standard-tokenizer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/analysis/standard-tokenizer-tmpT2P2LFJI.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/analysis/analyzers.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/analysis/analyzers-tmpKOV75BS9.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/api.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/api-tmpP07HWIXP.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/index-filenames.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/index-filenames-tmpURW0SA3C.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-tmp627QKRZN.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term-info.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-info-tmpK8OFNZFV.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term-buffer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-buffer-tmpRMCY5COB.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/field-infos.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/field-infos-tmp9TN1FOJ6.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term-enum.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-enum-tmpEID7NJG3.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term-doc-enum.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-doc-enum-tmp8CJLVG9R.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term-infos-io.lisp" (written 04 MAR 2024 04:55:43 AM):
; file: /home/erel/Documents/nyxt/_build/montezuma/src/index/term-infos-io.lisp
; in: DEFMETHOD WRITE-TERM (TERM-INFOS-WRITER T)
; (LENGTH (- (LENGTH MONTEZUMA::TERM-TEXT) MONTEZUMA::START))
;
; caught STYLE-WARNING:
; The variable LENGTH is defined but never used.
; in: DEFMETHOD GET-POSITION (TERM-INFOS-READER T)
; (MONTEZUMA::GET-INDEX-OFFSET MONTEZUMA::TERM)
;
; caught STYLE-WARNING:
; The function GET-INDEX-OFFSET is called with one argument, but wants exactly two.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-infos-io-tmpZCJK45JG.fasl
; compilation finished in 0:00:00.046
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/multiple-term-doc-pos-enum.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/multiple-term-doc-pos-enum-tmpQC4TENAZ.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term-vector-offset-info.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-vector-offset-info-tmp4HJFFDY3.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-term-vector.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-term-vector-tmp78H81ZL.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/term-vectors-io.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/term-vectors-io-tmp86K6JU7V.fasl
; compilation finished in 0:00:00.100
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-term-enum.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-term-enum-tmp2L6X9BVQ.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/fields-io.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/fields-io-tmpES5DCUFN.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/compound-file-io.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/compound-file-io-tmpDVKOEP6R.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-merge-info.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-merge-info-tmp4TWTKS75.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-merge-queue.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-merge-queue-tmpXSOQ2I78.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-infos.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-infos-tmpUA03GLW1.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/index-reader.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/index-reader-tmpO0OW34V4.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-reader.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-reader-tmpU8KQLETJ.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/multi-reader.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/multi-reader-tmpLBWGBOTB.fasl
; compilation finished in 0:00:00.113
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/index-writer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/index-writer-tmpRX2XGI9U.fasl
; compilation finished in 0:00:00.080
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/document-writer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/document-writer-tmpT2A3PQL9.fasl
; compilation finished in 0:00:00.090
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-merger.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/segment-merger-tmpOVHYA3BO.fasl
; compilation finished in 0:00:00.083
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/index/index.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/index/index-tmpLT3TYWCE.fasl
; compilation finished in 0:00:00.226
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/api.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/api-tmp3YF2HENI.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/similarity.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/similarity-tmp9EEV8FN4.fasl
; compilation finished in 0:00:00.040
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/boolean-clause.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/boolean-clause-tmpDK25NJJO.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/scorer-tmpNMZ5RT9R.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/score-doc.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/score-doc-tmp8K51P1O1.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/score-doc-comparator.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/score-doc-comparator-tmpXAVJ8WEV.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/filter.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/filter-tmpOZHFIU2N.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/weight.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/weight-tmpJD9SCIW3.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/hit-queue.lisp" (written 04 MAR 2024 04:55:43 AM):
; file: /home/erel/Documents/nyxt/_build/montezuma/src/search/hit-queue.lisp
; in: DEFMETHOD LESS-THAN (FIELD-SORTED-HIT-QUEUE T T)
; (MONTEZUMA::HIT-DOCUMENT-VALUE (MONTEZUMA::HIT MONTEZUMA::VALUE)
; (LET ((MONTEZUMA:FIELD (MONTEZUMA:DOCUMENT-FIELD # MONTEZUMA::VALUE)))
; (AND MONTEZUMA:FIELD (MONTEZUMA:FIELD-DATA MONTEZUMA:FIELD))))
;
; caught STYLE-WARNING:
; The variable HIT is defined but never used.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/hit-queue-tmpICVK4HSI.fasl
; compilation finished in 0:00:00.010
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/query.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/query-tmpA5CK3QHN.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/term-query.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/term-query-tmp5KE6HXAY.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/boolean-query.lisp" (written 04 MAR 2024 04:55:43 AM):
; file: /home/erel/Documents/nyxt/_build/montezuma/src/search/boolean-query.lisp
; in: DEFMETHOD SUM-OF-SQUARED-WEIGHTS (BOOLEAN-WEIGHT)
; (MONTEZUMA::CLAUSE (ELT (MONTEZUMA::CLAUSES MONTEZUMA::QUERY) MONTEZUMA::I))
;
; caught STYLE-WARNING:
; The variable CLAUSE is defined but never used.
; in: DEFMETHOD NORMALIZE-WEIGHT (BOOLEAN-WEIGHT T)
; (MONTEZUMA::CLAUSE (ELT (MONTEZUMA::CLAUSES MONTEZUMA::QUERY) MONTEZUMA::I))
;
; caught STYLE-WARNING:
; The variable CLAUSE is defined but never used.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/boolean-query-tmp5UBS1APN.fasl
; compilation finished in 0:00:00.053
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/term-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/term-scorer-tmpSI9E4AQB.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/disjunction-sum-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/disjunction-sum-scorer-tmpID7X8UGC.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/conjunction-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/conjunction-scorer-tmpFYN8G5D1.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/req-opt-sum-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/req-opt-sum-scorer-tmpG1VNK6NW.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/req-excl-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/req-excl-scorer-tmpV4YWE7CS.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/non-matching-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/non-matching-scorer-tmpC487WU3K.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/boolean-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/boolean-scorer-tmpKMQH3GP.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/filtered-term-enum.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/filtered-term-enum-tmp8N0WO2QA.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/multi-term-query.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/multi-term-query-tmpZ9QI367A.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/wildcard-query.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/wildcard-query-tmpRD10QMAI.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/wildcard-term-enum.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/wildcard-term-enum-tmp2L2R3A8M.fasl
; compilation finished in 0:00:00.019
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/phrase-query.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/phrase-query-tmp1CJ2OZ96.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/range-query.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/range-query-tmpDKS9KGUG.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/match-all-query.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/match-all-query-tmp3E37X9HX.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/top-docs.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/top-docs-tmpXPWOLC8S.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/index-searcher.lisp" (written 04 MAR 2024 04:55:43 AM):
; file: /home/erel/Documents/nyxt/_build/montezuma/src/search/index-searcher.lisp
; in: DEFMETHOD SEARCH (INDEX-SEARCHER T)
; 'MONTEZUMA::SORT
;
; note: can't open-code test of unknown type SORT
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/index-searcher-tmpUSWNVC8E.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/sort-field.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/sort-field-tmp68FKQK8H.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/sort.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/sort-tmpMU3D23G2.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/phrase-positions.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/phrase-positions-tmpP7RRFRW4.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/phrase-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/phrase-scorer-tmp11AFZINB.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/sloppy-phrase-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/sloppy-phrase-scorer-tmpN84Z1F4D.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/search/exact-phrase-scorer.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/search/exact-phrase-scorer-tmpHX0IAQ8A.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/montezuma/src/query-parser/query-parser.lisp" (written 04 MAR 2024 04:55:43 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/montezuma/src/query-parser/query-parser-tmp8MQVZGT.fasl
; compilation finished in 0:00:00.236
; compiling file "/home/erel/Documents/nyxt/_build/introspect-environment/package.lisp" (written 04 MAR 2024 04:55:31 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/introspect-environment/package-tmp88LUAVGW.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/introspect-environment/expander.lisp" (written 04 MAR 2024 04:55:31 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/introspect-environment/expander-tmpM5RP096T.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/introspect-environment/sbcl.lisp" (written 04 MAR 2024 04:55:31 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/introspect-environment/sbcl-tmpRHTB3TH1.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/introspect-environment/doc.lisp" (written 04 MAR 2024 04:55:31 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/introspect-environment/doc-tmp4YJPLPB8.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/type-i/src/package.lisp" (written 04 MAR 2024 04:56:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/type-i/src/package-tmp6202QBVV.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/type-i/src/infer-typep.lisp" (written 04 MAR 2024 04:56:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/type-i/src/infer-typep-tmp8COQHEZO.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/type-i/src/infer-unary.lisp" (written 04 MAR 2024 04:56:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/type-i/src/infer-unary-tmpQYBBS7QC.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/type-i/src/infer-derived.lisp" (written 04 MAR 2024 04:56:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/type-i/src/infer-derived-tmpAMQ7AMSJ.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/type-i/src/infer-constants.lisp" (written 04 MAR 2024 04:56:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/type-i/src/infer-constants-tmpQSC8Z7I4.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/type-i/src/infer-compound.lisp" (written 04 MAR 2024 04:56:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/type-i/src/infer-compound-tmpNGMCS43U.fasl
; compilation finished in 0:00:00.006
; compiling file "/home/erel/Documents/nyxt/_build/type-i/src/infer-numbers.lisp" (written 04 MAR 2024 04:56:23 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/type-i/src/infer-numbers-tmp5EM0MAXI.fasl
; compilation finished in 0:00:00.106
; compiling file "/home/erel/Documents/nyxt/_build/trivia/balland2006/package.lisp" (written 04 MAR 2024 04:56:11 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/trivia/balland2006/package-tmpPO1KM2UM.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/trivia/balland2006/optimizer.lisp" (written 04 MAR 2024 04:56:11 AM):
; file: /home/erel/Documents/nyxt/_build/trivia/balland2006/optimizer.lisp
; in: DEFOPTIMIZER :BALLAND2006
; (ALEXANDRIA:COMPOSE #'LENGTH #'FIRST)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/trivia/balland2006/optimizer-tmp9MJ8K0GA.fasl
; compilation finished in 0:00:00.099
; compiling file "/home/erel/Documents/nyxt/_build/trivia/balland2006/column-swapping.lisp" (written 04 MAR 2024 04:56:11 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/trivia/balland2006/column-swapping-tmpDNAAZUQ1.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/trivial-file-size/package.lisp" (written 04 MAR 2024 04:56:16 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/trivial-file-size/package-tmpSFHGUSI2.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/trivial-file-size/trivial-file-size.lisp" (written 04 MAR 2024 04:56:16 AM):
; file: /home/erel/Documents/nyxt/_build/trivial-file-size/trivial-file-size.lisp
; in: DEFUN FILE-SIZE-IN-OCTETS
; (DEFUN TRIVIAL-FILE-SIZE:FILE-SIZE-IN-OCTETS (TRIVIAL-FILE-SIZE::FILE)
; "Return the size of FILE in octets.
; Whenever possible, get the size from the file's metadata.
;
; Some platforms (e.g. ABCL) may return 0 when the file does not exist."
; (MULTIPLE-VALUE-BIND (TRIVIAL-FILE-SIZE::PATH NAMESTRING)
; (ETYPECASE TRIVIAL-FILE-SIZE::FILE
; (STRING (VALUES # TRIVIAL-FILE-SIZE::FILE))
; (PATHNAME (VALUES TRIVIAL-FILE-SIZE::FILE #)))
; (DECLARE (IGNORABLE TRIVIAL-FILE-SIZE::PATH NAMESTRING))
; (HANDLER-CASE (PROGN (SB-POSIX:STAT-SIZE #)) (ERROR NIL NIL))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA TRIVIAL-FILE-SIZE:FILE-SIZE-IN-OCTETS
; (TRIVIAL-FILE-SIZE::FILE)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Return the size of FILE in octets.
; Whenever possible, get the size from the file's metadata.
;
; Some platforms (e.g. ABCL) may return 0 when the file does not exist."
; (BLOCK TRIVIAL-FILE-SIZE:FILE-SIZE-IN-OCTETS
; (MULTIPLE-VALUE-BIND (TRIVIAL-FILE-SIZE::PATH NAMESTRING)
; (ETYPECASE TRIVIAL-FILE-SIZE::FILE (STRING #) (PATHNAME #))
; (DECLARE (IGNORABLE TRIVIAL-FILE-SIZE::PATH NAMESTRING))
; (HANDLER-CASE (PROGN #) (ERROR NIL NIL)))))
;
; note: Type assertion too complex to check:
; (VALUES &OPTIONAL (OR UNSIGNED-BYTE NULL) &REST T).
; It allows an unknown number of values, consider using
; (VALUES &OPTIONAL (OR UNSIGNED-BYTE NULL)).
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/trivial-file-size/trivial-file-size-tmpJEMJHCAQ.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/trivial-macroexpand-all/package.lisp" (written 04 MAR 2024 04:56:19 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/trivial-macroexpand-all/package-tmpJV5SBQ61.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/trivial-macroexpand-all/trivial-macroexpand-all.lisp" (written 04 MAR 2024 04:56:19 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/trivial-macroexpand-all/trivial-macroexpand-all-tmpFHSB04A0.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/package.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/package-tmpQQZWJZI3.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/portability.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/portability-tmpPHMA69WA.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/macro-tools.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/macro-tools-tmpXFTEJBZU.fasl
; compilation finished in 0:00:00.140
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/types.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/types-tmpXHDS9JD.fasl
; compilation finished in 0:00:00.213
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/iter.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/iter-tmp7DVUZNNP.fasl
; compilation finished in 0:00:00.033
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/threads.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/threads-tmpSLELCKLF.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/defining-types.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/defining-types-tmpRFCZGW36.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/definitions.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/definitions-tmpQPTRRFAI.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/binding.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/binding-tmpVZ9V8GEH.fasl
; compilation finished in 0:00:00.066
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/control-flow.lisp" (written 04 MAR 2024 04:56:01 AM):
; file: /home/erel/Documents/nyxt/_build/serapeum/control-flow.lisp
; in: DEFMACRO NIX
; (DEFMACRO SERAPEUM:NIX (&REST SERAPEUM::PLACES)
; #<(SIMPLE-ARRAY CHARACTER
; (243)) Set PLACES to nil and return the old value(s) of PLACES.
;
; If there is more than one PLACE, return their old values as multiple values.
;
; This may be more efficient than (shiftf place nil), because it o... {100A44998F}>
; `(VALUES
; ,@(LOOP SERAPEUM::FOR SERAPEUM::PLACE SERAPEUM:IN SERAPEUM::PLACES
; SERAPEUM::COLLECT `(SERAPEUM::NIX-1 ,SERAPEUM::PLACE))))
; --> EVAL-WHEN
; ==>
; (SB-C::%DEFMACRO 'SERAPEUM:NIX
; (SB-INT:NAMED-LAMBDA (MACRO-FUNCTION SERAPEUM:NIX)
; (#:EXPR #:ENV)
; #<(SIMPLE-ARRAY CHARACTER
; (243)) Set PLACES to nil and return the old value(s) of PLACES.
;
; If there is more than one PLACE, return their old values as multiple values.
;
; This may be more efficient than (shiftf place nil), because it o... {100A44998F}>
; (DECLARE (SB-C::LAMBDA-LIST (&REST SERAPEUM::PLACES)))
; (DECLARE (IGNORE #:ENV))
; (SB-INT:NAMED-DS-BIND (:MACRO SERAPEUM:NIX . DEFMACRO)
; (&REST SERAPEUM::PLACES)
; (CDR #:EXPR)
; (DECLARE (SB-C::CONSTANT-VALUE SERAPEUM::PLACES))
; (BLOCK SERAPEUM:NIX `(VALUES ,@#))))
; (SB-C:SOURCE-LOCATION))
;
; caught STYLE-WARNING:
; NIX is being redefined as a macro when it was previously assumed to be a function.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/control-flow-tmpI0YDSDVA.fasl
; compilation finished in 0:00:00.339
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/conditions.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/conditions-tmpKLR0OPN5.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/op.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/op-tmpQNILNMER.fasl
; compilation finished in 0:00:00.063
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/functions.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/functions-tmpMAMO3XGR.fasl
; compilation finished in 0:00:00.203
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/trees.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/trees-tmp4CBIDXQU.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/hash-tables.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/hash-tables-tmp4M6Z7O9T.fasl
; compilation finished in 0:00:00.223
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/files.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/files-tmp3RKO0O0S.fasl
; compilation finished in 0:00:00.073
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/symbols.lisp" (written 04 MAR 2024 04:56:01 AM):
; file: /home/erel/Documents/nyxt/_build/serapeum/symbols.lisp
; in: DEFUN FIND-KEYWORD
; (DEFUN SERAPEUM:FIND-KEYWORD (STRING)
; "If STRING has been interned as a keyword, return it.
;
; Like `make-keyword', but preferable in most cases, because it doesn't
; intern a keyword -- which is usually both unnecessary and unwise."
; (IF (KEYWORDP STRING)
; STRING
; (FIND-SYMBOL (STRING STRING) :KEYWORD)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA SERAPEUM:FIND-KEYWORD
; (STRING)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "If STRING has been interned as a keyword, return it.
;
; Like `make-keyword', but preferable in most cases, because it doesn't
; intern a keyword -- which is usually both unnecessary and unwise."
; (BLOCK SERAPEUM:FIND-KEYWORD
; (IF (KEYWORDP STRING)
; STRING
; (FIND-SYMBOL (STRING STRING) :KEYWORD))))
;
; note: Type assertion too complex to check:
; (VALUES &OPTIONAL (OR NULL KEYWORD) &REST T).
; It allows an unknown number of values, consider using
; (VALUES &OPTIONAL (OR NULL KEYWORD)).
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/symbols-tmpJNADND61.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/arrays.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/arrays-tmpKEV7GFR4.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/queue.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/queue-tmp13EJYBWB.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/box.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/box-tmp93YER753.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/numbers.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/numbers-tmpB50UYUD7.fasl
; compilation finished in 0:00:00.153
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/octets.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/octets-tmpXO9X6PIG.fasl
; compilation finished in 0:00:00.146
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/time.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/time-tmpBULZPU0U.fasl
; compilation finished in 0:00:00.113
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/clos.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/clos-tmp7R9QD7N9.fasl
; compilation finished in 0:00:00.086
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/hooks.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/hooks-tmpGP8R3FTA.fasl
; compilation finished in 0:00:00.030
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/fbind.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/fbind-tmp121QKS9N.fasl
; compilation finished in 0:00:00.343
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/static-let.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/static-let-tmp2JF031K4.fasl
; compilation finished in 0:00:00.110
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/reader.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/reader-tmpX1DK061H.fasl
; compilation finished in 0:00:00.010
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/packages.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/packages-tmp4FJCN3GX.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/heap.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/heap-tmpWO4JLIQB.fasl
; compilation finished in 0:00:00.123
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/lists.lisp" (written 04 MAR 2024 04:56:01 AM):
; file: /home/erel/Documents/nyxt/_build/serapeum/lists.lisp
; in: DEFUN STABLE-SET-DIFFERENCE
; (DEFUN SERAPEUM:STABLE-SET-DIFFERENCE
; (SERAPEUM::LIST1 SERAPEUM::LIST2
; &KEY SERAPEUM::KEY SERAPEUM::TEST SERAPEUM::TEST-NOT)
; "Like `set-difference', but preserve the order of LIST1's elements."
; (DECLARE (LIST SERAPEUM::LIST1 SERAPEUM::LIST2))
; (SERAPEUM:WITH-MEMBER-TEST (SERAPEUM::MEM :KEY SERAPEUM::KEY :TEST
; SERAPEUM::TEST :TEST-NOT SERAPEUM::TEST-NOT)
; (IF SERAPEUM::LIST2
; (SERAPEUM:COLLECTING
; (DOLIST # #))
; SERAPEUM::LIST1)))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA SERAPEUM:STABLE-SET-DIFFERENCE
; (SERAPEUM::LIST1 SERAPEUM::LIST2 &KEY SERAPEUM::KEY SERAPEUM::TEST
; SERAPEUM::TEST-NOT)
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; "Like `set-difference', but preserve the order of LIST1's elements."
; (DECLARE (LIST SERAPEUM::LIST1 SERAPEUM::LIST2))
; (BLOCK SERAPEUM:STABLE-SET-DIFFERENCE
; (SERAPEUM:WITH-MEMBER-TEST (SERAPEUM::MEM :KEY SERAPEUM::KEY :TEST
; SERAPEUM::TEST :TEST-NOT SERAPEUM::TEST-NOT)
; (IF SERAPEUM::LIST2
; (SERAPEUM:COLLECTING
; #)
; SERAPEUM::LIST1))))
;
; caught STYLE-WARNING:
; The variable TEST-NOT is defined but never used.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/lists-tmpHBCFHPPX.fasl
; compilation finished in 0:00:00.256
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/sequences.lisp" (written 04 MAR 2024 04:56:01 AM):
; file: /home/erel/Documents/nyxt/_build/serapeum/sequences.lisp
; in: DEFUN CANONICALIZE-TEST
; #'EQL
;
; note: deleting unreachable code
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/sequences-tmp8ZEXUD27.fasl
; compilation finished in 0:00:06.816
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/strings.lisp" (written 04 MAR 2024 04:56:01 AM):
; file: /home/erel/Documents/nyxt/_build/serapeum/strings.lisp
; in: DEFMACRO DO-STRINGS
; (DEFMACRO SERAPEUM::DO-STRINGS
; ((SERAPEUM::S SERAPEUM::MORE?) &BODY SERAPEUM::BODY))
; --> EVAL-WHEN SB-C::%DEFMACRO SB-INT:NAMED-LAMBDA SB-INT:NAMED-DS-BIND
; --> SB-INT:BINDING*
; ==>
; (LET* ((#:G0
; (SB-C::CHECK-DS-LIST/&REST (CDR #:EXPR) 1 1
; '(# # &BODY SERAPEUM::BODY)))
; (#:G1
; (SB-C::CHECK-DS-LIST (POP #:G0) 2 2
; '(# SERAPEUM::S SERAPEUM::MORE?)))
; (SERAPEUM::S (POP #:G1))
; (SERAPEUM::MORE? (POP #:G1))
; (SERAPEUM::BODY #:G0))
; (DECLARE (SB-C::CONSTANT-VALUE SERAPEUM::S SERAPEUM::MORE? SERAPEUM::BODY))
; (BLOCK SERAPEUM::DO-STRINGS))
;
; caught STYLE-WARNING:
; The variable S is defined but never used.
;
; caught STYLE-WARNING:
; The variable MORE? is defined but never used.
;
; caught STYLE-WARNING:
; The variable BODY is defined but never used.
; file: /home/erel/Documents/nyxt/_build/serapeum/strings.lisp
; in: DEFMACRO DO-STRINGS
; (DEFMACRO SERAPEUM::DO-STRINGS
; ((SERAPEUM::S SERAPEUM::MORE?) &BODY SERAPEUM::BODY))
; --> EVAL-WHEN SB-C::%DEFMACRO SB-C::%DEFMACRO SB-INT:NAMED-LAMBDA FUNCTION
; --> SB-INT:NAMED-DS-BIND SB-INT:BINDING*
; ==>
; (LET* ((#:G0
; (SB-C::CHECK-DS-LIST/&REST (CDR #:EXPR) 1 1
; '(# # &BODY SERAPEUM::BODY)))
; (#:G1
; (SB-C::CHECK-DS-LIST (POP #:G0) 2 2
; '(# SERAPEUM::S SERAPEUM::MORE?)))
; (SERAPEUM::S (POP #:G1))
; (SERAPEUM::MORE? (POP #:G1))
; (SERAPEUM::BODY #:G0))
; (DECLARE (SB-C::CONSTANT-VALUE SERAPEUM::S SERAPEUM::MORE? SERAPEUM::BODY))
; (BLOCK SERAPEUM::DO-STRINGS))
;
; caught STYLE-WARNING:
; The variable S is defined but never used.
;
; caught STYLE-WARNING:
; The variable MORE? is defined but never used.
;
; caught STYLE-WARNING:
; The variable BODY is defined but never used.
; in: DEFUN STRING-JOIN
; (SERAPEUM::DO-STRINGS (SERAPEUM::S SERAPEUM::MORE?)
; (ETYPECASE SERAPEUM::S
; (STRING (INCF SERAPEUM::LEN (LENGTH SERAPEUM::S)))
; (CHARACTER (INCF SERAPEUM::LEN 1))
; (SYMBOL (INCF SERAPEUM::LEN (LENGTH #))))
; (SERAPEUM:BOOLEAN-WHEN SERAPEUM::SEPARATOR?
; (WHEN SERAPEUM::MORE? (INCF SERAPEUM::LEN SERAPEUM::SEP-LEN))))
; --> LET MAX
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR VECTOR SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; (SERAPEUM::DO-STRINGS (SERAPEUM::S SERAPEUM::MORE?)
; (SERAPEUM:NLET SERAPEUM::REC
; (SERAPEUM::S)
; (ETYPECASE SERAPEUM::S
; (STRING
; (SERAPEUM:WITH-STRING-DISPATCH NIL
; SERAPEUM::S
; #
; #))
; (CHARACTER (SETF #) (INCF SERAPEUM::START))
; (SYMBOL (SERAPEUM::REC #))))
; (SERAPEUM:BOOLEAN-WHEN SERAPEUM::SEPARATOR?
; (WHEN SERAPEUM::MORE?
; (REPLACE SERAPEUM::RESULT SERAPEUM::SEPARATOR :START1 SERAPEUM::START)
; (INCF SERAPEUM::START SERAPEUM::SEP-LEN))))
; --> LET MAX
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR VECTOR SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; in: DEFINE-COMPILER-MACRO STRING+
; (DEFINE-COMPILER-MACRO SERAPEUM:STRING+
; (&WHOLE SERAPEUM::CALL &ENVIRONMENT SERAPEUM::ENV &REST
; SERAPEUM::ORIG-ARGS)
; (IF (NULL SERAPEUM::ORIG-ARGS)
; ""
; (LET ((SERAPEUM::ARGS #))
; (IF (= # 1)
; (IF #
; `#
; `#)
; (IF #
; SERAPEUM::CALL
; `#)))))
; --> EVAL-WHEN
; ==>
; (SB-C::%DEFINE-COMPILER-MACRO 'SERAPEUM:STRING+
; (SB-INT:NAMED-LAMBDA (COMPILER-MACRO
; SERAPEUM:STRING+)
; (#:EXPR SERAPEUM::ENV &AUX
; (SERAPEUM::CALL #:EXPR))
; (DECLARE
; (SB-C::LAMBDA-LIST
; (&REST SERAPEUM::ORIG-ARGS)))
; (SB-INT:NAMED-DS-BIND (:MACRO
; SERAPEUM:STRING+
; . DEFINE-COMPILER-MACRO)
; (&REST SERAPEUM::ORIG-ARGS)
; (SB-C::COMPILER-MACRO-ARGS #:EXPR)
; (DECLARE
; (SB-C::CONSTANT-VALUE SERAPEUM::ORIG-ARGS)
; (SB-C::NO-COMPILER-MACRO SERAPEUM:STRING+))
; (BLOCK SERAPEUM:STRING+
; (IF #
; ""
; #)))))
;
; caught STYLE-WARNING:
; 1 call to SERAPEUM:STRING+ was compiled before a compiler-macro was defined for
; it. A declaration of NOTINLINE at the call site will eliminate this warning, as
; will defining the compiler-macro before its first potential use.
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/strings-tmp95B25LCL.fasl
; compilation finished in 0:00:00.976
WARNING:
Lisp compilation had style-warnings while
compiling #
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/vectors.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/vectors-tmpAMNCEZSG.fasl
; compilation finished in 0:00:00.103
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/exporting.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/exporting-tmpVQGQLFW2.fasl
; compilation finished in 0:00:00.130
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/vector=.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/vector=-tmpXATIMY4E.fasl
; compilation finished in 0:00:00.170
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/mop.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/mop-tmp3LJ5VTJR.fasl
; compilation finished in 0:00:00.036
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/internal-definitions.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/internal-definitions-tmp8VUWAF03.fasl
; compilation finished in 0:00:00.329
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/tree-case.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/tree-case-tmpJUI0JWVS.fasl
; compilation finished in 0:00:00.046
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/dispatch-case.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/dispatch-case-tmpHNA3KE33.fasl
; compilation finished in 0:00:00.146
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/range.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/range-tmp9QACGPOH.fasl
; compilation finished in 0:00:00.323
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/generalized-arrays.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/generalized-arrays-tmpST69PK2Q.fasl
; compilation finished in 0:00:00.253
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/units.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/units-tmpYAKMHP3C.fasl
; compilation finished in 0:00:00.143
; compiling file "/home/erel/Documents/nyxt/_build/serapeum/contrib/hooks.lisp" (written 04 MAR 2024 04:56:01 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/serapeum/contrib/hooks-tmpT250CJEH.fasl
; compilation finished in 0:00:00.173
; compiling file "/home/erel/Documents/nyxt/_build/nfiles/pathname-helpers.lisp" (written 04 MAR 2024 04:55:46 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nfiles/pathname-helpers-tmpZ5LLIZWU.fasl
; compilation finished in 0:00:00.183
; compiling file "/home/erel/Documents/nyxt/_build/nfiles/package.lisp" (written 04 MAR 2024 04:55:46 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nfiles/package-tmpK87BOA56.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/nfiles/conditions.lisp" (written 04 MAR 2024 04:55:46 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nfiles/conditions-tmpRL4WWIL2.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/nfiles/gpg.lisp" (written 04 MAR 2024 04:55:46 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nfiles/gpg-tmp9PRKYPOC.fasl
; compilation finished in 0:00:00.153
; compiling file "/home/erel/Documents/nyxt/_build/nfiles/nfiles.lisp" (written 04 MAR 2024 04:55:46 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nfiles/nfiles-tmp747V57QS.fasl
; compilation finished in 0:00:00.549
WARNING: redefining JSON::READ-JSON-TOKEN in DEFUN
WARNING: redefining JSON::PEEK-JSON-TOKEN in DEFUN
WARNING:
redefining ENCODE-TO-STRING (#) in DEFMETHOD
; compiling file "/home/erel/Documents/nyxt/_build/nhooks/package.lisp" (written 04 MAR 2024 04:55:46 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nhooks/package-tmpK7KF0QEZ.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/nhooks/nhooks.lisp" (written 04 MAR 2024 04:55:46 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/nhooks/nhooks-tmp7L3QASG.fasl
; compilation finished in 0:00:00.213
WARNING:
The new FTYPE proclamation for NHOOKS:FIND-HANDLER
(FUNCTION ((OR NHOOKS:HANDLER FUNCTION SYMBOL) LIST &OPTIONAL BOOLEAN)
(OR NHOOKS:HANDLER FUNCTION BOOLEAN))
does not match the old FTYPE proclamation
(FUNCTION ((OR NHOOKS:HANDLER FUNCTION SYMBOL) LIST &OPTIONAL BOOLEAN)
(VALUES &OPTIONAL (OR NHOOKS:HANDLER FUNCTION BOOLEAN) &REST T))
WARNING: redefining SERAPEUM:RUN-HOOK in DEFGENERIC
STYLE-WARNING:
The new FTYPE proclamation for FSET::VECTOR-SET-BINARY-SEARCH-LO
(FUNCTION (SIMPLE-VECTOR T) FIXNUM)
does not match the derived return type
(FUNCTION (SIMPLE-VECTOR T)
(VALUES (INTEGER -4611686018427387904 4611686018427387904) &OPTIONAL))
STYLE-WARNING:
The new FTYPE proclamation for FSET::WB-BAG-TREE-TOTAL-COUNT
(FUNCTION (FSET::WB-BAG-TREE) INTEGER)
does not match the derived return type
(FUNCTION ((OR LIST FSET::WB-BAG-TREE-NODE)) *)
STYLE-WARNING:
Generic function FSET:ITERATOR clobbers an earlier FTYPE proclamation
(FUNCTION (T &KEY &ALLOW-OTHER-KEYS) (VALUES FUNCTION &REST T)) for the same
name with (FUNCTION (T &KEY &ALLOW-OTHER-KEYS) *).
; compiling file "/home/erel/Documents/nyxt/_build/prompter/package.lisp" (written 04 MAR 2024 04:55:58 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/prompter/package-tmpSU9OHSB9.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/erel/Documents/nyxt/_build/prompter/filter-preprocessor.lisp" (written 04 MAR 2024 04:55:58 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/prompter/filter-preprocessor-tmpTEZ5J20P.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/prompter/filter.lisp" (written 04 MAR 2024 04:55:58 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/prompter/filter-tmp7EQWE70T.fasl
; compilation finished in 0:00:00.026
; compiling file "/home/erel/Documents/nyxt/_build/prompter/prompter-source.lisp" (written 04 MAR 2024 04:55:58 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/prompter/prompter-source-tmp83ON8YFR.fasl
; compilation finished in 0:00:00.416
; compiling file "/home/erel/Documents/nyxt/_build/prompter/prompter.lisp" (written 04 MAR 2024 04:55:58 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/prompter/prompter-tmpEOOWYRL6.fasl
; compilation finished in 0:00:00.256
; compiling file "/home/erel/Documents/nyxt/_build/phos/package.lisp" (written 04 MAR 2024 04:55:56 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/phos/package-tmpFDZ5SF8C.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/phos/phos.lisp" (written 04 MAR 2024 04:55:56 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/phos/phos-tmp6MGXO15Y.fasl
; compilation finished in 0:00:00.000
; compiling file "/home/erel/Documents/nyxt/_build/phos/gemtext.lisp" (written 04 MAR 2024 04:55:56 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/phos/gemtext-tmpSWPNJISY.fasl
; compilation finished in 0:00:00.113
; compiling file "/home/erel/Documents/nyxt/_build/phos/gemini.lisp" (written 04 MAR 2024 04:55:56 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/phos/gemini-tmpUXH28IAQ.fasl
; compilation finished in 0:00:00.046
WARNING:
The new FTYPE proclamation for CLSS:MATCH-SELECTOR
(FUNCTION (LIST (OR PLUMP-DOM:NODE VECTOR LIST) KEYWORD)
(VALUES (AND (VECTOR PLUMP-DOM:NODE) (NOT SIMPLE-ARRAY))))
does not match the old FTYPE proclamation
(FUNCTION (LIST (OR LIST PLUMP-DOM:NODE VECTOR) &OPTIONAL KEYWORD)
(VALUES (AND (VECTOR PLUMP-DOM:NODE) (NOT SIMPLE-ARRAY)) &REST T))
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/package.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/package-tmpRZXAYVZS.fasl
; compilation finished in 0:00:00.003
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/special.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/special-tmpFVBAZC5N.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/stream.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/stream-tmpEN1U5236.fasl
; compilation finished in 0:00:00.076
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/syntax.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/syntax-tmpWKFFHE0Z.fasl
; compilation finished in 0:00:00.020
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/tags.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/tags-tmpHCGNQVX4.fasl
; compilation finished in 0:00:00.146
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/spinneret.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/spinneret-tmpNZ1LR6KM.fasl
; compilation finished in 0:00:00.016
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/run.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/run-tmpPQVFZD5C.fasl
; compilation finished in 0:00:00.279
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/functions.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/functions-tmpE8JTPSGT.fasl
; compilation finished in 0:00:00.373
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/compile.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/compile-tmpXLGMUBFO.fasl
; compilation finished in 0:00:00.106
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/deftag.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/deftag-tmp85XVAH0V.fasl
; compilation finished in 0:00:00.023
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/dynamic.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/dynamic-tmpE4QSJJPV.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/interpret.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/interpret-tmpW9VXJCU5.fasl
; compilation finished in 0:00:00.013
; compiling file "/home/erel/Documents/nyxt/_build/spinneret/ps.lisp" (written 04 MAR 2024 04:56:06 AM):
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/spinneret/ps-tmpIF3QWIV6.fasl
; compilation finished in 0:00:00.043
STYLE-WARNING:
The new FTYPE proclamation for SLYNK-BACKEND:GETPID
(FUNCTION NIL (VALUES (SIGNED-BYTE 32) &OPTIONAL))
does not match the derived return type
(FUNCTION NIL *)
WARNING:
redefining EMACS-INSPECT (#) in DEFMETHOD
WARNING: redefining SLYNK::SYMBOL-INDENTATION in DEFUN
WARNING: redefining SLYNK::MACRO-INDENTATION in DEFUN
WARNING:
bare references to struct types are deprecated. Please use (:POINTER
(:STRUCT
SQLITE3)) or (:STRUCT
SQLITE3) instead.
WARNING:
bare references to struct types are deprecated. Please use (:POINTER
(:STRUCT
SQLITE3-STMT)) or (:STRUCT
SQLITE3-STMT) instead.
; compiling file "/home/erel/Documents/nyxt/_build/slime/swank/backend.lisp" (written 04 MAR 2024 04:56:02 AM):
; file: /home/erel/Documents/nyxt/_build/slime/swank/backend.lisp
; in: DEFUN %UTF8-ENCODE
; (SWANK/BACKEND::%UTF8-ENCODE (CODE-CHAR 65533) SWANK/BACKEND::BUFFER
; SWANK/BACKEND::START SWANK/BACKEND::END)
;
; note: deleting unreachable code
;
; caught WARNING:
; Constant
; #\REPLACEMENT_CHARACTER conflicts with its asserted type
; (UNSIGNED-BYTE 31).
; See also:
; The SBCL Manual, Node "Handling of Types"
; wrote /home/erel/.cache/common-lisp/sbcl-2.4.2-linux-x64/home/erel/Documents/nyxt/_build/slime/swank/backend-tmp9BHJXQOA.fasl
; compilation finished in 0:00:01.003
Unhandled UIOP/LISP-BUILD:COMPILE-FILE-ERROR in thread #:
COMPILE-FILE-ERROR while
compiling #
Backtrace for: #
0: (SB-DEBUG::DEBUGGER-DISABLED-HOOK # # :QUIT T)
1: (SB-DEBUG::RUN-HOOK *INVOKE-DEBUGGER-HOOK* #)
2: (INVOKE-DEBUGGER #)
3: (ERROR UIOP/LISP-BUILD:COMPILE-FILE-ERROR :CONTEXT-FORMAT "~/asdf-action::format-action/" :CONTEXT-ARGUMENTS ((# . #)))
4: (UIOP/LISP-BUILD:CHECK-LISP-COMPILE-RESULTS NIL T T "~/asdf-action::format-action/" ((# . #)))
5: ((SB-PCL::EMF ASDF/ACTION:PERFORM) # # # #)
6: ((LAMBDA NIL :IN ASDF/ACTION:CALL-WHILE-VISITING-ACTION))
7: ((:METHOD ASDF/ACTION:PERFORM-WITH-RESTARTS :AROUND (T T)) # #) [fast-method]
8: ((:METHOD ASDF/PLAN:PERFORM-PLAN (T)) #) [fast-method]
9: ((FLET SB-C::WITH-IT :IN SB-C::%WITH-COMPILATION-UNIT))
10: ((:METHOD ASDF/PLAN:PERFORM-PLAN :AROUND (T)) #) [fast-method]
11: ((:METHOD ASDF/OPERATE:OPERATE (ASDF/OPERATION:OPERATION ASDF/COMPONENT:COMPONENT)) # # :PLAN-CLASS NIL :PLAN-OPTIONS NIL) [fast-method]
12: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) # # # #)
13: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
14: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) # #) [fast-method]
15: ((SB-PCL::EMF ASDF/OPERATE:OPERATE) # # ASDF/LISP-ACTION:LOAD-OP :NYXT/GI-GTK-APPLICATION)
16: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
17: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP :NYXT/GI-GTK-APPLICATION) [fast-method]
18: (ASDF/SESSION:CALL-WITH-ASDF-SESSION # :OVERRIDE T :KEY NIL :OVERRIDE-CACHE T :OVERRIDE-FORCING NIL)
19: ((LAMBDA NIL :IN ASDF/OPERATE:OPERATE))
20: (ASDF/SESSION:CALL-WITH-ASDF-SESSION # :OVERRIDE NIL :KEY NIL :OVERRIDE-CACHE NIL :OVERRIDE-FORCING NIL)
21: ((:METHOD ASDF/OPERATE:OPERATE :AROUND (T T)) ASDF/LISP-ACTION:LOAD-OP :NYXT/GI-GTK-APPLICATION) [fast-method]
22: (ASDF/OPERATE:LOAD-SYSTEM :NYXT/GI-GTK-APPLICATION)
23: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ASDF/OPERATE:LOAD-SYSTEM :NYXT/GI-GTK-APPLICATION) #)
24: (EVAL (ASDF/OPERATE:LOAD-SYSTEM :NYXT/GI-GTK-APPLICATION))
25: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(require \"asdf\")") (:EVAL . #<(SIMPLE-ARRAY CHARACTER (322)) (when (string= "true" "true") (setf asdf:*default-source-registries* (list (quote asdf/source-registry:environment-source-registry))) (asdf:clear-configuration) (asdf:load-asd "/home/erel/Documents/ny... {10015CA15F}>) (:EVAL . "(asdf:load-asd \"/home/erel/Documents/nyxt//libraries/nasdf/nasdf.asd\")") (:EVAL . "(asdf:load-asd \"/home/erel/Documents/nyxt//nyxt.asd\")") (:EVAL . #<(SIMPLE-ARRAY CHARACTER (235)) (when (and (find-package :cffi) (uiop:getenv "GUIX_ENVIRONMENT")) (pushnew (pathname (format nil "~a/lib/" (uiop:getenv "GUIX_ENVIRONMENT"))) (symbol-value (read-from-string "cffi:*foreign-library-dir... {10015CA89F}>) (:EVAL . "(asdf:load-system :nyxt/gi-gtk-application)") (:EVAL . "(asdf:make :nyxt/gi-gtk-application)") (:EVAL . "(uiop:quit)") (:QUIT)))
26: (SB-IMPL::TOPLEVEL-INIT)
27: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP))
28: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP))
29: (SB-IMPL::%START-LISP)
unhandled condition in --disable-debugger mode, quitting
;
; compilation unit aborted
; caught 1 fatal ERROR condition
; caught 1 WARNING condition
; caught 22 STYLE-WARNING conditions
; printed 428 notes
Compilation failed, see the above stacktrace.
make: *** [makefile:51: nyxt] Error 1