>>> Building on exopi-2 under x11/stumpwm
BDEPENDS = [devel/metaauto;devel/gmake;devel/autoconf/2.71;archivers/zstd;print/texinfo;lang/sbcl]
DIST = [x11/stumpwm:alexandria-20220707-git.tgz;x11/stumpwm:clx-0.7.6.tar.gz;x11/stumpwm:stumpwm-23.11.tar.gz;x11/stumpwm:cl-ppcre-2.1.1.tar.gz]
FULLPKGNAME = stumpwm-23.11p9
RDEPENDS = [archivers/zstd]
(Junk lock failure for exopi-2 at 1731849536.69064)
Received IO
(Junk lock obtained for exopi-2 at 1731849545.70)
Received IO
Woken up x11/stumpwm
Woken up x11/stumpwm
Woken up x11/stumpwm
Woken up x11/stumpwm
>>> Running depends in x11/stumpwm at 1731849547.24
last junk was in misc/open62541,ns0_full
/usr/sbin/pkg_add -aI -Drepair autoconf-2.71p0 gmake-4.4.1 metaauto-1.0p4 sbcl-2.4.10 texinfo-7.1p0 zstd-1.5.6
was: /usr/sbin/pkg_add -aI -Drepair autoconf-2.71p0 gmake-4.4.1 metaauto-1.0p4 sbcl-2.4.10 texinfo-7.1p0 zstd-1.5.6
/usr/sbin/pkg_add -aI -Drepair autoconf-2.71p0 gmake-4.4.1 metaauto-1.0p4 sbcl-2.4.10 texinfo-7.1p0 zstd-1.5.6
>>> Running show-prepare-results in x11/stumpwm at 1731849553.22
===> x11/stumpwm
===> Building from scratch stumpwm-23.11p9
===> stumpwm-23.11p9 depends on: sbcl-* -> sbcl-2.4.10
===> stumpwm-23.11p9 depends on: texinfo-* -> texinfo-7.1p0
===> stumpwm-23.11p9 depends on: metaauto-* -> metaauto-1.0p4
===> stumpwm-23.11p9 depends on: autoconf-2.71 -> autoconf-2.71p0
===> stumpwm-23.11p9 depends on: gmake-* -> gmake-4.4.1
===> stumpwm-23.11p9 depends on: zstd-* -> zstd-1.5.6
===> Verifying specs: c m pthread util zstd
===> found c.100.3 m.10.1 pthread.27.1 util.18.0 zstd.6.4
autoconf-2.71p0
gmake-4.4.1
metaauto-1.0p4
sbcl-2.4.10
texinfo-7.1p0
zstd-1.5.6
Don't run junk because nojunk in cad/librecad
(Junk lock released for exopi-2 at 1731849554.50)
distfiles size=965834
>>> Running build in x11/stumpwm at 1731849554.52
===> x11/stumpwm
===> Checking files for stumpwm-23.11p9
`/exopi-cvs/ports/distfiles/stumpwm-23.11.tar.gz' is up to date.
`/exopi-cvs/ports/distfiles/cl-ppcre-2.1.1.tar.gz' is up to date.
`/exopi-cvs/ports/distfiles/clx-0.7.6.tar.gz' is up to date.
`/exopi-cvs/ports/distfiles/alexandria-20220707-git.tgz' is up to date.
>> (SHA256) all files: OK
===> Extracting for stumpwm-23.11p9
===> Patching for stumpwm-23.11p9
===> Applying OpenBSD patch patch-make-image_lisp_in
Hmm... Looks like a unified diff to me...
The text leading up to this was:
--------------------------
|Contains:
| - https://github.com/stumpwm/stumpwm/commit/20d839f2ddfdfd25a8460152bc5dc45a9354e773
| - https://github.com/stumpwm/stumpwm/commit/f271a45e05fb25d70cdd4c12717d908fd9e27dee
|
|Should be removed at the next release
|
|Index: make-image.lisp.in
|--- make-image.lisp.in.orig
|+++ make-image.lisp.in
--------------------------
Patching file make-image.lisp.in using Plan A...
Hunk #1 succeeded at 1.
Hunk #2 succeeded at 50.
done
===> Compiler link: clang -> /usr/bin/clang
===> Compiler link: clang++ -> /usr/bin/clang++
===> Compiler link: cc -> /usr/bin/cc
===> Compiler link: c++ -> /usr/bin/c++
===> Generating configure for stumpwm-23.11p9
Running autoconf-2.71 in /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11
===> Configuring for stumpwm-23.11p9
Using /exopi-obj/pobj/stumpwm-23.11/config.site (generated)
ln: /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/stumpwm-tests.asd: File exists
configure: WARNING: unrecognized options: --disable-silent-rules, --disable-gtk-doc
configure: loading site script /exopi-obj/pobj/stumpwm-23.11/config.site
checking for sbcl... /usr/local/bin/sbcl
configure: WARNING: SBCL_HOME must be defined to use asdf/quicklisp (it should be where your sbcl.core resides)
configure: Using sbcl at /usr/local/bin/sbcl
checking for makeinfo... yes
configure: creating ./config.status
config.status: creating Makefile
configure: WARNING: unrecognized options: --disable-silent-rules, --disable-gtk-doc
configure: creating ./config.status
config.status: creating Makefile
config.status: creating make-image.lisp
configure: WARNING: unrecognized options: --disable-silent-rules, --disable-gtk-doc
configure: creating ./config.status
config.status: creating Makefile
config.status: creating make-image.lisp
config.status: creating load-stumpwm.lisp
configure: WARNING: unrecognized options: --disable-silent-rules, --disable-gtk-doc
===> Building for stumpwm-23.11p9
/usr/local/bin/sbcl --non-interactive --eval "(setf sb-impl::*default-external-format* :UTF-8)" --load ./make-image.lisp
This is SBCL 2.4.10.openbsd.sbcl-2.4.10, 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.
BAD-SYSTEM-NAME: System definition file #P"/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file.
WARNING: System definition file #P"/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file.
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/package.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/package-tmpGHU3ALSV.fasl
; compilation finished in 0:00:00.009
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/definitions.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/definitions-tmpAAURSO1.fasl
; compilation finished in 0:00:00.014
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:DEFINE-CONSTANT in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/binding.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/binding-tmp5GEXGEG5.fasl
; compilation finished in 0:00:00.021
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:IF-LET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:WHEN-LET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:WHEN-LET* in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/strings.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/strings-tmpAR3FSGEY.fasl
; compilation finished in 0:00:00.002
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/conditions.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/conditions-tmpJAIDFZTC.fasl
; compilation finished in 0:00:00.052
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:IGNORE-SOME-CONDITIONS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:UNWIND-PROTECT-CASE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/symbols.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/symbols-tmp8V3J6PE9.fasl
; compilation finished in 0:00:00.018
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/macros.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/macros-tmp9V47YWQF.fasl
; compilation finished in 0:00:00.104
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:WITH-GENSYMS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:WITH-UNIQUE-NAMES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:ONCE-ONLY in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:DESTRUCTURING-CASE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:DESTRUCTURING-CCASE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:DESTRUCTURING-ECASE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/functions.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/functions-tmp9BN22RMA.fasl
; compilation finished in 0:00:00.034
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA::ENSURE-FUNCTIONF/1 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:ENSURE-FUNCTIONF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:NAMED-LAMBDA in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/lists.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/lists-tmp1CXFJSK9.fasl
; compilation finished in 0:00:00.107
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:DOPLIST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:APPENDF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:NCONCF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:UNIONF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:NUNIONF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:REVERSEF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:NREVERSEF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:REMOVE-FROM-PLISTF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:DELETE-FROM-PLISTF in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/types.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/types-tmpX4BRKI0R.fasl
; compilation finished in 0:00:00.059
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:COERCEF in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/io.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/io-tmpQ371UGST.fasl
; compilation finished in 0:00:00.122
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA::WITH-OPEN-FILE* in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:WITH-INPUT-FROM-FILE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:WITH-OUTPUT-TO-FILE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/hash-tables.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/hash-tables-tmp2OWI3Q7U.fasl
; compilation finished in 0:00:00.039
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:ENSURE-GETHASH in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/control-flow.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/control-flow-tmp9KKTJMYV.fasl
; compilation finished in 0:00:00.031
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:SWITCH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:ESWITCH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:CSWITCH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:WHICHEVER in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:XOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:NTH-VALUE-OR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:MULTIPLE-VALUE-PROG2 in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/arrays.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/arrays-tmpJU0JWO19.fasl
; compilation finished in 0:00:00.013
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/sequences.lisp" (written 09 MAY 2022 08:22:41 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; file: /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/sequences.lisp
; in: DEFUN LENGTH=
; (LENGTH FIRST)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/sequences-tmpZX2WN8N4.fasl
; compilation finished in 0:00:00.186
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:REMOVEF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:DELETEF in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/numbers.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/numbers-tmpOU81XRV0.fasl
; compilation finished in 0:00:00.109
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:MAXF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA:MINF in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/features.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-1/features-tmpY2ML9CFA.fasl
; compilation finished in 0:00:00.007
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/package.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/package-tmpX2JYJDQE.fasl
; compilation finished in 0:00:00.008
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/arrays.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/arrays-tmpOPCILR65.fasl
; compilation finished in 0:00:00.010
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/control-flow.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/control-flow-tmpRV9F8A9A.fasl
; compilation finished in 0:00:00.021
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA-2:LINE-UP-FIRST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining ALEXANDRIA-2:LINE-UP-LAST in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/sequences.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/sequences-tmpK2ZAJT4I.fasl
; compilation finished in 0:00:00.003
; compiling file "/exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/lists.lisp" (written 09 MAY 2022 08:22:41 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/alexandria-20220707-git/alexandria-2/lists-tmpUX5S4ADN.fasl
; compilation finished in 0:00:00.003
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/packages.lisp" (written 07 APR 2019 05:51:26 PM):
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/packages-tmp10401X32.fasl
; compilation finished in 0:00:00.002
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/specials.lisp" (written 07 APR 2019 05:51:26 PM):
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/specials-tmpZ7CBRM0G.fasl
; compilation finished in 0:00:00.008
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/util.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a STRING, not a (OR NULL
(SIMPLE-ARRAY
* (*))).
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/util.lisp
; in: DEFUN STRING-LIST-TO-SIMPLE-STRING
; (REPLACE CL-PPCRE::RESULT-STRING STRING :START1 CL-PPCRE::CURR-POS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a STRING, not a (OR NULL (SIMPLE-ARRAY * (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a STRING, not a (OR
SIMPLE-BASE-STRING
NULL).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a STRING, not a (OR SIMPLE-BASE-STRING NULL).
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
; in: DEFUN COMPLEMENT*
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/util-tmp9OZEQ0G2.fasl
; compilation finished in 0:00:00.031
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::DEFCONSTANT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::WITH-UNIQUE-NAMES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::WITH-REBINDING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/errors.lisp" (written 07 APR 2019 05:51:26 PM):
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/errors-tmpB2JTL1W9.fasl
; compilation finished in 0:00:00.013
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::SIGNAL-SYNTAX-ERROR* in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::SIGNAL-SYNTAX-ERROR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::SIGNAL-INVOCATION-ERROR in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/charset.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-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.
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/charset.lisp
; in: DEFUN MIX
; (+ CL-PPCRE::CODE CL-PPCRE::HASH)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN COMPUTE-INDEX
; (LENGTH VECTOR)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR)))
;
; note: unable to
; optimize
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a INTEGER.
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a (OR FLOAT
(RATIONAL (-17592186044414)
(17592186044414))), not a RATIONAL.
; (1+ (MOD CL-PPCRE::HASH (1- (LENGTH VECTOR))))
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a (OR FLOAT
; (RATIONAL (-17592186044414)
; (17592186044414))), not a RATIONAL.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (OR FLOAT
(RATIONAL (-17592186044414) (17592186044414))), not a FIXNUM.
The result is a (VALUES
(OR FLOAT (RATIONAL (-17592186044413) (17592186044415)))
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (OR FLOAT
(RATIONAL (-17592186044414) (17592186044414))), not a FIXNUM.
The result is a (VALUES
(OR FLOAT (RATIONAL (-17592186044413) (17592186044415)))
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR FLOAT
; (RATIONAL (-17592186044414) (17592186044414))), not a FIXNUM.
; The result is a (VALUES
; (OR FLOAT (RATIONAL (-17592186044413) (17592186044415)))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR FLOAT
; (RATIONAL (-17592186044414) (17592186044414))), not a FIXNUM.
; The result is a (VALUES
; (OR FLOAT (RATIONAL (-17592186044413) (17592186044415)))
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
; in: DEFUN %ADD-TO-CHARSET/EXPAND
; (* 2 CL-PPCRE::NEW-SIZE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
convert x*2^k to shift
due to type uncertainty:
The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
associate */(* /) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; convert x*2^k to shift
; due to type uncertainty:
; The first argument is a NUMBER, not a INTEGER.
;
; note: unable to
; associate */(* /) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; (>= CL-PPCRE::NEW-SIZE 371370)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-* (cost 30)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; (* 2 CL-PPCRE::NEW-SIZE)
;
; note: forced to do GENERIC-* (cost 30)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-- (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER * 4611686018427387903), not a FIXNUM.
The result is a (VALUES (INTEGER * 4611686018427387902) &OPTIONAL), not a (VALUES
FIXNUM
&OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER * 4611686018427387903), not a FIXNUM.
The result is a (VALUES (INTEGER * 4611686018427387902) &OPTIONAL), not a (VALUES
FIXNUM
&OPTIONAL).
etc.
; in: DEFUN MAP-CHARSET
; (DECF CL-PPCRE::N)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER * 4611686018427387903), not a FIXNUM.
; The result is a (VALUES (INTEGER * 4611686018427387902) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER * 4611686018427387903), not a FIXNUM.
; The result is a (VALUES (INTEGER * 4611686018427387902) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-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.
; in: DEFUN CREATE-CHARSET-FROM-TEST-FUNCTION
; (LOOP CL-PPCRE::WITH CL-PPCRE::CHARSET = (CL-PPCRE::MAKE-CHARSET)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
; The second argument is a REAL, not a RATIONAL.
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: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
; The second argument is a REAL, not a RATIONAL.
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-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.
; (LOOP CL-PPCRE::WITH CL-PPCRE::CHARSET = (CL-PPCRE::MAKE-CHARSET)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; 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 /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/charset-tmpP3BI68WQ.fasl
; compilation finished in 0:00:00.047
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/charmap.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/charmap.lisp
; in: DEFUN MAKE-CHARMAP
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: forced to do full call
unable to do inline float comparison (cost 3) because:
; in: DEFUN CREATE-CHARMAP-FROM-TEST-FUNCTION
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; 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.
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1-
; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (< CL-PPCRE::CODE #:LIM16)
;
; 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.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
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.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-- (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; 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.
The first argument is a REAL, not a FIXNUM.
The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a REAL, not a FIXNUM.
The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-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 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.
etc.
; (1- CL-PPCRE::END)
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a REAL, not a FIXNUM.
; The result is a (VALUES REAL &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; (LOOP CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM (1-
; CL-PPCRE::END) CL-PPCRE::DOWNTO CL-PPCRE::START
; CL-PPCRE::FOR CHAR = (CODE-CHAR CL-PPCRE::CODE)
; CL-PPCRE::UNTIL ...)
; --> LET LET TAGBODY WHEN IF
; ==>
; (< CL-PPCRE::CODE #:LIM16)
;
; 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 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.
; etc.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/charmap-tmpQDARA81Z.fasl
; compilation finished in 0:00:00.048
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/chartest.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/chartest.lisp
; in: DEFUN CREATE-HASH-TABLE-FROM-TEST-FUNCTION
; (LOOP CL-PPCRE::WITH HASH-TABLE = (MAKE-HASH-TABLE)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-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.
;
; 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.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (LOOP CL-PPCRE::WITH HASH-TABLE = (MAKE-HASH-TABLE)
; CL-PPCRE::FOR CL-PPCRE::CODE CL-PPCRE::FROM CL-PPCRE::START CL-PPCRE::BELOW
; CL-PPCRE::END
; CL-PPCRE::FOR ...)
; --> LET LET LET TAGBODY WHEN IF
; ==>
; (>= CL-PPCRE::CODE #:LIM0)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a INTEGER.
SIMPLE-COMPILER-NOTE: unable to
convert division by 2^k to shift
due to type uncertainty:
The first argument is a REAL, not a INTEGER.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a INTEGER.
SIMPLE-COMPILER-NOTE: unable to
convert division by 2^k to shift
due to type uncertainty:
The first argument is a REAL, not a INTEGER.
; in: DEFUN CREATE-OPTIMIZED-TEST-FUNCTION
; (CEILING (- CL-PPCRE::END CL-PPCRE::START) 2)
;
; 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
; 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.
SIMPLE-COMPILER-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-PPCRE::END CL-PPCRE::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.
SIMPLE-COMPILER-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.
;
; 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.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/chartest-tmpYEMMM7SE.fasl
; compilation finished in 0:00:00.024
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/lexer.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/lexer.lisp
; in: DEFUN NEXT-CHAR
; (- (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER) 2)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; in: DEFUN GET-NUMBER
; (+ (CL-PPCRE::LEXER-POS CL-PPCRE::LEXER) (THE FIXNUM CL-PPCRE::MAX-LENGTH))
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; in: DEFUN UNESCAPE-CHAR
; (CHAR-UPCASE CL-PPCRE::NEXT-CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/lexer-tmp73HU0RPK.fasl
; compilation finished in 0:00:00.319
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/parser.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/parser.lisp
; in: DEFUN GROUP
; (+ CL-PPCRE::OPEN-PAREN-POS 2)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN SEQ
; (SETF (AREF STRING 0) CL-PPCRE::CHAR1)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (SETF (AREF STRING 1) CL-PPCRE::CHAR2)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/parser-tmpIO5N7K88.fasl
; compilation finished in 0:00:00.045
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/regex-class.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/regex-class-tmpCM21U60Z.fasl
; compilation finished in 0:00:00.088
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/regex-class.lisp
; in: DEFMETHOD INITIALIZE-INSTANCE :AFTER (STR)
; (COERCE CL-PPCRE::STR-SLOT 'SIMPLE-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) 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 SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; (LENGTH (CL-PPCRE::STR CL-PPCRE::STR))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/regex-class-util.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/regex-class-util.lisp
; in: DEFMETHOD CASE-MODE (STR T)
; (ZEROP (CL-PPCRE::LEN CL-PPCRE::STR))
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; in: DEFMETHOD EVERYTHINGP (SEQ)
; (LENGTH CL-PPCRE::CLEANED-ELEMENTS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD EVERYTHINGP (ALTERNATION)
; (LENGTH CL-PPCRE::CHOICES)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
; in: DEFMETHOD EVERYTHINGP (REPETITION)
; (= 1 CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)
;
; 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.
SIMPLE-COMPILER-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 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).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a (OR (REAL 1 1)
(COMPLEX (INTEGER 1 1))
;
; note: unable to open code because: The operands might not be the same type.
(COMPLEX
(SINGLE-FLOAT 1.0 1.0))
(COMPLEX
(DOUBLE-FLOAT 1.0d0
1.0d0))), not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a (OR (REAL 1 1)
(COMPLEX (INTEGER 1 1))
(COMPLEX
(SINGLE-FLOAT 1.0 1.0))
(COMPLEX
(DOUBLE-FLOAT 1.0d0
1.0d0))), not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a (OR (REAL 1 1)
(COMPLEX (INTEGER 1 1))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
(COMPLEX
(SINGLE-FLOAT 1.0 1.0))
(COMPLEX
(DOUBLE-FLOAT 1.0d0
1.0d0))), not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX
; SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
The first argument is a (OR (REAL 1 1)
(COMPLEX (INTEGER 1 1))
(COMPLEX
(SINGLE-FLOAT 1.0 1.0))
(COMPLEX
(DOUBLE-FLOAT 1.0d0
1.0d0))), not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX
; (DOUBLE-FLOAT 1.0d0 1.0d0))), not a (COMPLEX
; DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-= (cost 10)
unable to do inline float comparison (cost 3) because:
The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
(COMPLEX (SINGLE-FLOAT 1.0 1.0))
(COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), 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 (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
(COMPLEX (SINGLE-FLOAT 1.0 1.0))
(COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT.
The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
etc.
;
; note: forced to do GENERIC-= (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), 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 (OR (REAL 1 1) (COMPLEX (INTEGER 1 1))
; (COMPLEX (SINGLE-FLOAT 1.0 1.0))
; (COMPLEX (DOUBLE-FLOAT 1.0d0 1.0d0))), not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
&OPTIONAL).
etc.
; in: DEFMETHOD REGEX-LENGTH (SEQ)
; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS
; CL-PPCRE::SEQ)
; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-LENGTH
; CL-PPCRE::SUB-REGEX)
; IF (NOT CL-PPCRE::LEN)
; DO ...)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:SUM6 CL-PPCRE::LEN)
;
; 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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
; in: DEFMETHOD REGEX-LENGTH (ALTERNATION)
; (/= CL-PPCRE::LEN CL-PPCRE::OLD-LEN)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-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 (NOT NULL), not a SINGLE-FLOAT.
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 (NOT NULL), not a (COMPLEX SINGLE-FLOAT).
etc.
;
; 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 (NOT NULL), not a SINGLE-FLOAT.
; 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 (NOT NULL), not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-NOTE: forced to do IF-EQL (cost 15)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (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 (NOT NULL), not a SINGLE-FLOAT.
The second argument is a T, not a SINGLE-FLOAT.
etc.
; in: DEFMETHOD REGEX-LENGTH (BRANCH)
; (EQL CL-PPCRE::THEN-LENGTH
; (CL-PPCRE::REGEX-LENGTH (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)))
;
; note: forced to do IF-EQL (cost 15)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (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 (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; etc.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-* (cost 30)
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 (signed-byte 64) arithmetic (cost 4) because:
The first argument is a T, not a (SIGNED-BYTE 64).
The second argument is a T, not a (SIGNED-BYTE 64).
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
&OPTIONAL).
etc.
; in: DEFMETHOD REGEX-LENGTH (REPETITION)
; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)
;
; 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.
; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)
;
; note: forced to do GENERIC-* (cost 30)
; 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 (signed-byte 64) arithmetic (cost 4) because:
; The first argument is a T, not a (SIGNED-BYTE 64).
; The second argument is a T, not a (SIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-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.
; in: DEFMETHOD REGEX-MIN-LENGTH (SEQ)
; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::ELEMENTS
; CL-PPCRE::SEQ)
; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH
; CL-PPCRE::SUB-REGEX)
; CL-PPCRE::SUM CL-PPCRE::LEN)
; --> LET LET SB-LOOP::WITH-SUM-COUNT LET TAGBODY SETQ THE
; ==>
; (+ #:SUM6 CL-PPCRE::LEN)
;
; 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.
SIMPLE-COMPILER-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.
; in: DEFMETHOD REGEX-MIN-LENGTH (ALTERNATION)
; (LOOP CL-PPCRE::FOR CL-PPCRE::SUB-REGEX CL-PPCRE::IN (CL-PPCRE::CHOICES
; CL-PPCRE::ALTERNATION)
; CL-PPCRE::FOR CL-PPCRE::LEN = (CL-PPCRE::REGEX-MIN-LENGTH
; CL-PPCRE::SUB-REGEX)
; CL-PPCRE::MINIMIZE CL-PPCRE::LEN)
SIMPLE-COMPILER-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.
; --> LET LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY
; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF
; ==>
; (< #:MINMAXTMP10 #:MINMAX9)
;
; 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.
SIMPLE-COMPILER-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 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.
etc.
;
; 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 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.
; etc.
SIMPLE-COMPILER-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.
; in: DEFMETHOD REGEX-MIN-LENGTH (BRANCH)
; (MIN (CL-PPCRE::REGEX-MIN-LENGTH (CL-PPCRE::THEN-REGEX CL-PPCRE::BRANCH))
; (CL-PPCRE::REGEX-MIN-LENGTH (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
SIMPLE-COMPILER-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.
; 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.
SIMPLE-COMPILER-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.
;
; 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.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-* (cost 30)
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 (signed-byte 64) arithmetic (cost 4) because:
The first argument is a T, not a (SIGNED-BYTE 64).
The second argument is a T, not a (SIGNED-BYTE 64).
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
&OPTIONAL).
etc.
; in: DEFMETHOD REGEX-MIN-LENGTH (REPETITION)
; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)
; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))
;
; note: forced to do GENERIC-* (cost 30)
; 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 (signed-byte 64) arithmetic (cost 4) because:
; The first argument is a T, not a (SIGNED-BYTE 64).
; The second argument is a T, not a (SIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; in: DEFMETHOD COMPUTE-OFFSETS (ALTERNATION T)
; (/= CL-PPCRE::CURR-OFFSET CL-PPCRE::OLD-OFFSET)
;
; note: unable to
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-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 (NOT NULL), not a SINGLE-FLOAT.
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 (NOT NULL), not a (COMPLEX SINGLE-FLOAT).
etc.
;
; 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 (NOT NULL), not a SINGLE-FLOAT.
; 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 (NOT NULL), not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-NOTE: forced to do IF-EQL (cost 15)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (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 (NOT NULL), not a SINGLE-FLOAT.
The second argument is a T, not a SINGLE-FLOAT.
etc.
; in: DEFMETHOD COMPUTE-OFFSETS (BRANCH T)
; (EQL CL-PPCRE::THEN-OFFSET
; (CL-PPCRE::COMPUTE-OFFSETS (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)
; CL-PPCRE::START-POS))
;
; note: forced to do IF-EQL (cost 15)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (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 (NOT NULL), not a SINGLE-FLOAT.
; The second argument is a T, not a SINGLE-FLOAT.
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-* (cost 30)
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 (signed-byte 64) arithmetic (cost 4) because:
The first argument is a T, not a (SIGNED-BYTE 64).
The second argument is a T, not a (SIGNED-BYTE 64).
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
&OPTIONAL).
etc.
; in: DEFMETHOD COMPUTE-OFFSETS (REPETITION T)
; (* CL-PPCRE::MINIMUM CL-PPCRE::LEN)
;
; note: forced to do GENERIC-* (cost 30)
; 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 (signed-byte 64) arithmetic (cost 4) because:
; The first argument is a T, not a (SIGNED-BYTE 64).
; The second argument is a T, not a (SIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-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 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 T, 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-PPCRE::START-POS (* CL-PPCRE::MINIMUM CL-PPCRE::LEN))
;
; 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 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 T, 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.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; in: DEFMETHOD COMPUTE-OFFSETS (CHAR-CLASS T)
; (1+ CL-PPCRE::START-POS)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-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.
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; in: DEFMETHOD COMPUTE-OFFSETS (EVERYTHING T)
; (1+ CL-PPCRE::START-POS)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-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.
;
; 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.
SIMPLE-COMPILER-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.
; in: DEFMETHOD COMPUTE-OFFSETS (STR T)
; (+ CL-PPCRE::START-POS (CL-PPCRE::LEN CL-PPCRE::STR))
;
; 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.
SIMPLE-COMPILER-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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
&OPTIONAL).
etc.
; in: DEFMETHOD COMPUTE-OFFSETS (FILTER T)
; (+ CL-PPCRE::START-POS CL-PPCRE::LEN)
;
; 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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/regex-class-util-tmp9DT7SEFG.fasl
; compilation finished in 0:00:00.118
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/convert.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/convert.lisp
; in: DEFUN CONVERT-CHAR-CLASS-TO-TEST-FUNCTION
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-DOWNCASE CHAR))
;
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR))
;
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-UPCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-DOWNCASE CHAR))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION (CHAR-UPCASE CHAR))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-UPCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CHAR)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-UPCASE CHAR)
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-DOWN)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-UP)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (CHAR-DOWNCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-UPCASE CHAR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TEST-FUNCTION is not known to be a function
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-DOWN)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
; (FUNCALL CL-PPCRE::TEST-FUNCTION CL-PPCRE::CHAR-UP)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TEST-FUNCTION is not known to be a function
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20)
; in: DEFUN MAYBE-SPLIT-REPETITION
; (- CL-PPCRE::MAXIMUM CL-PPCRE::MINIMUM)
;
; note: doing signed word to integer coercion (cost 20)
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a (OR NULL
(SIMPLE-ARRAY
* (*))).
The second argument is a SEQUENCE, not a (OR NULL
(SIMPLE-ARRAY
* (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a (OR
SIMPLE-BASE-STRING
NULL).
The second argument is a SEQUENCE, not a (OR NULL
(SIMPLE-ARRAY
CHARACTER
(*))).
; in: DEFUN MAYBE-ACCUMULATE
; (SETF (SUBSEQ (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR)
; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH)
; (CL-PPCRE::LEN CL-PPCRE::STR)))
; (CL-PPCRE::STR CL-PPCRE::STR)
; (CL-PPCRE::SKIP CL-PPCRE::STR) T)
; --> SETF LET*
; ==>
; (REPLACE #:SEQUENCE #:NEW3 :START1 #:START :END1 NIL)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a (OR NULL
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; The second argument is a SEQUENCE, not a (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
(SIMPLE-ARRAY
CHARACTER
(*))).
The second argument is a SEQUENCE, not a (OR
SIMPLE-BASE-STRING
NULL).
SIMPLE-COMPILER-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 (OR NULL
; (SIMPLE-ARRAY CHARACTER (*))).
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (MAKE-ARRAY (CL-PPCRE::LEN CL-PPCRE::STR) :INITIAL-CONTENTS
; (CL-PPCRE::STR CL-PPCRE::STR) :ELEMENT-TYPE 'CHARACTER
; :FILL-POINTER T :ADJUSTABLE T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a SEQUENCE, not a (OR NULL
(SIMPLE-ARRAY
* (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a SEQUENCE, not a (OR
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
SIMPLE-BASE-STRING
NULL).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (+ (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR))
;
; note: doing signed word to integer coercion (cost 20), for:
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; the first result of inline (signed-byte 64) arithmetic
; (- (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH) (CL-PPCRE::LEN CL-PPCRE::STR))
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :BRANCH) T)
; (LENGTH (CL-PPCRE::CHOICES CL-PPCRE::ALTERNATIONS))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :GREEDY-REPETITION) T)
; (ZEROP LENGTH)
;
; note: unable to
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
; 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.
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :NAMED-REGISTER) T)
; (COPY-SEQ (SECOND CL-PPCRE::PARSE-TREE))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
SIMPLE-COMPILER-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
(AND SYMBOL (NOT NULL))
CHARACTER), not a SIMPLE-BASE-STRING.
SIMPLE-COMPILER-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
(AND SYMBOL (NOT NULL))
CHARACTER), not a (SIMPLE-ARRAY
CHARACTER
(*)).
; in: DEFMETHOD CONVERT-COMPOUND-PARSE-TREE ((EQL :BACK-REFERENCE) T)
; (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME)
;
; 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 (AND SYMBOL (NOT NULL))
; CHARACTER), not a SIMPLE-BASE-STRING.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a LIST.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
;
; 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 (AND SYMBOL (NOT NULL))
; CHARACTER), not a (SIMPLE-ARRAY CHARACTER (*)).
; (COPY-SEQ CL-PPCRE::BACKREF-NAME)
;
; 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 LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
SIMPLE-COMPILER-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 UNSIGNED-BYTE, 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 UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
(UNSIGNED-BYTE 64)
&OPTIONAL).
etc.
; (- CL-PPCRE::REG-NUM CL-PPCRE::REG-INDEX)
;
; 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 UNSIGNED-BYTE, 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 UNSIGNED-BYTE, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-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.
; (1- CL-PPCRE::BACKREF-NUMBER)
;
; 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.
SIMPLE-COMPILER-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.
; (LOOP CL-PPCRE::FOR CL-PPCRE::NAME CL-PPCRE::IN CL-PPCRE::REG-NAMES
; CL-PPCRE::FOR CL-PPCRE::REG-INDEX CL-PPCRE::FROM 0
; WHEN (STRING= CL-PPCRE::NAME CL-PPCRE::BACKREF-NAME)
; CL-PPCRE::COLLECT ...)
; --> LET LET SB-LOOP::WITH-LOOP-LIST-COLLECTION-HEAD LET* TAGBODY
; --> SB-LOOP::LOOP-DESETQ 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
; in: DEFUN CONVERT
; (COERCE (SLOT-VALUE CL-PPCRE::STARTS-WITH 'CL-PPCRE::STR) 'SIMPLE-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/convert-tmp8065ESJT.fasl
; compilation finished in 0:00:00.207
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::CASE-INSENSITIVE-MODE-P in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::MULTI-LINE-MODE-P in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::SINGLE-LINE-MODE-P in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/optimize.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a VECTOR, not a (OR NULL
(SIMPLE-ARRAY
* (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a VECTOR, not a (OR
SIMPLE-BASE-STRING
NULL).
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/optimize.lisp
; in: DEFMETHOD GATHER-STRINGS (SEQ)
; (MAKE-ARRAY CL-PPCRE::COLLECTOR-LENGTH :INITIAL-CONTENTS CL-PPCRE::COLLECTOR
; :ELEMENT-TYPE 'CHARACTER :FILL-POINTER T :ADJUSTABLE T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a VECTOR, not a (OR NULL (SIMPLE-ARRAY * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a VECTOR, not a (OR SIMPLE-BASE-STRING NULL).
SIMPLE-COMPILER-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 FIXNUM, not a (UNSIGNED-BYTE 64).
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
(UNSIGNED-BYTE 64)
&OPTIONAL).
etc.
; (INCF CL-PPCRE::COLLECTOR-LENGTH (CL-PPCRE::LEN CL-PPCRE::ELEMENT))
; --> THE
; ==>
; (+ (CL-PPCRE::LEN CL-PPCRE::ELEMENT) CL-PPCRE::COLLECTOR-LENGTH)
;
; 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 FIXNUM, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
; in: DEFMETHOD START-ANCHORED-P (REPETITION)
; (PLUSP (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION))
;
; 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:
SIMPLE-COMPILER-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.
; 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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
; in: DEFMETHOD START-ANCHORED-P (REGEX)
; (ZEROP (CL-PPCRE::LEN CL-PPCRE::REGEX))
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
; in: DEFMETHOD END-STRING-AUX (SEQ)
; (ZEROP (CL-PPCRE::LEN CL-PPCRE::ELEMENT-END))
;
; 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).
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
;
; 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.
; (MAKE-ARRAY CL-PPCRE::CONCATENATED-LENGTH :INITIAL-CONTENTS
; (REVERSE (CL-PPCRE::STR CL-PPCRE::CONCATENATED-START))
; :ELEMENT-TYPE 'CHARACTER :FILL-POINTER T :ADJUSTABLE T)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a SEQUENCE, not a (OR NULL
(SIMPLE-ARRAY
* (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR NULL (SIMPLE-ARRAY * (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a SEQUENCE, not a (OR
SIMPLE-BASE-STRING
NULL).
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR SIMPLE-BASE-STRING NULL).
; (CHAR CL-PPCRE::STR CL-PPCRE::I)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
; in: DEFMETHOD COMPUTE-MIN-REST (ALTERNATION T)
; (LOOP CL-PPCRE::FOR CL-PPCRE::CHOICE CL-PPCRE::IN (CL-PPCRE::CHOICES
; CL-PPCRE::ALTERNATION)
; CL-PPCRE::MINIMIZE (CL-PPCRE::COMPUTE-MIN-REST CL-PPCRE::CHOICE
; CL-PPCRE::CURRENT-MIN-REST))
; --> LET SB-LOOP::WITH-MINIMAX-VALUE LET TAGBODY
; --> SB-LOOP::LOOP-ACCUMULATE-MINIMAX-VALUE PROGN WHEN IF OR LET IF
; ==>
; (< #:MINMAXTMP11 #:MINMAX10)
;
; 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.
The first argument is a REAL, not a DOUBLE-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.
SIMPLE-COMPILER-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 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.
etc.
;
; 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 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.
; etc.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
; in: DEFMETHOD COMPUTE-MIN-REST (BRANCH T)
; (MIN
; (CL-PPCRE::COMPUTE-MIN-REST (CL-PPCRE::THEN-REGEX CL-PPCRE::BRANCH)
; CL-PPCRE::CURRENT-MIN-REST)
; (CL-PPCRE::COMPUTE-MIN-REST (CL-PPCRE::ELSE-REGEX CL-PPCRE::BRANCH)
; CL-PPCRE::CURRENT-MIN-REST))
;
; 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.
SIMPLE-COMPILER-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.
;
; 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.
SIMPLE-COMPILER-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.
; in: DEFMETHOD COMPUTE-MIN-REST (STR T)
; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::STR))
;
; 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.
SIMPLE-COMPILER-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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
&OPTIONAL).
etc.
; in: DEFMETHOD COMPUTE-MIN-REST (FILTER T)
; (+ CL-PPCRE::CURRENT-MIN-REST (OR (CL-PPCRE::LEN CL-PPCRE::FILTER) 0))
;
; 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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-* (cost 30)
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 (signed-byte 64) arithmetic (cost 4) because:
The first argument is a T, not a (SIGNED-BYTE 64).
The second argument is a T, not a (SIGNED-BYTE 64).
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
&OPTIONAL).
etc.
; in: DEFMETHOD COMPUTE-MIN-REST (REPETITION T)
; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)
; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))
;
; note: forced to do GENERIC-* (cost 30)
; unable to do inline fixnum arithmetic (cost 2) because:
SIMPLE-COMPILER-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 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 T, 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.
; 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 (signed-byte 64) arithmetic (cost 4) because:
; The first argument is a T, not a (SIGNED-BYTE 64).
; The second argument is a T, not a (SIGNED-BYTE 64).
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES (SIGNED-BYTE 64)
; &OPTIONAL).
; etc.
; (+ CL-PPCRE::CURRENT-MIN-REST
; (* (CL-PPCRE::MINIMUM CL-PPCRE::REPETITION)
; (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION)))
;
; 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 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 T, 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.
SIMPLE-COMPILER-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.
; in: DEFMETHOD COMPUTE-MIN-REST (LOOKBEHIND T)
; (+ CL-PPCRE::CURRENT-MIN-REST (CL-PPCRE::LEN CL-PPCRE::LOOKBEHIND))
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-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 COMPUTE-MIN-REST (REGEX T)
; (1+ CL-PPCRE::CURRENT-MIN-REST)
;
; 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.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/optimize-tmp7S8Z6FGF.fasl
; compilation finished in 0:00:00.132
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/closures.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/closures.lisp
; in: DEFUN *STRING*-EQUAL
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; in: DEFMETHOD CREATE-MATCHER-AUX (LOOKBEHIND T)
; (- CL-PPCRE::START-POS CL-PPCRE::LEN)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFMETHOD CREATE-MATCHER-AUX (CHAR-CLASS T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::CHAR-CLASS
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::START-POS))
; (LAMBDA (CL-PPCRE::START-POS)
; (DECLARE (FIXNUM CL-PPCRE::START-POS))
; (AND (< CL-PPCRE::START-POS CL-PPCRE::*END-POS*)
; (CL-PPCRE::CHAR-CLASS-TEST)
; (FUNCALL CL-PPCRE::NEXT-FN (1+ CL-PPCRE::START-POS)))))
; --> LET LAMBDA FUNCTION AND IF IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
; in: DEFMETHOD CREATE-MATCHER-AUX (STR T)
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::START-POS
; CL-PPCRE::NEXT-POS 0 CL-PPCRE::LEN)
; --> LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR CONS VECTOR
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::START-POS) CL-PPCRE::CHR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (LENGTH CL-PPCRE::END-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR CONS VECTOR
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::END-STRING CL-PPCRE::START-POS
; CL-PPCRE::TEST-END-POS 0 CL-PPCRE::END-STRING-LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (+ CL-PPCRE::START-POS CL-PPCRE::LEN)
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; in: DEFMETHOD CREATE-MATCHER-AUX (BACK-REFERENCE T)
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::*STRING* CL-PPCRE::START-POS
; CL-PPCRE::NEXT-POS CL-PPCRE::REG-START CL-PPCRE::REG-END)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
FN is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
NEXT-FN is not known to be a function
; in: DEFMETHOD CREATE-MATCHER-AUX (FILTER T)
; (FUNCALL CL-PPCRE::FN CL-PPCRE::START-POS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; FN is not known to be a function
; (FUNCALL CL-PPCRE::NEXT-FN CL-PPCRE::NEXT-POS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; NEXT-FN is not known to be a function
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/closures-tmpSIT3QPKP.fasl
; compilation finished in 0:00:00.199
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::INSERT-CHAR-CLASS-TESTER in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/repetition-closures.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/repetition-closures.lisp
; in: DEFMETHOD CREATE-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET BLOCK
; --> TAGBODY WHEN IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN)
; --> LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFMETHOD CREATE-GREEDY-NO-ZERO-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFMETHOD CREATE-GREEDY-MATCHER (REPETITION T)
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0
; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; in: DEFMETHOD CREATE-NON-GREEDY-CONSTANT-LENGTH-MATCHER (REPETITION T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> LOOP BLOCK LET LET TAGBODY UNLESS IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN)
; --> LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T)
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (FUNCALL CL-PPCRE::INNER-MATCHER CL-PPCRE::CURR-POS))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
The second argument is a (INTEGER -13835058055282163709
13835058055282163712), not a FIXNUM.
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (INTEGER -9223372036854775808 9223372036854775806), not a FIXNUM.
; The second argument is a (INTEGER -13835058055282163709
; 13835058055282163712), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do -/SIGNED=>INTEGER (cost 7)
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163710 13835058055282163711)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; --> LAMBDA FUNCTION LET 1+
; ==>
; 1
;
; note: forced to do -/SIGNED=>INTEGER (cost 7)
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -9223372036854775807 9223372036854775807), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163710 13835058055282163711)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
unable to do inline fixnum arithmetic (cost 2) because:
The first argument is a (INTEGER -13835058055282163710
13835058055282163711), not a FIXNUM.
The result is a (VALUES
(INTEGER -13835058055282163709 13835058055282163712)
&OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (INTEGER -13835058055282163710
; 13835058055282163711), not a FIXNUM.
; The result is a (VALUES
; (INTEGER -13835058055282163709 13835058055282163712)
; &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR/= #\Newline (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE T)
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE (CL-PPCRE::CHAR-CLASS-TEST)))
; --> LET CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE IF LAMBDA FUNCTION LET
; --> MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*= CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0 CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS
; (+ CL-PPCRE::CURR-POS CL-PPCRE::LEN) 0
; CL-PPCRE::LEN))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR= CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20), for:
the first result of inline (signed-byte 64) arithmetic
; (CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS)))
; --> LAMBDA FUNCTION LET MIN
; ==>
; 1
;
; note: doing signed word to integer coercion (cost 20), for:
; the first result of inline (signed-byte 64) arithmetic
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFMETHOD CREATE-NON-GREEDY-NO-ZERO-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFMETHOD CREATE-NON-GREEDY-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0
; (SVREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
; in:
; DEFMETHOD CREATE-CONSTANT-REPETITION-CONSTANT-LENGTH-MATCHER (REPETITION T)
; (CL-PPCRE::INSERT-CHAR-CLASS-TESTER (CL-PPCRE::REGEX
; (SCHAR CL-PPCRE::*STRING*
; CL-PPCRE::CURR-POS))
; (CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE
; (AND (CL-PPCRE::CHAR-CLASS-TEST) (1+ CL-PPCRE::CURR-POS))))
; --> LET CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE LAMBDA FUNCTION
; --> LET AND IF IF LOOP BLOCK LET TAGBODY UNLESS IF AND IF FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (CHAR-EQUAL CL-PPCRE::CHR (SCHAR CL-PPCRE::*STRING* CL-PPCRE::CURR-POS))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::*STRING*-EQUAL CL-PPCRE::STR CL-PPCRE::CURR-POS CL-PPCRE::NEXT-POS
; 0 CL-PPCRE::LEN)
; --> BLOCK LOOP BLOCK LET LET TAGBODY UNLESS IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::STRING1-IDX)
; (SCHAR CL-PPCRE::STRING2 CL-PPCRE::STRING2-IDX))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFMETHOD CREATE-CONSTANT-REPETITION-MATCHER (REPETITION T)
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0)
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (SETF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM) 0
; (AREF CL-PPCRE::*LAST-POS-STORES* CL-PPCRE::ZERO-LENGTH-NUM) NIL)
; --> SETF LET* FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (ZEROP (CL-PPCRE::MIN-LEN CL-PPCRE::REPETITION))
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
;
; 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.
; (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (INCF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> + AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (DECF (AREF CL-PPCRE::*REPEAT-COUNTERS* CL-PPCRE::REP-NUM))
; --> SB-IMPL::XSUBTRACT AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
; in: DEFMETHOD CREATE-MATCHER-AUX (REPETITION T)
; (ZEROP CL-PPCRE::MAXIMUM)
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; (= CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
;
; 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.
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-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 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
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; 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.
SIMPLE-COMPILER-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-PPCRE::MIN-LEN)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-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-PPCRE::LEN)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-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 SINGLE-FLOAT.
The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
etc.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
; (PLUSP CL-PPCRE::MIN-LEN)
;
; 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-PPCRE::MINIMUM CL-PPCRE::MAXIMUM 1)
;
; 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 SINGLE-FLOAT.
; The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
; etc.
; (EQL CL-PPCRE::MINIMUM CL-PPCRE::MAXIMUM)
;
; 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.
SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
;
; 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.
; (PLUSP CL-PPCRE::MIN-LEN)
;
; 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.
; (PLUSP CL-PPCRE::LEN)
;
; 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.
SIMPLE-COMPILER-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.
; (PLUSP CL-PPCRE::MIN-LEN)
;
; 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.
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/repetition-closures-tmpE0PA0714.fasl
; compilation finished in 0:00:00.597
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::INCF-AFTER in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::GREEDY-CONSTANT-LENGTH-CLOSURE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::NON-GREEDY-CONSTANT-LENGTH-CLOSURE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::CONSTANT-REPETITION-CONSTANT-LENGTH-CLOSURE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/scanner.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/scanner.lisp
; in: DEFUN CREATE-BMH-MATCHER
; (CL-PPCRE::BMH-MATCHER-AUX :CASE-INSENSITIVE-P T)
; --> FUNCTION IF LOOP BLOCK LET TAGBODY LOOP BLOCK LET LET TAGBODY UNLESS IF
; --> AND IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::I)
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; (SCHAR CL-PPCRE::PATTERN CL-PPCRE::J))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; (LENGTH CL-PPCRE::PATTERN)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CHAR-UPCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K))
;
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (CHAR-DOWNCASE (SCHAR CL-PPCRE::PATTERN CL-PPCRE::K))
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; (SEARCH CL-PPCRE::PATTERN CL-PPCRE::*STRING* :START2 CL-PPCRE::START-POS
; :END2 CL-PPCRE::*END-POS* :TEST CL-PPCRE::TEST)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
; in: DEFUN CREATE-CHAR-SEARCHER
; (CL-PPCRE::CHAR-SEARCHER-AUX :CASE-INSENSITIVE-P T)
; --> FUNCTION AND IF LOOP BLOCK LET LET TAGBODY WHEN IF SETQ THE AND IF
; ==>
; (CHAR-EQUAL (SCHAR CL-PPCRE::*STRING* CL-PPCRE::I) CL-PPCRE::CHR)
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; in: DEFUN CREATE-SCANNER-AUX
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-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
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET)
; (FUNCTION CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
The second argument is a CHARACTER, not a BASE-CHAR.
; (CL-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN)
; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The first argument is a CHARACTER, not a BASE-CHAR.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF LOCALLY COND IF AND IF
; --> NOT
; ==>
; 1
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open code
due to type uncertainty:
The second argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The first argument is a CHARACTER, not a BASE-CHAR.
;
; note: unable to
; open code
; due to type uncertainty:
; The second argument is a CHARACTER, not a BASE-CHAR.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS) CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> SIMPLE-COMPILER-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.
SIMPLE-COMPILER-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.
PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
SIMPLE-COMPILER-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-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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.
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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.
SIMPLE-COMPILER-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.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> SIMPLE-COMPILER-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.
PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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.
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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).
SIMPLE-COMPILER-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.
; 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.
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (UNLESS (SETQ CL-PPCRE::POS #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (IF (<= (THE FIXNUM CL-PPCRE::POS) (THE FIXNUM CL-PPCRE::*END-STRING-POS*))
; (RETURN-FROM CL-PPCRE::ADVANCE-FN CL-PPCRE::POS))
; (UNLESS (SETQ CL-PPCRE::*END-STRING-POS* #)
; (RETURN-FROM CL-PPCRE:SCAN NIL))
; CL-PPCRE::POS))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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.
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
SIMPLE-COMPILER-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.
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET)
; (FUNCTION CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::INSERT-ADVANCE-FN
; (CL-PPCRE::ADVANCE-FN (CL-PPCRE::POS)
; (DECLARE (FIXNUM CL-PPCRE::END-STRING-OFFSET CL-PPCRE::STARTS-WITH-LEN)
; (FUNCTION CL-PPCRE::START-STRING-TEST CL-PPCRE::END-STRING-TEST))
; (LOOP (UNLESS (SETQ #) (RETURN-FROM CL-PPCRE:SCAN NIL))
; (LOCALLY
; (DECLARE #)
; (WHEN # #)
; (LET #
; #)))))
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF <
; ==>
; (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
;
; 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.
SIMPLE-COMPILER-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.
; 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.
SIMPLE-COMPILER-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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF AND IF
; ==>
; (< (+ CL-PPCRE::*END-STRING-POS* CL-PPCRE::END-STRING-LEN)
; CL-PPCRE::*END-POS*)
;
; 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.
; --> FUNCTION BLOCK LET* LABELS COND IF PROGN WHEN IF BLOCK LOOP BLOCK TAGBODY
; --> PROGN LET COND IF IF INCF SETQ THE
; ==>
; (+ 1 CL-PPCRE::*END-STRING-POS*)
;
; 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.
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20) from TRY-POS
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20) from TRY-POS
; (FUNCALL CL-PPCRE::END-STRING-TEST CL-PPCRE::TRY-POS)
;
; note: doing signed word to integer coercion (cost 20) from TRY-POS
;
; note: doing signed word to integer coercion (cost 20) from TRY-POS
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/scanner-tmpJRWHHVG0.fasl
; compilation finished in 0:00:00.621
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::BMH-MATCHER-AUX in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::CHAR-SEARCHER-AUX in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::INSERT-ADVANCE-FN in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/api.lisp" (written 07 APR 2019 05:51:26 PM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a LIST.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; file: /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/api.lisp
; in: DEFMETHOD CREATE-SCANNER (STRING)
; (COPY-SEQ CL-PPCRE::QUOTED-REGEX-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 LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; in: DEFMETHOD CREATE-SCANNER (T)
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
; (= 1 (CL-PPCRE::LEN CL-PPCRE::END-STRING))
;
; 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).
;
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-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 because: The operands might not be the same type.
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH))
;
; 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.
; (= 1 (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH))
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; 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.
SIMPLE-COMPILER-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.
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::END-STRING))
;
; 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.
SIMPLE-COMPILER-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.
; (PLUSP (CL-PPCRE::LEN CL-PPCRE::STARTS-WITH))
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD SCAN (STRING T)
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
; (FUNCALL (CL-PPCRE:CREATE-SCANNER CL-PPCRE::REGEX-STRING)
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
; CL-PPCRE::START CL-PPCRE::END)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
NULL).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD SCAN #'T
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFMETHOD SCAN (T T)
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
; (FUNCALL (CL-PPCRE:CREATE-SCANNER CL-PPCRE::PARSE-TREE)
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
; CL-PPCRE::START CL-PPCRE::END)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; (CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
; (NOT (SIMPLE-ARRAY CHARACTER (*))) 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 SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN SCAN-TO-STRINGS
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; (MAP 'VECTOR
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (IF CL-PPCRE::REG-START
; (FUNCALL CL-PPCRE::SUBSTR-FN CL-PPCRE::TARGET-STRING
; CL-PPCRE::REG-START CL-PPCRE::REG-END)
; NIL))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
; 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.
&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST: &OPTIONAL and &KEY found in the same lambda list: (MATCH-START
MATCH-END
REG-STARTS
REG-ENDS
REGEX
TARGET-STRING
&OPTIONAL
RESULT-FORM
&KEY
START
END)
; in: DEFMACRO DO-SCANS
; (DEFMACRO CL-PPCRE:DO-SCANS
; (
; (CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS
; CL-PPCRE::REG-ENDS
; CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END)
; &BODY CL-PPCRE::BODY &ENVIRONMENT CL-PPCRE::ENV)
; #<(SIMPLE-ARRAY CHARACTER
; (495)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with MATCH-START, MATCH-END, REG-STARTS, and
; REG-ENDS bound to the four return values of each match in turn. ... {1104512B0F}>
; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING)
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::%START CL-PPCRE::%END
; CL-PPCRE::%REGEX CL-PPCRE::SCANNER)
; (DECLARE (IGNORABLE CL-PPCRE::%REGEX CL-PPCRE::SCANNER))
; `(BLOCK NIL
; (LET* #
; #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (MATCH-START MATCH-END
; REG-STARTS REG-ENDS REGEX
; TARGET-STRING &OPTIONAL
; RESULT-FORM &KEY START END)
&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST: &OPTIONAL and &KEY found in the same lambda list: (MATCH-START
MATCH-END
REGEX
TARGET-STRING
&OPTIONAL
RESULT-FORM
&KEY
START
END)
; in: DEFMACRO DO-MATCHES
; (DEFMACRO CL-PPCRE:DO-MATCHES
; (
; (CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END
; CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END)
; &BODY CL-PPCRE::BODY)
; #<(SIMPLE-ARRAY CHARACTER
; (477)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with MATCH-START and MATCH-END bound to the
; start/end positions of each match in turn. After the last match,
; ... {11048DEA5F}>
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
; `(CL-PPCRE:DO-SCANS (,CL-PPCRE::MATCH-START ,CL-PPCRE::MATCH-END
; ,CL-PPCRE::REG-STARTS ,CL-PPCRE::REG-ENDS
; ,CL-PPCRE::REGEX ,CL-PPCRE::TARGET-STRING
; ,CL-PPCRE::RESULT-FORM :START ,CL-PPCRE::START :END
; ,CL-PPCRE::END)
; ,@CL-PPCRE::BODY)))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (MATCH-START MATCH-END REGEX
; TARGET-STRING &OPTIONAL
; RESULT-FORM &KEY START END)
&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST: &OPTIONAL and &KEY found in the same lambda list: (MATCH-VAR
REGEX
TARGET-STRING
&OPTIONAL
RESULT-FORM
&KEY
START
END
SHAREDP)
; in: DEFMACRO DO-MATCHES-AS-STRINGS
; (DEFMACRO CL-PPCRE:DO-MATCHES-AS-STRINGS
; (
; (CL-PPCRE::MATCH-VAR
; CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END
; CL-PPCRE::SHAREDP)
; &BODY CL-PPCRE::BODY)
; #<(SIMPLE-ARRAY CHARACTER
; (569)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with MATCH-VAR bound to the substring of
; TARGET-STRING corresponding to each match in turn. After the last
; ma... {1104A58DDF}>
; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING)
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::SUBSTR-FN)
; `(LET (#)
; (CL-PPCRE:DO-MATCHES #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (MATCH-VAR REGEX
; TARGET-STRING &OPTIONAL
; RESULT-FORM &KEY START END
; SHAREDP)
&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST: &OPTIONAL and &KEY found in the same lambda list: (REGEX
TARGET-STRING
&OPTIONAL
RESULT-FORM
&KEY
START
END
SHAREDP)
; in: DEFMACRO DO-REGISTER-GROUPS
; (DEFMACRO CL-PPCRE:DO-REGISTER-GROUPS
; (CL-PPCRE::VAR-LIST
; (CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; &OPTIONAL
; CL-PPCRE::RESULT-FORM
; &KEY
; CL-PPCRE::START
; CL-PPCRE::END
; CL-PPCRE::SHAREDP)
; &BODY CL-PPCRE::BODY)
; #<(SIMPLE-ARRAY CHARACTER
; (820)) Iterates over TARGET-STRING and tries to match REGEX as often as
; possible evaluating BODY with the variables in VAR-LIST bound to the
; corresponding register groups for each match in turn, i.e. each
; va... {1104C1ED2F}>
; (CL-PPCRE::WITH-REBINDING (CL-PPCRE::TARGET-STRING)
; (CL-PPCRE::WITH-UNIQUE-NAMES (CL-PPCRE::SUBSTR-FN CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END CL-PPCRE::REG-STARTS
; CL-PPCRE::REG-ENDS CL-PPCRE::START-INDEX)
; `(LET (#)
; (CL-PPCRE:DO-SCANS #
; #)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (REGEX TARGET-STRING
; &OPTIONAL RESULT-FORM
; &KEY START END SHAREDP)
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN ALL-MATCHES
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-MATCHES (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REGEX CL-PPCRE::TARGET-STRING
; (NREVERSE CL-PPCRE::RESULT-LIST) :START CL-PPCRE::START
; :END CL-PPCRE::END)
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::RESULT-LIST)
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::RESULT-LIST))
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; --> LET BLOCK LET* OR LET IF
; ==>
; (LENGTH #:TARGET-STRING3)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
; --> LET BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND
; --> IF THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-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 SINGLE-FLOAT.
The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
etc.
; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; 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 SINGLE-FLOAT.
; The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; --> LET BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN ALL-MATCHES-AS-STRINGS
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-MATCHES-AS-STRINGS (CL-PPCRE::MATCH CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING
; (NREVERSE CL-PPCRE::RESULT-LIST) :START
; CL-PPCRE::START :END CL-PPCRE::END :SHAREDP
; CL-PPCRE::SHAREDP)
; (PUSH CL-PPCRE::MATCH CL-PPCRE::RESULT-LIST))
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* OR LET IF
; ==>
; (LENGTH #:TARGET-STRING7)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* SETQ THE
; --> CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK
; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE
; --> IF
; ==>
; (= #:MATCH-START2 #:MATCH-END3)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK
; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE
; --> IF 1+
; ==>
; 1
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-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 SINGLE-FLOAT.
The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
etc.
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK
; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE
; --> IF
; ==>
; (= #:MATCH-START2 #:MATCH-END3)
;
; 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 SINGLE-FLOAT.
; The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; --> LET CL-PPCRE:DO-MATCHES CL-PPCRE:DO-SCANS LET BLOCK LET* LOOP BLOCK
; --> TAGBODY PROGN MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL FUNCTION SETQ THE
; --> IF 1+
; ==>
; 1
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN SPLIT
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (UNLESS
; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)))
; (WHEN
; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT))
; (RETURN))
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (WHEN CL-PPCRE::WITH-REGISTERS-P
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...))
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)))
; --> BLOCK LET* OR LET IF
; ==>
; (LENGTH #:TARGET-STRING1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF
; --> THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
; (SIMPLE-ARRAY
; * (*))).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a REAL, not a DOUBLE-FLOAT.
;
; note: unable to open code because: The operands might not be the same type.
; (PLUSP CL-PPCRE::LIMIT)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...)
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; --> LET LET LET LET TAGBODY SB-LOOP::LOOP-DESETQ SETQ THE AREF
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (UNLESS
; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)))
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; (WHEN
; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT))
; (RETURN))
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (WHEN CL-PPCRE::WITH-REGISTERS-P
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...))
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)))
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-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.
; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
SIMPLE-COMPILER-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.
; 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.
SIMPLE-COMPILER-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 SINGLE-FLOAT.
The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
etc.
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; 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 SINGLE-FLOAT.
; The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-= (cost 10)
unable to do inline float comparison (cost 3) because:
The first argument is a NUMBER, 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 NUMBER, not a SINGLE-FLOAT.
The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
etc.
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST))
;
; note: forced to do GENERIC-= (cost 10)
; unable to do inline float comparison (cost 3) because:
; The first argument is a NUMBER, 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 NUMBER, not a SINGLE-FLOAT.
; The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-> (cost 10)
unable to do inline fixnum comparison (cost 3) because:
The first argument is a (NOT NULL), not a FIXNUM.
unable to do inline fixnum comparison (cost 4) because:
The first argument is a (NOT NULL), not a FIXNUM.
etc.
; (PLUSP CL-PPCRE::LIMIT)
;
; note: forced to do GENERIC-> (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a (NOT NULL), not a FIXNUM.
; etc.
SIMPLE-COMPILER-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.
; (INCF CL-PPCRE::COUNTER)
; --> THE
; ==>
; (+ 1 CL-PPCRE::COUNTER)
;
; 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.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-= (cost 10)
unable to do inline float comparison (cost 3) because:
The first argument is a NUMBER, 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 NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
etc.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (UNLESS
; (AND (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
; (= CL-PPCRE::MATCH-START (CAR CL-PPCRE::POS-LIST)))
; (WHEN
; (AND CL-PPCRE::LIMIT (PLUSP CL-PPCRE::LIMIT) (>= # CL-PPCRE::LIMIT))
; (RETURN))
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (WHEN CL-PPCRE::WITH-REGISTERS-P
; (LOOP CL-PPCRE::FOR CL-PPCRE::REG-START CL-PPCRE::ACROSS CL-PPCRE::REG-STARTS
; CL-PPCRE::FOR CL-PPCRE::REG-END CL-PPCRE::ACROSS CL-PPCRE::REG-ENDS
; IF CL-PPCRE::REG-START
; DO ...))
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)))
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: forced to do GENERIC-= (cost 10)
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
; unable to do inline float comparison (cost 3) because:
; The first argument is a NUMBER, 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 NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; etc.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
SIMPLE-COMPILER-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 (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
etc.
; (> CL-PPCRE::THIS-END CL-PPCRE::THIS-START)
;
; 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 (NOT NULL), 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 (NOT NULL), not a DOUBLE-FLOAT.
; etc.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN STRING-CASE-MODIFIER
; (CHAR CL-PPCRE::STR (1- CL-PPCRE::FROM))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR CL-PPCRE::STR CL-PPCRE::FROM)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR CL-PPCRE::STR CL-PPCRE::TO)
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR CL-PPCRE::STR (1- CL-PPCRE::TO))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; (CHAR CL-PPCRE::STR CL-PPCRE::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
expand inline
because:
upgraded array element type not known at compile time
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFMETHOD BUILD-REPLACEMENT-TEMPLATE (STRING)
; (POSITION-IF #'CL-PPCRE::DIGIT-CHAR-P CL-PPCRE::REPLACEMENT-STRING :START
; CL-PPCRE::MATCH-START :END CL-PPCRE::MATCH-END)
;
; note: unable to
; expand inline
; because:
; upgraded array element type not known at compile time
; (CHAR CL-PPCRE::REPLACEMENT-STRING (1+ CL-PPCRE::MATCH-START))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 4) because:
The second argument is a (NOT NULL), not a FIXNUM.
; (< CL-PPCRE::FROM CL-PPCRE::MATCH-START)
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 4) because:
; The second argument is a (NOT NULL), not a FIXNUM.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-- (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first 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 fixnum arithmetic (cost 2) because:
The first argument is a (OR NULL INTEGER), not a FIXNUM.
The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
&OPTIONAL).
etc.
; (1-
; (PARSE-INTEGER CL-PPCRE::REPLACEMENT-STRING :START CL-PPCRE::PARSE-START
; :JUNK-ALLOWED T))
;
; note: forced to do GENERIC-- (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR NULL INTEGER), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
SIMPLE-COMPILER-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.
; unable to do inline fixnum arithmetic (cost 2) because:
; The first argument is a (OR NULL INTEGER), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; etc.
; (< CL-PPCRE::TOKEN 0)
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
The array dimensions are unknown; must call ARRAY-DIMENSION at runtime.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
can't determine sequence argument type
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TOKEN is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
open code
because:
can't determine sequence argument type
; in: DEFUN BUILD-REPLACEMENT
; (ARRAY-DIMENSION CL-PPCRE::REG-STARTS 0)
;
; note: unable to
; optimize
; because:
; The array dimensions are unknown; must call ARRAY-DIMENSION at runtime.
; (MAP 'LIST
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (AND CL-PPCRE::REG-START
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
; note: unable to open code because: can't determine sequence argument type
; (APPLY CL-PPCRE::TOKEN
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END)
; (MAP 'LIST
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (AND CL-PPCRE::REG-START
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING
; CL-PPCRE::REG-START
; CL-PPCRE::REG-END)))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TOKEN is not known to be a function
; (MAP 'LIST
; (LAMBDA (CL-PPCRE::REG-START CL-PPCRE::REG-END)
; (AND CL-PPCRE::REG-START
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)))
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
TOKEN is not known to be a function
; note: unable to open code because: can't determine sequence argument type
; (FUNCALL CL-PPCRE::TOKEN CL-PPCRE::TARGET-STRING CL-PPCRE::START
; CL-PPCRE::END CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; TOKEN is not known to be a function
SIMPLE-COMPILER-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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
&OPTIONAL).
etc.
; (CL-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::REG-START
; CL-PPCRE::REG-END)
; --> MAKE-ARRAY
; ==>
; (- CL-PPCRE::END CL-PPCRE::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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
&OPTIONAL).
etc.
;
; 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 (NOT NULL), 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 (NOT NULL), not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-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.
; (1+ CL-PPCRE::TOKEN)
;
; 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.
SIMPLE-COMPILER-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-PPCRE::NSUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::MATCH-START
; CL-PPCRE::MATCH-END)
;
; 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.
SIMPLE-COMPILER-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.
; --> MAKE-ARRAY
; ==>
; (- CL-PPCRE::END CL-PPCRE::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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a LIST.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
; in: DEFUN REGEX-REPLACE
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (SUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::START CL-PPCRE::END)
;
; 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 LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN REGEX-REPLACE-ALL
; (LENGTH CL-PPCRE::TARGET-STRING)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST)
; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST))
; --> BLOCK LET* OR LET IF
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; ==>
; (LENGTH #:TARGET-STRING1)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> BLOCK LET* SETQ THE CL-PPCRE::MAYBE-COERCE-TO-SIMPLE-STRING LET COND IF
; --> THE COERCE
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
NULL
(SIMPLE-ARRAY
*
(*))).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR NULL
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a (OR LIST
(AND
(NOT SIMPLE-BASE-STRING)
(NOT
; (SIMPLE-ARRAY
; * (*))).
(SIMPLE-ARRAY CHARACTER
(*)))
VECTOR)
SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
SIMPLE-BASE-STRING
NULL).
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a (OR LIST
; (AND (NOT SIMPLE-BASE-STRING)
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a SINGLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; (NOT (SIMPLE-ARRAY CHARACTER (*))) VECTOR)
; SB-KERNEL:EXTENDED-SEQUENCE), not a (OR
; SIMPLE-BASE-STRING
; NULL).
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a DOUBLE-FLOAT.
The second argument is a NUMBER, not a RATIONAL.
; due to type uncertainty:
; The first argument is a NUMBER, not a SINGLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
SINGLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a DOUBLE-FLOAT.
; The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX SINGLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a NUMBER, not a (COMPLEX
DOUBLE-FLOAT).
The second argument is a NUMBER, not a RATIONAL.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a NUMBER, not a (COMPLEX DOUBLE-FLOAT).
; The second argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; (SUBSEQ CL-PPCRE::TARGET-STRING CL-PPCRE::START CL-PPCRE::END)
;
; note: unable to
; optimize
; due to type uncertainty:
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a LIST.
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a SB-KERNEL:EXTENDED-SEQUENCE.
SIMPLE-COMPILER-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 SINGLE-FLOAT.
The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
etc.
; (CL-PPCRE:DO-SCANS (CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END
; CL-PPCRE::REG-STARTS CL-PPCRE::REG-ENDS CL-PPCRE::REGEX
; CL-PPCRE::TARGET-STRING NIL :START CL-PPCRE::START :END
; CL-PPCRE::END)
; (PUSH CL-PPCRE::MATCH-START CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::MATCH-END CL-PPCRE::POS-LIST)
; (PUSH CL-PPCRE::REG-STARTS CL-PPCRE::REG-LIST)
; (PUSH CL-PPCRE::REG-ENDS CL-PPCRE::REG-LIST))
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF
; ==>
; (= CL-PPCRE::MATCH-START CL-PPCRE::MATCH-END)
;
; 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 SINGLE-FLOAT.
; The second argument is a T, not a (COMPLEX SINGLE-FLOAT).
; etc.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; --> BLOCK LET* LOOP BLOCK TAGBODY PROGN MULTIPLE-VALUE-BIND
; --> MULTIPLE-VALUE-CALL FUNCTION SETQ THE IF 1+
; ==>
; 1
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a NUMBER, 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 NUMBER, not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST: &OPTIONAL and &KEY found in the same lambda list: (REGEX
&OPTIONAL
PACKAGES
&KEY
(CASE-INSENSITIVE
T))
; in: DEFUN REGEX-APROPOS-LIST
; (DEFUN CL-PPCRE:REGEX-APROPOS-LIST
; (CL-PPCRE::REGEX
; &OPTIONAL CL-PPCRE::PACKAGES
; &KEY (CL-PPCRE::CASE-INSENSITIVE T))
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; #<(SIMPLE-ARRAY CHARACTER
; (221)) Similar to the standard function APROPOS-LIST but returns a list of
; all symbols which match the regular expression REGEX. If
; CASE-INSENSITIVE is true and REGEX isn't already a scanner, a
; case-insensi... {11045BEF4F}>
; (LET ((CL-PPCRE::COLLECTOR 'NIL))
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE
; CL-PPCRE::COLLECTOR)
; (PUSH SYMBOL CL-PPCRE::COLLECTOR))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS-LIST
; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY
; (CL-PPCRE::CASE-INSENSITIVE T))
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; #<(SIMPLE-ARRAY CHARACTER
; (221)) Similar to the standard function APROPOS-LIST but returns a list of
; all symbols which match the regular expression REGEX. If
; CASE-INSENSITIVE is true and REGEX isn't already a scanner, a
; case-insensi... {11045BEF4F}>
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (BLOCK CL-PPCRE:REGEX-APROPOS-LIST
; (LET ((CL-PPCRE::COLLECTOR 'NIL))
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE
; CL-PPCRE::COLLECTOR)
; (PUSH SYMBOL CL-PPCRE::COLLECTOR)))))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (REGEX &OPTIONAL PACKAGES
; &KEY
; (CASE-INSENSITIVE T))
&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST: &OPTIONAL and &KEY found in the same lambda list: (REGEX
&OPTIONAL
PACKAGES
&KEY
(CASE-INSENSITIVE
T))
; in: DEFUN REGEX-APROPOS
; (DEFUN CL-PPCRE:REGEX-APROPOS
; (CL-PPCRE::REGEX
; &OPTIONAL CL-PPCRE::PACKAGES
; &KEY (CL-PPCRE::CASE-INSENSITIVE T))
; #<(SIMPLE-ARRAY CHARACTER
; (216)) Similar to the standard function APROPOS but returns a list of all
; symbols which match the regular expression REGEX. If CASE-INSENSITIVE
; is true and REGEX isn't already a scanner, a case-insensitive ... {1104A2260F}>
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE)
; (CL-PPCRE::PRINT-SYMBOL-INFO SYMBOL))
; (VALUES))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; ==>
; #'(SB-INT:NAMED-LAMBDA CL-PPCRE:REGEX-APROPOS
; (CL-PPCRE::REGEX &OPTIONAL CL-PPCRE::PACKAGES &KEY
; (CL-PPCRE::CASE-INSENSITIVE T))
; (DECLARE (SB-C::TOP-LEVEL-FORM))
; #<(SIMPLE-ARRAY CHARACTER
; (216)) Similar to the standard function APROPOS but returns a list of all
; symbols which match the regular expression REGEX. If CASE-INSENSITIVE
; is true and REGEX isn't already a scanner, a case-insensitive ... {1104A2260F}>
; (DECLARE (OPTIMIZE SPEED (SPACE 0) (DEBUG 1) (COMPILATION-SPEED 0)))
; (BLOCK CL-PPCRE:REGEX-APROPOS
; (CL-PPCRE::REGEX-APROPOS-AUX (CL-PPCRE::REGEX CL-PPCRE::PACKAGES
; CL-PPCRE::CASE-INSENSITIVE)
; (CL-PPCRE::PRINT-SYMBOL-INFO SYMBOL))
; (VALUES)))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (REGEX &OPTIONAL PACKAGES
; &KEY
; (CASE-INSENSITIVE T))
; wrote /exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/api-tmp4WZVROCX.fasl
; compilation finished in 0:00:00.487
COMPILE-WARNED-WARNING: Lisp compilation had style-warnings while
compiling #
WARNING:
Lisp compilation had style-warnings while
compiling #
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE:REGISTER-GROUPS-BIND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE:DO-SCANS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE:DO-MATCHES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE:DO-MATCHES-AS-STRINGS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE:DO-REGISTER-GROUPS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE::REGEX-APROPOS-AUX in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining CL-PPCRE:DEFINE-PARSE-TREE-SYNONYM in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/package.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/package-tmpA0I3UKX8.fasl
; compilation finished in 0:00:00.088
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/depdefs.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/depdefs-tmp267Y2N80.fasl
; compilation finished in 0:00:00.200
REDEFINITION-WITH-DEFUN: redefining XLIB::%REEVALUATE-CONSTANT in DEFUN
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-CONSTANT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFCONSTANT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-VECTOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITHIN-DEFINITION in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RESOURCE-ID-MAP-TEST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::ATOM-CACHE-MAP-TEST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYSYM->CHARACTER-MAP-TEST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX+ in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-LOGAND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-LOGIOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX- in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX* in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX1+ in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX1- in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-INCF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-DECF in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-MIN in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-MAX in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-FLOOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-CEILING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-TRUNCATE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-MOD in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-ASH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-PLUSP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-ZEROP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-EVENP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX-ODDP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX> in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX= in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX< in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX>= in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INDEX<= in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEF-CLX-CLASS in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/clx.lisp" (written 13 MAY 2024 09:28:08 AM):
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/clx.lisp
; in: DEFUN ENCODE-EVENT-MASK
; (XLIB::X-TYPE-ERROR XLIB:EVENT-MASK 'XLIB:EVENT-MASK)
;
; note: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFUN ENCODE-DEVICE-EVENT-MASK
; (XLIB::X-TYPE-ERROR XLIB:DEVICE-EVENT-MASK 'XLIB:DEVICE-EVENT-MASK)
;
; note: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFUN ENCODE-MODIFIER-MASK
; (XLIB::X-TYPE-ERROR XLIB:MODIFIER-MASK 'XLIB:MODIFIER-MASK)
;
; note: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFUN ENCODE-STATE-MASK
; (XLIB::X-TYPE-ERROR XLIB::STATE-MASK
; '(OR XLIB:MASK16 (XLIB::CLX-LIST XLIB:STATE-MASK-KEY)))
;
; note: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFUN ENCODE-POINTER-EVENT-MASK
; (XLIB::X-TYPE-ERROR XLIB:POINTER-EVENT-MASK 'XLIB:POINTER-EVENT-MASK)
;
; note: deleting unreachable code
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/clx-tmpOUPE5FSJ.fasl
; compilation finished in 0:00:00.840
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/dependent.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
open-code INTEGER to RATIO comparison
due to type uncertainty:
The first argument is a RATIONAL, not a INTEGER.
SIMPLE-COMPILER-NOTE: unable to
open-code INTEGER to RATIO comparison
due to type uncertainty:
The first argument is a (RATIONAL
-884279719003555/140737488355328), not a INTEGER.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/dependent.lisp
; in: DEFUN RADIANS->INT16
; (DEFUN XLIB::RADIANS->INT16 (XLIB::VALUE)
; (DECLARE (TYPE XLIB:ANGLE XLIB::VALUE))
; (DECLARE (XLIB::CLX-VALUES XLIB:INT16))
; (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 1) (DEBUG 1)))
; (THE XLIB:INT16 (VALUES (ROUND (THE XLIB:ANGLE XLIB::VALUE) 2.727077e-4))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> SB-C::%FUNCALL MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: unable to
; open-code INTEGER to RATIO comparison
; due to type uncertainty:
; The first argument is a RATIONAL, not a INTEGER.
;
; note: unable to
; open-code INTEGER to RATIO comparison
; due to type uncertainty:
; The first argument is a (RATIONAL
; -884279719003555/140737488355328), not a INTEGER.
&OPTIONAL-AND-&KEY-IN-LAMBDA-LIST: &OPTIONAL and &KEY found in the same lambda list: (LOCK
DISPLAY
&OPTIONAL
(WHOSTATE
CLX wait)
&KEY
TIMEOUT)
; in: DEFMACRO HOLDING-LOCK
; (DEFMACRO XLIB::HOLDING-LOCK
; (
; (XLIB::LOCK
; XLIB:DISPLAY
; &OPTIONAL
; (XLIB::WHOSTATE "CLX wait")
; &KEY
; XLIB::TIMEOUT)
; &BODY XLIB::BODY)
; (DECLARE (IGNORE XLIB:DISPLAY XLIB::WHOSTATE))
; `(SB-THREAD:WITH-RECURSIVE-LOCK (,XLIB::LOCK
; ,@(WHEN XLIB::TIMEOUT
; `(:TIMEOUT ,XLIB::TIMEOUT)))
; ,@XLIB::BODY))
;
; caught STYLE-WARNING:
; &OPTIONAL and &KEY found in the same lambda list: (LOCK DISPLAY &OPTIONAL
; (WHOSTATE CLX wait) &KEY
; TIMEOUT)
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFMACRO READ-IMAGE-LOAD-BYTE
; (SETQ POSITION (- 7 POSITION))
;
; note: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFMACRO READ-IMAGE-ASSEMBLE-BYTES
; (SETQ XLIB::BYTES (REVERSE XLIB::BYTES))
;
; note: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFMACRO WRITE-IMAGE-LOAD-BYTE
; (- XLIB::INTEGER-SIZE 8 POSITION)
;
; note: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFMACRO WRITE-IMAGE-ASSEMBLE-BYTES
; (SETQ XLIB::BYTES (REVERSE XLIB::BYTES))
;
; note: deleting unreachable code
SIMPLE-COMPILER-NOTE: unable to
inline non-SIMPLE-vector-handling logic
due to type uncertainty:
The first argument is a (AND ARRAY
(NOT
(SIMPLE-ARRAY *
(*)))), not a (OR VECTOR
SIMPLE-ARRAY).
; in: DEFUN COPY-BIT-RECT
; (SB-KERNEL:WITH-ARRAY-DATA ((XLIB::SDATA XLIB::SOURCE) (XLIB::SSTART)
; (XLIB::SEND))
; (DECLARE (IGNORE XLIB::SEND))
; (SB-KERNEL:WITH-ARRAY-DATA ((XLIB::DDATA XLIB::DEST) (XLIB::DSTART)
; (XLIB::DEND))
; (DECLARE (IGNORE XLIB::DEND))
; (ASSERT (AND (ZEROP XLIB::SSTART) (ZEROP XLIB::DSTART)))
; (DO ((XLIB::SRC-IDX # #)
; (XLIB::DEST-IDX # #)
; (COUNT XLIB::HEIGHT #))
; ((ZEROP COUNT))
; (DECLARE (TYPE XLIB:ARRAY-INDEX XLIB::SRC-IDX XLIB::DEST-IDX COUNT))
; (SB-KERNEL:UB1-BASH-COPY XLIB::SDATA XLIB::SRC-IDX XLIB::DDATA
; XLIB::DEST-IDX XLIB::WIDTH))))
; --> LET LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND IF THE
; ==>
; (SB-KERNEL:%WITH-ARRAY-DATA #:N-ARRAY0 #:N-SVALUE1 #:N-EVALUE2)
;
; note: unable to
; inline non-SIMPLE-vector-handling logic
; due to type uncertainty:
; The first argument is a (AND ARRAY (NOT (SIMPLE-ARRAY * (*)))), not a (OR
; VECTOR
; SIMPLE-ARRAY).
SIMPLE-COMPILER-NOTE: unable to
inline non-SIMPLE-vector-handling logic
due to type uncertainty:
The first argument is a (AND ARRAY
(NOT
(SIMPLE-ARRAY *
(*)))), not a (OR VECTOR
SIMPLE-ARRAY).
; (SB-KERNEL:WITH-ARRAY-DATA ((XLIB::DDATA XLIB::DEST) (XLIB::DSTART)
; (XLIB::DEND))
; (DECLARE (IGNORE XLIB::DEND))
; (ASSERT (AND (ZEROP XLIB::SSTART) (ZEROP XLIB::DSTART)))
; (DO ((XLIB::SRC-IDX (XLIB::INDEX+ # XLIB::SX #)
; (XLIB::INDEX+ XLIB::SRC-IDX XLIB::SOURCE-WIDTH))
; (XLIB::DEST-IDX (XLIB::INDEX+ # XLIB::DX #)
; (XLIB::INDEX+ XLIB::DEST-IDX XLIB::DEST-WIDTH))
; (COUNT XLIB::HEIGHT (1- COUNT)))
; ((ZEROP COUNT))
; (DECLARE (TYPE XLIB:ARRAY-INDEX XLIB::SRC-IDX XLIB::DEST-IDX COUNT))
; (SB-KERNEL:UB1-BASH-COPY XLIB::SDATA XLIB::SRC-IDX XLIB::DDATA
; XLIB::DEST-IDX XLIB::WIDTH)))
; --> LET LET MULTIPLE-VALUE-BIND MULTIPLE-VALUE-CALL COND IF THE
; ==>
; (SB-KERNEL:%WITH-ARRAY-DATA #:N-ARRAY5 #:N-SVALUE6 #:N-EVALUE7)
;
; note: unable to
; inline non-SIMPLE-vector-handling logic
; due to type uncertainty:
; The first argument is a (AND ARRAY (NOT (SIMPLE-ARRAY * (*)))), not a (OR
; VECTOR
; SIMPLE-ARRAY).
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20)
; in: DEFUN FAST-READ-PIXARRAY-USING-BITBLT
; (XLIB::COPY-BIT-RECT XLIB::BBUF
; (XLIB::INDEX* XLIB::PADDED-BYTES-PER-LINE SB-VM:N-BYTE-BITS)
; (XLIB::INDEX* XLIB::BOFFSET SB-VM:N-BYTE-BITS) 0 XLIB:PIXARRAY
; (XLIB::INDEX* (ARRAY-DIMENSION XLIB:PIXARRAY 1) XLIB::BITS-PER-PIXEL)
; XLIB::X XLIB::Y XLIB::HEIGHT (XLIB::INDEX* XLIB::WIDTH XLIB::BITS-PER-PIXEL))
;
; note: doing signed word to integer coercion (cost 20)
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFUN FAST-READ-PIXARRAY
; (XLIB::READ-PIXARRAY-INTERNAL XLIB::BBUF XLIB::BOFFSET XLIB:PIXARRAY XLIB::X
; XLIB::Y XLIB::WIDTH XLIB::HEIGHT XLIB::PADDED-BYTES-PER-LINE
; XLIB::BITS-PER-PIXEL FUNCTION XLIB::UNIT ...)
;
; note: deleting unreachable code
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
The array dimensions are unknown; must call ARRAY-DIMENSION at runtime.
SIMPLE-COMPILER-NOTE: doing signed word to integer coercion (cost 20)
; in: DEFUN FAST-WRITE-PIXARRAY-USING-BITBLT
; (ARRAY-DIMENSION XLIB:PIXARRAY 1)
;
; note: unable to
; optimize
; because:
; The array dimensions are unknown; must call ARRAY-DIMENSION at runtime.
; (XLIB::COPY-BIT-RECT XLIB:PIXARRAY
; (XLIB::INDEX* (ARRAY-DIMENSION XLIB:PIXARRAY 1) XLIB::BITS-PER-PIXEL)
; XLIB::X XLIB::Y XLIB::BBUF
; (XLIB::INDEX* XLIB::PADDED-BYTES-PER-LINE SB-VM:N-BYTE-BITS)
; (XLIB::INDEX* XLIB::BOFFSET SB-VM:N-BYTE-BITS) 0 XLIB::HEIGHT
; (XLIB::INDEX* XLIB::WIDTH XLIB::BITS-PER-PIXEL))
;
; note: doing signed word to integer coercion (cost 20)
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; in: DEFUN FAST-WRITE-PIXARRAY
; (XLIB::WRITE-PIXARRAY-INTERNAL XLIB::BBUF XLIB::BOFFSET XLIB:PIXARRAY XLIB::X
; XLIB::Y XLIB::WIDTH XLIB::HEIGHT XLIB::PADDED-BYTES-PER-LINE
; XLIB::BITS-PER-PIXEL FUNCTION XLIB::+IMAGE-UNIT+ ...)
;
; note: deleting unreachable code
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/dependent-tmpIGHCU6ZA.fasl
; compilation finished in 0:00:00.228
COMPILE-WARNED-WARNING: Lisp compilation had style-warnings while
compiling #
WARNING:
Lisp compilation had style-warnings while
compiling #
REDEFINITION-WITH-DEFUN: redefining XLIB::DECLARE-BUFMAC in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB::DECLARE-BUFFUN in DEFUN
REDEFINITION-WITH-DEFMACRO: redefining XLIB::HOLDING-LOCK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITHOUT-ABORTS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITHOUT-INTERRUPTS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CONDITIONAL-STORE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRAP-BUF-OUTPUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRAP-BUF-INPUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-STACK-LIST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-STACK-LIST* in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-GCONTEXT-BINDINGS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::TYPE? in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::USE-CLOSURES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-UNDERLYING-SIMPLE-VECTOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-IMAGE-LOAD-BYTE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-IMAGE-ASSEMBLE-BYTES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-IMAGE-LOAD-BYTE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-IMAGE-ASSEMBLE-BYTES in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/common.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a (REAL 0), not a SINGLE-FLOAT.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/common.lisp
; in: DEFUN BUFFER-READ-DEFAULT
; (ZEROP XLIB::TIMEOUT)
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (REAL 0), not a SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open-code FLOAT to RATIONAL comparison
due to type uncertainty:
The first argument is a (REAL 0), not a DOUBLE-FLOAT.
;
; note: unable to
; open-code FLOAT to RATIONAL comparison
; due to type uncertainty:
; The first argument is a (REAL 0), not a DOUBLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
open code
because:
The operands might not be the same type.
;
; note: unable to open code because: The operands might not be the same type.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-< (cost 10)
unable to do inline fixnum comparison (cost 3) because:
The first argument is a RATIONAL, not a FIXNUM.
unable to do inline fixnum comparison (cost 4) because:
The first argument is a RATIONAL, not a FIXNUM.
etc.
; (DEFUN XLIB::BUFFER-READ-DEFAULT
; (XLIB:DISPLAY VECTOR XLIB::START XLIB::END XLIB::TIMEOUT)
; (DECLARE (TYPE XLIB:DISPLAY XLIB:DISPLAY)
; (TYPE XLIB::BUFFER-BYTES VECTOR)
; (TYPE XLIB:ARRAY-INDEX XLIB::START XLIB::END)
; (TYPE (OR NULL (REAL 0 *)) XLIB::TIMEOUT))
; (DECLARE (OPTIMIZE (SPEED 3) (SAFETY 1) (DEBUG 1)))
; (IF (AND (NOT (NULL XLIB::TIMEOUT)) (ZEROP XLIB::TIMEOUT) (NOT (LISTEN #)))
; :TIMEOUT
; (LET ((XLIB::N #))
; (COND (# NIL) (# :END-OF-FILE) (T :TRUNCATED)))))
; --> SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION
; --> SB-C::%FUNCALL MULTIPLE-VALUE-BIND LET PROGN UNLESS IF TYPEP
; ==>
; 1
;
; note: forced to do GENERIC-< (cost 10)
; unable to do inline fixnum comparison (cost 3) because:
; The first argument is a RATIONAL, not a FIXNUM.
; unable to do inline fixnum comparison (cost 4) because:
; The first argument is a RATIONAL, not a FIXNUM.
; etc.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/common-tmpBO0TUGLK.fasl
; compilation finished in 0:00:00.159
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/macros.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/macros-tmpIIXPIQNW.fasl
; compilation finished in 0:00:00.586
REDEFINITION-WITH-DEFMACRO: redefining XLIB::TYPE-CHECK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::REQUIRED-ARG in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::LROUND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WROUND in DEFMACRO
REDEFINITION-WITH-DEFUN: redefining XLIB::GETIFY in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB::PUTIFY in DEFUN
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-ACCESSOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD32-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD32-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD29-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD29-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD16-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD16-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD8-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CARD8-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INTEGER-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INTEGER-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INT16-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INT16-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RGB-VAL-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RGB-VAL-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::ANGLE-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::ANGLE-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BIT-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BIT-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BOOLEAN-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BOOLEAN-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DRAWABLE-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DRAWABLE-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WINDOW-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WINDOW-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PIXMAP-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PIXMAP-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CURSOR-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CURSOR-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::COLORMAP-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::COLORMAP-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::FONT-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::FONT-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYWORD-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYWORD-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RESOURCE-ID-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RESOURCE-ID-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RESOURCE-ID-OR-NIL-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RESOURCE-ID-OR-NIL-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CHAR-INFO-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER8-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER8-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER8-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER16-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER16-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER16-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER-VECTOR-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER-VECTOR-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER-VECTOR-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER16-VECTOR-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER16-VECTOR-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER16-VECTOR-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER8-VECTOR-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER8-VECTOR-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MEMBER8-VECTOR-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BOOLE-CONSTANT-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BOOLE-CONSTANT-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BOOLE-CONSTANT-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::NULL-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::NULL-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PAD8-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PAD8-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PAD16-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PAD16-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PAD32-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PAD32-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BIT-VECTOR256-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BIT-VECTOR256-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::STRING-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::STRING-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::SEQUENCE-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::SEQUENCE-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CLIENT-MESSAGE-EVENT-GET-SEQUENCE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CLIENT-MESSAGE-EVENT-PUT-SEQUENCE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CLIENT-MESSAGE-SEQUENCE-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CLIENT-MESSAGE-SEQUENCE-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CODE-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CODE-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CODE-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::LENGTH-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::LENGTH-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::LENGTH-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DATA-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DATA-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DATA-PUT-PREDICATING in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::OR-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::OR-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PROGN-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PROGN-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::CHECK-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-BUFFER-REQUEST-INTERNAL in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-BUFFER-REQUEST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-BUFFER-REQUEST-AND-REPLY in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::COMPARE-REQUEST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PUT-ITEMS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DECODE-TYPE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::ENCODE-TYPE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::SET-DECODE-TYPE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-ATOMIC-PUSH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-ATOMIC-POP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-NCONC in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-PUSH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-POP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-ENQUEUE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-DEQUEUE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-REQUEUE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-DOLIST in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-DELETE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::THREADED-LENGTH in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/bufmac.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/bufmac-tmpOHM494YR.fasl
; compilation finished in 0:00:00.076
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-CARD8 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-INT8 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-CARD16 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-INT16 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-CARD32 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-INT32 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-CARD29 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITE-CHAR2B in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::SET-BUFFER-OFFSET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::ADVANCE-BUFFER-OFFSET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-BUFFER-OUTPUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WRITING-BUFFER-CHUNKS in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/buffer.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/buffer.lisp
; in: DEFUN READ-VECTOR-CARD8
; (SETF (AREF XLIB::DATA XLIB::J) (XLIB::READ-CARD8 XLIB::INDEX))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN READ-VECTOR-CARD8-WITH-TRANSFORM
; (SETF (AREF XLIB::DATA XLIB::J)
; (FUNCALL XLIB::TRANSFORM (XLIB::READ-CARD8 XLIB::INDEX)))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN READ-VECTOR-CARD16
; (SETF (AREF XLIB::DATA XLIB::J) (XLIB::READ-CARD16 XLIB::INDEX))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN READ-VECTOR-CARD16-WITH-TRANSFORM
; (SETF (AREF XLIB::DATA XLIB::J)
; (FUNCALL XLIB::TRANSFORM (XLIB::READ-CARD16 XLIB::INDEX)))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN READ-VECTOR-CARD32
; (SETF (AREF XLIB::DATA XLIB::J) (XLIB::READ-CARD32 XLIB::INDEX))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN READ-VECTOR-CARD32-WITH-TRANSFORM
; (SETF (AREF XLIB::DATA XLIB::J)
; (FUNCALL XLIB::TRANSFORM (XLIB::READ-CARD32 XLIB::INDEX)))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CARD8
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CARD8-WITH-TRANSFORM
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CARD16
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CARD16-WITH-TRANSFORM
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-INT16
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-INT16-WITH-TRANSFORM
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CARD32
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CARD32-WITH-TRANSFORM
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CHAR2B
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN WRITE-VECTOR-CHAR2B-WITH-TRANSFORM
; (AREF XLIB::DATA XLIB::INDEX)
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/buffer-tmpOVFB07XF.fasl
; compilation finished in 0:00:00.983
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-BUFFER in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-CARD8 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-INT8 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-CARD16 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-INT16 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-CARD32 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-INT32 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READ-CARD29 in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::EVENT-CODE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::READING-EVENT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-BUFFER-INPUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-BUFFER-FLUSH-INHIBITED in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-TRANSFORMED-SEQUENCE-READER in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-LIST-READERS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-SEQUENCE-READER in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-TRANSFORMED-SEQUENCE-WRITER in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-LIST-WRITERS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-SEQUENCE-WRITER in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/display.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/display.lisp
; in: DEFUN DISPLAY-CONNECT
; (LENGTH XLIB::AUTHORIZATION-NAME)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; (LENGTH XLIB::AUTHORIZATION-DATA)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (LENGTH XLIB::AUTHORIZATION-NAME)
;
; 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.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/display-tmpG6VFGMYP.fasl
; compilation finished in 0:00:00.384
REDEFINITION-WITH-DEFMACRO: redefining XLIB:WITH-DISPLAY in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::ALLOCATE-RESOURCE-ID in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEALLOCATE-RESOURCE-ID in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:WITH-EVENT-QUEUE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-EVENT-QUEUE-INTERNAL in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/gcontext.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR CONS VECTOR
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR CONS VECTOR
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/gcontext.lisp
; in: DEFUN FORCE-GCONTEXT-CHANGES-INTERNAL
; (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-SETCLIPRECTANGLES+)
; (XLIB::DATA (FIRST XLIB::LOCAL-CLIP))
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; (XLIB:CARD16 (OR (XLIB::GCONTEXT-INTERNAL-CLIP-X XLIB::LOCAL-STATE) 0)
; (OR (XLIB::GCONTEXT-INTERNAL-CLIP-Y XLIB::LOCAL-STATE) 0))
; ((SEQUENCE :FORMAT XLIB:INT16) (SECOND XLIB::LOCAL-CLIP)))
; --> XLIB::WITH-BUFFER PROGN MULTIPLE-VALUE-PROG1 XLIB::WITHOUT-ABORTS PROGN
; --> XLIB::WITH-BUFFER-REQUEST-INTERNAL XLIB::WITH-BUFFER-OUTPUT LET LET*
; --> XLIB::CHECK-PUT LET XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::.VALUE.)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (LENGTH XLIB::LOCAL-DASH)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR CONS VECTOR
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
; (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-SETDASHES+)
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; (XLIB:CARD16 (OR (XLIB::GCONTEXT-INTERNAL-DASH-OFFSET XLIB::LOCAL-STATE) 0)
; (LENGTH XLIB::LOCAL-DASH))
; ((SEQUENCE :FORMAT XLIB:CARD8) XLIB::LOCAL-DASH))
; --> XLIB::WITH-BUFFER PROGN MULTIPLE-VALUE-PROG1 XLIB::WITHOUT-ABORTS PROGN
; --> XLIB::WITH-BUFFER-REQUEST-INTERNAL XLIB::WITH-BUFFER-OUTPUT LET LET*
; --> XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::LOCAL-DASH)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR CONS VECTOR
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; (FUNCALL (XLIB::GCONTEXT-EXTENSION-SET-FUNCTION (CAR XLIB::EXTENSION))
; XLIB:GCONTEXT XLIB::LOCAL)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-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 (SVREF XLIB::SERVER-STATE XLIB::I)
; (SETQ XLIB::LOCAL (SVREF XLIB::LOCAL-STATE XLIB::I)))
;
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN COPY-GCONTEXT-LOCAL-STATE
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:GCONTEXT 'XLIB:GCONTEXT)
; --> XLIB::WITH-BUFFER PROGN FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
Eliminate %negate/%negate of rationals
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a (SIMPLE-ARRAY *
(*)).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a LIST.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; (- XLIB::*GCONTEXT-DATA-LENGTH*)
;
; note: unable to
; Eliminate %negate/%negate of rationals
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (ELT XLIB::*GCONTEXT-EXTENSIONS* XLIB::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.
; (FUNCALL XLIB::COPY-FUNCTION XLIB:GCONTEXT XLIB::TEMP-GC
; (SVREF XLIB::LOCAL-STATE
; (XLIB::INDEX+ XLIB::I XLIB::*GCONTEXT-DATA-LENGTH*)))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: forced to do GENERIC-NEGATE (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 float arithmetic (cost 1) because:
The first argument is a T, not a SINGLE-FLOAT.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
&OPTIONAL).
etc.
; (- XLIB::*GCONTEXT-DATA-LENGTH*)
;
; note: forced to do GENERIC-NEGATE (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 float arithmetic (cost 1) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do full call
unable to do inline ASH (cost 3) because:
The second argument is a NUMBER, not a (UNSIGNED-BYTE 64).
The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
&OPTIONAL).
unable to do inline ASH (cost 4) because:
The second argument is a NUMBER, not a (UNSIGNED-BYTE 62).
The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
(UNSIGNED-BYTE
64)
&OPTIONAL).
etc.
; (ASH XLIB::EXTENSION-MASK (- XLIB::*GCONTEXT-DATA-LENGTH*))
;
; note: forced to do full call
; unable to do inline ASH (cost 3) because:
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 4) because:
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 62).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do full call
unable to do inline ASH (cost 2) because:
The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
&OPTIONAL).
unable to do inline ASH (cost 3) because:
The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
64).
The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
(UNSIGNED-BYTE 64)
&OPTIONAL).
etc.
; (ASH BIT -1)
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 3) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
Eliminate %negate/%negate of rationals
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN RESTORE-GCONTEXT-TEMP-STATE
; (- XLIB::*GCONTEXT-DATA-LENGTH*)
;
; note: unable to
; Eliminate %negate/%negate of rationals
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (FUNCALL XLIB::COPY-FUNCTION XLIB::TEMP-GC XLIB:GCONTEXT
; (SVREF XLIB::LOCAL-STATE XLIB::I))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: forced to do GENERIC-NEGATE (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 float arithmetic (cost 1) because:
The first argument is a T, not a SINGLE-FLOAT.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
&OPTIONAL).
etc.
SIMPLE-COMPILER-NOTE: forced to do full call
unable to do inline ASH (cost 3) because:
The second argument is a NUMBER, not a (UNSIGNED-BYTE 64).
The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
&OPTIONAL).
unable to do inline ASH (cost 4) because:
The second argument is a NUMBER, not a (UNSIGNED-BYTE 62).
The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
(UNSIGNED-BYTE
64)
&OPTIONAL).
etc.
; (- XLIB::*GCONTEXT-DATA-LENGTH*)
;
; note: forced to do GENERIC-NEGATE (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 float arithmetic (cost 1) because:
; The first argument is a T, not a SINGLE-FLOAT.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES SINGLE-FLOAT
; &OPTIONAL).
; etc.
; (ASH XLIB::TEMP-MASK (- XLIB::*GCONTEXT-DATA-LENGTH*))
;
; note: forced to do full call
; unable to do inline ASH (cost 3) because:
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 64).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 4) because:
; The second argument is a NUMBER, not a (UNSIGNED-BYTE 62).
; The result is a (VALUES UNSIGNED-BYTE &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE
; 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do full call
unable to do inline ASH (cost 2) because:
The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
&OPTIONAL).
unable to do inline ASH (cost 3) because:
The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
64).
The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
(UNSIGNED-BYTE 64)
&OPTIONAL).
etc.
; (ASH BIT -1)
;
; note: forced to do full call
; unable to do inline ASH (cost 2) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a FIXNUM.
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES FIXNUM
; &OPTIONAL).
; unable to do inline ASH (cost 3) because:
; The first argument is a (OR (INTEGER * -1) (INTEGER 1)), not a (UNSIGNED-BYTE
; 64).
; The result is a (VALUES INTEGER &OPTIONAL), not a (VALUES
; (UNSIGNED-BYTE 64)
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN CREATE-GCONTEXT
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:GCONTEXT 'XLIB:GCONTEXT)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a SEQUENCE, not a (OR LIST
VECTOR).
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a SEQUENCE, not a (OR LIST
VECTOR).
; in: DEFUN COPY-GCONTEXT-COMPONENTS
; (FIND XLIB::KEY XLIB::*GCONTEXT-EXTENSIONS* :KEY
; #'XLIB::GCONTEXT-EXTENSION-NAME)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; (FUNCALL (XLIB::GCONTEXT-EXTENSION-COPY-FUNCTION XLIB::EXTENSION) XLIB::SRC
; XLIB::DST
; (SVREF (XLIB::GCONTEXT-LOCAL-STATE XLIB::SRC)
; (XLIB::INDEX+
; (POSITION XLIB::EXTENSION XLIB::*GCONTEXT-EXTENSIONS*)
; XLIB::*GCONTEXT-DATA-LENGTH*)))
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; (POSITION XLIB::EXTENSION XLIB::*GCONTEXT-EXTENSIONS*)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/gcontext-tmp4QIPRMOF.fasl
; compilation finished in 0:00:01.088
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-FUNCTION in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-PLANE-MASK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-FOREGROUND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-BACKGROUND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-LINE-WIDTH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-LINE-STYLE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-CAP-STYLE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-JOIN-STYLE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-FILL-STYLE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-FILL-RULE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-TILE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-STIPPLE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-TS-X in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-TS-Y in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-FONT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-SUBWINDOW-MODE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-EXPOSURES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-CLIP-X in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-CLIP-Y in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-CLIP-MASK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-DASH-OFFSET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-DASHES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-ARC-MODE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-CLIP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-DASH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-FONT-OBJ in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-INTERNAL-TIMESTAMP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GCONTEXT-STATE-NEXT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::XGCMASK->GCMASK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::ACCESS-GCONTEXT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::MODIFY-GCONTEXT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEF-GC-ACCESSOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::INCF-INTERNAL-TIMESTAMP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:WITH-GCONTEXT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:DEFINE-GCONTEXT-ACCESSOR in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/input.lisp" (written 13 MAY 2024 09:28:08 AM):
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/input.lisp
; in: DEFUN READ-INPUT
; (CONS NIL NIL)
;
; note: deleting unreachable code
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN QUEUE-EVENT
; (APPLY (SVREF XLIB::*EVENT-SEND-VECTOR* XLIB::EVENT-CODE) XLIB:DISPLAY
; XLIB::ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DECLARE-EVENT :CLIENT-MESSAGE
; (XLIB:DECLARE-EVENT :CLIENT-MESSAGE
; (XLIB::DATA FORMAT)
; (XLIB:CARD16 SEQUENCE)
; (XLIB:WINDOW (XLIB:WINDOW XLIB::EVENT-WINDOW))
; (KEYWORD TYPE)
; ((XLIB::CLIENT-MESSAGE-SEQUENCE FORMAT) XLIB::DATA))
; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; --> FUNCTION BLOCK XLIB::READING-EVENT XLIB::WITH-BUFFER-INPUT LET LET*
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; --> FUNCTION BLOCK XLIB::WITH-BUFFER-OUTPUT LET LET*
; --> XLIB::CLIENT-MESSAGE-SEQUENCE-PUT XLIB::CLIENT-MESSAGE-EVENT-PUT-SEQUENCE
; --> ECASE COND IF XLIB::SEQUENCE-PUT XLIB::WRITE-SEQUENCE-CARD8 MIN
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; --> FUNCTION BLOCK XLIB::WITH-BUFFER-OUTPUT LET LET*
; --> XLIB::CLIENT-MESSAGE-SEQUENCE-PUT XLIB::CLIENT-MESSAGE-EVENT-PUT-SEQUENCE
; --> ECASE COND IF IF XLIB::SEQUENCE-PUT XLIB::WRITE-SEQUENCE-CARD16 MIN
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN DEFUN PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA
; --> FUNCTION BLOCK XLIB::WITH-BUFFER-OUTPUT LET LET*
; --> XLIB::CLIENT-MESSAGE-SEQUENCE-PUT XLIB::CLIENT-MESSAGE-EVENT-PUT-SEQUENCE
; --> ECASE COND IF IF IF XLIB::SEQUENCE-PUT XLIB::WRITE-SEQUENCE-CARD32 MIN
; ==>
; 1
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN MAKE-ERROR
; (FUNCALL XLIB::ERROR-DECODE-FUNCTION XLIB:DISPLAY XLIB::EVENT)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/input-tmpGW0QV22K.fasl
; compilation finished in 0:00:01.350
REDEFINITION-WITH-DEFMACRO: redefining XLIB:DEFINE-EXTENSION in DEFMACRO
REDEFINITION-WITH-DEFUN: redefining XLIB::CANONICALIZE-EVENT-NAME in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB::EXTENSION-EVENT-KEY-P in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB::ALLOCATE-EXTENSION-EVENT-CODE in DEFUN
REDEFINITION-WITH-DEFMACRO: redefining XLIB:EXTENSION-OPCODE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-EVENT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:DECLARE-EVENT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::EVENT-LOOP in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:EVENT-CASE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:EVENT-COND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::EVENT-DISPATCH in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::BINDING-EVENT-VALUES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:DEFINE-ERROR in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/requests.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/requests.lisp
; in: DEFUN CREATE-WINDOW
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:WINDOW 'XLIB:WINDOW)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: forced to do full call
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 * -1) (INTEGER 4096)) &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 * -1) (INTEGER 4096)) &OPTIONAL), not a (VALUES
FIXNUM
&OPTIONAL).
etc.
; (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-CREATEWINDOW+)
; (XLIB::DATA XLIB::DEPTH)
; (XLIB:RESOURCE-ID XLIB::WID)
; (XLIB:WINDOW XLIB::PARENT)
; (XLIB:INT16 XLIB::X XLIB::Y)
; (XLIB:CARD16 XLIB::WIDTH XLIB::HEIGHT XLIB::BORDER-WIDTH)
; ((XLIB::MEMBER16 :COPY :INPUT-OUTPUT :INPUT-ONLY) CLASS)
; (XLIB:RESOURCE-ID
; (COND ((EQ XLIB::VISUAL :COPY) 0)
; ((TYPEP XLIB::VISUAL 'XLIB:RESOURCE-ID) XLIB::VISUAL)
; (T (XLIB:VISUAL-INFO-ID XLIB::VISUAL))))
; (XLIB::MASK
; (XLIB:CARD32 XLIB::BACK-PIXMAP XLIB::BACK-PIXEL XLIB::BORDER-PIXMAP
; XLIB::BORDER-PIXEL)
; ((XLIB::MEMBER-VECTOR XLIB::+BIT-GRAVITY-VECTOR+) XLIB:BIT-GRAVITY)
; ((XLIB::MEMBER-VECTOR XLIB::+WIN-GRAVITY-VECTOR+) XLIB::GRAVITY)
; ((MEMBER :NOT-USEFUL :WHEN-MAPPED :ALWAYS) XLIB::BACKING-STORE)
; (XLIB:CARD32 XLIB::BACKING-PLANES XLIB::BACKING-PIXEL)
; ((MEMBER :OFF :ON) XLIB::OVERRIDE-REDIRECT XLIB::SAVE-UNDER)
; (XLIB:CARD32 XLIB:EVENT-MASK XLIB::DO-NOT-PROPAGATE-MASK)
; ((OR (MEMBER :COPY) XLIB:COLORMAP) XLIB:COLORMAP)
; ((OR (MEMBER :NONE) XLIB:CURSOR) XLIB:CURSOR)))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* LET UNLESS IF PROGN SETQ THE
; ==>
; (LOGIOR XLIB::%MASK 4096)
;
; note: forced to do full call
; 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 * -1) (INTEGER 4096)) &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 * -1) (INTEGER 4096)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do full call
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 * -1) (INTEGER 8192)) &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 * -1) (INTEGER 8192)) &OPTIONAL), not a (VALUES
FIXNUM
&OPTIONAL).
etc.
; ==>
; (LOGIOR XLIB::%MASK 8192)
;
; note: forced to do full call
; 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 * -1) (INTEGER 8192)) &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 * -1) (INTEGER 8192)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: forced to do full call
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 * -1) (INTEGER 16384)) &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 * -1) (INTEGER 16384)) &OPTIONAL), not a (VALUES
FIXNUM
&OPTIONAL).
etc.
; ==>
; (LOGIOR XLIB::%MASK 16384)
;
; note: forced to do full call
; 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 * -1) (INTEGER 16384)) &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 * -1) (INTEGER 16384)) &OPTIONAL), not a (VALUES
; FIXNUM
; &OPTIONAL).
; etc.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN SEND-EVENT
; (APPLY (SVREF XLIB::*EVENT-SEND-VECTOR* XLIB::INTERNAL-EVENT-CODE)
; XLIB:DISPLAY XLIB::ARGS)
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN CREATE-PIXMAP
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:PIXMAP 'XLIB:PIXMAP)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN CREATE-COLORMAP
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:COLORMAP 'XLIB:COLORMAP)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; in: DEFUN COPY-COLORMAP-AND-FREE
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB::NEW-COLORMAP 'XLIB:COLORMAP)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN FREE-COLORS
; (XLIB::WITH-BUFFER-REQUEST ((XLIB:COLORMAP-DISPLAY XLIB:COLORMAP)
; XLIB::+X-FREECOLORS+)
; (XLIB:COLORMAP XLIB:COLORMAP)
; (XLIB:CARD32 XLIB::PLANE-MASK)
; (SEQUENCE XLIB::PIXELS))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::PIXELS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN QUERY-COLORS
; (XLIB::WITH-BUFFER-REQUEST-AND-REPLY (XLIB:DISPLAY XLIB::+X-QUERYCOLORS+ NIL
; :SIZES (8 16))
; ((XLIB:COLORMAP XLIB:COLORMAP) (SEQUENCE XLIB::PIXELS))
; (LET ((SEQUENCE (MAKE-SEQUENCE XLIB::RESULT-TYPE #)))
; (XLIB::ADVANCE-BUFFER-OFFSET XLIB::+REPLYSIZE+)
; (DOTIMES (XLIB::I (LENGTH SEQUENCE) SEQUENCE)
; (SETF # #)
; (XLIB::ADVANCE-BUFFER-OFFSET 8))))
; --> UNWIND-PROTECT FLET BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN
; --> SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
*
(*)).
XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK XLIB::WITHOUT-ABORTS PROGN
; --> XLIB::WITH-BUFFER-REQUEST-INTERNAL XLIB::WITH-BUFFER-OUTPUT LET LET*
; --> XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::PIXELS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (LENGTH SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
; SB-KERNEL:EXTENDED-SEQUENCE), not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
; (SETF (ELT SEQUENCE XLIB::I)
; (XLIB:MAKE-COLOR :RED (XLIB::RGB-VAL-GET 0) :GREEN
; (XLIB::RGB-VAL-GET 2) :BLUE (XLIB::RGB-VAL-GET 4)))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
; * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN CREATE-CURSOR
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:CURSOR 'XLIB:CURSOR)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN CREATE-GLYPH-CURSOR
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:CURSOR 'XLIB:CURSOR)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN SET-POINTER-MAPPING
; (LENGTH MAP)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (XLIB::WITH-BUFFER-REQUEST-AND-REPLY (XLIB:DISPLAY
; XLIB::+X-SETPOINTERMAPPING+ 2 :SIZES 8)
; ((XLIB::DATA (LENGTH MAP)) ((SEQUENCE :FORMAT XLIB:CARD8) MAP))
; (VALUES (XLIB::BOOLEAN-GET 1)))
; --> UNWIND-PROTECT FLET BLOCK BLOCK SB-C::%WITHIN-CLEANUP RETURN-FROM PROGN
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK XLIB::WITHOUT-ABORTS PROGN
; --> XLIB::WITH-BUFFER-REQUEST-INTERNAL XLIB::WITH-BUFFER-OUTPUT LET LET*
; --> XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH MAP)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN CHANGE-ACCESS-HOST
; (LENGTH XLIB::ADDRESS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY XLIB::+X-CHANGEHOSTS+)
; ((XLIB::DATA BOOLEAN) XLIB::REMOVE-P)
; (XLIB:CARD8
; (XLIB::ENCODE-TYPE (OR NULL (MEMBER :INTERNET :DECNET :CHAOS) XLIB:CARD32)
; XLIB::FAMILY))
; (XLIB:CARD16 (LENGTH XLIB::ADDRESS))
; ((SEQUENCE :FORMAT XLIB:CARD8) XLIB::ADDRESS))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::ADDRESS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
*
(*)).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
; in: DEFUN ACCESS-HOSTS
; (SETF (ELT SEQUENCE XLIB::I)
; (CONS
; (IF (< XLIB::FAMILY 3)
; (SVREF '# XLIB::FAMILY)
; XLIB::FAMILY)
; (XLIB::SEQUENCE-GET :LENGTH XLIB::LEN :FORMAT XLIB:CARD8
; :RESULT-TYPE 'LIST :INDEX
; (+ XLIB::BUFFER-BOFFSET 4))))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
; SB-KERNEL:EXTENDED-SEQUENCE), not a (SIMPLE-ARRAY
; * (*)).
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR LIST (SIMPLE-ARRAY * (*))
; SB-KERNEL:EXTENDED-SEQUENCE), not a LIST.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/requests-tmp2K9J0HSR.fasl
; compilation finished in 0:00:01.699
REDEFINITION-WITH-DEFMACRO: redefining XLIB:WITH-SERVER-GRABBED in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/fonts.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/fonts.lisp
; in: DEFUN OPEN-FONT
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:FONT 'XLIB:FONT)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; in: DEFUN OPEN-FONT-INTERNAL
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB:FONT 'XLIB:FONT)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK LET FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a SINGLE-FLOAT.
; in: DEFUN SET-FONT-PATH
; (CEILING XLIB::REQUEST-LENGTH 4)
;
SIMPLE-COMPILER-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 SINGLE-FLOAT.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a REAL, not a INTEGER.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a REAL, not a DOUBLE-FLOAT.
SIMPLE-COMPILER-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
; 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.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a (SIMPLE-ARRAY *
(*)).
; (ELT XLIB::PATHS XLIB::I)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a (SIMPLE-ARRAY * (*)).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a LIST.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a LIST.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR STRING SYMBOL
CHARACTER), not a (OR
STRING
SYMBOL).
; (STRING (ELT XLIB::PATHS XLIB::I))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a (OR STRING
; SYMBOL).
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (OR STRING SYMBOL
CHARACTER), not a SYMBOL.
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (OR STRING SYMBOL CHARACTER), not a SYMBOL.
SIMPLE-COMPILER-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 STRING.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/fonts-tmpP44I4E0Y.fasl
; compilation finished in 0:00:00.138
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/graphics.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/graphics.lisp
; in: DEFUN DRAW-POINTS
; (XLIB::WITH-BUFFER-REQUEST ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE)
; XLIB::+X-POLYPOINT+ :GC-FORCE XLIB:GCONTEXT)
; ((XLIB::DATA BOOLEAN) XLIB::RELATIVE-P)
; (XLIB:DRAWABLE XLIB:DRAWABLE)
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::POINTS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN DRAW-LINES
; (XLIB::WITH-BUFFER-REQUEST ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE)
; XLIB::+X-POLYLINE+ :GC-FORCE XLIB:GCONTEXT)
; ((XLIB::DATA BOOLEAN) XLIB::RELATIVE-P)
; (XLIB:DRAWABLE XLIB:DRAWABLE)
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::POINTS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN FILL-POLYGON
; (XLIB::WITH-BUFFER-REQUEST ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE)
; XLIB::+X-FILLPOLY+ :GC-FORCE XLIB:GCONTEXT)
; (XLIB:DRAWABLE XLIB:DRAWABLE)
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; ((XLIB::MEMBER8 :COMPLEX :NON-CONVEX :CONVEX) XLIB::SHAPE)
; (BOOLEAN XLIB::RELATIVE-P)
; ((SEQUENCE :FORMAT XLIB:INT16) XLIB::POINTS))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::POINTS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN DRAW-SEGMENTS
; (XLIB::WITH-BUFFER-REQUEST ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE)
; XLIB::+X-POLYSEGMENT+ :GC-FORCE XLIB:GCONTEXT)
; (XLIB:DRAWABLE XLIB:DRAWABLE)
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; ((SEQUENCE :FORMAT XLIB:INT16) XLIB::SEGMENTS))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::SEGMENTS)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN DRAW-RECTANGLES
; (XLIB::WITH-BUFFER-REQUEST ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE)
; (IF XLIB::FILL-P
; XLIB::+X-POLYFILLRECTANGLE+
; XLIB::+X-POLYRECTANGLE+)
; :GC-FORCE XLIB:GCONTEXT)
; (XLIB:DRAWABLE XLIB:DRAWABLE)
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; ((SEQUENCE :FORMAT XLIB:INT16) XLIB::RECTANGLES))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::RECTANGLES)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; in: DEFUN DRAW-ARCS-VECTOR
; (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 0))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 1))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 2))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 3))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 4))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
because:
Upgraded element type of array is not known at compile time.
; (AREF XLIB::ARCS (XLIB::INDEX+ XLIB::N 5))
;
; note: unable to
; optimize
; because:
; Upgraded element type of array is not known at compile time.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN PUT-RAW-IMAGE
; (XLIB::WITH-BUFFER-REQUEST ((XLIB:DRAWABLE-DISPLAY XLIB:DRAWABLE)
; XLIB::+X-PUTIMAGE+ :GC-FORCE XLIB:GCONTEXT)
; ((XLIB::DATA (MEMBER :BITMAP :XY-PIXMAP :Z-PIXMAP)) FORMAT)
; (XLIB:DRAWABLE XLIB:DRAWABLE)
; (XLIB:GCONTEXT XLIB:GCONTEXT)
; (XLIB:CARD16 XLIB::WIDTH XLIB::HEIGHT)
; (XLIB:INT16 XLIB::X XLIB::Y)
; (XLIB:CARD8 XLIB::LEFT-PAD XLIB::DEPTH)
; (XLIB::PAD16 NIL)
; ((SEQUENCE :FORMAT XLIB:CARD8 :START XLIB::START) XLIB::DATA))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::DATA)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/graphics-tmp63LQ7EX6.fasl
; compilation finished in 0:00:00.951
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/text.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/text.lisp
; in: DEFUN TEXT-EXTENTS
; (LENGTH SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFUN TEXT-WIDTH
; (LENGTH SEQUENCE)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
avoid runtime dispatch on array element type
due to type uncertainty:
The first argument is a (ARRAY *
(* *)), not a SIMPLE-ARRAY.
; in: DEFUN CHANGE-KEYBOARD-MAPPING
; (AREF XLIB::KEYSYMS XLIB::I XLIB::J)
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (ARRAY * (* *)), not a SIMPLE-ARRAY.
SIMPLE-COMPILER-NOTE: unable to
associate +/(+ -) of constants
due to type uncertainty:
The first argument is a NUMBER, not a RATIONAL.
SIMPLE-COMPILER-NOTE: unable to
avoid runtime dispatch on array element type
due to type uncertainty:
The first argument is a (ARRAY *
(* *)), not a SIMPLE-ARRAY.
; in: DEFUN KEYBOARD-MAPPING
; (1+ XLIB::I)
;
; note: unable to
; associate +/(+ -) of constants
; due to type uncertainty:
; The first argument is a NUMBER, not a RATIONAL.
; (SETF (AREF XLIB::RESULT XLIB::I XLIB::J) (XLIB::CARD29-GET (* XLIB::J 4)))
; --> FUNCALL
; ==>
; 1
;
; note: unable to
; avoid runtime dispatch on array element type
; due to type uncertainty:
; The first argument is a (ARRAY * (* *)), not a SIMPLE-ARRAY.
SIMPLE-COMPILER-NOTE: forced to do GENERIC-+ (cost 10)
unable to do inline fixnum arithmetic (cost 1) because:
The first argument is a (OR NULL NUMBER), 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 (OR NULL NUMBER), not a FIXNUM.
The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
etc.
; (1+ XLIB::I)
;
; note: forced to do GENERIC-+ (cost 10)
; unable to do inline fixnum arithmetic (cost 1) because:
; The first argument is a (OR NULL NUMBER), 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 (OR NULL NUMBER), not a FIXNUM.
; The result is a (VALUES NUMBER &OPTIONAL), not a (VALUES FIXNUM &OPTIONAL).
; etc.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/text-tmp86F1A8FB.fasl
; compilation finished in 0:00:00.487
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/attributes.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/attributes-tmpH7D4HL98.fasl
; compilation finished in 0:00:00.393
REDEFINITION-WITH-DEFMACRO: redefining XLIB::STATE-ATTRIBUTES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::STATE-ATTRIBUTE-CHANGES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::STATE-GEOMETRY in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::STATE-GEOMETRY-CHANGES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DRAWABLE-EQUAL-FUNCTION in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WINDOW-EQUAL-FUNCTION in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:WITH-STATE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-ATTRIBUTES in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-GEOMETRY in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/translate.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/translate-tmpCDM7YXYI.fasl
; compilation finished in 0:00:00.115
REDEFINITION-WITH-DEFMACRO: redefining XLIB:KEYSYM in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYSYM-MAPPING-OBJECT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYSYM-MAPPING-TRANSLATE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYSYM-MAPPING-LOWERCASE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYSYM-MAPPING-MODIFIERS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::KEYSYM-MAPPING-MASK in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/keysyms.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/keysyms-tmpLM57P5P.fasl
; compilation finished in 0:00:00.012
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/manager.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/manager-tmpZE69DN33.fasl
; compilation finished in 0:00:00.962
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/image.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The second argument is a SEQUENCE, not a (OR LIST
VECTOR).
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/image.lisp
; in: DEFUN GET-IMAGE
; (FIND XLIB::DEPTH (XLIB:DISPLAY-PIXMAP-FORMATS XLIB:DISPLAY) :KEY
; #'XLIB:PIXMAP-FORMAT-DEPTH)
;
; note: unable to
; optimize
; due to type uncertainty:
; The second argument is a SEQUENCE, not a (OR LIST VECTOR).
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/image-tmpG8099TO3.fasl
; compilation finished in 0:00:01.452
REDEFINITION-WITH-DEFMACRO: redefining XLIB::WITH-IMAGE-DATA-BUFFER in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:IMAGE-NAME in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:IMAGE-X-HOT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:IMAGE-Y-HOT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:IMAGE-RED-MASK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:IMAGE-BLUE-MASK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB:IMAGE-GREEN-MASK in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/resource.lisp" (written 13 MAY 2024 09:28:08 AM):
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/resource.lisp
; in: DEFUN DELETE-RESOURCE-INTERNAL
; (SETQ XLIB::LOOSE-P NIL)
;
; note: deleting unreachable code
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/resource-tmpTASQCYAW.fasl
; compilation finished in 0:00:00.227
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RESOURCE-WITH-OPEN-FILE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/shape.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/shape.lisp
; in: DEFUN SHAPE-RECTANGLES
; (XLIB::WITH-BUFFER-REQUEST (XLIB:DISPLAY
; (XLIB:EXTENSION-OPCODE XLIB:DISPLAY "SHAPE"))
; (XLIB::DATA 1)
; (XLIB:CARD8 (XLIB::ENCODE-SHAPE-OPERATION XLIB::OPERATION))
; (XLIB:CARD8 (XLIB::ENCODE-SHAPE-KIND XLIB::KIND))
; (XLIB:CARD8 (XLIB::ENCODE-SHAPE-RECTANGLE-ORDERING XLIB::ORDERING))
; (XLIB:CARD8 0)
; (XLIB:WINDOW XLIB:WINDOW)
; (XLIB:INT16 XLIB::X-OFFSET)
; (XLIB:INT16 XLIB::Y-OFFSET)
; ((SEQUENCE :FORMAT XLIB:INT16) XLIB::RECTANGLES))
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK MULTIPLE-VALUE-PROG1
; --> XLIB::WITHOUT-ABORTS PROGN XLIB::WITH-BUFFER-REQUEST-INTERNAL
; --> XLIB::WITH-BUFFER-OUTPUT LET LET* XLIB::CHECK-PUT XLIB::SEQUENCE-PUT LET
; ==>
; (LENGTH XLIB::RECTANGLES)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/shape-tmp35U57IV6.fasl
; compilation finished in 0:00:00.472
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/big-requests.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/big-requests-tmpTZOONXRW.fasl
; compilation finished in 0:00:00.010
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xvidmode.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xvidmode-tmpWN0UKDSV.fasl
; compilation finished in 0:00:01.228
REDEFINITION-WITH-DEFMACRO: redefining XLIB::VIDMODE-OPCODE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xrender.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xrender-tmpBF3HHBTQ.fasl
; compilation finished in 0:00:01.245
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PICTURE-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PICTURE-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GLYPH-SET-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::GLYPH-SET-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PICTURE-FORMAT-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::PICTURE-FORMAT-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RENDER-OP-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RENDER-OP-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::%RENDER-COMPOSITE-GLYPHS in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/glx.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/glx.lisp
; in: DEFUN MAKE-CONTEXT
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB/GLX::CTX 'XLIB/GLX::CONTEXT)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a (RATIONAL 1/2
4294967295/2), not a INTEGER.
SIMPLE-COMPILER-NOTE: unable to
convert division by 2^k to shift
due to type uncertainty:
The first argument is a (RATIONAL 1/2
4294967295/2), not a INTEGER.
; in: DEFUN GET-VISUAL-CONFIGS
; (LOOP XLIB/GLX::REPEAT (/ (- XLIB/GLX::NUM-PROPERTIES XLIB/GLX::NUM-ORDERED)
; 2)
; XLIB/GLX::COLLECTING (CONS (XLIB::CARD32-GET (INCF XLIB/GLX::INDEX 4))
; (XLIB::CARD32-GET (INCF XLIB/GLX::INDEX 4))))
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a (RATIONAL 1/2 4294967295/2), not a INTEGER.
;
; note: unable to
; convert division by 2^k to shift
; due to type uncertainty:
; The first argument is a (RATIONAL 1/2 4294967295/2), not a INTEGER.
SIMPLE-COMPILER-NOTE: unable to
fold division by 1
due to type uncertainty:
The first argument is a (RATIONAL 1/2
4294967295/2), not a INTEGER.
;
; note: unable to
; fold division by 1
; due to type uncertainty:
; The first argument is a (RATIONAL 1/2 4294967295/2), not a INTEGER.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/glx-tmpGYUNPZCY.fasl
; compilation finished in 0:00:00.614
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/gl.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/gl.lisp
; in: DEFINE-SEQUENCE-SETTER INT8
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB:INT8)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER INT16
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB:INT16)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER INT32
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB:INT32)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER BOOL
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB/GL::BOOL)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER CARD8
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB:CARD8)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER CARD16
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB:CARD16)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER CARD32
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB:CARD32)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER FLOAT32
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB/GL::FLOAT32)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; in: DEFINE-SEQUENCE-SETTER FLOAT64
; (XLIB/GL::DEFINE-SEQUENCE-SETTER XLIB/GL::FLOAT64)
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
SIMPLE-COMPILER-NOTE: unable to
optimize
due to type uncertainty:
The first argument is a SEQUENCE, not a VECTOR.
; --> PROGN SB-IMPL::%DEFUN SB-IMPL::%DEFUN SB-INT:NAMED-LAMBDA FUNCTION BLOCK
; --> ASSERT TAGBODY LET SB-KERNEL:ASSERT-ERROR
; ==>
; (LENGTH XLIB/GL::SEQ)
;
; note: unable to
; optimize
; due to type uncertainty:
; The first argument is a SEQUENCE, not a VECTOR.
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/gl-tmpD68Q8WCA.fasl
; compilation finished in 0:00:02.504
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::BYTE-WIDTH in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SETTER in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SEQUENCE-SETTER in DEFUN
REDEFINITION-WITH-DEFMACRO: redefining XLIB/GL::DEFINE-SEQUENCE-SETTER in DEFMACRO
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-INT8 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-INT16 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-INT32 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-BOOL in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-CARD8 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-CARD16 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-CARD32 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-FLOAT32 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::SSET-FLOAT64 in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::MAKE-ARGSPECS in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::BYTE-WIDTH-CALCULATION in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::COMPOSITE-ARGS in DEFUN
REDEFINITION-WITH-DEFUN: redefining XLIB/GL::MAKE-SETTER-FORMS in DEFUN
REDEFINITION-WITH-DEFMACRO: redefining XLIB/GL::DEFINE-RENDERING-COMMAND in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/dpms.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/dpms-tmp7MK9KM9C.fasl
; compilation finished in 0:00:00.185
REDEFINITION-WITH-DEFMACRO: redefining XLIB/DPMS::DPMS-OPCODE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xtest.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xtest-tmpJJ71X849.fasl
; compilation finished in 0:00:00.069
REDEFINITION-WITH-DEFMACRO: redefining XLIB/XTEST::OPCODE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/screensaver.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/screensaver-tmp1VUK6SR2.fasl
; compilation finished in 0:00:00.018
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/randr.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/randr-tmpR2FIHSUG.fasl
; compilation finished in 0:00:00.882
REDEFINITION-WITH-DEFMACRO: redefining XLIB::DEFINE-MASK-FNS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RR-TRANSFORM-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RR-TRANSFORM-PUT in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RR-MODE-INFO-GET in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining XLIB::RR-MODE-INFO-PUT in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xinerama.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xinerama-tmp8PYELRKX.fasl
; compilation finished in 0:00:00.054
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/dbe.lisp" (written 13 MAY 2024 09:28:08 AM):
SIMPLE-COMPILER-NOTE: unable to
optimize away possible call to FDEFINITION at runtime
because:
callable expression is not known to be a function
; file: /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/dbe.lisp
; in: DEFUN CREATE-BACK-BUFFER
; (XLIB::ALLOCATE-RESOURCE-ID XLIB:DISPLAY XLIB::BB 'XLIB::BACK-BUFFER)
; --> XLIB::WITH-BUFFER MACROLET LET XLIB::HOLDING-LOCK
; --> SB-THREAD:WITH-RECURSIVE-LOCK SB-INT:DX-FLET FLET
; --> SB-THREAD::WITH-RECURSIVE-LOCK-THUNK BLOCK FUNCALL
; ==>
; 1
;
; note: unable to
; optimize away possible call to FDEFINITION at runtime
; because:
; callable expression is not known to be a function
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/dbe-tmpEHTOKYT0.fasl
; compilation finished in 0:00:00.135
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xc-misc.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/xc-misc-tmpS6U1VHI9.fasl
; compilation finished in 0:00:00.019
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/dri2.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/dri2-tmpVTFK6ZJW.fasl
; compilation finished in 0:00:00.349
; compiling file "/exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/composite.lisp" (written 13 MAY 2024 09:28:08 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/clx-0.7.6/extensions/composite-tmp75WVSJEW.fasl
; compilation finished in 0:00:00.134
REDEFINITION-WITH-DEFMACRO: redefining XLIB::COMPOSITE-OPCODE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-mixins/src/package.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-mixins/src/package-tmpBU5UM3S4.fasl
; compilation finished in 0:00:00.001
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-mixins/src/sorting.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-mixins/src/sorting-tmpOBHVA3CD.fasl
; compilation finished in 0:00:00.008
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-mixins/src/dynamic-mixins.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-mixins/src/dynamic-mixins-tmpJ6ELVFLF.fasl
; compilation finished in 0:00:00.047
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/package.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/package-tmpULDB0RG.fasl
; compilation finished in 0:00:00.002
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/debug.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/debug-tmpUTZ0UUTE.fasl
; compilation finished in 0:00:00.033
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/primitives.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/primitives-tmpOOSRA8PZ.fasl
; compilation finished in 0:00:00.448
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::DEFINE-SWM-CLASS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:WITH-RESTARTS-MENU in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:ADD-HOOK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:REMOVE-HOOK in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:REMOVE-ALL-HOOKS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-FRAME-PREFERENCE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::DEFINE-FULLSCREEN-IN-FRAME-RULE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::WITH-FOCUS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:WITH-DATA-FILE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:MOVE-TO-HEAD in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/wrappers.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/wrappers-tmpDMIL0RVK.fasl
; compilation finished in 0:00:00.042
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/pathnames.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/pathnames-tmp8MR9IMIO.fasl
; compilation finished in 0:00:00.005
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/font-rendering.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/font-rendering-tmpJQDKAVAY.fasl
; compilation finished in 0:00:00.025
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/keysyms.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/keysyms-tmp3I8CEEQY.fasl
; compilation finished in 0:00:00.133
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/keytrans.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/keytrans-tmpA3RHFLWZ.fasl
; compilation finished in 0:00:00.009
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/kmap.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/kmap-tmpYZIB7VXO.fasl
; compilation finished in 0:00:00.100
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/input.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/input-tmpR8PK79V8.fasl
; compilation finished in 0:00:00.284
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/core.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/core-tmpN1ZVB1HZ.fasl
; compilation finished in 0:00:00.012
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/command.lisp" (written 25 NOV 2023 12:44:47 AM):
TYPE-STYLE-WARNING: The binding of I is not a REAL:
NIL
See also:
The SBCL Manual, Node "Handling of Types"
; file: /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/command.lisp
; in: DEFUN ARGUMENT-POP
; (LOOP STUMPWM::FOR STUMPWM::I STUMPWM::FROM STUMPWM::START STUMPWM::BELOW (LENGTH
; STUMPWM::INPUT)
; STUMPWM::FOR CHAR = (CHAR STUMPWM::INPUT STUMPWM::I)
; DO ...)
; --> LET LET TAGBODY
; ==>
; NIL
;
; caught STYLE-WARNING:
; The binding of I is not a REAL:
; NIL
; See also:
; The SBCL Manual, Node "Handling of Types"
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/command-tmpZGRRPISB.fasl
; compilation finished in 0:00:00.359
COMPILE-WARNED-WARNING: Lisp compilation had style-warnings while
compiling #
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFCOMMAND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-STUMPWM-COMMAND in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFCOMMAND-ALIAS in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-STUMPWM-TYPE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/menu-declarations.lisp" (written 25 NOV 2023 12:44:47 AM):
WARNING:
Lisp compilation had style-warnings while
compiling #
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/menu-declarations-tmpFNKDE5XP.fasl
; compilation finished in 0:00:00.026
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/menu-definitions.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/menu-definitions-tmpRJTU435C.fasl
; compilation finished in 0:00:00.131
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/screen.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/screen-tmpI9WG87JK.fasl
; compilation finished in 0:00:00.151
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::SET-ANY-COLOR in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::WITH-CURRENT-SCREEN in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/head.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/head-tmpYDE6I9E6.fasl
; compilation finished in 0:00:00.030
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/group.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/group-tmp319UV2V8.fasl
; compilation finished in 0:00:00.172
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/bindings.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/bindings-tmpLYQINFYS.fasl
; compilation finished in 0:00:00.024
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::FILL-KEYMAP in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/events.lisp" (written 25 NOV 2023 12:44:47 AM):
CODE-DELETION-NOTE: deleting unreachable code
CODE-DELETION-NOTE: deleting unreachable code
; file: /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/events.lisp
; in: DEFUN SCROLL-BUTTON-KEYWORD-P
; (EQ STUMPWM::BUTTON :WHEEL-RIGHT)
;
; note: deleting unreachable code
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/events-tmpGA31XWNO.fasl
; compilation finished in 0:00:00.221
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::DEFINE-STUMP-EVENT-HANDLER in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/window.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/window-tmp5HT23M6C.fasl
; compilation finished in 0:00:00.570
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-WINDOW-SLOT in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/floating-group.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/floating-group-tmpA60KLDKY.fasl
; compilation finished in 0:00:00.234
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/tile-window.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/tile-window-tmpD801X3GJ.fasl
; compilation finished in 0:00:00.086
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/tile-group.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/tile-group-tmpGOW1GC70.fasl
; compilation finished in 0:00:00.397
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:SAVE-FRAME-EXCURSION in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/window-placement.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/window-placement-tmpPQ1X28TL.fasl
; compilation finished in 0:00:00.044
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/message-window.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/message-window-tmpE92ECU7O.fasl
; compilation finished in 0:00:00.188
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::DEFINE-SIMPLE-GRAVITY in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:WITH-MESSAGE-QUEUING in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/selection.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/selection-tmp8S0II570.fasl
; compilation finished in 0:00:00.023
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::MULTISELECT in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/module.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/module-tmpJE88A12F.fasl
; compilation finished in 0:00:00.019
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/ioloop.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/ioloop-tmpA5FNLPLT.fasl
; compilation finished in 0:00:00.117
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/timers.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/timers-tmpHKCV9TP8.fasl
; compilation finished in 0:00:00.038
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/stumpwm.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/stumpwm-tmpZ18MA7XE.fasl
; compilation finished in 0:00:00.071
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::SET-SIGNAL-HANDLER in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/user.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/user-tmp6LQJ9T0C.fasl
; compilation finished in 0:00:00.224
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFPROGRAM-SHORTCUT in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/interactive-keymap.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/interactive-keymap-tmpTX7OA81T.fasl
; compilation finished in 0:00:00.022
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-INTERACTIVE-KEYMAP in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/iresize.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/iresize-tmpWOTC3PB7.fasl
; compilation finished in 0:00:00.022
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/help.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/help-tmpHQE95SAC.fasl
; compilation finished in 0:00:00.148
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/fdump.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/fdump-tmpO87FP9NR.fasl
; compilation finished in 0:00:00.097
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/time.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/time-tmpP6A3E92I.fasl
; compilation finished in 0:00:00.032
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/mode-line.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/mode-line-tmpUSHT8RIL.fasl
; compilation finished in 0:00:00.094
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/mode-line-formatters.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/mode-line-formatters-tmp7YCPD44Y.fasl
; compilation finished in 0:00:00.054
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::ALTERNATE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::SCROLL in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/color.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/color-tmpQXR7SNXD.fasl
; compilation finished in 0:00:00.086
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/wse.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/wse-tmp6FLI1OC3.fasl
; compilation finished in 0:00:00.028
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:ACT-ON-MATCHING-WINDOWS in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-window.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-window-tmpWBK8JTS9.fasl
; compilation finished in 0:00:00.034
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-group.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/dynamic-group-tmpUVEUD2ZN.fasl
; compilation finished in 0:00:00.852
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::SWAP in DEFMACRO
REDEFINITION-WITH-DEFMETHOD: redefining PRINT-SWM-OBJECT (#
#) in DEFMETHOD
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM::WITH-GROUP-HEAD-INFO in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/remap-keys.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/remap-keys-tmpOWNJOEU.fasl
; compilation finished in 0:00:00.022
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/manual.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/manual-tmpVT5BMTA5.fasl
; compilation finished in 0:00:00.092
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/minor-modes.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/minor-modes-tmpN3CFVWZF.fasl
; compilation finished in 0:00:00.368
REDEFINITION-WITH-DEFUN: redefining STUMPWM::MAKE-SPECIAL-VARIABLE-NAME in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::PARSE-MINOR-MODE-OPTIONS in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::DEFINE-COMMAND-MACRO in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::DEFINE-ENABLE-METHODS in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::GENLIGHTER in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::DEFINE-HOOKS in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM:ADD-MINOR-MODE-SCOPE in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::GET-SCOPE in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::SCOPE-TYPE in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::SCOPE-FILTER-TYPE in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::SCOPE-CURRENT-OBJECT-FUNCTION in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::SCOPE-ALL-OBJECTS-FUNCTION in DEFUN
REDEFINITION-WITH-DEFUN: redefining STUMPWM::FIND-ACTIVE-GLOBAL-MINOR-MODES-FOR-SCOPE in DEFUN
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-MINOR-MODE-SCOPE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-DESCENDED-MINOR-MODE-SCOPE in DEFMACRO
REDEFINITION-WITH-DEFMACRO: redefining STUMPWM:DEFINE-MINOR-MODE in DEFMACRO
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/replace-class.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/replace-class-tmpNK27C0R1.fasl
; compilation finished in 0:00:00.025
REDEFINITION-WITH-DEFGENERIC: redefining DYNAMIC-MIXINS-SWM:REPLACE-CLASS in DEFGENERIC
WARNING: redefining DYNAMIC-MIXINS-SWM:REPLACE-CLASS in DEFGENERIC
; compiling file "/exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/version.lisp" (written 25 NOV 2023 12:44:47 AM):
; wrote /exopi-obj/pobj/stumpwm-23.11/stumpwm-23.11/version-tmp3BPE71HR.fasl
; compilation finished in 0:00:00.004
;
; compilation unit finished
; caught 8 STYLE-WARNING conditions
; printed 777 notes
[undoing binding stack and other enclosing state... done]
[performing final GC... done]
[defragmenting immobile space... (inst,code,sym)=1103+25824+25285... done]
[saving current Lisp image into stumpwm:
writing 98304 bytes from the linkage space at 0xfffc00000
writing 3168 bytes from the static space at 0x20000000
compressed 32768 bytes into 526 at level 9
writing 19791872 bytes from the dynamic space at 0x1100000000
compressed 19791872 bytes into 3119834 at level 9
writing 10242608 bytes from the read-only space at 0x10ff638000
compressed 10256384 bytes into 4847597 at level 9
writing 1359872 bytes from the fixedobj space at 0x20900000
compressed 1376256 bytes into 329692 at level 9
writing 15335424 bytes from the text space at 0x1000000000
compressed 15335424 bytes into 3564070 at level 9
done]
/usr/local/bin/sbcl --non-interactive --eval "(setf sb-impl::*default-external-format* :UTF-8)" --eval "(progn (load \"load-stumpwm.lisp\") (load \"manual.lisp\"))" --eval "(progn (stumpwm::generate-manual) (sb-ext:quit))"
This is SBCL 2.4.10.openbsd.sbcl-2.4.10, 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.
WARNING: System definition file #P"/exopi-obj/pobj/stumpwm-23.11/cl-ppcre-2.1.1/cl-ppcre.asd" contains definition for system "cl-ppcre-test". Please only define "cl-ppcre" and secondary systems with a name starting with "cl-ppcre/" (e.g. "cl-ppcre/test") in that file.
WARNING: redefining DYNAMIC-MIXINS-SWM:REPLACE-CLASS in DEFGENERIC
warning: Function dynamic-group-head-layout not found.
warning: Function dynamic-group-head-split-ratio not found.
warning: Symbol exchange-window-with-master not found in package STUMPWM
test "/usr/local/bin/gmakeinfo" = "no" || /usr/local/bin/gmakeinfo stumpwm.texi
>>> Running package in x11/stumpwm at 1731849598.86
===> x11/stumpwm
===> Faking installation for stumpwm-23.11p9
test -z "/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/bin" || mkdir -p "/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/bin"
install -m 755 stumpwm "/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/bin"
test -z "/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/info" || mkdir -p "/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/info"
test "/usr/local/bin/gmakeinfo" = "no" || install -m 644 stumpwm.info "/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/info"
test "/usr/local/bin/gmakeinfo" = "no" || install-info --info-dir="/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/info" "/exopi-obj/pobj/stumpwm-23.11/fake-amd64/usr/local/info/stumpwm.info"
===> Building package for stumpwm-23.11p9
Create /exopi-cvs/ports/packages/amd64/all/stumpwm-23.11p9.tgz
Creating package stumpwm-23.11p9
reading plist|
checking dependencies|
checking dependencies|archivers/zstd
checksumming|
checksumming| | 0%
checksumming|**** | 7%
checksumming|******** | 13%
checksumming|************ | 20%
checksumming|**************** | 27%
checksumming|******************** | 33%
checksumming|************************ | 40%
checksumming|**************************** | 47%
checksumming|********************************* | 53%
checksumming|************************************* | 60%
checksumming|***************************************** | 67%
checksumming|********************************************* | 73%
checksumming|************************************************* | 80%
checksumming|***************************************************** | 87%
checksumming|********************************************************* | 93%
checksumming|*************************************************************|100%
archiving|
archiving| | 0%
archiving|********** | 16%
archiving|********************* | 33%
archiving|******************************* | 49%
archiving|****************************************** | 65%
archiving|**************************************************** | 81%
archiving|************************************************************** | 98%
archiving|*************************************************************** | 98%
archiving|****************************************************************|100%
Link to /exopi-cvs/ports/packages/amd64/ftp/stumpwm-23.11p9.tgz
>>> Running clean in x11/stumpwm at 1731849602.48
===> x11/stumpwm
===> Cleaning for stumpwm-23.11p9
>>> Ended at 1731849602.86
max_stuck=5.43/waiting-for-lock #204=10.56/depends=5.98/show-prepare-results=1.30/build=44.34/package=3.60/clean=0.41